`L i=L\Ʃx ? N'i  ͭЅ?0ȱ Ѕ?iȱi lԠԠ͠ԠϠŠͮŠ SYSTEM.APPLE   L$J----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO rerequest-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request------illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO ȡ ؂CODE!MB2.CODErѮ MBG2.CODErѮSYSTEM.LIBRARY SCORE2.FILE¯  MANAGER.CODE  MENU.CODEr¯ SCORE1.FILE¯ SCORE3.FILE¯eSCORE3.FILEROUTER.dg MOVE.CODErgk ROUTER.CODEky SMBG2.CODEQy{SYSTEM.STARTUP{} LARGE.FONT} TITLE.CODE SYMBOL1.FILEhګMBTWOPLAY.CODEA CLASS.FILE START.CODEWENGER5 MBGFAME.FILEvgt¯  INFO.FILEr d¯  NAME.FILEr ¯ SMBGFAME.FILEEt¯ NAME1.FILE hګA SYSTEM.PASCALAa SYSTEM.APPLEabSYSTEM.MISCINFObdSYSTEM.CHARSET&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xH&x'8*7Ixix&&  ') + &п x) ++`FG8`0($ p,&") (jJJ>L+ "?I>  N `  ` x V Nx .x- z `V0^*^*>` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&quest-----illegal IO request-----illegal IO request-----illegal IO request1THE MUSIC CLASSER # Begin "Ma H H bʷxXȪcELPPA[EXr Ed. not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKNKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLABLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKot aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK nBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANK aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK notBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKMUSIC123NK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBƁƂ6&06ˡ6áƁ8:9" &8(2ȡ3'*3 ?3 2-bi ö A(7ȡ &ǀǏȡ &6!0ACOPYRIGHT 1979,1980,1983 APPLE COMPUTER, INC. ALL RIGHTS RESERVED4 8(TB &" PASCALSYUSERPROGFIOPRIMSPRINTERRINITIALIGETCMD FILEPROC D NOTES CRESCENDO COMMON TIME MEASURE REPEAT SFORZANDO STAFF MEZZO FORTESIXTEENTH RESTʷ DECRESCENDO6 V CUT TIMEr3TRIPLET TWO 1/16THSM.WRK. TREBLE CLEFXTM.WR MEZZO PIANO3 APSIXTEENTH NOTE SLUR STACCATO QUARTER RITARDANDOSTACCATO EIGHTH BASS CLEF TIEquest-----illegal IO request-----illegal IO request-----illegal IO request----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO rerequest-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request------illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO request-----illegal IO BLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aMUSIC123NK not aMUSIC123NK not aBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKNK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLANK not aBLANKBLA(צPress CONTROL-RESETGb Íáɡ 럚肚X  šš ë  q7 "ˡ,8 )á á áWˡ á Dš 4áÄ 4w4]ץ11á4\1šV42233z 3042221é42é1Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$.GRAFׯצ.23aĩ3zȄ 23aA22š*á?%áצ:22ȡá;2á!2ȡ5252š[ץ22š2222ȡ2š5252á~ éÍ~  , Ą쓡"á  :"ë á 쓡ת$Pצצ22ȡ5233 ȡ 11"2COMPDEBU2162LINKANDGr21J2LINKDEBU31^2 ASSOCPRO~K21r2 SYSFILE xD23ASSMBLER@G2COMPILER22EDITOR LN22FILER B4^422LINKER *=<22DATEREC 43MONTH r3N3D3N3:l :.hzpL d | :\0T1 IBADFORM\0h1ISTRGOVFJ0\0|1CMDSTATE4x71\2HALTINIT<1DEBUGCALL311UPROGNOU1x411UPROGUOK311SYSPROG NL211COMPONLY6212COMPANDGJ2˄ `1 b (   d˯7 H ġ  *@#@,A$BBBZCC"DrDDEFtFGdGGG.InIIIfJJ0JKzxM20 ńȄ!~Í`~W ˡ!  ,ȫ$* "ë넡,~ *Í2~ š š K6"á61 ɚ V %ɡšɡš  PꟚšw#ńE z @šQȡ2 š:X f Ą ɡ 낫š ꓡ1š땫Ě@6"á1ꓡ삫Ú ȡ*ńȄ4šáRתPńȄ ,ń.áš蕿1á5   Q lȡ>š 쾿  / Zá " *0ˡ oɡa   áá0š  %4á-ë0zY 000á'5á 0z00 rT\  ɡ'áצ-32768 ^ 逫-ġ>o00ń vJ& "ˡ  J    00áQP 0á0 é000+-ÍFOTO /T! ȡ   צ0H"4$$$&ˡ 4 46%ˡ 4Jˡ 45ˡ+&ȡ 4& t&$&F'Type to continue) & ,Í ˫T \(&:0:azȄaA:!۞ۂۂەߓh  ! "ˡ ɡ!  ! "ˡ ߡ š  ńá4 á,á"  ܢۚ>ب"́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń1 áނ š   šš$    ġނš  šš!۞ۂۂەߓS  ! "ˡ.! "ˡ ߡ á( ::87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PR P:NEWC/C.CODE:6REMOUT8PSb.:=b4/#b:a@:%aF:`L!I`R[/`X)`2 4j P:NEWC/C.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE8FNo user programתP8F0ERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8E/KY Kh Pt.PE87CONSOLE187CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8P IYIL: P/.P> Eá.0::8SWAPFIB OJ8NL7SYVID 3?DKVID $Z3zL;THEDATE 3CDEBUGINF[LD STATE 1EPL :FIPOT Mo$M  FILLER DMEHצE#  9 *,.02468:E&*E$ á"ˡ"& E ##&Eá 9'89:߂ɡ F b6} š.ö}Ä-D76!~?\FצPut in :P?FP'then press RETURN *o# ~8W8Eˡ.$  š t@4,á/š ġ 4,+á"š ġ Z |5?š?ˡ?ء "ˡ6ߕނˡ   d쓡  1צS# أ , P# أ צ, I# أ \2צ Exec err #   á, J3 l/E8:Eá *0  šˡ 퓄 Ä퓡w š   ɍL  "ˡ./~6\-}ˡ2Error reading exec file-, } .}ˡ2Error writing exec file-}ë 쓡ת!!9 D*驁&F+}迶Ŷ} / š/áá-`,3# , , ,/)~áë  ÄÄȄĄMȄtiȡF ōɍ ō ȍ  dč "쓡r D ́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń1 áނ š   šš$ צUnknown run-time error-צValue range error-צNo proc in seg-table-Exit from uncalled procת-Stack overflowת-צInteger overflow-Divide by zeroת-צNIL pointer reference-צProgram interrupted by user-MayתצJunJulתצAug Sepת צOct Novת צDec ???תצ??????ת6!צ  HצTתP%%@99ˡ  7 :9CONSOLE:ת(:9צSYSTERM:(8:98 6øצ???JanתצFebMarתצApr1٦׷)צ: ܢܢH d    0&תת.ת??? *SYSTEM.WRK.TEXTײ& צ*SYSTEM.WRK.CODE ,CONSOLEצSYSTERMGRAPHICצPRINTERREMINצREMOUT{B77::9988:9  6 ۪*ʁd ضá0?ʁd*SYSTEM.STARTUPת(߫7́%́eʁ%ʁeȡlضʁ%ʁbQ́fƁfʁdƁfƁ&ʁ% Ɓf(ߡʁ% ʁbʁ%́bʁ%́%;??ٟá'C "á ~٤  :SYSTEM.ASSMBLERת :SYSTEM.COMPILERת :SYSTEM.EDITORת :SYSTEM.FILERת צ:SYSTEM.LINKERƁ&<́b́cʁcȡ~ؤ́dʁdתʁdس0ʁdʁd؞&"áޢʁޢʁʁޢʁޢʁޢʁޢ88ʁ  תʁޢʁʁޢ́Ɓ߲Ɓ߲ Ɓߪʁޢˡdتٞ&ʀ=ʀ* ʀ́ʁݢGʁݢHʁݢIʁݢ%O tƀ&́ʁݢʁʁݢʁݢ%́޲8ʁޢʁޢʁޢʁޢʁޢ ʁޢʁޢ ʁޢ ʁޢ ʁޣ  ʁޢʁݢ́ʁޢʁ٢ š٢ ٢٢ 4$88ؗ(/88ؗ(tDoo odoo'z*SYSTEM.MISCINFOתPƀƀnown ProFile errorת-/(hT?+sKצ IO error: -צUnimplemented instruction-צFloating point error-String overflowת-yProgrammed HALTת-aProgrammed break-pointת-BצCodespace overflow-' oZ>s]@;-.Le not open-צbad input format-disk write protectedת-צillegal block #-צillegal buffer address-w!must read a multiple of 512 bytesת-Munknown ProFile errorת-/(hT?+sKצ IO error: -צUnimplemented instruction-צFloating point error-String overflowת-yProgrammed HALTת-aProgrammed break-pointת-BצCodespace overfloת-file not foundת-צ dup dir entry-צfile already open-צ file not open-צbad input format-disk write protectedת-צillegal block #-צillegal buffer address-w!must read a multiple of 512 bytesת-MunkצSystem IO error-צ unknown cause- parity (CRC)ת-צillegal unit #-illegal IO requestת-צdata-com timeout-vol went off-lineת-file lost in dirת-צ bad file name-צno room on vol- vol not found'Version 1.2 of SYSTEM.PASCAL cannot runצ)with a non-1.2 version of the interpreter@9988(The 64K version of SYSTEM.PASCAL cannot )run with the 128K version of SYSTEM.APPLE7:::% š tWelcome ?, to Apple II Pascal 1.2Based on UCSD Pascal II.1צCurrent date is C -C_ 7 š, š%צSYSTEM.WRK.CODEsSYSTEM.WRK.CODE׷Fš5צ.CODE.  "*SYSTEM.WRK.CODE[*]To what codefile? (׷O,á<$88š8(8X+,,"ˡ צ Can't open ,   áث 7(צ&,á(+(.TEXT888Ä8 "ˡ$ Can't find ::9 ƀ:ײ9 ƀ:צSYSTEM.SWAPDISK&:(7,צR   88(áצ Assemblingצ Compiling...á999':::צ::&:(áAssembleCompileצ what text?  Ɓ]&/ , ۤ  áۤ  !~!!f!צ*V! ""!"צ:" "ۤ  ۤ    áۤ  ink firstƁ2ƀ¼:.Conflict between intrinsic and user segment(s)ƀ¼*SYSTEM.LIBRARY , Can't load required intrinsic(s)Yƀ¼/#Required intrinsic(s) not available2 0ڡ;ƀ ˡ.  is not version 1.2ړ22H"áצIllegal file nameNo file  ́ṕqʁq́rʁrˡ  צ not codeʁq2ʁr"ˡצ Bad block #ݢ`ڤá Zx ȡ2ݤˡ"ޢ`ݤۼ: T ڪƁ Ɓ "á9̂.ʁ ʁ"ˡ  Ɓ Ɓ Vj  ߪPˍ? P ˡآڤ á Cá>آآ*Í k vޢ ȡSڤ ˡ@۳-ܢ0ۤ ڳ@@YyÍ, 4ۢڤ ɡš2ڪP-19:!1ׯ)Illegal filenamenTȡۤˡ áڢڢ-C ;;ȡצPascal system size is 64K;;ȡצ'Copyright Apple Computer 1979,1980,1983Copyright U.C. Regents 1979%צSystem re-initializedV 59 v"pv">   F  tWelcome ?, to Apple II Pascal 1.2Based on UCSD Pascal II.1צCurrent date is C -C-C ;;ȡצPascal system size is 64K;;ȡצ'Copyright Apple Computer 1979,1980,1983Copyright U.C. Regents 1979%צSystem re-initializedá.צNested exec commands illegal"צError opening execd 6~}6 "ء HPKצExecuteצ what fileצ? Pšš+00.0.0ȡ#+.//a/zȄ +./ ..+EXEC/ׯjVP+"á(.}P+ ! Jf%צ:ݓۤ  dÄÍ"ߢ ˄"ɡۤ  dáߢ  dá ߢ C#ޣC˄ ߢ C ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá ~תޢޢޢ0ˡ) ! 767䚹 :V\28˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ ۤ Ä˄~ݤ ת   ١  n ١ á9 ٓ/! !!١á ~ݤݚ ˄ܟń ١á  ޤ wš  iá Ä,ޤ  ɡ"áޤ lܟġMáš7 ܂ۻݪ d #(   !š Í 7ÄU ǐɄ:6ń~66! šá٢.ٕ۶š ڸ۸۶ š۸ ڸ:   ȡQ  ȡ   ȡ? ȡ  ġ  á ڢڢڢڣ ڣ ١ڢ ڣ ڣ١ ڢڣڣ ڣ áڣڣġ ڢڣڣ hڢ ڢ١ڢ!ڣڣ ڢ!ڣڣ ڢÄڣ &ڢ ڣ ڢ! ڢ!ڣڣ ڢڢ ڣڢÄڢ  ϶ U not allowedup-Há6OK7AX0NP3 "gC(,. C ^(Pv 2 Z *')%?áSFצ=Command: U(ser restart, I(nitialize, H(alt, S(wap, M(ake execP')% 6!,j3쓡 צ Linking...ˡ& Restarting...á(צ*SYSTEM.STARTUP %áá 6   HˡFצCCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]P')%?áSFצ=Command: U(ser restart,צ , change it?)צNew terminator:} ȡ/,-Z N:98:9á/)*SYSTEM.ATTACH   áning, programs using GET or PUT to disk will be very slow New exec name:(šR.%+(]ˡ([8]+("á%צ Terminator=lose and disk get and put procedures swappedצOld swapping level is  צ%New swapping level (ESCAPE to exit): ض,0Í1Í2Íسs2ø1öRצ Z`X\X áޢá ~תޢޢޢ0` ۑȑآL ّ 0 ;ܩJ;* ۠؈ȩؠ#в   :>BGڇښڢکڬh~hhhhhqq a{8 ȱ{a0:A[_ ؕԈqȱi`H$)A[hIH80(hI`i(8(hI`J) )i i`HH8(iPH D۠'(hH ۩ hhehLDۍ۠'O`J>L80 %,M8$LgLhhhhhhhhץHH` )`,10 )?ILڢY` l܅k܅lм`|H D۠ D۠'È B h`@ ֠ ֭0`+` ڥHH B MڥhhLDۦ ڐ`,10` ` ` ` ۤO`) 2 ֭0` ֹ)` ( `) $ HЄ ֹJ` MȽ`H ؠ H h`@`   ٢` َ` ֭`38 0P`8 0 DۥHH)> `0* x)` EHh`LL٠(MC3 `H ؠ h ~؍,,`lQ`) ũ Ȣ`JJJJ ϱ` $p0*O# =ؤ =آ`H ؠLf ֊H h ɢ)L ,10U0I ,109,c$0 A[ $P0Ji)jj%UIЂ )?LI@a Hb c0  hH ׎h$L hhh 靱`hhh(`hhhhhhϐ8 (ֹH ֥ +ֹP b)*Ȫ`FG8`0($ p,&"VU>)Q>jj``P@J I*I `8Hh` 7HHH*L^F0 ِ9 aLgץ")j> 8`Ί aՍxՍՍՍե>?Ռ8T8ՌWuՌvՠ ýI꽌ɪ꽌ɭ蠪ϮәVE]ӾV]H)]ӾV]ԙ)]ӾT]ԙ)]ӦΨ 8$hU>`ȅbSϭb߅83Ibߐib ө ө ө ӽ`Hh`Q꽌ɪɖν*Ͻ%ϙEΈ 꽌ɪ`8` Hh݌`  $(,048<@DHLPTX\`dhlptx|Հ؈䤨谴LјJ 8彐.mĿ"Š>?( X֮ˍL հ˩($8` Ґh Hǹxbhx Nb`8Ύa߽0|ϩHhHh ӈ ө ө ӘVYԦΝYԮaߝꪽԦ ө  Ͱ()I يJJJ(jǩF؅G(  ֈ k( F G  Wjee0 Ю $Ӱb4 xbdfbH dߩ`Ǚx kh k@(LYҭH͍h (ͥpi)ͥˤ˹HH(x h(`~Ȍ``,hhh )hJ¥jJJhhihhhJi֍hhhh b\8ſƅhx Щ&'H(f'ꮭ'eƍ8ƅб ĘHH`fߠ d߮24<& צ š š۾.ˡצ([šܕ!!(š۾:ˡ١.TEXTת .CODEת!!ȡ(ܾܾ š!! ܅܅ȱՈƐ2i ȱȱȩȥȩȑȑH~H`'Pޱ[ޱݱ݄ޏޚޥ޺ޱ"AL߱ݱݱ@#AND 'ARRAY ,BEGIN CASE CONST DO DIV 'DOWNTO END ELSE EXTERNAL5FOR FUNCTION FILE .FORWARD "GOTO IF IN )IMPLEMEN4INTERFAC3LABEL MOD 'NOT &OF OR (PROCEDURPACKED +PROGRAM !REPEAT RECORD -SET *SEGMENT xL^ҥ~E88ePhhLi򅋩Fffeeeffffإ L; `~ J预 J HHHHL^ 좊 xL^Ң~ J HHHHL^ҥ~ 좊 xL^Һ^L^Һ~&~& IL^xL^ҥ~E~ 4ꢊ xL^ ꅊ Zꢊ xL^Ң~ J预 J xL^ҥ~I~~ xL^ҥ~E 4ꢊ xL^ I Zꢊ xL^Ң~ J预 JLѥ HHHHL^ҥ~E8 i  iLх 8僅傅偨倐 8&&&&Ffff 颰I襅FfffFfff` eeee ` 8僅傅偅倅 ` `Ņ"$ņŇň ʼn8`~`~ J预 J xL^ҥ~ usLhLrtLLhhhhhhhhLL8\潪]LB\Z][JHjHLLhhhhh*68jh*vlhhjH*vjHHHlffff择ŋhhL`0&&&&0ƋƋhhL`&挥F8`8ȱLѥ8Ɓ8 ри~ȱ~LdҠ ULLҥXiXYLh~hhh~ȑ~LLҥrehrseistehtueiuisu ʱrtLhLrtLLhhhi0QhthuhettheuuhrhsherrhessXЋiʱrttuLhLtLLhhhhhehehhhhhhehiehIihIiiŒ.Ln祔'ņŇ0 L]祆8ƇL]祆8厪HHLLhhhhTL֥T8~U~8~Xȥ~YT VLdҥRSLȱ 㥚8ƛƄL` 8` ^\_]`hh LLhh LLҠX Yl ?LLhhh~hhh07ȱр0ȱ,Ls ȱLsHHLHHLHH~ȥ~LLhhhhhihhhhLLhthuhettheuui ʾ] "\8]`L8\] >8ƛ 58Ƈ8\񆅖ȥ]񆅗8񆅖Ɨ8 ƗLPQ L楆8Ƈ8񆅔ȥ񆅕8Ƈ iiL奖 㥘 㥔 㭭ххƇƎ`3[[`3[[`\Z][ 8\Z][`Lх~ e~ HHH> ]>HBC\8倅\]偅]  " ]H\HHHAH@H > \v]w]|\ v\w] RPRRSQRR @RȭAR)[ [Zqʊ qŐ`8H<8H\Ni iIHHAH@H GH#FF) l GGԬهП8ƋȱHHHH`HHHHHH  < @>~?aƁ)ɠG#B/C0@A "!歪筫䭬)aVV#$6 </\z FLLIEHJh**F`F$Lө ޽޾ HHHH`HHHHHH  < `) ,1P `*0 򭋅І 51-l l Ɗgƈд** 6`V QRTWHHlRHHlT Эhh a0+&00 1ح  ` `޽`HHlHHl>޽ Insert boot disk with SYSTEM.PASCAL on it, then press RETURN# SYSTEM.PASCAL is not version 1.2#lhLhx hmDŽ ) W 9LK " W T%LXiXYX h&i` hi`RlSml~ȱlm~l``Z罅[潩`޽~@<8潍罅Z\]b[      ཀྵlN{`j5ۓ{Wv*ܞמ]َPqҜـٯU]l7{ӳBVݿӧݙy1ڇ 8R-zLDүH@P 8^L^һһһһһһһһһһһһһһһһ****************|yyyyyyy ҹHH`=`LLLLL)LHL&L)LLKLLLXLLXLLL to continue צor to cancel. Í   Another Y/N?  Remove disk from Drive #2צThen press  mo)Loading names from this disk  #4:NAME.FILE}ȡB} Insert new disk into Drive #2.press to continue צor to cancel. Í   A Copying names to new disk.צ #5:NAME.FILE}ȡꥁB}צDone, One Moment U/ Loading names from this disk  #4:NAME.FMOVENAME .#!#.1!1. ?!$ .11.!!!#    ****"""""""## .11.# >$.1!!! !!!6**""! ! .1!!? ? <5)"!!!?! """"!!"""""???!!9!!!!?!!!8!  !?!!!--3!!!1)%#!!!!!!!!.)!!!! !!! !>!!!!!! !!!!3--!!!!! !!"""?  ? "??( <12#.) *>*> ?  !#-1!> ? !!  !? ?!!!?!!!! >!!   !6>60HH06>>*>**"*6">""> $88>>>>>>*? ><>{:>.ת&תת(%Ɓ.񄓡9&   P ? ءצ*SYSTEM.WRK.TEXTצ*SYSTEM.WRK.CODEצ*SYSTEM.LST.TEX0~E~~~Ղ0LސLh)~hh)h~Lީ vhhh~hE0Ł~ŀ/1'0+!h~hh~hHHL^hHHL^ҩ%vHHL^hhh h膀e ň8内e~l8吨Lߤ 0 @ȡٛ`ġ ٛٛ ! 4تP++(+T.Ɓ0*צ %Info.File]*%P* %Name.File}́CʁCȡ}ۨ0O F F A M E Player Score --------------------------------??ȡe?? . ?  ??N> צChoose your level (1-20): P ũɄ  GET READY צLEVEL  R  צ%SMBGFAME.FILE צH A L L /. -0/.-  ǿ 0.0-/-/.0.0.Z ٪P.--,/,/ġ,0.. .,,&ZF  (Type your selection then press P]}  A]8  One Moment %Manager צWrong Password Try AgainOr Press  T  צ Welcome, }}R W*V2 %Menu*Press Z  Type Your Password Then P]}  A]8  One Moment %Managererard L. Knieter, DeanDEPARTMENT OF MUSIC Then YOUR NAME ==> xPBLANK׷)}--ȡ}ثI do not know anyone named ȡ& ȡ.# >& Press 2FZ ,  UNIVERSITY OF AKRONCENTER OF FINE AND APPLIED ARTSGPress to continue. z ??ȡ:٧A?>>@??E ^>??ȡ6????A T??ȡ7٢   ?>??AZ?>?ġ6????اآ >o  צ One moment á00 L  -, ǖ4צ BONUS POINTS*0.*.ȡ*** P 0++*,-á Aa\ á9(dCONGRATULATIONS,(ZYOU WERE PE /00  á0.ګá ɡ 0ګá ; 2b ZUi  ǿ  á á á6 X  (á ȡá á ; <x_   ġ,dZ;  &ZצPress any key to begin u-ǿ  ǿ 1 2 2 u///uá\ iȡ0]. )*)(*(( CorrectצWrong((d))dvǴǴǵvǵǵ10 correct before 10 wrong.צPress to continue.l t צ %Symbol1.Fileצ %Name1.File 2 2;;ȡ 10 pointsצfor each level of difficulty.$(Ex. A match at level 10=100 points)Press to continue. $Bonus points are given for answering.צYou will start with level 1.צPress to continue. "Points are scored for each correctanswer.צ"Each correct match gives $but you will need to know some musicsymbols.&If the symbol you see matches the wordpress any key to let it  into the box.צThere are 20 levels WELCOME TO SUPER MUSIC BOX GAME.צHave you played before (Y/N)? س@@س"GOOD!  צWell it's not too hard, then press  צ Your choice: uuNNu YU QRvJ  "$&(*,.02468:<>@SQFHSuvx  צ Choices:  epeat Gameצ ave score to top 20צ iew top 20 players uit and return to menuצ(Type your selectionns you move up toצ position > >š ~Ɓ- צYour last score on level  צ:  צ High Score:  %SMBGFAME.FILE>d@AA> @>ɡצYou have slipped from @ >š#off the Hall of Fame.%צ to position > g@>š\צCongratulatioRFECT!w ád(dצCOMPUTER WINS!(ZצSorry, No Bonus Points For You.ġ   ɩńšǖǴצ PRESS ANY KEY uc ;gǴ2^Ǵ/ é č1 u;2"X|DjBLd PV>Z<ONGRATULATIONS,(ZYOU WERE PEȡٛ`ġ ٛٛ ! 4*צ[OFF]צ[ON] "*2צ[APPLE SPEAKER]&צ[ALF SYNTHESIZER] 12:$ צ VERSION 2.10צ ------------ ǭ. 8x NE:BOOLEAN); "Procedure Fontype(m:integer); "Procedure Wfchar(ch:char); $ 3 $   IMPLEMENTATION E \CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾Cثǭ @[Ʉ AZA     DتP-.-.ȡ---V 4٪Pnj--ء-T: %LARGE.fontp|$TITLEPAGLARGE (Aap|( 00(@pp`p(p@p`ppp(p p03(@px`(Aaq)!11Ω(@p0`x(@aq)!11Ω(@pH`(Acs+#33(@pc+A`ppp( 13(@pp`p(p@p`ppp( 13(@pa)@`8pp( 11p~`(Aaq)!11(@pg+A`~p~( 13(@p`(@`p( 00(@pg/Gg'ww/'77(@pc+Ccs+#33(@px`(Aaq)!10x(@p`(@~`p)!10~(@pp<`~(@`p( 0~0<(@pa)Aaq~( 0~0>(@p~`(@p`(@`p( 0~0<(@p?`(@`p?(w w0?0(@p`(@`p( 00(@p?`(@`p( 00?(@p`(@`p( 00(@p`(@`q) 01(@pa)Aaq( 00(@pa)Aaq)!11Ω(@p8`8(8@8`8p8(8 80808(@V\ Ҷضڶʷ޶&ʷ&~~~ʷ~ʷ MLIT:*ʷvʡ\CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾CƁ/צ #5:Info.File"ál  Remove Music Disk From Drive #2.Press &P C צ One moment צ%TITLEJI STARTUP RFECT!w ád(dצCOMPUTER WINS!(ZצSorry, No Bonus Points For You.ġ   ɩńšǖǴצ PRESS ANY KEY uc ;gǴ2^Ǵצ(This disk contains an instructor managerצ!which includes record keeping for&125 students. See manual for details.Current instructor manager settings:צ Record keeping is  Sound system is צPress to continue.& vتPnj,,T&Ɓ.Lj %CLASS.FILE "@BH@ @x8`@@ @@ p0 @ xqItx00 I0px"x@I(@x"xx@hc@p"p8 8@@`"@ A`@@@@ B@@ P One moment *צ %INFO.FILE**צBLANKצ%Start צ One moment *%צ%ManagerYNAMEׯצ%Start=*צ%RouterT!FMUSICצ%MENU*"RZ ơ/l*V2 צ8 P One moment *צ %INFO.FILE**צBLANKצ%Start צ One moment *%צ%ManagerYNAMEׯצ%Start=*צ%Router<צAuthors:2צFrank Bradshaw(צ Virgil Hicksצ$Press for Manager Information. צPress to continue.ƥťĥƓơ/l*V2 צ8 ǪצWenger CorporationǠצpresentspPPF צ (C) 1985 The University of Akroñʃȡ*lǴצThe Music Class SeriesǠצSYMBOLSǂ MUSIC BOX IIP Version: 2.10+2++"V 8 ǿȡ%2á 5an  8dצMUSIC BOX GAME FOR TWOǿ 8 צ Press to continue. & צ"Type your name then pX צ!Then press to continue.  צChoose your level 1-5=> س>ع(ǖ!d215 % تP+,+,ȡ the name.צ!The first person to recognize thematch should press their key.צ%The first person with 8 symbols wins.צPress to continue.   zw  צ and  Let's go!צPress to continue.   INSTRUCTIONS#Match the music symbol to*d  ǚɡǚ  ɡ   Ǵ & %Ǫšc/%&%á%#á %$á nj nj á2: njnj  ;*d pšp ɡ   njnj      ?3 ( Dzǿ  ǿ $ ġ  "  á3 >  á3 >   áϹ            w n e \ S J A 8 /(|ung`YRKD=6P, P,,+*-*-ȡF* ,Ǫ+*,Ǫ++2+** TZ  צ %Symbol1.Fileצ %Name1.File ,Z  á.0-/-/.0.0.Z٪P.--,/,/ġ,0.. .,,&ZFȡǪǪ*áš#ȡپ`ġپ 4 Do you want to quit (Y/N)? %%צ%MENU zتP0/. -0/.-  ǿ 0pPTWOMUSIC ress Name of Player onצleft=>PצName of Player onצright=>P,צShow me which keyyou are using.Press any key => #,צShow me which keyyou are using.Press any key => $ȡ#ٛ`ġ ٛٛ ٛٛ+ > (Pצ š ɡ..ȡۛ!^X p  START 0p00 p0 (80~x8 .. D@SDEVRTEv p0 p8 p0 pp ~p0 p0 p0 p0 p0  pp 0p  ?ppp|TE<<TR ?       x Gx Fxx>p6 pEppV px8|8>8v888@S8DE8b8r pFBOBO 6?ǁx6 ?<Ȫ|>;Ǵ  pǚ  Í "@@ š<CONGRATULATIONS !?š:צCONGRATULATIONS !THANK YOU, One moment%MENUb9&F>rxvHh* \ $ L v r Rb6""@@"f弄Ǵ;Ǵ  pǚ  Í "@@ š<CONGRATULATIONS !?š:צCONGRATULATIONS !THANKáצSCORES   צANOTHER GAME Y/N? ""@@"f弄ǴצUse only the key that youjust chose for the entire game.צPress to continue. m *P P  ǠǠ*8 צ"Enter your school or personal nameצ!as you wish it to be displayed on this disk.<30> characters maximumצ&<3> characters minimum (alphabet only)צThen press צ------------------------------ńaPaaDisk name entered as:צIצthe symbol into the boxThere are 20 levels.You will start with level 1.צPress to continue.t |  צ %Symbol1.Fileצ %Name1.File D !  Well it's not too hard,צ$but you will need to know some musicצsymbols.צ&If the symbol you see matches the wordצpress any key to let1  צLEVEL    WELCOME TO THE MUSIC BOX.Have you played before (Y/N)? س@@س#GOOel 1-20=> P ũɄ   GET READYR  You are on level  !Do you want to play again (Y/N)? HH@@Hǿ 0.0-/-/.0.0.Z ٪P.--,/,/ġ,0.. .,,&ZF  (Type your selection then press צChoose your levT.P  *LEVEL: R4Ɓ- צ %SCORE1.FILEצ%MENU\ xتP0/. -0/.-   Do you want to quit (Y/N)? HH %MENU ȡتP++(+!)!@fneu@     f$6HZ X(ecute, A(ssem, ? [1.2]ʷ߾CتP,-,-ȡ*, ˸ٶ, ,,<V R צ XX צ XX צ XX צ XX צ XX צ XXXXXXX XX צ XXXXXXX XX ("(<MB2 MBUNIT s this correct Y/N? ٳ qBD$ y/2 צ %INFO.FILE&  One Moment %Title. URN>צ------------------------------ńaPaaDisk name entered as:צIs this correct Y/N? ٳ qBD$ y/2 צ %INFO.FILE&  One Moment %Title.hhrrȡrr ȡrrr0]. )*)(*(( CORRECTצWRONG((d))dvǴǴǵvǵǵ &ZצPress any key to begin H-ǿ  ǿ 1    0/. -0/.-  ǿ 0.0-/-/.0.0.Z ٪P.--,/,/ġ,0.. .,,&ZF  (Type your selection then press צChoose your level (1-20): P ũɄ  GET READY צLEVEL  R  צ %MBGFAME.FILE H A L L O F F A M Eצ Player Scoreצ --------------------------------??ȡe?? צ. ?  ??6 X  (á ȡá á  <x_   ġ,dZ ss any key to begin u-ǿ  ǿ 1    u uá`u iá áuu0]. )*)(*(( CorrectצWrong((d))dvǴǴǵvǵǵ &ZצPreצPress to continue.j r צ %Symbol1.Fileצ %Name1.File uuȡuu ȡuor each level of difficulty.$(Ex. A match at level 10=100 points)Press to continue. $Bonus points are given for answering10 correct before 10 wrong.start with level 1.צPress to continue. "Points are scored for each correctanswer.צ"Each correct match gives 10 pointsצfe musicsymbols.&If the symbol you see matches the wordpress any key to let it  into the box.צThere are 20 levels.צYou will MUSIC BOX GAME.צHave you played before (Y/N)? س@@س"GOOD!  צWell it's not too hard,$but you will need to know som  Your choice: uuNNu YU QRvJ  "$&(*,.02468:<>@SQFHSu~  WELCOME TO THE  epeat Gameצ ave score to top 20צ iew top 20 players uit and return to menuצ'Type your selection then press  position > >š ~pƁ- צYour last score on level  צ:  צ High Score:  צ Choices: d@AA> @>ɡצYou have slipped from @ >š#off the Hall of Fame.%צ to position > g@>š\צCongratulations you move up toצ?ȡ7٢   ?>??AZ?>?ġ6????اآ >o  צ %MBGFAME.FILE>צPRESS  l ??ȡ:٧A?>>@??E ^>??ȡ6????A T?  á á3 á ɡ 4 á  7lZUi  ǿ  á á           x o f ] T K B 9 0(}voha|} ŀ}|ƀL~HHL,~HH~HHHHHHL,~ʈƅFHHHH恥HL,0~}ʈƅ0I愊iʈؚH恥LŁ|} ƅL ~8刅剅<8ȱ` 5l 5 l 5lhzh{hƁhhhƁ}eʆƀƀ|ʊe~8偅z{lzhhhhhh8冐 0 h HHHL,LwIL,h hrsʈ .ł( ŁZ   :    ( tV8z <|hvhwhhxylxNj+Nvwlv")@ LY-09Ȅ0ݡߑ ع      z  &  * عteVG8  )   uh[NA4'á +-ÍNTEGER[36]) /END; ' " "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWRITEDEC(VAR F: FIB; D: DECMAX; RLENG: INTEGER); "  IMPLEMENTATION X E EDURE DECOPS; "EXTERNAL; " "PROCEDURE FWRITEDEC(*VAR F: FIB; D: DECMAX; RLEN12]); 15:(W5:INTEGER[16]); 16:(W6:INTEGER[20]); 17:(W7:INTEGER[24]); 18:(W8:INTEGER[28]); 19:(W9:INTEGER[32]); 110:(W10:INTEGER[36]) /END; ' " "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWRITEDEC(VAR F: FIB; D: DECMAX; RLENG: INTEGER); "  IMPLEMENTATION L N E @d $ "TYPE DECMAX = INTEGER[36]; STUNT = RECORD CASE INTEGER OF 12:(W2:INTEGER[4]); 13:(W3:INTEGER[8]); 14:(W4:INTEGER[12]); 15:(W5:INTEGER[16]); 16:(W6:INTEGER[20]); 17:(W7:INTEGER[24]); 18:(W8:INTEGER[28]); 19:(W9:INTEGER[32]); 110:(W10:I n1 p& -/LONGINTIPASCALIOCHAINSTUAPPLESTUTURTLEGRTURTLEGRWENGER WENGER SOUNDSTUSETUP SETUP STRINGST 0%+. é č u!X~V|Vfd BH4P<GRATULATIONS,(ZYOU WERE PERFECT!w ád(dצCOMPUTER WINS!(ZצSorry, No Bonus Points For You.ġ   ɩńšǖǴצ PRESS ANY KEY uc 𥂕ǴǴZSLE>74 .  -, ǖ4צ BONUS POINTS*0.*.ȡ*** P 0++*,-á Aa\ á9(dCONGRATULATIONS,(ZYOU WERE PERFECT!~8ʈƅ  ILL, LLL,E0LL1 L ILL,ELL1 LEe8刅刪ʈʈ&~ʈƅFyʈƅ}ʈƍƎƋƊЌإL2d|e~28ʈƅyʈƅƉ` LŁ|}ƅLE||怦}ʚH恺  uh[NA4'á +-Í-09Ȅ0ݡߑ ع     ݕ 0 . ݑ0 ݕݕ ؂ ɡ  |,  &  * عteVG8  ) ͉݂ġ ݂$ $ $ȡ%  0 ފ$čV   .ˡ:  Eɡ  -ݑ š 0 0 ߿`ġ(   ݂. ݕ ؂݂3  >ۓɡ ؼ݀$ ؼݞ$ۡܡ ؼ" Bɍ -   $ $ ݞ$' ݑ$ $݂ō $   "á +-Í-09Ȅؼ 0.á@09Ȅؼ0ݞ$09ȄjeEÍɍEáޢݣޢÄá ޣ Ą.1 ޣ Ąݣ ˡRݣ &ݢ ݢݢ!ݣ "ˡRݣ ˄ݢ!ۂ"ˡ+ݢݢݢˡݢݢ ۚݢ    ݂܂F      ޏݏ@܏ޏ@ݏ܏ޏݏ܏܏ ݏ ܏  ݢPROCEDURE FWRITEREAL(VAR F: FIB; X: REAL; W, D: INTEGER); "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWRITEDEC(VAR F: FIB; D: DECMAX; RLENG: INTEGER); "FUNCTION SUPER_MOD(A,B : INTEGER) : INTEGER; "FUNCTION SUPER_DIV(A,B : INTEGER) : INTEGER; "  IMPLEMENTATION L N E @dNTEGER[36]) /END; ' " "PROCEDURE FSEEK(VAR F: FIB; RECNUM: INTEGER); PROCEDURE FREADREAL(VAR F: FIB; VAR X: REAL); "PROCEDURE FWRITEREAL(VAR F: FIB; X: REAL; W, D: INTEGER); "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWR $ "TYPE DECMAX = INTEGER[36]; STUNT = RECORD CASE INTEGER OF 12:(W2:INTEGER[4]); 13:(W3:INTEGER[8]); 14:(W4:INTEGER[12]); 15:(W5:INTEGER[16]); 16:(W6:INTEGER[20]); 17:(W7:INTEGER[24]); 18:(W8:INTEGER[28]); 19:(W9:INTEGER[32]); 110:(W10:Ihhƀhh-ȑhhƀ 0ȑƀ0hJJJJ 0ȑ) 0ȑƀĆLL,tq1+%ZTNlb3 `\[TOG@;:3(  T[Fc>8 ND Z1> HHHHHL,} ei|ʽ 8襁i}ƅ|L,hƀhhh8hohlhXhhhFffff80)ƅܥ#FfII懥HHL,Lwhhh8倅偪ʈƅ})H揥>ʈƅ ~擥  抦|ɥ8包~ƅLII懩&&u`hh  z Z   :    ( tV8z <| [NA4'á +-Í-09Ȅ0ݡߑ ع     $TYPE $ SCREENCOLOR=(none,white,black,reverse,radar, 3black1,green,violet,white1,black2,orange,blue,white2); $ $PROCEDURE INITTURTLE; $PROCEDURE TURN(ANGLE: INTEGER); $PROCEDURE TURNTO(ANGLE: INTEGER); $PROCEDURE MOVE(DIST: INTEGER); $PROCEDUREn(j LEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATION: INTEGER); $FUNCTION RemStatus (channel : RSChannel) : RStatType; $ "IMPLEMENTATION X E EDURE TTLOUT(* SELECT: INTEGER; DATA: BOOLEAN *); $EXT$hhhhhh9.:.;.<0(0(099JH;HHH`Z310/$ T?@AB ?UB`2hhhhhhhhH)HHH`)J) D* کHH  ),`#d`L+L10`LELK뭕 JF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !hhhhhhh)hpdHHHH`4hhhhhhhi)hH`HHH`0hhhJhh)*XhHH`"hhhhhhH! \L HHH`<hhhhhhHHLM0ON KEYPRESS: BOOLEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATION: INTEGER); $FUNCTION RemStatus (channel : RSChannel) : RStatType; $ "IMPLEMENTATION X E EDURE TTLOUT(* SELECT: INTEGER; DATA: BOOLEAN *); $EXTUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; $PROCEDURE TTLOUT(SELECT: INTEGER; DATA: BOOLEAN); $FUNCTION KEYPRESS: BOOLEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATION: INTEGER); $FUNCTION RemStatus (channel : RSChannel) : RStatType; $ "IMPLEMENTATION N E $ $TYPE &RStatType = (RStatBusy, RStatReady, RStatOffline); " RSChannel = (RSOutput, RSInput); " $FUNCTION PADDLE(SELECT: INTEGER): INTEGER; $FUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; $PROCEDURE TTLOUT(SELECT: INTEGER; DATA: BOOLEAN); $FUNCTI0TRšزTRPزTPR, *BZC.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE@ˡצ)Version 1.2 of the Chainstuff unit cannot+run with a non-1.2 version of SYSTEM.PASCAL تPšH++H0تPRšT+R+PTPC/C.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE "PROCEDURE SETCHAIN(TYTLE:STRING); "PROCEDURE SETCVAL(VAL:STRING); "PROCEDURE GETCVAL(VAR VAL:STRING); "PROCEDURE SWAPON; "PROCEDURE SWAPOFF; "PROCEDURE SWAPGPON; "  IMPLEMENTATION X E   z Z   :    ( tV8z <| MOVETO(X,Y: INTEGER); $PROCEDURE PENCOLOR(PENMODE: SCREENCOLOR); $PROCEDURE TEXTMODE; $PROCEDURE GRAFMODE; $PROCEDURE FILLSCREEN(FILLCOLOR: SCREENCOLOR); $PROCEDURE VIEWPORT(LEFT,RIGHT,BOTTOM,TOP: INTEGER); $FUNCTION TURTLEX: INTEGER; $FUNCTION TURTLEY: INTEGER; $FUNCTION TURTLEANG: INTEGER; $FUNCTION SCREENBIT(X,Y: INTEGER): BOOLEAN; $PROCEDURE DRAWBLOCK(VAR SOURCE; ROWSIZE,XSKIP,YSKIP,WIDTH,HEIGHT, 8XSCREEN,YSCREEN,MODE: INTEGER); $PROCEDURE WCHAR(CH: CHAR); $PROCEDURE WSTRING(S: STRING)  h 2  ɡh h  h . آآآǿآآǿآآD ǻٚ SYSTEM.CHARSET!ٹا ZZا Zا Zا ZZfا ZZا Z:ا Zا ZZb8  ؂  ɡh h QZ|?ٽ RZ}?4 SZ~? TZ~? UZ? VZ?[` WZ?& XZ?ؽ YZ?  ZZ?2  Z Zá.ٹ#ؑi?޽ CZk?7 DZm?[ EZn? FZp? GZr?  HZs?yx IZt?hн JZv?D KZw?F LZx?Re MZy?Pp NZz?g OZ{?K PZ|?aI? 5ZL?Xs 6ZO? 7ZQ? 8ZT?; 9ZV?% :ZY? ;Z[?Lo <Z]?г =Z_? >Zb? ?Zd?  @Zf?] AZh? BZ 'Z!? (Z$? )Z'?| *Z+?+L +Z.?l ,Z1?ս -Z5?D .Z8?& /Z;?: 0Z>?> 1ZA?4 2ZD?v 3ZF?  4Z>? Z>ca Z>*r Z>aq Z>^ Z>9 Z? Z?ٽ Z?ƨ !Z ?vm "Z?F' #Z?ս $Z?y %Z? &Z?1>н ZC>oc ZT> Zf>Y Zw>g Z>탽 Z>K  Z>ȱ Z>z7 Z>ٰ Z>? Z>| Z>}̽ Z>  Z4تP+,+,ȡ+++V 0 Z Z^ Z ><0 Zl    ڪP."ˡ[̄$ʄ$N.ʄ$M ń.ʄ$M  ʄ$̄$.ʄ$M .ʄ$M Y@'  ǯ?Ǭ?ǰ?Ǯ?ǩ?áǫ?Ǭ?0 ٢ؚڢؚڢٚ ۚܢښܢٚܢؚɡšܢɡܢǿšܢǿɡܢɡܢ; $PROCEDURE CHARTYPE(MODE: INTEGER); " "IMPLEMENTATION $endc}  " SETC SHORT := FALSE}  hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh X E CHAR); $PROCEDURE WSTRING(S: STRING); $PROCEDURE CHARTYPE(MODE: INTEGER); " "IMPLEMENTATION $endc}  " SETC SHORT := FALSE}  áSYSTEM.CHARSET  @! @4` - G`` 8`*UH)JJh & & f)4#i JL` T$Q%P)Q I L`#JI`'  I` I0ݩ(0/,",i8i#Hiihifi`i,i,3iPII4ifH8H hIiH h hL8Iif  Procedure Initsynth; 'Procedure SetVolume(v,channel:Integer); 'Procedure SetPitch(P,channel:Integer); ' 'Procedure InitSpeaker; 'Procedure Speaker(Pitch,Duration:Integer); " "IMPLEMENTATION E ce=> س سسh:0d0 0(צ One moment $Bp C2á You may choose Computer Keyboard or Paddles.צ Keyboardצ

Paddles or Joystick Choision; +Function Stud_Number:Integer; +Procedure Get_Name; +Procedure Message; + %IMPLEMENTATION E ~ʷ MLIT:*ʷvʡ\CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C +Uses Chainstuff; + + +Var Pdlversion, Alf:Boolean; 0Stud_Name:String[25]; 0Chain_String:String[80]; {1-2-3 = student record number} K{4: T = true record keeping } K{5: 1 = speaker 2 = alf } K +Procedure Soundversion; +Procedure DeviceverSETPORT @=P l=7MAKEPORT|=P 7 ==L1TURTLEGR)RTCHEA=GA440 BS|== zjZ QH?\V n x x(,np< $8L. ~  L  DRIVE <<<FNAM =SETSINE1<<SETSINE2SETDEFAU=e*e+)*)fjfjfj+*fjfjfj8 8)eeL )` (J(F ((Lee L  )LT I1LT )QLT       hhhHH h )# " `' & 8 ! 0%ee8` !  e e8"#088$ % 0%ee8`$ %  e e8&'08HHL<  y B  ""##8&$iT8&UU !  U"# UT`+%$Y)!p h hhhhhhhhhhH8 )%HHH`5>hhh)hh h h h hhhhhhhhh 0&!"   #"  ` ` `SN-(' . hhhhhhHH `  y HH8H8  hhhL .+ rhh hehehehe8`)    L)ˢ   â LE % %  )  `8`&e epɀj f f&e e pɀjff %) % )`% L=`0(%$ $ @' &   cY}zeNEDh0h1hhhhh.h/h,h-h*h+h(h)(ȱ(*ȱ*,ȱ,.ȱ. HH1H0H(ȹ(*ȹ*,ȹ,.ȹ.`   ""##  )`%) E J j 8  e e  `(J 8 e  ` Z Z< $ %$PQ $  ߩ $ Li`t^ Ҷضڶʷ޶&ʷ&~~~ʷ~ʷ APPLE2:ʷvʡ\CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C hh2 o  /  [+ҍ~Z !?"#$%&'()Ǎ*+* áצ00 á0ȡۛۛ |تPiP:Pain_String:String[80]; { 1-2-3 = student record number } F{ 4: T = true record keeping } F{ 5: 1 = speaker 2 = alf } ,Info:File of Record 7First,Rkeeping,Passwords:Boolean; 7Version:Char; 7School:String[30]; 7Disk_Number:Integer; 7Standards:Profiency; 7M_Password:String[25]; 5end;  " Procedure Set_Number(N:Integer);  Procedure Set_Sound; -Procedure Set_Name(Name:Small_String); " "IMPLEMENTATION L E .4] of Real); 8End; , ,Small_String=String[25]; ' 'Var Chain_String:String[80]; { 1-2-3 = student record number } F{ 4: T = true record keeping } F{ 5: 1 = speaker 2 = alf } ,Info:File of Record 7First,Rkeeping,Passwords:Boolean; 7Version:Char; 7School:String[30]; 7Disk_Number:Integer; 7Standards:Profiency; 7M_Password:Str ' 'Type Profiency=Record 8Case Boolean of :True :(I_Excellent_Standard,I_Good_Standard:Array[1..4] of Integer); :False:(R_Excellent_Standard,R_Good_Standard:Array[1..4] of Real); 8End; , ,Small_String=String[25]; ' 'Var Chain_String:String[80];bhhhhhhHH` hhhhhhLȹLHH`2F Bh any refsצ bad formatáōצ bad privateǠōɍ Nō bP QR ShT UVWaXYZ[w\] ^_`aHH`~{xurolifc`]ZWTQNKHEB?<9630-*'$!  /,< *!ݍ"'#$%%&#'(!)*+ݍ,-0./012345`6789:;Ѝ<=>?Í@AҍBCDEFGNH IJ KڍL M0N O(0 ШHH`yu[R7.hh6vmjtdэ^~YxT O A K G CH?;a875:2h|yvspmjgda^[XUROLIFC@=:741.+(%"  bhhhhhh ȹFf F F  $0 ޥ789:;<=>?@ABCDEFGȍHIՍJKLMNOPQRS(TU8VWHXYXZ[h\]x^_`aHH`! # % ')+-/26:>B !F"#J$%N&'R()V*+Z,-^./d01l23t45|6_]`aHH`|yvspmjgda^[XUROLIFC@=:741.+(%"  bhh,-./01k23T45@67.89:; <=>?@ABC֍DEʍFGHIJKLMNOPQRSTUVWwXYpZ[j\]c^ { 1-2-3 = student record number } F{ 4: T = true record keeping } F{ 5: 1 = speaker 2 = alf } ,Info:File of Record 7First,Rkeeping,Passwords:Boolean; 7Version:Char; 7School:String[30]; 7Disk_Number:Integer; 7Standards:Profiency; 7M_Password:Str  #PROCEDURE GETSTRING(VAR OK,MOVEUP,MOVEDOWN:BOOLEAN;VAR S:STRING);    IMPLEMENTATION E pr*SYSTEM.WRK.CODE[*]vDecM:SYSTEM.SWAPDISKeTextInfoDataGrafFoto:STRSTUFF.TEXTSYSTEM.FILER #5:STRSTUFF.TEXT ss to exit.Xá 5 س>Ƕ(ؿ T\  'Insert New Disk and press R ȡEȡGšNáNצ Your Choice: س سسhN0d0 0(צ One moment $Bp Select the way you will respondצto the questions. eyboard of the computerצ

