2 p, : q, : r, : s, : t, l u, : v, : w, : x, : y, : z, ~ p:A():GOLF GAME FOR MSX AUG.5 1983:WRITTEN BY@N.U.ŀ:INIT ,, : ,,: ,,:  Z AZ: ,,: ! ~:L()-$ A9. DO8PT( ):CT( )kBL1 CT:L2 CTL , :">> GOLF GAME <<"V LL1 L2: L, :`():()ҁjSS()()()tST(S(PL))~TR(S(PL))TT()()()):RED FONT DATA9 : l PA(),ME(),SC(,),MS$(),HI(),UX(),UY()IXx:IYH:CL:IP:A()  L : MS$(L):˂ L : CL$(L): L : LL : CL(L,LL):: WATER HAZARD !!!,OB !!!,HOLE IN !!!> PT,SW,9I,7I,5I,3I,1I,3W,1Wp 1,9,6,10,6,15,6,20,6,23,7,25,7,29,6,37,6,42 x:HN: :TT():TT(): ():()Ń ,: (,( ));Ճ L ( ,L: ( );: ,L: ( );2< ,: (,( ));@F ,:">>> GOLF GAME <<<"QP:LOOP HOLEZ ,:): 2 :HNHN: LL :LL,(,):d HN  n:LSʄx PA(HN),ME(HN),PX,PY,UX(),UY() SH():SH():HI():HI():GR:UX()UX():UY()UY()!:CONDITION DISP+ n <:DRAW HOLEF OCL` MB x HN PL:  SC(,HN)SC(,HN) PL : PL :LOOP SHOT܅ 2 : MB PL: 0 (UX()PX)(UY()PY)(UX()PX)(UY()PY) HI() PL : PLHBXUX(PL):BYUY(PL)]  :SW:  g :q"  , HA MS: F: : F : :HI(PL): ^6 HA MS: F: : F :SH(PL)SH(PL):HI(PL): ^@BXFX:BYFY:UX(PL)BX:UY(PL)BY?J (PXBX)(PYBY)1 HI(PL): ^ևT (PXBX) (PYBY) MS: <: : Z :HI(PL):TT(PL)TT(PL)SH(PL)PA(HN):SC(PL,HN)SH(PL):UX(PL)PX:UY(PL)PY : Z:HI(PL)އ^:h MB HI(PL)  : HI(PL) GR:  : 4  : IYH j F* IY ^4 IX . : > ST IE:IL : IEIEH IE ILR IE IL\ IE IL Ќf ,(IX,IY),,p GR SW:  z TR :~  :AA IYILH IYIYIL : IYH : IXIXILK >T:A IYILH IYIYIL : IYH : IXIXIL >:Bč IXIL IXIXIL : IX:IYIYIL΍ >׍:B IXIL IXIXIL : IX:IYIYIL > :CD IYIL IYIYIL : IY:IXIXILN >W$ :C. IYIL IYIYIL : IY:IXIXIL8 >B :DŽL IXIL IXIXIL : IX:IYIYIL̎V >Վ` :Dj IXIL IXIXIL : IX:IYIYIL t >)~ II((BXIX)(BYIY))O SI(IYBY) II:CO(IXBX) II\ :POWERq ,(,): 2 LS : ,:"INPUT SHOT POWER"͏ ST :IPIP: IP IP ST :IPIP: IP IP ,: (IP,( ));(IP," ");/ GR  \ IP IS : IP IS : ISl SWIS:  TR  :  SPIP ,: ); 2 : ,:  );Đ ֐( :CLEAR MSGL2 CM : ,CM: );::< :PAUSE 10F PP ::-P :PAUSE 30BZ PP d::Sd :CONDITIONon ,:"HOLE No. #";HNx ,:"PAR #";PA(HN) ,:"### METER";ME(HN):͑ ,:"TOTAL ###";TT(PL) ,:"SHOT ###";SH(PL) ,:"PLAYER ";PL$(PL);); " :SHOT2 SWIS <  R :"S1M1900L8N40"s VUCL(CL,):VVCL(CL,):HA FXBXd:FYBYd:SPSP:ZB( ):Z:ZPƒ VP(FXd(FYd) ZB) VP (CL CL) VVVV :VUVU & VP (CL CL) VVVV:VUVUQ R1(PL),:R2(PL),:R3()i HX(VVCOSPR1) " HY(VVSISPR2) , VUVU:ZZVU6 FXFXHX:FYFYHYߓ@ FX] FX@ FYD FY@ HA:  J PL,(FXd,FYdZ),,'T VP(FXd(FYd) ZB)\^ Z CL "S1M1200L10N20": | : | lh Z , r VP HXHX:HYHY: () , : "S1M1200L10N20": , : , ϔ| VP Z:VU씆 VP Z:VU:HA Z (VU)  : VUVUA: , y CL FXFXd:FYFYd: : ZPZP:VU: ZPSPR3 FXFXd:FYFYd: : , :SET MAN AND BALL PL,(BX,BY),, SD(IXBX)ߕ ,(BX,BY),,SWSD :DRAW GREEN L9 : L9,(,):& G1 J ,G1: );( ,( )););P f ,(~,v),,u L9  UX(L9)(UX(L9)PX):UY(L9)(UY(L9)PY)x:Ö& MB PL: D 0 (UX())(UY()x)(UX())(UY()x) HI() PL : PLS: ,(UX(),UY()),,: ,(UX(),UY()),,kD BXUX(PL):BYUY(PL)N MB PL,(BX,BY),, : PL,(BX,BY),,ɗX ::"S1M1900L8N40"b SPIP(PL)l BXBXSPCO :BYBYSPSI (v SPSP: PL,(BX,BY),, (BX) (BYx) BX:BYx: PL,(,):MS: <: : Z :HI(PL):TT(PL)TT(PL)SH(PL)PA(HN):SC(PL,HN)SH(PL): O٘ BXQ BXQ:O BX BX:O BYQ BYQ:O! BY BY:O9 O  : & SP  : & : PL,(BX,BY),,: Z SP:: l MB Z™ HI() HI() Z :  : & ܙ UX(PL)BX:UY(PL)BY: :GAME END  MB % ,:"*** SCORE SHEET ***"] ,:"XWWWRWWWWWRWWWRWWWWWY" ,:"VNo.VMETERVPARVSCOREV"* GT њ4 ,GT:"TWWWUWWWWWUWWWUWWWWWS"!> ,GT:"V # V ### V # V ### V";GT;ME(GT);PA(GT);SC(,GT)'H`R ,:"ZWWWQWWWWWQWWWQWWWWW["\ ,:"TOTAL #### ";(TT());:PL: zf ,:"PRESS TRIGGER TO START";ܛp TT ::  : pz TT(PL) "OVER"; : TT(PL) "UNDER";#:WATERIBXFX:BYFY:SH(PL)SH(PL):  UBXBXr PL,(BX,BY),, (BX(BY) ( ))  : UX(PL)BX:UY(PL)BY:ʜ:READ FONT DATAԜʌ >Ԃ L އ P$,C$ LL * PTLLL,("&H"(P$,LL,))S CTLLL,("&H"(C$,LL,))[:uSN: :SN:  L $SNL: :SP$"". LL 8R$"&B00000000"BZ$(("&H"(D$,LL,))):R1(Z$):R2R1#L R3 R1:(R$,R3,)(Z$,R2R3,)::VSP$SP$((R$))@`Pj$(L)SP$Vtr~SN: :SN: x: D$SP$"" SL ̞SP$SP$(("&H"(D$,SL,)))Ҟ$(SN)SP$  ,:"*** SCORE SHEET ***"M ,:"XWWWRWWWWWRWWWRWWWWWRWWWWWY" ,:"VNo.VMETERVPARV& &V& &V";PL$();PL$() GT   ,GT:"TWWWUWWWWWUWWWUWWWWWUWWWWWS"E ,GT:"V # V ### V # V ### V ### V";GT;ME(GT);PA(GT);SC(,GT);SC(,GT)K( ,:"ZWWWQWWWWWQWWWQWWWWWQWWWWW["ʠ2 ,:"TOTAL +### +###";TT();TT(): f<"T120V12O4C20E20G20D20F20O5C20O4C20":F"T120V12O2G20F20E20D20C10"::P"T120V12O2C20D10E20C20C20":YZ"T120V12O3C20E20G20C20":fd:STARTlnzx:L()BY:BX:NM:FC : BX:NM:FC 5: :BX:NM:FC %: :BX:NM:FC : :L()  ,:"G A M E"$ ,:"(C) 1983 ASCII"O <: ,:"PRESS TRIGGER TO START"j TT  : ~ L ::Ƣ ,:"HOW MANY PLAYERS ?":, :"> 1 PLAYER": ,:"2 PLAYERS"ϢMB SS :MB: ,:" ": , :">"1 SS :MB: , :" ": ,:">"L TT  : R ,:"INPUT YOUR NAME (MAX 8)":,:"AND":,:"PRESS TRIGGER"ã Z MB:PL$(Z)"": L :X:YZ: ,Y:"PLAYER #";Z"I$: TT @, I$" " " : @!6I$>@ () S(Z): [J () S(Z): xT () S(Z): ^ I$"" 6h (I$) (I$) ˤr I$"~" I$" " : 6|XX: X X:: 6PL$(Z)PL$(Z)I$: X,Y: I$;: 6! P: MB PL$()"" PL$()"1": :  PL$(),PL$(): S(),S(): PL$()"" PL$()"1" PL$()"" PL$()"2"ȥXX: X X: 6ܥ X,Y:" ";: PL$(Z)(PL$(Z),(PL$(Z))): 6:INIT FONT+ FD$(,)5 D FX S FY d FD$(FX,FY)l:{& BX 0L( BX):LTPTL:LULT:LVLT':LWLT:LXLTǦ: Z ئD LTZ, :NZ0 :Z4:Z1Z0:Z2X Z b LUZ,Z1: LVZ,Z1.lZ0Z0:Z1Z1Z0Fv LWZ,Z2: LXZ,Z2[Z4Z4:Z2Z2Z4c:iz:SET COLORL9CT( NM) L8 ' L9L8,FC::ħ:OUT FONTΧ ݧ FY  FX  BXFX,BYFYC((FD$(NM,FY),FX,))E C " "; : ( NMC);O :: 04120,45032,10000,10011,10001,32045,03150  04120,45032,10001,10001,10001,32045,03150ߨ* 10000,10000,10000,10000,10000,10000,111104 11111,10000,10000,11110,10000,10000,100007> AA55AA55AA55AA55,B3B3B3B3B3B3B3B3_H 55AA55AA55AA55AA,C3C3C3C3C3C3C3C3R 0000000000000000,6A6A6A6A6A6A6A6A\ 002222CC002222CC,2C2C2C2C2C2C2C2Cשf 0000000000000000,9E9E9E9E9E9E9E9Ep 10181C1E10101018,6A6A6A6A1A1A1A1A'z 0000669900006699,4545454545454545O 10387CFE7C101010,C3C3C3C3C3D3D3D3w 81423C24243C4281,e2e2e2e2e2e2e2e2 C0F0FCFFFCF0C000,1515151515151515 0000000000001818ͪ 3C4281999981423C䪶 9898701010282824 181890F010282824 1818103050A8A824) 1818103810383834@ 18181018142A2948W 1818111F10282828n 1919121C10282828 60F0F06000000000 40E0400000000000:COURSE DATAʫ 4,320,180,103,20,104$ 3333333333333333333333377333. 333333333333443333300033773338 2311133333444433330050333733VB 2311111173344443313000333733yL 2311111111134431111333333733V 3331111111111111111133333333` 3333111111117111111344433333j 3333333111111111113334443333t 3377733333111113333344333333(~ 3333777333333333333333333333K 3333337777777333333333333333n 3333333333377773333333333333 5,460,220,103,20,95 2333333333773333333334443333έ 2311133337333377733344330007 2311111333336663773343330507 33311111133336666733311300037 3333111111133666671111111343Z 3373311111116666311111113444} 3337331111111666111111113444 3337733111111111111111113333î 3333773311111711111111333333 3333337733311111111333333333  3333333377331111133333333333, 3333333333333333333333333333G 3,210,100,111,20,132j( 33337777333333333333333333332 3337733333334443773333333333< 3377333444344444377333333333ӯF 3333113440500344333773333333P 3333113440000344333333333333Z 2311111333000334333773333333 3333377733331111176667344443'H 3337733331111111166671000443JR 3333333111111113666311050343m\ 3333311111111366644311000333f 2311111111113666334431133333p 2311111111111366663444333333ֺz 2311111111111111166644433333 3333331111111111366633337733 3333377333333333666333373333? 3333333773333336663333733333b 3333333337733366633333333333() "v13o5e62f62g62"::() "v11o6e62c62g62"::Ȼ() "v11o6c62g62"::