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 BEFORE ENTRY ID2="" END END county MUSTENTER BEFORE ENTRY ID2="" END END point RANGE 1 2 LEGAL 0 END MUSTENTER BEFORE ENTRY ID2="" END AFTER ENTRY LET ID2=(province*10^5)+(city*10^3)+(county*10)+point GOTO z1 END END ID2 AFTER ENTRY LET ID2=(province*10^5)+(city*10^3)+(county*10)+point END END z1 MUSTENTER END a111 RANGE 1 2 LEGAL 9 END JUMPS 2 A121 END MUSTENTER END a121 MUSTENTER END a122 MUSTENTER END a123 MUSTENTER END a131 MUSTENTER END a132 MUSTENTER END a133 MUSTENTER END a134 MUSTENTER END a135 MUSTENTER END a1 RANGE 1 3 LEGAL 9 END JUMPS 3 A21 2 A21 END MUSTENTER END a21 MUSTENTER END a22 MUSTENTER END a23 MUSTENTER END ab220 MUSTENTER END ab223 MUSTENTER END ab224 MUSTENTER END ab2259 MUSTENTER END ab226 MUSTENTER END ab227 MUSTENTER END ab228 MUSTENTER END ab230 MUSTENTER END ab233 MUSTENTER END ab234 MUSTENTER END ab2359 MUSTENTER END ab236 MUSTENTER END ab237 MUSTENTER END ab238 MUSTENTER END a311 MUSTENTER END a312 MUSTENTER END a313 MUSTENTER END a314 MUSTENTER END a211 RANGE 1 2 LEGAL 9 END JUMPS 2 A221 END MUSTENTER END a221 MUSTENTER END a222 MUSTENTER END a223 MUSTENTER END a231 MUSTENTER END a232 MUSTENTER END a233 MUSTENTER END a411 MUSTENTER END a4111 MUSTENTER END a4112 MUSTENTER END c1 RANGE 1 2 LEGAL 9 END MUSTENTER END c2 RANGE 1 2 LEGAL 9 END MUSTENTER END e1 RANGE 1 2 LEGAL 9 END JUMPS 2 d11 END MUSTENTER END e11 RANGE 1 2 LEGAL 9 END MUSTENTER END e12 RANGE 1 3 LEGAL 9 END MUSTENTER END e21 RANGE 1949 2100 MUSTENTER END e22 RANGE 1949 2100 MUSTENTER END e41 RANGE 1 2 LEGAL 9 END MUSTENTER END e42 RANGE 1 2 LEGAL 9 END MUSTENTER END e43 RANGE 1 2 LEGAL 9 END MUSTENTER END e44 RANGE 1 2 LEGAL 9 END MUSTENTER END e45 RANGE 1 2 LEGAL 9 END MUSTENTER END e46 RANGE 1 2 LEGAL 9 END MUSTENTER END e47 RANGE 1 2 LEGAL 9 END JUMPS 1 E47OTHER 2 e51 END MUSTENTER END e51 RANGE 1 2 LEGAL 9 END MUSTENTER END e52 RANGE 1 2 LEGAL 9 END MUSTENTER END e53 RANGE 1 2 LEGAL 9 END MUSTENTER END e54 RANGE 1 2 LEGAL 9 END MUSTENTER END e55 RANGE 1 2 LEGAL 9 END MUSTENTER END e56 RANGE 1 2 LEGAL 9 END MUSTENTER END e57 RANGE 1 2 LEGAL 9 END JUMPS 1 E57OTHER 2 E511 END MUSTENTER END e511 RANGE 1 2 LEGAL 9 END MUSTENTER END e512 RANGE 1 2 LEGAL 9 END MUSTENTER END e513 RANGE 1 2 LEGAL 9 END MUSTENTER END e514 RANGE 1 2 LEGAL 9 END JUMPS 1 E514OTHER 2 e521 END MUSTENTER END e521 RANGE 1 2 LEGAL 9 END MUSTENTER END e522 RANGE 1 2 LEGAL 9 END MUSTENTER END e523 RANGE 1 2 LEGAL 9 END JUMPS 2 E551 END MUSTENTER END e551 RANGE 1 2 LEGAL 9 END MUSTENTER END e552 RANGE 1 2 LEGAL 9 END MUSTENTER END e553 RANGE 1 2 LEGAL 9 END MUSTENTER END e554 RANGE 1 2 LEGAL 9 END JUMPS 2 e6 END MUSTENTER END e6 RANGE 1 5 LEGAL 9 END JUMPS 1 E7 2 E7 3 E7 4 e6other4 5 e6other5 END MUSTENTER END e7 RANGE 1 5 LEGAL 9 END MUSTENTER END d11 RANGE 1 2 LEGAL 9 END MUSTENTER END d12 RANGE 1 2 LEGAL 9 END MUSTENTER END d13 RANGE 1 2 LEGAL 9 END MUSTENTER END d14 RANGE 1 2 LEGAL 9 END MUSTENTER END d15 RANGE 1 2 LEGAL 9 END MUSTENTER END d16 RANGE 1 2 LEGAL 9 END MUSTENTER END d17 RANGE 1 2 LEGAL 9 END MUSTENTER END d18 RANGE 1 2 LEGAL 9 END JUMPS 2 F41 END MUSTENTER END f41 RANGE 1 2 LEGAL 9 END JUMPS 1 g2 END MUSTENTER END f42 RANGE 1 2 LEGAL 9 END JUMPS 2 F43 END MUSTENTER END f43 RANGE 1 2 LEGAL 9 END JUMPS 2 F44 END MUSTENTER END f44 RANGE 1 2 LEGAL 9 END JUMPS 2 F45 END MUSTENTER END f45 RANGE 1 2 LEGAL 9 END JUMPS 2 g2 END MUSTENTER END g2 RANGE 1 3 LEGAL 9 END MUSTENTER END g41 MUSTENTER END g42 MUSTENTER END g5 RANGE 1 3 LEGAL 9 END MUSTENTER END h111 RANGE 1 2 LEGAL 9 END JUMPS 2 h112 END MUSTENTER END h112 RANGE 1 2 LEGAL 9 END JUMPS 2 h113 END MUSTENTER END h113 RANGE 1 2 LEGAL 9 END JUMPS 2 h114 END MUSTENTER END h114 RANGE 1 2 LEGAL 9 END JUMPS 2 h115 END MUSTENTER END h115 RANGE 1 2 LEGAL 9 END JUMPS 2 h116 END MUSTENTER END h116 RANGE 1 2 LEGAL 9 END JUMPS 2 h121 END MUSTENTER END h121 RANGE 1 2 LEGAL 9 END JUMPS 2 h122 END MUSTENTER END h122 RANGE 1 2 LEGAL 9 END JUMPS 2 h123 END MUSTENTER END h123 RANGE 1 2 LEGAL 9 END JUMPS 2 h124 END MUSTENTER END h124 RANGE 1 2 LEGAL 9 END JUMPS 2 h125 END MUSTENTER END h125 RANGE 1 2 LEGAL 9 END JUMPS 2 h126 END MUSTENTER END h126 RANGE 1 2 LEGAL 9 END JUMPS 2 h131 END MUSTENTER END h131 RANGE 1 2 LEGAL 9 END JUMPS 2 h132 END MUSTENTER END h132 RANGE 1 2 LEGAL 9 END JUMPS 2 h133 END MUSTENTER END h133 RANGE 1 2 LEGAL 9 END JUMPS 2 h134 END MUSTENTER END h134 RANGE 1 2 LEGAL 9 END JUMPS 2 h135 END MUSTENTER END h135 RANGE 1 2 LEGAL 9 END JUMPS 2 h136 END MUSTENTER END h136 RANGE 1 2 LEGAL 9 END JUMPS 2 h141 END MUSTENTER END h141 RANGE 1 2 LEGAL 9 END JUMPS 2 h142 END MUSTENTER END h142 RANGE 1 2 LEGAL 9 END JUMPS 2 h143 END MUSTENTER END h143 RANGE 1 2 LEGAL 9 END JUMPS 2 h144 END MUSTENTER END h144 RANGE 1 2 LEGAL 9 END JUMPS 2 h145 END MUSTENTER END h145 RANGE 1 2 LEGAL 9 END JUMPS 2 h146 END MUSTENTER END h146 RANGE 1 2 LEGAL 9 END JUMPS 2 h151 END MUSTENTER END h151 RANGE 1 2 LEGAL 9 END JUMPS 2 h152 END MUSTENTER END h152 RANGE 1 2 LEGAL 9 END JUMPS 2 h153 END MUSTENTER END h153 RANGE 1 2 LEGAL 9 END JUMPS 2 h154 END MUSTENTER END h154 RANGE 1 2 LEGAL 9 END JUMPS 2 h155 END MUSTENTER END h155 RANGE 1 2 LEGAL 9 END JUMPS 2 h156 END MUSTENTER END h156 RANGE 1 2 LEGAL 9 END JUMPS 2 h161 END MUSTENTER END h161 RANGE 1 2 LEGAL 9 END JUMPS 2 h162 END MUSTENTER END h162 RANGE 1 2 LEGAL 9 END JUMPS 2 h163 END MUSTENTER END h163 RANGE 1 2 LEGAL 9 END JUMPS 2 h164 END MUSTENTER END h164 RANGE 1 2 LEGAL 9 END JUMPS 2 h165 END MUSTENTER END h165 RANGE 1 2 LEGAL 9 END JUMPS 2 h166 END MUSTENTER END h166 RANGE 1 2 LEGAL 9 END MUSTENTER END name MUSTENTER END tel MUSTENTER END date MUSTENTER END