|
Routines |
| Prev: 6424 | Up: Map | Next: 64A4 |
|
Used by the routine at InitialiseLevel.
|
||||
| 6440 | LD A,$0A | A=0A. | ||
| 6442 | NOP | No operation. | ||
| 6443 | LD C,A | C=A. | ||
| 6444 | INC B | Increment B by one. | ||
| 6445 | INC C | Increment C by one. | ||
| 6446 | LD HL,$A01E | HL=A01E. | ||
| 6449 | PUSH HL | Stash HL on the stack. | ||
| 644A | LD DE,$B400 | DE=B400. | ||
| 644D | DEC (HL) | Decrease *HL by one. | ||
| 644E | JR Z,$6458 | Jump to 6458 if *HL is zero. | ||
| 6450 | LD E,$24 | E=24. | ||
| 6452 | INC H | Increment H by one. | ||
| 6453 | DEC (HL) | Decrease *HL by one. | ||
| 6454 | JR Z,$6458 | Jump to 6458 if *HL is zero. | ||
| 6456 | LD E,$48 | E=48. | ||
| 6458 | POP HL | Restore HL from the stack. | ||
| 6459 | PUSH HL | Stash HL on the stack. | ||
| 645A | INC L | Increment L by two. | ||
| 645B | INC L | |||
| 645C | JR NZ,$6462 | Jump to 6462 if L is not zero. | ||
| 645E | LD A,H | A=H. | ||
| 645F | ADD A,$05 | A+=05. | ||
| 6461 | LD H,A | H=A. | ||
| 6462 | INC L | Increment L by one. | ||
| 6463 | LD A,(HL) | A=*HL. | ||
| 6464 | DEC A | Decrease A by one. | ||
| 6465 | JR Z,$6470 | Jump to 6470 if A is zero. | ||
| 6467 | INC H | Increment H by one. | ||
| 6468 | LD A,(HL) | A=*HL. | ||
| 6469 | DEC A | Decrease A by one. | ||
| 646A | LD A,$0C | A=0C. | ||
| 646C | JR Z,$6470 | Jump to 6470 if A was zero on line 6469. | ||
| 646E | LD A,$18 | A=18. | ||
| 6470 | ADD A,E | A+=E. | ||
| 6471 | LD E,A | E=A. | ||
| 6472 | POP HL | Restore HL from the stack. | ||
| 6473 | DEC H | Decrease H by one. | ||
| 6474 | LD B,$04 | B=04. | ||
| 6476 | LD A,(DE) | A=*DE. | ||
| 6477 | LD (HL),A | Write A to *HL. | ||
| 6478 | INC H | Increment H by one. | ||
| 6479 | INC E | Increment E by one. | ||
| 647A | DJNZ $6476 | Decrease counter by one and loop back to 6476 until counter is zero. | ||
| 647C | DEC H | Decrease H by four. | ||
| 647D | DEC H | |||
| 647E | DEC H | |||
| 647F | DEC H | |||
| 6480 | INC L | Increment L by one. | ||
| 6481 | LD B,$04 | B=04. | ||
| 6483 | LD A,(DE) | A=*DE. | ||
| 6484 | LD (HL),A | Write A to *HL. | ||
| 6485 | INC H | Increment H by one. | ||
| 6486 | INC E | Increment E by one. | ||
| 6487 | DJNZ $6483 | Decrease counter by one and loop back to 6483 until counter is zero. | ||
| 6489 | INC H | Increment H by one. | ||
| 648A | INC L | Increment L by one. | ||
| 648B | JR Z,$6491 | Jump to 6491 if L is zero. | ||
| 648D | LD A,H | A=H. | ||
| 648E | SUB $05 | A-=05. | ||
| 6490 | LD H,A | H=A. | ||
| 6491 | LD B,$04 | B=04. | ||
| 6493 | LD A,(DE) | A=*DE. | ||
| 6494 | LD (HL),A | Write A to *HL. | ||
| 6495 | INC H | Increment H by one. | ||
| 6496 | INC E | Increment E by one. | ||
| 6497 | DJNZ $6493 | Decrease counter by one and loop back to 6493 until counter is zero. | ||
| 6499 | DEC H | Decrease H by three. | ||
| 649A | DEC H | |||
| 649B | DEC H | |||
| 649C | LD A,L | L+=1E. | ||
| 649D | ADD A,$1E | |||
| 649F | LD L,A | |||
| 64A0 | DEC C | Decrease C by one. | ||
| 64A1 | JR NZ,$6449 | Jump to 6449 until C is zero. | ||
| 64A3 | RET | Return. | ||
| Prev: 6424 | Up: Map | Next: 64A4 |