构造一个简单的编译器实现语法检查 括号位置是否正确/对称/匹配/配对/平衡

QAQ

1. 
   
2. .版本 2
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. 
   
9. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
10. 返回 (0)  ' 可以根据您的需要返回任意数值
    
11. 
    
12. .子程序 _临时子程序
    
13. 
    
14. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
15. 
    
16. 
    
17. 输出调试文本 (括号位置是否正确 (“c((d >= 0 && d <=9?48:u?55:87)+d);”))
    
18. 输出调试文本 (括号位置是否正确 (“A=B+_lrol_(A+f+md.l[j&15]+ti[i],ss[i>>4][i&3]);”))
    
19. 输出调试文本 (括号位置是否正确 (“case 2:{f=B^C^D,j=3*i+5;break;}”))
    
20. 输出调试文本 (括号位置是否正确 (“case 3:{}}”))
    
21. 输出调试文本 (括号位置是否正确 (“输出调试文本 (括号位置是否正确 ()))”))
    
22. 
    
23. 
    
24. .子程序 括号位置是否正确, 逻辑型, 公开, 括号位置不匹配或位置不对称将返回假，否则返回真
    
25. .参数 代码文本, 文本型, , 不支持识别文本字符串中的括号以及全角括号否则会出错，处理前请自行删除引号内文本
    
26. 
    
27. ' 判断 (括号位置是否正确_ (代码文本, “<>”) ＝ 假)
    
28. ' 返回 (假)
    
29. .判断开始 (括号位置是否正确_单个 (代码文本, “{}”) ＝ 假)
    
30.     返回 (假)
    
31. .判断 (括号位置是否正确_单个 (代码文本, “[]”) ＝ 假)
    
32.     返回 (假)
    
33. .判断 (括号位置是否正确_单个 (代码文本, “()”) ＝ 假)
    
34.     返回 (假)
    
35. .默认
    
36. 
    
37. .判断结束
    
38. 返回 (真)
    
39. 
    
40. .子程序 括号位置是否正确_单个, 逻辑型
    
41. .参数 代码文本, 文本型
    
42. .参数 括号文本, 文本型
    
43. .局部变量 左括号, 字节型
    
44. .局部变量 右括号, 字节型
    
45. .局部变量 栈, 整数型
    
46. .局部变量 计数, 整数型
    
47. .局部变量 字节, 字节型
    
48. 
    
49. 左括号 ＝ 取代码 (括号文本, 1)
    
50. 右括号 ＝ 取代码 (括号文本, 2)
    
51. .计次循环首 (取文本长度 (代码文本), 计数)
    
52.     字节 ＝ 取代码 (代码文本, 计数)
    
53.     .判断开始 (字节 ＝ 左括号)
    
54.         栈 ＝ 栈 ＋ 1
    
55.     .判断 (字节 ＝ 右括号)
    
56.         栈 ＝ 栈 － 1
    
57.         .如果真 (栈 ＜ 0)
    
58.             返回 (假)
    
59.         .如果真结束
    
60. 
    
61.     .默认
    
62. 
    
63.     .判断结束
    
64. 
    
65. .计次循环尾 ()
    
66. 返回 (栈 ＝ 0)
    
67. 
    

复制代码

520

lz也可以考虑发明个新编译器，就像吴总一样

朵朵

搞这说难不难说简单也不简单

4面8方

顶顶顶顶顶顶顶顶顶

1心1亿

谢谢分享666

222

66666

好几个8

666

66大顺

666

小清新

hhh

U_U

同楼上