10 REM ******* (C)1995 JJH *******
100 EXTENSION (Index #8) (Token 0x80)
110 WAIT KEY
120 EXTENSION (Index #8) (Token 0x84)
130 DEFAULT
20 REM           QUARTET
30 RESERVE
40 RESERVE
50 BLOAD
60 BLOAD
70 VARNAME
80 VARNAME
90 EXTENSION (Index #8) (Token 0x82)