1 PRINT"[147][159]"
2 PRINTTAB(9)"[201]NSERT [204][207][193][196][211][212][193][210] #55[159] [211]IDE 3[159]"
3 PRINTTAB(14)"AND PRESS [210][197][212][213][210][206][146]"
4 GETA$:IFA$<>CHR$(13)THEN4
5 PRINTTAB(8)"[156][197] [216] [212][160][197][160][210][160][205][160][201][160][206][160][193][160][212][160][201][160][206][160][199]!!!"
10 QT$=CHR$(34):F$="BACKGAMMON"
20 PRINT"[144]LOAD"QT$F$QT$",8"
30 PRINT"4290 IFP1(TU-A-B)>0ANDP2(TU-A)<2THEN1320"
40 PRINT"4300 IFP1(TU-A-B)>0ANDP2(TU-B)<2THEN1330"
100 PRINT"OPEN15,8,15,"QT$"S0:"F$QT$":CLOSE15:SAVE"QT$F$QT$",8"
125 PRINT"POKE646,15"
130 PRINT""
140 FORI=631TO640:POKEI,13:NEXT:POKE198,10
150 NEW