mirror of
https://github.com/mist64/msbasic.git
synced 2024-12-22 08:29:21 +00:00
11 lines
283 B
ArmAsm
11 lines
283 B
ArmAsm
|
; ----------------------------------------------------------------------------
|
||
|
|
; Macros
|
||
|
|
|
||
|
|
; htasc - set the hi bit on the last byte of a string for termination
|
||
|
|
.macro htasc str
|
||
|
|
.repeat .strlen(str)-1,I
|
||
|
|
.byte .strat(str,I)
|
||
|
|
.endrep
|
||
|
|
.byte .strat(str,.strlen(str)-1) | $80
|
||
|
|
.endmacro
|