.if .not .def _MISC_ _MISC_ = 1 ; this is also part of STD.L65 .if .not .def _MACROS_ .include #macros .endif .macro S_PRINT @3 .= @p1 .if %0 > 1 @3 .= %2 .else .if %0 = 1 @3 .= @3 ! @s1 .endif .endif .if @3 & @s1 .if [@3 & @special] jmp * + %1 + 5 .byte %$1,155,0 dpoke _string1,*-%1-2 .else jmp * + %1 + 4 .byte %$1,0 dpoke _string1,*-%1-1 .endif .else dpoke _string1,%1 .endif jsr s_print .endm ; KILL_LEADING_ZEROES [EOSchar[,select]] ; see library source for more info .macro KILL_LEADING_ZEROES @1 .= @p1 + @special .if %0 = 2 @1 .= %2 .endif .if %0 <> 0 .if @1 & @special sec .endif .if @1 & @p1 lda #%1 .else lda %1 .endif .endif jsr kill_0lead .endm .endif