–€€@LƒĢ}Ė¬š5 _­¬¦$Ž¦%Ž l0¬±$)ŖČ$š±$Hȱ$ Uh؊L"©Ą Ø`©€e$…$ę%`­…$­…%` Œ ©R @©W €¦!ąŠ( L¹(©Œ©1© ©€  ­ YäĪ š¦I˜` ­ d  LĒd M  ¼* €@ ’­ …$­ …%­ …C¢©C ‘$„$)„%1© U©dŹß„$9„%:¬ ¢ˆ˜!0 S蹊ń„$ē„%č©Ø™ČśØ¹š ÉDšČČČĄŠš©D™©Ė™©™` ­ }½J‚)šLr ģ½‚Éd M  ¼* €@ ’­ …$­ …%­ …C¢©C ‘$„$)„%1© U©dŹß„$9„%:¬ ¢ˆ˜!0 S蹊ń„$ē„%č©Ø™ČśØ¹š} ÉDšČČČĄŠš©D™©Ė™©™` ­ }½J‚)šLr ģ½‚ɚɚJÉ š É š „Ø(°(°  p LĒ „Ŗ(°ł¬¹ƒ)š  ‘ JŽ½}‹L= „¬(° Į ¬L ­ 0q A­ ­  ‘¬¢ © ™ČŹł¦I©Bƒ J¬™½‹™©C™©™™¢½;É?š™Ččą š D W ¶}©€… ‚ŠLLĒ „©©…­ ©‡` W ¬¹ƒ)„¹‹¹ŒLź½A…! ­¬ ¹Éß°©…"½‚)š-¼‡˜Ż† p°" }ä  °±$ž‡­‘G©@……LĒL „ˆ½…08`©©Q„")š<Š2Q­0 ā°- ±G‘$ȘŻ†õ UL# ; p8„(ż†…(°Ę)„(0Ź„)ŠĘNQ`  }±$‘GȘŻ†õ‡LU ­½‚)šL­ ½‡Ż† ė āšLą رGȘ‡¼‹Š¼ŒŠ Ż†©LÆLĒ ­½‚)šW>…Z ‡  ½H½H½‚)š½ƒH }p hƒ āū½‹½ŽŒ Ž¬hy™hy™½ƒ™ D ”©‚LĀ>…ó ĖLń ½JJ    ! LA© *ˆŠł` ­½BÉžšFÉ }żš7É'°8é  عM H¹N H` 8 ¤ Z ß ā  \LdĆĆŠņĆJóó½JŠ©!¢š©"ŖŽ„!¢ ÉšG„F„E @­F (Ą‹Š®š©!ĶŠŃLÆ }ĄŠł ©’ŃEŠČŃEšģ „­¢­É!š¢© ‘EˆŠū½^ č½^ ‘EČĄŠõ  ©‘E©’ČĢŠö 7©‘EČ©‘E® d‘E Š©/‘EČ©‘E ”©Ø™Čś© DĪ }ų .LĀ } ‰¢ ½;FŹ÷ d  ‚¢Ž¬½;É?ŠĪŻFŠ7½FÉ?š™Ččą Šį(Š . ‚Š ®½¼ Z D­š ü®LĀLč d Į ‚}Š . D üķ ”LĀ ‘¬  ©€™ p  āų ˜‘E`© ,© d¬¹)ß ™ D üźLĀ¬¹) šŃ „§½…0B½MŻŠŠ½LŻ‰š½…}š Ė©…½MŒ½L‹ ź° ½NŻ†š „¦‡LĒ „«½‡N½‰L½ŠMLĒ ģ[ T Š±E qEHȱE ‹qEŖh؊¢Ž 0 Š‘GČ¹Ō ‘GČĄŠö} HLĒ¬Lą ±GīɛŠéĄ°©€LĀ ü°„ ä LĒFREE SECTORS® © ‘G½) š©*‘GČ© ‘GČ½‘GčČĄ õ© ‘GȌ®„*j½j ˆ©>‘G} ©<‘G¼½¢d R¢ R¢ R¢ ˜š¢+ ©›‘G Œ`Ž¢’…D„Cč8„CķØ„D鐹 ŠźŠ 0¬‘Gī„D¤C` ±$ˆ0dÉ:Š÷ČČ©¢±$É.Š ąŠČ© Šī},É*Š ©?ģ°%$É?šÉ0É:)ßÉAÉ[ © ą š© ŠČģš¹;čŠ³­;É š¦I` „„©’ ©pī­iī©ĶšN A©ع}š#0!)CÉš)ŠĻ¢½;É?šŁŠĮčČą Šī­ ­ ­ ­ ¹0œ8¦I` } ģ°`L¤½…0  … Ė0"Lā J½‡ ‘G½Œ }‘GČ½‹}‘G Ė ©‚­LÆžŠž Õ©‹Œ‡©}†`8½Š¼‰L½‹‰½ŒŠ`½…šLp½‹ŒŠ8` Õ Ģ04 }±G)üŻŠ,±G)ŒȱG‹ȱG}H½„Šh0©})Hh†©‡` ½½BÉ!š „¤8`8­iiØ(¢©ŠZ ±EŠ6¤!©JĄšŒ©S Sä©d¬ź©Š¤!™ Ģ ź ‘E Ø ū` T©} ‘E ź8 Ø ū8LĢ„F¦E hŒ  Œ Ž r9ĄƒšL½ „£­)© © „EiŖ„Fi(L¶ d±E™ī©‘EČĄŠņ`¬  d¹ī‘EČĄŠö`½‰H)}ØhŠš/¹×H½‰ ^ŠjˆŠłi ØhE‘EĄd  Š±Ei‘EȱEi‘E`  ČĢ°W±Ešö¢’č ü½×QE‘EŠH¦I˜8é ‹©Ą‹*°śŒh‹‹Ąd   Š½ƒ)æ }ƒ8±Eé‘EȱEé‘E ˜‘E½Œ` „¢†IŗččŽ ¦!ŽŹ½)…E½1…F½š5¦I¼ˆŠ¹! ČĄö „”©€™!Șˆˆ˜JH©jm9…Ghm:…H` „ ¼ˆš ˆ©}ˆ™!`¦GŽ¦HŽLl¼‰½Š Z dLĒ©© ŒČ©8 l­I€0ī¬ ĢŠä`Œ©ŠĢ _©}† ; „$Ķ „%ķ ° pLl`¢¬¹}ŻšŠČčą Šņ¦I(`DOS SYSh…Ch…D ±C® š¦ICØ­`­0ķ¦I ©Šä „B®ß0¦äšüŒŌx …D­Ó)ćDÓ`}Need DOS2.5,type Y ŅÅŌÕŅ}Ī›d÷›  "€€ddJ€’žżüūģ\Ģ|DOS SYSCOPY3TO2COM}B€}B€}-B€} }CDOS SYS}­ …C­ C*ɐ( ‹Š> Ė„C8jJ…3©j…2­…C­…D ( ±C‘2ˆł0±2‘Cˆł© Ž ĄŒŌ „BXČ` N ©1?©ń¢ l© ¢LlD:RAMDISK}.COM›©LĶu ŠL„1©©ķ¢ ĶL „;ŠLź˜HL³ź³źŗŽ  T `ŗŽ  ” `8©ž©Ÿ… ©… ­œźÉŠ © ©  ąźźź„Š Ų`TŽU “©Ą } ¦L’­š­žš ? . “ t䩍`…šö’ąį©€Ÿ©Gą©į¢©B©J Œ©Š~¢©ōD©E©H©I ©B Vä0d©’ĶōŠVĶõ!}ŠQ¢© D©E©H©I VäFĄˆŠ9 ’,ž0 ©,ŸŸ0 s0hhLø­Š ©¢ ¦L©Ŗ` ’©Š÷˜H ’hØŠī¢­ DH­”EØhČŠØČŠ­"}¢ ­£”©¢D©E©L­¢8ķ H­£ķ”I­”É4ź°­£Éź° ­ 0©€ ŸŸžHŠžI,Ÿ0­ 0Ī  9© .¢©Gā©ć VäLO#},ž0 L÷ɐÉ4*IJ`lāląD1:AUTORUN.SYS›NEED MEM.SAV TO LOAD THIS FILE.›D8:MEM.SAV› ’©J y08© B©|D©E©ŠH©I$} Vä0 ’0 `©B©;D©ELŒ`­?<0LV䠐`@’¢ŽžŽŸŹ† v s©…š? F0Īž05©:¢ ¦©[¢ ¦©B©D©E©H©I%} Vä­ÉYŠ8©…¢ © B Vä„ œ„ ©@… ©… ©/¢D©E ŒžˆŒ ¤`E:›D8:DUP.SYS›ERROR-SAVING USER MEMORY ON DISK›TYPE Y TO &}STILL RUN DOS› œ©B©;D©E© J Œ œ(`©š 9¢ Vä©šī ­āĒ­ćČ©āŖĆ© ļ©šī¾­ąĒ­įČ©ąŖĆ© ļ ’­ž-'}”šī”LLu ÄčŽÅĘ¢©ĆD©E©H©ILVä 9© .lśæ 9© .l­œ… ­… `­žŠ` s©…š$©B Œ©B©ŠH©(}I©|D©E Vä© BLVä n䢩B©,D©E© JLVä© ¢B Vä¢ © BLVäDŽE¢ŽIŹ© Bźź­šåL’’’ąįu • óŠ}’’ 3E:›}DISK OPERATING SYSTEM II VERSION  ²®µ COPYRIGHT 1984 ATARI CORP.››A. DISK DIRECTORY I. FORMAT DISK›B. RUN CARTRIDG*}E J. DUPLICATE DISK›C. COPY FILE K. BINARY SAVE›D. DELETE FILE(S) L. BINARY LOAD›E. RENAME FILE M. RUN AT ADDRES+}S›F. LOCK FILE N. CREATE MEM.SAV›G. UNLOCK FILE O. DUPLICATE FILE›H. WRITE DOS FILES P. FORMAT SINGLE›L˜ !N'Ę,}#"&¾)ę)9(Š&©*)/h)¬'ś'-Ź&¢’Ų†莟©…R©'…S„ €…Ņ v­¾ÉLš/©©Ė¢ ĶL¼ }Insert DOS 2.0s, type Y ŅÅŌÕŅĪ›©ō©x…© …©-}D©E©fH©I ž1¢’ščŽ#©q¢! ¦©@¾ y0ɛšĻ8éA0,Ķō' رȅ±… ±Ŗˆ± °1 ¶1„i…ęl©d¢! °1L!NO SUCH ITEM›SELECT.} ITEM OR ŅÅŌÕŅĪ FOR MENU›õ! Ź0 æ.®½zÉ:Š©*{}©.|čč莩›{Ž¢ Ų1 ć0 æ0©¢J©BŽž é1­8ķÉšLØ%®½|ÉDŠóL¶/}%DIRECTORY--SEARCH SPEC,LIST FILE?›[# Ź0 æ0 ø&­|ÉDš©3¢" °1L!NOT A DISK FILE›¢­žÉNŠ ©!B é1L!©E¢# °1©¢ ©!B©ńD©0}E©Dń©:ó­}É:Š©1ņ¢©B©J©|D©E é1©ōD©E©B©¢©H©I é1­õÉ Šhī­Ķ0ߢ ¹ōÉ š ōčČą0š©.1}ōč  ¹ōōČčĄ 0ōŽ©?ōč©›ō©ń¢ °1 y0ÉYŠ›­®©›ō¢ é1 ;#LŠ" ;#L!¢© BLé1TYPE "Y" TO DELETE...›DELETE FILE SPEC2}›COPY--FROM, TO?›OPTION NOT ALLOWED›262 FREE SECTORS›› COPYING---D2:DOSMAN›OC›M›l# Ź0­­|ÉDŠ¢ Ņ.šL/%©€#©3}#©‘#¢©J©B©|D©E é1©B©H©I©’D©#E é1­’#É0É:° © B é1L!­#Ķ‘#šī‘#ŠĮī#© B é1 ¹œ#Łc$Šˆõ0‰SY4}S 1­}É:š،³#¢ ½’#É š™²#Ččą Šš½’#É š©.™²#Č½’#É š™²#Ččą Šš©›™²#©¦¢# °1,#P¢©²D©#ELJ- <.¢©B©J©²D©#EŽž é5}1¢ Ų1­H­H ć0hh®½|ÉDšLØ% 1½}É:šØĢ³#Š ’L¾%¢ Œ³#©²D©#ELŽ%¢ Ų1 ć0® č.® Ņ.Š0©O¢% °1L!WILD CARDS NOT A6}LLOWED IN DESTINATION› æ0 <.­|ÉKš<ÉCš8ÉEŠ¢ŽžLØ%ÉSš(¢©B©JŽž é1®½|ÉKš ÉEŠ©’Lõ%©|¢# °1 ’L!ÉCšļ®žąAŠÉDŠä© 7}Š©¢ J©BŽ’ é1©K©®ž¬’B© ™B„D™D„E™E®ž­H­I VäŒų®’¬ž¹HH¹IIHš é1­ųĢɈšLń1®žš© B8} Vä®’š© B Vä®’Š©I¢' ¦,#Lģ#L!œ& Ź0 Õ0 æ0 ø&© ¢B é1L!RENAME - GIVE OLD NAME, NEW› ­}É:š)،öLS)'©żŠ'©ž9}' 70 ¹2i0H'K' æ0©0¢' °1 y0ÉYŠ­' ! 'L!ž¢B©JD©'E˜JLé1WHICH DRIVE TO FORMAT?›TYPE "Y" TO FORMAT DISK 2›D2:›«'¬żæ:}©ŖżæĶżæŠ©UżæĶżæŠ Œżæ©Ÿ¢' °1L!­üæŠńŖ­żæšėĶżæŠęčŠó v©¢ä _ \ä©¢ä b \äLNO CARTRIDGE›Č' 70 2 æ0…†­ÉšP vL RUN FROM;} WHAT ADDRESS?›TYPE "Y" TO CREATE MEM.SAV›ß' y0ÉYŠ s0 ©¢( °1 ’L! FõLš1MEM.SAV FILE ALREADY EXISTS›Õ( 70 ¹2 æ0ö 0+)<}') S)©¢) °1 y0ÉYŠr©ņ¢( °1©¢B©*D©)E©J é1¢© B é1¢ ½.{ŹŠ÷­+)}Ž¢ Ų1© Ć©Ä©Å©łó/©ų/©3ĘH©uą© =}įĪ¾L›/L!DRIVE TO WRITE DOS FILES TO?›WRITING NEW DOS FILES›TYPE "Y" TO WRITE DOS TO DRIVE 2.›D2:DOS.SYS›ERROR - NOT VERSIO>}N 2 FORMAT.› t*­ōÉš ©5¢) °1L!`©) Ź0©®žžąNŠĪž æ0 ©ąšąš˜Lń1©›¢) °1 ’L!BAD LOAD FILE›LOAD FROM WHAT FILE?›Ó) Ź0 ?}æ0©#¢B é1L!WHAT FILE TO LOCK?›ū) Ź0 æ0©$¢B é1L!WHAT FILE TO UNLOCK?›DUP DISK-SOURCE,DEST DRIVES?›TYPE "Y" IF OK TO US@}E PROGRAM AREA›CAUTION: A "Y" INVALIDATES MEM.SAV.›©…F©ō…E­ö…!©ł +Lš1© ­žž©© © `*©  70 ¹2ö ¹2’A} æ0­öĶ’š.¢*©Ł °1 y0Ī 0)INSERT BOTH DISKS, TYPE RETURN›©^¢, °1 y0©©3­å8逍­ę鍭Ķ­ķ° ©N¢, °1L! Ż,©B}žC, t*­ ł­ ś­ū­ü­žżLx+©ž, 0 ©^¢, °1 y0 , ”,0,ž0 Ē,LŽ+ Ķ,­I€0ī ¾,­ĶšV­Ķ­ķ°Ē­ž0C}«Īž, 0 ©}¢, °1 y0­C,ŠØīC,­’ 0K' !­ "­ H­ H©ż 'h h Lx+­žø­’…!©ō…E©…F 5Lš1L! ¹D,…¹I,…¢”H¹łh™łˆD}孍­` žNOT ENOUGH ROOM›INSERT SOURCE DISK,TYPE RETURN›INSERT DESTINATION DISK,TYPE RETURN›žĪŠī®½ōE}ž©­ž`ī Šī `­ö­’8 rLš1`„š©-¢* °1©P¢* °1 y0ÉYŠ©…ž`hhL!NAME OF FILE TO MOVE?›- Ź0 æ0­|ÉDšL¾% <.¢F},©^ °1 70 æ0 Ņ.Š©@Lä#¢ č.¢©B©J é1©  ¢„D„E­H­I©B Vä ĄˆšLš1Ī ¢,©} °1 70,õL.¢   ­ Š ī G}˜J©B©| ,#P©² #D˜E é1 ¢ ©ŁHŠŁIš© B„D„E¹HH¹II é1© B é1­ Š¢,©^ °1 70,õ0La-¢© B Vä,#PH}¢,©^ °1 70 æ0Lģ#L!„š©-¢* °1©P¢* °1 y0ÉYŠj©…ž©…©3…­å8鍭ęé3©©}m©m­Ķ Šå­Ķ°Ż­Š©I}}Ķ`­8é}­é`©ō…©…©ś©`½|čÉ*š É?š ɛšÉ,Šģč`č½|É:ščč ¹-)Ż|ŠČ襊ņ© ¢/ °1L!`DESTINATION CANT BE DOJ}S.SYS›0© ¾ Ź0­žH®©›{ 2ĆŽÄą4°Ī” 2ÅŽĘ8ķƍó/ŠķÄ°L!ų/Ą›š) 2āŽć ćšĪ Ą›š 2 æ0ąŽį įšĪ¾©žK}hÉAŠĪž¢©B,ž0©Š© J é1© B©ĮD©E©H©I,ž©H©ĆD©E é1¢©łH©IžHŠžI­ĆD­ÄEL“SAVE-GIVE L}FILE,START,END(,INIT,RUN)›©›¢O¤Źś©õ S0 ¶1`©B©¤D©E©PH©I¢ V䡀ŠĪõ`©õ S0­H÷ ¶1­õ ’L!­÷ÉM}0 ©Ŗ¢0 °1L~0­¤`PLEASE TYPE 1 LETTER›,õ0`hhL! 70¢ Ų1Lć0©¬®L<1¬®© ½¤É,š;ɛš7½„É,š"ɛš©:Ż¦š1Ż„ŠĪ½¤ÉN}A"©D™|ČĪĪŻ¤šķĪ©D™|Č©:™|Č©ž½¤™|čČɛš,É,š(É/š+É.Š©ĪŽ©¢1 °1Īõ½¤čÉ,šɛŠōŽŒ`½¤žč½¤™{čéNAMEO} TOO LONG›© B¢ V䡀ŠL!` ¦L¶1©ŖI© H©1E©ĪDLž1œ©|mD©iE` Vä˜0`˜8éd¢/č8é śi:2Ž2¢2© °1 ’LP}!ERROR- 144›©©®½¤īɛš+É,š'  20* ..ˆö ĪÓ©r¢2 °1Īõ`Ø­®`©‚¢2ŠėTOO MANY DIGITS›INVALID HEXAQ}DECIMAL PARAMETER›8é00É 0 8éÉ 0É0©’É`,õ0'®½¤čÉDšų8é0š0É H½¤čÉ,šɛŠōŽh`Īõ©š¢2L°1NEED D1 THRU D8›ąįuR} ECIMAL PARAMETER›8é00É 0 8éÉ 0É0©’É`,õ0'®½¤čÉDšų8é0š0É H½¤čÉ,šɛŠōŽh`Īõ©š¢2L°1NEED D1 THRU D8›ąįu’’²­Š)š ©!©"`ūó3ö!£ö3ö<öLäóī!¬!ĄwŠ ©!©ä"¹; `POKE 710,0:POKE 709,0:POKE 712,0›DIM SPQP$(1)›IF STRIG(0)=0T} OR PEEK(764)<255 THEN INPUT SPQP$:RUN"D:MENU"›RUN"D:TITLE"›āćąį10,0:POKE 709,0:POKE 712,0›DIM SPQP$(1)›IF STRIG(0)=0H72BDĢFLASČÉĮDISK¤B™h@@6@((d?„;@@,?6„.(# DISK DS#1 ## ćļķšõōåņ ćņé V}ćėåō #fS +@‚1AR@S6€-F:A`,%AV$F:Aa,i{AY'AA W}9A KA@(]A@oA@R{6-n;€%@@p+‚-@@ X}&/"ƒ7€%‚ƒ; ‚s116,6,6,7,6,6,6,6,6,6,6,2,2,2,2,2,2,2,2,112,2›xE€%@'@e.€%@(F:A`,E€%@) Y}F:Aa,‚((( šõāģéć  äļķįéī  óļęō÷įņåŒ(( ŌČÅ ŠĮĒÅ ¶ ĢÉĀŅĮŅŁ‘(####################–(„› Z}(####################¢A-@A('The PAGE 6 Library consists of programs¤..(& collected from Users and U [}ser Groups¦//(' in the U.S.A, Australia and Gt.BritainØ//(& and to the best of our knowledge allŖ//(' program \}s are in the public domain¾.-@ @.(ŠŅÅÓÓ ÓŌĮŅŌ ĘĻŅ ĶÅĪÕĆAY@4Č5B2y!AU ]}5‚-@@PŅ#F:B2y,"@#%D:MENUÜ ‚6-@& A€D2:TITLE!AU h !aM\MIDCOĢBAKCOĢTITCOĢDĢUPPEŅADŁKEŁÉA€_}@CRICKET MENU V1› 36€-@6-@P'6‚-@B36„-@##@@K:( A`}A2##(@ computer cricket4##(@ 7‡-@@2(@1) INSTa}RUCTIONS=(@\(@ 2) PLAY CRICKETg(@‡(@ 3) AMEND RATINGS<+(@+(@ 4)b} NEW SERIESK<)@†6†-†&@H<† )†!@@uP''†A@‚@„@†R%D:CRICKc}ET1.BAST% D:RATINGS.BASV% D:SERIES.BASd; A@+@)A;A @nF-@@ d}F(@# FLIP DISK AND HIT RETURNx$)@†$†AUA ‚% D:DISPLAY.MANŒl ‡-@e}@6?P<2A@‡@ ‡b2l Aēč›ņ/ +@/6ƒ-F:f}A`,%AV$F:Aa,ü+ƒ%@@q+ƒ%@A@'AA„'A ‚$€D2:g}MENU,%AV$F:Aa,ü+ƒ%@@q+ƒ%@A@'AA„'A ‚$€D2:ĶćĢÄ%%###############################›%%# COMPUTER CRICKET #›%%# PART 1: SETi} UP DISPLAY LIST #›%%# by K. J. Bricknell #›%%# Published by Atari Computer #›%%# Enthusiasts (N.S.W.) j} #›%%# February 1985 #›%%###############################› I€-ADAs"!€% €7Ak}AIA@ll72,138,72,174,244,6,189,238,6,141,10,212,141,24,208,232,224,6,144,2,162,0,138,141,244,6,104,1l}70,104,64›%€-A6A•"!€% €(mm112,112,112,70,64,152,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,130,2,2,2,6,6,65,m}32,152,112,112,112,70,64,152,6›2nn6,134,130,130,130,130,130,130,130,130,130,130,130,130,130,130,130,130,130,2,6,6,65,32,152n},112,112,112,70›<oo64,152,6,130,2,2,2,130,130,130,130,130,130,130,130,130,130,130,130,2,2,2,2,134,6,65,32,152,112,112,112,7o}0›Fnn64,152,6,130,130,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,65,32,152,112,112,112,66,64,152,2,2,2,2,2,2,2,2›P552,130,13p}0,2,2,2,2,2,2,2,2,2,2,130,130,65,32,152›Zp (}A -A?-@@p(ENTER >:@4,q} D:PLAYERS.LST>:@4,d[-@@(RUN/-@6( HAB@[D:CRICKET2.BAS€r}D:CRICKET1.BAS>:@4,d[-@@(RUN/-@6( HAB@[D:CRICKET2.BAS€ĪĻ?ŲiīiRAMTOŠPMBASÅĮĢÄLĢNATION¤NATION1¤NATION2¤PLAYER¤BLINE¤PART¤TEMP¤R¤BAR¤TEAM1¤TEAM2¤TEMPERFØC1±C1²C1³C2±C2²C2³INNIt}NGÓOUŌOVERBALĢBAT±BAT²BAŌBOWĢSWAŠPARTRUNÓŠDLŠĀESCLINÅCHECĖCČCURSOŅCÉCŌCĀOVERUNÓPLAYDAT±PLAYDAT²u}€€€€ € € € € €€€@v} !"w}#$%&'()*+,-%%###############################x}›%%# COMPUTER CRICKET #›%%# PART 2: MAIN PROGRAM #›%%# by K. J. Bricknell #›%%# Publisy}hed by Atari Computer #›%%# Enthusiasts (N.S.W.) #›%%# February 1985 #›%%######################z}#########› nAB@,6€-F:A,&@8A€B+NBBy€\6-€$AVnA#@Ž#{}@@K:5AR@GAY@‚@\(u(Ž(| ĆĻĶŠÕŌÅ|}Ņ ĆŅÉĆĖÅŌ |h(| āł Ė®Ź®Āņéćėīåģģ |5(8(N( ĻLoad old gameQ(h( ĪStart new game(8 @@}})@‚8‚ @x)‚!@y@@2o B(!( Standby...9ƒ-%A„%A$EƒI ƒU6„-~}@Hiƒ-B2HB2Qoƒ„<q6„-„%@2 ƒ!6„-Av5ƒ-B2RB2U;ƒ„I6„-„%@M ƒaƒ-B2VB}2Ymƒ@q ƒF]B2`AU5ƒ-%A„%A–A(M…-ƒ%@ƒ%@'Y…AU] …P/…-ƒ%A€}ƒ%A'…AU+ …/ ƒZ]ƒ-@(A-%A%ƒA(C%A„%ƒ@dY%Ah%ƒ@}] ƒdhh†;@,‡;@,ˆ;@,‰;@,Š;@@,‹;A@,Œ;A@,;@,Ž;@@,n]&;A@,‚};A@,‘9@a,.6. ?67A@,. N67@,.]6.>:AU,xpƒ-@@267Av%ƒ$@,.|ƒ}6 ƒ<6.B6Œ.Y6‹.7@<A@,p6Š.7@<@@,‚h 6Ž.6Ž7@@,.+6Ž7@,.Ž7‚"@xI-@„}@^(Š7@<@,h A1pŒ>/@@D:SAVEGAME.DAT>@‡ˆ–9ƒ-@AA…}A(,@Œ567ƒ,.Œ9 ƒ 9ƒ-@AAA(,@Œ567ƒ,.Œ9 ƒ“..@’“”•–—˜™š†}›œ‚žŸ ¾Rƒ-@a$@„-6‘8ƒ,-„1 ƒ<@F A€R6”-AUȄ +@A ‡}1ACAApU-@@p(@ JUST A SEC...„ƒ-@(AŅ|%Ah%ƒˆ} ƒ/AV@>( GOTO 2490PAVW( iAB@|D:CRICKET4.LST܁AY(‰}}-A`?Aa@K6¢-AC]AtA`oA€Aa@ęA @Š}'AA@9AA"KA]AR@o@‚ƒ-%A„%A–A(š‹}s…-ƒ%Aƒ%A'…AU+ …/ ƒCƒ-@(@™Y%A%ƒo%A„%ƒs ƒśBB†Œ}A’$ T:,A`aAY5ƒ-%A„%A–A(M…-ƒ%Aƒ%AY…}] …a ƒGƒ-@(A-%A%ƒA(C%A„%ƒ@dG ƒ"2 #A!ƒ-A6Ag%"„Ž}+ƒ„/ ƒ2$,UU112,112,112,70,64,152,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,130,2,2,2,6,6,65,32,152›6™@AP@u}ƒ-@@G7ƒ$@`&@I<ƒ$@`&@F,4ĪļōU¢%ƒA0k¢%ƒ%@A0u A@J ƒTU}At'AuA@9AvA`KAa@U A^5œ&›"@¢%›A05¢%œ%@‘}A0hYœ&›"@#At5AuA@GAvA`YAa@rYœ&›!@¢%›A0’}5¢%›%@A0C¢%œA0Y¢%œ%@A0|}œ&›!@#At5AuA@GAv“}YAwA@kAxA`}Aa@†gA“#ƒ-AA)ƒ”- ƒ?B2w@Q”}AY@Fc-@"g(‡Xƒ-@@+-ƒ%@T(7ƒ$@`&@Y<ƒ$@`&@ ,X •}ƒšS-@)@5(Åųōņįó7Aa<Ac,G-@ @S(ļöåņó ¤1ƒ-AdAe-(>:@:7ƒ,,%A$–},1 ƒ®N-@0@)ƒ-AfAg?(>:@:7ƒ,,%A$,C ƒN( ęļņ ø1ƒ-AhAp-(>:@:7ƒ,,%A—}$,1 ƒĀ8-@8(  Ņõī ņįōåŗ7Aq<At,ĢM˜"@!-@@M( Ņõī ņįōå ņåńõéņåäŗ˜}7Au<Ax,Ö4-@@ *(WORLD SERIES CUP4 A`ą˜@Apźo6”-6£-/ƒ-™}@@_7ƒ$@`&@I<ƒ$@`&@F,4Īļōe6”-ƒo Aō ƒ Apž…”"@¢%”A0š}3¢%”%@A0EAtWAuA@iAvA`{Aa@… ApYƒ-”%@@›}I7ƒ$@`&@I<ƒ$@`&@F,4ĪļōO6£-ƒY A@} ƒ¢%”A0+¢%”%@A0=Atœ}OAuA@aAvA`sAa@} Ap£&”"@¢%”A05¢%£%@A0G}AtYAuA@kAvA`}A€Aa@&Y£&”!@¢%”A05¢%”%ž}@A0C¢%£A0Y¢%£%@A00}£&”!@#At5AuA@GAvYŸ}AwA@kAxA`}Aa@:gA–#ƒ-AA)ƒ—- ƒ?B2w@QAY }@Fc-@"g(ˆDXƒ-@@+-ƒ%@T(7ƒ$@`&@Y<ƒ$@`&@ ,X ƒNS-@)”}@5(Åųōņįó7Aa<Ac,G-@ @S(ļöåņó X1ƒ-AdAe-(>:@:7ƒ,,%A$,1 ƒb¢}N-@0@)ƒ-AfAg?(>:@:7ƒ,,%A$,C ƒN( ęļņ l1ƒ-AhAp-(>:@:7ƒ,,%A$,1 ƒ£}v8-@8(  Ņõī ņįōåŗ7Aq<At,€4-@@ *(WORLD SERIES CUP4 A`Š› (}B2w¤}-BB†@d?A`@2QAa@eAt“&@wAuA`‰AvA@›A„}R@”.‡7@<@,4N.AvžŸA€'Aa@9A@KA ¦}@WA”iA{@‚@AY@4ŸBB†A’Ø…-J( āįōóķå§}īš 7›$@`&@Y<›$@`&@P,\-@)…(7œ$@`&@Y<œ$@`&@P,²J-@J(Ø} āļ÷ģåņš 7ž$@`&@Y<ž$@`&@P,¼}!-@ $+˜ @,@ I(ļöåņšA:7Ad<Ae,,%@o©}-@%@ $+˜ @,@ }(ņõīņįōåšĘ_(7Aq<At,$˜"@6-@ @ _(ņõīņįōå ņåńéņåäšŖ}7Au<Ax,Š$ŚT-@( .-@(5( ;"›M-@T(*ä" "œ-@(«}"(*ī$ųy-@ >(7›$@`&@Y<›$@`&@P,P-@)y(7œ$@`&@Y¬}<œ$@`&@P,$ F:Ad,"@(' ¤WR:,"@$6„-@0@…¦<@„§C( ­}K6§-§&ØQ§ ©W6§-© WR:,"@$6„-@0@…¦<@„§C( K6§-§%ØQ§!ŖW6§-Ŗ*O"T:,"®}*”"@.6„-:@…¦F@„§L( O$4O"T:,"*„"@.6„-:@…¦F@„Æ}§L( O$>ƒ-@ ƒH#@…¦@„§#(ŸRDƒ-@ ƒ'@…¦3@„°}§:( D A€\ +B2w1AYCBB†@dUAR@g@‚@y±}A @‹A@6Atf“AuAd'Av9Aw@8KA€²}]Aa@oA`A(Aa@“AY@4p3BB†A’!6¤-A@3-@³}zo$(Ž7@<@1,N(%|±|Display scoreboard: |o(Ž7@<@1,„N-(%|²|D“}isplay scoreboard: |N(Ž7@<@1,ŽI(|³|‚"AU?( End-of-game options µ} |I A 0˜((( Select bowler next over |¢q$(Ž7@<@1,N(%|“|Richie Benaud's summary ¶} |q(Ž7@<@),¬P-(%|ÅÓĆ|Save game to disk |P(Ž7@<@),¶·}-@'@(‡+-@'@/(ˆ;6¦-@G6©-@S6Ŗ-@_6Ø-@k6§-@w6”-@ A€ø}6”-Ą!!§"@*‚"AUAŹ§"@ A@$Ō-§"@ A # A- A`Ž-§"¹}@ A # A€- A`čk A0-@@E(Ž7@<@&, k(!|Fall of wickeŗ}t | ±° |ņ@-@@(‡+-@5@@(7A<A ,ül-(%»}B(7A€<A,l(%l-(%| ± | ² | ³ | “ | µ | ¶ | · | ø | ¹ |W(%¼}l(7A€<A,j-(%T(!|Fall of wicket ½} | ±° |f-@@!j(ˆP-@5@!*(7A<A ,P(Ž7@<@&, $ T:¾},"A. R:,"@A P8 A`Bf A0-@@<(Ž7@<@5,f(æ}%| Ņõī ņįōåó                         |LJ (Ž7@<@5,J(%VV,(| Ą} |7A!<A@,V(%`W-(%| | ± | ² | ³ | “ | µ |W(%|Į} | ° | ° | ° | ° | ° |j--(%tV,(| |7A!<A@,Ā}V(%~1-@@(‡,-@@!1(ˆˆ T:,"A’Ć} R:,"@A Pœ A`¦l A0 A)-@@:ƒ-@B:‡,P(>:@:‡7ƒ,,%A(,TÄ} ƒ`6£-l6„-°˜"@6„-@0ŗKƒ-@&@+@‚ƒ7-ƒ@K…-@@Å}ÄLL‘8£%„,")+„"*£%„"@0,)+„"@0*£%„"@`,ApĪ77(7‘8£%„,$@`&@Y<‘8£%„,$@`&Ę}@P,Ųx6‹7@<@,. E6‹7@<@,.=:‘8£%„%@,,Y”-@@q(>:@:‹7”<”,,%A(,u Ē}”x(āTF(7‘8£%„%@,$@`&@Y<‘8£%„%@,$@`&@P,T6£-£%@ģ  … ƒö T:,"Č}A4R:,"@*@‚@4 A P  Apb A-@@0ƒ-@B:ˆ,F(>:@É}:ˆ7ƒ,,%A(,J ƒV6£-b6„-@0˜"@6„-(Kƒ-@&@+@‚ƒ7-ƒ@Ź}K…-@@2LL‘8£%„,")+„"*£%„"@0,)+„"@0*£%„"@`,A€<77(7‘8£%„,$@`&@YĖ}<‘8£%„,$@`&@P,Fx6‹7@<@,. E6‹7@<@,.=:‘8£%„%@,,Y”-@@q(>:@:‹7Ģ}”<”,,%A(,u ”x(PTF(7‘8£%„%@,$@`&@Y<‘8£%„%@,$@`&@P,T6£-£%@Z  … ƒd4R:Ķ},"@*@‚@4 A Pn A€xU@‚'-@U(( Šįņōīåņóčéšóŗ          Ī}                ‚Y(Ž7@<@@,-ƒ-@@Y('            ŒL/(' ŽĻ}ŽŽ ŽŽŽ ŽŽŽ3 ƒI(Ž7@<@@,L$–@ƒ-@@"#-ƒ9(Š7@<@@,= ƒ@$ @Š}/@@D:SAVEGAME.DAT@(@‡ˆŖ[ƒ-@AA(9(@7ƒ<ƒ%A',= ƒ[(Ń}@7AA<A@,“kƒ-@AA(9(@7ƒ<ƒ%A',= ƒk(@7AA<A@,’“Ņ}”•¾00(@–—˜™š›œ‚Čg(@žŸ ,ƒ-@a<(@‘8ƒ,@ ƒKÓ}@]AdAUg A`Ņuƒ-@@@+-@ƒ@(Š7@<@1,D ƒV-@@c(Ō}New gameu-@@ÜO( Print summary!6Ŗ-@-6§-@96”-@C A€O6”-ꁧ"@,AÕ}F:A,%@7@IAR@[A^n( }Standby...%D:CRICKET1.BASš +@Ö}A 1ACAA%U-@@m(@ STANDBY...AV@śP( GOTO 1×}540$AV+( =AB@PD:CRICKET5.LST— (}AY-A`@d?Aa@Ų}SAt—&@gAu–%@yA€‹Aa@—A–A @'AŁ};ƒ-AAAƒ—E ƒWBB†A’iB2w@{AY@FAR@\@‚@Ś}'-@!+(ˆ=-@@\("e-@@4(|OVERS|MAIDS| RUNS |WICKŪ}S|F-@@e(,†-@@)ƒ-@@†(7ƒ$@`&@Y<ƒ$@`&Ü}@P, 7ƒ$@`&@<ƒ$@`&@, 6Œˆ(7ƒ$@`&@<ƒ$@`&@ , 7ƒ$@`&Ż}@<ƒ$@`&@, 7ƒ$@`&@<ƒ$@`&@,Œ ƒ@y-@@'( Select bowler36¦-@Ž}?6©-@K6Ŗ-@W6Ø-@cž"o6§-@y A J6§-ž%@6‚-žT%6”-@ A€%6”-ß}^6ž-§&@h==7ž$@`&@<ž$@`&@,010*‚žA€r‚"žAp|p-@@(ą}Š+-@@9(>:AS,C A#`\( has bowled 10 oversf A$ p A$ †d-@@$(>:AS,Šį}6-@@P(Select another bowlerZ A$ d A -@@(ŠšW-@@!#(bowler -ā} A#`?-@!@!M(strike W A#€¤ T:,A®AY$øƒ-@@ć}D7ƒ$@`&@<ƒ$@`&@,4 q67ƒ$@`&@<ƒ$@`&@,.Fw6›-ƒ A@Ā ƒĢ2267ä}ƒ$@`&@"<ƒ$@`&@ ,. 0ցƒ-@@D7ƒ$@`&@<ƒ$@`&@,4 q67ƒ$@`&å}@<ƒ$@`&@,.Fw6œ-ƒ Apą ƒź5267ƒ$@`&@"<ƒ$@`&@ ,. 05$ō 6Ÿ-(ŸžŸ"ę}6-› A 6-œ$' 6Œ.6.6.Œ6†.ˆ!6ˆ.‡'6‡.†&9 6©-•6•-’6’-©6©-–!6–-“'6“-©-6©-—36—ē}-”96”-©0$:Q6ƒ-A:7Af<Ag,,+6ƒ-ƒ%@7ƒ @Q67Ag<Ag,.=:ƒ,D)ƒ!@ )67Af<Ač}g,.=:ƒ,N$X_17ž$@`&@<ž$@`&@,4 _67ž$@`&@<ž$@`&@,. 0by16ƒ-A:7žé}$@`&@<ž$@`&@,,?6ƒ-ƒ%@Kƒ @y67ž$@`&@<ž$@`&@,.=:ƒ,l=ƒ!@ =ź}67ž$@`&@<ž$@`&@,.=:ƒ,v$€E6ƒ-A:7Ad<Ae,,+6ƒ-ƒ%@E67Ad<Ae,.=:ƒ,Š‡7ė}ƒ"@)ƒ"@ )ƒ"@0)ƒ"@@)ƒ"@P‡67A%+ƒ'@,$@<A%+ƒ'@,$@,.7Ah<Apģ},”$ž_17ž$@`&@<ž$@`&@,4 _67ž$@`&@<ž$@`&@,. 0Øy16ƒ-A:7ž$@`ķ}&@<ž$@`&@,,?6ƒ-ƒ%@Kƒ @y67ž$@`&@<ž$@`&@,.=:ƒ,²=ƒ!@ =67ž$@ī}`&@<ž$@`&@,.=:ƒ,¼$Ę_17ž$@`&@<ž$@`&@ ,4 _67ž$@`&@<ž$@`&ļ}@ ,. 0Šy16ƒ-A:7ž$@`&@<ž$@`&@ ,,?6ƒ-ƒ%@Kƒ @y67ž$@`&@ <ž$@`&@ š},.=:ƒ,Ś=ƒ!@ =67ž$@`&@<ž$@`&@ ,.=:ƒ,ä$īK6ƒ-A:7Ah<Ap,,%6ƒ-ƒ%„1ƒ @ń}K67Ap<Ap,.=:ƒ,ų3ƒ!@ *ƒ A367Ai<Ap,.=:ƒ,)ƒ!@™)67Ah<Ap,.=:ƒ, $ņ}a27$@`&@"<$@`&@ ,4 a67$@`&@"<$@`&@ ,. 0 s16ƒ-A:7$@`&@"ó}<$@`&@ ,,96ƒ-ƒ%„Eƒ @s67$@`&@ <$@`&@ ,.=:ƒ,*Gƒ!@ *ƒ AG67$@`ō}&@!<$@`&@ ,.=:ƒ,4=ƒ!@™=67$@`&@"<$@`&@ ,.=:ƒ,> 6 - %„$Ha27ž$@`&õ}@<ž$@`&@,4 a67ž$@`&@<ž$@`&@,. 0Rs16ƒ-A:7ž$@`&@<ž$@`&@ö},,96ƒ-ƒ%„Eƒ @s67ž$@`&@<ž$@`&@,.=:ƒ,\Gƒ!@ *ƒ AG67ž$@`&@<ž$@`÷}&@,.=:ƒ,f=ƒ!@™=67ž$@`&@<ž$@`&@,.=:ƒ,p$z_17$@`&@<$@`&@ų},4 _67$@`&@<$@`&@,. 0„y16ƒ-A:7$@`&@<$@`&@,,?6ƒ-ƒ%@Kƒ @ł}y67$@`&@<$@`&@,.=:ƒ,Ž=ƒ!@ =67$@`&@<$@`&@,.=:ƒ,˜$¢_17$ś}@`&@<$@`&@,4 _67$@`&@<$@`&@,. 0¬y16ƒ-A:7$@`&@<$@`&ū}@,,?6ƒ-ƒ%@Kƒ @y67$@`&@<$@`&@,.=:ƒ,¶=ƒ!@ =67$@`&@<$@`ü}&@,.=:ƒ,Ą$ŹQ6ƒ-A:7Aa<Ac,,+6ƒ-ƒ%@7ƒ @Q67Ac<Ac,.=:ƒ,Ō3ƒ!@ *ƒ Aż}367Ab<Ac,.=:ƒ,Ž)ƒ!@™)67Aa<Ac,.=:ƒ,č$ņa27$@`&@<$@`&@,4 ž} a67$@`&@<$@`&@,.0 üm16ƒ-A:7$@`&@<$@`&@,,?6ƒ-ƒ%@m67$@`’}&@<$@`&@,.=:ƒ, $ Y6ƒ-A:7Ad<Ae,,76„-A:7Ah<Ap,,?6…-„'ƒY67Aq<At,.=}:…, $$ %6ƒ-@P&A:7Ad<Ae,,U6„-A:7Ah<Ap,,&A:7Ah<Ap,,g6…-+„'ƒ,%?67Au<}Ax,.=:…,. $8 K”-@ H7ž$@`&@Y%”<ž$@`&@Y%”,4 K$B >7(>:@:7ž$@`&@Y%”}<ž$@`&@Y%”,,,; ”>$L K”-@ H7$@`&@Y%”<$@`&@Y%”,4 K$V >7(>:@:7$@`}&@Y%”<$@`&@Y%”,,,; ”>$` K”-@ H7„$@`&@Y%”<„$@`&@Y%”,4 K$j >7(>}:@:7„$@`&@Y%”<„$@`&@Y%”,,,; ”>$t ”-@ ”$~ x<67›$@`&@I<›$@`&@7},. Īļō ļõō     u67œ$@`&@I<œ$@`&@7,. Īļō ļõō     x$ˆ 36„-@$™&@%˜"@36„-„%}@0’ = 6‘8„,-›6‘8„%@,-œ.6‘8„%@,- :6 -=$œ !AB@!6˜-@¦ u A 6Ÿ-}6-›+6š-76™-Q67Ad<Ae,.0 ]6ž-i6‚-u6 -° i67Af<Ag,. 086}7Ah<Ap,. 0S67Aa<Ac,. 0_˜"@i A#@ŗ kAB@'@w36«-W }7Ad<Ae,40 )”"AUa A`k A%0Ä ,R:,"@" A`, A%0Ī T:,A }%Ų A@ā  AP A0ģ [[6ƒ-A:7$@`&@<$@`&@,,$A:7ž$@`&@<ž$@`&@ },,ö 86…-P:H:,$ƒ%@,8…"P:ƒ'@,A%p A(€ ]6™-™%@6š-š%@) A"3 AP }= A$@]-@š$@%+š&@, CC67Aw%+™$@,<Ay%+™$@,,.7Ah<Ap, M)( Āįģģ  }>:š%A(%@H,  3 A#`=( to G A#€M( ( /%6…-P:H:,$@5%@,/ A6 2 … @&}A&@< ‚267$@`&@6<$@`&@4,.Ā‚67$@`&@3<$@`&@$,.7ž$@`&@Y<ž$@`}&@P,F ! A€ A1p! A'PP … @A&€Z ¤%6„-P:H:,$@,%@T67$@`&@I}<$@`&@G,.Ƥ67$@`&@F<$@`&@7,.7„$@`&@Y<„$@`&@P,d ‚267$@`}&@6<$@`&@4,.Ā‚67$@`&@3<$@`&@$,.7ž$@`&@Y<ž$@`&@P,n ! A€} A1! A'Px … @A' ‚ k<67$@`&@I<$@`&@7,. ĢĀ×         k67$@`&@6}<$@`&@4,.ĀŒ SS67$@`&@3<$@`&@$,.7ž$@`&@Y<ž$@`&@P,– ! A€ }A20! A'P  … @A'@Ŗ P<67$@`&@I<$@`&@7,. Ņõī ļõō     F A2PP A'P“ F<}67$@`&@I<$@`&@7,. Óōõķšåä     F A2p¾ ! A$ !™@A'€Č 7 A  AP! }A# -˜"@7 A#@Ņ Z A€F67$@`&@I<$@`&@7,. Īļō ļõō     P A$ Z A(PÜ G }"›6›-œ6-› AP) A`3 A€= A0G A(ę  AP6-œ A`š #š@ A$ # A%@}ś e6š- A€# A - AP7 A# [˜"@*7Ad<Ae,050e A#@ «" A} 17Ad<Ae,050' A$ 1 A$ M˜@ A$0# A$@- @p96˜-@C A M A}$p" 9˜@ @%6˜-@/ A 9 A$p, ?+7Ah<Ap,47Ah<Ap,5 A$@? A`}6  A$@ A@ ]%6…-P:H:,$@U%@,/ A"=6š-š%@]-@@$š%+š&@,J M)( }Āįģģ >:š%A(%@H,  3 A#`=( to G A#€M( T …!@%A) ^ ! A4` A6 ! A0}h …!@5A)@r m A4p6„-@# A 0- A p7 A6 A A! O6«-«%@Y A€c A0m }A0| …!@BA)`† Y A4€6„-@# A 0- A p7 A6 A A! O6«-«%@Y A0 …}!@FA)€š m A46„-@# A 0- A p7 A6 A A! O6«-«%@Y A€c A0m A0 }¤ …!@IA0® c A56„-@# A 0- A p7 A6 A A! K A!pY6«-«%@c A0ø !}…!@PA0 Ā c A506„-@# A 0- A p7 A6 A A! K A"Y6«-«%@c A0Ģ "}…!@RA0@Ö U A5p6„-@# A 0- A6 7 A"PA A€K A0U A0ą …!@SA0`#}ź U A5€6„-@# A 0- A6 7 A"PA A€K A0U A0ō …!@TA0€ž K A56„$}-@# A 0- A6 7 A"PA A! K A0 A A66„-@# A 0- A6 7 A"PA A! %} i˜"@)6ƒ-A:7Ah<Ap,,C6…-A:7Ah<Ap,,Iƒ!…S A$0_6„-A#i A0 #š@ A$ &}# A%@& K+˜"@*ƒ"…*7Ad<Ae,4495 A$0A6„-A#K A`0 e6š- A€# A -'} AP7 A# [˜"@*7Ad<Ae,050e A#@: «" AD 17Ad<Ae,050' A$ (}1 A$N O˜@ A$0%6„-A#/ @p;6˜-@E A O A$pX # A$06„-A## A)}b „AY'A`A(9Aa@KA@R]A @oAtAu*}AP“Av„Aw@Rl ŒA€'Aa@9AY@4KBB†A’]-@+}@o-@@Œ(Ž7@<@,v 'ƒ-@@#(||' ƒ€ ‡ (Ž7@<@,,}2-@@?(to playQ-@@n(Ž7@<@,‡(|  Ōåįķó ōļ šģįł   |Š k (Ž7@-}<@,9(R(| |±|AUSTRALIA |k(| |²|WEST INDIES |” g(| |³|PAKISTAN |5(| |.}“|ENGLAND |N(| |µ|INDIA |g(| |¶|NEW ZEALAND |ž ˜(.@‚@:6”-@/}F6§-@R6©-@^6Ŗ-@!j6¦-@v6Ø-@€ A€Ž6‚-§&@˜ A2€Ø Z6ƒ-@&B:‡,0-ƒ'@0}%@@4(‡> A€L6£-§&@Z£"‚A2@² > A3P6ƒ-@&B:ˆ,:-ƒ'@%@@>(ˆ¼ 1}T:,A2`Ę 1AY'BB†@d1 A4 Š O‚"@6‡. AUSTRALIA+6¬-A7@76’-2}A˜C6“-A‚O6”-@(Ś Q‚"@!6‡. WEST INDIES-6¬-A7`96’-@TE6“-@TQ6”-Aä N‚"@3}6‡.PAKISTAN*6¬-A7€66’-AfB6“-AN6”-Aī M‚"@6‡.ENGLAND)6¬-A856’-A4A6“-A4}M6”-Aų K‚"@6‡.INDIA'6¬-A8 36’-A?6“-APK6”-@( Q‚"@!6‡. NEW ZEALAND5}-6¬-A8@96’-ABE6“-ADQ6”-AH $ O£"@6ˆ. AUSTRALIA+6­-A7@76•-A˜C6–-A‚O6—-6}@( Q£"@!6ˆ. WEST INDIES-6­-A7`96•-@TE6–-@TQ6—-A* N£"@6ˆ.PAKISTAN*6­-A7}7€66•-AfB6–-AN6—-A4 M£"@6ˆ.ENGLAND)6­-A856•-A4A6–-AM6—-A> K£8}"@6ˆ.INDIA'6­-A8 36•-A?6–-APK6—-@(H Q£"@!6ˆ. NEW ZEALAND-6­-A8@96•-AB9}E6–-ADQ6—-AHR $\ 9A @'A`@–9Aa@f qAt”&@#Au’5:}A€GAa@[ƒ-AAaƒ”e ƒqA“p 9BB†A’'AY@F9B2w;}@z R (}-@!(‡+6¤-A4PD7@<@,4 H#¬R A4p„ #­Ž >-@@)( T<}ouring party,(>AdAU˜ 3ƒ-@@ (ƒ ,ƒ @3( ¢ L "‰ž.6‹7ƒ$@&@<ƒ$@=},.‰76‘8ƒ,-H6‘8ƒ%@,-žL(‰¬  ƒ¶ >-@!>($SELECT TEAM IN BATTING ORDERĄ T:,">}A5@Ź _ƒ-@ ƒ--@!=( Qƒ-@U ƒ_ A5Ō )-@!@?})( Selected teamŽ >-@!>($HIT esc TO CORRECT SELECTION ERRORSč I6§-@6©-@'6Ŗ-@3@}6¦-@?6Ø-@I A$ ņ ”-@@ü K A€6§-§&@/-@"”%@8(” D” @KA}( tK67”$@`&@Y<”$@`&@P,.‹7§$@&@<§$@,t(7”$@`&@Y<”$@`&@P,mB}467”$@`&@<”$@`&@,.=:‘8§,,m67”$@`&@<”$@`&@,.=:‘8§%@,,66§-§%@-C}@§2(Š7@<@,6 ”$Gƒ-@@+-@ƒ%@4(ƒ @ƒ @G( .0,(‹7ƒ$@&@D}<ƒ$@&@,0 ƒ8O-@!.7@<@,4 E(trig NEXT TEAM O A6`B(trig CAPTE}AINS TOSSL--@ @!-( esc RESELECT TEAMVF:Ad,"@(' ¤` T:,A6pjZ7F}@<@,4  #­16‹7@,. B6‹7A@,. Z6‹7@,.‹7@,tB7@<@,4 & A 8AG}YB A40~UAY'BB†@d;ƒ-@(AQ%Ah%ƒU ƒˆqB2wH} A )+@;A MA_A@q-@’„%(@STANDBY FOR I}THE TOSS7AV@F( GOTO 3600XAV_( qAB@„D:CRICKET3.LST€D:CRICKET2.BASJ}HE TOSS7AV@F( GOTO 3600XAV_( qAB@„D:CRICKET3.LST€D:CRICKET2.BAS1 REM ###############################›2 REM # COMPUTER CRICKET #›3 REM # PART 3: SELECT TEAMS #›4 REM # L} by K. J. Bricknell #›5 REM # Published by Atari Computer #›6 REM # Enthusiasts (N.S.W.) #›7 REM # FebruarM}y 1985 #›8 REM ###############################›3600 POKE 842,12:FOR L=1 TO 61:TEMPERF(L)=0:NEXT L›3610 TEMP$(1,95)=" N}                   ČÅĮÄÓ                   "›3620 GRAPHICS 0:POKE 752,1:POKO}E 709,12:POKE 710,160›3630 POKE 559,34:POSITION 16,6:? TEMP$(1,95):POSITION 10,15:? NATION1$;" will toss"›3640 POSITION 10,17P}:? NATION2$;" call":POSITION 15,19:? "ČHeads":POSITION 15,21:? "ŌTails"›3650 CURSOR=19:CH=14:CT=19:CB=21:CI=2:P=1:GOSUB 7Q}80›3660 IF CURSOR=19 THEN POSITION 15,21:? " "›3670 IF CURSOR=21 THEN POSITION 15,19:? " "›3680 GOSUB 2420:P=INR}T(RND(0)*10+15):B=0›3690 POKE 710,240:TEMP$(46,52)=" ōįéģó ":? "}":POSITION 16,6:? TEMP$(1,95):FOR L=1 TO 3:NEXT L›3700 B=B+1S}:IF B=P THEN 3750›3710 ? "}":POSITION 16,8:? TEMP$(31,37):FOR L=1 TO 5:NEXT L›3720 POKE 710,160:TEMP$(46,52)=" ČÅĮÄÓ ":? "}":T}POSITION 16,6:? TEMP$(1,95):FOR L=1 TO 3:NEXT L›3730 B=B+1:IF B=P THEN 3750›3740 ? "}":POSITION 16,8:? TEMP$(31,37):FOR L=0 TU}O 3:NEXT L:GOTO 3690›3750 IF (TEMP$(47,47)="Č" AND CURSOR=19) OR (TEMP$(47,47)="ō" AND CURSOR=21) THEN POSITION 8,15:? NATIONV}2$;›3760 IF (TEMP$(47,47)="Č" AND CURSOR=19) OR (TEMP$(47,47)="ō" AND CURSOR=21) THEN ? " wins the toss":GOTO 3780›3770 POSITW}ION 8,15:? NATION1$;" wins the toss":TEAM1$(679,679)="F":GOTO 3790›3780 TEAM2$(679,679)="F"›3790 POSITION 8,17:? "Select teamX} to bat first":POSITION 13,19:? "±";NATION1$:POSITION 13,21:? "²";NATION2$›3800 CURSOR=19:CH=12:CT=19:CB=21:CI=2:P=1:GOSUY}B 780›3810 IF CURSOR=19 THEN POSITION 13,21:? " ":GOSUB 2420›3820 IF CURSOR=21 THEN POSITION 13,19:? " Z} ":GOSUB 2420:GOSUB 1820›3830 GRAPHICS 1:POKE 709,0:POKE 710,0:POKE 708,76:POSITION 0,10:? #6;" STANDBY WHILE THE COVERS[} ARE REMOVED"›3840 POKE 656,3:? "GOTO 2460";:POKE 656,0:? " ";:POKE 842,13:ENTER "D:CRICKET4.LST"›3850 END ›HILE THE COVERSl1 REM ###############################›2 REM # COMPUTER CRICKET #›3 REM # PART 4: TEXT SUBROUTINES #›4 REM # !]} by K. J. Bricknell #›5 REM # Published by Atari Computer #›6 REM # Enthusiasts (N.S.W.) #›7 REM # Februar!^}y 1985 #›8 REM ###############################›10 PART$(1)=BLINE$:PART$(21)=NATION1$:PART$(LEN(PART$)+1)=" all out for!_} ":A=VAL(TEAM1$(668,670))›20 PART$(LEN(PART$)+1)=STR$(A):PART$(LEN(PART$)+1)=" in the ":A=VAL(TEAM1$(664,665)):PART$(LEN(PART!`}$)+1)=STR$(A)›30 IF A=21 OR A=31 OR A=41 THEN PART$(LEN(PART$)+1)="st":GOTO 60›40 IF A=22 OR A=32 OR A=42 THEN PART$(LEN(PART!a}$)+1)="nd":GOTO 60›50 IF A=23 OR A=33 OR A=43 THEN PART$(LEN(PART$)+1)="rd":GOTO 60›55 PART$(LEN(PART$)+1)="th"›60 PART$(LEN(!b}PART$)+1)=" over":P=1:GOTO 170›70 PART$(1)=BLINE$:PART$(21)="End of 50th over...":PART$(LEN(PART$)+1)=NATION1$:PART$(LEN(PART!c}$)+1)=" "›80 PART$(LEN(PART$)+1)=STR$(OUT):PART$(LEN(PART$)+1)=" for ":A=VAL(TEAM1$(668,670)):PART$(LEN(PART$)+1)=STR$(A)›90 !d}P=1:GOTO 170›100 PART$(1)=BLINE$:PART$(21)=NATION2$:PART$(LEN(PART$)+1)=" won by "›110 L=VAL(TEAM2$(668,670)):LL=VAL(TEAM1$(6!e}68,670)):A=L-LL:PART$(LEN(PART$)+1)=STR$(A):PART$(LEN(PART$)+1)=" run"›115 IF L>1 THEN PART$(LEN(PART$)+1)="s"›120 P=2:GOTO 1!f}70›130 PART$(1)=BLINE$:PART$(21)=NATION1$:PART$(LEN(PART$)+1)=" won by ":PART$(LEN(PART$)+1)=STR$(10-OUT)›140 PART$(LEN(PART$!g})+1)=" wicket":IF 10-OUT>1 THEN PART$(LEN(PART$)+1)="s"›150 P=2:GOTO 170›160 PART$(1)=BLINE$:PART$(21)=NATION1$:PART$(LEN(PAR!q}Ć;’’’’’’’B%DOS SYSB*)DUP SYSBSAUTORUN SYSB UTITLE B ^MENU B hCRICKET1BASBŲsCRICKET2BASBKCRICKET3LSTB9\CRICKET4LSTBPžCRICKET5LSTBKīRATINGS BASB 9PLAYERS LSTBBCSERIES BASB…SERIES DATB‡SAVEGAMEDATT$)+1)=" drew with ":PART$(LEN(PART$)+1)=NATION2$:P=2›170 B=LEN(PART$):PART$(LEN(PART$)+1)=BLINE$:POSITION 0,20:IF D=123 THEN!r} OUT=OUT+1:GOSUB 2440:OUT=OUT-1:D=0›180 ? BLINE$:FOR L=1 TO B:POSITION 20,20:? PART$(L,L+19);:SOUND 0,47,10,14:IF STRIG(0)=0 !s}THEN POKE 559,0:GOTO 200›190 A=1^1:SOUND 0,64,10,14:A=1^1:NEXT L:GOTO 180›200 SOUND 0,0,0,0:IF P=1 THEN RETURN ›210 SOUND 0,0!t},0,0:IF P=2 THEN A=255:GOTO 860›3170 RESTORE 3300:GOSUB 3290:GOSUB 3350:PART$(LEN(PART$)+1)="Ā":GOSUB 3370:D=LEN(PART$)›318!u}0 PART$(LEN(PART$)+1)=" for ":GOSUB 3390:RETURN ›3190 RESTORE 3310:GOSUB 3290:GOSUB 3350:PART$(LEN(PART$)+1)="Ć"›3200 FOR A!v}=0 TO 9:IF TEAM2$(D*60-59+A,D*60-59+A)=" " THEN 3220›3210 PART$(LEN(PART$)+1)=TEAM2$(D*60-59+A,D*60-59+A):NEXT A›3220 PART$(L!w}EN(PART$)+1)="Ā":GOSUB 3370:D=LEN(PART$):PART$(LEN(PART$)+1)=" for ":GOSUB 3390:RETURN ›3230 RESTORE 3320:GOSUB 3290:GOSUB !x}3350:PART$(LEN(PART$)+1)="ĢĀ×to ":GOSUB 3370:D=LEN(PART$)›3240 PART$(LEN(PART$)+1)=" for ":GOSUB 3390:RETURN ›3250 RESTORE !y}3330:GOSUB 3290:GOSUB 3350:PART$(LEN(PART$)+1)="Ņõī ļõō ":D=LEN(PART$):PART$(LEN(PART$)+1)=" for "›3260 GOSUB 3390:RETURN ›3!z}270 RESTORE 3340:GOSUB 3290:GOSUB 3350:PART$(LEN(PART$)+1)="Óōõķšåä ":D=LEN(PART$):PART$(LEN(PART$)+1)=" for "›3280 GOSUB 33!{}90:RETURN ›3290 A=INT(RND(0)*6)+1:FOR B=1 TO A:READ PART$:NEXT B:? PART$:RETURN ›3300 DATA He's out!,He's gone!,He's bowled h!|}im!,That's it! Clean bowled!,There's an appeal!,He's missed it!›3310 DATA He's out!,He's gone!,It's in the air!,That's it! He!}}'s caught!,An appeal!,Well caught!›3320 DATA An appeal for LBW!,He's missed it!,He's gone...LBW!,He's out!,It's hit the pads!!~},And he's out LBW!›3330 DATA Runout!,There go the bails!,There's a mixup!,It's a runout!,He's gone...run out!,He'll never mak!}e it!›3340 DATA He's out of the crease!,The bails fly!,He's out!,That's it! He's stumped!,He's gone!,A loud appeal!›3350 PART!€}$="":PART$(1)=BLINE$(1,38):FOR A=0 TO 9:IF TEAM1$(BAT*60-59+A,BAT*60-59+A)=" " THEN RETURN ›3360 PART$(LEN(PART$)+1)=TEAM1$(B!}AT*60-59+A,BAT*60-59+A):NEXT A:RETURN ›3370 FOR A=0 TO 9:IF TEAM2$(BOWL*60-59+A,BOWL*60-59+A)=" " THEN RETURN ›3380 PART$(LEN!‚}(PART$)+1)=TEAM2$(BOWL*60-59+A,BOWL*60-59+A):NEXT A:RETURN ›3390 IF VAL(TEAM1$(BAT*60-22,BAT*60-20))<10 THEN PART$(LEN(PART$)!ƒ}+1)=TEAM1$(BAT*60-20,BAT*60-20):GOTO 3420›3400 IF VAL(TEAM1$(BAT*60-22,BAT*60-20))<100 THEN PART$(LEN(PART$)+1)=TEAM1$(BAT*60!„}-21,BAT*60-20):GOTO 3420›3410 PART$(LEN(PART$)+1)=TEAM1$(BAT*60-22,BAT*60-20)›3420 B=LEN(PART$):PART$(LEN(PART$)+1)=BLINE$:PA!…}RT$(LEN(PART$)+1)=BLINE$:? CHR$(253);›3430 FOR A=1 TO B:POSITION 1,(OVERBALL*2+(OVERBALL-1)+2):? PART$(A,A+37);:IF STRIG(0)=0!†} THEN 3450›3440 NEXT A:GOTO 3430›3450 PART$(D+1)=BLINE$:POSITION 1,(OVERBALL*2+(OVERBALL-1)+2):? PART$(39,76);:RETURN ›3460 R!‡}ESTORE 3630:D=4:GOSUB 3610:RESTORE 3670:D=6:GOSUB 3610:RETURN ›3470 RESTORE 3640:D=7:GOSUB 3610:RESTORE 3680:D=4:GOSUB 3610:R!ˆ}ETURN ›3480 RESTORE 3640:D=11:GOSUB 3610:RESTORE 3690:D=4:GOSUB 3610:RETURN ›3490 RESTORE 3640:D=11:GOSUB 3610:RESTORE 3700:D!‰}=4:GOSUB 3610:RETURN ›3500 RESTORE 3650:D=9:GOSUB 3610:RESTORE 3710:D=4:GOSUB 3610:GOSUB 2420:FOR B=1 TO 8›3510 POSITION 1,(2!Š}*OVERBALL+(OVERBALL-1))+2:? " ":GOSUB 2420›3520 POSITION 1,(2*OVERBALL+(OVERBALL-1))+2:? PA!‹}RT$:GOSUB 2420:NEXT B:RETURN ›3530 RESTORE 3660:D=4:GOSUB 3610:RESTORE 3720:D=3:GOSUB 3610:GOSUB 2420:FOR B=1 TO 8›3540 POSIT!Œ}ION 1,(2*OVERBALL+(OVERBALL-1))+2:? " ":GOSUB 2420›3550 POSITION 1,(2*OVERBALL+(OVERBALL-1)!})+2:? PART$;CHR$(253):GOSUB 2420:NEXT B:RETURN ›3560 A=INT(RND(0)*D)+1:FOR B=1 TO A:READ PART$:NEXT B:? PART$:RETURN ›3570 RE!Ž}STORE 3730:D=4:? :GOSUB 3610:RETURN ›3580 RESTORE 3740:D=4:? :GOSUB 3610:RETURN ›3590 RESTORE 3750:D=4:? :GOSUB 3610:RETURN ›!}3600 RESTORE 3760:D=4:? :GOSUB 3610:RETURN ›3610 A=INT(RND(0)*D)+1:FOR B=1 TO A:READ PART$:NEXT B:? PART$:RETURN ›3620 POSITI!}ON 36,2*OVERBALL+(OVERBALL-1):? TEAM1$(BAT*60-22,BAT*60-20):GOSUB 3770:RETURN ›3630 DATA Backward defence,Forward defence›364!‘}0 DATA Forward Leg glance,Backward leg glance›3650 DATA Pull,Square cut,Late cut,Hook shot,Sweep shot›3660 DATA Straight Driv!’}e,On drive,Off Drive,Cover drive›3670 DATA No run,No score,No result,Nil runs,They play it safe...no runs,No runs in that one!“}›3680 DATA One run,They take a single,A safe single,They take one run›3690 DATA Two runs,They take two,And that's two runs,Ad!”}d two runs›3700 DATA Three runs,There's three in it,They take three,A handy three runs›3710 DATA A beautiful stroke...four ru!•}ns,Umpire Dick French signals a four,A magnificent four!,That's a four!›3720 DATA A magnificent stroke! A six!,Beautifully pl!–}ayed! A glorious six!,No doubt about that one! Six!›3730 DATA Leg bye,That's a leg bye,Umpire French signals a leg bye,A leg !—}bye›3740 DATA Bye,That's a bye,A bye is signalled,A bye›3750 DATA That's a wide,Wide,Umpire French signals a wide,A wide›3760!˜} DATA No-ball,A no-ball is signalled,No-ball says umpire French,That's a no-ball›3770 IF VAL(TEAM1$(BAT*60-22,BAT*60-20))<50 !™}OR TEAM1$(BAT*60,BAT*60)="C" THEN RETURN ›3780 IF TEAM1$(BAT*60,BAT*60)="H" THEN 3800›3790 PART$="A half century for ":A=6:GO!š}SUB 3820:TEAM1$(BAT*60,BAT*60)="H":RETURN ›3800 IF VAL(TEAM1$(BAT*60-22,BAT*60-20))<100 THEN RETURN ›3810 PART$="A century fo!›}r ":A=12:GOSUB 3820:TEAM1$(BAT*60,BAT*60)="C":RETURN ›3820 FOR B=1 TO 75:NEXT B:FOR B=1 TO A:POSITION 1,(2*OVERBALL+(OVERBALL!œ}-1))+2:? BLINE$(1,38);:GOSUB 2420›3830 POSITION 1,(2*OVERBALL+(OVERBALL-1))+2:? PART$;TEAM1$(BAT*60-59,BAT*60-50);CHR$(253);:!}GOSUB 2420›3840 NEXT B:RETURN ›20›3830 POSITION 1,(2*OVERBALL+(OVERBALL-1))+2:? PART$;TEAM1$(BAT*60-59,BAT*60-50);CHR$(253);: 1 REM ###############################›2 REM # COMPUTER CRICKET #›3 REM # PART 5: PRINTOUT SUBROUTINE #›4 REM # %Ÿ} by K. J. Bricknell #›5 REM # Published by Atari Computer #›6 REM # Enthusiasts (N.S.W.) #›7 REM # Februar% }y 1985 #›8 REM ###############################›944 IF B=255 THEN POSITION 27,1:? NATION1$:POSITION 27,3:? NATION2$:GOT%”}O 1550›946 IF B=128 THEN POSITION 0,17:? BLINE$;:POSITION 11,17:? "Printout complete"›1540 POKE 842,12:A=255:B=255:GOTO 860›1%¢}550 PLAYER$(1)=" ":PLAYER$(15)=" ":PLAYER$(2)=PLAYER$(1)›1560 GOSUB 3250:GOSUB 1430›1570 POSITION 2,16:? "Öåīõå";:INPUT TEM%£}P$:POSITION 2,18:? "Äįōå ";:INPUT PLAYER$›1580 TEMP$(LEN(TEMP$)+3)=PLAYER$:POSITION 2,19›1590 POSITION 0,16:? BLINE$;:POSIT%¤}ION 0,18:? BLINE$;›1600 POSITION 1,17:? "Ensure printer on-line. Press ŅÅŌÕŅĪ":POKE 764,255›1610 IF PEEK(764)<>12 THEN 1610%„}›1620 GOSUB 1430›1630 POSITION 14,17:? "Printing...":OPEN #2,8,0,"P:":POKE 764,255›1640 ? #2;CHR$(27);"D";CHR$(20);CHR$(0);›1%¦}650 L=LEN(NATION2$):P=LEN(NATION1$):A=L+P+8:B=INT((40-A)/2)›1660 PLAYER$(1)=" ":PLAYER$(15)=" ":PLAYER$(2)=PLAYER$(1)›1670 ? %§}#2;CHR$(14);CHR$(27);"G";PLAYER$(1,B);NATION2$;CHR$(27);"H";" VERSUS ";CHR$(27);"G";NATION1$›1680 ? #2:? #2;CHR$(9);CHR$(27);%Ø}"H";CHR$(15);CHR$(14);TEMP$:? #2›1690 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);›1700 IF TEAM1$(679,679)="F" THEN ? #2;NATION1$%©};›1710 IF TEAM2$(679,679)="F" THEN ? #2;NATION2$;›1720 ? #2;" won the toss":? #2:? #2›1730 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR%Ŗ}$(14);"SCOREBOARD ";NATION2$›1740 GOSUB 3260›1750 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,34)›1760 GOSUB 3250:? #2;CH%«}R$(18);›1770 FOR L=1 TO 11:? #2;CHR$(9);:FOR LL=0 TO 39›1780 IF ASC(TEAM2$(L*60-59+LL,L*60-59+LL))=2 THEN ? #2;" ";CHR$(27);"%¬}E";:GOTO 1830›1790 IF ASC(TEAM2$(L*60-59+LL,L*60-59+LL))=239 THEN ? #2;CHR$(27);"E";:GOTO 1830›1800 IF ASC(TEAM2$(L*60-59+LL,%­}L*60-59+LL))=22 THEN ? #2;" ";CHR$(27);"F";:GOTO 1830›1810 IF ASC(TEAM2$(L*60-59+LL,L*60-59+LL))=32 THEN ? #2;CHR$(27);"F";:G%®}OTO 1830›1820 IF ASC(TEAM2$(L*60-59+LL,L*60-59+LL))=160 THEN ? #2;CHR$(27);"F";›1830 ? #2;TEAM2$(L*60-59+LL,L*60-59+LL);:NEXT%Æ} LL:? #2:NEXT L›1840 GOSUB 3250›1850 ? #2;CHR$(27);"E";CHR$(9);TEMP$(1,30);"Extras ";CHR$(27);"F";TEAM2$(661,663);CHR$(18)›18%°}60 ? #2;CHR$(14);" OVERS ";CHR$(27);"E";TEAM2$(664,665);" ";TEAM2$(666,667);CHR$(27);"F";" FOR ";›1870 ? #2;CHR$(27%±});"E";TEAM2$(668,670);CHR$(27);"F":? #2;CHR$(9);"Run rate: ";CHR$(27);"E";›1880 ? #2;TEAM2$(671,674);CHR$(27);"F"›1890 GOSUB %²}3260›1900 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,34):? #2:? #2›1910 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);"SCOREBO%³}ARD ";NATION1$›1920 GOSUB 3260›1930 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,34)›1940 GOSUB 3250:? #2;CHR$(18);›1950 F%“}OR L=1 TO 11:? #2;CHR$(9);:FOR LL=0 TO 39›1960 IF ASC(TEAM1$(L*60-59+LL,L*60-59+LL))=2 THEN ? #2;" ";CHR$(27);"E";:GOTO 2010›%µ}1970 IF ASC(TEAM1$(L*60-59+LL,L*60-59+LL))=239 THEN ? #2;CHR$(27);"E";:GOTO 2010›1980 IF ASC(TEAM1$(L*60-59+LL,L*60-59+LL))=2%¶}2 THEN ? #2;" ";CHR$(27);"F";:GOTO 2010›1990 IF ASC(TEAM1$(L*60-59+LL,L*60-59+LL))=32 THEN ? #2;CHR$(27);"F";:GOTO 2010›2000 %·}IF ASC(TEAM1$(L*60-59+LL,L*60-59+LL))=160 THEN ? #2;CHR$(27);"F";›2010 ? #2;TEAM1$(L*60-59+LL,L*60-59+LL);:NEXT LL:? #2:NEXT %ø}L›2020 GOSUB 3250›2030 ? #2;CHR$(27);"E";CHR$(9);TEMP$(1,30);"Extras ";CHR$(27);"F";TEAM1$(661,663);CHR$(18)›2040 ? #2;CHR$(1%¹}4);" OVERS ";CHR$(27);"E";TEAM1$(664,665);" ";TEAM1$(666,667);CHR$(27);"F";" FOR ";›2050 ? #2;CHR$(27);"E";TEAM1$(6%ŗ}68,670);CHR$(27);"F":? #2;CHR$(9);"Run rate: ";CHR$(27);"E";›2060 ? #2;TEAM1$(671,674);CHR$(27);"F";" Run rate required: ";%»}CHR$(27);"E";TEAM1$(675,678);CHR$(27);"F"›2070 GOSUB 3260›2080 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,34):? #2:? #2›%¼}2090 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);PART$(21,56):? #2:? #2›2100 ? #2;CHR$(18);CHR$(27);"D";CHR$(14);CHR$(0);CHR$(9);%½}CHR$(15);CHR$(14);" FALL OF WICKET"›2110 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,44)›2120 ? #2;CHR$(18);CHR$(9);C%¾}HR$(27);"E";" 1 2 3 4 5 6 7 8 9 10";CHR$(27);"F"›2130 GOSUB 3250›2140 IF LEN(NATION2$)<11 THEN %æ}NATION2$(LEN(NATION2$)+1)=TEMP$›2150 IF LEN(NATION1$)<11 THEN NATION1$(LEN(NATION1$)+1)=TEMP$›2160 ? #2;CHR$(9);NATION2$;" ";%Ą}›2170 FOR L=681 TO 717 STEP 4:? #2;TEAM2$(L,L+2);" ";:NEXT L:? #2›2180 ? #2;CHR$(9);NATION1$;" ";›2190 FOR L=681 TO 717 STEP %Į}4:? #2;TEAM1$(L,L+2);" ";:NEXT L:? #2›2200 GOSUB 3260›2210 ? #2;CHR$(9);CHR$(15);CHR$(14);TEMP$(1,44):? #2›2220 ? #2;CHR$(18)%Ā};CHR$(27);"D";CHR$(20);CHR$(0);CHR$(9);CHR$(15);CHR$(14);"RUN RATES"›2230 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,34)%Ć}›2240 ? #2;CHR$(18);CHR$(9);CHR$(27);"E";" 10 20 30 40 50";CHR$(27);"F"›2250 GOSUB 3250›2260 IF LEN(N%Ä}ATION2$)<11 THEN NATION2$(LEN(NATION2$)+1)=TEMP$›2270 IF LEN(NATION1$)<11 THEN NATION1$(LEN(NATION1$)+1)=TEMP$›2280 ? #2;CHR$%Å}(9);NATION2$;" ";›2290 FOR L=721 TO 737 STEP 4:? #2;TEAM2$(L,L+2);" ";:NEXT L:? #2›2300 ? #2;CHR$(9);NATION1$;" ";›2%Ę}310 FOR L=721 TO 737 STEP 4:? #2;TEAM1$(L,L+2);" ";:NEXT L:? #2›2320 GOSUB 3260›2330 ? #2;CHR$(9);CHR$(15);CHR$(14);TEMP$(1,%Ē}34):? #2;CHR$(12)›2340 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);"PLAYER PERFORMANCE ";NATION2$›2350 ? #2;CHR$(18);CHR$(9);CHR$%Č}(15);CHR$(14);TEMP$(1,34)›2360 ? #2;CHR$(27);"D";CHR$(35);CHR$(0);CHR$(15);›2370 GOSUB 3250›2380 ? #2;CHR$(27);"G";CHR$(9);TE%É}MP$(1,29);"STRIKE";TEMP$(1,25);"BOWLING"›2390 ? #2;CHR$(9);TEMP$(1,11);"RUNS FOURS SIXES RATE OVERS MAIDS RUNS WICKS AVER%Ź}AGE";CHR$(27);"H"›2400 FOR L=1 TO 11›2410 ? #2;CHR$(9);TEAM2$(L*60-59,L*60-50);" ";TEAM2$(L*60-22,L*60-20);" ";›2420 ? #2;%Ė}TEAM2$(L*60-19,L*60-18);" ";TEAM2$(L*60-17,L*60-16);" ";›2430 GOSUB 3250:TRAP 2490›2440 A=VAL(TEAM2$(L*60-22,L*60-20))›%Ģ}2450 B=VAL(TEAM2$(L*60-15,L*60-13)):P=INT(A/B*100):TEMP$=STR$(P)›2460 IF P<10 THEN ? #2;" ";:GOTO 2480›2470 IF P<100 THEN ? %Ķ}#2;" ";›2480 ? #2;TEMP$;:GOTO 2500›2490 ? #2;" ";›2500 ? #2;" ";TEAM2$(L*60-12,L*60-11);" ";TEAM2$(L*60-10,L*60-9);" %Ī} ";TEAM2$(L*60-8,L*60-6);›2510 ? #2;" ";TEAM2$(L*60-5,L*60-4);" ";›2520 GOSUB 3250:TRAP 2580›2530 A=VAL(TEAM2$(L*60-8,%Ļ}L*60-6)):B=VAL(TEAM2$(L*60-5,L*60-4))›2540 P=A/B:TEMP$=STR$(P):TEMP$(LEN(TEMP$)+1)=" "›2550 FOR LL=2 TO 3:IF TEMP$(LL,LL%Š})=CHR$(46) OR TEMP$(LL,LL)=CHR$(32) THEN 2570›2560 NEXT LL›2570 P=4-LL:? #2;BLINE$(1,P);:GOTO 2590›2580 TEMP$=" "›2590 ? %Ń}#2;TEMP$(1,5):TRAP 40000:NEXT L›2600 ? #2;CHR$(27);"D";CHR$(20);CHR$(0);›2610 GOSUB 3260›2620 ? #2;CHR$(18);CHR$(9);CHR$(15);%Ņ}CHR$(14);TEMP$(1,34):? #2:? #2›2630 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);"PLAYER PERFORMANCE ";NATION1$›2640 ? #2;CHR$(18)%Ó};CHR$(9);CHR$(15);CHR$(14);TEMP$(1,34)›2650 ? #2;CHR$(27);"D";CHR$(35);CHR$(0);CHR$(15);›2660 GOSUB 3250›2670 ? #2;CHR$(27);"%Ō}G";CHR$(9);TEMP$(1,29);"STRIKE";TEMP$(1,25);"BOWLING"›2680 ? #2;CHR$(9);TEMP$(1,11);"RUNS FOURS SIXES RATE OVERS MAIDS RUN%Õ}S WICKS AVERAGE";CHR$(27);"H"›2690 FOR L=1 TO 11›2700 ? #2;CHR$(9);TEAM1$(L*60-59,L*60-50);" ";TEAM1$(L*60-22,L*60-20);" %Ö}";›2710 ? #2;TEAM1$(L*60-19,L*60-18);" ";TEAM1$(L*60-17,L*60-16);" ";›2720 GOSUB 3250:TRAP 2780›2730 A=VAL(TEAM1$(L*60-%×}22,L*60-20))›2740 B=VAL(TEAM1$(L*60-15,L*60-13)):P=INT(A/B*100):TEMP$=STR$(P)›2750 IF P<10 THEN ? #2;" ";:GOTO 2770›2760 IF %Ų}P<100 THEN ? #2;" ";›2770 ? #2;TEMP$;:GOTO 2790›2780 ? #2;" ";›2790 ? #2;" ";TEAM1$(L*60-12,L*60-11);" ";TEAM1$(L*60-%Ł}10,L*60-9);" ";TEAM1$(L*60-8,L*60-6);›2800 ? #2;" ";TEAM1$(L*60-5,L*60-4);" ";›2810 GOSUB 3250:TRAP 2870›2820 A=VAL(T%Ś}EAM1$(L*60-8,L*60-6)):B=VAL(TEAM1$(L*60-5,L*60-4))›2830 P=A/B:TEMP$=STR$(P):TEMP$(LEN(TEMP$)+1)=" "›2840 FOR LL=2 TO 3:I%Ū}F TEMP$(LL,LL)=CHR$(46) OR TEMP$(LL,LL)=CHR$(32) THEN 2860›2850 NEXT LL›2860 P=4-LL:? #2;BLINE$(1,P);:GOTO 2880›2870 TEMP$=" %Ü} "›2880 ? #2;TEMP$(1,5):TRAP 40000:NEXT L›2890 ? #2;CHR$(27);"D";CHR$(20);CHR$(0);›2900 GOSUB 3260›2910 ? #2;CHR$(18);CHR$%Ż}(9);CHR$(15);CHR$(14);TEMP$(1,34):? #2:? #2›2920 ? #2;CHR$(18);CHR$(27);"D";CHR$(13);CHR$(0);CHR$(9);CHR$(15);CHR$(14);" %Ž} PARTNERSHIPS ";NATION2$›2930 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,49)›2940 ? #2;CHR$(27);"D";CHR$(22);CHR$(0);:B=%ß}0›2950 ? #2;CHR$(9);:FOR L=1 TO 5›2960 IF TEMPERF(B)=0 OR B=30 THEN A=(L-1)*3-1:GOTO 3000›2970 ? #2;TEAM2$(TEMPERF(B)*60-59,T%ą}EMPERF(B)*60-50);" ";:TEMP$(1,4)=" "›2980 TEMP$(1,4)=STR$(TEMPERF(B+2)):? #2;TEMP$(1,4);" ";›2990 B=B+3:NEXT L:A=14:L%į}=6›3000 IF L=1 THEN 3060›3010 ? #2;CHR$(13);CHR$(9);›3020 FOR LL=1 TO L-1›3030 ? #2;TEAM2$(TEMPERF(B-A)*60-59,TEMPERF(B-A)*60%ā}-50);" ";›3040 A=A-3:NEXT LL:? #2:IF TEMPERF(B)<>0 AND B<>30 THEN ? #2›3050 GOTO 2950›3060 GOSUB 3260:? #2;CHR$(15)%ć};CHR$(14);:FOR L=1 TO 11:? #2;CHR$(8);›3070 NEXT L:? #2;TEMP$(1,49):? #2:? #2›3080 ? #2;CHR$(18);CHR$(27);"D";CHR$(13);CHR$(0%ä});CHR$(9);CHR$(15);CHR$(14);" PARTNERSHIPS ";NATION1$›3090 ? #2;CHR$(18);CHR$(9);CHR$(15);CHR$(14);TEMP$(1,49)›3100 ? #2%å};CHR$(27);"D";CHR$(22);CHR$(0);:B=30›3110 ? #2;CHR$(9);:FOR L=1 TO 5›3120 IF TEMPERF(B)=0 OR B=60 THEN A=(L-1)*3-1:GOTO 3160›%ę}3130 ? #2;TEAM1$(TEMPERF(B)*60-59,TEMPERF(B)*60-50);" ";:TEMP$(1,4)=" "›3140 TEMP$(1,4)=STR$(TEMPERF(B+2)):? #2;TEMP$(1,4)%ē};" ";›3150 B=B+3:NEXT L:A=14:L=6›3160 IF L=1 THEN 3220›3170 ? #2;CHR$(13);CHR$(9);›3180 FOR LL=1 TO L-1›3190 ? #2;TEAM1$%č}(TEMPERF(B-A)*60-59,TEMPERF(B-A)*60-50);" ";›3200 A=A-3:NEXT LL:? #2:IF TEMPERF(B)<>0 AND B<>60 THEN ? #2›3210 GOTO%é} 3110›3220 GOSUB 3260:? #2;CHR$(15);CHR$(14);:FOR L=1 TO 11›3230 ? #2;CHR$(8);:NEXT L:? #2;TEMP$(1,49):? #2:? #2:GOSUB 3250:P%ź}OSITION 14,17:? TEMP$(1,12):? #2;CHR$(15);›3234 ? #2;CHR$(14);CHR$(9);:POSITION 1,16:? "Man of the match";:INPUT TEMP$:? #2;"%ė}Man of the match: ";TEMP$:? #2›3236 GOSUB 3250:POSITION 1,18:? "Game number";:INPUT TEMP$:? #2;CHR$(15);CHR$(14);CHR$(9);"Gam%ģ}e number: ";TEMP$›3240 ? #2;CHR$(12):GOSUB 1430:B=128:A=255:CLOSE #2:GOTO 860›3250 TEMP$(1)=" ":TEMP$(100)=" ":TEMP$(2)=TEMP$%ķ}(1):RETURN ›3260 TEMP$(1)="-":TEMP$(100)="-":TEMP$(2)=TEMP$(1):RETURN ›TO 860›3250 TEMP$(1)=" ":TEMP$(100)=" ":TEMP$(2)=TEMP$$GmnF8%M%ĮNAME¤ĢGOODBAŌMEDBAŌBADBAŌGOODBOWĢMEDBOWĢBADBOWĢLĢBAŌBOWĢBATØBOWLØTEXT¤NAMÅCOĢGOOÄMEÄBAÄBAT¤BOWL¤LINE¤LINÅĀŲÄ)ļ}€ @ @ €)š}€€€%%##############################)ń}#›%%# COMPUTER CRICKET RATINGS #›%%#UTILITY TO MODIFY PLAYERS.LST#›%%# by K. J. Bricknell #›%%# Publi)ņ}shed by Atari Computer #›%%# Enthusiasts (N.S.W.) #›%%# February 1985 #›%%#####################)ó}##########›  +@A1A CA@U-@@m(@ STANDBY...A)ō}V@L(GOTO 30!AV(( :AB@L D:PLAYERS.LST‡AB@+1A)õ}CA @UAR@gA @‡@@K:#MENU AND CHOICE›(P)ö}A(}0-@@P(2g-@@5(| ŠĢĮŁÅŅÓ§ ŅĮŌÉĪĒ ÓÕĶĶĮŅŁ)÷} |G-@@g(<x-@@4(ÓPrint ratings to screenF-@@ f()ų}ŠPrint ratings to printerx-@@F(ĆCreate new ratingsKB @u)@€B€@ƒ*€@€*)ł}€@g@uP! B!€"@ƒA Z€"@€Apd€"@gA€n%%PRINT CURRENT RATINGS T)ś}O SCREEN›xx;@,"A@64A @>#A`R‚-@@u(} Bat Bowl)ū}x(‚g6ƒ-6„-'6…-36†-?6‡-K6ˆ-_‰-@@g"Š‹Œ2-67B:,%@)ü}<@,. 2(–&Š"@ (***&6ƒ-ƒ%@ %Š"@(**%6„-„%@Ŗ$Š"@()ż}*$6…-…%@“%‹"@(***%6†-†%@¾$‹"@(**$6‡-‡%@Č#‹"@ (*#6ˆ-ˆ%@)ž}Ņ ‰Ü0(0(Batsmen: *** ƒ ** „ * …ęL-(Bowlers: *** † ** ‡ * ˆ?-@1@!L()’}šn<(#HitÓŠĮĆÅ ĀĮŅto continue |Team|>:‚%Av,|N-@1@#\(nAdAUś F:*}Ad,"AUAP#AdAU ‚# @@ &&PRINT CURRENT RATINGS TO PRINTER›O-@@=(#Ens*}ure printer on-line. HitŅÅŌÕŅĪOAdAU F:Ad,"AUA€"'-@@'( Un momento...,~*}D;@,Œ9@<@,9@<@,Ž;A ,U6Ž7@,. f6Ž7A ,. ~6Ž7@,.Ž7@,6*}‘6-@6-@'6‘-@36’-@?6“-@S‚-@@g‰-@@x6Œ8‚<‰,-‰68‚<‰*},- ‰‘ ‚@H‚-A7@A8@@ ##‚7‰-@@?"Š‹H6Ž7,.J<Š"@ $6Ž7%@,.****}<6Œ8<‘,-Œ8<‘,%@T;Š"@#6Ž7%@,.**;6Œ8<’,-Œ8<’,%@^:Š"@"6Ž7%@,.*:6Œ8<“*},-Œ8<“,%@h<‹"@$6Ž7%@,.***<68<‘,-8<‘,%@r;‹"@#6Ž7%@,.**;68<’,-8<*}’,%@|:‹"@ "6Ž7%@,.*:68<“,-8<“,%@†X6-%A& ‰#6-%@;6-+$@!,&@ *}T6Ž7B:Ž,%@,. X ‚'-@@'( Printing... š#@@P:.(@9(@* }z(@3 LIMITED-OVER CRICKET BY K. BRICKNELL…(@(@¤E:(@)GCURRENT BATTING * }AND BOWLING RATINGSH E(@®YY(@HThese ratings are those used by the computer to determine the odds for aø* }XX(@Gdismissal when a particular batsman addresses a particular bowler. TheyĀXX(@Gare purely for program * }use and are not the same as the strike rates andĢ[[(@Jbowling averages printed out at the end of each game - altho* }ugh they will,ÖJ?(@.of course, have an influence on those figures.J(@ąYY(@HThree stars means go*}od, two stars means average and one star means some-źXX(@Gthing rather short of average. The numbers of players wi*}th a particularōUU(@Drating are totalled at the bottom. When modifying these ratings, youžWW(@Fshould c*}heck these totals to ensure that all teams are evenly matched.i(@>:@,-‚-@@Z(@‚*} Bat Bowl ^ ‚i(@=‚-@A‘A&9(@Ž7‚<‚%A%,= ‚e-@@*}V(@ Batsmen ***Œ8<‘, **Œ8<’, *Œ8<“, Z e(@&Z-@@V(@ Bowlers **}**8<‘, **8<’, *8<“, Z 0ƒ(@(@x(@QGLISTHing of data lines from GCRICKET2*}.BASH which produce the above summary:ƒ(@:6€-A7@#‚-@@=(@TEAM‚PP:€€%@*}^6€-€%@ b ‚x(@>:@,ƒ@ @@?++CREATE NEW RATINGS FILE 'PLAYERS.LST'›Dj4;@*},”;@,•;@,–;A,FA@„XA @j@‚@Nn A(}(5(Which te*}am number?±to¶B)@€P6€-€&@Hn€ @)€!@AX% B€"@%6—-A7@b€"@*}6—-A7`l€"@6—-A7€v€"@6—-A8€€"@6—-A8 Š€"@6—-A8@”*}L 6–.3(}Current Team>:€%Av,is: |L( |ž9#— ( Bat Bowl|9( *} |ØK6ƒ-6„-'6…-36†-?6‡-K6ˆ-²‰-@@¼> "Š‹B:, @*}>67B:,%@<@,. Ę(Š'Š"@ (*** '6ƒ-ƒ%@Ś'Š"@(** '6„-„%@*}ä'Š"@(* '6…-…%@ī'‹"@(*** |'6†-†%@ų'‹"@(** |'6‡-‡%@'‹*}"@ (* |'6ˆ-ˆ%@   ‰ ( |5(Bat : *** ** * |5(Bowl: *** ** * | H-@*}@!(ƒ,-@@!1(„C-@@!H(…*a-@@"(†,-@@"1(‡C-@*}@"H(ˆZ-@ @#a(|4d-@!,(>-@!@d(|Enter new Team >:€%* }Av,|>U-@!@,(|data below: |>-@!@U(HW-@!@-(*!}?-@!@ W(| To start again,|RW-@!@!-(| hitŅÅŌÕŅĪat |?-@!@"W(*"}| input prompt |\7-@!@#-(7 APfK6ƒ-6„-'6…-36†-*#}?6‡-K6ˆ-p3‚-@@+-‚%@3(ŸzT-@!@)(Šģįłåņ īįķå Ø5‚ @*$}J(>:‚%Av,© T A „%%(±>:+‚&@,%Av,©Žf A -@#@1(  C-*%}@"@GN4\(>:AS,f A`˜A‚"@#˜-@!@"/-@˜=( ** * A ˜¢q‰-@*&}@+-@‚%@<( H6™-@\-@‚%@a(m6™-@q ‰¬-6–7B:–,%@,.*'}-6–7B:–,%@,.,¶k A P-@!@ 6(Āįōōéīē ņįōéīē  H-@"@L”S”4a(>:AS,k A*(}`Ąƒ‰-@@%+-@‚%@4( H6™-@$@\-@‚%@a(”u6™-@$@y ‰*)}ƒ ApŹ-6–7B:–,%@,.”-6–7B:–,%@,.,Ōk A €-@!@6(Āļ÷ģéīē ņįōéīē  H-@"@**}L•S•4a(>:AS,k A`Ł BŽ‰-@@%+-@‚%@4( H6™-@$@\-*+}@‚%@a(•u6™-@$@y ‰ƒ A APčC6–7B:–,%@,.•#‚"@96–7B:–,%@,.^C*,} A ņ%‚@%6–7B:–,%@,.,ü?‰-@@#-@!‰;( ? ‰"-‚%*-}@( " ‚c-@"@ '( Changing data9-@"@O(lines. Standby...Y APc APb (}*.}-@@)(— DATA =‚-@AJ–7‚<‚,4^X6‰-‚%@b Ap$ (–7‚<‚, ‚.M6—-—%@*/}((%(— DATA 0‚-‰B:–,:(–7‚<‚,> ‚A(D(M(CONT8*-'AB@*&ByAB@#6—*0}-—&@)(}y(KNew team data lines being LISTed to disk as file PLAYERS.LST. Standby...L‹6@6@*1} D:PLAYERS.LSTX D:PLAYERS.LSTA7@A8P‹@5@ D:PLAYERS.LSTVZ (}A*2}@R(-( All done.0(Z(% The data lines you have just created`gO(G are the ones which will be used when ne*3}xt you play Computer Cricket.c‚-@Ag ‚jQ-@@ )(ÅExit program;-@@Q(ĶRetur*4}n to menut8 A@)@€8€@i*€@wA0~€"@i+ˆ+€"@w!@‚@*5}+ @@GSUBROUTINESH›’9 ”4***6”.9#6ƒ-ƒ%@5-@@!9(ƒœ8 ”4**6”.6"6„-„%@4*6}-@@!8(„¦7 ”4*6”.4!6…-…%@3-@@!7(…°$ŗ9 •4***6•.4#6†-†%@5-@*7}@"9(†Ä8 •4**6•.6"6‡-‡%@4-@@"8(‡Ī7 •4*6•.9!6ˆ-ˆ%@3-@@"7(ˆ*8}Ų$āš-@A š$€ D:RATINGS.BAS@"8(‡Ī7 •4*6•.9!6ˆ-ˆ%@3-@@"7(ˆ(93740 DATA HUGHES,9,9,ALDERMANN,4,6,BORDER,9,6,HOGAN,4,6,HOGG,4,4,HOOKES,9,9,JONES,4,9,LAWSON,4,4›3750 DATA MAGUIRE,4,4,MARSH,.:}6,9,PHILLIPS,4,9,RACKEMANN,4,4,RITCHIE,6,9,SMITH,6,9,WESSELS,6,6,YALLOP,9,9›3760 DATA LLOYD,9,9,BAPTISTE,4,6,DANIEL,4,6,DAVIS.;},4,6,DUJON,4,9,GABRIEL,6,9,GARNER,4,4,GOMES,6,6›3770 DATA GREENIDGE,9,9,HAYNES,9,9,HOLDING,4,4,LOGIE,6,9,MARSHAL,4,4,RICHARDS.<},9,4,RICHARDSON,6,9,ROBERTS,4,9›3780 DATA IMRAN,6,4,AZEEM,4,4,BARI,4,9,MANSOOR,6,9,MOSHIN,9,9,MIANDAD,9,9,MUDASSAR,9,9,NAQQAS.=}H,4,6›3790 DATA NAWAZ,4,4,NAZIR,4,6,OMAR,9,9,RAJA,6,6,RASHID,4,6,REHMEN,4,9,SALIM,6,9,QUADIR,4,4›3800 DATA GOWER,9,9,BOTHAM,6.>},4,COOK,4,9,COWANS,4,6,FOWLER,4,9,GOULD,6,9,HEMMINGS,4,4,JACKMAN,4,4›3810 DATA JESTY,6,9,LAMB,9,9,MARKS,6,6,MILLER,4,6,PRINGL.?}E,4,6,RANDALL,9,9,TAVARE,9,9,WILLIS,4,4›3820 DATA KAPEL-DEV,4,4,AZAD,6,6,BINNY,4,4,CHAUHAN,9,9,DOSHI,4,6,GAVASKAR,9,9,GHAVRI,.@}4,4,KIRMANI,4,9›3830 DATA PATIL,9,6,REDDY,4,9,SHARMA,9,9,SINGH,4,6,SRINIVASAN,6,9,VENGSARKAR,6,9,VISWANATH,6,9,YADAV,4,4›3840.A} DATA HOWARTH,6,9,BRACEWELL,4,9,CAIRNS,4,4,CHATFIELD,4,4,CONEY,9,6,CROWE,6,9,EDGAR,9,9,HADLEE,4,4›3850 DATA LEES,6,9,MCEWAN,4.B},9,MORRISON,6,6,SNEDDEN,4,4,TROUP,4,6,TURNER,9,9,WEBB,4,6,WRIGHT,9,9›OWE,6,9,EDGAR,9,9,HADLEE,4,4›3850 DATA LEES,6,9,MCEWAN,4,Ekll !!R1ØR2ØR¤RR¤KŠŃROUNÄGAMÅOPPONENŌREALGAMÅFINALÓĘÖNÓCOĢRO×TEMŠTEAĶVENUÅÄWOĪRR×LOSŌRRĢAVRŅPTÓOŠROWÓŠ×BUBBLÅCOLÓ@2D}@€€ 2E}2F}%%###############################›%%# COMPUTER CRICKET SERIES #›%%# UTILITY TO ASSIST RUNNING A #›%%# 2G} 30 GAME SERIES #›%%# by K. J. Bricknell #›%%# Published by Atari Computer #›%%# Enthusiasts (N.2H}S.W.) #›%%# February 1985 #› %%###############################› PA€9@<@,9@<@2I},‚;@,ƒ;@,P6‚.>:AU,Y#@@K:5AGA @YAR@2J},,ĆČĻÉĆÅ ĻĘ ĪÅ× ÓÅŅÉÅÓ ĻŅ ĆÕŅŅÅĪŌ ÓÅŅÉÅӛ(y (}@‚@--@@E(ĪStart new seriesH(g(2K}ĆContinue current seriesy@‚@28 @P)@„8„@x*„@g@P<! B!„"@g2L}AFe„"@x((@(&That wipes out current series records!e( Sure you want to do that? ŁĪP8 @€)2M}@„8„@x*„@‰@€Zd B„"@x(B(!Let's start again then, shall we?V…-@A2N}Z …d @@dĪÅ× ÓÅŅÉÅÓ ÉĪÉŌÉĮĢÉŚĮŌÉĻĪ›n?6†-@6‡-@'6ˆ-@36‰-?6Š-x‹-@2O}@‚p6€8@<‹,-‹+6€8@<‹,-B6€8@<‹,-Y6€8@<‹,-p6€8@<‹,-ŒB62P}€8@<‹,-ˆ%@*6ˆ-ˆ%@6ˆ"@B6ˆ-– ‹6ˆ-@ #6Œ-@#‹-@@Ŗ:6€8@2Q}<‹,-Œ"6Œ-Œ%@.Œ"@:6Œ-@“ ‹6-@ A €¾ĢĻĮÄ ĆÕŅŅÅĪŌ ÓÅŅÉÅÓ ÄĮŌĮ›Č2( (2($Stand2R}by. Loading current series dataŅ--@@ D:SERIES.DATÜKŽ-@@+-@@8@2S}C6€8Ž<,-G K Žę!@†‡ˆ‰!@šĶĮÉĪ ĶÅĪ՛śQ (}A@„-A @?A2T}R@Q@‚@g-@@/(ĪNext match details2(N(ŅRecord match resultsQ(g(ÓSeries2U} summary$((ÅExit$@‚@L A€)@„L„@x*„@‚*„@i*„@ƒA€"& 2V} B„"@i#+&,„"@‚A06„"@ƒA`@ĪÅŲŌ ĶĮŌĆČ ÄÅŌĮÉĢӛJ?@‚@2W}(}-AAd?-@@Tf‰"@3#(Series finished&(;(The winner was R6‘-€8@<@,\2X} Apf A0^F-@@/(Next game is between:2(F‰ @0Ahs6‘-€8@<@3&‰,& Ap2Y}1( and R6‘-€8@<@3&‰%@,\ Ap_(b(e(p(Venue:s(r?‰"@06’-@% AP((?(Ę2Z}éņóō óåķé­ęéīįģ|@‰"@16’-@% AP((@(Óåćļīä óåķé­ęéīįģ†;‰"@26’-@% AP((;(2[}Ēņįīä ęéīįģ” A0šG(6‘-€8@<‡,! Ap,( and =6‘-€8@<‡,G Ap¤6( ( ((Venue: (2\},6’-€8@<‡,6 AP®X@‚@'AdAU9-@@"X(PressÓŠĮĆÅĀĮŅto continueø F:A2]}d,"AUA@ĀAdAU APĢÓÕĀŅĻÕŌÉĪÅÓ ŌĻ ŠŅÉĪŌ ŌÅĮĶ›Ö‘"@( AUSTRALIAą ‘"@2^} ( WEST INDIESź‘"@(PAKISTANō‘"@(ENGLANDž‘"@(INDIA ‘"@ ( N2_}EW ZEALAND$ ÓÕĀŅĻÕŌÉĪÅÓ ŌĻ ŠŅÉĪŌ ÖÅĪÕś&,’"@,(MELBOURNE CRICKET GROUND0 ’"@ ( WACA (PERTH)2`}:!’"@!( ADELAIDE OVALD)’"@)(SYDNEY CRICKET GROUNDN$’"@$(GABBA (BRISBANE)X,’"@2a},(MELBOURNE CRICKET GROUNDb$lŅÅĆĻŅÄ ĶĮŌĆČ ŅÅÓÕĢŌӛv: (} A0%A@R7@‚@:(€E2b}‰"@3#(Series finished7“-A; “E APŠ‡@‚@'-@@;-@@f(2c}>:€8@<,%@H%A(,w6‘-€8@<, Ap„(‡(”3"@!@‚@ 3-@ @2d}ž5 @‚@((5(Which Team won? Ø8 A€)@„8„ @I)„!@TA€²((>:„%A2e}(,(6”-„&@H¼‰@0APĘI A()(Run rate this team -•0(3(I(Which team lost?Š8 2f}A )@„8„ @I)„!@TA Ś((>:„%A(,(6–-„&@HäT A@()(Run rate this 2g}team -—0(3(T(Is this all accurate? ŁĪī. AP)@„.„"@xA0ó„@‰APų! 2h}B!‰@0A 8'6€8@<”,-€8@<”,%@8Éīćņåķåīō ÷éīó› d'6€8@<”,-€8@<”,%@K6€2i}8@<–,-€8@<–,%@dÉīćņåķåīō ēįķåó šģįłåä›_!6€8@<”,-€8@<”,%•?6€8@<–,-€8@<–,%—_Įä2j}ä ņõīņįōåó ōļ ćõņņåīō ōļōįģ› a!6˜-€8@<”,'€8@<”,46™-€8@<”,$˜=6ƒ.=:™,Q6€8@<”,-A:ƒ,aŠļéīōó ÷éīīåņ›2k}*`!6˜-€8@<–,'€8@<–,46™-€8@<–,$˜=6ƒ.=:™,Q6€8@<–,-A:ƒ,`Šļéīōó ģļóåņ›4O‹-A ‹)62l}‰-‰%@76‡-‡%@C‡"@O6‡-@>‡"@6‡-@HE-‰"@)‰"@)‰"@)‰"@$;6ˆ2m}-ˆ%@E ApR‰"@6†-@\=( ()(Standby. Updating data file3 B= A €f\6š-ˆ%@2n}%‹-@@66€8@<‹,-šD6š-š%@Pš"@\6š-@p  ‹ $zŅÅĆĻŅÄ ÄÅŌĮÉĢÓ ­ ĘÉĪĮĢӛ„¶‰"@02o}?6€8@<@,-€8@<@,%@o6€8@<@,-€8@<@,%@†”"€8@<@,¶2p}6€8@<@,-€8@<@,%@Žj$‰"@0*”"€8@<@,T6€8@<@,-€8@<@,%@2q}`6›-@j A ˜¶‰"@1?6€8@<@,-€8@<@,%@o6€8@<@,-€8@<@2r},%@†”"€8@<@,¶6€8@<@,-€8@<@,%@¢j$‰"@1*”"€8@<@,T6€82s}@<@,-€8@<@,%@`6›-@j A ¬¶‰"@2?6€8@<@,-€8@<@,%@2t}o6€8@<@,-€8@<@,%@†”"€8@<@,¶6€8@<@,-€8@<@,%@¶2u}j$‰"@2*”"€8@<@,T6€8@<@,-€8@<@,%@`6›-@j A Ą6‰-‰%@ A2v}`ŹÓĮÖÅ ŌĻ ÄÉÓĖ›Ō‰"@0 A`Ž--@@ D:SERIES.DATčHŽ-@@+-@2w}@@(@€8Ž<,‚D H Žņ(@†‚‡‚ˆ‚‰ü0"@6-&@0 A@2x} APÓÅŅÉÅÓ ÓÕĶĶĮŅŁ›$d (}A@48( Ōåįķ       Šģįłåä ×ļī D‰ @1W(   Šļéīōó     2y}Z(d A€.(              (8-@@B6‘-€8@<, ApLU6œ-€8@<,(-@%2z}@,(œ=6-€8@<,Q-@"%@U(V8‰ @1 6™-€8@<,4-@(%@8(™`R ‰ @02{}(R(Current as of Round † Game ‰&++†&@,$@,j$( ($(Total games played: ‰tE‰@0#-@2|}@7&‰)(;-@@E A~GAdAU'-@@"G(PressÓŠĮĆÅ ĀĮŅto continueˆ F:A2}}d,"AUA`’AdAU APœ!!ĘÉĪĮĢÓ ĶÅÓÓĮĒÅÓ ÓÕĀŅĻÕŌÉĪÅӛ¦9‰"@0(9("Note: Teams have2~} been rank-ordered°e‰"@0(;($Finals now begin between top 4 teams>(e("Next game will be first semi-finalŗ:2}‰"@1(:(#Next game will be second semi-finalÄ4‰"@2(4(Next game will be grand finalĪ_‰"@3(&(2€}Series finished)(>(The winner was U6‘-€8@<@,_ ApŲ$ā ³° ĒĮĶÅÓ® ŅĮĪĖ­ĻŅÄÅŅ ŌÅĮĶӛģe (}2}A@f-@‚@0(H(End of second roundK(e(Semi-finals begin nowöF(F(;Standby while I rank-order2‚} the teams and save data to disk4ž-@@4›-@@6@ 1'€8@<›,!€8@<›&@,2ƒ}1 A  › ž$ Ó×ĮŠ Ō×Ļ ŅĻ×Ó ÉĪ Ņ± ĶĮŌŅÉŲ›(OŸ-@@-68Ÿ<@,-€8Ÿ<›,K68Ÿ<@,-€8Ÿ<›&@2„},O Ÿ2RŸ-@@56€8Ÿ<›&@,-8Ÿ<@,K6€8Ÿ<›,-8Ÿ<@,O ŸR$€ D:SERIES.BAS,-€8Ÿ<›&@0p1›2›3›4›5›6›5›6›1›2›3›4›1›2›3›4›5›6›3›7›4›5›4›0›47.11›53.03›48.47›45.07›52.45›40.92›8›8›8›7›8›7›17.666›46.401›24.235›32.192›26†}6.225›0›2›6›4›23››2›3›4›1›2›3›4›5›6›3›7›4›5›4›0›47.11›53.03›48.47›45.07›52.45›40.92›8›8›8›7›8›7›17.666›46.401›24.235›32.192›24PAKISTAN›AUSTRALIA›IMRAN 0 2 6 264F AZEEM 0 :ˆ} 3 14 144F MANSOOR › 2 14 69 NAQQASH 2 :‰} 6 246 NAWAZ › 5 33 44 OMAR 5 27:Š} 99 REHMEN › 4 24 49 QUADIR 5 33 44:‹} RASHID › 9 64 46 RAJA 3 22 166 OM:Œ}AR › 4 34 99 00 0 0 5.8 | | | | | | | | | | | | :} | | | |›HUGHES ĆOMAR ĀIMRAN 0 1 99F ALDERMANN Ņõī ļõō      43 1 137 :Ž} 46F HOGAN › ĀIMRAN 1 4 46F HOOKES Óōõķšåä      149 6 6131 :} 99FCMAGUIRE › ĀAZEEM 2 7 44F RACKEMANN ĆNAQQASH ĀRAJA 5 5 44:}F WESSELS Ņõī ļõō      › 22 2 19 66F RITCHIE Ņõī ļõō      23 129 69F MA:‘}RSH ĀNAQQAS›H 16 1 16 69F JONES Īļō ļõō      11 10 49F ALDERM:’}ANN ĀNAQQASH 0› 1 46F 1344102856.47 F| 0| 2|114|127|133|171|254|260|285|285| 59|139|20:“}0|264| |›166›102›204›198›182›28›2›0›0›1›2›1›0›0›0›0›1›2›0›2›3›2›2›4›108›4›5›13›4›6›5›4›7›36›4›8›80›4›9›6›9›10›22›10›11›0›0›:”}0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›0›3›2›2›4›108›4›5›13›4›6›5›4›7›36›4›8›80›4›9›6›9›10›22›10›11›0›0›8>