Skip to content

Instantly share code, notes, and snippets.

@ksherlock
Created June 17, 2014 22:21
Show Gist options
  • Save ksherlock/7a229be96280abcc20c5 to your computer and use it in GitHub Desktop.
Save ksherlock/7a229be96280abcc20c5 to your computer and use it in GitHub Desktop.
MPW SetMileStone macro
include 'M16.GSBug'
MACRO
&lab ~SetMileStone &p1
&lab
pea @str>>16
pea @str
_SetMileStone
bra @exit
lclc &olds
&olds setc &setting('string')
string pascal
@str dc.b &p1
string &olds
@exit
MEND
main proc
~SetMileStone 'hello'
~SetMileStone 'goodbye'
endp
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment