' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?  ( 9 +"  "*  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0).).*#!.*'!.8)(#/-)(#/-,,eb)++$ h( ,!!"@h !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD# H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH  /JJJJ"LL뷩 ᷩ췩 ɛ LDLSAVBPILOCUNLOCIBPIBPIBPPRBPIBLISCALBPIBUZZOFӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(`F d£àĠz# u`Ҡ̠  # |}LJ$(-26:?  Š̠ӠǠԭƭ٠Š̠Π̠Π٠ŠҠР٠ҠŠŠǻҠ٠Ҡ٠X xx&'./89>?HINOTU\]fgxjkpq|}Ɔǟdd xxxx&'x./89>?HINOTU\]fgxjkxpq2PP2F ##5  )-6>7$$$$I9?76--66??)-6666I9?7666--$X<<]P/iPZ-8=D-83;DdЈ8DdDn</Pi-=8DDdDd8Ѐ    ZPWbj--E9~㜇9~9~㎜.枞 -- - E EE E--K$Y?wTxY?u_ZmZar~ru$$KYw?TYTxZmr~. -- -焄 z#ƴƴ ƴ Ʈű"ƳƳ Ƴ ƴ ƴƴƴ!Ƴ!Ƴ"Ƴ" Ƴ" Ƴ"Ƴ"Ƴ Ʋ Ʋ!Ʋ! Ʋ! Ʋ!Ʋ!ƲƱƱ Ʊ Ʊ Ʋ Ʋ ƲưƱ Ʊ ƱƱƱƱ ưư ư ưưưư Ʊ Ʊ Ʊ ƱƱƱư  ư ư ưưƱƱƱ ̱ ƮӠưưưưư Ʈͱʰ ƮͲʰ ƮͳʰƮűƮŲ Ʈų Ҡ Ϡ ӮŠƠ Ʈб Ʈв ƮгƮͱʰ       xC$-WATSONPALMER؍ZNngxx8,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96 M0QW130:V(16336)::w::"PRESS ANY KEY TO CONTINUE."::"PI(16384):PI127Ĺ16368,0:,63010 216,0:222,0:2 (16336):PK(16336):D5:PX:60000::xցXXX1X32:LTXX,Y(XXX):PK(16336):PK(16336):D5:PX:60000::xD$(4){:1:36864D$"RUNGOLF"_`768,P:769,D:770:HI770790:D:I,D:::0R 173,48,192,136,2055000:X121:LT12:55000:X161:LT6:55000ZTT36āQW12200::::1:6:63000:59000c220~PÁXXXX2:YYYY21QÒ3ÔLTXX,YY:::PX:D20:60000:PX2:60000:PX4:60000:TTTT1:TT1855005)ցXXXX52:LTXX,Y(XXX):PKLT18:55000:X141:LT5:55000X161:LT19:55000:Y80:X41:LT3:55000:X61:LT15:55000:X81:LT13:55000:X101:LT16:55000X121:LT21:55000:X141:LT20:55000:X161:LT5:55000:X181:LT18:55000*S2:S:Y140:X41:LT7:55000:X81:LT15::50000:X60:LT5:50000:X80:LT19:50000:X100:LT5:50000:X120:LT14:50000:X140:LT20:50000:X160:LT19:50000:X180:LT37:50000:62000P1552555:60000:62450S1:S:X61:Y40:LT8:55000:X81:LT9:55000:X101:LT31:55000:X121:60,120:PH:60000:1854180,120:PH:60000:185T20100,120:PH:60000:185s9120,120:PH:60000:18515140,120:PH:60000:18514160,120:PH:60000:18519180,120:PH:60000:185X20:Y160:LT16:50000:X40:LT18:60000 H20180201 16:32H,175:62000D VV1741209L 64 27H,VV:D13:P7:60000:PK(16336):0:27H,VV:3 (H20)172,173,174,175,176,177,178,179,180 320,120:PH:60000:185 1840,120:PH:60000:18550:99 a4XX,80:99' b5XX,80:99. c3O dD5:PXXXX405:60000::V i0 nQW6080:20,QW220,QW:PK(16336):PK(16336): s3 x720,80:P10:60000:160,80:P20:60000:18100,80:P40:60000:4140,80:P80:60000:5180,80:P1603: LH1704010P M31220,H:0:PH10:PK(16336):60000:31220,H:3:f N31220,40:62000t R64:1:3 UXX2018040 ZQW6080:XX,QWXX40,QW: [0 \(XX20)94,0,95,0,96,0,97,0,98 ^7XX,80:99 _1XX,80:99 `18XX,8240R0 =R:1H,40:64/ >H80ĕ2260,40D ?H120ĕ1100,40Z @H160ĕ14140,40p AH200ĕ20180,40 BH50Ĕ120,40 ER F1H,40:3 GD5:PH:60000:PH2:60000: HH1022010 I64 K31H,170:0:D5:PH:60000:31H,170::4:"503-345-3043"::: 3 :16302,0:3< CB1~ R6488:R8:R:1140,95:0:1140,95:PR:D5:60000:3: #64:1:Y95 (X141114:1X,Y:0:1X,Y:YY7:3:PX:D5:60000::120,40 -R0:0 2H2022010 <RR16:1:R *1010,242:1011,3:1012,166:214,214536095A63500T61000:D$(4)gD$"BLOADCHAR"232,0:233,141:101:"(C)1981 COPYRIGHT BY STUART ARONOFF" ::4:"AVANT-GARDE CREATIONS ":4:"P.O. BOX 30160":4:"EUGENE, ORE 97403":     UMBER OF GOLFERS WHO WILL BE":" PARTICIPATING (MAXIMUM OF 4):";:WA$Y W0(WA$) W01W04Ğ:1:15:"INVALID, MUST BE 1,2,3 OR 4.":9990::135 X0%3,W01:& "YOU WILL NOW BE ASKED TO ENTER EACH":"GOLFER'S NAME AND WHETHER THE":"'L CHAMPIONSHIP COURSE"B o14:4:"5 = WORLD CHAMPIONSHIP COURSE"J p20 x"ENTER THE COURSE NUMBER":" YOU'D LIKE TO PLAY:";:WA$:W0(WA$) }W01W05Ğ::"INVALID, MUST BE 1,2,3,4 OR 5."::9990:112 X0%2,W01K :10:"ENTER THE N::W0X0%6X0%255:W0,0:" eT gW013:AS$::W0112:AU$::W013:AS$:x i4:9:" COURSE SELECTION " k6:4:"1 = BEGINNER COURSE" l8:4:"2 = LOCAL PRO COURSE" m10:4:"3 = STATE CHAMPIONSHIP COURSE" n12:4:"4 = NATIONAD$"READ STATUS.FILE"3 D$"READ STATUS.FILE,B215"< ZZ$W D$"CLOSE STATUS.FILE"` RI% D$"BLOAD GOLF.ASM10.OBJ0":D$"BLOAD GOLF.ASM15.OBJ0" D$"BLOAD FILL1" W0(X0%1):W01000,2000,3000 cSTARTING OVER: dW0X0%1X0%4:W0,0G*1010,242:1011,3:1012,166:214,214<36864:35000H30000R::]10000 D$"BLOAD GOLF.TABLE1":D$"BLOAD GOLF.TABLE2":D$"BLOAD GOLF.TABLE3" D$"BLOAD GOLF.ASM20.OBJ0":D$"BLOAD GOLF.ASM30.OBJ0"D$"OPEN STATUS.FILE"      6384):W0%127Ĺ16368,0:710#.D$""KRI%26473:INITIAL READ.dRW%26467: SF WRITErX0%16384x 24964:(222)255Ĺ216,0:20790W218000:::23:50(HHHHHH40<HH,30HH,150:B:10:"THIS OPTION IS AVAILABLE ONLY ON THE":"OTHER SIDE OF THIS DISKETTE."13:"PRESS ANY KEY TO CONTINUE."AA(16384):16368,0:AA128690D$"RUN GOLF"W0%(1"X"YX0%4,W1%:RW%7[D$"WRITESTATUS.FILE,B215"@]"X"[_D$"CLOSE STATUS.FILE"b"**** DONE ****":65338:W011000::50l:"NO ROUND OF GOLF IS IN PROGRESS. ":"YOU WILL SELECT A PADDLE WHEN YOU ":"START A ROUND OF GOLF. ":65338v2620)0W0%(X0%4):W0%0W1%1:5803:W1%0eD"THE CURRENT PADDLE BEING USED IS #";W0%;"."N12:"WANT TO CHANGE IT TO #";W1%;"?":14:"ENTER Y OR N:";:WA$O(WA$,1)"Y"50PSD$"OPEN STATUS.FILE"UD$"WRITE STATUS.FILE"W1:32:"BLUE"7 24:"PRESS ANY KEY WHEN DONE:";:WA$? 50^ D$"BLOAD GOLF.ASM20.OBJ0"h :10 D$"OPEN STATUS.FILE" D$"READ STATUS.FILE" D$"READ STATUS.FILE,B215" WA$ !D$"CLOSE STATUS.FILE"&RI%:W2%(X0%1):W2%1W2% USED FOR DIRECTION INDICATOR"a 15:"ENTER ONE OF THE ABOVE OPTIONS: ":15:33:WA$o W0(WA$)} W01450 W02530 50 :1:HH30:640 21:1:" GREEN" 5:HH120:640 21:20:"RED" 6:HH210:640 2 612:4:"1":# @14:4:"2":5 J16:4:"3":G T18:4:"4":r ^16368,0:22:37:" ":W012000: hAA670,670,370,380 r:D$"RUN GOLF.FP10" |:10:" 1 = ADJUST COLOR MONITOR."( 12:" 2 = CHANGE PADDLE NUMBER TO BE":" BB2BB4Ğ:280% AA(16384)< AA176AA181240S IXIX1:IX5IX1\ 170 :22:38):AAAA176:IX310,320,330,340 :AA310,320,330,340 :350 :340::310: :310::320: ":320::330: ,:330::340:EMONSTRATION"0 x14:" 2 = PRACTICE SESSION"Y 16:" 3 = PROCEED TO GOLF COURSE" 18:" 4 = SCREEN COLOR & PADDLE ADJUSTMENTS" :22:"ENTER ONE OF THE ABOVE OPTIONS (1,2,3,4)" IX1:16368,0 IX270,280,290,300 CC1800:  36864:35000780(730:`(D$"BLOADGOLF.ASM20.OBJ0":D$"BLOADGOLF.ASM30.OBJ0"h2:<AS$" ****************************"F7:AS$P" **":8:9::" HI-RES COMPUTER GOLF "Z8:32::"**"dAS$ n12:" 1 = DTABLE1A"2#D$"RUNGOLF.FP20"9&CLEAR KEYBOARD QUEUE:d&WZ%(16384):WZ%127Ĺ16368,0:9980j&'ERROR SUBROUTINE:'65338:WZ12000::'D$"":CONTROL-D'X0%16384:STATUS FILE'XH%X0%24:HOLE SEQ.'XN%X0%112: GOLFER G3%G3%W0%mW0%10ĺ" ";4nW0%;"-";G3%;32);DoNG%28055apW0%(WS54):G4%G4%W0%sqW0%10ĺ" ";rW0%;"-";G4%;w" "::|WA$((W1))((W11))((W12))((W13))((W14))((W15))}(#(X0%2)0ĺD$"BLOAD GOLF.6467W0%):WP%WP%W1%%`WH9ĺ" ";EbWH1;4);W1%;7);WP%;11);_dW0%(WS):G1%G1%W0%qeW0%10ĺ" ";fW0%;"-";G1%;18);gNG%08055hW0%(WS18):G2%G2%W0%iW0%10ĺ" ";jW0%;"-";G2%;25);kNG%18055 lW0%(WS36):W116496:8060:N1$WA$:W116502:8060:N2$WA$:W116508:8060:N3$WA$:W116514:8060Q" E";11);N1$;18);N2$;25);N3$;32);WA$TWS16523:WP%0:NG%(16387)UG1%0:G2%0:G3%0:G4%0YWH0(16432):WSWS1^W0%WH:W0%8W0%W0%9_W1%(1,8004,8005)A"BEGINNER'S COURSE":8010GB"LOCAL PRO COURSE":8010nC"STATE CHAMPIONSHIP COURSE":8010D"NATIONAL CHAMPIONSHIP COURSE":8010E"WORLD CHAMPIONSHIP COURSE"J" H P":" O A TOT STROKES - TOTAL STROKES"O" L R PAR"SP, MUST BE 1 THRU 7.":9990:::3201E D$"PR#";W0%:8000:D$"PR#0"t 24:" PRESS ANY KEY TO CONTINUE:";:WA$~ 3000 :10::"RE-BOOT THE DISK TO PLAY GOLF":" THE NEXT TIME.":24967 @::"SCORECARD: ":1:12:W0(X0%2):W08002,8003W03100,3200,100,3300 8000N 24:" PRESS ANY KEY TO CONTINUE:";:WA$Y :3000 :3::"DON'T FORGET TO TURN ON YOUR PRINTER.": 6:1:"ENTER THE SLOT NUMBER OF YOUR PRINTER:";:WA$:W0%(WA$):(13):1002$ W0%1W0%7ĺ::"INVALIDRD ON PRINTER." "3 = START A NEW ROUND OF GOLF.":"4 = EXIT PROGRAM, SAVE SCORECARD":" TILL NEXT RUNNING OF PROGRAM." :"ENTER ONE OF THE ABOVE OPTIONS:";:WA$:W0(WA$) W01W04ĺ::"INVALID, MUST BE 1,2,3 OR 4."::9990:3010 A NEW ROUND,":"OR":"PRESS THE RETURN KEY BY ITSELF":" TO CONTINUE THIS ROUND:";WA${$(WA$,1)"S"ġ:X0%1,0:100.9000KSTATUS 2:1050:9000 STATUS 3: :10:"1 = PRINT FINAL SCORECARD ON SCREEN.":"2 = PRINT FINAL SCORECA000STATUS 1:"1050:900010:1:"A ROUND OF GOLF IS IN PROGRESS.":"PRESS ANY KEY TO DISPLAY THE SCORECARD:";:WA$8000:24:" PRESS ANY KEY TO CONTINUE:";:WA$9980Y:10:"PRESS THE S KEY AND RETURN KEY":" TO START56W2%7W2%4:256"W2%5;W5%,W2%:W5%W5%1:PLOAD GREEN SEQ:pWT%(6):W016:WT%(W0)0: W0XH%18XH%23W1%(1)61:WT%(W1%)1270WT%(W1%)1:W0,W1%:W003:XH%30W0,W0:XH%24,255:X01,2"" ":90 LOAD HOLE SEQ:7W0%(X0%5)1:W0%4W0%0FX0%5,W0%UW0%0250wW0%W0%1:W119:W2%::240W5%X0%83:W0XH%XH%162:W2%:W0,W2%:W01,(1)2X0%15,(1)6:1ST GREEN # TO USE DO PARS ALSO:W2%4W2%3:2$" "WB$" "4WN,(WB$):W2%W2%1::WM%WM%1:BW0(0):10:"ENTER THE PADDLE NUMBER TO BE USED FOR":"ENTERING BALL DIRECTIONS (0 OR 1):";:WA$:W0(WA$)W00W01Ğ::"INVALID, MUST BE PADDLE 0 OR 1."::9990:210X0%4,W";WN$;(WN$)0Ğ:"PLEASE GIVE ME A NAME"::9990:18681:"WILL THE 'MAX STROKES' OPTION":"BE IN EFFECT FOR THIS GOLFER? Y OR N:";:WA$196:194:200(WA$,1)"Y"ĹWM%,1:198WM%,0 W2%1:WNWNWN5:WB$(WN$,W2%,1):WBe"ENTER YOUR NAME (1 - 6 CHARACTERS):";WN$:(WN$)0Ğ:"PLEASE GIVE ME A NAME."::9990:81:18081:"'MAX STROKES' OPTION IN EFFECT? Y OR N:";:WA$196:19481:"ENTER THE NAME OF GOLFER NUMBER ";W1:" (1 - 6 CHARACTERS):MAX STROKES' OPTION WILL BE IN EFFECT" "FOR HIS OR HER ROUND OF GOLF."::"(REFER TO INSTRUCTIONS IF NOT FAMILIAR":"WITH THE 'MAX STROKES' OPTION)" 80 WN1649616519:WN,0: WNXN%:WM%XN%24 W11W0 9980 W01186 1          232MD38400MW%16812-RL%24940;RW%26467IRS%24955WRT%24958eRG%24961t$WF$"HFXX"~.AI%08AD0BVR%0LV24964:(222)255Ĺ216,0`:10:"NEVER USE CTRL-C. PLEASE RE-BOOT.":24967US.FILE"~"X"X0%1,XX(RW%GD$"WRITESTATUS.FILE,B215"P"X"kD$"CLOSE STATUS.FILE"q65338:WZ12000::D$""W0%0:W1%0:W2%0:W00:W10:W20TB%(17)X0%16384XS%X0%24XH%X0%48XG%X0%X0%60):4XX1:892.>D$"RUN GOLF.FP30"4HgR:10:"THE ROUND OF GOLF HAS BEEN COMPLETED."u\XX3:892fD$"RUN GOLF.FP10"pD$"RUN GOLF.FP30"zWZ%(16384):WZ%127Ĺ16368,0:890{|D$"OPEN STATUS.FILE"}D$"WRITE STATES".D$"READ GOLF.COURSES":W01W1:WF$:JD$"CLOSE GOLF.COURSES"jD$"OPEN";WF$:D$"READ";WF$D$"READ ";WF$;",B254":WA$SF%1VR%0 254,VR%:RG%D$"CLOSE";WF$ SF%1830 *W0X0%244X0%2512:W0,(X0%59):W01,(WA$:AD0!D$"CLOSE";WF$qW0(X0%92)((X0%93)256)::" IT IS A PAR ";WP%;", ";W0;" YARD HOLE"X0%95,WP%2W0(X0%15):SF%1710W0W01:W05W00X0%15,W0W0%(X0%94):W140(W0%6)W0D$"OPEN GOLF.COURS4%0650540650.RS%:W9%0:5507RT%Q&(255)255İ590:540Z0RL%p:W9%0W9%1:540|DW9%0:NAI%AI%1:AI%600,610,620XD$"READ ";WF$;",B510":630bD$"READ ";WF$;",B766":630lD$"READ ";WF$;",B1022"v%59,W3%:W3%(MDW2%1):X0%60,W3%. :10 SF%1ĺ" CONTINUING THE ROUND OF GOLF"::" ON HOLE NUMBER ";(XH%)1;".":470 "***** STARTING HOLE NUMBER ";(XH%)1;" *****" AD18:530 F1%0F2%0650 540F3%0FW2%:F4%W2% ^X0%77,0O hW2%(MD16):X0%92,W2%:W2%(MD17):X0%93,W2%^ rSF%1450 |W2%(1)4:W3%(X0%48):W3%9420 W3%W3%9:W4%(X0%6W3%) W2%W4%420 W2%(1)4:400 X0%6W3%,W2%:W2%W2%28$ W3%(MDW2%):X0LOSE GOLF.COURSES"3 "D$"OPEN ";WF$:D$"READ";WF$S ,D$"READ ";WF$;",B254":WA$] 6AI%0 @WP%(MD):W2%(MD1):X0%94,W2% JW2%(MD2):X0%73,W2%:F1%W2%:W2%(MD3):X0%74,W2%:F2%W2% TW2%(MD4):X0%75,W2%:F3%W2%:W2%(MD5):X0%76,:( XH%31,(1)41:XH%32,(1)41A W0023:XG%W0,0:\ D$"OPEN GOLF.COURSES"w D$"READ GOLF.COURSES" W0(XH%):W08W0W09 VR%(XS%(W02)1):254,VR% W1(XS%(W02))1 W0((X0%2)9)W1 W10W0:WF$: D$"CW0):XH%1W0,W1%:. X0%96,3:XH%10,255` X0%942W0%(1)13:XH%13,(W0%9)70:160 W0%(1)14:XH%13,(W0%10)59 X0%943W0%(1)8:XH%14,(W0%10)45:180 W0%(1)11:XH%14,(W0%10)27 W009:W1%(1)5:XH%16W0,W1%  36864:350001110+920::G(SF%(X0%1):SF%1210o2W0%(XH%):W0%W0%1:W0%256W0%0<W0%18840FXH%,W0%PW0%9120ZW0X0%25X0%412:W0%(W0):W0%1W0%0:110dW0%1nW0,W0%: xW003:W1%(XH%6    ,6' 6,9,2,4,7,3,5,1,8;0u24964:(222)255Ĺ216,0:2F1u24967NAMES"t'RI%26473: INITIAL READT'AS$"***************************************"'AU$"*** ***"'' HOLE SEQ. DATA:' 5,3,9,6,1,8,4,2,7' 6,2,8,3,4,7,1,9,5' 1,4,7,2,5,8,3,6,9' 3,7,4,5,1,9,8,2S."hX(X0%2)0ĺ"DE = DISPLAY SCALE OF FAIRWAY (YARDS)":" OR GREEN (FEET)."]"DF";UN$;" = DISPLAY FAIRWAY:"b" SUBSTITUTE ";UN$;" FOR 1,2,3."g"DG = DISPLAY GREEN."l"DL = DISPLAY'S THE LENGTH OF THE H = TO ENTER CLUB SELECTION:"O?" SUBSTITUTE ";UN$;" FOR 1,2,3,5,7,9,W."|D"S";UN$;" = TO ENTER SWING SELECTION:"I" SUBSTITUTE ";UN$;" FOR 0 THRU 9."N"H = HELP (DISPLAY'S THIS LIST)."S"DC = DISPLAY CLUBS AND THEIR RANGE= DIRECTION="+VC$"X"Ģ22:15:VC$DVS%99Ģ22:24:VS%`!255,(VA%):RP%:24:1&"WHEN ALL DATA ENTERED, PRESS RETURN KEY";+W5%0:0::3:"**** USER INPUT PARAMETER LIST ****"5:"PARAM EXPLANATION"::"C";UN$;" .FILE""X""16385,XX:RW%AD$"WRITESTATUS.FILE,B215"J"X"eD$"CLOSE STATUS.FILE"k62450::255,VF%:RD%:21:"GOLFER="VN$:21:14: "STROKES THIS HOLE=";(XN%124VG%);" PAR=";VP%"ENTER--> CLUB= SWINGS ANY KEY TO SHOW SCORECARD:";:WA$:640BW2(X0%3):W20460jW00:W10W2:(XN%120W1)0W01pW01XX(16385):470:30XX2:470:D$"RUN GOLF.FP20"XX(16385):470::760:30:D$"OPENSTATUS.FILE"D$"WRITE STATUSW0%(X0%1):W0%1465(X0%1,17W0%9120FW0%7425UW0%8435[:65338:21:1::"YOU HAVE REACHED MAXIMUM STROKES FOR":"THIS HOLE (DOUBLE PAR)."::750:760:640:440(:23:"YOU HAVE COMPLETED THE HOLE.":"PRESEQUIRED":345"cVD%(VA%)375sh24:1::AA110:BB(16336)::"BALL DIRECTION NOT CHANGED; OK? Y OR N";m:WA$:WA$"Y"375r120w254,VS%1:VC$"W"W0%6:390|VC$"P"W0%7:390W0(VC$):W0%CL%(W0)255,W0%:::RS%0%5330!;VC$"W"VC$"P"325N@WA$"INVALID FOR THE CLUB SELECTED":345]EW0%9320wJVS%10ĺ" ":22:24OVS%W0%:VS%0VS%10TVS%:125Y65338::21::WA$::750:760:W0(0):510:125 ^VC$"X"VS%99WA$"MORE SWING INFO RWA$"INVALID, CLUB MUST BE 1,2,3,5,7,9,W":345u"WA$"P"VL%3WA$"INVALID, PUTTER NOT ALLOWED ON FAIRWAYS":345'VL%3125,VS%6WA$"W"WA$"INVALID, SWING VALUE LESS THAN 6 ":3451VC$WA$:VC$:125622:24:WA$:W0%(WA$):W0%0WIS HOLE DOESN'T HAVE A FAIRWAY "(W0%):345G VE%W0%1:VF%VE%:120(X0%2)0WA$"SCALE ALLOWED ONLY ON BEGINNER'S COURSE":345255,VE%:RE%:515:12522:15:WA$:WA$"1"WA$"2"WA$"3"WA$"5"WA$"7"WA$"9"WA$"W"WA$"P"290/60) WA$"INVALID DISPLAY COMMAND":345: "FAIRWAY "; WA$:WA$:W0%(WA$):W0%1W0%3WA$"INVALID, MUST BE FAIRWAY 1, 2 OR 3":345 W0%1265 W0%2(X0%73)0(X0%74)0260 W0%3(X0%75)0(X0%76)0260 265,WA$"TH"230# WA$"G"VE%3:VF%3:120C WA$"C"ĉ::RC%:760:120U WA$"L"210 :21:"HOLE LENGTH FROM":" TEE TO CENTER OF GREEN = ";(X0%93)256(X0%92);" YARDS" 760:515:125 WA$"E"270 WA$"S"İ640:120 WA$"H"ī5255,(VA%):RP%:W0%(16384):W0%1411258 16368,0I W0%141350Z W0%195125k W0%195280| W0%211310 W0%196175 W0%200560 WA$"INVALID COMMAND....TRY AGAIN":345 24:1:40):24:1:"DISPLAY "; WA$:WA$"FVG%):255,W0%:VL%3VC$"P":100. _VC$"X"M dW0%(XN%128VG%):VF%W0%w iW0%(16384):W0%140Ĺ16368,0:105 n GET-USER-INFO LOOP sW5%0:MD%,0 x510:W0%(16384):W0%140Ĺ16368,0:140 }W0%(16384):W0%140Ĺ16368,0:140*  7W0%(0)(1):W1%(W0%); <X0%20W0%(1)287:70M AW0%(1)254^ FW0%0W0%0 KX0%81,W0%:W0%0W0%(1)4:X0%82,W0% PW0XN%(VG%6) UVN$((W0))((W01))((W02))((W03))((W04))((W05))" ZVS%99:W0%(XN%128 770 8953W0(X0%48):W08W0W09HVP%(X0%83W0)^GET NEXT GOLFER:W1%(X0%96)1:W1%(X0%3)W1%0#X0%96,W1%:VG%(X0%49W1%):X0%53,VG%((XC%VG%)130-VD%(VA%):VL%(XN%128VG%):VE%VL%2 WIND:|C 'SK}^CKLQKB K 5QKK( 'Sd GSKKeLJR8dKжͣK KKKͤKKͦKKLL$%x S :L1OKPg @`转A:ə%Ɉ!转A RA转ALR8`A RAiLRA轿Kg $%Kd KK d K K SKd 5QL>Q88` 'SP8((KKKK KLnQ莢KK8KKKɓKiKKKiK|CL R$%O SLQS SLQG SG SީGKK  "LK  KK  "LK KKKKKKKKK莡K LKKKK͡K K͢K i ͢KLPLOKɔ KKKɠ KmKKLOͽK# $% S :΍@ gSLLL!NͽKKLP  'LKPg "L 筢KKKK "CBDBEB "LKK ɀ%$K S$%$ S K)ɛ5@@i@@LOK :LNOLRL{RKKKKKEPg XͽK,(K#KKKmKKEPgKmKK LKK  KKKKK CQ@ 'S8KCKKKEAlDAK RKKKKKLyNKKKkKRKK K K 5@@ 464K K :K  :KiK lD LK@K5@@K KLLLNKKKKKPgK -KKQ@ȭKR@Ȉ8LGMdiHJJi8KCQ@JiJ< 'SKeKKCQ@JiJ 'SK8KKCCQ@ 'Sd8KR@KKKKKL+L@ ua@`@ xa@`LTLT T`L T T`CB` og`0@ 8 @KKK`@8K8LYLKKKKcKFK 'S/CK e*C8d KK#LL 'SCK KTCK5@ @T TIME."24967D THE NEXT TIME."2;u24967::R'MD%0:ASM PDL DIRECTION BUCKETh' NW01638416639:W0;"=";(W0)::=";(W0)::-kVA%(X0%4): PDL#:pMD%0:ASM PDL DIRECTION BUCKET@ufzW01638416639:W0;"=";(W0)::24964:(222)25591024967216,0:10::10::"RE-BOOT THE DISK TO PLAY GOLF":" THE NEXT TIME."24967F":" THE NEXDIRECTION#9RS%19438:GOLF.ASM10D>RW%26467:STATUS FILE WRITE^CVG%0:CUR GOLFER NUM{HVN$"N":CUR GOLFER NAMEMVC$"P":ALPHA CLUBRVE%0:FOR SCALEWVS%0:SWING\VP%0:PARaVD%0:INITIAL PDL VALUEfVL%0:BALL LOCATION%0:W1%0:W2%0:W00:W10:W209X0%16384:STATUS FILEVXG%X0%49:CUR ROTATIONvXN%X0%112: GOLFER NAMES XC%X0%232:HOLE-COMPLETED FLAG%RC%26482:CLUB DISPLAY*RD%24943:DRAW TABLE/RE%26470:DRAW SCALE 4RP%26464: GET :73511(W07)#W0%;"-"W1.W2,W09760:cW0%(16384):16368,0:W0%127750:i24:1:" PRESS ANY KEY TO CONTINUE:";WA$:D$"":UN$(223)CL%(9):CL%(1)0:CL%(2)1:CL%(3)2:CL%(5)3:CL%(7)4:CL%(9)5 W0W1W1W0%:W1%;" ";W0%;" ";W1:3W00(X0%3)CW1XN%W06WA$((W1))((W11))((W12))((W13))((W14))((W15))5:11(W07):WA$W10:W2017:W0%(XN%28(W018)W2):W0%0W217:740W1W1W0%:W0%10Ė12(W07)":670/"NATIONAL CHAMPIONSHIP COURSE":670P"WORLD CHAMPIONSHIP COURSE"" H P":" O A TOT STROKES - TOTAL STROKES"4:" L R PAR":" E"W10:W1%0:W008:690:W008:690::700W0%(X0%83W0):W1%W1%1:W1%10Ė2 OLE"1q" FROM TEE TO CENTER OF GREEN."Wv"DS = DISPLAY'S THE SCORECARD."g{760::120::"SCORECARD: ":1:12:W0(X0%2):W0650,655,660,665"BEGINNER'S COURSE":670"LOCAL PRO COURSE":670"STATE CHAMPIONSHIP COURSEgSgSg5@@^aLhTgTg 5@iLh@@ WRgRgVRg% "$UgUg LiUg `8&*(L!iee&`^a  J IJ'tiiiiisi莠i`g2LxgLjLkLpkLiLkjL,i  W W W W iHGHPg#  Pg `` :  hPg `` :@CPg 8 LhHWg%&$ "hi % "%$Wgi LFhLi@QgPQgS L] L^`5@@4@_@,@:@:@6@ ]m0@_@@@ NZL^@@=K@ K@K@ Y5@@ K@K@O@ ^O@P@ ^P@``K!K ] ]KemM@Pg H}FKK8F ]mN@h}FKKKKL6T5@@L^ KK W KKKK W`Fejf`8&*(L]ee&` "E L]` "4F \Li\əɠͺKꍺKʽ&CPgJJ8diL0\8 CKK S\KCKK S\KLK[d Lf\d`=@iK>@iK w]d Tp T5@@:@:@6@ ]m0@5@@@@L^K ]K^@ʩ ]K8FK ]$% ]K K5@@$+ ]KKKKKKKKKKKKKμK;K4KL[KDKd$ްPgGPgi#mKKL[ w]Ll]#PgHPg8#L[K'Kd μKiL[K8mKK W- ] JZK w] YKKKLK[LTKA@3GAIA*GA&JAaHAJA T`0` ] `KKK YKLZ^@ʩ ]K8M@KF ]yFKKF ] ]KemO@KK8N@ ]yFmP@KK ]KL[ w] ]( T XpB XSBLXLsY@.86BpBSBəI XpBRBSBL Y XiHBpBSBəpBRBSBLQYKKȹSBəmKKȹSBmKKK`KL{YL{YiALY!KAAޭKAAϽA`K.BHALR XRBpBSBLW88`48BpBSBəpB XRBSBL+XLsYLY Xi$BpBSBə XpB XRBSBLbX-$TSBVBTBWBUBXBLYLY8$BpBSBəK XRBpB XSBLX` Xi6BpBSBəKL#WKK8J@KK KmI@KL-WK8I@K YKKKKKKLmTKKKmL@KKLWKK8L@KK KmK@KL-WK8K@KL-WͨKLmTLbZPgKKK$ 7LYLPXLXY BpBSBəypBSBLW XiBpBSBəKKKK NZL^KLmTLZVKmKJ.KK( TPgi$H8HPgLmT w]L T\LUͨKLmT w]n( TjLUKKKKͨKLmTK8dKLmTKKKKͨKLmTK8dKLmTKKKmJ@KܮKKPgmKHGPgL>UKδKKKmKKKmKKLIU WK w]2 ]K JZ YKKKKLmTLV<9:9:9 w]d Td2 T7LULsVLVLVLWLVLEW$% " J$% ]$%5@@E ] T L^LTLWLmZLY ua`CB` og`KK5@ @K@K Y$% ]KKKKKKKKKKKKL{TKKLTK莨K w]L^KꍫKK$+#& ]ͨKL>UK*ζK%8((KKPgmKHGPgK$εK     A RA RAALR` "E L S` "4F LSFejf`8&*(L\See&` 'S `Ҡ̠  # |}LJ$(-26:?  Š̠ӠǠԭƭ٠Š̠Π̠Π٠ŠҠР٠ҠŠŠǻҠ٠Ҡ٠X xx&'./89>?HINOTU\]fgxjkpq|}Ɔǟdd xxxx&'x./89>?HINOTU\]fgxjkxpq2PP2F ##5  )-6>7$$$$I9?76--66??)-6666I9?7666--$@HHHUK=@VKiWK>@XKiYK`a f`a2?@$`a fLf`a`UKLfiLf`aUK 8;@;@`hhߚHH`L$g :LHeA`caALeLefaca`ALeLeALe`afaea`faca+8caLeeacaLeLe`aLe`aLeicaLe dfA`a?@`a df dfL,f`a df df`aL,fH a Y Y :Q@ LeR@Ha He0HaH] jD d ah Q@   eQ@8 Le  e a`eAȽ`A㙬A ,e` pe@`a peaa`a  pe(`aaa : peaa`a[ cba  c`a caa c`a cLcaa`a baʠeD d a `iLc _a ciba c`a caaaa`a jD dba a LcDCBLd`da ugdaLb _a @ Sd``@ P `转A1ə转A VbA转ALvbA Vb8AiLjb`$HALb3GALbGALbaHA b` ^adada_aLcL)dA` cəJɈCda8 c c  c˅ : c :L>cLcdalaLaLbLSdLbLdLxeLeL"fLgL$gCB``` 'bcaLaLaLbLaLaLaAILaA3G`A&JLaAG`AJM@A iAM@AN@`AaH`ca:转A转A Vb转A VbAAL0b`8i   Vg :VgiVgɍ`ةRg@@ Ǎ@@`)(`% j% j% j% j % j % j % j% j% j% j% j`$ "Pl Lj`$ "Am Lj`Ǎ@@` Vg5@@^aL&k @@ WKVg VgU :VgiVgݩVgVgr ~i莵i莺iVgVgVgI} VgiVg䪩iXg VgII8JeWgWgII8JeWg WXgaaaa 0 L}i`/)00 0)`8&&0jjjE 0 ??>>6..677655@----,<<>66...----5>>????<7.A@----%$<>>>>>>>>>>>6J----%%%$$$$6667???$$$,,--=H????7776666@@@@@@.,$?6<$%%$''?????>>6-,,---5577???7.---..>>???''?655III-$$$,-$?'$$?66>???$$<7666----5666 -----,,$$<<>???''?655 -----,,$$''????>>$$,,----.%<>6666655@----,$'???>>75I -,$%,$%,$%%67>67>6 -----,,$<<$%%$''????@-$?6II-$?@@-$?6I)%-.%-,,$<<<'$55-$''?<7?<7?>>6...56''?655-F@-$<7vJ%%'7@$<76-$<>..II)-$?$'<$%,$-$?77>676.65.I)-,$%,$$'<$'?7.5.65>67>7-------$???$$$$$$?>>>>>>6-,,,,6666???6-------$?????'%%%---,,$$''?????>>6.%,,---55>>??7777776 -----,,$<%%%%?????$-------67777777777-----6???????II-$?6II.,$?6II-$?@-$$$$$?66666II-$?@-$,-%%%$<>6.%,,---557??766@@-----$?????6@@-----$?????@-----$?????6II-$$$---$???$$$?666???6---666-,,,,,,,,,,,,$?>>>>>>>>>>>>6@@@@-$$?66J (%$<76II.,$655II-$$$$$$---$???????6---666666 -----,,$$$$$$?66666>>???''$$$$$?66666655II-$%,$%,$%,$?>67>67>'<$'<$'?65.65.65.6-,,,,,55555-$$$$$$$?66666''''?>>>>$$$$$?6666666-,,,,,55555-$''''',,,,,$?>>>>>'''''?655555>>>>>6II-$$$$%%%%%%?7777?<<<>6666655@----,$$$$'????>66665-$$$,----%%%$''??????6666666H@(----,<>6666655@---<$-..$$$$'????>66665-$$$,---5666-$$$$%%$<>6655----55>>???''?---$???$$$$$---$???????6---66666???6 -----,,$$$$$$?66666>>???''$?6655-$$,.5-.5-.-$?<'?<'?$-,%-,%-$?7?>7?>7'$$?6666666-------$??????$$$$$$?6666666-$$$$$5555-,,,,66666-$$$$$$$?>>>>>'''''?6666666-$$$$$5555555555-$$$$$$$?66666''''''''''?6666666 -----,,$$--55-$''?????>>6666655------,,$$$$$''??????6666666@----%%$$$<>???''$$$,,---55-$''?????>>6666655-$$$-----666-$$$$$$$?666?????$$$?6666666----4nFw!Ct%UIq&-5Kv]y+P+j$$$$$$%%-----..666666?$$$?????666?@A $%----.6>????$$$$$$$------..6>>655677??????A(----,<<>???''$$$,,-ŠҺԩ("d("d,d.d( dPl ǠӠĠ̠ĺĺκκκκ  ^a]fa^!*2:?I*U*Uժժժժժ*U*U`^  266.`$$$ 666 $$$$$$ -6?$$$]f]]ff]af]aaf]a]f]af]fa]f]f @'!a>mO!~.aOm>a&K&uCl!Oa!Ouߙau❝!a>!m>Oa>m>O&&u!O!aua#ܝ#D#'e5O_'!e5eGO5v_O5Ev'_}v_'_l}_v}__vי_v##ܝ##'e5'O6_f5O6_`v'}_v'_w~`v_wP9f!>Y!>^!>zY>!6e>eݘYze❝!Y>!>Y?z>?efZ{<7!YY!,Y>Y]x!YYn!YRY>nY>d>݆>⋋!YYZ>!YYZoZ?n?Z{ưưƱƱƱƱưƱƱƱƱƱưưưưưưƱƱƱƱƱƱưƱƱưƱƱƲƲƲƲƲƲƲƲƲƲƳƳƳƳƳƳƳƳƳƳƴƴƴƴƴƴƴưưưưưư L\` &L&LJ& A&) JL( f%L L\&L&L &'L  L '!&(`&J& D&) JL蒩Υ fL & &` L\'&ܩJ& &L&L L@&+%J& &L\&L\ fLZ  Lё '? &А LZ&hb υ΅&'&``J& &L&L&) L fLϱ& `L)8ɀJ & &`ϱ&J`Lߐ)8ɀ J   #ܝ#f' 'O/' }>' >} \} 2\bN'>}\z_\'>@{'\_'\_z\י_zq}'~}\}\ ‚kיk##ܝ##' '} >} \\'}>\_\z'_\_z\k#ܝ#< 'U>'Uq'h>U}qU}2}F}2\}2#>Q>k>P'q}'~}\}\ ‚kיk##ܝ##'U>'U>qU}q}2}2\>>k'}q}\ k#ܝ#P'}/'<} \} }\ }Ai'\_z'\NC'/}\'/_'z'zn_\יz_\##ܝ##'}/'}/\} \}  \'_\z'z_\zz#ܝ#>6'_\'_/>_>z'\_'\|P_>k_>I/k/t~_k_kkיk##ܝ##'_\_>/'_\_>k/k_kk.M!Y,C!Y,Y\BC,w\C,Mw,\z\w,jwC\C\^,ߙz\,❝!Y,!C,Y,Cw,\w,\\zC\,\\zz= !a>!4f!>ahM!>v5ahaVMߙh#M|MhMh❝!a>!a>h!MhahhMMMhua B%!kJ!(kV>JkPg!JzY!g>zYz>sVߙzV❝!kJk>k>J>V!Jz!Yz>zYzVz 99!Ws!tW=W=TW=^sW=C!sm!smsmsz^ߙs^❝!WsW==W=^W^s!msms^ssniii6iN^ 4 gx 4x gxx g ggx Dt D W5i]u5iEkLXLNnɇnwPPvx Dt5]iuLXnP xx x xEI)e)DuM]uMyQxU$P)>Q<<ZP/iPZ-8=D-82:8DdDdЈ8nDdDd8D-=8D/Pi<   -P!Y2;!%YP2YYH;2w_;2]w2Pnw2BnYs;_w;_zwn߇wnb}Abs}b}b jP߇P⋋!Y2!;2Y22P;w2_w2PwPnn;w_wn=%!Y2!1G!2A\!2KJA2YbA2}%Y2Y}JY2bY24P1q!\A!\_sAb}Abs}b}b jP߇P⋋!Y2!A2\AY2bY2Y2bP!A\A}b}b P8=!Ob!i/OGO/G/GhTOGbOGTGbGEt!bk!btkbkbtbG߇b⋋!ObOGGGOGbGb!kbkbGbbN%!}2!NA!2}P!2=_!PYn!P=z!nY!n,}Ab}PAbAupYP}bYPtb߇b⋋!}2!}2P!YPn!Yn}A}BbAbY}PbYbb 7*!SA!e*S}ASFU!A}Ykh!AFw!hk!h8}Y}pkYkY2MkM߇YM⋋!SAS}A!}AY!kZh!kh}YkYMMYZ #ܝ#M!'}>'+}\>}!>_W'>ih'>G'hi'h~\\n>י\>q}'~}\}\ ‚kיk##ܝ##'}>}>>\>'>hih'ih\>\\'Κޚ"P8N8@'1@'13 O3 >[4H[4u;2P\PSP\2[4H3O 1'@8N P PP Pa< }0AllA0l 39*Gj9*>Fa<Ua<mE'6'+*xQ*7WiW\*QRxWi'6a6KWi!0u4M_k*Z Z ZZ Z"l}Pxa$D$1) , PPx$D) , !#>''''x'KF5{}5{U5}{ x 'xx ''Kx 'FKK FFK F  }o23#_g8U,_[/>V>G#>=W#>-H_Ek_+b3#_g,Ug,8>V#=>WE_k } o}} oo2} o22 2!(-0< Z ZZ Z$Edoo~o    #/Q#'3MMcP  #/QMZ#?[W#?V>G1D186B69xx}>V1D6Bx"" , ,{Lw>ATdTY ,w>LTdO x xx0 Px00 PP0P PPP P l ll l p pp Pp PPPP ', #  ,{