| Dynamite Dan | Routines |
| Prev: E87A | Up: Map | Next: E8BA |
|
||||||||||
| E897 | PUSH DE | Remember the input values. | ||||||||
| E898 | PUSH BC | |||||||||
| E899 | LD H,C | |||||||||
| E89A | PUSH DE | Remember DE. | ||||||||
| E89B | CALL $E8F1 | Convert the co-ordinates to a screen address. | ||||||||
| E89E | LD C,$08 | 8 rows to update. | ||||||||
| E8A0 | XOR A | Set A to 0. | ||||||||
| E8A1 | PUSH BC | Remember BC and DE. | ||||||||
| E8A2 | PUSH DE | |||||||||
| E8A3 | LD (DE),A | Set the byte. | ||||||||
| E8A4 | INC E | Move to the next column. | ||||||||
| E8A5 | DJNZ $E8A3 | Loop while there are more columns. | ||||||||
| E8A7 | POP DE | Restore DE. | ||||||||
| E8A8 | INC D | Move to the next row. | ||||||||
| E8A9 | POP BC | Restore BC. | ||||||||
| E8AA | DEC C | Loop until all rows are done. | ||||||||
| E8AB | JR NZ,$E8A1 | |||||||||
| E8AD | POP DE | Restore DE. | ||||||||
| E8AE | DEC E | |||||||||
| E8AF | DEC H | |||||||||
| E8B0 | JR NZ,$E89A | |||||||||
| E8B2 | POP BC | Restore the input values. | ||||||||
| E8B3 | POP DE | |||||||||
| E8B4 | LD A,$45 | Fill the area with bright cyan on black. | ||||||||
| E8B6 | CALL $E8BA | |||||||||
| E8B9 | RET | Return. | ||||||||
| Prev: E87A | Up: Map | Next: E8BA |