Prev: 8C4D Up: Map Next: 8CAA
8C65: Draw Walls, Ceiling and Floor
Used by the routines at RoomDraw and Invaders_Init.
Input
Output
Draw_CeilingWallFloor 8C65 PUSH HL
8C66 PUSH BC
8C67 PUSH DE
8C68 LD C,$43 Colour, bright purple.
8C6A LD HL,Tile_Ceiling
8C6D LD (TileStartPtr),HL
8C70 LD B,$20 Number of tiles to draw across.
8C72 XOR A Tile(0)
8C73 LD DE,$0500 Position(y,x)
Draw_CeilingWallFloor_0 8C76 CALL TileDraw
8C79 INC E
8C7A DJNZ Draw_CeilingWallFloor_0
8C7C LD A,$01
8C7E LD B,$20
8C80 LD C,$45
8C82 LD DE,$1700
Draw_CeilingWallFloor_1 8C85 CALL TileDraw
8C88 INC E
8C89 DJNZ Draw_CeilingWallFloor_1
8C8B LD A,$02
8C8D LD B,$11
8C8F LD DE,$0600
8C92 LD C,$42
Draw_CeilingWallFloor_2 8C94 CALL TileDraw
8C97 INC D
8C98 DJNZ Draw_CeilingWallFloor_2
8C9A LD B,$11
8C9C LD DE,$061F
Draw_CeilingWallFloor_3 8C9F CALL TileDraw
8CA2 INC D
8CA3 DJNZ Draw_CeilingWallFloor_3
8CA5 POP DE
8CA6 POP BC
8CA7 POP HL
8CA8 INC HL
8CA9 RET
Prev: 8C4D Up: Map Next: 8CAA