Routines |
Prev: 54540 | Up: Map | Next: 54675 |
Used by the routine at FindScene.
|
||||
54619 | LD HL,51136 | HL=51136. | ||
54622 | LD D,0 | D=0. | ||
54624 | LD E,A | E=A. | ||
54625 | ADD HL,DE | HL+=DE. | ||
54626 | LD DE,24896 | DE=24896. | ||
54629 | LD B,16 | B=16. | ||
54631 | PUSH HL | Stash HL and DE on the stack. | ||
54632 | PUSH DE | |||
54633 | LD A,(HL) | A=*HL. | ||
54634 | DEC A | Decrease A by one. | ||
54635 | LD E,A | E=A. | ||
54636 | ADD A,A | A+=A. | ||
54637 | ADD A,E | A+=E. | ||
54638 | ADD A,A | A+=A. | ||
54639 | LD E,A | E=A. | ||
54640 | LD D,0 | D=0. | ||
54642 | LD HL,51226 | HL=51226. | ||
54645 | ADD HL,DE | HL+=DE. | ||
54646 | POP DE | Restore DE from the stack. | ||
54647 | PUSH DE | Stash DE on the stack. | ||
54648 | LD C,3 | C=3. | ||
54650 | LD A,(HL) | A=*HL. | ||
54651 | LD (DE),A | Write A to *DE. | ||
54652 | INC HL | Increment HL by one. | ||
54653 | INC DE | Increment DE by one. | ||
54654 | LD A,(HL) | A=*HL. | ||
54655 | LD (DE),A | Write A to *DE. | ||
54656 | INC HL | Increment HL by one. | ||
54657 | PUSH HL | Stash HL on the stack. | ||
54658 | LD HL,31 | HL=0031. | ||
54661 | ADD HL,DE | HL+=DE. | ||
54662 | EX DE,HL | Exchange the DE and HL registers. | ||
54663 | POP HL | Restore HL from the stack. | ||
54664 | DEC C | Decrease C by one. | ||
54665 | JR NZ,54650 | Jump to 54650 until C is zero. | ||
54667 | POP DE | Restore DE from the stack. | ||
54668 | INC E | Increment E by two. | ||
54669 | INC E | |||
54670 | POP HL | Restore HL from the stack. | ||
54671 | INC HL | Increment HL by one. | ||
54672 | DJNZ 54631 | Decrease counter by one and loop back to 54631 until counter is zero. | ||
54674 | RET | Return. |
Prev: 54540 | Up: Map | Next: 54675 |