org &3000
; Point d'entrée
; Recopie de la routine de la démo en &7
DI
LD HL,routine
LD DE,&0007
LD BC,16
LDIR
; Lancement de la routine via un RST 8 avec interruption coupée
RST &8
; Routine de la démo
routine
di
exx
lp
xor h
rst 16
ld a,(hl)
inc hl
rst 16
jr lp
or &44
db &ed, &71 ; out (c),0
out (c),a
ret