2 NAME Sample - test program for CHR$ Assember
    4 OSASCI = &FFE3
    6 greeting$ = CHR$(13) + "Hello World" + CHR$(13) + CHR$(13)
    8 IF PASS = 1 start = RESERVE(32)
   10 BEGIN@start
   12           LDX #0
   14.loop      LDA string,X
   16           JSR OSASCI
   18           INX
   20           CPX #LEN greeting$
   22           BNE loop
   24           RTS
   26
   28.string    EQS greeting$
   30           FIN
   32:CALL start
   34 END