mirror of
https://github.com/a2geek/jewel-of-kaldun.git
synced 2025-04-23 04:36:59 +00:00
27 lines
516 B
ArmAsm
27 lines
516 B
ArmAsm
|
* External references
|
||
|
|
; jewel.of.kaldun.s
|
||
|
|
DATA EXT
|
||
|
|
; input.output.s
|
||
|
|
PRSTR EXT
|
||
|
|
|
||
|
|
********************************
|
||
|
|
* Input/Output Macros *
|
||
|
|
********************************
|
||
|
|
|
||
|
|
PRINT MAC
|
||
|
|
LDA #<]1
|
||
|
|
STA DATA
|
||
|
|
LDA #>]1
|
||
|
|
STA DATA+1
|
||
|
|
JSR PRSTR
|
||
|
|
EOM
|
||
|
|
|
||
|
|
CENTER MAC
|
||
|
|
LDA #<]1
|
||
|
|
STA DATA
|
||
|
|
LDA #>]1
|
||
|
|
STA DATA+1
|
||
|
|
JSR CSTRING
|
||
|
|
EOM
|
||
|
|
|