ZXTape!GOLF w qEy!*********GOLF**********  *********************** *  S.GOODSON AUG 82 * *  M.HOWELL OCT 82 * *  G.R.MORRIS JAN 83 * $*********************** . 8TP=0:H=0 B6:6: L236099\,250 V `T6,15;"____";1;6,15;"GOLF":"HOW MANY HOLES? ";TH j 2380% tC$="" ~%B$=150+150+150 (F=16:C$=C$+146:F @"ENTER HANDICAP (1 TO 3) 1 IS BEST, 3 IS WORST ";HC #HC<1HC>31170@ 0:7: 7F=1704:0;4;144;:F I=2282 L=5+5* J=L11 +5* .J,I;5;4;144;144 J I  O=37% +YD=(*500)+100d-(HC*25)  P=(YD/200+HC+2) CD=YD/32  SH=0 ( R=0 2G=12 <"L=(*22):I=(*16) FF=0̺(*4) P+I+F,L;1;C$(2+(*5)) ZF dG nKF=16:*20,*30;0;7;145:F x[F=15:*20,*26;6;0;1;B$(̺(*4)):F HY=(*14+3) 7HY-1,29;4;1;4;" " NHY,29;4;1;4;" ";0;148;4;" " 7HY+1,29;4;1;4;" " 1X=(*2+1):Y=(*19+1) Y,X;1;"T" 0,0;YD;" YARDS" 0,12 ;"PAR ";P  2080# KO=32 R=1:21,0;2;1;"IN THE ROUGH" wO=579SH=SH+1:21,0;2;1;"RIVER PENALTY SHOT";Y,X;1;7;147 WX=30Y=HYSH=SH+1:F=120:.01z# =,20:F:1590F (O=100dSH=SH+1:1790_! MO=112pR=1:21,0;2;1;"IN THE BUNKER" TO=568SH=SH+1:21,0;2;1;"TREE PENALTY SHOT" SH=SH+1 "/0,23;SH;" SHOT"+("S"SH>1) , 1490:@ 6100d:6: @>" YOU TOOK ";SH;" SHOTS FOR A PAR ";P'" HOLE - WHICH IS "; J<SH=11;"A HOLE IN ONE!";0''11 ; TSH-P0(SH-P); ^SHP" OVER PAR." r(SH=P-1'12 ;"A BIRDIE." |&SH=P-2'12 ;"AN EAGLE." )SH=P-3'12 ;"AN ALBATROS." 'SH0);(" UNDER PAR"TP<0);(" PAR"TP=0)  H=H+1 THH1770 ." AND HAVE COMPLETED THE COURSE"'"GOOD-BYE" (''''''''''''" ANOTHER GO ? (Y/N)" 0:="Y"  ''''" PRESS ANY KEY" 0:1190  4: 11 ,16;151 O132,88X:0,40(:15,-10 :-15,-10  Q=0 &(Y>HY-.5YHY+.5) :UX=(*10 )+((*12 (X>28.5dX<29.5l)))+(20X>29.5l) DY,X;149 NoX<29Y>2;1;Y,X+1;154;155;Y-1,X+1;152;153 XSH=SH+1 b"STRENGTH (1 TO 32) ";S$ lS$<"0"S$":"1890l@! vS=S$ S>32 1890l@! "DIRECTION (0 TO 12) ";D$ D$<"0"D$":"1930q@! D=D$:D>12 1930q@! D=D*(/6) Y,X;1;149 oX<29Y>2;1;Y,X+1;154;155;Y-1,X+1;152;153  X=(X+S*D)  Y=(Y-S*D) X>31X=31 X<0X=0 Y<0Y=0 Y>21Y=21 Y,X;1;149  NX=16Y=11 F=120:.01z# =,20:F:1590F  1870i!  :"STRENGTH (0";((4-HC)*502+100d);") ";S$ *S$<"0"S$":"2080# 4S=S$ >1S>((4-HC)*502+100d)2080# HS=S/CD R&R=1S=S/(*2*1.5@) \"DIRECTION (0 TO 12) ";D$ fD$<"0"D$":"2140# pD=D$ z"D>12 D<02140# Y,X; *O=32 0;4;144 *O=37%5;4;144 *O=5791;7;146 +O=112p0;6;150 *O=5680;7;145 D=D*(/6)  XI=X+S*D  YI=Y-S*D qYI>21YI<0SH=SH+1:21,0;2;1;"LOST BALL PENALTY SHOT":2300# qXI>31XI<0SH=SH+1:21,0;2;1;"LOST BALL PENALTY SHOT":2300#  X=XI:Y=YI "X=(X+.5):Y=(Y+.5)  O=(Y,X) BF=40(10 -1:.01z# =,F:F:.5,-10 Y,X;1;149 $ R=0 .J21,0;:F=122:0;4;144;:F 8 B L 2380L VF=144155 `G=07 jA t F+G,A ~G F 65A,170,85U,170,85U,170,85U,170,60<,126~,255,255,126~,24,24,60<,68D,170,17,66B,170,17,68D,170 129,60<,66B,90Z,90Z,66B,60<,129,24,28,24,16,16,16,16,568,0,60<,126~,126~,126~,126~,60<,0 128,4,32 ,1,8,64@,2,16,126~,255,255,255,255,255,255,126~ 0,0,0,0,0,0,0,3,28,28,28,12 ,28,60<,220,60<,4,8,8,8,8,8,568,568,60<,60<,28,12 ,12 ,12 ,60<,60<  h 2a<lO' @v`od$p r xy sd'61kc.lq BCS2D5