addles or Joystickצ Your Choice: س سسhN0d0 0(צ One moment $2áSelect the way you will respondצto the questions. eyboard of the computerצ

addles or Joysticksion; +Function Stud_Number:Integer; +Procedure Get_Name; +Procedure Message; + %IMPLEMENTATION E ~ʷ MLIT:*ʷvʡ\CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C +Uses Chainstuff; + + +Var Pdlversion, Alf:Boolean; 0Stud_Name:String[25]; 0Chain_String:String[80]; {1-2-3 = student record number} K{4: T = true record keeping } K{5: 1 = speaker 2 = alf } K +Procedure Soundversion; +Procedure Devicever $$:STRSTUFF.TEXT,$1 SYSTEM.FILER Ҷضڶʷ޶&ʷ&~~~ʷ~ʷ M:**ʷvʡ\CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C&ئתP   ܳH, áܳ á 8ܳH ܿPQP ááX  $$:STRSTUFF.TEXT,$1 SYSTEM.FILER Ҷضڶʷ޶&ʷ&~~~ʷ~ʷ M:**ʷvʡ\CCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C>  E* GN Z __//צ STUDENT #   צ(E=EXCELLENT G=GOOD N=NEEDS IMPROVEMENTצ(----------------------------------------צ MUSIC BOX IIצ LEVEL  צ CORRECT צ WRONG ͥ}ABLANKתA BLANKת AAȡ}   ecord ---------   A  A AA}E: TZ  šA  A AAomp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C    }á }Press to exit Name צ-------------------------  A APassword צ - APassword צ ---------- A   šA A   šA  A AAomp, L(ink, X(ecute, A(ssem, ? [1.2]ʷ߾C    AAAצBLANK_צThis record is BLANKUse dd Press for no changeצName ------------------------- 0 | VMANAGER CHANGENAADDNAME ZAPNAME HALLFAMESETPROF SOUNDSYSPRINTOUTPRINTSCO 1sYOD8(  "$<(*,.02468:<>@BD`HJLNPRfVXZ\^`bd|hjlnprtvxz|~  One moment *&ENf    *V2* %Info.file*š>Z Q%MB2%MBG2צ%SMBG2צ %MBTWOPLAY 1sYOD8(  "$<(*,.02468:<>@BD`HJLNPRfVXZ\^`bd|hjlnprtvxz|~  One moment *Ƃ_Ɓ/Ɓ/Ƃ_ *V2* %Info.file*š>Z Q%MB2%MBG2צ%SMBG2צ %MBTWOPLAY -- Ɓ/Ƃ[Ƃ_ƃƁ- צ One moment צ %Score1.FileƂ_ %Score2.FileƁ/צ %Score3.File  צPress to continue.  _ צ3---------------------------------------------------SUPER MUSIC BOX GAME IIצ POINTS /  *٢/ 3------------------------------------------------- *٢ 3---------------------------------------------------צMUSIC BOX GAME II POINTS _  *٢number   Zap ll records (1-125) Zapצ ape without zapצ Choice=> &áE""AAName AצPassword A Remove this person (Y/N)?  Type 'DELETE' to zap all namesor press PP צDELETE}ȡ  ... Ȅ . .}Ȅ ... Ąq . .}ȄE ... Ą gWآE5آ# m]O?1!-,ȡ ٕ% H *. . .Ę9 *ع٢  l٢ U @٢ )  wdO<' خخ*-,fآII#Minimum score EXCELLENT (10-32000):Minimum score GOOD (10-32000): צSUPER MUSIC BOX GAME II#Minimum score EXCELLENT (10-32000):; Minimum score GOOD (10-32000): 7٪P.--,/,/ġ,0.. .,,(Z HتPRع MUSIC BOX IIMinimum wrong EXCELLENT (0-10):Minimum wrong GOOD (0-10):צMUSIC BOX GAME >ʁCȡ[ʁ>צ-----آ ́?́Dʁ?ʁDȡʁ?́?ʁ>́>ʁB@@ ́>́Cʁ>ʁCȡi<ʁ> צ > View level ʁ>  of HALL OF FAMEʁ>́> Exit without viewingEnter Choice => &ƁAʁA ʁA ʁA0  @(]a &  One moment ́>́Cʁ>ʁCȡ[ʁ>צ-----آ ́?́Dʁ?ʁDȡʁ?́?ʁ>́>ʁB@@ ́>́Cʁ>ʁCȡi<ʁ> צ > View level ʁ>  of HALL OF FAME BOX HALL OF FAME  Choice => ƁBʁBצ&Are you sure you want to clear (Y/N)?  Choice => &  One moment ́>́C"٢  !צ ----?? צPress to continue.&L!PXƁ-  צiew MUSIC BOX HALL OF FAME lear MUSICצ One moment خ צ HALL OF FAMEצ"PLAYER TIMEצ"----------------------------------??ȡ? צ. ٢  צPosition PaperצHave printer on lineצPress to begin  gצConsole:PPsH%  "$&(*,.02468:<>@DFe ع9צ %MBGFAME.FILE)צ%SMBGFAME.FILE A'P

rinterצcreenצEnter Choice => &@@ @lArd  "\&(*,.02468:<>@DFHJLNPRTVXZ\^`b    áE""AAName AצmC-, á.Cw;gXzȡ خٓ á, :  צ" S E T N E W S T A N D A R D SPress for no change.!Press or ^ to move up.  צPress to continue.   b, . Ąq . .}ȄE ... Ą  צConsole: One moment   Press to continue.   *צOFFצON צRecord keeping is => Pצ(E=EXCELLENT G=GOOD N=NEEDS IMPROVEMENT+},+,ȡ +++   =61}cV "$&(*,.02468:<>@BDFHJLNPTVXZ\^`bdfhjlnprtvxz~  צEnter heading for Printoutthen press צ

