I: YAHTZEEI K(,): NI (): (): ()(J"THIS IS THE GAME OF YAHTZEE. DO YOU WANT COMMENTS";B$BJ (B$,)"Y" LJ pfJ"HOW MANY PLAYERS";NvJ N J N J"MAXIMUM NUMBER IS 7": J A0 NJ"NAME OF PLAYER #"A0: A$(A0):JH::AAJ AN  KA)K  B :C(B)(()):LK  A$(A);"'S NUMBERS: ";:HHwK C();C();C();C();C(): H 6K"HOW MANY";EK E K z: K E E (E)E K E 6K E  L F3 :F(F3):.L "WHICH DICE";: E ",$,&,(?L" F(): *UL$ F(),F(): *pL& F(),F(),F(): *L( F(),F(),F(),F()L* F :F(F1)(F(F1)): F(F1)  L, F(F1)  L.L0 F2 : F(F2) 4 M2C(F(F2))(())M4:  ?M6 A$(A);"--SCOREBOARD NUMBER";: IQM8 I <aM: z: 6qM< I 6M>I(I): I DM@" CONFIRM";B$MB (B$,)"Y" (B$,)"O"  : 6MD K(I,A) JNF A$(A);", YOU HAVE ALREADY USED ROW#";I;8NH" , "K(I,A);"POINTS IN ROW#"I: 6HNJ I \PNLK^NN G rNP C(G)I T|NRKKNTNV K ZNXK(I,A)L: NZK(I,A)KI: N\ I ^,`,,,,d,N^R: bN`R"ObTC()C()C()C()C(): f/OdR:T2IOf H3 :H2(H3):bOh H : H1 wOj C(H1)H nOlH2(H)H2(H)On H1,HOp H4 Or H2(H4)R vOt:K(I,A)L: Ov: IF K(I,A)=50 THEN 1146 PxK(I,A)T: I  Pz (): ()WP|"CONGRATULATIONS, "A$(A);" YOU HAVE A YAHTZEE!!!"kP~ (): ()uP PL4:L5: L :L2(L):P L : L1 P C(L1)L PL2(L)L2(L)P:P L3 P L5 Q L2(L3) 'QL5L5: =Q L2(L3) IQL4L4OQ`Q L4 wQK(,A)L: QK(,A): Q Q M1 : M2 M1Q C(M1)C(M2) QZC(M1):C(M1)C(M2):C(M2)ZQ:RG:G3:M3RG2: I 0RGG: G UR G(),G(),G(),G(),G(): R 1,2,3,4,7,2,3,4,5,7,7,3,4,5,6,7,2,3,4,5,7,1,2,3,4R 1,7,2,3,4,1,2,7,3,4,1,2,3,7,4,2,7,3,4,5,2,3,4,7,5R 2,3,7,4,5,3,7,4,5,6,3,4,7,5,6,3,4,5,7,6S G3 SG3G3:G5(S G4G3 G3=SG5G5:G(G5)G4CSRS G1 kS C(G1)G(G1) wSG2G2}SS G2I S S I SK(I,A): SK(I,A)(: SK(I,A)L: SY1T Y :Y1C(Y)Y1::K( ,A)Y1YT A$(A)", YOU NOW HAVE"(K(I,A))"POINTS IN ROW #"I", (";iT I T I ,,,,,T I ,,,,,,T"ACES";: T"TWOS";: T"THREES";: U"FOURS";: U"FIVES";: *U"SIXES";: DU"3 OF A KIND";: ^U"4 OF A KIND";: wU"FULL HOUSE";: U"SM.STRAIGHT";:: U"LG.STRAIGHT";: U"YAHTZEE";: U"CHANCE";U E U I0 U")"V B N: B1  .V K(B1,B) 6V:YV B3 W:B5(B3):B8(B3):_V yV  B3 N: B4 VB5(B3)B5(B3)(K(B4,B3))V B4,B3V B6 N: B7  VB8(B6)B8(B6)(K(B7,B6))V:V B3 N W B5(B3)? WK(,B3)#!W+W  F:W" A9 NqW$ )A$(A9);"'S TOTALS": );"****************"W&"ACES-----------";(K(,A9))," 3 OF A KIND----";(K(,A9))W("TWOS-----------";(K(,A9))," 4 OF A KIND----";(K(,A9))7X*"THREES---------";(K(,A9))," FULL HOUSE-----";(K(,A9))zX,"FOURS----------";(K(,A9))," SM. STRAIGHT---";(K( ,A9))X."FIVES----------";(K(,A9))," LG. STRAIGHT---";(K( ,A9))Y0"SIXES----------";(K(,A9))," YAHTZEE--------";(K( ,A9))(Y2 )"CHANCE--------";(K( ,A9))OY4"TOTAL OF UPPER HALF-----";B5(A9)yY6"BONUS--------------------";K(,A9)Y8"TOTAL OF LOWER HALF-----";B8(A9)Y:B9B5(A9)B8(A9)K(,A9)Y< A$(A9);"'S GRAND TOTAL-------------------------";B9Z> FZ@ZB I 6ZD:ZF E 2:"-";:::jZp"TOTALS WILL BE PRINTED IF YOU RESPOND TO"Zr"'SCOREBOARD NUMBER?' WITH A NUMBER GREATER THAN 13Zt"TO SEE WHAT SCOREBOARD OPTIONS YOU HAVE NOT USED,"[v"RESPOND TO 'HOW MANY' OR 'SCOREBOARD NUMBER' WITH 25"[x^[z A$(A);", YOU HAVE THE FOLLOWING SCOREBOARD OPTIONS LEFT:"[|I0: I  : K(I,A) [~ [[::I0:[YOU HAVE THE FOLLOWING SCOREBOARD OPTIONS LEFT:"[|I0: I  : K(I,A) [~ [[$I A"UUUI$$ D$$