10 DIM R$(6,5)
 20 LET R$(1)="A01RB"
 30 LET R$(2)="A11LC"
 40 LET R$(3)="B01LA"
 50 LET R$(4)="B11RB"
 60 LET R$(5)="C01LB"
 70 LET R$(6)="C11SH"
 80 LET T$=""
 90 LET S$="A"
100 LET B$="0"
110 LET H$="H"