Conversion 83 -- 82 (CRASH)
Voici quelques programmes converties pour Crash :
1) caractères
.INCLUDE CRASH82.INC
.DB "ASCII CHAR by SD",0
charsav = TEXT_MEM
xor a
ld a,16d
initdisp:
ROM_CALL(CLEARLCD)
ld hl,$0000
ld (CURSOR_POS),hl
ld b,16d
displine:
ld (CURSOR_ROW),hl
ROM_CALL(TX_CHARPUT)
inc h
inc a
cp 227d
jr z,quit
djnz displine
jr upline
upline:
ld (charsav),a
ld h,$00
ld b,16d
ld a,07d
inc l
cp l
ld a,(charsav)
jr nz,displine
CALL CR_KHAND
ld a,(charsav)
jr initdisp
quit:
ROM_CALL(NEXT_LINE)
CALL CR_KHAND
ret