; http://www.cpcrulez.2ya.com
; ; -** HORIZONTAL STAR FLYING **- by HYPNOM '94 Version 2 org &4000 ;;;nolist ld a,1 call &bc0e begin ld hl,(tab):ld (hl),32 ld hl,(tab+2):ld (hl),32 ld hl,(tab+4):ld (hl),32 ld hl,(tab+6):ld (hl),32 ld hl,(tab+8):ld (hl),32 ld hl,(tab1):ld (hl),32 ld hl,(tab1+2):ld (hl),32 ld hl,(tab1+4):ld (hl),32 ld hl,(tab1+6):ld (hl),32 ld hl,(tab1+8):ld (hl),32 call &bb09 ret c call &bd19 ld hl,(tab):ld (hl),0:call check:ld (tab),hl ld hl,(tab+2):ld (hl),0:call check:ld (tab+2),hl ld hl,(tab+4):ld (hl),0:call check:ld (tab+4),hl ld hl,(tab+6):ld (hl),0:call check:ld (tab+6),hl ld hl,(tab+8):ld (hl),0:call check:ld (tab+8),hl ld hl,(tab1):ld (hl),0:inc hl:call check:ld (tab1),hl ld hl,(tab1+2):ld (hl),0:inc hl:call check:ld (tab1+2),hl ld hl,(tab1+4):ld (hl),0:inc hl:call check:ld (tab1+4),hl ld hl,(tab1+6):ld (hl),0:inc hl:call check:ld (tab1+6),hl ld hl,(tab1+8):ld (hl),0:inc hl:call check:ld (tab1+8),hl jp begin check inc hl ld a,h cp 0 ret nz ld hl,&c000 ret tab dw &c000,&d4f6,&e973,&f1dd,&c904 tab1 dw &cfff,&e030,&eaaa,&c7aa,&f4fb |