begin printing ape   +},+,ȡ +++ } +},+,ȡ++}++}++x  "$&(*,.r*}  "  +},+,ȡ+}++ צ#Move the cursor to desired locationצ! marks a record for printingצ omplete printout  *ڢ3---------------------------------------------------צSUPER MUSIC BOX GAME II SCORE   *ڢצ3--------------------------------------------------- צ3---------------------------------------------------MUSIC BOX GAME IIצ SCORE   *ڢ3---------------------------------------------------צSUPER MUSIC BOX GAME II SCORE   *ڢצ  WRONG  *ڢצ3---------------------------------------------------MUSIC BOX GAME IIצ SCORE   A(E=EXCELLENT G=GOOD N=NEEDS IMPROVEMENT(---------------------------------------- MUSIC BOX II LEVEL   CORRECTȡEȡGšNáN> E* GN ZAA STUDENT #mC-, á.Cw;gXzȡ خٓ á, :  צ" S E T N E W S T A N D A R D SPress for no change.!Press < * SPEAKERתPALF תP 12'צMusic Box uses SPEAKER ONLY צPress to continue.   E ... Ą mC-, á.Cw;gXzȡ خٓ á, :  צ" S E T N E W S T A N D A R D SPress for no change.!Press <Change (Y/N)? @@&***      צ One moment**Current manager password *%צChange (Y/N)? @@ צ&Enter new password then press צOld password=>*%צNew password=>צ-----------------צdisk to another.צTwo disk drives are required touse this option and both the#source and target MUSIC CLASS disksצmust be version 2.0 or greater.(B楅Am*V2@á 'This option transfers the student namesצ"and passwords from one MUSIC CLASS ; (  B&J( jrګ٫4 AAd(A 8J(צ   u < "$&(*,.02468:<>@BDFHJLNPRTVXZ\^`bdfhjlnprtvx|~ ǿ ٶٶٶٶRr(ȡڛ`ġ ڛڛ ؕ+ > ق}š} ɡ}( &  ew standardsbxPצall of FameKxF<@>Transfer Names1x<uit" m^K=-r\G/ * Z6ȡ#ȡ + B  ǪǠצhangexǖddǪǖapxnjecord keeping* צ ON  צ OFFxǂצ ound - * SPEAKER ALF  12'xxצanager passwordxn ook scoresxd

