mirror of
https://github.com/mist64/msbasic.git
synced 2024-06-24 10:29:27 +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
|