summaryrefslogtreecommitdiff
path: root/ROMs/hello_c.asm
blob: da648b646bc16973037faa27a8a7f738a71e657f (plain)
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
    jmp _main
    .include "ROMs/font.bin"
_drawChar_int_ch__int_x__int_y__int_color:
    pop V0
    pop [$71FF]
    pop [$7201]
    pop [$7203]
    pop [$7205]
    push V0
    ; adjust for jmp instruction
    push $1FFF
    mov 2, V1
    pop V0
    add V0, V1
    mov AX, [$7207]
    push [$71FF]
    mov 8, V1
    pop V0
    mul V0, V1
    mov AX, [$7209]
    mov 0, [$720B]
_body_1:
    push [$720B]
    mov 8, V1
    pop V0
    lt V0, V1
    not LX
    bz
    jmp _end_2
    push [$7207]
    push [$7209]
    mov [$720B], V1
    pop V0
    add V0, V1
    mov AX, V1
    pop V0
    mul V1, 1
    add AX, V0
    mov AX, V0
    mov [V0], [$720D]
    mov 0, [$720F]
_body_3:
    push [$720F]
    mov 8, V1
    pop V0
    lt V0, V1
    not LX
    bz
    jmp _end_4
    push [$720D]
    push 7
    mov [$720F], V1
    pop V0
    sub V0, V1
    mov AX, V1
    pop V0
    shr V0, V1
    push DX
    mov 1, V1
    pop V0
    and V0, V1
    mov DX, [$7211]
    bz [$7211]
    jmp _then_5
    mov [$7205], V0
    jmp _end_6
_then_5:
    mov 0, V0
_end_6:
    mov V0, [$7213]
    push [$7213]
    push [$7203]
    mov [$720B], V1
    pop V0
    add V0, V1
    push AX
    push [$7201]
    mov [$720F], V1
    pop V0
    add V0, V1
    push AX
    call _setPixel_int_x__int_y__int_c
    push [$720F]
    inc [$720F]
    pop V0
    jmp _body_3
_end_4:
    push [$720B]
    inc [$720B]
    pop V0
    jmp _body_1
_end_2:
    mov 0, V0
    ret

_setPixel_int_x__int_y__int_c:
    pop V0
    pop [$7215]
    pop [$7217]
    pop [$7219]
    push V0
    mov $402F, [$721B]
    push [$7217]
    mov 128, V1
    pop V0
    mul V0, V1
    push AX
    mov [$7215], V1
    pop V0
    add V0, V1
    mov AX, [$721D]
    push [$721B]
    mov [$721D], V1
    pop V0
    mul V1, 1
    add AX, V0
    mov AX, V0
    movb [$7219], [V0]
    mov 0, V0
    ret

_clear_int_c:
    pop V0
    pop [$721F]
    push V0
    mov $402F, [$7221]
    push 64
    mov 128, V1
    pop V0
    mul V0, V1
    mov AX, [$7223]
    mov 0, [$7225]
_body_7:
    push [$7225]
    mov [$7223], V1
    pop V0
    lt V0, V1
    not LX
    bz
    jmp _end_8
    push [$7221]
    mov [$7225], V1
    pop V0
    mul V1, 1
    add AX, V0
    mov AX, V0
    movb [$721F], [V0]
    push [$7225]
    inc [$7225]
    pop V0
    jmp _body_7
_end_8:
    mov 0, V0
    ret

_main:
    mov 1, [$7227]
    mov 72, [$722B]
    mov 69, [$722D]
    mov 76, [$722F]
    mov 76, [$7231]
    mov 79, [$7233]
    mov 32, [$7235]
    mov 87, [$7237]
    mov 79, [$7239]
    mov 82, [$723B]
    mov 76, [$723D]
    mov 68, [$723F]
    mov 33, [$7241]
    mov $722B, [$7229]
    mov 12, [$7243]
    push 0
    call _clear_int_c
_body_9:
    not 1
    bz
    jmp _end_10
    mov 0, [$7245]
_body_11:
    push [$7245]
    mov [$7243], V1
    pop V0
    lt V0, V1
    not LX
    bz
    jmp _end_12
    push [$7229]
    mov [$7245], V1
    pop V0
    mul V1, 2
    add AX, V0
    mov AX, V0
    mov [V0], [$7247]
    push [$7227]
    push 0
    push [$7245]
    mov 8, V1
    pop V0
    mul V0, V1
    push AX
    push [$7247]
    call _drawChar_int_ch__int_x__int_y__int_color
    push [$7245]
    inc [$7245]
    pop V0
    jmp _body_11
_end_12:
    push [$7227]
    inc [$7227]
    pop V0
    jmp _body_9
_end_10:
    mov 0, V0
    ret