UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU<9HOLEGLF$6UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU<C200:4000:A(90,3),I,J,L,X,Y,Z,M$,A,B,U,V,Q,K,D,E,F,G,O,N,T:2000:1500CZ(((I2)256J)65537):CJ((I15360)2):Y(J32):X((J32)Y)128:HPJMC:Y(Y3)1:D 0:49151,28:D49151,0::D_L(I4)(J3)32MC:O(L):Z(((IUU<2)256J)65537):N(L):DXX(X12):YY(Y13):BYMCXXYY32:VLLU((X1XX2),(Y1YY3)):BY,(((VL(BY))VL)):E M$;:G(((17024)1)256(17025))16383:FG(M$)1G:F,(F)64::EC @F,(A(Z,0))(A(Z,1));:@F32,(A(Z,2))(A(Z,3));:EUU<n G1(M$):Z((M$,G,1)):9:FF2::E(4:@6,"SCORE:":A1NP:Z$(A),S(A)::A14000:::E2IC1:JC2:5:A0E3AA1:M$:M$""55E4A25L,N:51F 5A30X1C12:Y1C2:6:51F6A0:51F`7(M$)58(M$)48H(M$)10:HP,200:C0:UU<W0:L,O:IU:JV:5:OB:200FR1PT:900VrHHH10:H2H6H2VRE9E44(E32D79)KK:200:820VSD50D78D112D90(D70E23)QQ:200:820VTAQ:QK2:KA2:200:820W#40:3:J44:I30792:1::I78:J2343:1:WCI30512:UU<J30:1:J9:1:WlA2033:I8:JA:1:I50:JA11:1:WI1029:J(29I2):1:J(24.5I2):1:WI5079:J(I216):1::I5067:J(I29):1:WI5059:J(I21):1::I16150:2XDPT1NP:S1:F0:M$"7 PAR 3":10:P3:F20:M$(Z$(]UU<PT)" ",5):10XU(11)252:V41:IU:JV:5:BO:L,B:CP1:HP,200:99XR2SS1:CP1:99:920XR1PT:1000XHH10:H2H6H2XD78D8(D50E30)QQ:200:920YE30E9E44KK:200:920Y>D40E24AQ:QK2:K UU<A2:200:920Y\AQ:QK2:KA2:200:920Y40:3:I50792:J44:1:J9:1::J3343:I50:1:I78:1:YA1824:I32:JA:1:I96:1:I56:JA1:1:I72:1:Z/A3449:IA:J(A28):1:J(34.5A2):1:IA46:J(49.5A2):1:J(A27):1:UU<ZeA5664:IA:J(A22):1:IA9:J(58A2):1:ZA5257:IA:J(A210):1:IA20:J(44.5A2):1::I15904:2ZPT1NP:S1:F0:M$"8 PAR 3":10:P3:F20:M$(Z$(PT)" ",5):10[/U(11)252:V41:IU:JV:5:BO:L,B:CP1:HP,200:99/UU<[MR2SS1:CP1:99:1020[`R1PT:1100[yHH10:H2H6H2[E44E9KK:200:1020[D32D96D72D56D50D78QQ:200:1020\(D78D63)(D70E20)(D60E20)AQ:QK2:KA2:200:1020\/AQ:QK2:KA2:200:102UU<0\aL40:3:J9:I34952:1::J44:I5079:1:\MJ3343:I50:1:I78:1:\NJ1033:I34:1:I94:1::J33:A36492:IA:1:IA44:1:\OA4863:IA:J(A21):1:IA18:J(54.5A2):1:]4PA5661:IA:J(49.5A2):1:IA12:J(A27UU<9):1:]WI15904:2:PT1NP:S1:F0:M$"9 PAR 4":10:P4:F20:M$(Z$(PT)" ",5):10]XU(11)252:V41:IU:JV:5:BO:L,B:CP1:HP,200:99]`R2SS1:CP1:99:1120]jR1PT:1200^tHH10:H2H6H2^1~E9E33E44KK:200:UU<1120^hD34D94(D78E30)(D50E30)QQ:200:1120^(D64E22)(D64E22)AQ:QK2:KA2:200:1120^AQ:QK2:KA2:200:1120^4:@10,"FINAL SCORE:":A1NP:Z$(A),S(A):_!@450,"PLAY AGAIN (Y/N)";:M$:M$"N"5000_3ĄM$RUU<"Y"1210_Q΀A1NP:Z$(A)"":S(A)0:_ܝ:@9,"TRS-80 9 HOLE";:@41,"MINIATURE GOLF"_@199,"NUMBER OF PLAYERS";:NP:NP101500_A1NP_@199,"":@200,"PLAYER #";A;:M$:Z$(A)(M$,5):M$""1530`:300`XЋH,S,P,R,W,C,MC,PT,C1,C2,LU(1_UU<,2),CP,S(11),Z$(10):Z(((9)256(10))):Z1`LU(0,0)32:LU(0,1)8:LU(0,2)2:LU(1,0)16:LU(1,1)4:LU(1,2)1:MC16384:2018`҆@485,;:M$"PRESS ANY KEY TO START":7`M$:M$""2003`ԐaDՅ128,128,128,128,149,128,132,128,152,128,128,128,128,UU<128,134,128,128,128,132,128aօ154,138,164,160,149,128,148,128,179,170,172,136,177,170,140,168,171,170,128,168,187,162,140,168,187,162,172,168,176b6ׅ170,128,168,187,170,172,168,187,170,128,168,177,168,132,128,155,138,168,168,187,136,172,160,186,160,1UU<72,136,186,138b؅172,160,187,160,172,136,187,160,168,128,186,160,172,160,171,170,168,168,149,128,148,128,128,170,172,168,171,168,168c(م168,170,128,172,136,174,170,168,168,186,138,168,168,154,138,164,160,187,170,168,128,154,138,164,168,187,136,168,16UU<8cڅ187,162,140,168,181,160,148,128,170,170,172,168,170,170,148,128,170,170,184,168,169,168,168,168,171,170,148,128cۅ177,168,172,136cA(X,0),A(X,1),A(X,2),A(X,3):dX32:2017:X33:2017:X39:2017:X44:2017:X46:2017dCX4857:2017:XUU<:X63:2017:X6590:2017:Xdm LINE DRAW SUBROUTINE BY GREG DIONNEd Z=USR((I*256+J)*65537) FOR SINGLE POINTd Z=USR((I*256+J)*65536+Q*256+R) TO DRAW LINEe= LNPDALMMABABNNLLNMMMJAMKCCAJCFADHPAALLHAAALLEANAMLCCAJCFADHPAALMHAAALMFANNNGBBCDHCUU<EPJHMOJHNLJGNGJHNMINDCJGe MKJBMMCHCIJLLLJHMKJGMOJLNHJHMOBGJANLCKABEANANMCKABFABBCFOANGNMNHNLNLNGNHNMNGMLNLLMNHMLCANAFPHOOMOCNMMKNNNIf JGNJMGKLDNIGIAMAFFEEEEMLFFMBFFCEPIHEAANICEABEEIKIAJHNKIGCADNNLNIIJAAIKEAIEEBNNNINONINGNKOKAAOHAADJEPJHMOJHf NUU<LJGNHJHNMINMAJGMLJBMNCHLGJLLMJHMLJGMOJLNGJHMOBGJANLCKABEANANMCKABFABBCFOANGNMNHNLNLNHNHNMNGMKNLLLNHMKCANAf Z32768:X03:M$:3005::Z16917:M$"HOIAAA"g Y1(M$)2:Z,(((M$,2Y1,1))65)16((M$,2Y,1))65:ZZ1::g:1,1gf@3327,"UU<* MINIATURE GOLF *":@4329,"BY MITCH VOTH":@53211,"TRS-80 16K"g@6329,"SEPTEMBER 1980":@7324,"MC-10 VER BY JIM GERRIE"gȆ:" USE: A AND S TO MOVE":" YOUR PUTTER"h҆:" 1-9 TO PUTT":h UU<U