1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
|
jmp _main
_hid_getKeyState_int_scanCode:
pop V0
pop [$71FF]
push V0
mov $6033, [$7201]
push [$71FF]
mov 8, V1
pop V0
div V0, V1
mov AX, [$7203]
push [$71FF]
mov 8, V1
pop V0
mod V0, V1
mov AX, [$7205]
push [$7201]
push [$7203]
mov 1, V1
pop V0
sub V0, V1
mov AX, V1
pop V0
mul V1, 1
add AX, V0
mov AX, V0
mov [V0], [$7207]
push [$7207]
push 1
mov [$7205], V1
pop V0
shl V0, V1
mov DX, V1
pop V0
and V0, V1
push DX
mov 0, V1
pop V0
cmp V0, V1
not
mov LX, V0
ret
mov 0, V0
ret
_hid_getPressedKey:
mov 0, [$7209]
_body_1:
push [$7209]
mov 256, V1
pop V0
lt V0, V1
not LX
bz
jmp _end_2
push [$7209]
call _hid_getKeyState_int_scanCode
cmp V0, 0
not
bz
jmp _clause_3
mov 0, V0
jmp _end_4
_clause_3:
push [$7209]
mov 160, V1
pop V0
cmp V0, V1
not
cmp LX, 0
not
mov LX, V0
_end_4:
not V0
bz
jmp _end_5
mov [$7209], V0
ret
_end_5:
push [$7209]
inc [$7209]
pop V0
jmp _body_1
_end_2:
mov 0, V0
ret
mov 0, V0
ret
_hid_waitForPressedKey:
_body_6:
not 1
bz
jmp _end_7
call _hid_getPressedKey
mov V0, [$720B]
push [$720B]
mov 0, V1
pop V0
cmp V0, V1
not
not LX
bz
jmp _end_8
mov [$720B], V0
ret
_end_8:
jmp _body_6
_end_7:
mov 0, V0
ret
_hid_getMouseIndex:
mov $602F, V0
mov [V0], V0
ret
mov 0, V0
ret
_hid_getMouseState:
push $602F
mov 2, V1
pop V0
add V0, V1
mov AX, V0
mov [V0], V0
ret
mov 0, V0
ret
_screen_setPixel_int_x__int_y__int_c:
pop V0
pop [$720D]
pop [$720F]
pop [$7211]
push V0
mov $402F, [$7213]
push [$720F]
mov 128, V1
pop V0
mul V0, V1
push AX
mov [$720D], V1
pop V0
add V0, V1
mov AX, [$7215]
push [$7213]
mov [$7215], V1
pop V0
mul V1, 1
add AX, V0
mov AX, V0
movb [$7211], [V0]
mov 0, V0
ret
_screen_setPixel_int_i__int_c:
pop V0
pop [$7217]
pop [$7219]
push V0
mov $402F, [$721B]
push [$721B]
mov [$7217], V1
pop V0
mul V1, 1
add AX, V0
mov AX, V0
movb [$7219], [V0]
mov 0, V0
ret
_screen_clear_int_c:
pop V0
pop [$721D]
push V0
mov $402F, [$721F]
mov 0, [$7221]
_body_9:
push [$7221]
push 128
mov 64, V1
pop V0
mul V0, V1
mov AX, V1
pop V0
lt V0, V1
not LX
bz
jmp _end_10
push [$721F]
mov [$7221], V1
pop V0
mul V1, 1
add AX, V0
mov AX, V0
movb [$721D], [V0]
push [$7221]
inc [$7221]
pop V0
jmp _body_9
_end_10:
mov 0, V0
ret
_main:
mov 0, [$7223]
_body_11:
not 1
bz
jmp _end_12
call _hid_getMouseIndex
mov V0, [$7225]
call _hid_getMouseState
mov V0, [$7227]
push [$7227]
mov 1, V1
pop V0
and V0, V1
not DX
bz
jmp _end_13
push [$7223]
mov 3, V1
pop V0
mod V0, V1
push AX
mov 1, V1
pop V0
add V0, V1
push AX
push [$7225]
call _screen_setPixel_int_i__int_c
_end_13:
push 67
call _hid_getKeyState_int_scanCode
not V0
bz
jmp _end_14
push 8
call _screen_clear_int_c
_end_14:
push 65
call _hid_getKeyState_int_scanCode
not V0
bz
jmp _end_15
push [$7223]
inc [$7223]
pop V0
_body_16:
push 65
call _hid_getKeyState_int_scanCode
not V0
bz
jmp _end_17
jmp _body_16
_end_17:
_end_15:
jmp _body_11
_end_12:
mov 0, V0
ret
|
