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 |