@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 D8u110 REM TWO LIGHT SENSOR TIMER PROGRAM112 REM CALIBRATE BOTH SENSORS115 FOR I=0 TO 1120 PRINT "TURN ON FLASHLIGHT AND ADJUT}ST THE"130 PRINT "POTENTIOMETER ";I+1;" TILL THE MESSAGE JUST"140 PRINT "CHANGES FROM OFF TO ON150 PRINT :PRINT "PRESS X TU}O CONTINUE"155 FOR J=1 TO 1000:NEXT J160 A=STICK (0)162 IF I=1 THEN 174164 IF A=15 THEN PRINT "OFF"166 IF A=13 THEN PRINV}T "OFF"168 IF A=14 THEN PRINT "ON "170 IF A=12 THEN PRINT "ON "172 GOTO 190174 IF A=15 THEN PRINT "OFF"176 IF A=14 THEN W}PRINT "OFF"178 IF A=13 THEN PRINT "ON "180 IF A=12 THEN PRINT "ON "190 REM CHECK IF X KEY PRESSED200 IF PEEK(764)=22 THENX} 220210 GOTO 160220 REM CLEAR LAST KEYSTROKE230 POKE 764,255240 NEXT I250 PRINT "BREAK BEAM 1 TO START TIMER"260 REM CHY}ECK FIRST SENSOR TILL TRIGGERED270 IF STICK(0)<>13 THEN 270280 REM START TIMER290 POKE 18,0:POKE 19,0:POKE 20,0300 REM CHZ}ECK SECOND SENSOR UNTIL TRIGGERED310 IF STICK(0)=14 THEN 320315 GOTO 310320 PRINT "TIME IS ";((PEEK(18)*255*255)+(PEEK(19)[}*255)+(PEEK(20)))/60;"SECONDS" :9 :Y;LB THEN 370380 REM S c}ET DATA LINES LOGIC HIGH390 POKE 54016, 255400 REM RESET DATA LINES FOR INPUT410 POKE 54018,48420 POKE 54016,0430 POKE 5 d}4018,526000:,80H & &ehe&eģ0ʥ 8堅塅`$ 6&*i0:0i 6Ʀ` 100 REM MOTOR CONTROL DEMONSTRATION110 PRINT "KEYBOARD CONTROL"120 PRINT 130 PRINT "G - MOTOR TURNS IN ONE DIRECTION"140 f}PRINT "> - MOTOR TURNS IN OPPOSITE DIRECTION"150 PRINT "S - STOP MOTOR"155 PRINT :PRINT "X - EXIT PROGRAM"160 B=0170 A=PEg}EK(764)180 IF A=54 THEN GOSUB 1000:GOTO 170190 IF A=55 THEN GOSUB 2000:GOTO 170200 GOSUB 3000210 IF A=22 THEN END 220 GOh}TO 1701000 REM TURN MOTOR ON IN ONE DIRECTION1010 REM CHECK IF THIS HAS ALREADY BEEN DONE1020 IF B=1 THEN 11001030 REM SEi}T DATA LINES FOR OUTPUT1032 POKE 54018,481034 POKE 54016,31036 POKE 54018,521040 REM SET FIRST DATA LINE LOCIC LOW TO TURj}N ON MOTOR1050 POKE 54016,21060 B=11100 RETURN 2000 REM TURN ON MOTOR IN OTHER DIRECTION2010 REM CHECK IF THIS HAS ALREAk}DY BEEN DONE2020 IF B=2 THEN 21002030 REM SET BOTH DATA LINES FOR OUTPUT2032 POKE 54018,482034 POKE 54016,32036 POKE 540l}18,522040 REM SET BOTH DATA LINES LOGIC LOW TO TURN ON MOTOR AND REVERSE POLARITY2050 POKE 54016,02060 B=22100 RETURN 30m}00 REM TURN MOTOR OFF3010 REM CHECK AND SEE IF THIS HAS BEEN DONE3020 IF B=0 THEN 31003030 REM SET BOTH DATA LINE LOGIC HIn}GH3040 POKE 54016,33050 REM RESET DATA LINES FOR INPUT3060 POKE 54018,483070 POKE 54016,03090 POKE 54018,523095 B=0310o}0 RETURN KE 54016,33050 REM RESET DATA LINES FOR INPUT3060 POKE 54018,483070 POKE 54016,03090 POKE 54018,523095 B=0310 100 GRAPHICS 0110 FOR I=1536 TO 1700:READ A:POKE I,A:CK=CK +A:NEXT I120 IF CK<>19072 THEN ? "Error in DATA Statements. Checq}k Typing.":END130 A=USR(1536)140 ? :? "Automatic Proofreader Now Activated."150 NEW1536 DATA 104,160,0,185,26,31542 DATAr} 201,69,240,7,200,2001548 DATA 192,34,208,243,96,2001554 DATA 169,74,153,26,3,2001560 DATA 169,6,153,26,3,1621566 DATA 0,s}189,0,228,157,741572 DATA 6,232,224,16,208,2451578 DATA 169,93,141,78,6,1691584 DATA 6,141,79,6,24,1731590 DATA 4,228,105t},1,141,951596 DATA 6,173,5,228,105,01602 DATA 141,96,6,169,0,1331608 DATA 203,96,247,238,125,2411614 DATA 93,6,244,241,11u}5,2411620 DATA 124,241,76,205,238,01626 DATA 0,0,0,0,32,621632 DATA 246,8,201,155,240,131638 DATA 201,32,240,7,72,241644v} DATA 101,203,133,203,104,401650 DATA 96,72,152,72,138,721656 DATA 160,0,169,128,145,881662 DATA 200,192,40,208,249,16516w}68 DATA 203,74,74,74,74,241674 DATA 105,161,160,3,145,881680 DATA 165,203,41,15,24,1051686 DATA 161,200,145,88,169,01692 x}DATA 133,203,104,170,104,1681698 DATA 104,40,96 ;6v@ILOBLA!Һ do NOT return to DOS withA ;6LB" this confi110 IF STICK(0)<>14 THEN 2015 PRINT "PIN 1"20 IF STICK(0)<>13 THEN 3025 PRINT "PIN 2"30 IF STICK(0)<>11 THEN 4035 PRINT "z}PIN 3"40 IF STICK(0)<>7 THEN 5045 PRINT "PIN 4"50 IF STRIG(0)<>O THEN 6055 PRINT "PIN 6"60 GOTO 10loLBLC&} h10 PRINT PADDLE(0);" ";PADDLE(1)20 GOTO 10you want to change any part ofC& ;6LrC that configuration (Y/N) ? CS N6 `=,10 PRINT PADDLE(0)20 GOTO 10ByBLC#}Specify active drives by simplyC ;6LC" typing their drive numbers, oneC 5 A=564:B=56510 PRINT "X=";PEEK(A);"Y=";PEEK(B)20 GOTO 100drive number (1 to 4) isD+ ;6L}D# assumed to be end of your$<100 REM LIGHT PEN DEMO150 PRINT CHR$(125)160 PRINT "THREE CHOICES"170 PRINT :PRINT :PRINT 180 PRINT "* CHOICE ONE"190 PR(}INT :PRINT :PRINT 200 PRINT "* CHOICE TWO"210 PRINT :PRINT :PRINT 220 PRINT "* CHOICE THREE"230 A=PEEK(564):B=PEEK(565)2(}40 IF A>90 THEN 230250 IF (B>25) AND (B<35) THEN 300260 IF (B>45) AND (B<55) THEN 330270 IF (B>60) AND (B<70) THEN 360290(} GOTO 230300 PRINT CHR$(125)310 PRINT "CHOICE ONE"320 GOTO 400330 PRINT CHR$(125)340 PRINT "CHOICE TWO"350 GOTO 400360(} PRINT CHR$(125)370 PRINT "CHOICE THREE"400 FOR I=1 TO 15:PRINT :NEXT I410 PRINT 420 PRINT "* CONTINUE"430 IF PEEK(564)<(}90 AND PEEK(565)>80 THEN 150440 GOTO 430400 FOR I=1 TO 15:PRINT :NEXT I410 PRINT 420 PRINT "* CONTINUE"430 IF PEEK(564)<(*10 IF STICK(0)=15 THEN PRINT "OFF"20 IF STICK(0)=14 THEN PRINT "ON "30 GOTO 10G! because error # %U occurred.%E9,Q110 REM TIMER PROGRAM120 PRINT "TURN ON FLASHLIGHT AND ADJUST THE"130 PRINT "POTENTIOMETER TILL THE MESSAGE JUST"140 PRINT0} "CHANGES FROM OFF TO ON150 PRINT "PRESS X TO CONTINUE"155 FOR J=1 TO 2500:NEXT J170 IF STICK(0)=15 THEN PRINT "OFF"175 I0}F STICK(0)=14 THEN PRINT "ONӛ180 REM CHECK IF X KEY PRESSED190 IF PEEK(764)=22 THEN 215210 GOTO 170212 REM CLEAR OUT PREV0}IOUS KEYSTROKE215 POKE 764,255220 PRINT "BREAK BEAM TO START TIMER"230 IF STICK(0)=14 THEN 230240 POKE 18,0:POKE 19,0:POK0}E 20,0250 IF STICK(0)=15 THEN 250260 IF STICK(0)=14 THEN 260270 PRINT "TIME IS ";((PEEK(18)*255*255)+(PEEK(19)*255)+(PEEK(0}20)))/60;"SECONDS"gram's nameJJ ;6LJ here >> Jz N6 9 |;LJ`G9 <`ILJLJ&} 0100 REM TIME BUZZER120 PRINT "ENTER HOURS";130 INPUT A140 PRINT "ENTER MINUTES";150 INPUT B160 PRINT "ENTER SECONDS";174}0 INPUT C180 D=(A*216000)+(B*3600)+(C*60)190 POKE 18,0:POKE 19,0:POKE 20,0200 IF ((PEEK(18)*255*255)+(PEEK( 19)*255)+(PEEK4}(20)))>D THEN 220210 GOTO 200215 REM SET DATA LINES FOR OUTPUT220 POKE 54018,48225 POKE 54016,255230 POKE 54018,52235 R4}EM SET DATA LINES LOGIC LOW TO TURN ON BUZZER240 POKE 54016,0245 POKE 18,0:POKE 19,0:POKE 20,0250 IF ((PEEK(18)*255*255)+(4}PEEK( 19)*255)+(PEEK(20)))>300 THEN 270260 GOTO 250265 REM SET DATA LINES HIGH TO TURN OFF BUZZER270 POKE 54016,255280 RE4}M RESET DATA LINES FOR INPUT290 POKE 54018,48300 POKE 54016,0310 POKE 54018,52ns again, please.M} ;6 ;9`994R110 REM ALARM PROGRAM120 PRINT "TURN ON FLASHLIGHT AND ADJUST THE"130 PRINT "POTENTIOMETER TILL THE MESSAGE JUST "140 PRIN8}T "CHANGES FROM OFF TO ONӛ150 PRINT "PRESS X TO CONTINUE"155 FOR J=1 TO 2500:NEXT J160 IF STICK(1)=1 THEN PRINT "OFFӛ170 8}IF STICK(1)=0 THEN PRINT "ON қ180 REM CHECK IF X KEY PRESSED190 IF PEEK(764)=22 THEN 210200 GOTO 160210 REM CLEAR OUT LAS8}T KEYSTROKE220 POKE 764,255230 PRINT "TRIGGER A SENSOR TO ST ART ALARM"240 A=STICK(1):B=STRIG(1)250 IF (A=0 AND B=0) THEN8} 240260 PRINT "WARNING - ALARM TRIGGERED"270 IF A=1 THEN PRINT "SENSOR 1"280 IF A=2 THEN PRINT "SENSOR 2"290 IF A=4 THEN 8}PRINT "SENSOR 3"292 IF A=8 THEN PRINT "SENSOR 4"294 IF B=1 THEN PRINT "SENSOR 5"300 PRINT "DETECTS VIOLATION"305 REM INIT8}IALIZE CLOCK310 POKE 18,0:POKE 19,0:POKE 20,0320 REM SET DATA LINES FOR OUTPUT330 POKE 54018,48340 POKE 54016,255350 POK8}E 54018,52360 REM SET DATA LINES LOW TO TURN ON ALARM370 POKE 54016,0380 IF ((PEEK(18)*255*255)+(PEEK( 19)*255)+(PEEK(20))8})>3600/24 THEN 400390 GOTO 380400 REM TURN OFF ALARM BY SETTING DATA LINES LOGIC HIGH410 POKE 54016,255420 REM RESET DATA8} LINES FOR INPUT430 POKE 54018,48440 POKE 54016,0450 POKE 54018,52o DOS.RS ;6LR&Press any other key to return to menu.8F  R:,@@  PIN 1 R:,@@0 PIN 2 R:<},@@@# PIN 3( R:,@@P- PIN 42T:,@`7 PIN 6< @<} D1:CH2PR1.BASPIN 3( R:,@@P- PIN 42T:,@`7 PIN 6< @<-A  Q:, Q:@, @ D:CH4PR1.BAS;6LrC that configuration (Y/N) ? CS N6 `=@O '<  Q:, @ D1:CH5PR1.BASlyC ;6LC" typing their drive numbers, oneCDJ]r6-Ad6-Ae  X=F:,Y=F:, @ D1:CH6PR1.BH}AS]r6-Ad6-Ae  X=F:,Y=F:, @ D1:CH6PR1.BHcwdLIGHT PEN DEMO >:A%,  THREE CHOICES      * CHOICL}E ONE      * CHOICE TWO     * CHOICE THREE!6-F:Ad,!6-F:Ae,!@A0L}%%+!@%,*+ @5,A%%+!@E,*+ @U,A0%%+!@`,*+ @p,A`" A0L}, >:A%,6  CHOICE ONE@ AJ >:A%,T  CHOICE TWO^ Ah >:A%,r  CHOICEL} THREE-@@     * CONTINUE33F:Ad, @*F:Ae,!@AP A0L} D:CH6PR2.BAS@     * CONTINUE33F:Ad, @*F:Ae,!@AP A0LNb R:,"@ OFF R:,"@ ON  @ D:CH7PR1.BASed.%E9Pp nTIMER PROGRAMx)) !TURN ON FLASHLIGHT AND ADJUST THE++ #POTENTIOMETER TILL THE MESSAGE JUST}T CHANGES FROM OFF TO ON PRESS X TO CONTINUE-@A%  R:,"@ OFF R:T},"@ ONCHECK IF X KEY PRESSED F:Ad,"@"A Ap""CLEAR OUT PREVIOUS KEYT}STROKEAdAU!! BREAK BEAM TO START TIMER R:,"@A09@'@T}9@  R:,"@AP R:,"@A`cc TIME IS ++F:@,$AUT}$AU,%+F:@,$AU,%+F:@ ,,,'@`SECONDS D:CH7PR2.BAS`cc TIME IS ++F:@,$AUTS%+@dTIME BUZZERx  ENTER HOURS  ENTER MINUTESX}  ENTER SECONDS++6-+$B!`,%+$A6,%+$@`,9@'@9@ X}PP++F:@,$AU$AU,%+F:@,$AU,%+F:@ ,,,!A  ASET DATA LINES FOR OUTPUX}TB@@HB@AUB@@R00SET DATA LINES LOGIC LOW TO TURN ON BUZZERB@X}9@'@9@ VV++F:@,$AU$AU,%+F:@,$AU,%+F:X}@ ,,,!AAp AP ,,SET DATA LINES HIGH TO TURN OFF BUZZERB@AU RESET DATA LINEX}S FOR INPUT"B@@H,B@6B@@R D1:CH8PR1.BASAU RESET DATA LINEX`nALARM PROGRAMx)) !TURN ON FLASHLIGHT AND ADJUST THE,, $POTENTIOMETER TI\}LL THE MESSAGE JUST  CHANGES FROM OFF TO ON PRESS X TO CONTINUE-@A% !R:@,"@\}! OFF!R:@,"! ON CHECK IF X KEY PRESSED F:Ad,"@"A A`\}CLEAR OUT LAST KEYSTROKEAdAU((  TRIGGER A SENSOR TO ST ART ALARM!6-R:@,!6-T:@,##+\}"*",A@!! WARNING - ALARM TRIGGERED"@ SENSOR 1"@ SENSOR 2""\}@ SENSOR 3$"@ SENSOR 4&"@ SENSOR 5, DETECTS VIOLATION1INITIALIZE CLOCK6\}9@'@9@ @SET DATA LINES FOR OUTPUTJB@@HTB@AU\}^B@@Rh))SET DATA LINES LOW TO TURN ON ALARMrB@|^^++F:@,$AU$AU,%+F:\}@,$AU,%+F:@ ,,,!A6'@$A A55TURN OFF ALARM BY SETTING DATA LINES LOGIC HIGH\}B@AU RESET DATA LINES FOR INPUTB@@HB@B@@R D:CH9\}PR1.BASAU RESET DATA LINES FOR INPUTB@@HB@B@@R D:CH9\n$$TWO LIGHT SENSOR TIMER PROGRAMpCALIBRATE BOTH SENSORSs-@`}x)) !TURN ON FLASHLIGHT AND ADJUST THE99 POTENTIOMETER %@ TILL THE MESSAGE JUST CHANGES FROM OFF`} TO ON  PRESS X TO CONTINUE-@A 6-R:,"@At"@ O`}FF"@ OFF"@ ON "@ ON  A"@ OFF"@ `}OFF"@ ON "@ ON CHECK IF X KEY PRESSED F:Ad,"@"A  A``}CLEAR LAST KEYSTROKEAdAU ## BREAK BEAM 1 TO START TIMER''CHECK FIRST SENSOR TILL TRIGGER`}ED R:,@ApSTART TIMER"9@'@9@ ,))CHECK SECON`}D SENSOR UNTIL TRIGGERED6 R:,"@A ; A@cc TIME IS ++F:@,$AU$AU,%+F:@`},$AU,%+F:@ ,,,'@`SECONDS D:CH12PR1.BAS@cc TIME IS ++F:@,$AU$AU,%+F:@`AdLIGHT SWITCHnx$$ SET LIGHT LEVEL TO SWITCH ON PRESS X TO CONTINUE6d}-Q:,CHECK IF X KEY PRESSED F:Ad,"@"A A@CLEAR LAST KEYSTROKEAdd}AU((  SET LIGHTING LEVEL TO SWITCH OFF PRESS X TO CONTINUE6-Q:,CHECK IF X KEY PRESSED d}F:Ad,"@"A` ACLEAR LAST KEYSTROKEAdAU  PRESS X TO START F:Ad}d,"@"Ah  Ad AdAU33CHECK IF LIGHT LEVEL LOWER THAN FIRST SETTINGQ:, d}A",,SET DATA DIRECTION REGISTER FOR OUTPUT,B@@H6B@AU@B@@RJSET Dd}ATA LINES LOGIC LOWTB@^88CHECK IF LIGHTING LEVEL HIGHER THAN SECOND SETTINGrQ:,!Ap|d}SET DATA LINES LOGIC HIGHB@AU RESET DATA LINES FOR INPUTB@@HB@d}B@@R D:CH12PR2.BASAU RESET DATA LINES FOR INPUTB@@HB@d)d!!MOTOR CONTROL DEMONSTRATIONn KEYBOARD CONTROLx ((  G - MOTOR TURh}NS IN ONE DIRECTION-- %> - MOTOR TURNS IN OPPOSITE DIRECTION S - STOP MOTOR  X - EXIT PROGRAM6-h}6-F:Ad,#"@T A# Ap#"@U A # Ap A0"@"h} Ap$$TURN MOTOR ON IN ONE DIRECTION))CHECK IF THIS HAS ALREADY BEEN DONE"@ASET DATA h}LINES FOR OUTPUTB@@H B@@ B@@R44SET FIRST DATA LINE LOCIC LOW TO TURN ONh} MOTORB@@$6-@L$&&TURN ON MOTOR IN OTHER DIRECTION))CHECK IF THIS HAS ALREADY BEEN DOh}NE"@A!$$SET BOTH DATA LINES FOR OUTPUTB@@HB@@B@@Rh}IISET BOTH DATA LINES LOGIC LOW TO TURN ON MOTOR AND REVERSE POLARITYB@ 6-@4$ TURN h}MOTOR OFF ))CHECK AND SEE IF THIS HAS BEEN DONE "A1 ##SET BOTH DATA LINE LOGIC HIGH B@@h} RESET DATA LINES FOR INPUT B@@H B@ B@@R 6- $h} D:CH13PR1.BASATA LINES FOR INPUT B@@H B@ B@@R 6- $hCd +n--A6A"!)6-%- x>Br;('Errorl} in DATA Statements. Check Typing.>6-?:A6,/(/($Automatic Proofreader Now Activated.104,160,0,1l}85,26,3201,69,240,7,200,200 192,34,208,243,96,200169,74,153,26,3,200169,6,153,26,3,1620,189,0,22l}8,157,74$6,232,224,16,208,245*169,93,141,78,6,16906,141,79,6,24,17364,228,105,1,141,95<6,173,5,228,1l}05,0B141,96,6,169,0,133H203,96,247,238,125,241N93,6,244,241,115,241T124,241,76,205,238,0Z0,0,0,0,32,l}62`246,8,201,155,240,13f201,32,240,7,72,24l101,203,133,203,104,40r96,72,152,72,138,72x160,0,169,128,l}145,88~200,192,40,208,249,165203,74,74,74,74,24105,161,160,3,145,88165,203,41,15,24,105161,200,1l}45,88,169,0133,203,104,170,104,168104,40,96 D:CH14PR1.BAS,145,88165,203,41,15,24,105161,200,1lM100 REM MULTIPLE INPUTS110 PRINT "MONITORING SENSORS"120 PRINT :PRINT " PRESS X TO EXIT"130 REM SET DATA DIRECTION REGISTEp}R FOR OUTPUT140 POKE 54018,48150 POKE 54016,7160 POKE 54018,52170 REM CYCLE THROUGH OUTPUT COMBINATION180 FOR I=0 TO 71p}90 POKE 54016,1195 FOR J=1 TO 10:NEXT J200 IF (STRIG(0)=0) THEN PRINT "SENSOR ";I210 REM CHECK IF X KEY PRESSED220 IF PEEp}K(764)=22 THEN 250230 NEXT I235 GOTO 180240 REM CLEAR LAST KEYSTROKE250 POKE 764,255260 REM RESET DATA LINES FOR INPUT2p}70 POKE 54018,48280 POKE 54016,0290 POKE 54018,52LEAR LAST KEYSTROKE250 POKE 764,255260 REM RESET DATA LINES FOR INPUT2p4DYdMULTIPLE INPUTSn MONITORING SENSORSx   PRESS X TO EXIT,,SET t}DATA DIRECTION REGISTER FOR OUTPUTB@@HB@@B@@R&&CYCLE THROUGH OUTPUT Ct}OMBINATION-@B@@-@@ (+T:,",( SENSOR t}CHECK IF X KEY PRESSED F:Ad,"@"AP  ACLEAR LAST KEYSTROKEAdAUt} RESET DATA LINES FOR INPUTB@@HB@"B@@R D:CH12PR3.BASAUts> 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{TTTTTTD@U@@@@@??D }?UUUUUUUU 0 ??*?ë00} D@PTUUUUU@@PPTTUU ++}U@PTUWWUUUUUUUë++  }+++?UD VVU,TP@DD@UUTP_@TTTUU= UUUD@UP@@@}@_DQBBQ]]]]UUUUUUU33 URBVBQU?;:8PPP_P@TU@PDAAU@DTDT@PD }< 0?55?\\}UTU@@PAPPDdd ! @UQATDDAQ<88PP0@E<00A00<}????0<-l THEN B$(X,X)=}CHR$(A):GOTO 120130 DATA 0,255,129,129,129,129,129,129,129,129,255,0,-12000 POKE 559,62:POKE 704,882020 I=PEEK(106)-16:POK}E 54279,I2030 POKE 53277,3:POKE 710,2242040 VTAB=PEEK(134)+PEEK(135)*2562050 ATAB=PEEK(140)+PEEK(141)*2562060 OFFS=I*256+}1024-ATAB2070 HI=INT(OFFS/256):LO=OFFS-HI*2562090 POKE VTAB+2,LO:POKE VTAB+3,HI3000 Y=60:Z=100:V=1:H=14000 A$(Y,Y+11)=B$: }POKE 53248,Z4010 Y=Y+V:Z=Z+H4020 IF Y>213 OR Y<33 THEN V=-V4030 IF Z>206 OR Z<49 THEN H=-H4420 GOTO 4000 m10 ; RESET THE MEMLO POINTER20 ;30 START = $60040 DOSINI = $0C50 MEMLO = $2E760 NEWMEM = $30!"}00 ;THIS IS THE NEW VALUE FOR MEMLO65 ;70 ;THIS ROUTINE RESERVES SPACE FOR ASSEMBLY ROUTINES90 ;BY RESETING THE MEMLO POIN!#}TER. IT RUNS AS0100 ;AN AUTORUN.SYS FILE. IT ALSO RESETS MEMLO ON [RESET].0120 ;MEMLO IS SET TO THE VALUE OF NEWMEM.0130 ;!$}0140 ; THIS PART IS PERMANENT, IE. NEEDS TO BE RESIDENT.0150 ; THE SYSTEM DOSINI VECTOR HAS BEEN STOLEN0160 ; AND STORED I!%}N THE ADDRESS PORTION OF THE JSR TROJAN0170 ; INSTRUCTION. SO WHEN [RESET] IS PRESSED, DOSINI VECTORS0180 ; TO INITDOS, JSR!&} TROJAN THEN CALLS THE DOS INITIALIZATION0185 ; ROUTINES, MEMLO IS RESET TO NEW VALUE AND CONTROL0190 ; RETURNS TO THE MONI!'}TOR.0200 *= START0210 INITDOS0220 JSR TROJAN ; DO DOS INITIALIZATION0230 LDA #NEWMEM&2550240 STA MEM!(}LO0250 LDA #NEWMEM/2560260 STA MEMLO+10270 TROJAN0280 RTS0290 ; THIS PART IS EXECUTED AT POWER UP ONLY AND0!)}300 ; CAN BE DELETED AFTER POWER-UP.0330 ; THIS ROUTINE STORES THE CONTENTS OF DOSINI INTO THE JSR0350 ; TROJAN INSTRUCTION!*}. IT THEN REPLACES DOSINI WITH0370 ; A NEW VALUE, LOCATION INITDOS.0390 GRABDOSI0400 LDA DOSINI ;SAVE DOSINI0410 !+}STA INITDOS+10420 LDA DOSINI+10430 STA INITDOS+20440 LDA #INITDOS&255 ;SET DOSINI0450 STA DOSINI0460 !,} LDA #INITDOS/2560470 STA DOSINI+10480 LDA NEWMEM&255 ; SET MEMLO0490 STA MEMLO0500 LDA #NEWMEM/2560510 !-} STA MEMLO+10520 RTS0540 .WORD GRABDOSI ;SET RUN ADDRESS0550 .END STA MEMLO0500 LDA #NEWMEM/2560510 TtuABFF1BLYYTOTABEAMENTI1II2II3II4II5II6II7IEFTTTTWWWWWWATTEMPTSCORAT%/}KE  A/@@P@AQ M<< BCT BB4 << BB<<%0}BCT<<BD=<<BDty<<BE4<<BE{{BFT@%1}@% @S!@"@#@$@%&@'?P()@*@ +@,-@%2}.@/@0A1 ##*****************************$$* MUSIC THEORY DRILLS PART 3 *??* DUANE TUTAJ %3} * #$$* COPYRIGHT 12/83 *(##*****************************)U1;@ %4},;@ ,;@),9@,U6. *36-6-'6-@36-- %5} @`2*** BEAT CONVERSION ***3"@6-@4"@6-@P5/#"@)"@)"@%6}/6-@6/#"@)"@ )"@/6-?P7/#"@)"@)"@/6-@8/#"@)%7}"@)"@/6-?P9 6-%;$< A A8853,0,0,162,0,108,128,162,64,0,0,217,60,108,128,217B8853,%8}0,0,162,40,108,128,162,0,0,0,217,53,108,128,217C7742,0,0,162,0,108,128,162,47,0,0,217,0,108,128,217D3353,108,128,162,53%9},0,0,217,0,0,0,193,0,0,0,173E8853,0,0,162,0,108,128,162,64,0,0,217,60,108,128,217F8853,0,0,162,40,108,128,162,0,0,0,217%:},53,108,128,217G7760,0,0,173,0,121,144,173,64,0,0,217,0,121,144,217H3372,121,144,173,72,0,0,217,0,0,0,193,0,0,0,173I8%;}853,0,0,162,0,108,128,162,64,0,0,217,60,108,128,217J8853,0,0,162,40,108,128,162,0,0,0,217,53,108,128,217K7742,0,0,162,%<}0,108,128,162,47,0,0,217,0,108,128,217L3353,108,128,162,53,0,0,217,0,0,0,193,0,0,0,173M7740,0,0,162,0,108,128,162,53,0,%=}0,217,0,108,128,217N7764,0,0,162,0,108,128,162,81,0,0,217,0,108,128,217O9964,0,0,162,81,108,128,162,72,0,0,217,85,121,1%>}44,217P::81,108,128,162,81,108,128,162,81,108,128,162,0,0,0,0Q 9999 #A*** IMAGES ***C;@`,$%?}-@@`("667<,.>:,: C6-C:,GG0,0,1,64,0,0,0,1,64,0,0,0,1,64,0,0,0,1,64,0,0,0,1,64,0,0,0,1,64,0KK%@}0,5,85,64,0,0,20,5,64,0,0,80,1,64,0,0,80,1,64,0,0,20,5,0,0,0,5,84,0,0C;@`,$-@@`("667<,.>:,%A}: C6-C:,GG0,0,10,0,0,0,0,10,0,0,0,0,10,0,0,0,0,10,0,0,0,0,10,0,0,0,0,10,0,0YY0,42,170,0,0,0,170,170,0,0,2,170,170%B},10,0,2,170,170,10,0,0,170,168,0,0,0,42,160,0,0C;@`,$-@@`("667<,.>:,: C6-C:,GG0,0,6%C}0,0,0,0,0,60,0,0,0,0,60,0,0,0,0,60,0,0,0,0,60,0,0,0,0,60,0,0WW0,63,252,0,0,0,255,252,0,0,3,255,252,0,0,3,255,252,0,0,0,25%D}5,240,0,0,0,63,192,0,0"C;@`,$-@@`("667<,.>:,: C6-C:,,KK0,0,21,0,0,0,0,21,64,0,0,0,20,%E}80,0,0,0,20,80,0,0,0,20,80,0,0,0,20,0,06MM0,21,84,0,0,0,85,84,0,0,1,85,84,0,0,1,85,84,0,0,0,85,80,0,0,0,21,64,0,0@C;%F}@`,$-@@`("667<,.>:,: C6-C:,JLL0,32,0,0,0,0,40,0,0,0,0,10,168,0,0,0,0,40,0,0,0,2,160,0,0,0,1%G}0,128,0,0TKK0,40,0,0,0,0,42,168,0,0,0,0,40,0,0,0,0,160,0,0,0,2,128,0,0,0,10,0,0,0^C;@`,$-@@`("%H}667<,.>:,: C6-C:,hII0,0,0,0,0,0,0,0,0,0,0,240,3,0,0,0,60,15,0,0,0,15,255,0,0,0,0,15,0,0rJJ0,0,60,0,0,0,0,240,0%I},0,0,3,192,0,0,0,15,0,0,0,0,60,0,0,0,0,240,0,0,0|E;@`,$-@@`867<,.>:,< E6-C:,""**%J}* ROUT FOR IMAGES IN GR. 7C;A#,$-@A#("667<,.>:,: C6-C:,WW104,104,104,133,195,104,10%K}4,133,186,104,133,213,104,133,212,169,0,133,187,165,186^^10,38,187,10,38,187,10,38,187,133,186,164,187,10,38,187,10,38,18%L}7,24,101,186,133,186,152__101,187,133,187,24,165,186,101,195,144,2,230,187,24,101,88,133,186,165,187,101,89,133,187OO%M}169,12,133,195,162,5,160,0,177,212,145,186,24,165,212,105,1,133,212,144,2``230,213,24,165,186,105,1,133,186,144,2,230,187%N},202,208,227,24,165,186,105,35,133,186,144,2 230,187,198,195,208,208,96$N) +@AR@) AT%O} AW*** MAIN LOOPXcAV8  IS THIS A FULL MEASURE?D6-VAdAUc)@%P}Y"@r BZ#"@)"@x# A[ZAV8  PLEASE TYPE Y OR N L-%Q}@AP Z A^ A@6-_ A PA` A0/6-P:H:,$@%%R}@,K6-%P:H:,$@,g6-%P:H:,$@,6-%P:H:,$@ ,b;6-&@6-&@-6%S}-&@;6-&@c  Adc"@)"@%6-@16-@S6-P:H:,$@%%T}@,Y6-c AeM6-@6-@=6-P:H:,$@%@,C6-M AfG%2@ @%U}@G2g" A h  APlc"@)"@%6%V}-@16-@S6-P:H:,$@%@,Y6-c AmM6-@6-@=6-P:H:,$@%%W}@,C6-M AvG%2@@@@@G2@" A %X}  AuS6-@6-@=6-P:H:,$@%@,I6-@S AG%2@@`%Y}@@G2@-" A # A- A  AM6%Z}-@%6-@=6-P:H:,$@%@,C6-M AG%2@@@@G2@%[}#" A # A++!)!)!A 6- @P A%\} 6- @P 6- @P 6- @P$*** CLANK- WHEEL STOP ***t%2AP@@%]}9-@@= Q-@m2q t$ >:A%,+6-?:<@<@<%^},F6-?:<@<@<,a6-?:<@<@<,|6-?:<@%<@<,6-?:<@<@<,!6-?:<@%_}<@<,!$*** PRT IMAGES ***"@6-?:<<<,"@6-?:<<<,"@6-?:<%`}<<,"@6-?:<<<,"@6-?:<<<,"@6-?:<<<,$"@6-?:<<<%a},."@6-?:<<<,8"@ 6-?:<<<,B"@6-?:<<<,L"@6-?:<<<,V%b}"@6-?:<<<,j"@6-?:<<<,t"@6-?:<<<,~$$$*** FULL MEASURE SELECTION %c}***%%6-P:H:,$@,%@-#"@)"@* @- A-#"@)"@* @- A%d}-#"@)"@* @- A6- A6-@&/"@* @%6-@%e}/ A/"@* @%6-@/ A%"@P6-@% A6- Al%f} 6-v%"@6-@% A%"@6-@% A%"@P6-@% A%%g}"@P6-@% A6- AU6-@%6-@!6-+ A5 A ;6-A6-K @%q}B%DOS SYSB*)DUP SYSB SCH12PR1 LSTB \CH12PR2 LSTB eCH13PR1 LSTB pCH14PR1 LSTByCH2PR1 LSTB{CH4PR1 LSTB|CH5PR1 LSTB}CH6PR1 LSTB~CH6PR2 LSTBCH7PR1 LSTBCH7PR2 LSTBCH8PR1 LSTB CH9PR1 LSTBCH2PR1 BASBCH4PR1 BASBCH5PR1 BASBCH6PR1 BASBCH6PR2 BASBCH7PR1 BASBCH7PR2 BASBCH8PR1 BASB CH9PR1 BASB CH12PR1 BASB CH12PR2 BASB CH13PR1 BASBCH14PR1 BASBCH12PR3 LSTBCH12PR3 BASPU A-#@@K:- B1 +AA`1AR@5-@@%r}+ ONE MOMENT PLEASE5 A* >:A%,*0@@ N-@@5 DO YOU WISH INSTRUCT%s}IONS? A6-N)@ 7"@ B#+- A#A7 A#U #"@x A#A# A#U$ %t}-@@4  PLEASE TYPE YES OR NO H-@@Pj2@@@@n 2%u} A#% c0@@/AR@A-@@c HOW MANY PROBLEMS DO YOU WANT%v}& 1-@@1  (TYPE 1, 2, OR 3) ' (-@@ ( 1) 10 PROBLEMS( (-@@( 2) 15 PROB%w}LEMS) (-@@( 3) 20 PROBLEMS* u)@&@H)@R8-@@S TYPE 1 ,2, OR 3 PLEA%x}SEg-@APk u A#A+ "@I6-@, "@P6-@- "@Q6-@ . Z6-%y}6-'6-36-?6-K6-W6-Z$3 " >:A%,"A@28 2-@%z}@2 ************************B ,-@@, MUSICAL SLOTS MENUL +-@@+ 1) 4/4 TIME O%{}NLYj +-@@ + 2) 2/2 TIME ONLYt +-@@+ 3) 6/8 TIME ONLY~ 1-@@1 4) ALL TI%|}ME SIGNATURES 2-@@2 ************************ :-@@ :  USE SELECT KEY TO PICK SELECTION 2%}}-@@!2 PUSH START TO BEGIN GAME 6-@ 6-F:B2y, "@ A% "@6-%~}%@ @6-@ "-@@"" LEVEL  %-@@  % A$p ) +@A%}R@) A "@ A0 "@ A0@ "@ A0P 1"@16-P:H:%},$@,%@ "@ A0 "@ A0@ "@ A0P g @,@ @%}1/@ @C/@@U,@@g/@@! ],@ @#'/@ @'9/@%}@'K,@@#]/@@0 $ @,@ @1/@@C/@@U/@ %}@ g,@ @y,@ @!/@@! ,@ @#'/@@#9/@@%K/@ %}@)],@ @$o,@ @0/@@0 $ @,@@1/@@C,%}@@U,@ @g/@ @!y/@@!/@@/@ @ ,@ @#%}'/@ @09/@@0K/@@#]/@ @#o,@ @&/@@&,@ @'%}/@@' $#"@)"@# AA#"@)"@# AA@#"@)"@# A%}AP$#"@*"@# AB#"@x*@# AB AC,#"@*"@# AB%}.#"@x*@# AB0 AC6#"@*"@# AB8#"@x*@# AB:%} ACh_%2AP@@9-@@P= _2i6-%@6%}-%@j " ADk$_%2AP@@9-@@P= _2%}6-%@6-%@ " AD$01 +AA'1AR@:2-@%}@2 YOUR FINAL RESULTS WERE:D$-@@$ CORRECT=N$-@@$ WRONG =X$-@@%}$ HELPS =Y 6-& 6-P:+$A,',b+-@@ +  SCORE =%l-@AP m%}"A ADpn@ ADo@p ADp@i ADv#6. FANTASTIC#6. %}w--@@)-@@- x9%2@U@@9-@@yM-@@%}  ?2C M AE--@@#  VERY GOOD- AE;-@@%}; !YOU SEEM TO UNDERSTAND THIS LEVELT-@@:  BUT TRY IT AGAIN SO THAT YOU CANJ  MASTER IT!T AE%}:-@@:  YOU NEED MORE WORK ON THIS LEVELF-@@< "GO BACK AND STUDY THE INSTRUCTIONSF AE%}3-@@ 3 DO YOU WISH TO PLAY AGAIN6-"AdAU")@"@ AE%}"@x AE [-@@ 9 PLEASE TYPE Y OR N M-@AQ [ AEn6-%}6-'6-@36-@ >:A%,Z0@@d A#An A#U +@%}'4 >:A%,"A@d4AR@'c-@@c I̠ teaches note values in sever%}al time signatures by randomly$'99 1printing various notes or rests to the screen..'d-@@d JThe object i%}s to add up the beats and see if the total number of beats add8'** "up to a complete measure of music.B'T-@@%}T :If the total is correct-type Y or if incorrect type N.L'SS KYour score is based on the amount of correct answers %}versus your attempts.V'q-@@q WWhen the activity is finished your score will be shown with an option to pl%}ay again.['-@@"`'k, $Ԡ٠٠ϠŠ86-JAdAUW)@kA%}UBa' Bt' >:A%,~'e-@@e KIf you want to see a chart of the correct note values %}for the different')) !time signatures, type H for HELP.'V-@@V :A%,)*-@@* 2/2 OR CUT TIME)1-@@1 HA%}LF NOTE = 1 BEAT")3-@@3 QUARTER NOTE = 1/2 BEAT')3-@@3 EIGHTH NOTE = 1/4 BEAT,%})3-@@3 DOTTED QUARTER = 3/4 BEAT1)3-@@3 QUARTER REST = 1/2 BEAT6)3-@@ 3 %}EIGHTH REST = 1/4 BEAT;)-@@"@)l- %Ԡ٠٠ϠŠ96-KAdAUX)%}@lAUBA) B`h) >:A%,|)'-@@'  SLOW 6/8 TIME)2-@@2 H%}ALF NOTE = 4 BEATS)2-@@2 QUARTER NOTE = 2 BEATS)1-@@1 EIGHTH NOTE = 1 BEAT)%}2-@@2 DOTTED QUARTER = 3 BEATS)2-@@2 QUARTER REST = 2 BEATS)1-@@ 1 EI%}GHTH REST = 1 BEAT)-@@")k, $Ԡ٠٠ϠŠ86-JAdAUW)@%}kAUBp) B`)5"@r+@+AR@5 A)$*6-%@ B%}+ A N +@AA%N7-@@7 @*N)-@@) @%}PART 34N0-@@0 @ musical slots9N BP>N/ +@-@ @/ @byHN/%}-@@/ @ ŠRN2-@@!2 @COPYRIGHT 1983\N BPfN-@A%} $a*** PLAY ARCADE MUSICa #@eb1-@"'"A1 BS b 68,- b(2%}8,@@M2@8@,@@r2@8@,@@2@8@%},@@b++0@P:@$H:@,,@b BSb:-@32%}7 :$D:MUSICDR3.BASP:@$H:@,,@b BSb:-@32$