Made VARS command newline every 8 words

fixed bug where filling fshcmd only did half
This commit is contained in:
Stephen Toth 2018-06-24 22:42:15 -04:00
parent 15452c4fce
commit 3e1451c007
4 changed files with 18 additions and 3 deletions

View File

@ -9,7 +9,7 @@ Setup:
CALL _homeup
CALL _ClrLCDFull
LD HL, $00
LD HL, 0
CALL fshvarfill

Binary file not shown.

View File

@ -89,7 +89,7 @@ fshcmdfillLoop:
inc b
inc de
ld a, b
cp FshCmdSize / 2
cp FshCmdSize
jr c, fshcmdfillLoop
pop de
pop bc

View File

@ -3,6 +3,7 @@ fshcmdVARSo: .db $12
fshcmdVARSu: .db "Displays all Fsh Vars", 0
fshcmdVARSf:
ld b, 0
ld c, 0
ld de, 0
fshcmdVARSfLoop:
call fshvarget
@ -10,12 +11,26 @@ fshcmdVARSfLoop:
call _PutC
ld a, l
call _PutC
ld a, c
inc c
cp 7
jr nz, fshcmdVARSfLoopU
push hl
push bc
push de
call _NewLine
pop de
pop bc
pop hl
ld c, 0
jr fshcmdVARSfLoopBack
fshcmdVARSfLoopU:
ld a, '_'
call _PutC
fshcmdVARSfLoopBack:
inc b
inc de
ld a, b
cp FshVarsSize / 2
jr c, fshcmdVARSfLoop
call _NewLine
jp Fin