10 REM > Indirect
   20 :
   30 REM BBFW needs PROC/FNs to be called normally before ^ can find them in the heap
   40 REM ARM BASIC looks in program if not found in heap
   50 :
   60 REM PROCzero:PROCone:PROCtwo:PROCthree
   70 DIM p%(3):p%()=^PROCzero, ^PROCone, ^PROCtwo, ^PROCthree
   80 REPEATPROC(p%(GET AND 3)):UNTIL0
   90 DEFPROCzero:PRINT"zero":ENDPROC
  100 DEFPROCone:PRINT"one":ENDPROC
  110 DEFPROCtwo:PRINT"two":ENDPROC
  120 DEFPROCthree:PRINT"three":ENDPROC