32279: Play a tune
|
32279 |
DI |
|
32280 |
LD A,(HL) |
|
32281 |
INC HL |
|
32282 |
AND A |
|
32283 |
JR NZ,32290 |
|
32285 |
INC A |
|
32286 |
OUT (254),A |
|
32288 |
EI |
|
32289 |
RET |
|
32290 |
PUSH HL |
|
32291 |
LD B,A |
|
32292 |
RRCA |
|
32293 |
JR NC,32304 |
|
32295 |
LD DE,3840 |
|
32298 |
DEC E |
|
32299 |
JR NZ,32298 |
|
32301 |
DEC D |
|
32302 |
JR NZ,32298 |
|
32304 |
AND 7 |
|
32306 |
LD C,A |
|
32307 |
ADD A,A |
|
32308 |
ADD A,7 |
|
32310 |
LD L,A |
|
32311 |
LD H,126 |
|
32313 |
LD A,B |
|
32314 |
RLCA |
|
32315 |
RLCA |
|
32316 |
RLCA |
|
32317 |
RLCA |
|
32318 |
AND 15 |
|
32320 |
LD B,A |
|
32321 |
LD E,(HL) |
|
32322 |
INC L |
|
32323 |
LD A,(HL) |
|
32324 |
LD HL,0 |
|
32327 |
ADD HL,DE |
|
32328 |
DJNZ 32327 |
|
32330 |
RR H |
|
32332 |
RR L |
|
32334 |
LD E,A |
|
32335 |
LD A,C |
|
32336 |
OUT (254),A |
|
32338 |
XOR 16 |
|
32340 |
LD C,A |
|
32341 |
LD B,E |
|
32342 |
DJNZ 32342 |
|
32344 |
DEC HL |
|
32345 |
LD A,H |
|
32346 |
OR L |
|
32347 |
JR NZ,32335 |
|
32349 |
POP HL |
|
32350 |
JP 32280 |