程序集1.static.e.txt 1.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. .版本 2
  2. .程序集 程序集1
  3. .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
  4. 语法分析并输出 (“1 -( sin(2222, 4444, tan(5555) + arctan(6666)) - cos(3333) )* 4”)
  5. 语法分析并输出 (“2*3-1*4+5/6-7*time()”)
  6. 语法分析并输出 (“1 + sin(degree(30))”)
  7. 语法分析并输出 (“3 * log(10, 100)”)
  8. 语法分析并输出 (“4 / ((2-3) / (4/2))”)
  9. .判断循环首 (真)
  10. 标准输出 (, “> ”)
  11. 解析命令 (标准输入 ())
  12. .判断循环尾 ()
  13. 返回 (0) ' 可以根据您的需要返回任意数值
  14. .子程序 解析命令
  15. .参数 命令, 文本型
  16. .局部变量 t, 文本型, , "0"
  17. ' 支持命令
  18. ' 「帮助」 「词法分析 some text」 「语法分析 some text」
  19. t = 分割文本 (命令, “ ”, 1)
  20. .判断开始 (t [1] = “帮助” 或 到半角 (t [1]) = “?”)
  21. 标准输出 (, #命令行帮助)
  22. .判断 (t [1] = “词法分析”)
  23. 词法分析并输出 (取文本右边 (命令, 取文本长度 (命令) - 取文本长度 (“词法分析”)))
  24. .判断 (t [1] = “语法分析”)
  25. 语法分析并输出 (取文本右边 (命令, 取文本长度 (命令) - 取文本长度 (“词法分析”)))
  26. .默认
  27. 标准输出 (, “未知命令” + #换行符)
  28. .判断结束
  29. .子程序 连接字符串, 文本型
  30. .参数 字符串组, 文本型, 数组,
  31. .局部变量 res, 文本型
  32. .局部变量 i, 整数型
  33. res = “”
  34. .计次循环首 (取文本长度 (字符串组), i)
  35. res = res + 字符串组 [i]
  36. .计次循环尾 ()