|
Routines |
| Prev: 27648 | Up: Map | Next: 27884 |
|
This section draws the "Squiggle" line which separates the windows.
|
|||||
|
|||||
| SquiggleLine | 27853 | CALL ClearScreen | Call ClearScreen to clear screen. | ||
| 27856 | LD HL,20800 | Point at the squiggle row on screen. | |||
| 27859 | LD DE,28108 | Point at the squiggle pattern. | |||
| 27862 | LD C,5 | Five rows of the squiggle are drawn. | |||
| SquiggleLine_OuterLoop | 27864 | LD B,16 | Set a counter of 16. | ||
| 27866 | PUSH HL | ||||
| SquiggleLine_InnerLoop | 27867 | LD A,(DE) | Read the next byte of the picture. | ||
| 27868 | LD (HL),A | Store it at 20800. | |||
| 27869 | INC HL | Increase both pointers by one. | |||
| 27870 | INC DE | ||||
| 27871 | LD A,(DE) | Store the squiggle pattern in the squiggle row. | |||
| 27872 | LD (HL),A | ||||
| 27873 | INC HL | Step HL on. | |||
| 27874 | DEC DE | Step back one byte through Graphics_Squiggle. | |||
| 27875 | DJNZ SquiggleLine_InnerLoop | Decrease counter by one and loop back to SquiggleLine_InnerLoop until counter is zero. | |||
| 27877 | INC DE | Step on through Graphics_Squiggle. | |||
| 27878 | INC DE | ||||
| 27879 | POP HL | Move to the next screen row and repeat while squiggle rows remain. | |||
| 27880 | INC H | ||||
| 27881 | DEC C | ||||
| 27882 | JR NZ,SquiggleLine_OuterLoop | ||||
|
Continue on to TurnReadAndTokeniseTheCommand.
|
|||||
| Prev: 27648 | Up: Map | Next: 27884 |
