parent
eae896031b
commit
6f11aff3a4
8
FSHa.asm
8
FSHa.asm
|
|
@ -4,7 +4,7 @@
|
|||
|
||||
.assume ADL=1
|
||||
.org userMem-2
|
||||
.DB tExtTok,tAsm84CeCmp
|
||||
.db tExtTok,tAsm84CeCmp
|
||||
|
||||
Setup:
|
||||
CALL _RunIndicOff
|
||||
|
|
@ -13,14 +13,13 @@ Setup:
|
|||
CALL _homeup
|
||||
CALL _ClrLCDFull
|
||||
|
||||
CALL drawstatusbar
|
||||
|
||||
CALL fshvarreset
|
||||
|
||||
CALL drawstatusbar
|
||||
|
||||
CALL printmotd
|
||||
|
||||
Input:
|
||||
;; TODO: Update status bar sometimes
|
||||
LD A, $00
|
||||
CALL commandfill
|
||||
|
||||
|
|
@ -46,6 +45,7 @@ Route:
|
|||
JP commandroute
|
||||
|
||||
Fin:
|
||||
CALL updatestatusbar
|
||||
JP Input
|
||||
|
||||
Err:
|
||||
|
|
|
|||
BIN
bin/FSHa.8xp
BIN
bin/FSHa.8xp
Binary file not shown.
7647
bin/FSHa.lst
7647
bin/FSHa.lst
File diff suppressed because it is too large
Load Diff
|
|
@ -1,5 +1,5 @@
|
|||
cryptocmdDECRYPT: .db "DECRYPT", 0
|
||||
cryptocmdDECRYPTo: .dw $0102
|
||||
cryptocmdDECRYPTo: .dw $0202
|
||||
cryptocmdDECRYPTm: .db "Decrypts a string using a cypher. see 'DECRYPT HELP' for info on cyphers", 0
|
||||
cryptocmdDECRYPTu: .db "DECRYPT <Crypt Command> <Crypt Args>", 0
|
||||
cryptocmdDECRYPTf:
|
||||
|
|
|
|||
|
|
@ -1,5 +1,5 @@
|
|||
cryptocmdENCRYPT: .db "ENCRYPT", 0
|
||||
cryptocmdENCRYPTo: .dw $0101
|
||||
cryptocmdENCRYPTo: .dw $0201
|
||||
cryptocmdENCRYPTm: .db "Encrypts a string using a cypher. see 'ENCRYPT HELP' for info on cyphers", 0
|
||||
cryptocmdENCRYPTu: .db "ENCRYPT <Crypt Command> <Crypt Args>", 0
|
||||
cryptocmdENCRYPTf:
|
||||
|
|
|
|||
|
|
@ -10,7 +10,7 @@ drawstatusbar:
|
|||
ld hl, $04FA
|
||||
;ld hl, %1111100000000000
|
||||
drawrectfilledM(0, 0, 2, 30)
|
||||
call _DrawBatteryIndicator
|
||||
call drawbatteryind
|
||||
;draw name
|
||||
set fracDrawLFont, (iy + fontFlags)
|
||||
ld a, 6
|
||||
|
|
@ -28,3 +28,12 @@ drawstatusbar:
|
|||
ld hl, $0000
|
||||
ld (drawFGcolor), hl
|
||||
ret
|
||||
|
||||
drawbatteryind:
|
||||
call _DrawBatteryIndicator
|
||||
ret
|
||||
|
||||
|
||||
updatestatusbar:
|
||||
call drawbatteryind
|
||||
ret
|
||||
|
|
|
|||
Loading…
Reference in New Issue