4082                          .ORG   16514   
4082   55 x 127               DS   127,$55	; filler of $55, untouched by code
4101   FD AE CF 8D F6 FB 6D B6 DB   $fd,$ae,$cf,$8d,$f6,$fb,$6d,$b6   
4109                START:    			; Prefix the code with the bitmap data
4109   C5                     PUSH   bc   	; At startup “start” is in BC, so C = 9
410A   E1                     POP   hl   	; so move it to HL, use as bitmap pointer
410B                ROW:      
410B   06 09                  LD   b,9   	; start each col on the 9th row, and first
410D                LOOP:     			; plot 4 asterisks
410D   38 14                  JR   c,xloop   	; if bit set then don't plot it
410F   E5                     PUSH   hl   	; save HL as it gets used to print
4110   C5                     PUSH   bc   	; save BC as it gets destroyed
4111   CD F5 08               CALL   $8f5   	; point HL at (c,b)
4114   C1                     POP   bc   	; retrieve BC
4115   3E 12                  LD   a,18   	; load rotation constant
4117   BE                     CP   (hl)   	; use it to check if all 4 plots are done
4118   36 17                  LD   (hl),23   	; plot a *
411A   E1                     POP   hl   	; retrieve HL
411B   38 06                  JR   c,xloop   	; if all 4 plots already done, x-it the loop
411D   90                     SUB   b   	; otherwise A = 18-B
411E   41                     LD   b,c   	; B = C and
411F   4F                     LD   c,a   	; C = 18-B => rotate 90º clockwise
4120   20 EB                  JR   nz,loop   	; If col != 0 then continue rotating
4122   C9                     RET   		; otherwise we are done
4123                XLOOP:    
4123   CB 3E                  SRL   (hl)   	; grab 1 bit from bitmap
4125   10 E6                  DJNZ   loop   	; use this bit for next row, until we run out
4127   0D                     DEC   c   	; otherwise, move on to next col
4128   2B                     DEC   hl   	; iterate bitmap pointer
4129   18 E0                  JR   row   	; print the next row
412B                END:      
