mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-09 03:28:07 +11:00
175e1328e7
* Build emulated zasm statically * Improve comments in zasm.asm * Fix build * Use unsetZ from core
28 lines
414 B
NASM
28 lines
414 B
NASM
#include "user.inc"
|
|
; Glue code for the emulated environment
|
|
ZASM_INPUT .equ 0xa000
|
|
ZASM_OUTPUT .equ 0xd000
|
|
|
|
jr init ; 2 bytes
|
|
; *** JUMP TABLE ***
|
|
jp strncmp
|
|
jp addDE
|
|
jp upcase
|
|
jp unsetZ
|
|
|
|
init:
|
|
di
|
|
ld hl, RAMEND
|
|
ld sp, hl
|
|
ld hl, ZASM_INPUT
|
|
ld de, ZASM_OUTPUT
|
|
call USER_CODE
|
|
; signal the emulator we're done
|
|
; BC contains the number of written bytes
|
|
ld a, c
|
|
ld c, b
|
|
out (c), a
|
|
halt
|
|
|
|
#include "core.asm"
|