org $2000

 clrscr

 print 'text'

 poke 712,$88

loop jmp loop

 icl 'macros\clrscr.asm'
 icl 'macros\print.asm'
 icl 'macros\poke.asm'