@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD 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 AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 144ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u8<<  B JKIHiDiELV`L8 8 BLV`LxT}8t8l Lu8hihiHHȱȱL8c !#3`Lu8JJJJ`H 8h`HU}ȩh Q8L8 Z8L8 8L8 8L8 8L8S:@9E:E9H '9 H9I9 8 '9h)0ICV}9D9L8 L :::: :Lr:::IEL[::i:iIIL[:`:i::iX}::L:`L{:w:w: C`L:L: D8:MEM.SAV: 8| 9 '9`L:L: D:DUP.SYS:̩ 8Y} x:ɀL: '9`88 |9Y:X: '9L); D8:DUP.SYS; 8::88 9 '98? :`;WL`; 9Z}Ln; ` :Y;Y;L;L;)} Setting Up ATARI 130XE Ram Disk; 9L; ; -9  [} L;D8:; :9 :Y;L 5==8= > >= q}LD>o=m==i 6=L>`TLI>Lj>} 堢>L ;6L> This program will work with and>t r};6L>" affect the diskette inserted in> ;6L> drive number %C.%E9> ?8L?"To specify another drive, simply s}> ;6LD?# enter just the drive's number at? ;6Lq?" the prompt (any key but a valid?N ;6L?& drive number requests t} 'no change').?{ ;6L?Which drive to use ? ? N6 _;E>E>1L:@4E>L:@E> 6E>9E>9E>9E>:L)@ %E%E u}Drive %C now selected.%E9@ ?8Lu@Lg@)%E%ENo change--drive %C still selected.%E9@= ?8`'Lz@L@ Current Syste v}m Configuration:@} ;6L@Active Drives: @ N6v@v@L@ v@=%:L@v@i0 6 6v@L@ 6 )L-AL w}&A (RamDisk)A ;6 )v@v@ILALdA!κ IF a RAMDISK is added toAB ;6LA# this configuration, th x}e DOS menuAn ;6LA will NOT work properly!A ;6v@ILOBLA!Һ do NOT return to DOS withA ;6LB" this confi y}guration active. theA ;6LHB# DOS menu will NOT work properly!B$ ;6L|B)%EUp to %B files open simultaneously.%E%E z}BR ?8LBDisk writes occur B N6yIPLBLB verify.B ;6LBLB with verify.B ;6` CloLBLC&} {}B ;6 w@LIC"Do you want to change any part ofC& ;6LrC that configuration (Y/N) ? CS N6 `= |}LC 6 69` B ByBLC#}Specify active drives by simplyC ;6LC" typing their drive numbers, oneC }} ;6L!D! after another. Any key exceptC ;6LOD# a valid drive number (1 to 4) isD+ ;6L}D# assumed to be end of your ~} entry.DY ;6LDActive drive numbers ? D N6 )   _;BB1LD4BLDB 6 6B) %: LDL }DLD 6L!E#How many files do you need to haveD ;6LKE open simultaneously (1-7) ? E+ N6 _;BB1L|E7BL|E }B 6B)  6LE!Do you want disk writes to occurE ;6LE verify (Y/N) ?E N6 `=ILEPyLEWyLF }!} E ;6 w@L@F#Are you this configurationF ;6LgF is what you want (Y/N) ? F }J N6 `=LFByB B LG  6LF!Current system configuration hasF ;6LF been changed. Do you want toF } ;6LG! make these changes to the diskF ;6L;G! currently in drive %C (Y/N) ? 9G ?8 `=ILG H69 }:  69LG 6 6LG!Unable to change DOS on that diskG ;6LG! because error # %U occurred.%E9 }G ?8 6LGLB`,LGL!H&}Please enter the name of the BASICG ;6LLH program that you wish to haveH+ ;6LzH# auto }matically RUN when this diskHV ;6LH is next Booted.H ;6LH!Do NOT enter the drive specifierH ;6LH# (i.e., do }not use D:, D1:, etc.)H ;6LI" but DO use the proper extensionH ;6LKI" (e.g., .BAS, .SAV, etc.) if youI( ;6LtI } SAVEd it with an extension.IU ;6LI"REMEMBER: The BASIC program thatI~ ;6LI wish to 'AUTORUN' in this wayI ;6L }I! MUST be SAVEd on the same diskI ;6L%J" which receives this AUTORUN.SYSJ ;6L@J program file!J/ ;6LpJ%Now e }nter your BASIC program's nameJJ ;6LJ here >> Jz N6 9 |;LJ`G9 <`ILJLJ&} }ήӠ堢J ;6LK"When the disk currently in driveJ ;6L=K# number %C is next booted, what%E9K ?8L }hK do you want to happen?KN ;6LK"1. The RS232 (R:) drivers for theKr ;6LK! ATARI 850 Interface Module areK ;6L }K loaded and made active.K ;6LL&2. A BASIC program will automaticallyK ;6L2L load and RUN.L! ;6L_L"3. Both }actions (1. and 2. above)L< ;6LxL will occur.Li ;6LL0. None--quit to main menu.L ;6LL! Your choice (0,1,2 },or 3) ? L N6 _;JJ0LL3ʹJLLJ)` = ;LJRINTELM JMMLM9`M)LwO GILMLUM} }Oops! That was not aM; ;6LsM valid file name!M_ ;6LM%Read the instructions again, please.M} ;6 ;9`99 }Т9 < H699 69LeO9ILN9LN}Be careful!M ;6L9NThe BASIC program name you used }N ;6L`N has not yet been SAVEd onNC ;6LxN this disk!Nj ;6LNDo you want to do this AUTORUNN ;6LN setup a }nyway (Y/N) ? N N6 `=ILN9`LeO 6L O#Oops! Error # %U while trying to%E9N ?8L=O check that BASIC prog }ram file.O ;6L]O%EUnable to continue.OG ?8`:9Т: L }U9SI2LU BLU9SI3LU MLU =9LU 6 6 ;LS`:S,or 3) ? U8 N6 _;9S99SI0L~U RLU9SI1LU F>L Au L <.`Lu 4N (c)1983 Action Computer Services  B JKIH}iDiELV`L94 94 BLV`L44l L4 &` Fj`8冨}凪` 4EӅӥ 4`ʆǪƩ Ɛee` 4ƦʆǢ &Ɛeǐ 5 }5L4 4'&&&8儨児祂*L4&&*ń8&&L4 W5`hihiHHȱȱ}L4c !#3`L4JJJJ`H 4h`Hȩh n4L5 w4L5 !4L}5 )4L5 /4H8`HhHh [6L5 BHI V䅠L5 L6 94L5Ԇ} ؠPIPP` 6P )4L5 6L6 6L6 7L6H- 68塪墨hL7 7L6 "}7L6 6ȹP`텠8堨塪 6芨Oȩ-`PP 6P棩 Ѥģ0}-ģ6000:,80H & &ehe&eģ0ʥ 8堅塅`$ 6&*i0:0i 6Ʀ`}¢ 护°ڱ%ȱ%E 6L\8担CS N6L\8I 7L\8H 8L\8 6L\8 } &B V 5NLMȑ` MLN%B VL5S:8E:9[\ZUVT`Ѣ =9`ȱѢĦ}`膡``ťƤe8夰LS9 Ƥ8`ŦeѠ}e桊LW9RUb IOCBN9leBuf;b IOCBlen = Len%b IOCBcmd = 11b CIO(0,$20)a a} IF IOCBsta>3 THENa. QUIT(IOC9,"while writing DOS 2.x Lz:`L~:)IL:L~:)IL:L:`L: }6::`L:Lu L:o:ҭv:4u:4 H6 :L: 6 6L; Hit Ԡ to Restart.: ;6L9; Hit Ԡ to qu}it to DOS.; ;6)ILS;L@;)Ld; : w:FilLm; 5g;} 6L;Error #%B %S%Ei;h;g;;{ ?8 :HL;;}L;was unexpected!;; j;L;L;+}%E%E%EThe disk in drive %U does not appear9; ?8L)< to be a valid DOS 3 disk!}< ;6 : 9 RETURNLB<4< :3<3=m===m==== "5=e==e===== g==Р=L'>`ert DOL>9}>9>>>͎>>L>>>>> g=>i>>i>>>L>9ۢ g=>͒>L+?>9>͓>L%}?>L%? ;>L>` L0?,?,?0LH?9,?LH?`,?AL]?Z,?L]?`,?I.Lh?` ;pasLq?t:s:m?Ȍl??l?m?L?}m?l? 49e9ek?k?L?k?IL?m?t:l?s:l?Хm?L?` FIL???D\:9i0]::^:??}?? 49e?9e??m??iI L{@? L{@?m??i?[:??L3@?i ?i}I /?i ?iI ?i ?iI LA.?[:? ? ?LA?m??iI LA?m??i?}[:??L@?[:8???[:??DADA?L`A'?[:?? -?? 6?L9A`Z) LlAbAaAhAgA} 6LA # Fi}le name # File nameA ;6LA!   A ;6gAhA0LBs:aAt:bALBbAaA 4}9e9efAfAILBfALBhAgA 4eeAgA)hA)LoBeA 9LyBeA 9aA bA}LB 6bAaA 7 6bAaA ?gAhAaAbALAbAaA`$ LBBBLB"%EOn which drive (1-4) is %S disk?BBB} ?8 :BBILC} 6 :B)BB1LGC4BLGCB 6B)` 6LCLRCLpC} ٠CU ;6LC!}Copy files from a DOS 3 disk toCz ;6LC a DOS 2.5 (or DOS 2.0) disk.C ;6LC%(Hit Π for drive # to quit.)C} ;6LDDOS 3D B9LDDOS 2.xD B9`imem - L4D+D*D+D*D 49e,D9e-D,Di.D-Di/D,Di }-Di0D,Di -Di99.D/D)9ȱ)90D`LD99999ɀ9LD`LD99}`DOSLDD9D9D9ɀ9LUED99LUEDD99 = DDeDDeDDL E8D9D9` LkEgE }b VcLEgELELEwhile closing DOS 2.x fileEc j;`tLEE hE:e\dbEjk VcLFL} Fwhile opening DOS 2.x fileEc j;`%BLFFF9e9dFiFh b VcLvFLlFwhile writing DOS 2.x fi}leFQc j;`Ԡ LFxFwF} 6xFwF 49eyF9ezF?wFxF%yFzFyFzFIL0GLFNo} file with that number!F ;6 6L%GHit Ԡ to try again.G ;6 {:`LFG%E%EReady to copy G3 ?8xFwF ?LtG%E%EHit }Ԡ if okay.%EGY ?8LGHit Ԡ to reject copy.G~ ;6)ILGLG)LG`xFwF 1D99}F D}|F{F9M9LH 6L H%Please remove DOS 3 ('from') disk andG ;6LMH" insert DOS 2.x ('to') disk.H* ;6 6LvH }Push Ԡ when ready.HZ ;6 {:LH#---copying Ϡ DOS 2.x disk---H ;6}F ELH}FILH}F E|F{F F }F9M9}LI hE 6LI%Please remove DOS 2.x ('to') disk andH ;6L>I" insert DOS 3 ('from') disk.I ;6 6LgI Push }Ԡ when ready.IK ;6 {:LI#---copying ͠ DOS 3 disk---It ;699LG9M9LI hE} 6LIFile Copied OK}AY!I ;6 6LIHit Ԡ to continue.I ;6 {:`axGoodRLJ899) J) J J J 499 OCL{J}(%E%EPlace the DOS 3 disk in drive %B%E%E9JR ?89M9LK 6LJ$CAUTION: You will be swapping disks.J ;6 6LJ } Put a write protect tabJ ;6LK on your DOS 3 disk!J ;6LVKLHK&Place the DOS 2.x disk in drive %B%E%E}9K! ?8 6LuKPush Ԡ when ready.K\ ;6 {: > n?s: t:LKLK)}Sorry! No files on that DOS 3 disk!K ;6 :}JȌJJJ iAJJ 6 6LL#Choose a file to copy by typing itsK ;6L3L number as given above.L ;6 6Js:J}t:0LLLmLOr see more files by typingLQ ;6LL just Π.Lw ;6LLLL Or just hit Π to Restart,L ;6LL$ } Quit to DOS, or View names again.L ;6 6LM堿L N6 ?<J J JJJs:Jt:LK J JL'N}} 6L]M%EReady to quit?%E%E%EMF ?8 6 6LM Hit Ԡ to Restart.Mm ;6LM Hit Ԡ to Quit to DOS.M ;6L}M% Hit Π to View files again.M ;6)ILMLM)LN :L$N)L$N w:L0NJ J ~FLK L7N} H6LENK:NB 6 J3N3NLVNv:4u:4} 6 :L}N4v:4u:;4;46Ny:5Nx:o:) 4N`}zN6LENK:NB 6 J3N3NLVNv:4u:4} 6 :L}N4v:4u:;4;46Ny:5Nx:o:) 4N`u L <.`Lu 4O (c)1983 Action Computer Services  B JKIH}iDiELV`L94 94 BLV` Fj`8冨凪` 4EӅӥ 4}`ʆǪƩ Ɛee` 4ƦʆǢ &Ɛeǐ 4 4L4hihiHHȱȱ}`Hh`Hȩh n4L]5 w4L]5 !4L]5 )4L]5 /4H8`HhH}h 5L]5 BHI V䅠L]5 L5 94L]5Ԇ ؠPIPP` 6P )4L]5} <6L6 6LA6 U6L6H- 68塪墨hLU6 n6L6 u6L6 6ȹP`텠8堨} 6芨Oȩ-`PP 5P棩 Ѥģ0-ģ6000:,80H & &ehe&}eģ0ʥ 8堅塅`$ 6&*i0:0i 6Ʀ`¢ 护°ڱ%ȱ%}E 6L7担CS 5L7I n6L7H i7L7 <6L7S: 8E:8[\ZUVT`Hhƣ}Ģ`ƥĤ`Oq8}q8}q8}q8 q8}LF:} 6`LO:0123456789ABCDEFLc:O:O:JJJJP: 6O:)P: 6`L:::: `:: `:`L:::}: :L: 6:d:L: 6:譨:L: 6:: <6`L:)IL;L:)L;L;`Lu L&;B:} ;LN;}Please insert DOS 2.5;6 5Ln;disk and press Ԣ;X 5 :L0;L; 05{;L;}Error %B while %S%E};|;}{;; 7L;To continue DISKFIX, hit Ԣ; 5 : L:L;;;0L<9;L<``L< < < ;I 058>9>;>:>8>@R =`Lj> 05c>d>f>e>c>W =`L>>}> 4q8e1:r8e2:1:2:6:1:i@:2:iA:@:A:ȱ;::: m@:*(mA:ȱ9:8:1:i}2:i : J8 :` L??IL!@L@writing dir}ectory@? ~;`DL*@#@"@"@#@L@#@"@ 4q8e%@r8e&@im"@m#@&@%@ <>$@$}@IL@L@reading directory@$@ ~;"@#@L2@`LL@@ C:@@@i@@@LAF@)@@)L A@ 8LA}@ 8@ L$A 6@ n6 6@ >6:LA6:)LUAD 6LA6:IBLgA 6LA6:IbLyA* 6LA6:ICLAW 6}LA6:ILA 6LA6:I#LA* 6LA? 6 6: 5LALA (unused)A 5@L@`LA 05AA @LB%E%EChoose a f}ile number> A 7;;AA S<`q8LTB '@B2 A2BLqBB2 A2BLBB2 6}PBPB`LB`m LBBB QB5:4:4:5:0?4:5:0LBLB%EYou didn't choose anything!%EB 7`4: >}6:L1CLCThat file is unused.C 55:4:`LXC#} Type Name Length StartC4 5LhC Cb 56: `: 6 } 6: 5 6 6;::: : 6 6 69:8: :LC%EâC 76: : 6 6: 5 6 6;::: : 6 6 } 69:8: : 6LD%E%S BBD 7L-D this fileD# =LED5:4:`LIDS3: S)LmDdLrD`}@ LDtDsDvDuDsDwDtDDDwDLDxDxDLDwD8xD=yDLDuDvDxDLDwDLDvDuD`LD }FD8FuE3:!u88DvDL3EDD򈑮LHEDDÈ mD*(mDHHY Dhh}8DDDDHHZ Dhh 5`ELEEEEE 4E)E)Ee}Ee818`L F8u '88 '8FFFFLXFFF EFFL5FFhFpF}FLFFF EFFLbF E`LFFFFi}FFiFFFJJ`LFFFFi}Fi)FF}i~FiFFF`LGGGGi}Gi)Gi~Gi`LDG8GG=GLGVerifying file %B%E8GGv 7=G >GL&H99 J89>G=G <>9 F7:7:M8GLGL&H}=G>GLG:G>G=G E;GG@G=G?G9 F>G=GLG=G >GLHLKHBad link in file %B - 5:4:H4 7;G }@:A:6:I6:I#6:IB 6:IbL1K4: AGLK6:ICLKLbK#Deleting file } %B - open for write%E5:4:K> 71:2: ?4:5:LJ DJJɀLKLK writing VTOCKJ ~;`LKLK&%E%EIn }sert desired disk and hit ԢK 7 :`LKKN:KM:@I ?1LkLL7L}%EDOS 2.5 not booted!%E%EL 7L^LAbor }ting - please hit ԢLA 5 : #;@ C: 5L~LK:L{ d5LL=}%E ؠ٠%E for ATARI  }DOS 2.5%E%E%EL 73: 3:LL3:LM Current Drive # is %B%E3:L 7LM 1) Change Drive # } 2) Unerase File 3) Verify Disk 4) Rename File by # 5) Quit to DOS Which? M 5 }5KK1LM5KLMK 6KI1LM 9? L:LbOKI2LvN KL NUneraseN B4:5:LsN4:@5:0LsN6:) }6:ICLLN 8I JLsNLlN%EThat's not an erased file!NO 7LbOKI3LN 6 6LNOK to verify entire diskN =LN K JL}bOKI4LN KLNRenameN B4:5:LN4:@5:0LN =JLbOKI5L8OLO}Return to DOS 2.5O =L2O 5 #; L}:LbOL[O%EYou didn't choose anything!%EO; 7LO%E%EPress Ԡ for menu > Oe 7 :LsL`LOB:) K``O L{ ;TRIVIA;by Clinton Branch;Oct. 1985(;OS equates2 RAMTOPj7 DLADR0< DMA/A CIOVF ICCOM}BKICBADRDPICAUX1JUICAUX2KZICBLENH_ICSTATCdCOLOR2i KEYn AUDF1s AUDC1x}AUDCTL}ICAUX3LICAUX5N WSYNC ԌCOLPF2БINTADR NMIENԛRANDOM ҠXLCHECK}TRIGGER;;offset by 1CONSOLй ATRACTM;program equates TEMPADDRESS SMY PADR^ DFL}AG< SECTOR BYTE TEMP2QLENGTH=  TEMP3>LINESTART?LINEEND@SOUNDFLAGJ4F} !START0DISKBOOT };;use 253 for double density game;assorted storage areas DL1;game board display list Z p=}p=p=B=======================A== DL2;GRAPHICS 0 error screenc p=p=}p=B==========================A==DL3;attract mode screen!] p=p}=p=J=== = = = = = = = = = = = = = = = = = = = = = = = "9  = = = = = = ======}===A==&#DL4;final scores screen (GR.1)+c p=p=p=F====================}======A==0QUESTIONd:ANSWER1$?ANSWER2$DANSWER3$IANSWER4$NCORRECT;holds right answ}erX]XLFLAG;;1=XL model^NUMPLAYERSb?SCORES;holds 3-byte DECIMAL score values for up to 4 teamsl q/NU}MQUEST;total number of questions on diskrt9NUMUSED;number of questions used in this game (0-11)uvGUSEDQUEST; }holds up to 11 2-byte question numbers used in this game BUFFERFILESPEC AD:QUESTIONA COLOR3MESS1 A!} Insert question disk - press .A3MESS2 A I/O error. Re-boot game disk. A3MESS3 A Insufficient question"}s - try again. A MASK=MINIMUM;;minimum required questions on disk for 1 game'NUMBER;;question number select#}ed ROUNDROUNDNUM+POINTS;;holds decimal point value/10PLAYERUP4QUESTFLAG;;1= question complete$}ly printed out.EXPOSE;;1= show correct answer if wrongSCOREMESS ASCOREA5QUESTMESS AӠΠ 0 %}POINTS * AROUNDMESS AroundAWRONGMESS AYOU'RE WRONGARIGHTMESS AYOU'RE RIGHTAREADYMESS AAPAUSEM&}ESS A䮮ABLANKS A A$ANSWERMESS AATIMEMESS A TIME'S UP! APLAYERMESS APL'}AYER UPA .ELIGIBLE;;0= player can answer question XSAVE YSAVEBADSAVE;;these three bytes used to rest(}ore question printoutSCANSTART TIMER TIMER2 TIME  START!-"Q># PDEMOFLAG$Q>%PSAMPLEF)}LAG& QRAMTOP';(S>)PSM*%>, PDL18. PDL28/ PDL380 PDL484%>9 Q>4DL1> PDL18C3H Q>5DL1M PDL18N*}%>R Q>4DL2T PDL28W Q>4DL4X PDL48\3^ Q>5DL2` PDL28a Q>5DL4b PDL48g%>.h Q>4DL3j PDL38k3l Q>5DL+}3n PDL38o ATTRACTp RESTARTqQ>r PATRACTyQSMzPADDRESS{Q>(| PADDRESS} Q>4MESS1~ PPADR Q>5MESS1,} PPADR%>% PRINT OPENLOOPQ>PKEY ?LOOP2QKEYR>  H?LOOP27OPENCHANNEL;equivilent to OP-}EN #1,4,0,"D:QUESTION"$>Q> PICCOM9Q> PICAUX19Q> PICAUX29Q>4FILESPEC PICBADR9Q>5FILESP.}ECPICBADR9 CIO QICSTAT9R> DGETNUMR> H?IOERR BUZZER CLOSE !OPENLOOP ?IOERR BUZ/}ZER Q>4MESS2 PPADR Q>5MESS2 PPADR%>% PRINT CLOSE ?ENDLESSQ> F?ENDLESSTGETNUM;equivi0}lent to INPUT #1,A$ (A$ is total number of questions on disk) CLEARBUFF$> Q>4BUFFER PICBADR9 Q>5BUFFER1}PICBADR9Q>$ PICCOM9&Q>( PICBLEN9. CIOL)NOTE;equivilent to NOTE #1,SECT,BYTEV$>`Q>&j PICCOM2}9t CIO~ QICAUX39 PSECTORQICAUX39PSECTOR QICAUX59 PBYTE';;enter number of questions on disk$3}> &NUMQUEST&NUMQUEST ?LOOP QBUFFER9R>  F?NEXTR>0 F?NEXT;S>0? QBUFFER9R> 4} F?ONESQBUFFER9R>  F?TENS  H?HUNDS# ?ONES(C.,2 ONUMQUEST4 PNUMQUEST7 D?NEXT<#NUMQUEST> H5}?NEXTA ?TENSP QNUMQUESTU,ZO> d PNUMQUESTiQNUMQUESTnO>sPNUMQUESTx1} H?TENS F?NEXT ?HUNDS6} QNUMQUEST,O>d PNUMQUESTQNUMQUESTO>PNUMQUEST1 H?HUNDS ?NEXT2(> H?LOOP Q7}NUMQUEST;S> PNUMQUESTQNUMQUESTS>PNUMQUEST>?DONE;now check for minimum required questions f8}or 1 game COUNTMINIMUMQNUMQUESTH?OK QNUMQUEST RMINIMUME?OK Q>4MESS3 PPADR Q>5MESS3 PPADR9}%>% PRINT BUZZER CLOSE !OPENLOOP?OK ZEROSSCREEN;setup screenQ>PDMA Q>4DL1 P:}DLADR Q>5DL1 PDLADR CLEARSM"Q>4INTERRUPT, PINTADR6Q>5INTERRUPT@PINTADRD SELECTI QCOLOR2J PC;}OLOROQ>T PNMIEN^Q>"hPDMArQSM|PADDRESSQ> PADDRESSQ>4SCOREMESS PPADRQ>5SCOREMESS PPA<}DR%> PRINTQNUMPLAYERSR> F?QUIT%> Q>;;"1"P@ADDRESS7Q>  PADDRESS%>& PRINT0=}%>:QNUMPLAYERSD,NO>XP@ADDRESS7b R>;;"2"l F?QUITvQNUMPLAYERSR> H?FOURQ> PADDRESS%>>} PRINT%>Q>P@ADDRESS7 H?QUIT ?FOURQ>  PADDRESS%>  PRINT%> Q>*P@ADDRESS74Q?}>> PADDRESSH%>R PRINT\%>f Q>;;"3"pP@ADDRESS7 ?QUIT SHOWSCORES( ;give value of next question-  @}QUESTSETUP2 < Q>WF PADDRESSP Q>4ROUNDMESSZ PPADRd Q>5ROUNDMESSn PPADRx %> PRINT %> Q>C P@AA}DDRESS7 3 3 QROUND , O> L>@ P@ADDRESS7 Q>x PADDRESS Q>4QUESTMESS PPADR Q>5QUESTMESS PPADB}R %># PRINT %>$ QROUND R> H?CONT Q> ?CONT , O> P@ADDRESS7 %> $>  &TEMP  PC}OINTVALUE QRANDOM" M>$ ,& O>, PTEMP6  POINTVALUE8 QDEMOFLAG: H?SKIP;  PAUSECHECK< ?SKIP@ Q>4READYMESSD}J PPADRT Q>5READYMESSY PPADR^ Q>c PADDRESSh %>j PRINTn %>o ?LOOPp $>r DELAYt 1v H?LOOPw QE}DEMOFLAGx H?SKIP2|  PAUSECHECK~ ?SKIP2 Q>4BLANKS PPADR Q>5BLANKS PPADR %> PRINT $PUTQUEST;addF} question to screen  QNUMPLAYERS R> H?COMPETE ?ONEPLAYER Q> H?CONT ?COMPETE Q> ?CONT PPLAG}YERUP Q> PDFLAG PATRACT Q> PADDRESS /;first determine the length of the question %>d ?LOOP 1 QQH}UESTION8 R> & F?LOOP0 'QLENGTH: ,;now determine the beginning of the lineD %>N LINELOOPX 3b QQUESTION8l R> I}v FLINELOOP 'LINESTART );now determine the ending of the line C , O>( ? ?LOOP3 1 QQUESTION8 R> J}H?LOOP3 'LINEEND (;update LINEEND if this is last line C RQLENGTH D?DONE QQLENGTH* PLINEEND4 ?DONE;now K}print out line9 > $LINESTARTC %>F ?LOOPG QUESTENTRYH QQUESTION9J R> L F?SPACER  TRANSLATET P@ADDRESS7W L} PRINTSOUND\  SCANTRIGSa ?SPACEf (LINEENDp F?LINEOVERz 2 3 H?LOOP *?LINEOVER;set up formatting next line M}QLINEEND RQLENGTH E?QUESTOVER QADDRESS , O>( PADDRESS QADDRESS O> PADDRESS %LINEEND !N}LINELOOP?QUESTOVER Q> PQUESTFLAG  SHORTPAUSE QDEMOFLAGHSHOWANSWERS QPLAYERUPFSHOWANSWERS PLAYO}ERENTRYSHOWANSWERS SOUNDOFFQSM ,"O>$PADDRESS.Q>}8 PADDRESSBQ>4ANSWERMESSL PPADRVQ>5AP}NSWERMESS` PPADRb%>c PRINTd SHORTPAUSEtQ>~ PADDRESS$>Q> PTEMP?LOOP2;print answers 1-4Q}%> QTEMPP@ADDRESS73Q>P@ADDRESS733 ?LOOP QANSWER19R>  F?CONT2 TRANSLATEP@ADDR}RESS7QNUMPLAYERSR> F?SCAN QPLAYERUP H?CONT2 ?SCAN PRINTSOUND SCANTRIGS ?CONT232)>( S} H?LOOP SHORTPAUSE QADDRESS,(O>(2 PADDRESS<QADDRESSFO>PPADDRESSU #TEMPZ QTEMPdR>n HT}?LOOP2 STARTIMER SOUNDOFFQSM,O>PADDRESSQ>D PADDRESS%>Q>PKEY ?LOOPP@U}ADDRESS73)>" H?LOOP,Q> ;;number of timer bars6 PTIME8Q>: PTIMER2< QPLAYERUP> H?REGULAR@Q>E H?V}STOREJ ?REGULARTQ>V ?STOREY PTEMP3^PTIMER2_ ?LOOP2` QPLAYERUPb H?CONT2lQ>n PTIMERp PTIMERq W}PDFLAGv STARTSCANx !?CONTy&;search for keyboard/trigger entryz ?CONT2{QKEY| R>;;"1" H?TWOQ>!CHECKX}ANSWER?TWOR> H?THREEQ>!CHECKANSWER ?THREER> H?FOURQ>!CHECKANSWER ?FOURR> HY}?CONTQ>!CHECKANSWER ?CONT "TIMER2 H?LOOP2"TIMER2 H?LOOP2 QTEMP3PTIMER2 %TIME1Z}Q@ADDRESS7,&T?(,*T?0P@ADDRESS7132333435363738393:3<P@ADDRESS7= TIMERSOUND>Q@ADDRESS[}7C H?LOOP2D "TIMEN H?LOOP2X SOUNDOFFb;time's up!!!Q>4TIMEMESS PPADRQ>5TIMEMESS PPADRQSM,\}O>PADDRESSQ>4 PADDRESS%>  PRINT  BUZZER2 BUZZER2  QPLAYERUP*F?NOPENALTY4QNUMPLAYERS>]}R>HF?NOPENALTYR !ENTRY\?NOPENALTYf !ENTRY2CHECKANSWER;first mark answer chosen PTEMP> SOU^}NDOFFQSM,O>PADDRESSQ> PADDRESS0 F?PUTX ?LOOP  QADDRESS,O>(( PADDRESS2QADDRE_}SS<O>FPADDRESSP0Z H?LOOPd ?PUTXn%>xQ>8P@ADDRESS7;now was this answer right?"QSM,,6O>`}@PADDRESSJQ>4T PADDRESSV QTEMPX RCORRECTZ FRIGHT\ WRONG]nQ>4WRONGMESSp PPADRrQ>5WRONGMESS| Pa}PADR%>  PRINT BUZZER2 BUZZER2 ENTRY$> DELAY $PLAYERUP0Q>PELIGIBLE9Q> Pb}TEMP3$> ?LOOPQELIGIBLE9 H?NEXT QTEMP3H?CONTINUE &TEMP3 ?NEXT0 H?LOOP QTEMP3 H?ONELc}EFT ENTRY2 REVEAL !ADVANCE ?ONELEFT PPLAYERUP  REVEAL  !ADDSCORE ?CONTINUE ERASERQQUESTFLAGd}H?QUESTOVER REINSTATE!QUESTENTRY0?QUESTOVERC!STARTIMERD RIGHTINQ>4RIGHTMESSX PPADRbQ>5RIGHTMESSle} PPADRv%>  PRINT RIGHTSOUND ADDSCORE';now add points to PLAYERUP's score $PLAYERUP%>0 F?Af}DD ?LOOP23330 H?LOOP2?ADDQ>  $ROUND ?LOOP3 ,*O> 40> H?LOOP3H $ROUNDR(>\ H?COg}NTf,kO> o ?CONTp1PTEMP;;number of times to add points to scorez ?LOOP4< QSCORES8, OPOINTS PSCORES8q}b%DOS SYSb*)DUP SYSb SRAMDISK COMF\SETUP COM8COPY32 COM9DISKFIX COMbTRIVIA M65b9,AUTORUN SYSbeQUESTMAKBASQSCORES8O>PSCORES8QSCORES8O>PSCORES8- "TEMP H?LOOP4 SHOWSCORES"ADVANCE;r}move to next question  QDEMOFLAG F?GOON:( ?GOONQ> PTEMP ?LOOP5$> DELAY "TEMP H?LOOP5s} PAUSECHECK #ROUNDNUM QROUNDNUMR> H?RECYCLEQ> PROUNDNUM #ROUND QROUNDR> FGAMEOVER t}DISPLAYROUND ?RECYCLEQ>PDMA CLEARSM !SCREENX GAMEOVERblQ>vPDMA{ CLOSE Q>4DL4 PDLADRu} Q>5DL4 PDLADR CLEARSMQ>"PDMAQ>4ENDMESS PPADRQ>5ENDMESS PPADR%> QSMPADDRESSv}Q>,  PADDRESS PRINTQ>d PADDRESSQ>4PLAYERMESS PPADR Q>5PLAYERMESS" PPADR%$>* ?LOOP4%>w}> PRINTH%>RA\,fO>pP@ADDRESS7r QADDRESSt,vO> x PADDRESSzQADDRESS|O>}PADDRESS~Ax}5Q>0 F?CONT ?LOOP2,O>0 H?LOOP2 ?CONT> PRINTSCORE7> QADDRESS,O> PAy}DDRESSQADDRESSO>PADDRESS2(NUMPLAYERS D?LOOP F?LOOP%> ?LOOP3$> DELAY1 Hz}?LOOP3 ATTRACTENTRY$ !RESTART'"CLEARSM;clears 4 pages of RAM'$'QSM.'PADDRESS8'Q>B' PADDRESSL'?V'$>{}`' ?LOOPj'P@ADDRESS7t'3~' H?LOOP'#ADDRESS'0' H?LOOP':'6PRINT;puts message from PADR on screen at ADDRESS|}'' ?LOOP' Q@PADR7'P@ADDRESS7(1 ( I?LOOP(:<( BUZZER>(Q>A(PDMAB( BUZZER2F(Q>P( PAUDF1Z(Q>d( PAUDCT}}Ln(Q>x( PAUDC1($>( DELAY($>d( DELAY(Q>( PAUDC1(Q>"(PDMA(:) DELAY ))Q>) PDFLAG") ?LO~}OP,) "DFLAG6) H?LOOP@)0J) H?LOOPT):h)!CLOSE;equivilent to CLOSE #1r)$>|)Q> ) PICCOM9) CIO):)$CLEARBUFF;}zeros out data buffer))Q>)?) ?LOOP) PBUFFER8)3*)>* H?LOOP*:0*9ZEROS;sets up important points for beg}inning of game:*?*Q>D* PNUMUSEDI* PPLAYERUPN*>X* ?LOOP]* PSCORES9b*2g*(> l* H?LOOPv*Q>{* PROUND* PROUNDNU}M* DISPLAYROUND*:*%SELECT;choose question from disk** QDEMOFLAG*F?OK* !SKIPOVER*?OK*$>* QSECTOR+ }PICAUX39+QSECTOR+PICAUX39+ QBYTE+ PICAUX59+ ?LOOP + QRANDOM+M>+ PTEMP+QNUMQUEST+ RTEMP+ D}?LOOP+ QTEMP+PNUMBER + ?LOOP3*+ QRANDOM4+ PTEMP6+QNUMQUEST8+RNUMBER:+H?CHECKOLD>+ QNUMQUEST@+ RTEMPB}+ D?LOOPC+ ?CHECKOLDD+ QTEMPF+ PNUMBERH+ QNUMUSEDI+F?CHECKOVERJ+S>N+T?P+>R+ ?LOOP2\+QUSEDQUEST9f+ RNUMBERp+H}?NEXTCHECKz+QUSEDQUEST9+RNUMBER+ F?LOOP+?NEXTCHECK+(>+F?CHECKOVER+0+0+ !?LOOP2+F?CHECKOVER;n}ow translate NUMBER into SECTOR and BYTE co-ordinates+ QNUMUSED+,+T?+>+ QNUMBER+PUSEDQUEST9,QNUMBER,PUS}EDQUEST9, #NUMUSED,$>$,%NUMBER., F?LOBYTE8, ?LOOP4:,C<,5;;save Y-registerB, %DISKBOOTD, QICAUX59F,)>H,} H?SINGLEI,,J,O>K, !?CONTL, ?SINGLEN,,P,O>YQ, ?CONTR, D?SKIPINCT, PICAUX59V, #ICAUX39W, QICAUX39X,H?SKIPINC2}Y,#ICAUX39Z, ?SKIPINC2[, QICAUX59\,O>], ?SKIPINC^, RDISKBOOT_, D?STOREa, SDISKBOOTb, PICAUX59c, #ICAUX39d, Q}ICAUX39e,H?SKIPINC3f,#ICAUX39g, ?SKIPINC3h, QICAUX59j, ?STOREl, PICAUX59n, QICAUX39p,)>r, H?SINGLE2t,,v,O>}x, !?CONT2z, ?SINGLE2{,,|,O>~, ?CONT2, PICAUX39,QICAUX39,O>,PICAUX39,)>, F?DONE,#ICAUX3}9, ?DONE,7,?,1, H?LOOP4, ?LOBYTE, %NUMBER, F?DONE2, ?LOOP5,C,5, %DISKBOOT, QICAUX59,)>, H?SIN}GLE3,,,O>, !?CONT3, ?SINGLE3,,,O>w, ?CONT3,D?SKIPINC4, PICAUX59, #ICAUX39, QICAUX39,H?SKIPINC5,}#ICAUX39, ?SKIPINC5, QICAUX59,O>, ?SKIPINC4, RDISKBOOT,D?SKIPINC6,;, SDISKBOOT, PICAUX59, #ICAUX3}9, QICAUX39,H?SKIPINC7,#ICAUX39, ?SKIPINC7, QICAUX59- ?SKIPINC6- PICAUX59-)>- F?CONT4 - #ICAUX39 - }QICAUX39- H?CONT4-#ICAUX39- ?CONT4-7-? -1#- H?LOOP5(-+?DONE2;is sector past or on directory?*-QICAUX3}9,- F?DONE3.-R>0- F?ADDON2- QICAUX394-R>h6- D?DONE37- ?ADDON8- QICAUX39:-,<-O> >- PICAUX39@-QICAUX39B-O>}D-PICAUX39P-.?DONE3;now enter question and answer dataU-Z-Q>%d- PICCOM9n- CIOx-$>-Q>d- PICBLEN9- F}ILLBUFF-%>- ?LOOP. QBUFFER8.PQUESTION8.3".)>d,. H?LOOP-.$>..Q>0. PICBLEN96. FILLBUFF8. SKIPOVER;. }ALLOFTHEABOVE<.%>=. QALLFLAG>. H?CONT2?.Q>@. PCORRECTA. INCREMENTYB. !?LOOP2E. ?CONT2F. ANSWERNUMBERH. PCORR}ECTI. PUTANSWERJ. ?LOOP2K. QALLFLAGL.R>M. H?CONT3N. PTEMPO. INCREMENTYP. !?LOOP3Q. ?CONT3R. ANSWERNUMBERS. RC}ORRECTT. F?CONT3V. PTEMPX. PUTANSWERZ. ?LOOP3\. QALLFLAG].R>^. H?CONT4_. PTEMP2`. INCREMENTYa. !?LOOP4b. ?CONT}4c. ANSWERNUMBERd. RTEMPf. F?CONT4g. RCORRECTh. F?CONT4i. PTEMP2j. PUTANSWER|. ?LOOP4. QALLFLAG.R>. F?ALLDO}NE. ?CONT5. ANSWERNUMBER. RCORRECT. F?CONT5. RTEMP. F?CONT5. RTEMP2. F?CONT5. PUTANSWER. ?ALLDONE. #C}ORRECT.:.PRINTSCORE..Q>.PTEMP;;1= score begun.?.QSCORES9. F?NEXT. DECODED/ ?NEXTN/3X/3b/QSCO}RES9l/ H?PRINTv/ QTEMP/ F?NEXT2/QSCORES9/ ?PRINT/ DECODE/ ?NEXT2/3/3/ QSCORES9/ DECODE/: 09DE}CODE;take value in accumulator and place on screen00< 0 PTEMP2*0A40590$>;0 QTEMP2=0 ?LOOP>0R> H0 D?DIGIT2R0}2\0;f0S> p0 !?LOOPz0 ?DIGIT20,0O>030P@ADDRESS7010(>0 H?PRINT0 QTEMP0 F?END0 ?PRINT0A0P@ADD}RESS70?END070>0Q>0 PTEMP0-0:814POINTVALUE;show current point value of question:1>1 ?LOOPB1 QRANDOMD1M}>G1 F?LOOPJ1R>L1 E?LOOPQ1 PPOINTST1 ?LOOP3V1 QRANDOM[1M>`1 F?LOOP3b1R> t1 E?LOOP3y1,z1 OPOINTS~1 PPOINTS}1<1 QPOINTS1$>1;1 ?LOOP21S> 1R> 1 D?PRINT121 H?LOOP21 ?PRINT131,1O>1P@ADDRESS7112A 2}P@ADDRESS72-2Q>(2 PAUDF122Q><2 PAUDCTLF2Q>P2 PAUDC1Z2$>2d2 DELAYn2Q>x2 PAUDC12$>2 DELAY2 "TE}MP2 H?LOOP2:2 PUTANSWER22 PTEMP32$>2 ?LOOP2 QTEMP32 H?ANSWER22 QBUFFER82 PANSWER192!?INCREMENT3 }?ANSWER23R>3 H?ANSWER3"3 QBUFFER8,3 PANSWER2963!?INCREMENT;3 ?ANSWER3@3R>J3 H?ANSWER4T3 QBUFFER8^3 PANSWER3}9h3!?INCREMENTr3 ?ANSWER4|3 QBUFFER83 PANSWER493?INCREMENT33323(>$3 H?LOOP3:X4MTRANSLATE;take value in }accumulator and translate into Atari screen codeb4l4R> v4 D?ADD644R>`4 D?SBC324R>4D?NOCHANGE4R>4 D?ADD}644R>4 D?SBC3248?NOCHANGE;for lower case/inverse lower case letters4:4/?ADD64;for control/inverse control lette}rs4,4O>@5: 5??SBC32;for uppercase/inverse uppercase letters and numbers5;5S> 5:6jSCANTRIGS;this checks for} more than one player, and if so, checks if anyone has pressed their trigger66A65;;save X-register6Q>6 PTIMER6 }PDFLAG6Q>6 PTIMER6 QPLAYERUP6FSTARTSCAN6Q>(6 PTIMER6 STARTSCAN6 QPLAYERUP6H?SKIPSCAN7 QRANDOM} 7M>7,7O>(7RNUMPLAYERS27F?OK<7ESTARTSCANF72?OK;start looking at player's trigger buttonsK7PSCANSTARTP7>U7} ?SCANLOOPZ7 QTRIGGER9d7 H?NEXTf7-QELIGIBLE9;;still eligible to buzz in?h7 H?NEXTj7 QDFLAGl7 H?POPn77p7 PXSAVEq7 } SAVEv7?POPw77x7 7;;POP7 WHICHPLAYER7 BUZZSOUND7!SHOWANSWERS7?NEXT;button not pressed7(NUMPLAYERS7 H?AD}VANCE7$>8H?ISSCANDONE8 ?ADVANCE82"8?ISSCANDONE$8(SCANSTART&8H?SCANLOOP'8 ?SKIPSCAN(8 "TIMER*8HSTARTSCAN,}8 "TIMER.8 QTIMER/8R>08F?STOPSOUND18R>68 H?CONT:8?STOPSOUND;8 SOUNDOFF@8 ?CONTE8 QTIMERN8HSTARTSC}ANP8 QDFLAGR8 H?RETURNT87^8>g8 ?RETURNh8:8MWHICHPLAYER;trigger button pressed! Indicate which player pressed first.}88-&PLAYERUP;;player who pressed first (1-4)8PLAYERENTRY8Q>4PLAYERMESS8 PPADR8Q>5PLAYERMESS8 PPADR8QSM}8,8O>8PADDRESS8Q>n8 PADDRESS9%>9 PRINT9%>&9 QPLAYERUP09,:9O>D9P@ADDRESS7N9:l97QUESTSETUP};setup these locations for each questionv99Q>9$NUMPLAYERS909 ?LOOP9PELIGIBLE9909 I?LOOP9$NUMPLAYERS9}(>9 F?DONE9Q>9 ?LOOP29PELIGIBLE9:2 :(>: H?LOOP24: ?DONE>:Q>H:PQUESTFLAG:::PRINTSOUND:Q>:} PAUDF1:Q>; PAUDCTL;Q>; PAUDC1$;:.; SOUNDOFF8;Q>B;PSOUNDFLAGL; PAUDC1N; PAUDC1O; PAUDC1Q; PAUDC}TLV;:`; BUZZSOUNDj;t;Q>~; PAUDCTL;Q>; PAUDC1; PAUDC1;Q>Ȧ;PSOUNDFLAG; ?LOOP; PAUDF1;,;O>; }PAUDF1;$>; DELAY<"SOUNDFLAG <QSOUNDFLAG<R>2< H?LOOP(< SOUNDOFFP<:<TIMERSOUND<<R>< H?STEP2}<Q><< H?PLAYIT< ?STEP2<R>< H?PAUSE<Q>Q< ?PLAYIT< PAUDF1<Q>< PAUDC1=:= ?PAUSE=Q>"= PAUDC1,=}:T=RIGHTSOUND^=h=Q>r= PAUDCTL|=Q>= PAUDF1=Q> = PAUDF1=Q>= PAUDF1=Q>=PSOUNDFLAG= ?LOOP}=QSOUNDFLAG= PAUDC1= PAUDC1= PAUDC1=$>#= DELAY=#SOUNDFLAG=QSOUNDFLAG=R>= H?LOOP> ?LOOP2!>}QSOUNDFLAG&> PAUDC1+> PAUDC10> PAUDC15>$>2:> DELAYD>"SOUNDFLAGN> H?LOOP2X> SOUNDOFF>:>> QEXPOSE> H?CONT>Q>> PTEMP> ?LOOP4>$>> DELAY> "TEMP> H?L}OOP4> ?RETURN>:> ?CONT>QSM>,>O>>PADDRESS>Q>h> PADDRESS> $CORRECT? ?LOOP ? QADDRESS?, ?O>(*}? PADDRESS4?QADDRESS>?O>H?PADDRESSR?0\? H?LOOPf?$> k? &TEMPp? ?LOOP2z?%>? ?LOOP3?Q@ADDRESS7?,?}O>?P@ADDRESS7?3?)>(? H?LOOP3?$>? DELAY? "TEMP? H?LOOP2?:@ ERASER@@Q>@ PPLAYERUP@ Q>4BL}ANKS$@ PPADR.@ Q>5BLANKS8@ PPADRB@QSML@,V@O>`@PADDRESSj@Q>nt@ PADDRESS~@%>@ PRINT@Q>h@ PADDRES}S@$>@ ?LOOP@ QADDRESS@,@O>(@ PADDRESS@QADDRESS@O>@PADDRESSA%> A QBLANKS8AP@ADDRESS7A}0(A H?LOOP2AQ>0FA%>(PA ?LOOP2ZAP@ADDRESS7dA1nA H?LOOP2xA:ASAVEAAQQUESTFLAGA H?RETURN}A 'YSAVEA QADDRESSA PADSAVEA ?RETURNA:B REINSTATE BBQSMB,BO>BPADDRESSBQ>|B PADDRESSB%>}BCB ?LOOP BP@ADDRESS7"B3$B)>&B H?LOOP6BQSM8BPADDRESS:B QADSAVEBR>d@B E?CONTBB#ADDRESSD}B ?CONTFB $XSAVEHB %YSAVEJB:hBCHANGESOUNDrB|BQ>B PAUDCTLBQ>dBPSOUNDFLAGBQ>*B PAUDC1BQSOUNDFLAGB }?LOOPB PAUDF1B$>B DELAYB"SOUNDFLAGBQSOUNDFLAGBR> C H?LOOPC SOUNDOFFC:\DVCOUNTMINIMUM;calculate the} minimum number of questions required for game selectedfDpDQ> zD PMINIMUME:8J2PAUSECHECK;checks for pause and/or res}et gameBJLJQKEYNJR>!;;space barPJ H?RETURNRJQSMTJPADDRESSVJQ>XJ PADDRESSZJQ>4PAUSEMESS\J PPADR^JQ>5PAU}SEMESS`J PPADRbJ%>fJ PRINTjJ ?LOOPtJQ>~JPKEYJQKEYJR>!;;still pressed?J F?LOOPJQ>JPKEYJ ?LOOP2}JQKEYJR>!J F?UNPAUSEJR>;; keyJ H?LOOP2J7K 7;;POPK CLOSE K ATTRACTENTRYK !RESTARTK ?UNPAUSEKQ}>(KPKEY2KQKEY!FK F?UNPAUSEHK%>JKQ>LK ?LOOP3NKP@ADDRESS7PK1RK I?LOOP3XK ?RETURNZK:,LDISPLAYROUND6L}LQ>LPDMAL Q>4DL4L PDLADRL Q>5DL4L PDLADRL CLEARSMLQ>"LPDMALQ>4ROUNDMESSL PPADRLQ>5ROUNDM}ESSL PPADRL%>MQSMMPADDRESSMQ>BM PADDRESSM PRINTM%>MQ>C!MP@ADDRESS7&M3+M QROUND0M,5MO>}:ML>@?MP@ADDRESS7DMQ>IM PADDRESSNMQ>4ROUNDMESS2SM PPADRXMQ>5ROUNDMESS2]M PPADRbM%>'lM PRINTqM%>vM Q}ROUND{M,MO>ML>MR>M H?PRINTM,MO>M ?PRINTMP@ADDRESS7MQ>M PCOLOR2M%>M ?LOOPM$>M DEL}AYM1M H?LOOPMQ>M PCOLOR2M: NINTERRUPT;DL interrupt%N*N54N QCOLOR>N F?BLACKHNQ>RN F?STORE\N ?BLACKfN}Q>pN ?STOREuN PCOLORzN PWSYNCN PCOLPF2N7N9N0FILLBUFF;read 128 bytes of data into bufferN$>NQ>N PICCOM}9O Q>4BUFFERO PICBADR9O Q>5BUFFER$OPICBADR9BO CIOLO:VSHOWSCORESVVQ>*V PADDRESSVQSMVPADDRESS}V$>V PRINTSCOREVQNUMPLAYERSVR>V H?THREEWQ>4W PADDRESSW$>&W PRINTSCORE0WQ>>:W PADDRESSDW$>NW} PRINTSCOREXWQ>HbW PADDRESSlW$> vW PRINTSCOREW !?DONEW ?THREEWR>W H?TWOWQ>9W PADDRESSW$>W PRINT}SCOREWQ>HW PADDRESSW$>W PRINTSCOREW !?DONEW?TWOWR>X H?DONE XQ>HX PADDRESS X$>*X PRINTSCOREHX }?DONERX:aATTRACT;attract modeaaQ>a!PEXPOSE;;don't reveal answersaQ>aPNUMPLAYERS;;1 player gameaE;note} whether computer is XL model (2 players) or not (4 players)a QXLCHECKaR>ȵa E?NOXLaQ>a PXLFLAGaHATTRACTENTRY}a ?NOXLaQ>a PXLFLAGaATTRACTENTRYaQ>aPDMAa Q>4DL3a PDLADRa Q>5DL3a PDLADRa CLEARSMbQ>" bPD}MAbQ>b PTIMERbQ>b PTIMERb ;first write screen messages bQ>*b PCOLOR24bQSM6b,8bO>>bPADDRESSHb}Q>Rb PADDRESS\bQ>4AUTHORMESSfb PPADRpbQ>5AUTHORMESSzb PPADRb%>b PRINTb#ADDRESSbQ> b PADDRESSb}Q>4STARTMESSb PPADRbQ>5STARTMESSb PPADRb%>b PRINTb DISPLAYOPTIONSb;put text on GR.5 screenb$>b }?LOOPb&SOUNDFLAGbQSMbPADDRESScQ>c PADDRESSc ?LOOP2cAcR> c D?CONT c; cS> c>c QADDRESSc,c}O>c PADDRESScQADDRESScO>cPADDRESSc !?LOOP2c ?CONTc,"cT?$c,&c OADDRESS(c PADDRESS*cQADDRESS},cO>.cPADDRESS0cQ>2c PPADR3cQ>4c PPADR6c$SOUNDFLAG8cQTRIVMESS9BcF?NEXTLETTERDc R>;;"?"Fc H?LETTER}Hc$>Jc H?STORELc ?LETTERNc$>UOc ?STOREPc &MASKQc%>Tc ?LOOP3Vc,`cT?jc D?CONT2tc #PADR~c ?CONT2c1c H?L}OOP3c PPADRc ?LOOP4cQ>c PTEMPc Q@PADR7c PTEMP3c$>c ?LOOP5c,c TTEMP3c D?BLANKc;c UTEMPc;d UT}EMP d !?NEXTd ?BLANKd,(d UTEMP2d,Zd H?LOOP5dd QTEMPnd PTEMP2pdQ>rd PTEMP}xd !?LOOP5d ?DONEdCd5d QTEMP2d MMASKd%>dP@ADDRESS7d3d QTEMPd MMASKdP@ADDRESS7d QADDRESSd,dO>}d PADDRESSdQADDRESSdO>dPADDRESSd7d?d3d)>d H?LOOP4,e?NEXTLETTER1e$SOUNDFLAG6e2@e(>(Je F}?SETFLAGTe !?LOOPYe ?SETFLAG^eQ>he-PATRACTFLAG;;offset to qmark data (0-127)e3CHECKCONSOL;is START,SELECT,or OPTION} pressed?eeQ>e PTEMP2eQ>e PTEMPe ?LOOPe QCONSOLeR>;;"START"e H?NEXTeQ>ePDMAe Q>4DL2e PDLA}DRe Q>5DL2e PDLADRe CLEARSMeQ>e PCOLOR2eQ>"ePDMAe:e ?NEXTeR>;;"SELECT"e H?NEXT2f#NUMPLAYER}SfQNUMPLAYERSfR>&f F?RESETDf QXLFLAGNf F?CHANGEXfQNUMPLAYERSbfR>lf D?CHANGEvf ?RESETfQ>fPNUMPLAYERS g} ?CHANGE%g DISPLAYOPTIONS*g CHANGESOUND0g$>d2g DELAYg ?NEXT2HgR>;;"OPTION"\g H?NOKEYSfg #EXPO}SEpg QEXPOSEzgR>g H?CHANGEgQ>g PEXPOSEg F?CHANGEg ?NOKEYSg "TEMPg H?GOBACKh "TEMP2h H?GOBACKh MOVE}QMARKShQ> h PTEMP2h QRANDOMhL>$h PCOLOR2.h "TIMER8h H?GOBACKBh "TIMERLh H?GOBACKVh!SAMPLEQUESTh ?GOBAC}Kh !?LOOPHqDISPLAYOPTIONSRqWqQ>Xq PATRACT\qQSMfq,pqO>zqPADDRESSqQ>q PADDRESSqQ>4SELECTMESSq P}PADRqQ>5SELECTMESSq PPADRq%>q PRINTq%> qQNUMPLAYERSq,qO>qP@ADDRESS7rR>r F?SKIPr Q>3;;"S}"$r%>.rP@ADDRESS78r ?SKIPFsQ>Ps PADDRESSZs%>ds QEXPOSEns F?CONCEALxsQ>4SPACE2MESSs PPADRsQ>5SPACE2MESS}s PPADRs !?PRINT2s ?CONCEALsQ>4SPACE1MESSs PPADRsQ>5SPACE1MESSs PPADRs ?PRINT2s PRINTs:0u;more }assorted storage area:u#AUTHORMESS Aby clinton branchADu%STARTMESS AANu$SELECTMESS A = PLAY}ER Avu"SPACE1MESS A = CONCEALAu"SPACE2MESS A = REVEAL Au8TRIVMESS A ???????? ?TRIVIA? ? QUIZ ? ???????}? AuALLMESS AOF THE ABOVEAuENDMESS AAu:ROUNDMESS2 AӠȠӠŠAuATRACT}FLAGuALLFLAGvCOUNTERvSAMPLEFLAGvNUMSAVEvEXPOSESAVE v;CORNER1 ====<=<=====}=====v3 ======<=<======== v3 ========<=<======*v3 }==========<=<====4v3 =====<=======<=?==>v3 ===?=====}======<=ֈ7PALLFLAG;;number answer} ALL/NONE OF THE ABOVE (0-3)$>&SOUNDFLAG ?LOOP%> ;;"E" in OF THE ABOVE ?LOOP2(QBUFFER9;;look for NONE O}F THE ABOVE RALLMESS8F?CONTCHECK&M>0 RALLMESS8:F?CONTCHECKD.QBUFFER9;;now look for ALL OF THE ABOVEN R}ALLMESS8XF?CONTCHECKbM>l RALLMESS8v H?NEXT?CONTCHECK01 I?LOOP2;yes! - place in position 4Ɖ0Љ0}ډ00%> ?LOOP3 QBUFFER9 PANSWER48 23 )>$* H?LOOP34:> ?NEXTC #ALLFLAGHQSOUNDFLAGR,\O>}$fPSOUNDFLAGp>z(> H?LOOP:ANSWERNUMBER ?LOOPʊ QRANDOMԊM>ފ $ALLFLAG(> F?RETURNR>} F?LOOP ?RETURN:tINCREMENTY~C,O>$?:pMOVEQMARKSzQSMPADDRESSQ>,PADDRESS;;to}p line of question mark data$ATRACTFLAGQ> PCOUNTER ?BIGLOOP%> ?LOOPʔ QCORNER19ԔP@ADDRESS7ޔ32})> H?LOOP00 ?LOOP2$ QTOP9.P@ADDRESS783B2D QTOP9FP@ADDRESS7H3J0d)>f H?LOOP2j ?LOOP3}t QCORNER29~P@ADDRESS723)> H?LOOP3 QADDRESS,O> PADDRESSĕ "COUNTERΕ H?BIGLOOPЕQ>ҕ P}TEMP2ӕ ?LOOP4ؕQ> PCOUNTER$ATRACTFLAG ?LOOP5%> QLEFTSIDE9P@ADDRESS73(22QLEFTSIDE9<P@ADD}RESS7F0P%>ZQRIGHTSIDE9_P@ADDRESS7d3n2xQRIGHTSIDE9P@ADDRESS72 QADDRESS,O> PADDRESSQ}ADDRESSȖO>ҖPADDRESSܖ "COUNTER H?LOOP5 "TEMP2 H?LOOP4,Q>6 PCOUNTER@$ATRACTFLAGB ?BIGLOOP2D }%>J ?LOOP6T QCORNER39^P@ADDRESS7h3r2|)> H?LOOP600 ?LOOP7 QBOT9P@ADDRESS732— QBO!}T9̗P@ADDRESS7֗030)>: H?LOOP7D ?LOOP8N QCORNER49XP@ADDRESS7b2l3v)> H?LOOP8 QADDRESS,O"}> PADDRESSQADDRESSO>ƘPADDRESSИ "COUNTERژH?BIGLOOP2QATRACTFLAG,O>R> H?STORE#}Q> ?STORE*PATRACTFLAG4:@SAMPLEQUESTJTQ>^ PCOLOR2%>$SAMPLEFLAG ?LOOP(> H?CONT& QQU$}EST180 !?STORE: ?CONTD(>N H?CONT2X QQUEST28b !?STOREl ?CONT2v QQUEST38 ?STOREPQUESTION83)>d%} H?LOOPQNUMPLAYERS PNUMSAVEڝ QEXPOSEPEXPOSESAVEQ>PNUMPLAYERS PEXPOSE4 PDEMOFLAG9 CLEARBUFF>%&}>H$SAMPLEFLAGR ?LOOP2\(>f H?CONT5p QQ1ANS18z !?STORE2 ?CONT5(> H?CONT6 QQ2ANS18 !?STORE2 '}?CONT6 QQ3ANS18ʞ ?STORE2Ԟ PBUFFER8ޞ3)> H?LOOP2$>A ?LOOP3 PSCORES9$2.(>8 H?LOOP3`Q>(}j PROUNDt PROUNDNUM( SCREEN2QEXPOSESAVE< PEXPOSEZ QNUMSAVEdPNUMPLAYERSnQ>x PDEMOFLAGQ> PCOLOR)}2#SAMPLEFLAGQSAMPLEFLAGR> H?RETURNQ>ȠPSAMPLEFLAGҠ ?RETURN!ATTRACTENTRYSHORTPAUSEQ>*} PTIMER$QNUMPLAYERS.R>8 F?DELAYB QPLAYERUPL H?RETURNNQ>Q H?CONTV ?DELAYtQ>}y ?CONT~ PTIMER+}Q> PDFLAGA5 STARTSCAN7> ?RETURN:P;;setup autobootZ 4ELAYtQ>}y ?CONT~ PTIMER[44L]7}pppBApppBApppJ ApppF-}A=6F6D:QUESTIONH66)nsertquestiondisk press)/error2e bootgamedisk)ns.}ufficientquestions tryagain6O73#/2%0/).43 round9/52%72/.'9/52%2)'(4䎎/}4)-%3500,!9%250]7X8ةLHj8Y4!4A4q44ȩ44!!4qq4ȩ4!44q40}.AA4ȩ4A4 (EMY(H^6_% = BJK=D6E VCɀ$ɪ = >L7 =n^6_% = >1} >D5EBH V&B VLMN5Y8T955 Q0M805 5 %m55/5*5i 55i2}55id55i5У58555 C55ͻ6^6_% = = >L7 *>/041 =D G>3}G6ԩ"/Yą^6_ =5S  =5iU9P:65 =  = =4} D BW^6_ =Cȭ6i @xɅ^6_# =$6i  @ )i @L C ^7_ =5} >L C^7_ =56[76X7Y7< yAL;8}L<L<L<L[7\7  ȑ wBЖ\7Б ;B9^7_Yi4 = = =9}6 5LV6ʩP7>O7:}>>> BL<6 BL< )C6 CLw:L/;^6_ = B66i 6i 5m655i55i5;} DL` > C66666 -D/ =L8/ >q041 E=@>="/̅^G_ Y, =dE<}^7_ =ii iHi Y@hii5 > EEL7Y`^`/=}ҩҩҢ >d >ҩ"/`<<` B V`5`565 6A>}N )56 ҅5ͽ65٥65 5ͼ65ͽ6L>5 656556mH4Ni?}L>iYNLLMNi44NLLMNNLiL ?iLMiMMhГ6[=?8@H4NiLQ?iw@}NLLMNi484NLLMNN LLMhХMLhLi LMiM%B VdH D5A}4dH D NH 5 DOL? 3O5 AH DOL@ 3Oͅ5 AH DOL;@ 3Oͅ5 9@4A AH 3Oͅ5B} A5`5 @Ƚ55 @Ƚ5 @`H 8 L@iȑh` )ɠ6 ) C}m6668 iةҩҩҢ2 >Ң >У`>> 54L=A 55L=A 5=5L5A0B=A5a5D}$` `ɀɠ`i@`8 `HX7<Y76(Y76B )i͇5W7O7<hT7 qChh A LBL:5E}W7X7дY7Y7 ;BY7О<h`6E^7_Yin =6i`5ʝP75 P76`ҩ1B,CF}ҩ`Jҍҍҍ`ҩҍҩȅJiҢ >JJ2 ;B`< Qҩ``ҩҩ ҩҩJJG}ҍҢ# >JJJҍҍҢ2 >J ;B`6 >`Yih5i(i i( >`-H}C(D6^7_Yin =hi(i70(`6U7V7`Yi|YV7dT7I}U7`ҩdJ*ҥJҢ >JJ ;B` 6`!QY^7_ =!!hh > EEL7!J})D$E`/q041 ="/^6_YB =Cȭ6i @؅^G_' =6i ɔi >K}`HG6G6 ԍh@BD5E V`*Y Y@54 Y@> Y@H Y@L'E9 Y@H Y@L'EL} H %E FY@`65Ȱ55/A041 ="/X7Y7YiA^G_ = R^G_M} = FJY 8 iiLE ei^_JGqU6 _^^>> 8&8&LF&N}&!FGLEH-6ȥ-6iihЩJ(LEH/!041 ="/`O})55 5 55 F Cd >LZF666  JO X7Y7L(PLbFMYif^G_P} = 5i3GG6 ^G_L=Gx^G_ =`byclintonbranch0,!9%2Q}#/.#%!,2%6%!,42)6)!15):OF THE ABOVE󀀱R}HI<<<<<<<<<HkLLP_MLPSN5566 8d}H6H5LHHHLEEX75 6}Y7y QUESTABCDBLNKNUMBYTEANSWESECBYTQUESTNUTOTBYTETOTHTOTLQSECQBYTQTEMPTEMP2STARFINISLIN"f}ddd$$$$$$$$AUA% @ @ AI @A$@"g}A$@dA@A @ ** TRIVIA QUIZ DATABASE **** BY "h}CLINTON BRANCH **** OCT. 1985 **(d** INITIALIZE **eR;A,;@6,;@6,;@6,;@6"i},;A,;@,c67@,. t67A,. 67@,.f>;A,+,@A>B7t"j}AgY@@:( *** ڠ ***Y( BY CLINTON BRANCHh!!** ADD QUESTIONS TO D"k}ISK **i2 B@)@26-A:,j(($(INGLE OR OUBLE DENSITY?(k0S*0DAl'"l}'6-A%$+4S,%AS$+4D,s+ B6.6.6.%6.+6.t1 +@A1B7tA"m}xC@(C(& INPUT YOUR QUESTION ('END' TO STOP)y7( 6.6-A# A767@:AS, -- ˠ̡; A""** INPUT ENTRY SUBROUTINE **1#@@K:1"u}-@$)@$"AUA"A&AP+67<,.>:,(>:, (@+$L"@"v}AV'@$~"@AL6-&@67<,. 7'@@"P:'@@,B( L A"w} (  A..** CHECK FINISHED QUESTION FOR ERRORS **/7@<@,4END!',@/"x}'6-@6-@@'6-@)-6@)7<,4 A! ;((FORMAT ERROR.--@A"y}1 ; A4.' 6-6-%@."@A 0> 6-%@@!A $H A '** FORMAT"z} DISK **'L(,(! INSERT YOUR QUESTION DISK AND>( PRESS .BL B '8+@@ D:QUESTI"{}ON5 B8$$'m@(;(>:AS, -- ǡ --m(-THIS PROGRAM WILL FORMAT THE DISK IN DRIVE 1"|})'( AND ERASE IT..'!(!(PRESS TO CONTINUE.8'pAdAU5@@K:B)@M@"}}c@*A!f'p AB',,AT@D1:L'G+@@ D:QUESTI"~}ON5 BG(@0 V'(@ Bp`'@ B D:QUESMAK.BAS D:QUESTI g