Disk IMage VER 1.0 Copyright (C) 1992 Ray Arachelian, All Rights Reserved. ''Ȏ3ҎҼ|`؎3ҋrir.>|t.d}.|Q *V33.6d}ƴr-^Y.)6|t.&e}űQ.;6||.6|`g}2.$t V^3r3Ȏؿ & &M G} u } uþ} Non-System disk or disk error Replace and strike any key when ready  Disk Boot failure Microsoft,Inc ibmbio com0ibmdos com0w/~u ~;uv/]@  O`! #@o'-1 O5`9;=A CE`GIKMOQ S@U`WY[]_a c@e`gikmoq s@u`wy{} @` @ ` @ ` @ ` @ ` ǀ ɠ @ ` ׀  O` O`!Aa  !Oa!!#%a')+@  O`! #@o'-1 O5`9;=A CE`GIKMOQ S@U`WY[]_a c@e`gikmoq s@u`wy{} @` @ ` @ ` @ ` @ ` ǀ ɠ @ ` ׀  O` O`!Aa  !Oa!!#%a')+IBMBIO COM`IBMDOS COM`COMMAND COM`_FORMAT COM`CHKDSK COM`%SYS COM`)]DISKCOPYCOM`+DISKCOMPCOM`/hCOMP COM`3qEXE2BIN EXE`7MODE COM`: EDLIN COM`?X DEBUG COM`DoLINK EXE`PBASIC COM`,BASICA COM`AART BAS`SAMPLES BAS` MORTGAGEBAS`COLORBARBAS`CALENDARBAS`MUSIC BAS`"DONKEY BAS` CIRCLE BAS`PIECHARTBAS` SPACE BAS`BALL BAS` COMM BAS`$M] _ Out of paper Printer fault Aux I/O error . uRt =ru Z.ϒZ. uR t=ru<u.&ZUPSVW_^[X]PR.- u>t .6uZXˇ.$t`RPPtZZPRĀtĺP.3˰<pȰdȃ˃ ђȵĘдS. 3ӹdrdвҹ<ċӑ.[.3ˀ 33мLڎ¸`nl3%u@@!3ȫ& !! u)'!<uێÎӼ\3P!SP˺ COMMAND COM Bad or missing Command Interpreter =G=G=G=G@@p .&.r&&>u(3ފ&:tRA`ZĶtֆđrﴀ*:vPMX*tDPS>tQYp[d[QYX t} *:vP:X*㗴Nt ǀtX&NJĹ E &˰&P(r(rXP>urX)Ȁvtu Insert diskette for drive A: and strike any key when ready @     <tѴÊ2:rw@"؀@     ready @     VWQP3ypǹ x3XY_^%*P@M;S<>==?KRAA.vXX.P.6$wUWVRQSP.&.̎Լ<ܷ ~.|.&.FX[YZ^_]J4 #VHfT L[0k5!3:1O$.@P'`X<t<t<t <t< tCQ`ÊPEX`;^ w89s ӁPXË?s ?þktuÀu߹ utrR_grȎs Hr?tk t}?tcsÃ>uc&v"$ttác@;F sOc3ҋ^ڊf;StSV[VË>cG;~ s>c ;r R1ZDr x=v t;^ wI 1s>2|rwwrlrg xckkw ry.\.,r x)@3 ХDDF @«3à 33Ǫ2× c2`rWv dx uG;Ot?:Ou MOSPXr6*FtvF$*`DD.]$?:?rPXËuF°Ë=uEuȴ.;OuRPKM.QZrM&M &UT&UT&UT&UTbvF9Du"GRQSPRX[YZuËvDÊF^NVØFлr(k ?t.Rs=t!Zu x? ;N w Sًvzt[kv3!3WS[^_PXPfSiXjs.<t×+RfZش;Vr;Vr ;V r. &FU.&..&$.&.̎.&]<taÊFUSQR`Z_[]=t=SF.&@USQR`Z_[]s.c<t.6\3 Ȏ؎3&ؾeX[YZ^_]..e"E=V %NIA}6L&E!&U# t&u$$&E ҊŊ&E .ù=uE!U#3[P.Eu uu yXr΃@r>C棰R[ÃuZС^;sK"FNCtCuH3&]v3[á t +F+s3ۣ3v&]&U t+s3&]s܇BAJË;Mu O:tJ2P tRU.QKM]Zu3MHOKRZMO.Q>66K62vEsá@;wTEsPt':Fvsv>ì< u < u 3 uG 6A>u >&e>Ctu<6A u>tQW_Y<u 33wc x&E&]+ru t;s' uʼn>t>Ltr^WPERSl_Xr%>Pt+M؋N6KEsY[ns볋6+C3&L;t" t+E3s@ȋ&E&EIAá t+r6C@ttt <t< <t$>떋*s>C&E&U x?&]IvNP&E&Uv t@X|+t QXrȋBItr>t t@%r MOWPE Y[ء t+Cʋ>&;E&Mr&E&UN t=-vNr݋>&E&E3"1D3&] tRSF*‹ыvYȀ;sIC;tK+Rf6ƣXZ+[.9Mr96Mr PF:OXt+*̈&QNJJ V YË=uE U ؊ֶ4RQSËC;^ ~)=)[\X+ZBŠVB+w3t H~ɓtڋ⳺D[YZf uˋ>&]3Ptq=r>sr5 x:c&E&m>C:u v2&E&]>C3 3 rыmE xRcL_'rك!&M u33 xFFDP Zt@uBª@s&%.C.Eðòr^FV JN6\TLL\6lL2P t.QMK ?.]QY.\E!U#}@su$.>:s.\ÌȎ t܊:v8 t݊J.:.;V`]<t.:t2<t~<tz< t:< tZ<t[:se u:sFǰq W_W_uƌŌێÎݾ`ð < 7냰\-^.;^ tN&< s< tC u tNMWOΰ Sv &} t .*;*ˀ[_tO &*0:t:t y:tF(*tItWG_u*]@Q_W^~< s< tP^X @ <t<<t8Ê< re<t.:PX `.<t `Ú`t<uŚ``<t%<uu..&X[YZ^_]#|.<< t <t%< u.: Qȵ wY.:w.:ot PQXtÊvFONG<.uF.wN+vN%vI<*u?3uƒջGuAtيЈ:Јt.G3؎ `?5Y>]+;vIA!&f&F&F &+F &N@@&vH3 INIT TABLE BAD $F0WP<NuP<NPG=NF0PP PLWȎ؎м !'t ! !$_u9* ! !9 I 'uT !G<%tc< t_,0rT< wP拴tB< t;! ! ! !g>! uQ!<%t < u& )!<tt  \ )! t!\!uux tkб$-$-P3؋ וA<PZրt"̀0*Ѵ!''ù ]]  >m t \!u3Ҵ!\!  u3}@j\'!3&<t !3&\6 yu3}.uG? ݀t.!]? tHЊ&&4" Ģ%" ¢lfMtJu03\6 6 t#u]t63. !' '3#$t uM_ t+#!>%t$$ttۋ6 #tV'^ %@<+u0&F)!< t u@SWH $_[} 3àuP!X\! $z $%"% ù #u !ú! u3@!+ʺ'!ˀ>%tы>uA+ы;rN벡 t>Ft;u.3>"u !ð u!>$u!I u>3@3ɇ>$u,3!(! t!!/ !ú'!Q<u 'ìtN< t <=t<,t< ú ! !Ȏ ˾< t -/=W !*!3ٹ \ËʲdĒ-h-/tr7:t:u.r)l< t drĴȬ< u +! u^H !볾,< t ::t !,!:3ɺ::@thr33Ҭ< t":u&.`r< t:uPrԬ< u-! t3{ !뵴 ! !:< tr:t:uN:ur r Ê,0r< rFÊŷ /% :u. 00<0u*ǷĒP!XÌ !'! uy(L$+Љ$Ӌ;wQ0.;w8>,t+ȋً3Ҵ!$'!)$tuۺ 8 !>&t"'! ű> "Ŏ&-&uޡ.Ћ&0.6..4+!.3ɋ.'t.Bad command or file name $Missing file name$Duplicate file name or File not found$Error in EXE file$Insufficient disk space $File creation error $File cannot be copied onto itself $Content of destination lost before copy $ File(s) copied$ File(s)$Program too big to fit in memory$Invalid drive specification$Strike a key when ready . . . $Illegal switch $SunMonTueWedThuFriSat Invalid date$Current date is $ Enter new date: $ Invalid time$Current time is $ Enter new time: $Are you sure (Y/N)? $DIRRENAMERENERASEDELTYPEREMCOPYPPAUSE DATE TIME  u'u Sq[v t6>u3ҡ 6  ; &v  &  s 6~ t@ȡ + 6~ KZ| SRz &7s &7Z[À>u| >z &Ev t 6)3 !s & ~  BV> t 6 3\C> u> t6 > t'  +  + $S3؋ וNI( ZtqPZրt"̀0*Ѵ!''r 36 t@P36~ X t@&  ô !r/aø !úK !$z eE !  ~ sB 3ʋ>z >z &EP I !+=}! tá  ! u !   '+ !<u4!  !'+!<u  ! !3G(G*Ӵ!G(O,!GG!Ë !# ! u3D F 1 +7 9 '!<u^# # ! uA!D F 1 # (! u7 9 # ! uInsert new diskette for drive x: $and strike any key when ready$System transferred $Format another (Y/N)?$ $Invalid drive specification$Invalid parameter$Insert DOS disk in drive x: $Format failure $Fatal format error $Disk unsuitable for system disk $Track 0 bad - disk unusable $Insufficient memory for system transfer $ bytes total disk space $ bytes used by system $ bytes in bad sectors $ bytes available on disk $IBMBIO COMIBMDOS COMCOMMAND COM??????????? à Pۢ%u      v t   I  s > u 6 s> u   t  6 ts#x> u> u   > t  > t  ð 2ÿ /1u ðÀuj $u   > t  s > u  6 . us > u  6 . ns r> u]> t > u . ň. (t뎻 > tG&r X I3Ý =÷ > t > t > t   ô !1SFormatting...$0Format complete $ Attempted write-protect violation $ Unable to write BOOT $ Drive not ready $'LȎ3ҎҼ|`؎3ҋrir.>|t.d}.|Q *V33.6d}ƴr-^Y.)6|t.&e}űQ.;6||.6|`g}2.$t V^3r3Ȏؿ & &M G} u } uþ} Non-System disk or disk error Replace and strike any key when ready  Disk Boot failure Microsoft,Inc ibmbio com0ibmdos com0w/~u ~;uv/]C^ ㋇;FFF^ 8F4PFPP64 r4]UQP<O2#P<OTF+/PPO=O]UQ F *Pv~t F F܉]UKOFFFFȉN@FFPFPFPF>] u t6 ! R\д! tۀ?rʿ3ȣ.״!!uA,״!!uB"3v;6w( t懼 u?@tasv;>wUPFF,H! t 2P !. ! !XdP ! !XQ~t*P" :tGX XFVIAr;} 6 t@;tC3pv~Ճ"! tPF(!! !XP !Y,A;w3Futu 3@EEF t !>t63P++=t6+6+63*>t 8+`}+ºp ! &9t&GV&-u * -Z !PZրt"̀0*р>-t0|ʹ!''QH,6 !Yì!???????????badtrack and $Invalid drive specification$Invalid parameter$Allocation error for file $Directory error-file : $Files cross-linked: $File size error for file $Diskette not initialized $ bytes disk space freed $ bytes total disk space $ bytes in $ user files $ bytes in bad sectors $ hidden files $ bytes available on disk $ bytes total memory $ bytes free $"T8@f ! !2>] u\tҴ!8\tô! u+! u^#!@e^!+ U\2\!ᑻMu0+Ew(^#!Y^!+L ! '!O0GG,GG.ô! u֋G3HPG0H3Z;Ë3G(G*@G(O0!G,GG.G!Invalid drive specification$Invalid parameter$Insert system disk in drive A and strike any key when ready $No room for system on destination disk$Incompatible system size$System transferred$IBMBIO COMIBMDOS COMarameter$Insert system disk in drive A and strike any key when ready $No room for system on destination disk$Incompatible system size$System transferred$IBMBIO COMIBMDOS COMLThe IBM Personal Computer Diskette Copier Version 1.10 (C)Copyright IBM Corp 1981, 1982 Licensed Material - Program Property of IBM Author - David Litton  !8t !|8too>5(uT8 u !3 ! ! ł>7(v7(3۸rN98u+8uq u u8P&6&6&7S2rņ6= u:.7uP3XtJ9>9u8u/ u+u&tuŀ829S1띸]NRI !ZÊ]2.5>:;8t u83۸r)>;u6= uŁ:.7u&7&5P3XtHtI:>:utu&8u68b usņ6=f"pg uu_ !&83۸r;P3Xt;>;uH{X5ǀ8R<Ŵ8@ů>uBr<BtZP3Xtt<><u̺.UR60д !t.bt&w00 r w &xo !8 Zø !ZRA} !8t!!! !Z Formatting while copying $ Insert source diskette in drive @: $ Insert target diskette in drive @: $ Strike any key when ready $ Copy complete $ Unrecoverable read error on source$ Unrecoverable write error on target$ Unrecoverable verify error on target$ Track 00, side 0 $ Target diskette may be unusable $ Unrecoverable format error on target Target diskette unusable $ Target diskette write protected Correct, then strike any key $ Copy another (Y/N)?$ Copying side(s) $ Incompatible drive types $ Not ready error $reading$writing$ drive $3R tH>] uA>m u:&l&]$ش!u \]\u\  ! ]u]\Ȣ\]Ȣ]:u8=2Ɖ>+±躇=r62/u=1u 8= Insufficient memory $ Invalid parameter $ Invalid drive specification $ctory full$The IBM Personal Computer Diskette Compare Utility Version 1.10 (C)Copyright IBM Corp 1981, 1982 Licensed Material - Program Property of IBM Author - David Litton  !t !\6.t]6.(tS.:.uێ]6.t}\6.(t .:.uqu !t ! ! (v(3۸rUu2t u$uP&&&2ņ6 u:.uP3Xt>usMt*RCCA !C!! !ZVŀ21V끈CCA6VV0M00 r M &NR !G!Z uu tuR !ZË63 t À0w3@t.+36VM00 r M NN0[ !G! Insert first diskette in drive @: $ Insert second diskette in drive @: $ Strike any key when ready $ Diskettes compare ok $ Unrecoverable read error on drive @ $Track , Side $ Compare error(s) on $ Compare more diskettes (Y/N)?$ Comparing side(s) $ Incompatible diskette or drive types $ Not ready error reading drive $ Correct, then strike any key $3R tHQ>] uA>m u:&l&]$ش!u \]\u\  ! ]u]\Ȣ\]Ȣ]:u2Ɖ+ر+±$8=r-2/u=1u  Invalid drive specification $ Insufficient memory $ Invalid parameter $00891E9104A102002BC2B108D3E824FE81C2000289168B04BA380748 :1A06E4003D040072932D0200A2950432ED8A0E8000E318BF8100B02FF2AE5B :1A06FE00750F823D31750A800E970402C606940400C606990402E98FFA0D76 :1A0718000A496E76616C696420647269766520737065636966696361746918 :1A0732006F6E070D0A240D0A496E73756666696369656E74206D656D6F7250 :1A074C0079070D0A240D0A496E76616C696420706172616D65746572070D05 :LThe IBM Personal Computer File Compare Utility Version 1.10 (C)Copyright IBM Corp 1981, 1982 Licensed Material - Program Property of IBM Author - David Litton  u $ uil9 󤸠+Ӂ s £aqc>] u\): u(>9u9 l u]: !>\u\>9u9\9 uitPڊ&ʎ:&\u  ! !\jeq!\9GlItN6'>etit&i%iit0iuq!\iugq>cu|~g|~iNO|-q~FGٴ6_!&iiu<0u !iiu0!ˋ6_ ! !> t9 !&i|~9 U ! ! eu-l u؉gp?tiú !Ëc!9'a!â_ _$ׇӈJ 10 Mismatches - aborting compare $ Invalid drive specification $0123456789ABCDEF Compare error at offset File 1 = $File 2 = $ Eof mark not found $ Files compare ok $ File x not found $ File x empty $ Open error on file x $ Enter primary file name $ Insert diskette(s) with files to compare and strike any key when ready $ Enter 2nd file name or drive id $ Cannot compare file to itself $ Files are different sizes $ Compare more files (Y/N)?$\! uQ|j!\C<:uQȵ}HC8;>s/;vɺ ! Cu !<t4<t3  ,0r< r,r<sq !6peCOgM\! u)3}@j3!ʹ(\!p! dHEXCOMError in HEX file--conversion aborted$File not found$Address out of range--conversion aborted$Disk directory full$MZ -tB3P¸ )!Vڹ ^)!ڴ! t !˺!'!>MZuܡ=s%ࣼ+Ёs t =tЉ5;w  u t=u)>u3ۃ>tEY ! ! !Dt,0r< r $_,< r<s ߀| u3Ҵ!'! t>t2!'! t>Î&-u۴! u-3Ҵ!(! u!˺A}-wFile not found$Insufficient memory$File creation error$Insufficient disk space$Fix-ups needed - base segment (hex): $ $File cannot be converted$ EXE BINue< u BC2C02DEC-20 +++ FAST +++ [Hal version] 11-Oct-81 The IBM Personal Computer Mode command Version 1.10 (C)Copyright IBM Corp 1982 Licensed Material - Program Property of IBM Authors - Mel Hallerman, Ron Heiney, and Ed KiserQg&F< t.<,u'>t>t LCtE >lu>cu !0123456789$ Do you see the rightmost 9? (Y/N) $ Do you see the leftmost 0? (Y/N) $ Invalid parameters $؋v@t@6t>tv۹ @ýy(uA&PuA@ >ru"Ay,,,/>lu"AP.@Ȏ؀>@th >tu@>uB !>rutM ! ! @t0>At ! LPT : redirected to COM : $ LPT : not redirected. $i+ 3<1u<2u<3u  !tA)<1u<2u R !Zt& &&&&+ !ut&"&&& . !&&'09BKT&=&t4&u+&t"&u&t&u&d >~t >F,0&`E>F,0&aE>F,0 Resident portion of MODE loaded $&;tJ&P&R&\W&^Yt&P&R&\&^ !9PP+؀&qX9P+qXt̀DDĀtXtSPR.ZĀt [[ Illegal device name $ Printer error $ LPT : set for 80 $ LPT : set for 132 $ Printer lines per inch set $䩀t !À> :t> =uQu  ,1 Pu  !u  !t ~>t>6u2 >8u0tVO ! !1115306012244896 Invalid baud rate specified $ COM : ,e,7,1, $ t&C<,t< t t >FJE $&> pu  -4"&u &#u &uu &t&Ë ;uv 00u 0 > nu> ou  e > 2u  1> 8u  7 > 2u 1& ! FF₺ !À> :u> 1t > 2tr  8 uF&|V  1 e 7 =11u 2 | s j a ! !îijļ BAUDDMODECOMW The IBM Personal Computer EDITOR Version 1.00 (C)Copyright IBM Corp 1981 $Licensed Material - Program Property of IBM\  H >] t A u> etB\!~ t !\X > X !$a ! t x 3}y { @jf I !I ~ u&I  ȋсI  \'! >   H  I   ~ uH #%- !* !  } Y C<,uFNI 3 u; s! +t~\'!~ Qu~ 3ҋ u; v > +ϻ8Et O GGJY+χ> )>};u~ ú1 !~ u u u > +vځI v3һkCCϺI +t!X (! uI >  +AO>  ô! !  > ;tw t I ;t֋ +ϰ B;uS l:d*[; t V3й''Š$t0* u  w]u> G+w +t1. QhY< s< t< t < t P^X @< COuKÿ B<  tB< uOu6 +  сwp RZ 6 +IOV  D^6 ʃ7u*~> O   I AJ) s Bu Jú! ;lu3 6 :t+>  u> >   tͺ !á } t !!PX< t >   + + rA   > uыߋ I :ʋu ω> > +ϰ  BtJ  23ɬ<t< tA u %uSW uC_+v  > 3Uj u C 6 u;6 t 6  ! ` ? > ;t.VWQ +; s +;wAY_^ú !]#%}! u U +A> Gډ>  . ^ ! <t%LB;s󤤰 CȌȎ؎мH . > F +O> E !!$_ !\h X !  R!ZÌȎ؎мH 5BAKInvalid drive or file name$File name must be specified$Cannot edit .BAK file--rename file$No room in directory for file$Disk full--file write not completed$ Insufficient memory $Entry error $New file $Not found $O.K.? $Line too long $End of input file $Abort edit (Y/N)? $3B :0000000000 5244E6F20726F6F6D45 :1A09A20020696E206469726563746F727920666F722066696C6524446973E4 :1A09BC006B2066756C6C2D2D66696C65207772697J"%!#!ʁ®&!¿Zڎº!=s-R&+ر&(uhij@\)!z>] t_`bȎ؎мJ-3t,Ar<w .Ȏ؎мJ !븴 l!nڋt/.VtF4 tXF/ tOFu< uOO.E h:*}t oøBRrFu-V3ۋd< tb tbb uVu/ u3.=zCCW|yøDFa\undøBFbd.r.D t 1,5re3 JX[YZ]]^_&R6d6`6bZ(륃N.&R.^̎Լ^WVULLRQSP&R^b`Xd&RJ3uM <L%,RZË.`<=uF`b3ۿMst.`EC uBPhM&5DZV< u&^\)!J)l!KJ\ú>t>eHEu>gXZ!f'f(.`tl?ttPڹRRZXR.>f(t%&s/* u/RAVD>f(uZ !=á`Su 3It3ۉ}>eEXu >gEuPR\>f(tj! u\jZX׉>N6L ځPRش!\ uϊ&f!+<ZXtы uú?!tj6L~3 ! tN !ZX|r  !\!v>f't!\!j tKx'!%}J‹+=t u$ ƱȑZ+^r ;w>u6L>N3r RZ+}!>t"'\! u͋>Ŏ&-uޡţ^Rţ`b[>f(t!\! tr3h|j\3.<:uZȵ9QLA>;vρu !<t <t u-.NLs) /QPR^YIAtNO&G2Ћ.`j;u66PP6 tN6X=[C6E $äW&*Ę6l aj$$&û< 2,u)(W_: Š$'@'< uû,Њ+ y-ܪH,|>u$$, ,>t3[G<u>ްLtT<vS<tO<v<u TBPs+s t1XDI t <t $ڰ]ð+LBXVSI$,22,[3,2$8LøL,X3$ Q>t,$7DXû">t B,tW,CLИ؋û t <r22.<r<stL,hALCLDLBLAHCHDHBHAXCXDXBXSPBPSIDIESCSSSDSc Tc Tc Tc T        BBBBBBBBBBBBBBBBJoGooo(o7o!ooLoDo:o=o/o,o1o*o cUTTTTTTTNTxT}TTTTT_TdTTTBB3TXRBBTT--[[BTromoio$o 44@o     [i Bi i TTJJTTTTTTccDADADSUSBXOOANCMMOAAAAAAAACALCBCLCLCLCMCMPSCMPSCWDADADEDIESHLIDIIMUINININININTIREJJNJJBJCXJJJGJJLJMJNJPJPJMPJNJNJJLAHLDLELELOCLODSLODSLOOLOOPLOOPNMOVSMOVSMUNENONOOUTOUTPOPOPPUSPUSHRCRCREPREPNREROROSAHSASCASSCASSHSHSTSTSTSTOSSTOSTESWAIXCHXLASE?? 44\`^ZAXBXCXDXSPBPSIDIDSESSSCSIPPCOVDNEINGZRACPECYNVUPDIPLNZNAPONC Program terminated normally $Invalid drive specification $File not found $No room in disk directory $Insufficient space on disk $Disk$Write protect$ error reading drive A $readwritInsufficient memory $^ Error Error in EXE/HEX file $EXE/HEX file cannot be written $Writing $ bytes $Z' P 0 736B2457726974652070726F7465637424200A :1A173E006572726F722072656164696E6720647269766520410D0A247265C0 :1A175800616477726974496E73756666696MZpR4 E%A\}1R(F=O%Aiy 4V6Ma| 6Xi % 0 {4]%*8@HPX` !+E]t$Vu?GZ #9AT\gp5Vbny8,8H8N8a8g88888=8U8d888888!8ZKZuZZZZZZZwZZ4ZZZZZ6ZFZpZbZZZ Z" Z Z Z Z Z2 Z Z Z Z #;GMqKXv"BOT]r:h:hthhhhihhMhahjhvh{hhh~hhhhhhhh hhhNRV+:JRjy%0KmQ'?L $?eqz$):?IN3HQZir69e99939_999>9999948+l"-js}B?Lŵ>W0Py7N^c999.99999999999979N9[9<MC_3 $039ZY@h@@@?@@;@@@@|@@@C@n@@@a@@@%B_{2I $(V3!o6>GT Yx& e Y c {      ` j      & - E i    F F 7F F F F iF F (F 1F :F GF $F 0F 5F Licensed Material - Program Property of IBMUQP P]UQA8FF$<tVRA8YFF]UA8t(Ɔ8wA8ΈuݰP6&PGZPPPj6G ]U><w>Lr P PA8t(Ɔ8wA8ΈuݍPPPjL6=PPPs6.Lg]U>Rs>Pr $PB'PA8F~u8FA8F8FFFFNL;sN;s N;r ~u0!^㋇=;0tj^㋇=Fv PPFos9>g@r 8P(Pg^G^g=É(5g^GFFF~t <t<t<t<tPƇ?PF$<tx^=PPFos9^vD ;=u@P|u@Y"sP4PGZFNj^t/o^=o^=PFosFR^GR41^㋇=^G F^G &^G F^G R^GFF$<u FeF"F$<u^GFGF9FsF~u ^G@%.~u^G%~u^G%^GF^G 8FvG $V ˆG ~t#FF^;Gs MP!PFFF^G^F/FP?P6*Z]UFF;Lr ^=PPFos T^GT^GF><vpA8F~tA8FA8FA8FњFF;Pr P^?1PGZF^uFG뉃>T v hP"P]U ;Pr 8u8?S㋇/X><w-A8t(Ɔ8wA8Έuݚ8PPPtoPPPos]N,㋆-GGG6*ZN@N=r zP#PPPm8P28838tËdžĉ]U><viA8Ɔ:sA8ΈߚPPPuPPP됉]UA8FA8F<HF=vFƆF@;sA8Έۀ~uX> t+JuP<P.#> t+Ju,P ~uqsFP.><v <HP8]UQPNLPA8\8<><v>\pvy>\um>\t>\uX>\uRJ>\u>>\u&2>\u$>\un>\t>\t!<HP8><u A8FW ]UQ^ ^:u8^ F~t.FȈFƋ^ H^:HtFs @2< tа]UQQ^FF~v#FȈFFȊN΋^H 2ԊF]UQQZH%FZF;FvFZZFFZ xr PPPvPGZjF]UPvPGZF*F^Pu4jFF^8FwFƋ^FuފF^G^G^4^GvZF]UQF 6QPPGZ22G4osNP64PGZF^G:Fu-^4uˊFso66v]UQQv GF^㋇\6o>6u~Frpo^ PS6j2^㋏\É2G62G^ >2}^6\~t PvRMPL66PGZ2v 2GP~u@Ps66vv 26.]UF~v^㋇\F~tPvPGZFF^FGFsNPvPGZF^FGF8Ft~uvvvvFP^~t FF멋FxFr\]U>Rs>Pr PB'PA8F~u8FA8F8FFFFFF~t <t<t<t<tPƇ?P;F$<t;^=PPF^vD ;=tCP4PGZۊ^=PPF^G ;&tP7PGZ~u f'P^GFF$<uG+F8F$<tW^vD/F~u@%3~uF%^~u F%^F/F^GFP?~uÊ3F;P6*Z]UF^=PPF^GFV~CV r Pk'P<HP8]U><wA8Ɔ:sA8ΈߚPPPuZnPPPu@66P&GNLJ-NƇ,N㋶D-GN,N@N=r 0P@P]U~uR^FC^PScP6, ZJFFÀ?t6c6,7hF+JFF,F~v9^F^FF~vvvvFNFFNF]UQQ>bu%b6J@PcP6, ZJ,#F@bvPFJ@;rcƇD]UFFF;Pr ^?FÊ3N:]tv>]t38ZP28P^1PGZF^tP76^GPGP@Fv83838F]>><w>>r >38FPPm8FPPm8^㋇/Fv8 PT8^;P 8:PT8vP 8nP28>v]UQPNVLbPA8\8<><u>\ps>\u h">bt>\uR >\ut>\uf>\uZ>\uL>\u@>\t>\u+>\u is>\uh!<HP8><u A8F$ ]U~t rPv]U^PPP]U6^PSP@P8]U6vJ@P8]U6^GPP@P8]UF<v3"t F]U~vP6vFPFPS@">"t vvNFYFF)<)F몉]U~v16vFPFPS@">"t F)<)Fɉ]UQFPPm8F]UQQFNȈF<uFNFFF~rn^+F+FHN;w,ˊ,F<tPpP;FF^+Fulj]U^Ƈ]UFFF;s,À,u*^㋇" ;Fw FF*FɊ*,toFF^F;s,À,uF^㋇" ;Fw FFFFɊ^s^sSPs*:Ft~FF(F*n ~Z*,^,*FpƉp" " *^*Ƈ,ƇZ*]UFFF~w@VNPr@Y"rFȈFÊ,Nt'΋p惼u Ês~t vvHFFF FFF~uvv"FFFW~t vv]U+r+~v F   F  FPQFP'F~t~u nPP PPPF~t PvFP28AF6FPP@FP28F^,FƋpËFt"FN"; v> ;"s   F F6nFP@F~tFFFFFF~v6^,FƋpËNFFNċF FFFFF(F6nFPFPFP@F~tPv~v^ƇFN]U*,:F u㋇p;Fu Fsv vP}F~u^+F;sË&" 9*F(FF*n vFYv vPF*^+ÊN ,Fp^*^Ƈ,ƇF**v vLŰPF*^+ÊN ,FpsI; r PP^ ㋇Fu ''P^^㋇FnFF^ ㋇F~u*n ߸bF FFFv*n SPFP@FFttF;nuHkPv&@&tFFHN;wˀ,t㋇" ;FsFFuׁ~sFFHN;wDˀ,t6㋇" ;FsLJ" ^F)" ^㋇" ;&r@&Fu*&" Fs *Ƈ*㋇n ]UF%Pv F PvTZY]U^ ㋇Fu ''P~wLv vPfF~tB^+(FFv vFYF FN랊^ F; v %'P^^㋇Fu v ߸FNF 뱋F FFFFNF~w@^^NAP9t@Y"s!v vP{uFNFF6nv SFPFP@F~tvFF ]Uv v vGZjF %+ȉl;NvFl]U~ v0vvv P Zl)F Fv >jlF ]U^F $F$~s=v P1P]UQ+s6nhF~tv+]UFF;Pr 8F<HF=v i'P@Pvm8^?Fd<tkѴÊ3:^w@"s cb^F/,^3cFJ\bks[>buTJ@>Jv1FP6,h~tFFۋ>J@]U ~t^F F ^㍏QF _Pv EPPF~t~t^[PvFPPPTZjj?t PvjG W‹v扄G] UQQ     ;r@" r sg  PP rE  F  ㋇oP&F 뒊  @F  Y ]Us Pv PGZF^Ow rP PGZ GGPGP PPuP28GPm838P28ƆƆPMuP_uCF_F$P28_;P 8P286$P 838]UQQF$FFs8NwFFF$FF$FFsF^vFzF^rF]Ums f^f^FF:^v:Fv\>buv+6,FC^ ㋇;FFF^ 8F4PFPP6D ZD]UQP288#P28dF+/PP 838]UQF*Pvh~t FF܉]UA8FFFF,ȉN@FFPFPFPFP\^3F~t^3FF>ct.~u+~u~vFHFÀ?u ~ti~tH^F;+;NȱFFF~s;FsvFFFFFss~t cF cF;+;NFF~sF;Fsv~uFFN+ȃ FFN+INF^FF^.LŋF^~rx~r Fshv$`F^V^㋇;^6cvvh5F^FF^㋏;É6cFPɀ]UQQ><vpA8FFFF$FF$F^.F$PF$PP vFPPvFPKUct]U]UQs 6 @F>]t38hs 6 @F Z]UQhs 6 @FXP28v28]UQ@>]t 38]v28]UsZhP2886FPV@FuP28vP 8vP 8|P28\PP 838hs 6 @Fv]UP6&PGZF^G F^tP7PGZFFFÍGPm8~t-(PT8PvPGZF^GPm8)PT8]Uvv]UQQ~tPrP^Pw@F38v]U츲PtGms P28>Hu -P28>Bt<P286B8PP2838LP&b;9IkF~?w^LJ4LJ(5FsPP&s4FWP28uP28PM38F9P PFns5P28TPP38~t FFу>@th~t.@P28>@uP286@8P28>@tsPT8P28hs 6 @F ]UFs(6XF:X@X=r PP] U6XF :X@X=r PP] UPF PPTZNFPF PPTZNF>pu^_3F^_3NÊ8:8v^8^:8sF:Fu^G^;GwɊ^㋇;F^㋏;N FFFF^GFF%FF^GFF%F9Fu|F;FwF;FulF;Fa^GFvDFD8Gw^GF~v,^ F^ N:wF:FrFFN΋^G^:G]UQ^ GF<t^㋇/^ G6*Z] UVF8eu(FP~tBFFPe1PGZF>Bu ^GB B^Gjs_$PPPF^G $ ˆG os*^G ,.^G R41R^GR^GFFRHN;vˀ3tP1PGZF^ tg^^^3vD FÈ^F;Rs=Q1PGZF^G ;Fu t^^^3FFtXfFRHN;wˀ3uf^^3FuՠmsRFf^^F^3:^w%ù;965uҰ~@Ff(^FRHN;vˊ3P1PGZF^ uvD;^GF<t;Àt3:v F^F:`u :FvF^G PFX$<uFF:5v58<tƀzuF:FvBF^LJ/^G 8vD6Ftjs^3FÊNꈏ5^FF:Fw À8uvPFؠjrFg8FwFƊNJFu^㋇6FLJ6:^w3À8t"8rPp8ƈZuĊ^F6F:^v@P8u@Y"s֠:^wRFg8FwFrPFuFF:^w À8uvPFנmsH^㋇69;FF`F-^㉇;^LJ/^aFRHN;wˊ3዇9/Fuؠ^f^8sƇ88PP]U 5F^㋇6P%9FZ;VrFf~u F@%7~u F%&~uF%FFf%FFFFFFF%F㋏;;Nr;Nt@9P;Nr@LY"sF;F9FsXFF6Fr@sFFHFr@sFF FFPvW Z]UFF;FrQƋ^0PGZF^tP7FFÊOwP^wPGZF^tP7^GÊ3vTV<t`΋;N:^wNP1PGZF^`8Gu/Ê3㋇;FV+бVFF PT8vP 8:PT8vP 8t :^v:!8t@jsFLPm8RP28Pm888tA8t;:^w5Q8(5PGZFUP28^GPm8)PT838F5]UDFFHFFF+Fr~u ~tF@FF;FwLHFv^Fv^0vk9sv^@N؋vF^@F묀~uFȈFƋJ։NBFbFFFƋ^FFFFF0vk9s+v~^vF^v^Fvv^0k9sgv~^vF^v^Fv0Pk9s+v~^vF^v^Fv^FF;Fw^vNj^vF^Nv^0vk9rv^FFvv^0k9sF+FN+N;sFƋNJ֋FBFFFƋNJ֋FBFFFF< r q'P]UXP28Ɔg8vujs P28<t5P28P(5PGZjjGPm838Ɔ:^vÊ8:t㋇;PX 艆ƆRH;v\ˊ3:tDP1PGZFFjjtP7PGZ䊞㋆/ PT8P 8P 8P28^udž ^GHPP 8P 8P28^wP 8P28jGFPm8^?vƆ ^*v PT8P^w PGZjjGPm838ttOtlsX:2PP>XthP28pP6XP6XXP286PPpP6XP6X]U~t Pv]UQFsN ^&8FF F~v^&8FNF s ^&8]UFF FF Ff ~ wFF F =vF F F FFH1FvQvvPkZv F^F+ƉFF ~tCFsvFPv#96FPv@FvFF)F FFTFFFFFN;wcΊ:FuRF^FsPFPP#96FPP@Fv\^㋇4H4t+FFF;Fr`ƊvFF] U:^u_^ GFFƆ:^v@8P:u@Y"s҃>Hu=^:s@D"8P:u@Y s ʠ^㊆;+;99Q+ȉY;s ㋇6PX%v F؋%FډFtFF؀t ~u"F؉F^:tƆ:ƆƆ^OwǍ򤊆^GtǍ6򤀆PP#P'FPPPEPPF~tt $P8PP8FFMZ_㋏;N$FFFHF㋇4Fe3ˋ;VB9VFNF%+ЉVF FرF܉FFF抆F6FPP@Fv-PFPP#9P6DPP~9~t"~v6PJ@FvNފ㋇9;:vÊ8:t㋆;9u@P;;u@Y s*6PJ@Pd@v묊P69P~9㋇6PY#;v!18FF6FP@P68PP@P6 @P] U~ }6nt+JVu tP28v PPFosL^t4^utG;FuG;FtpP^7PGZF66PF^G F^GF^GF4> u PvPGZF^G]UQm]Um]Um]Um]U^?tP^:u?u GAƆ:ƆP^PPP>tsƆZPPPuE>r NPPPPP6L]U^GP:PPtU^:r@Px:u@Z"s@ΈƂ:^GP:PPt[^:r@Px:u@Z"s@ΈƂ::t^:r@Px.u@Z"s@Έ^:r@Px.u@Z"s@Έ뺊:t^:sƊ@Έ؊^:s#Ɗ@ΈҊ:t~}򤊆^]UQRf VN!Z Y]UfV!]U    &   ]6_U~@ &_]U ]U ]UQQ^ ~ } ^P:PFPF~tF^&,A^ FF~r@VNP;Ѱr@Y"^P&8.u@Y"s&^ v@FF뺊F9Fr@^vP&8.u@Y"sF׊F9FsL^v&8.u@FF~r@NP9Nr@Y"s^v&^ v@ FFȉ]U9F s6~ t+J;t6~ t+J;Ytv6~ Qt+J;YYtV6~ Qt+J;YYt66~ t+JYt6~ t+JYuvF~wF2ÊFr FuOF2Í FPF Pv ^PF~u^G%^G&v @FF] UQ~t~u(v @F~uvSFF]U~ s6~ t+Ju 6~ t+Ju ^&@6~ t+Jt66~ t+Jt=6~ t+JuF  6~ t+JuF F~wF2ÊFr FuF2Í F^PF Pv C~}6t+Ju ^&R~}6t+Ju^SjF~}6t+J;t^~}6t+J;Yt@~}6Qt+J;YYt ~}6Qt+J;YYu ^&G'^&G'~tFF^&G*FFF^&G(^&G%^&G&^&G,F^&G'sP^PvFP@F~t~t~=N^^&]UF^G%s_G,%FuF^G. F^G.Fv^w(SvFP@F^G,^G%F]UQ~ tq~ tkv mF~tFXFVfv FP@FFV ‹^ G!F^ G#^ PP8F]UQ~t~t ^G&s&vF^P F^G&F]U~ t;~ t5^ G. ^&G^ G.^&^ G0^&^&W]U~t~uF%^G0FV ‰F^G.F^G#F FF Ff ~vvF PF^G!F;FvFF^Pv!F> t5~u FFF~vF@Fu^G#NFN܋F] U^G0;G*ucSlF~tFR^G*G.FFF FFPw(S^w*FP@FFtu]UQQ~ t~ u3v gF~tF^ G(Fw0Ê^&^ G0]UQ~t~u[vF~tFG^G*+G0^&^F&9v&^G(G0Pv &Z&T^&^G0] U ~ t~ t}^ G. PFZV9Frd9Ft@P9Vr@Y"rLF^ G*FFF9Fw29Ft@NP;Ns@Y"r^ G.FN+ȉO0\v F~tFIF Pw(S^w*FP@F^ G(F~t~tO*Ǎ=]U~u~uvF Pv @FV ‰FF%^G0F^G.F^G#F FF Ff ~vdF PF^G!F;FvFF^Pv8F~u$~vF@Fu^G#NFN܋F] U ^G0;G*tSHF~tFt^G*G.FFF F^G's Sw(S^w*FP@FF^G(F~t~tO*Ǎ=]UQQ~tR~u vBv=F~tF1^G(Fw0ÊN^G0^G0;G,vG,^G%]U~ u~ u)FF;FrQ^&0J@FF܋^ G(FF~vsv F~tFb^ G*+G0F;FvFF^v0~ }0^9N^ G%^ FG0^ G0;G,vG,FF)F뇸]UFFw"2ÊFs P @FFs։]UPP)]UQPv)F]UQ PFPP F]U찣LQ PFPP F]UPFPP ]UPFPP ]UPFPP ]UPFPP ]UPP)]UQPFPP F]U!PFPP ]U"PFPP ]U'PFPv ]U(PFPv ]Um]UH]Ui]Ul]Uq]U]U GP:PPF~tx ȴ9Fti FBFF;FsQƋ @,0FF<r< vm'>Bw>Bt@P~w@Y"sP28 ]ˡB NBUdž^ ;s]΍PRv+Pu^ +^ p򤋆@P^딉]U^GP/PPtA^+Iƍp^+HPwP/P]U F^GP:PPF~u ^F^FFF^ヿt%vs~tFFFρ~u P28/F^F  ^ćFF^> t'P28vm8P28PP]UQ^?t6^^:w&^vtt+JVt]U~ =FNu+J]Too many segments or classes CODEToo many segments Too many overlays. Segment size exceeds 64K Too many groups Too many public symbols in one module Symbol defined more than once: in file MS PASCALFORTRAN 77 Symbol table capacity exceededToo many segments Too many groups Too many external symbols in one module Line numbers for H Out of space on list file  VM.TMPVM.TMPCannot open temporary file VM.TMP has been created. Do not change diskette in drive : Out of space on VM.TMP Attempt to access data outside of segment bounds Unexpected end-of-file on VM.TMP Unexpected end-of-file on Libray Program size exceeds capacity of Link DUP record too complex Cannot find library Enter new drive letter: Program entry point at : in near Fixup offset exceeds field widtho}OFatal Error: Input File: pos: Record Type: Cannot open file Invalid format file An internal failure has occured. Cannot find file change diskette in file(s): DS Allocation Loading High Stack Allocation = bytesAbout to generate .EXE file Change disks  Unresolved Externals: There was ere error detected. 9Too many PUBLIC symbolsToo many PUBLIC symbolsWarning: No STACK segment OVERLAY_AREA<99 Abs Ovl Res ( Start Stop Length Name Class Resident Overlay H H H Address Publics by Name Address Publics by Value Out of space on run file .OVLCannot open overlayCannot open run fileToo many libraries specified. VM.TMPVM.TMP is an illegal file name and has been ignored .LIBCON:NUL:LPT1:COM1:PRN:AUX:CON:NUL:LPT1:AUX:COM1:PRN:CON NUL LPT1 COM1 PRN AUX *5:gFJa =)3 DSALLOCATEHIGH LINENUMBERSMAPNODEFAULTLIBRARYSEARCHPAUSESTACKBad numeric parameter. Stack size exceeds 65535 bytes. Ambiguous switch: Unrecognized switch: "" Invalid switch. IBM Personal Computer Linker Version 1.10 (C)Copyright IBM Corp 1982 A:PASCALInvalid object module LL L.,UT>T wTƇTs^@b_a$.Deg]>RTFHmlqknB5P<PW ZP/P PPj60gjGgR/PPPjTjGT`T]U(FIF>snƇ,PFPF~uP>(uF(ƇLJ" Fs Fn @~w>ZuFF늸>> >$&*"+Z]UQZPxPW Z>\]UB0D0&B0B0^&Z&WFB0B0D0 &;Gr]U^?tESY/򤍆P^PPPPP >F0u6F0]DGROUP.OBJObject Modules [.OBJ]: No object modules specified. .EXERun File []: .EXENUL.MAP.MAPList File []: .MAPLibraries [.LIB]: Cannot open list file. Cannot nest response files. "" Cannot open response file. I U F0EPPF ]0+FHƆsSƆƆP^/P`F t4ƀ+u ƆPFP+P륰]09F0u v/QPP6F0PGZƆPGPP/P:u A /򤊎 򤊆 Ǎ/ƆV0sPP`F PV0sPPP/PP PPgȋG:uA/ƆV0r>[0,u*2ƆQÍGPP/P /򤊎 򤊆 Ǎ/ƆPP`F Pt-s%2QÍGPP/PPPV0smƆsZƆƆP/P`F t;V0r4ƀ+u ƆP.P+P랚F PP/P'PPPPPt /PP:PP>t>ut,Ah]UQFP0FR0[0, &GH0J0&FFw@vNH0P&x t@Y"sv֋FH0&FH0&9Fr@vP&x t@Y"sFH0&8u T0&GT0Y0V0W0]UQU0s 6N0 @F]UF]0t1v^8 u v]0v~^FF뮋F^GF[0~uF,8\0t@P>[0 t@Z"P>\0 t@P8[0t@Z"Z "Fs F\0~;uW0~u ~;uV0]*>+tt£P3Ҏڣ0؎Ћ&,74 0Ƈ3?t L< uK.C uû3ء;u:Ht>u h>fu! 3&&&&lnpr^VLVVUˏL^VLVUì`'#8 Q %%%%%.14HAIΌVVVOMMO΋O͐IRCLőATERAגIELĂILEӁEԉIL̇SEԅKIKSKDAMńUԈAINԏLAٓSEԆESEԊYSTE̓IMELϊ$ t+v Ku[  ^_^WV2t 6. ^_Z[Y^WV^_[X$,@r<sCC2P ~\^_X2^_[ ^WVr^_Xt,, u R2F$ 6uJ21$r^_X QKu s,&뙽딽Dd돽"늽"녽 뀽*8ZT+Nx,H9B<:60*d$5$-( g Y,n7&O&g8L&q,@tT/'0dp|v'p[jPed%^ eXg"RLkFd@:4R.$&(iA"j8ZCFF G{GcIYE>=>MA e&,n5&, ? )???,UV-7--8}b w- q&dkU t- x$u;˟rK x rÞ33ɟ'>u u2π>uS.tuwr>^t [__[,;=^VjtSk?[uj24 S1rHB+:#2l t d"Ĵȴ+! u[ t ˬ u BAS[PG XP<u3B<u)!!u)!uX<uP<tXDŽ3ɉ')<t<t!<uD;Í3F3&9u 9u"V^u-'3r<t B3'32"s$<u:)tR!Z3^_[[^?t22)t<t8*uf**3u|c<'u 3`C.LJ=86<uI<t**tS3ۊ)***3[ À)tur<uƄ)Ƅ*S[Ë;tCE^_XYZ[^WVˋ6<t*<t/)uPXS3ۊ)3[)< uƄ2< 2S[S[#<u耼. r#PSް?,u#VX^KuS#uB t|JDŽSt u23ۉZ3ˉ!+;rʨt3sGVQ6>!sY^-+3 u[VQ6!>sY^ $PSQRC;ut'K'DŽ)DŽ*"DŽ$t8ZY[X'QW@33_YI!O u)* Ƅ))"/S-tMR3JJ  ƇƇLJQurYQrur+t S^ u([ .þً  t B2Y6+-1΁ 5Q5LJ1Ӊ -ƇƇ ։3>u .02 .,.!"[û3Ɏj&&W*. t2.&&؎Ó| .F8 S5Z| Hے*W  ؁ ʁ&!ڎһw 2d,:2ke($ z3 3u/CKCCuK3T uT>+t£P3Ҏڣ0؎Ћ&, 0Ƈ3?t  < u.C uû3ء;u:Ht>u h ! 3&&&&lnpr$&^VLVVUˏL^VLVU1* 32r+n+22)%$ y)|))^)a)d)    HAIΌVVVOMMO΋O͐IRCLőATERAגIELĂILEӁEԉIL̇SEԅKIKSKDAMńUԈAINԏLAٓSEԆESEԊYSTE̓IMEϊ$ euπ>OtBP)*X^_ZRWVPKtXPRS6[ZR%ZXs^_XY^WVԋƄ.ٿWV%^_^WVAsS6<u>t+v (Ku[ ' '^_^WV2t 6. ^_Z[Y^WV'^_[X$,@r<sCC2P ~\^_X2^_[ ^WVr^_Xt,, u R2F$ 6u"J21"r^_X QKu "s,&뙽딽Dd돽"늽"녽 뀽*8+x,9:d5$-(g Y,n7&O&g8ztnL&hq,b@t\TV/PJD'>08d2,p& '[Pe% eg"kdR$&iAj8ZCFF G{GcIYE>=>MA e&,n5&, ? )???,UV-97-3--8'b !- &d>u u2π>uS.tuwr>^t [__[,;=^VjtSk?[uj AtBtCtDtEtFtGtMQUI9/X!sPAsK tGEÀ r=Ds63ɀAs/ ts&s!Cs tAGt,PQGt u@YXG3 uËfuD3& &"@eu Ca 6Bfe[HuSLu[>fte""""2PKw<@tft fuI&IuZXϺ ZXVSQLt2yBfeY[^VSQeJLS>eu*a$3؋ "@fY[^UWV3Ҏڎ>4t>EtS^_]SQR t :.<?62t, &6t$7.9=ct t5ZY[SQ]?u QYCCY[S t]t2[R"ȘZS)Xñq YS6.fQPQ+;EEt+q<s$St ] ]Ƈ]i['QRKts,N sZYS&tS%Zڇ2*[u6 t7S5S9SZY[ŢAtRs &Zrt26ӊ tKKr975AТ6?ڇ_24=?+tFr et= tڋ24ȠA@KKrCSK uZ< tA&;Ƞ< uàAA^VQRSyr =? ۊ<SP24X[24! ۊ;,-Sډ7%P5YJ'2-+[pR^V2;s- t4t-ڢ,%#[KuS$,&Su+ﻦ)7u.rRSCBCZ[;rڋˋCڊrRڋK+IZBR[+ uÇÉS!.[S0Z"SR'!+ډ.ۉ.Z[ڰPSRSR!'ډ!ڇڋ%;t s #;t s+, u/)-"t$ -"t2Z[ZD, tZ[Z[E,sZ[XuR.ډ.ZS0ډ0[b=7;9R=ڋZ;ڇË) u u2Kt,<,tQa^VSY x $- "~$ua'YZZùâVP!X tOQR ZYS#sCsC[SRQRHu˺ڇQHYZڇ[;s[C/CCC vS@[RKt,ڻ#.:t KuZÇ͊^VPCCRSuK7r[CCRS9Js[$ZYXRZRV uIpZJ u[Sri[+,9mtV9SهSطAهY[/2Ob]_dfMsoym# B N X!Ä / ڹGڋʺ>ڋ82ڋ<+t<-tŊPRx<,tYX uFRZPs(PRSvˇZSY[RڻuS[ZXs+Or PQR ZYXr ;ى=2Oð@O s <sPr% t uNàN tuڊsJsފ BÊs "Sڊs[sÉT'SRPQPXS[ uQ^tȋT.u:tCCC Q.s( ؊QS)urM3 [YC.tSS tQCQ< t<`r, [SSQKQ[<=tk<+t<-u "R<,t<;t<:s<0rŊڊ,0жڇtu -uR(frB<;t _u[ËQ< ràS<rZ,SCC7CQSQ^VPdTrá r-À ÊUrÌƿNj&2"&0ËꟋڱӱs ՊUt"Ȱð"ɰ<sUt $آ\UàU t x$u;˟rK x rÞ33ɟ3UtCàUÉY؟2r>Ws 2.~#[ß#####&2"&0G & G"&G"&0Gـt2&GJx1u"܋&GMx2 ÈF"Ċ$Ѵt"Ċ2 tP tLFG_t=Mut*ʸԊ"  t[6YÀt2 Ê&[Nj>6YW32Ê..B62&=Erqr&=>.ˋRr Mtss3U#>2.4U33s EVs<>.Z&=ˋ2ef:ueCKSl[KtuV,<,tSl[Ket[<,:t1A-L)Lu ,:t f3Q#YZQىi/s Ӊg[;r#t}.S0KCC uCC. t<:t u BAS[PG XP<u3B<u)!!u<޴!uX<uP<t,XDŽ3ɉ')<t<t!<uD;Í3F3&9u 9u"V^u-'3r<t B3'32"s$<u:)tR!Z3^_[[^?t22)t<t8*uf**3uv<'uc sC܈.LJPK؋6<uI<t**tS3ۊ)***3[ À)tur<uƄ)Ƅ*S[Ë;tCX^_XYZ[^WVˋ6<t*<t/)uPXS3ۊ)3[)< uƄ2< 2S[f'0nݢ#<u耼. r#PSް܀?,u#Vk^KuS#uB t|JDŽSt u23ۉZ3ˉ!+;rʨt3sGVQ6>!sY^-+3 u[VQ6!>sY^ $PSQRC;ut'K'DŽ)DŽ*"DŽ$t8ZY[X'QW@33_YI!O u)* Ƅ))"/S-t`R3JJ  ƇƇLJQurYQrur+t S u([ .4þً  t B2Y6+-1΁ 5Q5LJ1Ӊ -ƇƇ ։3>u .02 .,.!"[û3Ɏj&&Wn?. t2.&&؎Ó"Nf6l3AH-{<a**.-.,.gO J~ F7 ء   ʁ"&!ڎһw 2d),:2ke($ z3 3u/CKCCuK3 u (K$,,) "a" "MUSIC",4? (K$,,) "b" "ART",_@ (K$,,) "c" "MORTGAGE",A (K$,,) "d" "CIRCLE",B (K$,,) "e" "DONKEY",C (K$,,) "f" "PIECHART",D (K$,,) "g" "BALL",.E (K$,,) "h" "COLORBAR",YF (K$,,) "i" "CALENDAR",G (K$,,) "j" "SPACE",T (K$,,) () h^ h ,: ,:: NDAR",G (K$,,) "j" "SPACE",T (K$,,) (K$,,) "b" "ART",_@ (K$,,) "c" "MORTGAGE",A (K$,,) "d" "CIRCLE",B (L  The IBM Personal Computer Mortgage  Version 1.00 (C)Copyright IBM Corp 1981, 1982!  Licensed Material - Program Property of IBME  Author - Glenn Stuart DardickW  SEG: j,i SAMPLES$"NO"s   SAMPLES$"YES"  : ,: ,,: (:: ,: "IBM"  , ,: "Personal Computer"  ,:  ,,: ()(,)()8  ,,: ()" MORTGAGE "()^  ,,: ()(, )()$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"'B ,: ,,: "Press space bar to continue"=L "" LJVCMD$ c` CMD$ " " ~~j CMD$ () t V~ ,:: P: AMORT(,):  SEG (( ) 0) 0 COLS :  P:COLS SEG  (I$) ; (I$,,)"2" X (I$,,)"1" b  SAMPLES$ "YES"  "SAMPLES",  - MAIN OPTION MENU ,:: ,: " MORTGAGE ANALYSIS "  ,: ,: "OPTIONS - "5 "1 - MORTGAGE PAYMENT COMPARISONS "W "2 - MORTGAGE AMORTIZATION"n  "ESC KEY - EXIT"x " " "OPTION NUMBER (1,2, OR ESC) =====>"( "NOTE: PRESS THE ENTER KEY WHEN DONE"2 " "< ,F ()(%,())()AP ()" MORTGAGE PAYMENT COMPARISONS "()}Z ()" - USE THIS OPTION TO COMPARE "()d ()" THE MONTHLY PAYMENTS OF "()n ()" MORTGAGES AT VARIOUS RATES "()1x ()" AND PRINCIPAL AMOUNTS. "()m ()" MORTGAGE AMORTIZATION "() ()" - USE THIS OPTION TO CALCULATE "() ()" THE PRINCIPAL AND INTEREST "()! ()" PAID OVER ANY 12 MONTH PERIOD. "()B ()(%,())()` ,: ,%: " ": ,%I$: I$""  : I$;: ,::PF AF(RF((((RF)NF)))): - mortgage comparisons* ,:: ,: " MORTGAGE PAYMENT COMPARISON PROGRAM "<  ,: ,] ()(%,())() ()" MORTGAGE PAYMENT COMPARISONS "() ()" - USE THIS OPTION TO COMPARE "() ()" THE MONTHLY PAYMENTS OF "()M ()" MORTGAGES AT VARIOUS RATES "()" ()" AND PRINCIPAL AMOUNTS. "(), ()" "()6 ()" NOTE: TO SELECT A VALUE OR AMOUNT "()=@ ()" ENTER THE APPROPRIATE VALUE "()yJ ()" AND PRESS THE ENTER KEY. "()T ()(%,())()^ ,: "ENTER BASE MORTGAGE AMOUNT ===> ";A$hA (A$): A  @rAINC | ,: &);0 ,: "(1 TO 35 PERCENT)";e ,: "ENTER BASE INTEREST RATE =====> ";IR$IR (IR$): IR# IR |R IR:RINC  #x  ,: &); ,: "(1 TO 35 YEARS)"; ,: "ENTER NUMBER OF YEARS IN MTG => ";Y$ Y (Y$)/N Y  :NF NV NF NF \ ,: " MONTHLY MORTGAGE PAYMENT COMPARISONS " ,: , : Y$"-YEAR MORTGAGE LOAN AMOUNTS"; ,: "RATES";: , I  COLS& ,I: ): ,I: AIAINC&0 I7: I  QD I,: ): I,N "##.##";(((R(IRINC))`j))dX Ib ,l I  vRF RIRINC:AF:  J  COLSP PF(AJAINC):P ((P #y)d)dB P' ,: "PAYMENTS TOO LARGE TO DISPLAY": c I,J: "####.##";P;k Js I} " " "PRESS SPACE BAR TO CONTINUE"; " "   - mortgage amortization , , ,-  " MORTGAGE AMORTIZATION PROGRAM "?  ,: ,`  ()(%,())()* ()" MORTGAGE AMORTIZATION L "()4 ()" - USE THIS OPTION TO CALCULATE "()> ()" THE PRINCIPAL AND INTEREST "()PH ()" PAID OVER ANY 12 MONTH PERIOD. "()R ()" "()\ ()" NOTE: TO SELECT A VALUE OR AMOUNT "()f ()" ENTER THE APPROPRIATE VALUE "()@p ()" AND PRESS THE ENTER KEY. "()az ()(%,())()k , "ENTER MORTGAGE AMOUNT ===> ";A$AF (A$) , " "; , "(1 TO 35 PERCENT)";  ,7 "ENTER INTEREST RATE =====> ";IR$HIR (IR$)\ IR# o IR RF IR , " "; ,$ "(1 TO 35 YEARS)";. , 8 "ENTER NUMBER OF YEARS ===> ";Y$ B Y (Y$). L NF Y  C V NF  V ` NF  ` j ~ t PF ((PF #y)d)d ~ "MONTHLY PAYMENTS ARE ====>";PF , "CALCULATING AMORTIZATION" , NF$  ! I  : I! AMORT(,) AF*! I  NF]! AMORT(I,) ((AMORT(I,)RF #y)d)d! AMORT(I,) AMORT(I,)PFAMORT(I,)! I! I  : I,: ');: I! ,! " - 1 TO"(NF)! " - 0 TO END AMORTIZATION";" ,(" "ENTER BEGINNING PAYMENT NUMBER"V" "OF 12 MONTH PERIOD ======> ";PERIOD$j" PD (PERIOD$)"( PD  < "2 PERIOD$ "0"  "< PD "F PDNF  "P PD  "Z ,"d ')"n ')#x ,/# "PYMNT PRINCIPAL INTEREST BALANCE"<# TINT Q# I PD PD e# I NF  # TINT TINT AMORT(I,)# "### ";I;# " ######.##";PFAMORT(I,);AMORT(I,);AMORT(I,)# I# " "$ "INTEREST FOR 12 PERIODS =";$ "######.## ";TINT($ ,M$ "PRESS SPACE BAR TO CONTINUE";W$ ,,m$ ""  z$ CMD$ $ CMD$ " "  $" CMD$ () $,  AR TO CONTINUE";W$ ,,m$ ""  z$ CMD$ $ CMD$ " " NCIPAL INTEREST BALANCE"<# TINT Q# I PD PD e# I NF  # TINT TINT AMORT(I,)# "### ";I;# " ######.##";PFAMORT(I,);AMORT(I,);AMORT(I,)# I# " "$ "INTEREST FOR 12 PERIODS =";$ "######.## ";TINT($ ,M$ "PRESS SPACE BAR TO CONTINUE";W$ ,,m$ ""  z$ CMD$ $ CMD$ " "   The IBM Personal Computer Colorbar  Version 1.10 (C)Copyright IBM Corp 1981, 1982!  Licensed Material - Program Property of IBME  Author - Glenn Stuart DardickW  SEG: j,h SAMPLE$"NO"r   SAMPLE$"YES"  : ,: ,: (:: ,: "IBM"  , ,: "Personal Computer"   ,:  ,,: ()(,)()4  ,,: ()" COLORBAR "()Z  ,,: ()(, )()$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"#B ,: ,,: "Press space bar to continue"9L "" LFVCMD$ _` CMD$ " " ~{j CMD$ () t V~ ,:  , ( , I   J   J,I  I,I: ();();(); J I&  ,1 ,b  "blk blue grn cyan red mag brn white";m  ,x ,( " ";2 I  < J F J,IP I,I: ();();();Z J d In ,#x ,S "dark lght lght lght lght lght yel int";` ,,k , "grey blue grn cyan red mag white"; , "Press ESC key to exit"; () :DELETE  ,) SAMPLE$"YES" "SAMPLES",Press ESC key to exit"; () :DELETE  ,) SAMPLE$"LH The IBM Personal Computer Calendar| Version 1.10 (C)Copyright IBM Corp 1981, 1982 Licensed Material - Program Property of IBM SEG: j,SAMPLES$"NO" SAMPLES$ "YES" : ,: ,,: (:: ,: "IBM"A , ,: "Personal Computer"n  ,:  ,,: ()(,)()  ,,: ()" CALENDAR "()  ,,: ()(, )()$  ,,: ()" Version 1.10 "()$. ,,: ()(,)()^8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"B ,: ,,: "Press space bar to continue"L "" LVCMD$ ` CMD$ " " ~j CMD$ () t V~ ,:/ M$(),MONTH$(,),MNAME$( ),DAYS( )eMNAME$() " JANUARY " : MNAME$() "FEBRUARY "MNAME$() " MARCH " : MNAME$() " APRIL "MNAME$() " MAY " : MNAME$() " JUNE "MNAME$() " JULY " : MNAME$() " AUGUST "=MNAME$() "SEPTEMBER" : MNAME$( ) " OCTOBER "s MNAME$( ) " NOVEMBER" : MNAME$( ) "DECEMBER "(DAYS ( )  : DAYS ( )  : DAYS ( )  : DAYS ( ) <DAYS ( )  : DAYS ( )  : DAYS ( )  : DAYS ( ) EPDAYS ( )  : DAYS ( )  : DAYS ( )  : DAYS ( ) Ud YEARS()nYEARS ( )  : YEARS ( )  : YEARS ( )  : YEARS ( ) YEARS ( )  : YEARS ( )  : YEARS ( )  : YEARS ( ) YEARS ( ) M$() ()(#,)WT$ " "() : M$()()T$T$T$T$T$T$T$:M$()M$()T$ (,)() : M$()()T$T$T$T$T$T$T$ I  :M$(I) M$(I): I , "ENTER 0 TO END" "THE PROGRAM.": , "ENTER YEAR (1981-1989) ==> ";YR$< YR$"0" Z YR$"1981" YR: x YR$"1982" YR: " YR$"1983" YR: , YR$"1984" YR: 6 YR$"1985" YR: @ YR$"1986" YR: J YR$"1987" YR: ,T YR$"1988" YR: J^ YR$"1989" YR: Sh ""qr "YEAR MUST BE A NUMBER"| "FROM 1981 TO 1989." "" "ENTER 0 TO END" "THE PROGRAM." "" "" Y YEARS(YR)  YR  DAYS()# YR  DAYS(), ""W "POSITION PAPER AND PRESS SPACE BAR"~ "WHEN THE IBM PERSONAL COMPUTER" "PRINTER IS READY" "" ""& "" &0CMD$ : CMD$ " " XD CMD$ ()  N 0<X "PRINTING CALENDAR FOR THE YEAR, ";YR$;","_b "PRESS THE ESC KEY TO EXIT."ol P  }v (); " (C) COPYRIGHT IBM CORPORATION 1981" (); SKIP :"": SKIP ();();(E);% " THE IBM PERSONAL COMPUTER CALENDAR"A ();();(E);c " ";YR SKIP :"": SKIP M (P) (P)  SKIP :"": SKIP ();();(E);  " ";MNAME$(M);" ";MNAME$(M) ();(F);0 I  H MONTH$(,I) M$(I)`MONTH$(,I) M$(I)h  I* SKIP :"": SKIP4 J  DAYS(M)>K (YJ) :L ((YJ))H(MONTH$(,L),K) ((J),,)R J\Y (Y(DAYS(M) )) ,f J  DAYS(M)RpK (YJ) :L ((YJ))z(MONTH$(,L),K) ((J),,) JY (Y(DAYS(M) ))  " SUN MON TUE WED THU FRI SAT SUN MON TUE WED THU FRI SAT"7 I  : " ";MONTH$(,I);" ";MONTH$(,I)P () X Iz SKIP :"": SKIP : M SKIP :"": SKIP : P SAMPLES$ "YES" "SAMPLES", : ,: SKIP :"": SKIP : M SKIP :"": SKIP : P DAYS(M)RpK (YJ) :L ((YJ))z(MONTH$(,L),K) ((J),,) JY (Y(DAYS(M) ))  " SUN MON TUE WED THU FRI SAT SUN MON TUE WED THU FRI SAT"7 I  : " ";MONTHL  The IBM Personal Computer Music  Version 1.10 (C)Copyright IBM Corp 1981, 1982  Licensed Material - Program Property of IBM0  SEG: j,D SAMPLES$ "NO"N  c SAMPLES$ "YES"  : ,: ,,: (:: ,,: "IBM"  , : "Personal Computer"   ,:  ,: ()(,)()  ,: ()" MUSIC "()5  ,: ()(, )()h$  ,: ()" Version 1.10 "(). ,: ()(,)()8 ,: ,: "(C) Copyright IBM Corp 1981, 1982"B ,: ,: "Press space bar to continue" L "" L(VCMD$ : CMD$"" VDj CMD$ () :\t CMD$ " " Vju |vv "mf"w }| }} ~ ,: (: ,,:: AZ ,: " ------- selections -------" ,: " A-MARCH E-HUMOR I-SAKURA"9 ,: " B-STARS F-BUG J-BLUE "d ,: " C-FORTY G-POP K-SCALES" ,: " D-HAT H-DANDY ESC KEY-EXIT" , I : J  J,I: ();();: I  : J  I I I I = J,I: ( );();E:S J   J,: ,: ();: J,$: , ();: ,: ();( ,: ,2 I  : ();:< ();:  ,F I  : ();: P ();: ,: M(X),O(F)PZ I X:M(I) 33(( ))(I):kd I :M(I) :xnO() xO('):O(():O()):O(*)O(+) :O(,) :O(-) :O(.)O(/):O(0):O(1):O(2)O(3):O(4):O(5):O(6)<O(7):O(8):O(9):O(:)dO(;):O(<):O(=):O(>) O(?)!:O(@)#:O(A)$:O(B)%O(C)&:O(D)':O(E)(:O(F)* ^ J,KCMD$ : CMD$""  CMD$()  j,  J  +Q O(J)C J@ J' 6z" (,Q) ,:  ,Q: ();: ,: 6, ,: ,Q: ();: ,6 M(J),K: J K @::SKIP NEXT FOR STACCATTO; ,@ J@ J' *J (,Q)  ,: ,Q: ( );: LT ,:  ,Q: ();: }^ ,: " ";h ,: "ENTER SELECTION ==>";r "" r|CMD$: CMD$"" | CMD$() : CMD$"A" CMD$"a" S$ "MARCH ": : S CMD$"B" CMD$"b" S$ "STARS ": :  CMD$"C" CMD$"c" S$ "FORTY ": t:  CMD$"D" CMD$"d" S$ "HAT ": :  CMD$"E" CMD$"e" S$ "HUMOR ":  : ' CMD$"F" CMD$"f" S$ "BUG ":  : \ CMD$"G" CMD$"g" S$ "POP ": :  CMD$"H" CMD$"h" S$ "DANDY ": <:  CMD$"I" CMD$"i" S$ "SAKURA": :  CMD$"J" CMD$"j" S$ "BLUE ":  : 0 CMD$"K" CMD$"k" S$ "SCALES": 0: : hP " ";CMD$;"-";S$X Dy S$: ,("(S$))  ,: S$;: , S$('," "): ,: ,: S$: ,& ^0: SAMPLES$"YES" "SAMPLES",D ,: ,,::> The IBM Personal Computer Music Scrolll Version 1.00 (C)Copyright IBM Corp 1981 Licensed Material - Program Property of IBM -2,"La Cucaracha - Mexican Folk Song" 42,1,0,1,42,1,0,1,42,1,0,1,47,1,0,5,51,1,0,3,42,1,0,1,42,1,0,1T 42,1,0,1,47,1,0,5,51,1,0,5,30,1,0,1,30,1,0,1,35,1,0,3,47,1,0,1 47,1,0,1,46,1,0,1,46,1,0,1,44,1,0,1,44,1,0,1,42,8,0,2,42,1,0,1 42,1,0,1,42,1,0,1,46,1,0,5,49,1,0,3,42,1,0,1,42,1,0,1,42,1,0,1% 46,1,0,5,49,1,0,5,37,1,0,1,37,1,0,1,30,1,0,3,54,2,56,2,54,2,52,2: 51,2,49,2,47,8F -1,-1r -2,"Blue Danube Waltz by J.S.Strauss" 42,4,46,4,49,4,49,4,0,4,61,2,0,2,61,2,0,6,58,2,0,2,58,2,0,6,42,4,42,4 46,4,49,4 49,4,0,4,61,2,0,2,61,2,0,6,59,2,0,2,59,2,0,6,41,4,41,4,44,4,51,4,51,4? 0,4,63,2,0,2,63,2,0,6,59,2,0,2 59,2,0,6,41,4,41,4,44,4,51,4,51,4,0,4,63,2,0,2,63,2,0,6,58,2,0,2,58,2 L0,6,42,4* 42,4,46,4,49,4,54,4,0,4,66,2,0,2,66,2,0,6,61,2,0,2,61,2,0,6,42,44 42,4,46,4,49,4,54,4,0,4,66,2,0,2P> 66,2,0,6,63,2,0,2,63,2,0,6,44,4,44,4,47,4,51,2,0,2,51,14,0,2,48,4aH 49,4,58,16R 54,4,46,4,46,8,44,4,51,8,49,4,42,4,0,2,42,2,42,4,0,8,49,2,0,2,47,2\ 0,6,49,2,0,2f 47,2,0,6,49,4,58,16,56,4,49,2,0,2,46,2,0,6,49,2,0,2,46,2,0,6,49,4Ep 56,16,54,4,49,2,0,2,47,2,0,6,49,2,0,2,47,2,0,6,49,4,58,16z 56,4,49,4,54,4,56,4,58,4,61,8,59,4,58,2,58,2,58,4,56,2,0,2,54,4,0,8 -1,-1 -2,"Humoresque by Dvorak" 47,3,0,2,49,1,47,3,0,2,49,1,51,3,0,2,54,1,56,3,0,2,54,17 59,3,0,2,58,1,61,3,0,2,59,1,58,3,0,2,61,1,59,3,0,2,56,1u 54,3,0,2,54,1,56,3,0,2,54,1,59,3,0,2,56,1,54,3,0,2,51,1 49,24,47,3,0,2,49,1,47,3,0,2,49,1,51,3,0,2,54,1,56,3,0,2,54,1 56,3,0,2,58,1,61,3,0,2,59,1,58,3,0,2,61,1,59,3,0,2,56,1) 54,3,0,2,54,1,59,3,0,2,47,1,49,6,54,6,47,185 -1,-1a  -2,"Pop! Goes the Weasle - Anonymous"  47,2,0,2,47,2,49,2,0,2,49,2,51,2,54,2,51,2,47,2,0,2,42,2 $ 47,2,0,2,47,2,49,2,0,2,49,2,51,6,47,2,0,2,42,2,47,2,0,2,47,2,49,20!. 0,2,49,2,51,2,54,2,51,2,47,2,0,4,56,2,0,4,49,2,0,2,52,2,51,6,47,2w!8 0,4,59,2,0,2,59,2,56,2,0,2,59,2,58,2,61,2,58,2,54,2,0,4,59,2,0,2!B 59,2,56,2,0,2,59,2,58,6,54,2,0,2,51,2,52,2,0,2,51,2,52,2,0,2,54,2!L 56,2,0,2,58,2,59,2,0,4,56,2,0,4,49,2,0,2,52,2,51,6,47,2 "V -1,-1."t -2,"Symphony #40 by Mozart"j"~ 55,2,54,2,54,4,55,2,54,2,54,4,55,2,54,2,54,4,62,4,0,4" 62,2,61,2,59,4,59,2,57,2,55,4,55,2,54,2" 52,4,52,4,0,4,54,2,52,2,52,4,54,2,52,2,52,4,54,2,52,2# 52,4,61,4,0,4,61,2,59,2,58,4,58,2,55,2,54,4,54,2,52,2B# 50,4,50,4,0,4,62,2,61,2,61,4,64,4,58,4,61,4t# 59,4,54,4,0,4,62,2,61,2,61,4,64,4,58,4,61,4# 59,4,62,4,61,2,59,2,57,2,55,2,54,4,46,4,47,4,49,4# 50,4,52,2,50,2,49,4,47,4,54,4,0,4,64,8# 65,2,0,6,64,8,65,2,0,6,64,8$ 65,4,64,4,65,4,64,4,65,4&$ -1,-1L$< -2,"Yankee Doodle - Anonymous "$F 50,3,50,3,52,3,54,3,50,3,54,3,52,3,45,3,50,3,50,3,52,3,54,3,50,6$P 49,3,0,3$Z 50,3,50,3,52,3,54,3,55,3,54,3,52,3,50,3,49,3,45,3,47,3,49,3,50,6$d 50,3,0,3>%n 47,5,49,1,47,3,45,3,47,3,49,3,50,3,0,3,45,5,47,1,45,3,43,3,42,6M%x 45,3,0,3% 47,5,49,1,47,3,45,3,47,3,49,3,50,3,47,3,45,3,50,3,49,3,52,3,50,6% 50,6% -1,-1% -2,"FUNERAL MARCH OF A MARIONETTE - GOUNOD")& 37,1,0,2,30,1,0,5,42,3,42,3,41,3,39,3,41,3,0,3,42,3,44,3,0,3,37,1,0,2v& 30,1,0,5,42,3,42,3,41,3,39,3,41,3,0,3,42,3,44,3,0,3,37,3,42,3,0,3,45,3& 49,6,47,3,45,3,0,3,49,3,52,6,50,3,49,3,0,3,53,3,56,6,54,3,53,3,50,3 ' 49,3,47,3,45,3,44,3,30,1,0,5,42,3,42,3,41,3,39,3,41,3,0,3,42,3,44,3Q' 0,3,37,1,0,2,30,1,0,5,42,3,42,3,41,3,39,3,41,3,0,3,42,3,44,3,0,3' 37,3,45,3,0,3,49,3,52,6,50,3,49,3,47,3,45,3,43,3,47,3,50,3,42,3' 41,3,42,3,44,3,0,3,45,1,0,2,44,9,42,1' -1,-1' -2,"STARS AND STRIPES FOREVER - SOUSA "5( 54,6,54,6,52,3,51,3,51,6,50,3,51,3,51,16,0,2,50,3O( 51,3,51,6,50,3,51,3(" 54,6,51,3,54,3,52,12,49,6,0,3,49,3,49,6,48,3,49,3(, 49,6,48,3,49,3(6 52,16,0,2,51,3,49,3,51,3,54,9,56,9,56,3,49,16,0,2,54,6!)@ 54,6,52,3,51,3,51,6,50,3,51,3,51,16,0,2,50,3,51,3,51,6,50,3 ,51,3m)J 52,3,51,3,49,5,46,1,49,12,47,6,0,3,47,3,47,6,46,3,47,3,50,6,49,3,47,3)T 59,15,0,3,47,3,49,3,51,3,54,1,0,2,47,3,49,3,51,3,54,1,0,2,42,3,44,5)^ 51,1,49,12,47,1)h -1,-1* -2,"Mexican Hat Dance - Traditional "N* 52,2,57,2,0,2,52,2,57,2,0,2,52,2,57,6,0,4,52,2,57,2,59,2,57,2,56,4* 57,2,59,2,0,8,52,2,56,2,0,2,52,2,56,2,0,2,52,2,56,6,0,4,52,2* 56,2,57,2,56,2,54,4,56,2,57,2,0,6,64,2,63,2,64,2,61,2,60,2,61,2+ 57,2,56,2,57,2,52,2,0,4,49,2,50,2,52,2,54,2,56,2,57,2,59,2,61,2c+ 62,2,59,2,0,4,62,2,61,2,62,2,59,2,58,2,59,2,56,2,55,2,56,2,52,2+ 0,4,64,2,63,2,64,2,66,2,64,2,62,2,61,2,59,2,57,2+ -1,-1+0 -2,"SCALES " ,: 38,1,39,1,40,1,41,1,42,1,43,1,44,1,45,1,46,1,47,1=,D 48,1,49,1,50,1,51,1,52,1,53,1,54,1,55,1,56,1t,N 57,1,58,1,59,1,60,1,61,1,62,1,63,1,64,1,65,8,0,4,X 65,8,64,1,63,1,62,1,61,L1,60,1,59,1,58,1,57,1,b 56,1,55,1,54,1,53,1,52,1,51,1,50,1,49,1,48,1-l 47,1,46,1,45,1,44,1,43,1,42,1,41,1,40,1,39,1,38,8-v -1,-1H- -2,"Sakura - Japanese Folk Melody "- 49,8,49,8,51,12,0,4,49,8,49,8,51,12,0,4,49,8,51,8,52,8,51,8- 49,8,51,4,49,4,45,16,44,8,40,8,44,8,45,8- 44,8,44,4,40,4,39,16,49,8,49,8,51,12,0,4,49,8,49,8,51,12,0,4+. 40,8,44,8,45,8,49,8,51,4,49,4,45,8,44,167. -1,-1 44,8,44,4,40,4,39,16,49,8,49,8,51,12,0,4,49,8,49,8,51,12,0,4+. 40,8,44,8,45,8,  The IBM Personal Computer Donkey  Version 1.10 (C)Copyright IBM Corp 1981, 1982  Licensed Material - Program Property of IBM1  SEG: j,C SAMPLES$"NO"M  ` SAMPLES$"YES"  : ,: ,,: (:: ,: "IBM"  , ,: "Personal Computer"   ,:  ,,: ()(,)()  ,,: ()" DONKEY "()8  ,,: ()(, )()m$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"B ,: ,,: "Press space bar to continue"L "" L"VCMD$ :` CMD$ "" VVj CMD$ () ot CMD$ " " y~ V SEG (( ) 0) 0 SEG:   P:: , "HOLD IT!"  "YOU'RE NOT USING THE COLOR/GRAPHICS MONITOR ADAPTER!"K "THIS PROGRAM USES GRAPHICS AND REQUIRES THAT ADAPTER."t "PRESS THE SPACE BAR TO CONTINUE."~ SEG "" CMD$  CMD$ ""  CMD$ ()  CMD$ " "         "p16"# 0 ,, "THIS PROGRAM REQUIRES ADVANCED BASIC -- USE COMMAND 'BASICA'": ,,: I (#::   ,: SAMPLES$"YES" "samples", : ,,::  AY ,: , Q%()9 D1%(),D2%(),C1%(),C2%()I DNK%(,)S ] cq B%(,) I ,:B%(I)@:B%():B%()CXn:6 (,)(1,),,B@ (,)(a,),,BFJ (,)(1,),,BFT ,: "Donkey"/^ ,: "Driver"M_ ,:"Press Space ";k` ,:"Bar to switch";a ,:"lanes ";c ,:"Press ESC ";d ,:"to exit ";h Y  :(,Y)(,Y ):rCYi:CXi"| (d,)(d,):(,)(,)= ,: SD: ,: SMWCYCY: CY< m (CX,CY),CAR%,DXi*() Y() |   N,A$: A$()  : j,: (A$) (CX,CY)(CX,CY,),,BF:CXCX: (CX,CY),CAR%,: ,9 Y (DX,Y),DNK%,V CXDX YCY  q Y  (,),B%: (DX,|)(DX ,),,BF:  "S8C3""BM12,1r3m+1,3d2R1ND2u1r2d4l2u1l1""d7R1nd2u2r3d6l3u2l1d3m-1,1l3"#"m-1,-1u3l1d2l3u6r3d2nd2r1u7l1d1l2"9&"u4r2d1nd2R1U2"H0"M+1,-3"h:"BD10D2R3U2M-1,-1L1M-1,1"D"BD3D1R1U1L1BR2R1D1L1U1N"BD2BL2D1R1U1L1BR2R1D1L1U1X"BD2BL2D1R1U1L1BR2R1D1L1U1b(,)((,<),,Bl (,)v CAR%()(,)(,-),CAR% ,"S08"= "BM14,18"a"M+2,-4R8M+1,-1U1M+1,+1M+2,-1"M-1,1M+1,3M-1,1M-1,-2M-1,2""D3L1U3M-1,1D2L1U2L3D2L1U2M-1,-1""D3L1U5M-2,3U1" (,), (%, ): ((, ) (%, ): ((, ) ( ,)(-,),DNK%$A SDSD: ,: "BOOM!"` (DX,Y)(DX,Y),D1%{ D1XDX:D1YY:D2XDX* (DX,Y)(DX,Y),D2%4 (CX,CY)(CX,CY,),C1%> (CX,CY)(CX,CY,),C2%HC1XCX:C1YCY:C2XCX"R P  :Z(P):Z1ZG\ (C1X,C1Y),C1%:(C2X,C1Y),C2%lf (D1X,D1Y),D1%:(D2X,D1Y),D2%pC1XCXZ1:D1YYZ1:C2XC2X(#C2X)ZzD1XDXZ1:C1YC1Y(C1Y)Z:D2XD2X(&D2X)Z (C1X,C1Y),C1%:(C2X,C1Y),C2% (D1X,D1Y),D1%:(D2X,D1Y),D2%) %,:; Y :G: lSMSM: ,: "Donkey loses!"~ Y :: 1Y)L  The IBM Personal Computer Circle  Version 1.10 (C)Copyright IBM Corp 1981, 1982  Licensed Material - Program Property of IBM1  SEG: j,J ,,@:SAMPLES$"NO"T  n ,,@:SAMPLES$"YES"  : ,: ,,: (:: ,: "IBM"  , ,: "Personal Computer"   ,:  ,,: ()(,)()   ,,: ()" CIRCLE "()F  ,,: ()(, )(){$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"B ,: ,,: "Press space bar to continue"#L "" L0VCMD$ H` CMD$ "" Vdj CMD$ ()  }t CMD$ " " ~ V SEG (( ) 0) 0 SEG:  P:: , "HOLD IT!" "YOU'RE NOT USING THE COLOR/GRAPHICS MONITOR ADAPTER!"Y "THIS PROGRAM USES GRAPHICS AND REQUIRES THAT ADAPTER." "PRESS THE SPACE BAR TO CONTINUE." SEG "" CMD$  CMD$ ""  CMD$ ()   CMD$ " "       ' "p16"1 (> ,, "THIS PROGRAM REQUIRES ADVANCED BASIC -- USE COMMAND 'BASICA'": ,,: I (#::    ! ,: SAMPLES$"YES" "samples"," ,,::(< ,: ,FS1:S2"PBU ,:"Press ESC to exit"UZ R d zdA2AS1: A2H A2A2Hn(,d),R,,A,A2,xAAS2: AH AAH(,d),, I :A$: A$() ! F,,A,A2, ' "p16"1 (> ,, "THIS PROGRAM REQUIRES ADVANCED BASIC -- USE COMMAND 'BASICA'": ,,: I (#::    ! ,: SAMPLES$"YES" "samples"," ,,::(< ,: ,FS1:S2"PBU ,:"Press ESC to exit"UZ R d zdA2AS1: A2H A2A2Hn(,d),R,,A,A2,  The IBM Personal Computer Piechart  Version 1.10 (C)Copyright IBM Corp 1981, 1982!  Licensed Material - Program Property of IBM3  SEG: j,E SAMPLES$"NO"O  b SAMPLES$"YES"  : ,: ,,: (:: ,: "IBM"  , ,: "Personal Computer"   ,:  ,,: ()(,)()  ,,: ()" PIECHART "():  ,,: ()(, )()o$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"B ,: ,,: "Press space bar to continue"L "" L$VCMD$ <` CMD$ "" VXj CMD$ () qt CMD$ " " {~ V SEG (( ) 0) 0 SEG:   P:: , "HOLD IT!" "YOU'RE NOT USING THE COLOR/GRAPHICS MONITOR ADAPTER!"M "THIS PROGRAM USES GRAPHICS AND REQUIRES THAT ADAPTER."v "PRESS THE SPACE BAR TO CONTINUE." SEG "" CMD$  CMD$ ""  CMD$ ()  CMD$ " "         "p16"% 2 ,, "THIS PROGRAM REQUIRES ADVANCED BASIC -- USE COMMAND 'BASICA'": ,,: I (#::   ,: SAMPLES$"YES" "samples", : ,,:: R(d),A$(d)x ,: ,LR2:SR,2 "title of chart";T$T "how many items in chart";N\Sj I N "numeric value ,name";R(I),A$(I)SSR(I) I N:R(I)R(I)S:A2 ,(T$): T$% (((T$)),)(((T$)) ,),,B3" C NT,A1A2:A2A2R(C)O–hIe6AA(A1A2)~@CX(AA)(LRSR)JCYd(AA)(LRSR)T (CX,CY),SR,,A1ow,A2,^ (CX(AA)LSR,CY(AA)LSR),C ,.hLXCX(AA)(SR)(A$(C)):LYCY(AA)(SR)Or (LY),(LX): A$(C);| ((LX),((LY)))((LX)(A$(C)),((LY))),L C ,"Another Chart? (Y or N)";A$: A$""  A$"N" A$"n"  A$"Y" A$"y" x ,"Another Chart? (Y or N)";A$: A$""  A$"N" A$"n"  A$"Y" A$"y" RSR)T (CX,CY),SR,,A1ow,A2,^ (CX(AA)LSR,CY(AA)LSR),C ,.hLXCX(AA)(SR)(A$(C)):LYCY(AA)(SR)Or (LY),(LX): A$(C);| ((LX),((LY)))((LX)(A$(C)),((LY))),  The IBM Personal Computer Space  Version 1.10 (C)Copyright IBM Corp 1981, 1982  Licensed Material - Program Property of IBMF  Author - R. Heiney & M. HallermanX  SEG: j,j SAMPLES$"NO"t   SAMPLES$"YES"  : ,: ,,: (:: ,: "IBM"  , ,: "Personal Computer"  ,:  ,,: ()(,)()9  ,,: ()" SPACE "()_  ,,: ()(, )()$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982"(B ,: ,,: "Press space bar to continue"<L "" LIVCMD$ a` CMD$ "" V}j CMD$ () t CMD$ " " ~ V SEG (( ) 0) 0 SEG:   P:: , "HOLD IT!"4 "YOU'RE NOT USING THE COLOR/GRAPHICS MONITOR ADAPTER!"r "THIS PROGRAM USES GRAPHICS AND REQUIRES THAT ADAPTER." "PRESS THE SPACE BAR TO CONTINUE." SEG "" CMD$  CMD$ ""  CMD$ ()  CMD$ " "   %  3  @  "p16"J W ,, "THIS PROGRAM REQUIRES ADVANCED BASIC -- USE COMMAND 'BASICA'": ,,: I (#::   ,: SAMPLES$"YES" "samples", : ,,:: x % IN: I( )5 ,: ,:(,d),,,,,fff:(,d),,:"bm160,100e30bm160,100h30": (,d)(,d),:(,F)(,),I (,)(d,),,BF:(e,)(,),,BF:(,)(,,),,BF ,: "Press ESC "; ,:"to exit";Y J : I : "mbl64t255o=j;cc#dd#eff#gg#aa#b":K1:K2:(K1,K2),I,: I1 ::(K1,K2),I,:A$: A$()  j,: A$""  : K1:K2:(K1,K2),I,: I1 ::(K1% IN: I( )5 ,: ,:(,d),,,,,fff:(,d),,:"bm160,100e30bm160,100h30": (,d)(,d),:  The IBM Personal Computer Ball  Version 1.10 (C)Copyright IBM Corp 1981, 1982  Licensed Material - Program Property of IBM/  SEG: j,A SAMPLES$"NO"K  ^ SAMPLES$"YES"  : ,: ,,: (:: ,: "IBM"  , ,: "Personal Computer"   ,:  ,,: ()(,)()  ,,: ()" BALL "()6  ,,: ()(, )()k$  ,,: ()" Version 1.10 "(). ,,: ()(,)()8 ,: ,,: "(C) Copyright IBM Corp 1981, 1982B ,: ,,: "Press space bar to continue"L "" LVCMD$ 7` CMD$ "" VSj CMD$ () lt CMD$ " " v~ V SEG (( ) 0) 0 SEG:   P:: , "HOLD IT!"  "YOU'RE NOT USING THE COLOR/GRAPHICS MONITOR ADAPTER!"H "THIS PROGRAM USES GRAPHICS AND REQUIRES THAT ADAPTER."q "PRESS THE SPACE BAR TO CONTINUE."{ SEG "" CMD$  CMD$ ""  CMD$ ()  CMD$ " "         "p16"  - ,, "THIS PROGRAM REQUIRES ADVANCED BASIC -- USE COMMAND 'BASICA'": ,,: I (#::   ,: SAMPLES$"YES" "samples", : ,,:: "mfl32t067" AZ: B(): A()&: ,: ,: : (,d), ,M (,d),,f (,Z)(,n),A: (,)(+,),,B (,)(,L,),,B , :" Press ESC to exit "; X  B(X)(((Xz })X)) : L: Y2# (,)(,),,BF= (,)(,),,BFW (,)(,),,BFe D "SD:ED, XS E D6YB(X): N(Y2): "L=L;T255;N=N;": F (X2,Y2),A@ (X,Y),A: X2X: Y2Y: F: JL(L) @:'OA$: A$() JT j,: A$"" O : ,Y2),A@ (X,Y),A: X2X: Y2Y: F: JL(L) @:'OA  The IBM Personal Computer Comm  Version 1.10 (C)Copyright IBM Corp 1981, 1982  Licensed Material - Program Property of IBM8  Author - M. C. Rojas^ : ,: (: ,: : j,v I  : I,"": : AZ: FALSE: TRUE FALSE: XOFF$(): XON$(): :T:ECH$"" SEG: (( ) 0) 0 P:T:MODE$"b": SEG: ( I  : I,"":a , T:"F1 = 40 COLUMN F2 = 80 COLUMN"k SEG "com1:",: SEG( :  T) "COMMUNICATIONS MENU"2 ,T: "Choose one of the following:"< , T: "1 Description of program"-F  T) "2 Dow Jones/News Retrieval"TP  T) "3 IBM Personal Computer"nZ  T) "4 Series/1"d  T) "5 THE SOURCE"n  T) "6 Other service"s  T) "7 End program"x : ((T): ,T,: "choice"; zA$: A$"" z+{ (A$) LT(A$): H| MODE$"b" LT: Z}B$(A$,,)~ (B$); (:T::  : (B$)< P:T::  : LT:  zh LT :  T) "- COMMUNICATION ENDED -": : (LT LT LT)  : LT :  :: (LT LT) FL: : T) "Invalid choice, try again" FL I  : : : ((T):FL: x: , T: "USER DEFINED LINK": LT ,T: "TO ANOTHER IBM PERSONAL COMPUTER". ,T,: "BAUD RATE ";: : SPEED$B$[ ,T,: "PARITY ";: : PARITY$B$ ,T,: "NUMBER OF BITS PER CHARACTER ";: :BITS$B$ ,T,: "NUMBER OF STOP BITS ";: : STP$B$ ,T,: "CHARACTERS ECHOED TO SCREEN (Y/N) ";: : ECH$B$W  ,T,: "Data entered correctly (Y/N) ";: :CR$B$~ CR$"N" CR$"n"  :  ,:COMFIL$"COM1:"SPEED$","PARITY$","BITS$","STP$ COMFIL$ AS #  LT NM$"Series/1": : "com1:300,e,7,2" AS 1U LT NM$"Dow Jones News/Retrieval": : "com1:300,e,7" AS 1 LT NM$"THE SOURCE": : "com1:300,e,7" AS 1 "SCRN:" OUTPUT AS # ,,PAUSEFALSE: "B$: B$"" @J, (B$) ((B$,,))D  : @ : B$() ,(),: " ";: ,(),x6 #,B$;: ECH$"Y" ECH$"y" #,B$;@ () "J () PAUSETRUE:#,XOFF$;TA$$((),#)h I (A$)!r (((A$,I,)) (A$,I,)( )) (A$,I,)() J| (A$,I,)( ) (A$,I,)" "\ (A$,I,);d Ix () " PAUSE PAUSEFALSE:#,XON$; " j,: : :  0 D :  ,T: "THIS PROGRAM REQUIRES THE": T) "ASYNCHRONOUS COMMUNICATIONS ADAPTER.":   :  ,,: "A DEVICE TIMEOUT ERROR HAS OCCURRED.": "MAKE SURE THE HARDWARE IS CORRECTLY": "SET UP, THEN PRESS ENTER.";: : :A$"":B$"":CR$"": A$( )A$: A$""  : (A$) ((A$,,))D  : : : A$() A$;: : ,(),: " ";: ,(),:B$(B$,,(B$)) A$( ) A$() B$B$A$:: , T: NM$::: T) "- Place your call, and insert the"9 T) " phone receiver into the modem, or"k T) " switch your data set from talk to" T) " data. Then press ENTER to begin. ": :  T) "- PRESS F10 TO GO TO MENU": : ,T: "DESCRIPTION"4 ,T: "An asynchronous communication link"b& T) "will be established between the"0 T) "selected service and the": LT) "IBM PERSONAL COMPUTER, as follows:"D ,T: "Baud rate"; T)"300"N T) "Parity";T)"E""X T) "Data bits";T);"7\b T) "Stop bits";T);"1 Dow Jones, THE SOURCE"wl T) "2 Series/1"v ,T: "Options 3 and 6 allow for the above" T) "characteristics to be supplied by" T) "the user to define a communication"A T) "link to other services or computers."W MODE$"b"  ,T: "You can select 40 column display or" T) "80 column display by pressing F1 or" T) "F2 before selecting menu choice." ,T: "PRESS ANY KEY TO GO TO MENU";;CR$: CR$""  :  T) "F2 before selecting menu choice." ,T: "PRESS ANY KEY TO G and 6 allow for the above" T) "characteristics to be supplied by" T) "the user to define a communication"A T) "link to other services or computers."W MODE$"b"  ,T: "You can select 40 column display or"LL