LABELBLOCK LABEL 标记_province 11 北京 12 天津 13 河北 14 山西 15 内蒙古 21 辽宁 22 吉林 23 黑龙江 31 上海 32 江苏 33 浙江 34 安徽 35 福建 36 江西 37 山东 41 河南 42 湖北 43 湖南 44 广东 45 广西 46 海南 50 重庆 51 四川 52 贵州 53 云南 54 西藏 61 陕西 62 甘肃 63 青海 64 宁夏 65 新疆 66 新疆生产建设兵团 END END AFTER RECORD IF (ID1=.) OR (ID2=.) THEN HELP "ID=number must be entered in ID1 and ID2" TYPE=ERROR IF ID1=. THEN GOTO ID1 ELSE GOTO ID2 ENDIF EXIT ENDIF IF (ID1<>ID2) THEN HELP "ID1=@ID1 and ID2=@ID2\n\nPlease check the data" TYPE=WARNING GOTO ID1 ENDIF END ID1 Autosearch LIST ID1 MUSTENTER TYPE STATUSBAR "ID1=" GREEN END province COMMENT LEGAL USE 标记_province MUSTENTER REPEAT BEFORE ENTRY ID2="" END END city MUSTENTER REPEAT BEFORE ENTRY ID2="" END END county MUSTENTER REPEAT BEFORE ENTRY ID2="" END END point RANGE 1 2 MUSTENTER REPEAT BEFORE ENTRY ID2="" END END school MUSTENTER BEFORE ENTRY ID2="" END AFTER ENTRY LET ID2=(province*10^7)+(city*10^5)+(county*10^3)+(point*100)+school GOTO schname END END ID2 AFTER ENTRY LET ID2=(province*10^7)+(city*10^5)+(county*10^3)+(point*100)+school END END schname MUSTENTER END a1 RANGE 1 3 LEGAL 9 END JUMPS 1 a2 2 a2 END MUSTENTER END a2 RANGE 1 3 LEGAL 9 END MUSTENTER END a3 RANGE 1 9 JUMPS 1 a41 2 a41 3 a41 4 a41 5 a41 6 a41 7 a41 9 a41 END MUSTENTER END a41 MUSTENTER END a42 MUSTENTER END a43 MUSTENTER AFTER ENTRY IF (A42 + A43) <> A41 THEN HELP "错误：男生人数与女生人数之和不等于总人数" TYPE=WARNING GOTO a41 EXIT ENDIF END END a44 MUSTENTER END a45 MUSTENTER END a46 MUSTENTER AFTER ENTRY IF (A45 + A46) <> A44 THEN HELP "错误：男生人数与女生人数之和不等于总人数" TYPE=WARNING GOTO a44 EXIT ENDIF END END b1 RANGE 1 2 LEGAL 9 END MUSTENTER END b2 MUSTENTER END b3 MUSTENTER END b4 RANGE 1 4 LEGAL 9 END MUSTENTER END b5a MUSTENTER END b5b MUSTENTER END b511 RANGE 1 2 LEGAL 9 END END b512 RANGE 1 2 LEGAL 9 END END b514 RANGE 1 4 LEGAL 9 END END b515 RANGE 1 5 LEGAL 9 END END b516 RANGE 1 6 LEGAL 9 END END b521 RANGE 1 2 LEGAL 9 END END b522 RANGE 1 2 LEGAL 9 END END b524 RANGE 1 4 LEGAL 9 END END b525 RANGE 1 5 LEGAL 9 END END b526 RANGE 1 6 LEGAL 9 END END b531 RANGE 1 2 LEGAL 9 END END b532 RANGE 1 2 LEGAL 9 END END b534 RANGE 1 4 LEGAL 9 END END b535 RANGE 1 5 LEGAL 9 END END b536 RANGE 1 6 LEGAL 9 END END b541 RANGE 1 2 LEGAL 9 END END b542 RANGE 1 2 LEGAL 9 END END b544 RANGE 1 4 LEGAL 9 END END b545 RANGE 1 5 LEGAL 9 END END b546 RANGE 1 6 LEGAL 9 END END c1 RANGE 1 3 LEGAL 9 END JUMPS 1 c111 3 C21 END MUSTENTER END c111 RANGE 1 2 LEGAL 9 END MUSTENTER END c112 RANGE 1 2 LEGAL 9 END MUSTENTER END c113 RANGE 1 2 LEGAL 9 END MUSTENTER END c114 RANGE 1 2 LEGAL 9 END MUSTENTER END c115 RANGE 1 2 LEGAL 9 END MUSTENTER END c116 RANGE 1 2 LEGAL 9 END MUSTENTER END c117 RANGE 1 2 LEGAL 9 END MUSTENTER END c118 RANGE 1 2 LEGAL 9 END MUSTENTER END c119 RANGE 1 2 LEGAL 9 END JUMPS 1 c119other 2 c12 END MUSTENTER END c12 RANGE 1 2 LEGAL 9 END MUSTENTER END c21 MUSTENTER END c22 MUSTENTER END c23 MUSTENTER END c24 MUSTENTER END c3 RANGE 1 2 LEGAL 9 END MUSTENTER END d1 RANGE 1 4 LEGAL 9 END JUMPS 1 d2 END END d11 MUSTENTER END d111 RANGE 1 2 LEGAL 9 END MUSTENTER END d112 RANGE 1 2 LEGAL 9 END MUSTENTER END d113 RANGE 1 2 LEGAL 9 END MUSTENTER END d114 RANGE 1 2 LEGAL 9 END MUSTENTER END d115 RANGE 1 2 LEGAL 9 END MUSTENTER END d116 RANGE 1 2 LEGAL 9 END JUMPS 2 d12 END MUSTENTER END d12 RANGE 1 2 LEGAL 9 END MUSTENTER END d13 RANGE 1 2 LEGAL 9 END MUSTENTER END d2 RANGE 1 2 LEGAL 9 END MUSTENTER END e11 RANGE 1 2 LEGAL 9 END MUSTENTER END e12 RANGE 1 2 LEGAL 9 END MUSTENTER END e13 RANGE 1 2 LEGAL 9 END MUSTENTER END e14 RANGE 1 2 LEGAL 9 END MUSTENTER END e15 RANGE 1 2 LEGAL 9 END MUSTENTER END e16 RANGE 1 2 LEGAL 9 END MUSTENTER END e17 RANGE 1 2 LEGAL 9 END MUSTENTER END e18 RANGE 1 2 LEGAL 9 END MUSTENTER END e19 RANGE 1 2 LEGAL 9 END MUSTENTER END e110 RANGE 1 2 LEGAL 9 END MUSTENTER END e111 RANGE 1 2 LEGAL 9 END JUMPS 1 e111other END MUSTENTER END e112 RANGE 1 2 LEGAL 9 END JUMPS 1 e21 END MUSTENTER END e21 RANGE 1 2 LEGAL 9 END MUSTENTER END e22 RANGE 1 2 LEGAL 9 END MUSTENTER END e23 RANGE 1 2 LEGAL 9 END MUSTENTER END e24 RANGE 1 2 LEGAL 9 END MUSTENTER END e25 RANGE 1 2 LEGAL 9 END MUSTENTER END e26 RANGE 1 2 LEGAL 9 END MUSTENTER END e27 RANGE 1 2 LEGAL 9 END MUSTENTER END e28 RANGE 1 2 LEGAL 9 END MUSTENTER END e29 RANGE 1 2 LEGAL 9 END MUSTENTER END e210 RANGE 1 2 LEGAL 9 END MUSTENTER END e211 RANGE 1 2 LEGAL 9 END MUSTENTER END e7 RANGE 1 3 LEGAL 9 END MUSTENTER END e8 RANGE 1 2 LEGAL 9 END MUSTENTER END g121 MUSTENTER END g122 MUSTENTER END g141 MUSTENTER END g142 MUSTENTER END g21 MUSTENTER END g22 MUSTENTER END h01 RANGE 1 4 LEGAL 9 END JUMPS 4 h3 END MUSTENTER END h02 RANGE 1 2 LEGAL 9 END JUMPS 2 h3 END MUSTENTER END h21 RANGE 1 2 LEGAL 9 END MUSTENTER END h3 RANGE 1 2 LEGAL 9 END JUMPS 2 i2 END MUSTENTER END h31 RANGE 1 2 LEGAL 9 END MUSTENTER END h32 RANGE 1 2 LEGAL 9 END MUSTENTER END i2 RANGE 1 3 LEGAL 9 END MUSTENTER END i3 RANGE 1 3 LEGAL 9 END MUSTENTER END i4 RANGE 1 3 LEGAL 9 END MUSTENTER END k1 RANGE 1 4 LEGAL 9 END MUSTENTER END k2 RANGE 1 2 LEGAL 9 END MUSTENTER END k301 RANGE 1 2 LEGAL 9 END MUSTENTER END k302 RANGE 1 2 LEGAL 9 END MUSTENTER END k303 RANGE 1 2 LEGAL 9 END MUSTENTER END k304 RANGE 1 2 LEGAL 9 END MUSTENTER END k305 RANGE 1 2 LEGAL 9 END MUSTENTER END k306 RANGE 1 2 LEGAL 9 END MUSTENTER END k307 RANGE 1 2 LEGAL 9 END MUSTENTER END k4 RANGE 1 3 LEGAL 9 END MUSTENTER END name MUSTENTER END tel MUSTENTER END date MUSTENTER END