; http://www.cpcrulez.2ya.com
; ; -** HORIZONTAL STAR FLYING **- by HYPNOM '94 Version 1 org &4000 loop: ld a,32 ld hl,(tab):ld (hl),a ld hl,(tab+2):ld (hl),a ld hl,(tab+4):ld (hl),a ld hl,(tab+6):ld (hl),a ld hl,(tab+8):ld (hl),a call &bb09 ret c call &bd19 ld hl,(tab):call check:ld (tab),hl ld hl,(tab+2):call check:ld (tab+2),hl ld hl,(tab+4):call check:ld (tab+4),hl ld hl,(tab+6):call check:ld (tab+6),hl ld hl,(tab+8):call check:ld (tab+8),hl jr loop check: ld (hl),0 inc hl ld a,h or l cp 0 ret nz ld hl,&c000 ret tab: dw &cf0f,&d1e0,&ec55,&f242,&caaa |