10 REM > Example01
   20 ::
   30 REM © 2000 Martin Penny
   40 ::
   50 ON ERROR GOTO 390
   60 ::
   70 MODE 12
   80 OFF
   90 COLOUR 0, 4
  100 COLOUR 7, 3
  110 DIM D% 4095
  120 L% = D% + 4096
  130 FOR T% = 0 TO 1
  140 OPT% = 8 + T% * 3
  150 IF OPT% AND 1 THEN PRINT
  160 P% = D%
  170 [OPT OPT%
  180 :
  190 .Code%
  200 ADR       R0, String%
  210 SWI       "OS_Write0"
  220 SWI       "OS_NewLine"
  230 .Exit%
  240 MOV       R15, R14
  250 :
  260 .String%
  270 EQUS      "Hello, World!"
  280 EQUB      0
  290 ALIGN
  300 :
  310 .End%
  320 :
  330 ]
  340 IF OPT% AND 1 THEN PRINT
  350 NEXT T%
  360 ON
  370 END
  380 ::
  390 PRINT REPORT$; " at line "; ERL
  400 ON
  410 END