J :: ,,: ,:( ) : ( ) :" B A C K G A M M O N ":  X :  ,: O):  ,:"Enter the name of player #" X;: "mbc": " - " ,A$(X): X A,DJ,LM,SU,XZ: : A()  ,: O): , :"Your pips look like this:"D ,: A$() -) " - ": ,: A$() -) " - " ,: : "Press any key to continue";: : "c": $ X :A(X): X.A():A():A():A( ):A( ):A():A():A()8 :W: () W+B ,: O): ,: A$(W);L :" 1";: :"=ROLL DICE, ";: :"2";: :"=REDRAW BOARD, ";: :"3";: :"=NEW GAME, ";: :"4";: :"=END GAME"V "c": : ("1234",IKEY$) V : X(IKEY$)` X t, j, $, : B!j : B`tL():M():D: LM D : LM L,Mu~ W P,  "AE": ,: O): ,:"INVALID MOVE";:TIMEOUT: :: X F : Y : Y,X:"";: Y,X- ,:"ͻ";o ,:"ͼ";  ,:"͹";Y: X A : ,X: Y;:Y1Y: ,X: Y1;:YY: X(  ,:"ON BAR";:  ,:" ";:  ,:"";J ,: A();:  ,: A();_ X   A(X)   : U: A(X) U Z (A(X)):SZY(X): S,Y: U ""; : " "; Z  X X  : A(X) FU: A(X) U:( Z (A(X)):SZl2Y(X): S,Y: U ""; : " ";t< Z~F X:P ,: O);: ,: A$() ", your roll is ";: : L;: ZJ: D : M;: d A() A(L) A(M) |*n A(J) JJ: nZxE: XL : A(X) A(XL) E X: XM : A(X) A(XM) E X: E  : J | A(M) A(L) JL |  A() F: ,(: :"FROM BAR ";: : R "d": ,(: :;"FROM-- ",IN$: :F(IN$): F F e A(F)  "d": ,<: :;"TO-- ",IN$: :T(IN$) Tc J T T  A(T)  FTL LM:  FTM ML:  : PDA(F)A(F): A(T) A()A():A(T)TA(T)A(T)s :DD:E: X " A(X) EE, X: E p6 D W: B@ PJ J T FM MJ FJ ML: r^ FL LJ FJ LM: rh 1rA(F)A(F): | "ae":TIMEOUT: : ,: O);: ,:"You can't move!";:W(W):TIMEOUT: : ,: O);: B ,: O);: ,: A$() ", your roll is ";: : L;:  D : M;:  J1 A() A(L) A(M) |V A() A(J) JJ: vE: A() A(L) E A() A(M) E X L: A(X) A(XL) E X: X M: A(X) A(XM) E X: E  J |> A(M) A(L) JL |v A() F: ,(: :"FROM BAR ";: : & "f": ,(: :;"FROM-- ",IN$: :F(IN$) F F X A(F) X & "f": ,<: :;"TO-- ",IN$: :T(IN$): Tc / 0 T T XB : A(T) XZ D TFL LM: br N TFM ML: b X :  b F A()A() lA(F)A(F): A(T) A()A():A(T) vA(T)A(T)  :DD:E: X ! A(X) EE$! X: E z:! D W: BD! U! J X}! FM JM FJ ML: ! FL JL FJ LM: ! X!A(F)A(F): ! ,: A();:  ,: A();: F F "HF: : Tc #"HT: ::"U: A(H) UQ" PA(H): P Pc" H 4" X(H):G: HF G"*Y(P)G: H"4X(H):G: HF G">Y(P)G"H Y,X:" ";"R HT #\ Y,X: U ""; : " ";#f}#p "c16c16c16ge8g": ,: O);: : ,: A$() " WINS";:TIMEOUT: : : "b:???0??"#z "c16c16c16ge8g": ,: O);: : ,: A$() " WINS";:TIMEOUT: : : "b:???0??"# "menu"E$TIMEOUT$:TIME2((TIMEOUT$,))x((TIMEOUT$,,))<((TIMEOUT$,))$TIMEOUT$:TIME3((TIMEOUT$,))x((TIMEOUT$,,))<((TIMEOUT$,))$ TIMEOUT TIME3 TIME2  : (%RNDTIME$:RNDVAL((RNDTIME$,))x((RNDTIME$,,))<((RNDTIME$,)): RNDVAL:W% () :IKEY$: IKEY$""  :