70 lines
1.2 KiB
NASM
70 lines
1.2 KiB
NASM
cryptocmdunHELP: .db "HELP", 0
|
|
cryptocmdunHELPm: .db "Help for cyphers", 0
|
|
cryptocmdunHELPu: .db "DECRYPT HELP", 0
|
|
cryptocmdunHELPf:
|
|
ld hl, FshCmdArgFlags
|
|
bit 2, (hl)
|
|
jr z, cryptocmdunHELPfExe
|
|
ld hl, ErrUsageo
|
|
call ErrSet
|
|
call ErrCatch
|
|
cryptocmdunHELPfExe:
|
|
ld hl, cryptocmdunHELPfLine1
|
|
call _PutS
|
|
call _NewLine
|
|
|
|
#macro cryptocmdunHELPmRow1(cmdXs)
|
|
xor a
|
|
ld (curCol), a
|
|
ld hl, cmdXs
|
|
call _PutS
|
|
call _NewLine
|
|
#endmacro
|
|
#macro cryptocmdunHELPmRowU(cmdXs, cmdXu)
|
|
xor a
|
|
ld (curCol), a
|
|
ld hl, cmdXs
|
|
call _PutS
|
|
ld a, ':'
|
|
call _PutC
|
|
ld a, ' '
|
|
call _PutC
|
|
ld hl, cmdXu
|
|
call _PutS
|
|
call _NewLine
|
|
#endmacro
|
|
#macro cryptocmdunHELPmRow2(cmdXs, cmdYs)
|
|
xor a
|
|
ld (curCol), a
|
|
ld hl, cmdXs
|
|
call _PutS
|
|
ld a, 9
|
|
ld (curcol), a
|
|
ld hl, cmdYs
|
|
call _PutS
|
|
call _NewLine
|
|
#endmacro
|
|
#macro cryptocmdunHELPmRow3(cmdXs, cmdYs, cmdZs)
|
|
xor a
|
|
ld (curCol), a
|
|
ld hl, cmdXs
|
|
call _PutS
|
|
ld a, 9
|
|
ld (curcol), a
|
|
ld hl, cmdYs
|
|
call _PutS
|
|
ld a, 19
|
|
ld (curcol), a
|
|
ld hl, cmdZs
|
|
call _PutS
|
|
call _NewLine
|
|
#endmacro
|
|
|
|
cryptocmdunHELPmRowU(cryptocmdunROT, cryptocmdunROTu)
|
|
cryptocmdunHELPmRowU(cryptocmdunXOR, cryptocmdunXORu)
|
|
|
|
call _NewLine
|
|
jp Fin
|
|
|
|
cryptocmdunHELPfLine1: .db "Available Cryptos:", 0
|