rint scoreszxZצNo Printer is on-lineצPress to continue. &٪Pء (R0 ǭ?تPRٹxǠiewileצ %Score3.File}ȡ:AAצBLANK}} N A***F Printer:" ás ER UTILITY ȡ ( Record No.# צ One moment }ȡ } 2 fAצ %NAME.FILE* %INFO.FILEצ %Score1.File %Score2.F ,& > ǹ DZ ǭ ǥ ǹǹ ǸǸǹDZǭǥ ǥǥ ǦǦDzצfilledǥempty nj(nj ǐ ǚULj ~DxǴMANAG 2d(צ    <     {Azt<F !392,"LJ(*.02g68:<>@|DHJLNaRTVsyr^lbhjnprצPress to continue. **P *%**צ&Be sure you remember the new password!צPress to continue. ~hj* --------** !Enter the new password once more.צNew password=>צ-------------------------*{צ(Passwords were not the same, start over.Do you want to continue (Y/N)?   צ%Move   One moment  צ%TITLEA* lhhhhhhHH`&n $ v 8 Jj   d#source and target MUSIC CLASS disksצmust be version 2.0 or greater.x&FFb    *V2* %Info.file*š>Z Q%MB2%MBG2צ%SMBG2צ %MBTWOPLAY 1sYOD8(  "$<(*,.02468:<>@BD`HJLNPRfVXZ\^`bd|hjlnprtvxz|~> צ One moment *Ƃ_Ɓ/Ɓ/Ƃ_ *V2* %Info.file*š>Z Q%MB2%MBG2צ%SMBG2צ %MBTWOPLAY ------ Ɓ/Ƃ[Ƃ_ƃƁ- צ One moment צ %Score1.FileƂ_ %Score2.FileƁ/צ %Score3.File  צPress to continue.  _ צ3---------------------------------------------------SUPER MUSIC BOX GAME IIצ POINTS /  *٢/ 3---------------------------------------------  *٢ 3---------------------------------------------------צMUSIC BOX GAME II POINTS _  *٢ELLENT G=GOOD N=NEEDS IMPROVEMENTצ(----------------------------------------צ MUSIC BOX IIצ LEVEL  צ CORRECT צ WRONG>  E* GN Z __//צ STUDENT #   צ(E=EXCss to exit.X- á 5 س>Ƕ(ؿ S`  'Insert New Disk and press R ȡEȡGšNáN1. Music Box IIFǂצ2. Music Box II GameFxצ3. Super Box II GameFnצ4. Music Box II for TwoFd 5. Sign OffFPצ S. See ScoresFFC. Change Disk2צ'Type your selection then press (Your Choice: _PreتPnj,,T&0d0 0( Táצ%ROUTER %Title.FǪ SYMBOLSFǧ _______ Fnj02 MENU Do you want to continue (Y/N)?   צ%Move   One moment  צ%TITLEA*1sYOD8(  "$<(*,.02468:<>@BD`HJLNPRfVXZ\^`bd|hjlnprtvxz|~> צ One moment * 5an  8dצMUSIC BOX GAME FOR TWOǿ 8 צ Press & "Type your name then press צName of Player onleft=>Phoose your level 1-5=> س>ع(ǖ!d215 % تP+,+,ȡ+2++"V 8 ǿȡ%2ámatch should press their key.צ%The first person with 8 symbols wins.צPress to begin R צThen press  צCd  Let's go!צPress to begin  INSTRUCTIONS#Match the music symbol to the name.צ!The first person to recognize the   Ǵ & %Ǫšc/%&%á%#á %$á nj nj zw  צ an é č u!X~V|Vfd BH4P<GRATULATIONS,(ZYOU WERE PERFECT!w ád(dצCOMPUTER WINS!(ZצSorry, No Bonus Points For You.ġ   ɩńšǖǴצ PRESS ANY KEY uc 𥂕ǴǴZSLE>74 .  -, ǖ4צ BONUS POINTS*0.*.ȡ*** P 0++*,-á Aa\ á9(dCONGRATULATIONS,(ZYOU WERE PERFECT!á á           x o f ] T K B 9 0(}vohaצName of Player onצright=>P,Show me which keyצyou are using.צPress any key => #