0 LD M8000
1 SET M8161
3 MOV H0C88 D8120
8 RS D10 K17 D50 K17
17 LD M8002
18 MOV K0 D40
23 BMOV D50 D70 K17
30 LD M8000
31 ASCI D201 D11 K2
38 ASCI D202 D13 K2
45 ASCI D203 D15 K2
52 ASCI D204 D17 K2
59 ASCI D205 D19 K2
66 ASCI D206 D21 K2
73 LD M8000
74 AND<= Z0 K5
79 ADD D40 D201Z0 D40
* <相加值到D40>
86 INC Z0
* <二進制轉換整數>
89 LD M8000
90 MOV D40 D209
* <求補碼>
95 SUB K256 D209 D210
102 ASCI D210 D23 K2
* <轉換ASCI嗎>
109 MOV H1 D201
114 MOV H3 D202
119 MOV H0D D25
124 MOV H0A D26
129 MOV H3A D10
134 LDP X000
136 SET M8122
138 MOV H21 D203
143 MOV H2 D204
148 RST Z0
151 RST D40
154 LD M8000
155 MOV D70 D80
160 MOV D71 D81
165 MOV D72 D82
170 MOV D73 D83
175 MOV D74 D84
180 MOV D75 D85
185 MOV D76 D86
190 MOV D77 D87
195 MOV D10 D90
200 MOV D11 D91
205 MOV D13 D92
210 LD M8123
211 RST M8123
213 END
滬公網安備31010802001143號
