izaya/collapseos
1
0
Fork 0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-25 16:28:05 +11:00
Code Issues Releases Wiki Activity

shell: add iowr and iord

Browse Source
This commit is contained in:
Virgil Dupras 2019-05-02 15:18:47 -04:00
parent f9ae5ca46b
commit 59b0c83b0e
1 changed files with 25 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
parts/z80/shell.asm
View File

@ -26,7 +26,7 @@
; *** CONSTS ***
; number of entries in shellCmdTbl
SHELL_CMD_COUNT .equ 5+SHELL_EXTRA_CMD_COUNT
SHELL_CMD_COUNT .equ 7+SHELL_EXTRA_CMD_COUNT
; maximum number of bytes to receive as args in all commands. Determines the
; size of the args variable.
@ -486,8 +486,32 @@ shellCall:
xor a
ret
shellIORDCmd:
.db "iord", 0b001, 0, 0
push bc
ld a, (hl)
ld c, a
in a, (c)
call printHex
xor a
pop bc
ret
shellIOWRCmd:
.db "iowr", 0b001, 0b001, 0
push bc
ld a, (hl)
ld c, a
inc hl
ld a, (hl)
out (c), a
xor a
pop bc
ret
; This table is at the very end of the file on purpose. The idea is to be able
; to graft extra commands easily after an include in the glue file.
shellCmdTbl:
.dw shellMptrCmd, shellPeekCmd, shellLoadCmd, shellSaveCmd, shellCallCmd
.dw shellIORDCmd, shellIOWRCmd