home *** CD-ROM | disk | FTP | other *** search
•'… –•+JJJJ ¿Ö?©\Ö>≠˛mˇç˛Æˇ0ΩMÖ=Œˇ≠˛Ö'Œ˛¶+l> Ó˛Ó˛ â˛ ì˛ /˚¶+l˝ d'∞© ®ç]6ë@≠≈5L“&≠]6ÓΩ5–Óæ5© ç]6LÑ:çº5 ®& Í"L}"†±B–»¿–˜†±Bô§5»¿ –ˆLª&¢ˇé]6–ˆ 6 éÈ7é˜7©ç¯7çÍ7≠‡7ç·7©çÏ7©çÌ7¨Á7àåÒ7©çÙ7äJJJJ™© ù¯ùx ì7¢ˇöéÎ7L»? â˛L≠Á78ÌÒ7ç·7≠Á7çÒ7ŒÒ7©çÏ7©çÌ7©çÙ7 ì7≠Á7ç˛6i çÒ7© ç·78Èçˇ6çÌ7 ì7` ≠Â7¨‰7 µ7¨Ì7à†ÍÍŒÏ7åÌ7ŒÒ7Œ·7–fl`x =∞(`(8`≠º5çÒ7© ç7≠˘5IˇçÎ7`© ®ëB»–˚` Ë7 6` ˚7 ` Ôÿ ¢ †à±>J> <J> <ô ;ˇVêÌ¢ ò–Ë¢UΩ <)?ù < ı`8Ü'éxΩç¿Ωé¿0|≠ <Ö&©ˇùè¿ å¿Hh͆Hh π8à–¯©’ ∏8©™ ∏8©≠ ∏8ò†V–π <Yˇ;™Ω):¶'ùç¿Ωå¿à–Ε&ÍY ;™Ω):Æxùç¿Ωå¿π ;»–Í™Ω):¶' ª8©fi ∏8©™ ∏8©Î ∏8©ˇ ∏8Ωé¿Ωå¿`Hhùç¿ å¿`† ¢V 0˚π ;^ <*^ <*ë>»ƒ&–Î`† àaΩå¿˚I’–ÙÍΩå¿˚…™–Ú†VΩå¿˚…≠–Á© àÑ&ºå¿˚Y :§&ô <–ÓÑ&ºå¿˚Y :§&ô ;»–Óºå¿˚Ÿ :–Ωå¿˚…fi– ÍΩå¿˚…™\8`†¸Ñ&»–Ê&ÛΩå¿˚…’–ÍΩå¿˚…™–Ú†Ωå¿˚…ñ–Á© Ö'Ωå¿˚*Ö&Ωå¿˚%&ô, E'àÁ®–∑Ωå¿˚…fi–ÆÍΩå¿˚…™–§`Ü+Ö*ÕxS© Ö&≠xÖ'8Â*3∞IˇÓxêi˛Œx≈&ê•&… ∞®8 Ó9π: :•' Ò9π : :Ê&–√ :≠x)*+™ΩÄ¿¶+` ¢ –˝ÊF–ÊG8È–`0($ p,&" ñóöõùûü¶ß´¨≠ÆØ≤≥¥µ∂∑π∫ªºΩæøÀÕŒœ”÷◊Ÿ⁄€‹›fiflÂÊÁÈÍÎÏÌÓÔÚÛÙıˆ˜˘˙˚¸˝˛ˇÆ_*‡ ¢ é]6`©ˇç˚ç ¿ç¿L/˚≠Ω5çÊ5çÍ5∫éõ3L3 òôú†°¢£§•®©™ ∞±∏¿¡¬√ƒ≈Δ«»… à –—“ ‘’ !ÿ"#$%&'(‡·‚„‰)*+Ë,-./012Ò345678¯9:;<=>? 8Ωç¿Ωé¿0^©ˇùè¿›å¿Hh √< √<ùç¿›å¿Íà–©’ ’<©™ ’<©ñ ’<•A ƒ<•D ƒ<•? ƒ<•AEDE?HJ>ùç¿Ωå¿h ™ ‘<©fi ’<©™ ’<©Î ’<Ωé¿Ωå¿`HJ>ùç¿›å¿hÍÍÍ ™ÍÍHhùç¿›å¿` ÑHÖI†å¯†å¯†±H™†—HäH±H™hHëHΩ鿆Ω忛忖ˆà–¯h™Ωé¿Ω忆Ωå¿HhHh鯛忖à–ÓΩ⿆±Hô6 »¿ –ˆ†±<ÖG†±H†—HëH(† jêΩä¿∞Ωã¿f5(– † :à–˙Ư†±H Z>(–§G†à–˝ÊF–˜ÊG–Û† ±HZ…Xj∞ 8†0åxƯ D9ê$ŒxÛ≠xH©` ï>Œ¯(©ç¯© Z>h Z>Lº=§.Ãx ≠xHò ï>hŒ¯– h©@(LH>9LØ>†±HH•/†ëHh≈/© –·†±H®π∏?≈-–ó(ê ‹8∞é(¢ Ü& ¬8Ư$8†ëHΩà¿` *8ê©∞ÓH†±<jhê k>Nx`Ö* é>πx$50π¯çx•*$50ô¯ôxL†9äJJJJ®`H†±Hjf5 é>h $50ô¯ôx`†±HÖA©™Ö>†V© ÖDôˇ;à–˙ô ;à–˙©P ï>©(ÖE•D Z> ?©∞$©0çx8Œx D9∞ı•-–Ò ‹8∞ÏÊD•D…#ê”ê†ëH8Ωà¿`© Ö?†Ä–§E V<∞k *8∞fÊ?•?…êφÑ?©0çxô®?à˙§E á? á? á?HhÍà–Ò D9∞#•-©≈E•EÈÖE…∞8` D9∞ ‹8ê Œx–Ò D9∞ •-…– ‹8êåŒx–Î8`§-π®?0›©ˇô®?Δ? •D– •E…êÂΔEΔE` ì˛≠Å¿≠Å¿© ç ‡ v:LD7çc*çp*çq*` ['å∑*` ~.Æõ3ö #∫éõ3© LÖ3LÑ ©øÖA¢ Ü@† °@Ö&òE&Ö&òA@Å@≈&–»–ÔΔA–„•A)flÖCÜB°BHÖ&òE&Ö&òA@ÅB≈&– »–Ô§ChLQhÅB§A»å} 8òÌ~ ç| 8Ìz ùç ≠z ç © çI7©ÑçH7¢ Ü@Ω) ®Ω* ÖALì±@m ë@»–ÊA»–ÊA•A›, êÁò›+ ê·äi™Ï( êÀ¢ éú3ΩZ Ö@Ω[ ÖA¢ °@ 鯧/¿–±@Õz ê Õ{ ∞m ë@8•/e@Ö@© eAÖAÆú3›] êÕ•@›\ êΔäi™ÏY êØ©?ÖA¨} àÑC© Ö@ÖB®±@ëB»–˘ŒÄ ΔAΔC–ÓLT $ V X Z d f l p x | ~ Ä ¡*˝*‰7Ë7Ó77 Ñ Ñ(˝*ó3]6‡7V<fl< 8:i:î: =®?»?ˇ? @ # #¸˝˝˝¸˝¸¸¸˛˛¸˛¸¸˝˛¸ˇ¸˝¸¸¸ˇ¸ˇ¸˛ˇˇˇˇ˝˛¸˝¸¸¸¸˝¸˛˛˛¸˝ˇ¸¸¸˛¸˝¸¸¸˛¸˝¸¸¸˝¸˝˝¸¸¸˝˝¸˛¸¸˛¸¸˝˝¸ˇ˛¸ˇ¸¸˝¸˝˛¸¸˝¸ˇ¸˛ˇˇˇ˝¸˛˛¸¸˛¸¸˛¸˛¸˛˛¸˛˛¸¸˛¸˝˝” Å Ω u*ì*`* ª5Í " . Q ` p N%$ñ#–$Ô$b"p"t"È"%≈%%‹%¢"ó"Ä"m%2"<"("-"P"y%ù%0#\#ç#|"6ËÂ$„„ ‡‡ 6ËÂ$„„ ‡‡¸$¸$eÿ ‡<‘Ú‘%%gÑ < Ú ≠È7JJJJçj*≠Í7çh*≠ ‡I –ç∂*¢ Ωa ùU –˜Lº ©@ç∂*¢ Ωk ùU –˜8∞≠∂*–© – ©L ≤% Q(© ç^*çR*(jçQ*0l^ l\ ç∂*¢ Ωw ùU –˜¢ Ωì*ùu* ˜≠±*çW* ‘'≠≥* H ù&h† ë@ ['≠_*– ¢/ΩQ ù– ˜≠S çÛI•çÙ≠R çÚ©–≠b*ç_*LÄ!`Lø LÑ L˝*Lµ7≠ ¨ `≠¬*¨¡*`LQ(ÍÍLY˙LeˇLXˇLeˇLeˇeˇ — ≠Q*H≠\*ë(h0L&& Í §$©`ë(≠≥* Ç&©çR* ∫ ∫ ç\*éZ*L≥ l8 — ≠R* ™Ω HΩ H≠\*`ç\*éZ*å[*∫ËËéY*¢ΩS*ï6 ¯`Æ∑*Lx ÆQ*…øu≈3'¢éR*Õ≤*– éR* é]*Æ]*ù Ëé]*…ç–uLÕ …ç–}¢ éR*L§ ¢ éR*…ç≠≥*g–^H8≠≥*– ^&hêÏÆZ*L …ç–©çR* &Lô Õ≤*Ö…äÒ¢éR*–·© çR*%© ç∑* Q(L‹$≠ Õ≤* ©çç ¢ éZ*©@–©–© -^* ∫ ≈ ç\*å[*éZ* Q(ÆY*ö≠\*¨[*ÆZ*8`l6 ©çL≈ †ˇå_*»åb*Ó_*¢ Ω Õ≤*–Ëé]* §!)YÑ(» hê( πÑ(–÷≠ Õ≤*L§ ≠…ç– ['Lï Lƒ&_*¨_* ^&ê ©9 )©L“&¿–Ñ3© 9 )a ï §! ê0L jLY ì!ôu*»¿<êÛ ì!–˚(–¨_*©9 ) † –À≠ì*…†≠u*…†–K¨_*©¿9 )?L †<©†ôt*à–˙`çu*© 9 )' π!∞ ®–‡∞¨_*©9 )‡∞Œê ä–©L“&Lƒ&© çe*çt*çf*çl*çm* ‹?≠]* §!– …ç–˜Æ_*≠e* )] )–ìÆc*vçc*é]*–‹¢ ›@) –¯∂ΩJ)0Ge*çe* éd* π!∞¢≠d* ®•E– •DŸU)êå•EŸX)ê –É•DŸW)ê–ı≠c*–îòJ®•Eôg*•Dôf*LË H©Äe*çe*h)t*çt*–Èú Ä!LÉ [' Æ!≠_*™Ω HΩ H`Æ]*Ω …çËé]*…¨` ì!˙…†˜`© †ô∫5à–˙`© ÖDÖE §!…§<(LŒ! §!–¶D•E`8È∞0!… ∞ ˛!eD™© eE® ˛! ˛!äeDÖDòeEÖEêœ8`D&E`( §!≈8È∞0Ó… êÈ0Ê…∞‚¢ ˛! –˙DÖDL"•DLï˛•DLã˛≠^*t*ç^*`,t*P » ©pMt*-^*ç^*`© ç≥*•DH #hçW*L‘'© ™" d'† òë@`©–© ™"LÍ"© –ˆ≠ çΩ5≠ çæ5© çc* »"LÍ" £" å&–˚Lq6© L’#©çc*≠l*– ≠m*–©çl*≠l*çΩ5≠m*çæ5 Í"•E–L»&ÖA•DÖ@ C' N' '≠c*çª5L®&≠u*…†% d'∞: ¸"LÍ" Ø'–© ç≥*† òë@ N'©çª5L®& í'– ö' Ø'ˆ ™'Ò ¸"L#`© -e*… L © ’#≠s*¨r* ‡#≠m*¨l* ‡#≠s*¨r*Lˇ# ®"©-¬5…L–&© ’# z$™≠e*)–ér*ås* z$Ær*¨s*Lq$ ]# Q(lr*≠∂* •÷LÃ&© ’#8•ØÂg®•∞Âh ‡#•h§gLˇ#© ’#8•L ®•MÂÀ ‡#•À§ Lˇ#ç¬5H ®"hLƒ'å¡5å√5ç¬5©çª5©çº5 ®&≠¬5ç√5L®&å√5çƒ5©LÜ6 ®&LÍ"L–& # ®"©#-¬5ç¬5≠∂*(© ±$ z$eg™òeh≈t∞pÖ∞ÖjÜØÜi¶g§h q$ Q(l` © ±$ z$8•LÌ`*™•MÌa*êE®ƒKê@>ÑÀÜ é√5åƒ5L $≠ ç√5≠ çƒ5© ç¬5©ç¡5©çª5©çº5 ®&≠a*ç¬5®≠`*ç¡5` Í"LÃ&Õ¬5Æ_*éb*JLû%¢ Ωu*ùì* ˜Lz%`≠∂*ç∑* $ » Q(lX •JÖÕKÖÕlV $ » Q(lV e÷Ö3ÖÿL“◊ eÖ3ÖÿL‘ &%©çR*LÉ &%©çQ*LÉ d'ê £"L4% N'≠e*)¢Ωn*ùΩ5 ˜© çª5 ®&`©@-e*≠f*–©˛çf*≠ çº5© ™"Ló#© ™"≠ø5çf*`©L ≤%.© ç∂*† ó ¢ Ω∑*ùt* –˜©¿çQ*L—$© ≤%©L“&© ç∑*LÑ Õ ‡çÄ¿Õ ‡çÅ¿Õ ‡` £"≠O*ç¥*≠P*çµ*≠u*ç≥*– d'ê £"LÎ% N'≠e*)≠n*–Æo*Œo*Œn* å&8…ç–˜Â` ^&∞f≠\*ç√5©çª5©çº5L®& ^&∞N©çR* å&– ¸"©ÕR*Œ©L“&…‡ê)ç\*ÆZ* Ω Äù L≥ H≠∂*¶v˶3‡›h`•Ÿ0˘h8` ¸" ['L≥ ù& N'©–°©çª5©çº5 ®&≠√5`≠µ*ÖA≠¥*Ö@` +ê≠≈5…L^6Lí6Í i:¢ é√5`© – © –©–©ç\* Ê?≠∂*•ÿ0¢ 'Æ\* ' » Q( ^&Æ\*©∞lZ l^ Ω?*™éc*Ωq)H Ä ≈ Æc*ËhÌ`≠f*çø5≠h*ç¿5≠j*ç¡5≠ ç√5≠ çƒ5•@çO*•AçP*`† πu*ë@à¯`† ±@ô©5»¿&–ˆ`† åQ*åR*`© ÖE í'Ls' ö' ™'– •@ÖD•AÖE–φ ±@Ÿu*–„àˆ`8`≠ Æ – †%±@ ™à±@ÜAÖ@ä`† ±@`≠≥*≠¥*≈@–≠µ*≈A `M¬5 ) Í"L–&`8≠ Ö@≠ ÖA≠W*çc*† òë@† 8•@È-ë@H•AÈ »ë@™ hH»ë@ä»ë@™ hH»ë@»äë@Œc*™h8È&»ë@HäÈ »ë@ÖAhÖ@LÂ'H© »ë@»ë@≠∂* hÖtÖphÖsÖo`hÖMÖÀhÖLÖ `•9Õ çV*•8çU*≠ Ö8≠ Ö9•7Õ çT*•6çS*≠ Ö6≠ Ö7`INI‘LOAƒSAV≈RUŒCHAIŒDELET≈LOCÀUNLOCÀCLOS≈REAƒEXE√WRIT≈POSITIOŒOPEŒAPPENƒRENAM≈CATALO«MOŒNOMOŒPR£IN£MAXFILE”F–IN‘BSAV≈BLOAƒBRUŒVERIFŸ !p†p°p†p p p p p` " t""#x"p0p@p@Ä@Ä @p@ !y q q p÷ƒ”Ó¬¡√…œ@ ¿†ê ˛ ˇ ˇ ˇ ˇˇçLANGUAGE NOT AVAILABL≈RANGE ERRO“WRITE PROTECTEƒEND OF DAT¡FILE NOT FOUNƒVOLUME MISMATC»I/O ERRO“DISK FULÃFILE LOCKEƒSYNTAX ERRO“NO BUFFERS AVAILABL≈FILE TYPE MISMATC»PROGRAM TOO LARG≈NOT DIRECT COMMANƒç $3>L[dmxÑò™ª »≈ÃÃœ†††††††††††††††††††††††††††††††††††††††††††††††††††††††Ñ ¡––Ã≈”œΔ‘Ë7ª3ª4 @~3!+,W,o,*-ó-Ó,ı,9,-ç.-~3~3â,ï,Ü,í,~3~3Ω,…,∫,Δ,~3‡ ¢é_*∫éõ3 j.≠ª5…∞ ™Ω *HΩ…*H`Lc3 (+L3 ‹+©ç„5Ææ5≠Ω5–‡ –ËçË5éÈ5 …1ê^éú3Æ_*Ω )Æú3J∞≠Q*…¿–L_3Ls3© ùË4©ùÁ4éú3 D2Æú3ù«4ç“5ç‘5≠Ò5ùΔ4ç—5ç”5≠¬5ù»4 70 / ÷7 :/Æú3©ç≈5ΩΔ4ç—5Ω«4ç“5Ω»4ç¬5çˆ5ΩÁ4çÓ5ΩË4çÔ5éŸ5©ˇç‡5ç·5≠‚3ç⁄5L^/© ™ù—5ˇ-–¯≠ø5Iˇç˘5≠¿5ç¯5≠¡5 ™é˜5©ç˙5` / 4/ √2©-’5! ˜/© 08Œÿ5–˜ÆŸ5≠Ó5ùÁ4≠Ô5ùË4 70L3 (+≠ˆ50+≠Ω5ÖB≠æ5ÖCÆú3 2 70L3≠º5…∞ ™ΩÊ*HΩÂ*H`Lg3L{3≠ˆ50¯≠º5…∞Ó ™ΩÚ*HΩÒ*H` 3 ®,ç√5L3 3 µ1 ®,H ¢1† hëBLñ, ∂0∞ ±BH [1 î1h`Lo3 3≠√5 ⁄,L3 3 ¢1† ±B ⁄, µ1L ,H ∂0hëB©@’5ç’5 [1Lî1©Äçû3–© çû3 (+Æú3Ω»4)û3ù»4 70L3 3L3 (+ ∂0∞ÔÓ‰5–ˆÓÂ5L- (+Æú3Ω»4L{3Æú3ΩΔ4ç—5ùÊ4©ˇùΔ4º«4å“5 70 ^/∞* /† åú3±B0 H»±B®h â-¨ú3»»–Á≠”5¨‘5 â-8∞— ˚/L38 ›2© ¢ù5 ˙` ‹+©ˇç˘5 ˜/©çù3 /. /.¢ ΩØ3 Ì˝ ˜ÜE≠ˆ7ÖD B. /. /. 0∞]¢ éú3ΩΔ4S0J††Ω»4†™ò Ì˝Ω»4)† ∞à–˙πß3 Ì˝©† Ì˝ΩÁ4ÖDΩË4ÖE B.©† Ì˝Ëˈ ΩΔ4 Ì˝Ëàˆ /. 02êß∞ûL3©ç Ì˝Œù3– ˝©çù3`†© H•DŸ§3ê˘§3ÖD•EÈ ÖEhi HLG.h ∞ Ì˝à€` /† å≈5±Bô—5»¿-–ˆ` /† π—5ëB»¿-–ˆ` ‹+© X0≠˘5Iˇç¡3©çÎ3©çÏ3¢8© ùª3Ë–˙¢ ‡å†π†3ùÛ3Ëàˆ‡D–Ï¢H–Ë ˚/¢ äùª4Ë–˙ E0©¨3ààçÏ7çº4åΩ4»åÌ7© X0¨Ω4à0–ÏòÊ ¬7 J7L3¢ ¢–¢Ω«5ÖBΩ»5ÖC`,’5p` ‰/© R0©ø-’5ç’5`≠’50` K/© R0©-’5ç’5`≠…5ç7≠ 5çÒ7Æ”5¨‘5` 4/ K/ /(∞ Æ—5¨“5Lµ/†±B™»±B®Lµ/≠ª5…8` D2†ëBHà≠Ò5ëBH :/ ÷7†≠fi5ëB»≠fl5ëBh™h®©–©é”5å‘5 R0†±Bç‹5m⁄5çfi5»±Bç›5m€5çfl5` ‰/©LR0¨À5≠Ã5å7çÒ7Æ÷5¨◊5`©–©¨√*å7¨ƒ*åÒ7Æ˙5† LR0 E0(∞¨Ω3ƺ3– ƺ4–8`¨Ω4éó3åò3© R0` E0Æó3¨ò3©LR0≠≈*ç7≠Δ*çÒ7`éÏ7åÌ7çÙ7…–’5ç’5≠˘5IˇçÎ7≠˜5çÈ7≠¯5çÍ7≠‚5çÚ7≠„5çÛ7©çË7¨¡*≠¬* µ7≠ˆ7çø5©ˇçÎ7∞`≠ı7†… †…†òLÖ3≠‰5Õ‡5–≠Â5Õ·5f /≠Â5Õ›5ê –≠‰5Õ‹5ê≠Â5Õfl5ê–≠‰5Õfi5ê ^/ê◊`8≠‰5Ì‹5 i ® /±B–≠ª5…8` 41L 1ç÷5»±Bç◊5 ‹/≠‰5ç‡5≠Â5ç·5 /¨Ê5`åù3 D2¨ù3»ëBç◊5à≠Ò5ëBç÷5 / ÷7©¿’5ç’5`ÆÍ5éΩ5ÆÎ5éæ5ÆÏ5¨Ì5éø5å¿5Ë–»ÃÈ5–ÏË5– ¢ † ÓÍ5–ÓÎ5éÏ5åÌ5`ÓÊ5–Ó‰5–ÓÂ5`¨√5ƃ5ÑBÜCÓ√5–Óƒ5`¨¡5–Ƭ5Œ¬5Œ¡5`L3 ˜/≠√5ÖB≠ƒ5ÖC©çù3© çÿ5Óÿ5 0∞Q¢ éú3ΩΔ4 0"† ËË˱B›Δ4– »¿ –ÛÆú3` 02ê€∞œ¨ù3–¡¨ù3–Ô† ËË˱BùΔ4»¿ –ıÆú38`≠ú3i#™‡ı`© ¨ù3–óLw3≠Ò5!Œ50¢>Ò5 –˙êÓÓ5–ÓÔ5≠5`© çÒ5© çû3 ˜/≠Î3mÏ3 ÕÔ3ê©ˇ– ≠û3–7©çû3çÏ3içÎ3çÒ5® ®¢πˆ3ùÒ58© ôˆ3à –ÓêΩ ˚/≠3ç5–âLw3≠Ò5–`H ˜/¨5h ›2© çÒ5L˚/¢¸~ˆ4Ë–˙»Ã3–Ú ®¢ΩÒ5ˆ3ôˆ3à –Û`≠Ω5çÊ5çÍ5≠æ5ç‰5çÎ5© çÂ5†™≠Ê5J∞äê≠Â5mË5çÂ5ämÈ5jnÂ5n‰5nÊ5à–€≠ø5çÏ5mÊ5çÊ5≠¿5çÌ5m‰5ç‰5êÓÂ5` ©–"©– ©–©–©–©–LÌ?Í© –≠≈5ê8ç≈5© ÖH ~.(Æõ3ö` ˇˇ d‘…¡¬”“¡¬†≈Õ’Ãœ÷†À”…ƒ ˛¸˛¸¸˛¸¸˝ˇ¸ˇ¸¸˝¸ˇ˛¸˝˛¸¸˝¸ˇ¸¸ˇˇ˛¸¸z¸¸¸˝¸¸˛¸ # ˇ˝¸¸˝¸¸˝˝¸˝˛¸˛ˇ¸˝˛¸˛¸¸˝ˇ¸ˇˇ˝ˇ¸ˇ¸¸˝¸¸¸˝¸ˇ¸¸ˇˇ˝˝¸˛˝¸¸˛¸¸¸¸˛˝˛¸¸˛˝¸¸¸¸˝¸¸¸˝¸˝˛ˇ˛˝ˇ¸¸˛˛¸˛˝¸˝˝¸ˇ¸¸˝¸˛¸¸˝¸¸¸˝¸ˇ˝˛ˇ˛˝¸¸ˇˇ¸¸˝¸¸˝¸˛˝˛ˇˇ˝˝¸¸˝¸˝˝¸¸˝ˇ¸˝˛ˇ˛˛˛¸˝¸¸ˇ¸˝ˇ¸˝¸¸˝˛¸¸ˇ¸ˇ¸˛ˇ¸¸ˇ˛˛˛ˇ¸¸¸¸ˇ¸¸˛¸¸¸¸˛˝˛˝¸ˇ˝¸¸˝¸˝ˇ¸˝¸¸¸˝¸˝˝¸¸¸ˇ¸¸˝¸¸¸˛¸ˇ¸¸ˇˇ˝ˇˇ˛ˇ˝¸˛¸¸¸¸˛˛˛¸˝¸˛¸˛¸¸ˇ¸¸¸˝¸˝˝¸¸ˇ¸˝˝ˇ˝˛¸˝˝¸˛ˇ¸˝ˇ¸ˇ˛˝˛¸¸˝¸˝˛¸¸¸¸ˇ˝¸ˇ¸¸¸¸ˇ¸¸¸˝¸¸˝¸˛ˇ˛¸¸¸ˇ¸¸¸¸˝¸¸¸¸¸˝˛˛˝˛˝ˇ¸˛˛¸˛˝¸˝˝˛ˇ˛¸ˇ¸ˇ¸¸˝¸¸ˇ¸ˇˇ¸¸¸˝¸˛¸¸˝¸˛¸˛¸˝¸¸˝¸˛˝˝¸¸¸¸¸˝ˇˇ¸˝˝¸¸˛¸¸ˇ¸¸˛˝¸˛˛¸˝¸¸ˇ˝˝ˇ¸¸ˇ¸˝˛¸¸ˇ¸ˇ¸¸ˇ¸¸˝¸˛˝¸¸¸¸¸˝¸˛˛˛˝˛ˇ˛¸¸¸¸˝¸¸¸˝¸˝˛˝˝˝¸¸˝ˇ˝¸˝˝˝ˇ¸¸¸¸¸ˇ¸¸¸¸¸ˇ¸¸ˇˇ˛¸¸˛¸¸ˇ¸˛¸˛¸¸¸¸˝¸ˇ¸¸¸ˇ¸¸˝¸˛˛ˇ¸˝ˇ¸˛˝¸˝¸˝˛ `ø ±ÁË˵OÖ⁄µwÖ€¥Nò’v∞ ±⁄ Ì˝»LÓ©ˇÖ’`Ë© ïxw8ıOïPL#ˡ Á•œ–(•Œ` 4Ó§»…0∞!¿(∞ L ¯ 4ÓLd¯F¯` ≥Û…∞ Ö%L"¸†wL‡„†{–˘ T‚•⁄–•€–L~ÁŒ&œ&Ê&Á•Ê≈⁄•Á€ê ÖÁ•ÊÂ⁄ÖÊÊŒà–·`ˇˇˇˇˇˇ ÁlŒ 4Ó≈»êªÖ,` 4Ó…0∞±§»L¯ 4Ó≈»ê•Ö-` 4Ó…(∞õ®•»L(¯ò™†n ƒ„ä® ƒ„†rLaÒ ?ÚŒ&œ0˙∞‹–≈Œ∞÷` Á±Œî©‰Æ• G¢°¥0≠©§#≠©§g¨¨°£ÚßÙ∏•¥ MÃgåhå€gõhõPåcåQà)ÑăWqàqåàÆ≤£≥qà£≥°qàÆ•¨hÉhùqà`u¥ØÆuçuãQà∏§Æ≤ϧ∞Û¢°Óß≥‰Æ≤Ε•∞Qà9Å¡O/ Qà)¬ ÇWåjåBÆ•®¥`Æ•®¥O~ 5å'Qà ã˛‰Ø≠Ú؉ư‹fiú›úfi›û√›œ ÕÀ Gö≠•≠بgö≠•≠©®Ó°≠`å Ø¥µ°Ú¨£˜•Æ`å ¨•§Óµ≤`Ƶ≤ÓØ£Â∂°≥‰°Ø¨z~ö" `øˡˇˇP O¿Ù°‰Ø≠Ú؉ư•¥≥Ô¥Ó•®¥\Ä @`ç`ã ~å3 `øGÉÆ©gÉ≤∞£°≤¥y∞≥§i∞≥§Â£°≤¥ØÆy∞≥§ØÆi∞≥§ØÆØ∞Ù≥©¨`å ¥≥©¨ @â…Gùhù X{g¢°¥∂g¥°åÆ©¨∂g¥°åÆ©¨®gå¥Ø¨∞gù≤بأgå•´Ø∞ÙÆ©≤∞'¥Æ©≤∞(¥Æ©≤∞d¶©gØ¥Øßx¥•¨k≠•≤g¢µ≥ØßÓ≤µ¥•≤~å9¥∏•Æg∞•¥≥'Ø¥ù≤ض7¥µ∞Æ©(¥µ∞Æ©*¥µ∞ÆÛÒÛÙæ≥≤∑∂7‘œœ†ÃœŒG”ŸŒ‘¡XÕ≈Õ†Δ’ÃL‘œœ†Õ¡ŒŸ†–¡“≈ŒS”‘“…ŒGŒœ†≈ŒD¬¡ƒ†¬“¡Œ√H±∂†«œ”’¬S¬¡ƒ†“≈‘’“N±∂†Δœ“S¬¡ƒ†Œ≈ÿT”‘œ––≈ƒ†¡‘ ™™™ †≈““æ≤µ5“¡Œ«Eƒ…M”‘“†œ÷ΔL‹“≈‘Ÿ–≈†Ã…Œ≈ç?FŸêL√˶œö¶Œ†ç–†ô ƒ„ÜŒ∫Üœ fÛÑÒ©ˇÖ» ÖŸ¢ © ë‰ÊŸ¶Œ§» ÖŒ»π …Ä“I∞… ∞»»Ñ»π Hπˇ† ÁhŒ…3– oÁLˇˇflB ÚÏáo≠∑‚¯TM…ÖÇ"3J[NSJIfmzqˇ# [∂Àˇˇ˚ˇˇ$ˆNYP;ˇ#£o6#◊ " ä´#ˇˇ!0 ƒ ¡∫9@†0 §”∂º™:Pyÿÿ•<ˇ[(ƒ N > ¶∞ ºΔWå'ˇ]5Kg‡·vq…ˡˇËÒÛÔÔ„„ÂÂÁÁÓÁÁ‚ÔÁÁÚÚÚÁÚÚÚ‚ÛˇË·ËËÔΡˇ‡ˇˇÔÓÔÁÁÛˇËÁÁÁË·‚ÓÛ‚‚ˡˇ··ÔÓÁËÓÁÛ˚˚Ó·ÔÁËÔÔÎÈËÈÚËËËˡËËËÓÁËÔÔÓÔÓÔÓÓÔÓÓÓ·Ëˡ‡‡‡ÒÚÚÒÛìÁ Ë §˚πœïüπø† Á ÇÁ YÁ Á§˚•ŒYoπÖ‹πèÖ›æüπØ–áΔ˚`†T•˚…öÊ˚®µPô@µxLàÚ` Á§˚•Œôø•œôœ©ô_© ôo•‹ô•›ô蕇ôü•·ôØ` ´??¿¿<<<<<<<0¿√ˇU ´´ˇˇUˇˇUœœœœœˇUΔΔΔUœœUUˇˇU ´W™ˇŒ§œÚ ÁµPÖ⁄µxÖ€•Œë⁄»•œLÚ`hh$’ é˝F’`†ˇÑ◊` ÕÔ©%Ö÷àÑ‘Ë`• §À–Z†A•¸…∞^®Ê¸•‡ô •·ô•‹ô •›ô0 Á mÂê†7–;•‰§ÂÖ‹Ñ›i껢ˇÜŸöևѷ .† yÊ$ŸI† •‹q‹§›ê»≈L–—ƒM–Õ†1FŸL‡„†J•¸˜Δ¸®π Ö‹π/Ö›æˇ π®äLuˆc ƒ„†±‹™»±‹ ÂL≥‚Δ˚†[•˚ƒ®µPŸ?–µxŸO–Èπ_Ö⁄πoÖ€ Á lŒ ʇ–Ê·±‡`îw 0ïP`†fL‡„† µPÖŒµ†ÖœµxÖœ±ŒH»±ŒÖœhÖŒàË` JÁ Áò Áï†≈Œ–≈œ–ˆP` ÇÁ YÁ Á$œ0 ` Á•œ–•ŒÛ©ˇ Áï†$œ0È Áò8ÂŒ ÁòÂœP#† ê oÁ Á•ŒÖ⁄•œÖ€ Á•Œe⁄ Á•œe€p›ï†` 4Ó®–LÀÓàLÙÛ•$ ®»–ı»–ı∞˘` ±Á Á•œ ©≠ Ì˝ rÁPÔàÑ’Üœ¶Œ ¶œ` Á•ŒÖˆ•œÖ˜àѯ»© ÖÙÑı` Á•–”† »±‡0˚I@˜òiHe–®•—i Hƒ ÂÀ∞≥ÑÃhÖÕh®© àë–àë–à•Õë–à•Ãë–à© ë–à0󱇖˜•J§K–¨±–…@∞öïüòiHe– Á ˇÊà–˙òe—ïxh$ÿ0 ®© Áïx±–ˆx»–˜ © Ö‘Ö’¢ H† ±‡ 0µ ˇÊ Á ˇÊï†$‘ ˇÊ∞Ê…(– •‡ Á•·ïx$‘0 © Á© ïxˆx ˇÊ0˘∞”$‘…∞–F‘®Ö÷πÄÈ)U Ö◊h®πÄÈ)™≈◊∞ òH ÎÛ•÷êïπ ÍÖŒπÄÍÖœ ¸ÊLÿÊhΔ˘–ÚÖÚÜÛƒÒ–fi§…»ÑÒ ‰h®•Û∞©† ãÖÛÜڢ܅©∞Ö˘•Ú›cÂ•Û˝hÂêÖÛ•Ú˝cÂÖÚÊ˘–Á•˘Ë …∞Ö…$…0•˙ Ì˝$¯ô » ¡` dË '• ÖÊ•ÀÖÁË•ÁÖ•ÊÖ‰≈L•ÂÂM∞&†±‰ÂŒ»±‰Âœ∞† •Êq‰ÖÊêÊÁ»•ŒÒ‰»•œÒ‰∞ `F¯•LÖ •MÖÀ•JÖÕKÖÕ© Ö˚Ö¸Ö˛© Ö `•–Lk„†ˇÑÿ»±‡0…@–hÖÿ—–Ò±–»J–˙±–H»±–®hÖ–Ñ—≈Ö◊ƒÕ˛0)»Ü»òH¢ °˛™JI@˛…¿êË»–Ûh®äL¯ÚÊÒ¶Òºù `¶»©†Ë› ∞˙±˛)?J–∂Ω ∞i?…êoiO… êi¶˝»±˛)‡… zµ®Ö»µ—ÖÒà±˛ ˙à∞8 05¥XÑˇ¥ÄË⁄≥…~∞" †)îħˇîX§»î®§Òî—) ®πóÒ ®©v*Öˇ–»»Ü˝±˛0Ñ–†L‡„…∞√J¶»ËΩ ê…¢ …flÜ» ‰»à¶˝±˛à œ¥XÑˇ¥Ä˱˛)ü–ÌÖÚÖÛòHÜ˝¥–Ñ…© Ö˘¢ »π )eÚHäeÛ0 ™‡ôÕ à–¯ ä„•Ò»…®ë‡• Ò‡Ö‰•ÀÈ Ö•‰≈ÕÂÂÕêE• Ò‡ÖÊ•ÀÈ ÖÁ± ëÊÊ –ÊÀ•‚≈ •„ÂÀ∞‡µ‰ï ˘±‡®à±‡ëÊò–¯$¯ µ˜uıï˜Ë˜~ †–q Á•‚ÖÊ•„ÖÁ u•‚Ö‰•„Ö– Á m•ÊÖ‚•ÁÖ„† • ≈‰•ÀÂÂ∞•‰–ΔÂΔ‰•Ê–ΔÁΔʱ‰ëÊꇕÊÖ •ÁÖÀ` Ì˝»π Î0˜ ÄLÌ˝ò™ u˝ä®©flô ¢ˇ``† ”Ó$Ÿ0L∂‚LöÎ*i†› –S±˛ 0à±wêh(∞VP`®±ŒÖ‰h®(∞Û±⁄≈‰–̈OˆM∞◊ ◊·L6Á T‚Œ&œê•Êe⁄ÖÊ•Áe€ÖÁà Ê&Á‰L~Á•Ê Á•Áï†Âê(LoÁ©UÖ [‚•ŒÖ⁄•œÖ€ ÁÑÊÑÁ•œ  oÁ Á†` lÓ≈ˇÊ3† Œ„Δ3` 4ÓJ G¯ 4Ó®±&(êJJJJ)† Áî†àÑ◊`ˇˇˇˇ ”Ô é˝FŸ©æ ‡† Ñ˙$¯ ¶ˆ•˜ ©† Ì˝¢ˇö Œ„ÑÒäÖ»¢ 뉕»i Ö‡© ™iÖ·°‡)…∞LɈ±·ïP’xê†+L‡„ 4Ó’PêÙ ‰ÔïxL#Ë 4ÓÁ8È` ·ïPıxL·†–÷ ·ËµPÖ⁄eŒH®µxÖ€eœHƒ ÂÀ∞„•⁄i˛Ö⁄©ˇ®e€Ö€»±⁄ŸÃ –òıhë⁄ôà à˜Ë`Í†Ä–ï© Á†îx ÁÜÿ™Ê3 QÛΔ3ä¶ÿïxµQÖŒµyÖœËË º·µN’v∞ˆN®±Œ¥Pƒ‰ê†É–¡ë⁄ˆPêÂ¥Päë⁄L#ÚµQÖ⁄8ÈÖ‰µyÖ€È Ö† ±‰Â⁄Ö‰`µSÖŒµ{ÖœµQÖ⁄µyÖ€Ëˈ îxîPµM’uHµO’L‡ L≥‚Ö3LÌ˝`ä) #©†Ö‰LÌ˝© ≈$∞ ©ç† Ì˝©†à–¯† ±‚Ê‚–Ê„` Á v•‚≈Ê•„ÂÁ∞Ô m‡L;‡• Ö‚•ÀÖ„•LÖÊ•MÖÁ–fi Á m•‰Ö‚•ÂÖ„∞«Üÿ©†Ö˙ *‡òÖ‰ *‡™ *‡  ‡Ñ˙™ È•‰– ‡ä Ì˝©% ‡™0ıÖ‰…–¶ÿLé˝HÑŒ¢ÌÜœ…QêΔœÈPH±Œ™à±Œ˙‡¿∞‡ 0Ú™hÈ–È$‰0 ¯Ô±Œ™)?Ö‰i† Ì˝à‡¿êÏ ‡h…]§…(–äû ÏÒä§ q¯® „L∏fi…◊È H™ ± ‡œê ªfi {› æfi l›h™•°H•†HäH ¯Êh®äHL?fl ≤fih®π‹œÖëπ›œÖí ê Lj›••ù– •••ù–† ,†L„ m›∞•™ %¶Ö¶©•† ≤ΙL∞fl© ÖΔâ ÊÖùÜûÑü•®§© Êܮѩ™8Âù©ê¶ù©ˇÖ¢†ˇË» –¶¢0ê ±®—ûÔ¢ˇ∞¢Ëä*%©LìÎ ˚Ê ˚L„ æfi™ Ëfl ∑ –Ù`¢ ∑ ÜÖÅ ∑ }‡∞L…fi¢ Ü܆‘œ†À≈≈–†Ÿœ’“†”»¡–≈†◊…‘»…Œ†¡†±∞ÿ±∞)a(«“…ƒÆ††«œ…Œ«†œ’‘”…ƒ≈†‘»≈†«“…ƒ†◊…ÃÃ)l a(√¡’”≈†¡Œ†≈““œ“†…Œ†¡‘‘≈Õ–‘…Œ«†‘œ†”√¡Œ†)a(‘»≈†”»¡–≈†…Œ†Ã…Œ≈”†∑∞µ†¡Œƒ†∑±∞)S(»…‘†“≈‘’“Œ†‘œ†¬≈«…Œ†)&ÿÿ@L"! ÿƒq± Ÿƒq± gÿhŸÿ≈qÿƒŸ≈qŸƒ " M6π®3# o≤ a(’Ω’–††ƒΩƒœ◊Œ††“Ω“…«»‘≈†–“œ«“¡Õ)a(«…÷≈”†…Œ”‘“’√‘…œŒ”†Δœ“†”¡÷…Œ«†…‘¨†¡”†)H a(◊≈ÃÆ¡”†‘»≈†¡ƒƒ“≈””†œΔ†‘»≈†”»¡–≈†Δœ“†)a(’”≈†…Œ†Ÿœ’“†œ◊Œ†–“œ«“¡ÕÆ)j ca(≈Œ‘≈“†”‘¡“‘…Œ«†¡ƒƒ“≈””†…Œ†ƒ≈√…Õ¡Ã)a(®“≈√œÕÕ≈Œƒ≈ƒ∫†≤≥∞¥†”‘¡“‘”†”»¡–≈)S(¡‘†»≈ÿ†§π∞∞©†∫)'Ãœ√”‘qÃœ√ ]_ KM6π®oµ a(‘“Ÿ)P≥ a(ºº†…Œ√Ã’ƒ≈”†¡’‘œ≠Ãœ¡ƒ†ææ)Z ca(‘»…”†–“œ«“¡Õ†¡ÃÃœ◊”†Ÿœ’†‘œ†’”≈†‘»≈†À≈Ÿ≠)a(¬œ¡“ƒ†‘œ†√“≈¡‘≈†Ãœ≠“≈”†«“¡–»…√†”»¡–≈”Æ)0 ca(’Ω’–††ƒΩƒœ◊Œ††“Ω“…«»‘††ÃΩÃ≈Δ‘††ΔΩΔ…Œ…”»)0 ca(Ÿœ’†√¡Œ†‘’“Œ†–Ãœ‘†œŒØœΔΔ†¬Ÿ†–“≈””…Œ«†–Æ)W ca(¡Δ‘≈“†≈Œ‘≈“…Œ«†‘»≈†”»¡–≈¨†‘»]†™™†Ã…Œ√œÃŒ¨†Õ¡””†∞±∑∑≥†™™ ]†™™†√œ–Ÿ“…«»‘†±π∑π††††††™™ ]†™™†¡ÃÆ“…«»‘”†“≈”≈“÷≈ƒ†™™ ]†™™™™™™™™™™™™™™™™™™™™™™™™™$ ]†ºº†÷≈“”…œŒ†±Æ±†¡’‘œ†Ãœ¡ƒ…Œ«†ææ a()–‘q± x M6π®oµ P¥ a(™™†Ãœ◊†“≈”œÃ’‘…œŒ†”»¡–≈◊“…‘≈“†™™)o∂ P¥ a(†ºº†÷≈“”…œŒ†±Æ±†ææÖ ' d≤à e∞ d≤Õ e± d∑J e∞ d∑K e± ' a(Ñ)E(¬Ãœ¡ƒÃœ◊†“≈”†”»¡–≈†¡””Ÿ†Ã¡Œ«)1 K]†…Œ”≈“‘†√œŒ‘“œÃ≠ƒ†¬≈‘◊≈≈Œ†—’œ‘≈”†…Œ†Ã…Œ≈†≤ ]†™™™™™™™™™™™™™™™™™™™™™™™™™ ]†™™†Ãœ◊≠“≈”†”»¡–≈◊“…‘≈“†™™ ]†™™†Õ…√“œ≠”–¡“√†…Œ√Ɔ†††™™ ]†™™†–ƜƆ¬œÿ†≥≤µ††††††††™™ ˆˆˇˇ ì ÁeÁÁÁ µ Ö µÖ`• ï •ï`• Å † Ñ ˆ –ˆ`° Ö † Ñ̆ f˜° ® f˜° Ö Ñ† Ñ ` &˜° ÖL ˜ ˜•Å L ˜ f˜• Å LC˜µ –÷÷ `† 8• ı ô •ıô òi Ö `• u Ö •u† È• ˜• ˜∞± àe Ö òe Ö `∞Ï` ™µË` ™µ0·` ™µ ÿ` ™µ –œ` ™µ 5Iˇƒ` ™µ 5Iˇ–π`¢ f˜° Ö f˜° Ö `L«‡– ߡ•?ËÜ5¢àÜ= …•D 5… ∞¶5 ÄÖDÑ4π …ª…ç–ÄL\ıπ »…†¯` }Ù•¯…é–ı$˘ •˚Ê˙–Ê˘`© Ö˘Ö˙`ˇˇˇˇˇˇˇˇLíıÑXÜWÖVhÖY∫ËËΩ `§X¶W•YH•V(` JˇhÖ hÖ òˆLíˆÊ –Ê ©˜H† ± ) ™JQ Ü JJJ®π·ˆH`Ê –Ê Ω‰ˆH• J`hh ?ˇl ± ïà± ï ò8e Ö êÊ `˘ùû%Ø≤GπQ¿/…[“Ö›n3ËpˇˇˇˇÈÅJ–§?¶>–à äÂ:Ö>»òÂ;–k§/π= ë:௠¸ ¸ –¯ S˘Ñ;Ö:Lïı æˇ§4 ߡÑ4†à0KŸÃˇ–¯¿–Ë•1† Δ4 ˛Lïı•= é¯™Ω ˙≈B–Ω¿˘≈C– •D§.¿ùà≈.üΔ=–‹ÊDΔ5÷§4ò™ J˘©fi Ì˝ :ˇ©°Ö3 g˝ «ˇ≠ …†»…§íà ߡ…ì–’ä“ x˛©Ö= 4ˆ Èæ…¬ê¡ ¢ &B&C ¯Δ=Ù‰¢ 4ˆÑ4›¥˘– 4ˆ›∫˘Ω∫˘…§§4à&D` ˇˇˇˇî†L#ˆ Ì˝»±⁄0¯©ˇÖ’` 4ÓÜÿ ã˛¶ÿ`¢µ˘uıï˘ ˜`Û 7Ù$˘ §ÙÊÛ8¢î˚µ˜¥Ûî˜ïÛ –Û`©éÖ¯•˘…¿0 Δ¯˚&˙&˘•¯–Ó` §Ù {Ù•Ù≈¯–˜ %ÙPÍpꃕ˘ ʯu¢˙vˇË–˚` 2Ùe¯ ‚Ù ÑÙê %ÙàıFÛêø8¢© ı¯ï¯ –˜≈ 2Ù¯ ‚Ù8¢µıı¸H ¯¢˝hêï¯Ë–¯&˚&˙&˘˜&ˆ&ı∞ à–⁄æÜ˚Ü˙ܢ∞0hhê≤IÄÖ¯†`˜LıL¿‰†LH‰Ë©–⁄Ë•xÖ‹•yÖ›•P§QLuË©–ΔµP’xêLhÓ®µQÖŒµyÖœ±Œ† ËË ÁLÙ 4ÓÜÿ)™ ˚¶ÿò† Áî†` u˝äHΩ …É–L‡ Ûh™` Ä‚ò™ TÛä®` Á•œò Áî†`Ö—•ŒÖ– Á•ŒÖ“•œÖ”© Á––Δ—0flΔ–•“† Á•”ï† "‚LòÛ 4Óiˇ` ±ÁF’`ÜŸö .LÉË 4ÓÜÿ ï˛¶ÿ`˛$Ÿ‡Üÿ$†LÚ$Ÿ’Üÿ$†L,Ú† LˇÊ® é˝ò8Â!∞ˆÑ$ Ì˝»–Ò©ΩLÌ˝ë⁄˵ü0L’Û†0•‹§› }Ò …Ò¶ÿL∑ÒË˵ü L‡Û0•‹§› }Ò …Ò¶ÿL ÙË` ÁÊŒ–Êœ` [Ú– SÚ– ÇÁ oÁP ÇÁ YÁVPL6Á …ÔO …Ô5OïPÌL…Ô Á§˚•Œô_•œLfÈôPà0Qπ@’P–ˆπP’x–ÔΔ˚πAô@πQôPπ¡ô¿π—ô–πaô`πqôpπÅôÄπëôêπ°ô†π±ô∞»ƒ˚êø`Ë© HµP8ÈÖŒµxÈ Öœh† ëŒË`…Ö∞€∞’•Œ–•œ•⁄Ö •€ÖÀ ,Ò ˝˛¶ÿ` :ˇLÒ†ŒÑ<»Ñ>† Ñ=Ñ?`µ ï<¥Lî> ı•>–Δ?Δ>`Üÿ8¢ˇµMıÀïœË˜ Ò Õ˛¢ ,Ò© œ˛¶ÿ` ƒ„L:ˇ•¸–L•ËΔ¸`©ˇÖ†`F†`$†©£ Ì˝†±‹™»±‹ ©†LÌ˝•‹§›`¡ —뜌≈öòçñïìø≤2º∞¨æ5 a0 ›˚† «Á©†LÌ˝ §J•KHƒ⁄€∞ hÑ–Ö—†ˇ»±–0˚…@˜»»±–Hà±–®h–›h† ±–0J©§àL ‡† цÑJÑL©ÖKÖMÊM±LIˇëL—L–IˇëL—LÏL≠ÂLyÒ 2Læ˶‡•·¨ ¿¿É–Ï,¿ÜPÖQ•‹Öx•›ÖyL√ˡˇ ÁÜÿ¢˛8µ–ïʵNı–ï‹Ë–ÛêK µÀïÁı€ïÂËıê •Ã≈‰•ÕÂÂêLk„±Êë‰Ê‰–ÊÂÊÊ–ÊÁ•Ê≈L•ÁÂMêÊ¢˛µÊïNµÃı‹ïÃË–Û¶ÿ`±L댕Œ–ΔœΔŒ•L–ΔMΔL≈ •MÂÀê‰∞– Á§Œ¿ •œÂÀ∞¶ÑJ•œÖKL∑ÂÜÿ Ò ˝˛¢ˇ8µMıœï€Ë˜êá•Ã≈⁄•ÕÂüLÁ 4Ó•ŒÖ»` Á•»ëŒ` lÓ•ŒÖÊ•œÖÁLD‚ ‰ÓL4· ‰Ó¥xµPi˛∞àÖ⁄Ñ€eŒïPòeœïx† µP—⁄»µxÒ⁄∞ÄL#Ë Á•N Á•O–≈Ni )ÖO•O i@ &N&Oà–Ú•Œ Á•œï†Lz‚ Á§ŒƒJ•œÂKê ÑL•œÖML≠ Á§ŒƒL•œÂM∞ÑJ•œÖKêËLÀÓˇˇˇˇˇˇˇˇ q·LøÔ Ó©ˇÖ»©Äç ` 6ÁË 6ÁµP`© ÖJÖL©ÖK©ÖML≠Â’x–L· ∑ÂL6Ë ∑ÂL[ˇĖ´820 /´850 4íA:ì(J…L) 2,Y &RÇJ ,W± 4ÑM–N GâR%((P 80)»C)–L WéíA:ìC 2,P 2 c¢C–C»1:± ÖË≤ ** ERASE THREADING ERROR ** õÌC–C…1:A–0:L–0:N–M ªÚíA:ÅPI–0¡14«2:ì(C 2),PI:ÇPI Ô˜ÅPI–0¡560«80:R%(PI»C)–0:ÇPI:≤ ERASE TABLE ENTRY L–1:A–3:´122(TN)œ–10ƒFG–1 N≈≠HHœ–75ÕIV–0ƒHH–0:IV–1:≤ 1ST WRAPAROUND AND INVERSE PRINTING }Δ≠HHœ–75ÕIV–1ƒHH–0:IV–0:≤ SECOND WRAPAROUND ¢«í3:X–(TR%(TN)…1)»70:Z–X…70:Y–Y»2 ± ÅN–X¡Z«…10 √À≠T%(N)–1ƒ∞800 –ÇN ”’´701 ‰ L–”(NÀ10) 80 Ú%ÅJ–L¡L»79 *≠R%(J)–1ƒ:´701 d¿≠TR%(TN)—1ŒTR%(TN)œ10ƒ¢23:∫"THE LIMITIS 10 TREADLES.. REENTER.":ÅII–1¡350:ÇII:TN–TN…1:´701 π¡≠TNœ–79ƒTN–79:∫"80 LINES ALLOWED";:Ñ"HIT RETURN TO GO TO OPTIONS LIST";XX$:´1100 ÿ¬HH–HH»2:≠FG–1ƒHH–HH»1:FG–0 Ï√¢21:ñHH:≠IV–1ƒû ƒ∫TR%(TN):ù:≠TR%ÅPI–ST¡TN &îπ36,HT:∫TR%(PI);:HT–HT»2 <ôÇPI:¢19:∫:HH–HT:± ɺó:¢24:∫"55= ERASE LAST THROW 99= OPTIONS LIST";:¢20:∫:≠TNœ1ƒ∞650 ≈ΩTN–TN»1:¢23:å…868:∫"ENTER TREADLE #";:ÑTR$:TR%(TN)–Â(TR$):¢21 ⁄æ≠TR%(TN)–99ƒ1100 ø≠TR%(TN)–55ƒ∞1900:TN–TN…2:HH–HH…26ƒP–2 ≠N–5ƒP–3 ≠N–4ƒP–4 ,≠N–3ƒP–5 9≠N–2ƒP–6 F ≠N–1ƒP–7 L!± iX≤ ** WEAVING ROUTINES ** wbY–20:´700 °äHT–0:≤ ** REPRINT TREADLE SEQUENCE ** ≤ã≠TN—–20ƒST–1 å≠TNœ20ÕTN—–40ƒST–21 ‚ç≠TNœ40ÕTN—–60ƒST–41 Ûé≠TNœ60ƒST–61 ˚è¢21 ê r± `/?≤ r$≤Ó ‰ƒÿq6µ `ÿ-…r ÿ%ƒÿqµ _≤¯ÓƒŸq6± `Ÿ-…r Ÿ%ƒŸq± 0¯‘ÿqÿ-…rƒÿ‘ŸqŸ-…rƒŸ`‘ÿ ∞ ‘ÿ≥' %‘ÿqÿ-…r`‘Ÿ ∞ ‘Ÿ≥' %‘ŸqŸ-…r `=‘ÿ>‘Ÿrπ $¥ê,f¥ iÿ-…rjÿ-…r± kŸ-…rÿ-…rq‘ÿŸ-…rq‘Ÿ fπ iÿ-…rjÿ-…r± kŸ-…rf√Ã*`‘ÿÿ ‘Ë`7‘…Õ≈$≤–‘…Õ≈q‘…Õ≈± 7Úo≤ P± a(†)G`‘…Õ≈±%P± b8‘…Õ≈≥ r∂< E(∫)G.¸`8‘…Õ≈≥ r ∂< ± %a(∞)Gb8‘…Õ≈≥ r ∂< G ¬¬q∞ 3œ`‘…Õ≈ ± π % q.?6±–?r.?6±–?r.?6±–?r.?6±–?r–…q/?Ãr`…$¥ê’œ¬q∞ ¬¬q.?6±ü?»r± *⁄ƒÿq∞ ƒŸq∞ …q/?µéŸq–Ÿ`=ÿ>Ÿr¥ $≥∏ òiÿjÿ± kŸf¥ ¢iœÿjœÿ± kœŸœŸqŸf√Ã*¨`7–¡””$±Ëf”÷√gÃÿhßÃÿq8Ãÿ± r ¥( &∂”÷√q=Ãÿ>ßrf√ÃgÃÿhß`Ãÿ∂ $πÁ?¿`ÿÃÿ ŸÃŸ%–¡””q∞ `–¡””$±ËΔÖœ”qΔÖœ”∏ Ÿ‘«qŸ‘«∏ ¬q± ¬¬q¬_±ËÁÿ-± rqÿŸ-± rqŸ_≥∏ %Ÿ‘«q∞ Dvo≤ P≥$ a(††)GP≥$ `ΔÖœ”±d %b∞ G`ΔÖœ”±d %b±d ΔÖœ”GÄiÿjÿ± kŸf¥ *äiœÿjœÿ± kœŸœÿqÿf√Ã`ΔÖœ”±e $≤ N º–ƒq2?»r7 `–ƒ µ2 %–Ÿq≥! `–ƒµ2 –ƒ ≤» %–Ÿq≤ `–ƒ≤» %–Ÿq∑ 3Ñ`–ŸŸ$π¨`8–Ÿ∑ Ÿ≥! r 8–Ÿ≥! Ÿ∑ r%–Ÿq≤ ˙ \≤Hq]†‘…‘Ã≈n \≥ }]†ƒ…Õß”» \≥0u]†«¡Õ≈†…Œ…‘”,\≥y]†–ៅŒ«†ΔÃê`–¡””$∑º%ö¬q.?6±ü?»r± ¬q¬¬¬`¬ 7œ¬$∂X&`¬ 7œ¬$∑º`7œ¬ 7¬$∑ºœ¬q∞ _∑ºXœ¬q¬bÿqÿµ `ÿ≥' %ÿq∞ 0l`=ÿ>Ÿr¥ $≥∏ Ÿ‘«qŸ‘«± ΔÖœ”qΔÖœ”± q`Ÿ‘« ∞ :∞4295:B–5:V$–‰(TA):PK–51»B…C…1:∞15 @/Δ´4395:≤ SHUT OFF PRINTER n/«C–(Pœ–10)»(Pœ–100)»(Pœ–1000)»(Pœ–10000):± ê/Ã≤ ** YEAR TO DATE SPENDING ** ∂/ŒÅX–1¡12:TL(X)–0:ÇX:≤ INIT RPT VAR €/—SW–1:∞2250:≤ ** READ YTD FILE ** 0÷F$–"CARD #":∞2000:≤ ** READ CARD"BELOW AVG" 0.¨≠BAL(X,MT)–AV(X)ƒX$–"EQUALS AVG" D.≠V$–X$:PK–70:∞15 U.ÆPK–0:SY–0:ÇX l.∞ÅX–1¡80:∫"-";:ÇX:∫ ã.≤PK–1:V$–"** TOTALS **":∞10 ø.¥P–TL(MT):∞4295:B–5:V$–‰(TL(MT)):PK–20»B…C…1:∞10 ˜.∂P–TL(MT…1):∞4295:B–5:V$–‰(TL(MT…1)):PK–36»B…C…1:∞10 #/∏P–TAX,2):∞4295:B–3 6-ûV$–‰(PC(X,2))»"%":PK–(46»B…C…1):∞10 K-ü≠AV(X)–0ƒ∫:´4270 a-†P–AV(X):∞4295:B–5 É-¢V$–‰(AV(X)):PK–(51»B…C…1):∞10 õ-§P–PC(X,3):∞4295:B–3 √-¶V$–‰(PC(X,3))»"%":PK–(61»B…C…1):∞10 Á-®≠BAL(X,MT)œAV(X)ƒX$–"ABOVE AVG" .™≠BAL(X,MT)—AV(X)ƒX$–∞10: ,è≠BAL(X,MT)–0ƒ4247 4,êP–BAL(X,MT):∞4295:B–5 Z,íV$–‰(BAL(X,MT)):PK–(20»B…C…1):∞10 r,îP–PC(X,1):∞4295:B–3 ö,ñV$–‰(PC(X,1))»"%":PK–(30»B…C…1):∞10 ≤,ó≠BAL(X,MT…1)–0ƒ4255 Œ,òP–BAL(X,MT…1):∞4295:B–5 ˆ,öV$–‰(BAL(X,MT…1)):PK–(36»B…C…1):∞10 -úP–PC(TB ÅX–1¡I…1 ∫Á(34);L$(X) 'ÇX 7∫D$;"CLOSE" f≠RV$–"B"ƒ±:≤ RETURN TO CALL FROM LINE 1067 } ∫D$"IN#0":∫"END":Ä ûXX–0:≤ *** READ DISK FILE *** ∏Z∫D$;"OPEN TFILE-";ST$ “]∫D$;"READ TFILE-";ST$ ŸbÑI ·dÑSL ÈfÑTB ÙqÅX–1¡I vå768,L$UBROUTINE $.≠MU–2ŒMU–3ŒV–3ƒ∫Z:´305 +/∫I H1ÅKK–1¡SL…1:∫Á(95);:ÇKK:∫ `6≠SL—41ƒCC–‚(37):¢CC Ç;≠SLœ–41ÕSL—–80ƒCC–‚(37)…1:¢CC ú@≠SLœ80ƒCC–‚(37)…2:¢CC ¢E± ¥Ù≤ ** WRITE ** Œˆ∫D$;"OPEN TFILE-";ST$ È˘∫D$;"WRITE TFILE-";ST$ Ú˛∫I…1 ˙ ∫SL ∫Á(7)ƒ1300:≤ CTRL G GETS THE EDIT OPTIONS LIST f ≠K$–Á(19)ƒ290:≤ CTRL S LOCKS/UNLOCKS CAPITAL LETTERS Ñ ≠K$—Á(32)ƒLL–LL…1:FL–FL…1 ôX$–X$»K$:LL–LL»1 •FL–FL»1 œ"≠LLœ–SL…7ƒ∫Á(7);:≤ END OF LINE BEEPER ÿ'´105 ,≤ SET UP TEXT ENTRY SCREEN FORMAT SGGERS UNJUSTIFIED END-OF-LINE X‹ ≠K$–Á(20)ƒÅX–1¡TB:∫S$;:X$–X$»S$:FL–FL»1:LL–LL»1:Ç:´105 íÊ ≤ *** BUILD IN SPACES BETWEEN WORDS AND SENTENCES *** Ÿ ≠K$–" "ÕX$—œ""ÕÈ(X$,1)—œ" "ƒA$(N)–X$»S$:X$–"":LL–LL»1:FL–FL»1:´104 Ë˙ ≠UC–1ƒUC–0 ˜ˇ ≠XS–1ƒUC–1 -≠K$– R™ ≠K$–Á(8)ƒN–N…1:FL–FL…(„(X$)»„(A$(N))):LL–LL…(„(X$)»„(A$(N))):ñFL»1:X$–"":´105 Ç¥ ≠K$–"@"ƒ500:≤ '@" KEY TO TRIGGER DISK SAVE íæ ≠FL–40ƒFL–0 –» ≠K$–Á(13)ƒ800:≤ RETURN KEY TO TRIGGER END OF LINE SPACING “ ≠K$–Á(25)ƒA$(N)–X$:X$–"":´950:≤ CNTL-Y TRI"A= ";A;" B= ";B;" "; 1 â ÅL–1¡5:∫Á(A);Á(B);:ÇL:∫ < å ÅR–1¡2 P é ∫" K":≤ CTL I K [ è π36,30 g ë ÅP–1¡20 r ñ ∫Á(X); y õ ÇP ù ∫ å † ≠R–1ƒX–B ì • ÇR û ß ∫Á(10) ™ ¥ ä0:´100 I ¨! ≤ * ASCII OVER-PRINT DEMO * 7 ≤ * MICRO-SPARC * = ó ≤d ∫"THIS PROGRAM OVER-PRINTS TWO ASCII ":∫"CHARACTERS OF YOUR CHOICE. ENTER THE":∫"ASCII DECIMAL NUMBER FOR EACH." ‘i Ñ"ENTER 'A'";A:Ñ"ENTER 'B'";B ‹s X–A ÔÇ ä1:∫Á(2);Á(30) ˙Ñ π36,30 á ∫ "TREND ANALYSIS FOR THE MONTH OF ** ";MO$(MT);" **":∫ C+ÖXM–4:XP–2 ≤+Ü∫"ACCOUNT DESCR'";:∫¿8)"CURR MO";:∫¿XP)"% TOT";:∫¿XM)"LAST MO";:∫¿XP)"% TOT";:∫¿XM)"AVG MO";:∫¿XP)"% TOT"; …+à∫¿XM)"CUR VS. AVG" ‡+äÅX–1¡80:∫"=";:ÇX:∫ Ï+åÅX–1¡24 ,éPK–1:V$–NM$(X):):≠TL(MT)œ0ƒPC(X,1)–”((BAL(X,MT) 100)ÀTL(MT)) c*y≠TL(MT…1)œ0ƒPC(X,2)–”((BAL(X,MT…1) 100)ÀTL(MT…1)) j*zÇX ñ*{ÅX–1¡24:≠TAœ0ƒPC(X,3)–”((AV(X) 100)ÀTA) ™*|NM$(X)–N$(X):ÇX æ*}≠PRTYPE–1ƒ´5200 Õ*~∫D$;"PR#1" ›*∫Á(9);"90N" Û*Ä≠PQ–1ƒ∫Á(2);Á(30) 5+Ñπ36,24:∫()r∞4390:≤ ** ADD CHECKS TO BALANCES ** I)tSW–0:≤ ** SHUT OFF SWITCH ** ¿)wÅX–1¡24:ÅN–1¡MT:AV(X)–AV(X)»BAL(X,N):TL(N)–TL(N)»BAL(X,N):BAL(X,N)–”(BAL(X,N) 100».5)À100:ÇN,X:≤ *CROSSFOOT & SUM* -*xÅX–1¡24:AV(X)–AV(X)ÀMT:AV(X)–”(AV(X) 100».5)À100:TA–TA»AV(XL(X)–0:AV(X)–0:AV(X»12)–0:ÇX:≤ INIT RPT VAR P(jSW–1:∞2250:≤ ** READ YTD FILE ** }(lF$–"CARD #":∞2000:≤ ** READ CARD FILE ** í(m≠BZ–1ƒBZ–0:´4208 ª(n∞4390:≤ ** ADD CR CDS TO BALANCES ** Í(pF$–"CHECK #":∞2000:≤ ** READ CHECK FILE ** ˇ(q≠BZ–1ƒBZ–0:´4212 RPT VARIABLES 3' SW–1:∞2000:SW–0:≤ ** READ FILE ** p'I–R:≠I–0ƒ¢24:û:∫"NO RECORDS IN ";F$:ù:ÅX–1¡1000:ÇX:´4130 Ñ'≠PRTYPE–1ƒ∞5100 °'≠PRTYPE–2ƒSW–1:∞800:SW–0 ¬'"´10500:≤ RETURN TO MAIN MENU ›'h≤ ** TREND ANALYSIS ** +(iTA–0:AV(0)–0:TL(0)–0:ÅX–1¡12:T∫"SYSTEM WILL THEN TAKE OVER AND PRINT ":∫"THE COMPLETE ANALYSIS." m&’Ñ"HIT RETURN TO GOTO NEXT PAGE";X$:ó:∫ ›&ÿ∫:∫"HIT RETURN TO BEGIN.":∫"WHEN YOU RETURN, YOU'LL BE ASKED IF YOU":∫"WANT TO CREATE, OR READ, THE MODEL." \'›∫"IF IT IS YOUR FIRST SESSION, YOUR %'S SHOULD EQUAL 100%.":∫ |%…∫"THEN ENTER THE NUMBER OF NEW HIRES ":∫"PLANNED AND THE MONTH PLANNED TO HIRE":∫"THEM." ˚%Œ∫:∫"TO STOP ENTERING NEW HIRE INFORMATION":∫"ENTER 0 AND HIT RETURN ON THE NEXT":∫"REQUEST FOR NEW HIRE INFORMATION. THE" B&”"SAVE IT ON DISK." ~$ƒ∫:∫"YOU'LL THEN BE ASKED TO ENTER THE":∫"THE NUMBER OF SALESMEN ON BOARD AT THE":∫"START OF THE YEAR":∫ Ô$Δ∫"THEN YOU'LL BE ASKED FOR THE % OF TIME":∫"TO BE SPENT ON EACH PRODUCT YOU HAVE":∫"ENTERED INTO THE SYSTEM" %«∫"THE SUM OF∫"TO ENTER:":∫¿5)"1. PRODUCT NAME":∫¿5)"2. DOLLAR UNITS (1, 100, 1000)":∫¿5)"3. $ SALES VALUE PER UNIT" ß#∫∫¿5)"4. PRODUCTIVITY PROFILES":Ñ"HIT RETURN FOR PAGE 2";X$ $øó:∫"WHEN YOU HAVE COMPLETED THE PROCESS OF":∫"ENTERING THE MODEL, YOU SHOULD THEN":∫ NEXT 20% OF THE SALESFORCE.......":∫"THE NEXT 20%.... ":∫"AND SO ON THROUGH THE 5 PRODUCTIVITY" y"°∫"RANGES OF SELLING" ¸"¶∫:∫"YOU SHOULD ENTER THE NUMBER OF PRODUCTS":∫"YOU ARE MODELING AT THE START OF THE":∫"SESSION. THEN THE SYSTEM WILL ASK YOU" h#∞ Ø •∞i ≈têL-ˇ•gÖ •hÖ •Ö•Ö• Ö• Ö† ± H»± Ö hÖ • … ê›à8© ÂÖ ©@ÂÖ © ëÖB»©@ëÖCà•Ö<•Ö=•ØÖ>•∞Ö?† ,˛òÖ<© Ö=©ˇÖ>©?Ö?òë< ¥¸ê¯• eØÖØ• e∞Ö∞© Ö©@Ö† ±e ëH»±e ëÖhÖ±–Ê` &fi≠RP–2ƒFL–2:F$–"CHECK #":´4100 0&‡≠RP–3ƒ´4200 @&‚≠RP–4ƒ´4300 h&‰≠RP–6ƒFL–1:F$–"POSTED CARD #":´5700 ë&Ê≠RP–7ƒFL–2:F$–"POSTED CHECK #":´5700 ß&Î≠RP—œ5ƒ∞280:´4050 »&∫D$;"RUN TRAC GRAPH ROUTINE" fi&≤ ** LIST FILE ** 'T–0:ÅX–0¡5:CC(X)–0:ÇX:≤ INIT ND ANALYSIS & AVERAGE MONTH" E%æ∫"4 = YEAR TO DATE SPENDING PROFILE" f%»∫"5 = HI-RES SPENDING GRAPH" é%Õ∫"6 = LIST POSTED CREDIT CARD FILE" ∞%œ∫"7 = LIST POSTED CHECK FILE" ‘%“¢15:û:Ñ"ENTER SELECTION :";RP:ù ›%◊∞270 ˛%‹≠RP–1ƒFL–1:F$–"CARD #":´4100 50:SW–0 $Î ∞270 ($Ï ≠X$–"Y"ŒX$–"N"ƒ3055 7$Ì ∞280:´3050 [$Ô ´10500:≤ * RETURN TO MAIN MENU x$†≤ ** REPORT OPTIONS ** Ä$¢â:ó †$™ñ12:∫"** REPORT OPTIONS **" Õ$Ø∫:∫"1 = LIST AND TOTAL CREDIT CARD FILE" Ú$¥∫"2 = LIST AND TOTAL CHECK FILE" %π∫"3 = TRE5:W$(X,N)–‰(WK(X,N)):ÇN,X f#‚ X$–"":I–R:∫"PRINT SORTED LIST ON PRINTER? ":û:Ñ"ENTER 'Y' OR 'N' :";X$:ù Å#„ ≠X$–"Y"ÕPRTYPE–1ƒ∞5100 •#‰ ≠X$–"Y"ÕPRTYPE–2ƒSW–1:∞800:SW–0 ≠#Á R–0 $Í ∫"SAVE SORTED LIST ON THE DISK?":û:Ñ"ENTER 'Y' OR 'N' :";X$:ù:≠X$–"Y"ƒSW–1:∞10"BY ACCOUNT NUMBER" 7"” ≠SR–2ƒA$–"BY CARD/CHECK NUMBER" O"‘ ≠SR–3ƒA$–"BY MONTH" t"’ ≠SR–4ƒA$–"BY DOLLAR AMOUNT":SR–5 É"÷ ≠SRœ5ƒ3010 œ"ÿ ÅX–1¡R:ÅN–1¡5:WK(X,N)–Â(W$(X,N)):ÇN,X:≤ ** CONVERT STRINGS TO DIGITS ** Ô"€ ü:∫"SORT IN PROGRESS":ù:∞22 #‡ ÅX–1¡R:ÅN–1¡* READ FILE ** 6!¬ å…936:ñ8:∫"* SORT ";F$;" RECORDS *" c!« ∫:∫"WHICH FIELD DO YOU WANT TO SORT ON?" À!à ñ10:∫"1 = ACCOUNT NUMBER":ñ10:∫"2 = CR CARD/CHECK NUMBER":ñ10:∫"3 = MONTH":ñ10:∫"4 = DOLLAR AMOUNT" Ú!— ∫:û:Ñ"ENTER YOUR SELECTION: ";SR:ù "“ ≠SR–1ƒA$–"ÅZ–1¡95:∫"-";:ÇZ:∫Á(10) 5@≤ ** PRINT PATTERN ** @B•´2000 XE∫Á(9)"K";:≤ CTL I K gJÅII–1¡TN…1 ÉhX–(TR%(II)…1)»70:Z–X…70 í|ÅN–X¡Z«…10 ∏~≠N—0ƒ∫Á(9);"40N":ä0:Ä:≤ CTL I 40N ÀÅ≠T%(N)–1ƒ∞1800 “ÜÇN Óãπ36,82»TR%(II):∫TR%(II) ˘ç∫Á(10) ïÇIò≠∞ ©¢çq•©≠çr• ß ˜Ø©çù≥ é˝ é˝ ∞∞G¢ éú≥ΩΔ¥=††Ω»¥†™ò Ì˝Ω»¥)† ∞à–˙πß≥ Ì˝©† Ì˝ΩΔ¥©≠ Ì˝©≠ Ì˝©≠ Ì˝LÆ© ÖH`ΩÁ¥ÖDΩË¥ÖE BÆ©† Ì˝Ëˈ ΩΔ¥ Ì˝Ëàˆ é˝Œù≥ 0≤∞ÅêÜ©çù≥ ˝…õ–Ì`†© H•D U ó:: `¿ò®¿ò ∞– à ∞àh Z ¢ Ω0 Ë…$…%…&…'… (… )… *…+… L`ΔLVÊLVÊLVΔLVΔLdÊLdÊLdΔLd© Ö0§• ¯L•Ö0§• ¯L œ ∫D$;"OPENBALANCES" / – ∫D$;"WRITEBALANCES,R0" 6 — ∫0 N “ ∫D$;"CLOSEBALANCES" X ” ´2300 o ∏ ≤ ** SORT SETUP ** ° π H–0:K–0:J–0:V–0:R–0:CM–0:F–0:≤ SORT VARIABLES ƒ ∫ ü:∫"INITIALIZING SORT TABLE":ù Ë ª ÅX–0¡150:ÅYY–0¡5:WK(X,YY)–0:Ç:Ç !Ω SW–1:∞2000:SW–0:≤ * ∫BAL(X,N) $ ÇN,X 0 ) ∫D$;"CLOSE BALANCES" V ` ≤ LIST FILE SUMMARY AFTER POSTING j j ≠PRTYPE–1ƒ∞5100 á t ≠PRTYPE–2ƒSW–1:∞800:SW–0 ® É ´10500:≤ RETURN TO MAIN MENU √ ƒ ≤ ** INITIAL RECORD ** ‰ … ER–‚(222):π216,0:≠ER—œ5ƒ1998 ˝ Œ ∫D$;"CLOSE BALANCES" AD BALANCES" fiÅX–1¡24:ÅN–1¡12 . „ÑBAL(X,N) 7 ËÇN,X P Ì∫D$;"CLOSE BALANCES" \ Ú≠SW–1ƒ± | ¸≤ ** UPDATE YTD BALANCES ** ¥ ÅX–1¡Z:BAL(W(X,1),W(X,3))–BAL(W(X,1),W(X,3))»W(X,5) ª ÇX ” ∫D$;"OPEN BALANCES" Ï ∫D$;"WRITE BALANCES" ÅX–1¡24:ÅN–1¡12K ** " ¢I–S…1:R–0:SW–1:∞1050:SW–0 A ¨≤ CLOSE POSTED RECORD FILE b ∞∫D$;"WRITE POSTED ";F$;",R0" j ≤∫R2 Ö ¥∫D$;"CLOSE POSTED ";F$ £ ≤ ** READ YTD BALANCES ** Æ œ•´2500 ‹ —â:ó:¢10:ü:∫"READING YEAR-TO-DATE FILES":ù Ù ‘∫D$;"OPEN BALANCES" Ÿ∫D$;"RE!W$(DL,1)–" ":W$(DL,2)–" ":≤ ** FLAG FOR LATER COMPRESSING ** H #´2071 b %≤ ** COMPRESS FILE ** n 'N–0:S–0 x (S–S»1 Ç *N–N»1 ê .≠NœRƒ2205 ≤ /≠W$(N,1)–" "ÕW$(N,2)–" "ƒ2090 – òÅX–1¡6:W$(S,X)–W$(N,X):ÇX ⁄ ö´2088 ù≤ ** WRITE COMPRESSED FILE TO DISPOSTED":´2070 A¢18:å…868:∫"DELETED: ";W$(DL,6);" $";W$(DL,5) M R2–R2»1 p ∫D$;"WRITE POSTED ";F$;",R";R2 ∞ ∫W$(DL,1):∫W$(DL,2):∫W$(DL,3):∫W$(DL,4):∫W$(DL,5):∫W$(DL,6) ∏ ∫D$ ˝ Z–Z»1:ÅX–1¡5:W(Z,X)–Â(W$(DL,X)):ÇX:≤ ** TRANSFER TO WORK AREA ** > :∫ 1¢15:∫"WHICH RECORD # DO YOU WANT TO POST?" g¢16:å…868:û:Ñ"ENTER RECORD # OR TYPE 'END': ";DL$ ~≠DL$–"END"ƒù:´2085 ÀDL–Â(DL$):DL$–"":≠DLœRƒ¢18:∫"NO SUCH RECORD. HIGHEST RECORD IS ";R:´2070 ≠W$(DL,1)–" "ÕW$(DL,2)–" "ƒ¢18:∫"RECORD ALREADY L40" %∫D$;"WRITE POSTED ";F$;",R0" 1∫0:R2–0 9∫D$ ]ó:ñ8:∫"* POST ";F$;" RECORDS *" ¶∫:∫"POSTING A RECORD WILL:":∫:∫" - DELETE RECORD FROM ";F$;" FILE" œ∫" - ADD AMOUNT TO Y-T-D BALANCES" ∫" - WRITE RECORD TO POSTED ";F$;" FILE":∫RÇ C \¢22:å…868:Ñ"ENTER NUMBER OR M FOR MENU ";Z$:≠Z$–"M"ƒ°:´1000 c fLF%–Â(Z$):≠LF%œNŒLF%—0ƒ2170 t p≠I%(LF%)–1ƒ± © z¢23:∫Á(7);"BAD ENTRY. PLEASE RE-ENTER";:ñ1:´2140 ∞ »1:LF%–I ÓÇ ¯≠FI%–1ƒ± + ≠FI%œ1ƒ2110 ] ÅI–1¡N:≠Ë(A$(I),L)–IN$ƒI%(I)–1:FI%–FI%»1:LF–I c Ç p ≠FI%–1ƒ± Ä *≠FI%œ1ƒ2110 4∫:∫Á(7);"NO MATCH FOUND. PLEASE PRESS RETURN":Ñ"FOR MENU ";Z$:°:´1000  >ó:ÅI–1¡N:≠I%(I)–0ƒ2130 ˝ H∫I;:ñ4:∫Ë(A$(I),35) 1000 ∞ –ó:∫"PLEASE ENTER AS MUCH OF THE NAME AS YOU":∫"CAN. I WILL TRY FIRST FOR A COMPLETE":∫"MATCH, AND THEN TRY TO MATCH THE FIRST":∫"FEW LETTERS":∫" ":ÑIN$:≠IN$–""ƒ°:´1000 ⁄ ⁄L–„(IN$):FI%–0:LF%–0:ÅI–1¡N:I%(I)–0:Ç ‰ÅI–1¡N:≠A$(I)–IN$ƒI%(I)–1:FI%–FI%TEST 6,B TEST 7,B TEST 8,B TEST 8,B TEST 9 ] < É C TEST 1,C TEST 2,C TEST 3,C TEST 4,C TEST 5 ø Ë∫" ":∫" ":∫"NOW AT SIMULATED MENU. ENTER 1 FOR":Ñ"SUBROUTINE, OR 0 TO END ";Z$:Z–Â(Z$):≠Z–0ƒÄ … Ú∞2000 ı ¸∫" ":∫" ":∫"THE SELECTION WAS ";A$(LF%) ∫" ":´´5 ≤ PROGRAM TO VERIFY SUBROUTINE SELECTION MODULE H ÜA$(25),I%(25) h ÅI–1¡25:áA$(I):Ç:N–25:´1000 …( É A TEST 1,A TEST 2,A TEST 3,A TEST 4,A TEST 5,A TEST 6,A TEST 7,A TEST 8,A TEST 9,A TEST 10 * 2 É B TEST 1,B TEST 1A,B TEST 1A,BTEST 4,B TEST 5,B ÷ß†Δœ“†‘»≈†÷≈“Ÿ†Δ¡”‘†«¡Õ≈)GnR¡@q`¡@9(”)%⁄⁄q≥,v`¡@9(Δ)%⁄⁄q∑K w`¡@9(÷)%⁄⁄q± {`¡@:(”) ¡@:(Δ) ¡@:(÷)$∑l}M6π®\∑Ä_±€>ÄLf∑ i∞ j≥' k∞ i∞ j≥' k≥' l∞ m≥' n∞ l∞ m≥' n≥' ,Öo≤ `–”∞ %a(–“≈÷…œ’”†»…«»†”√œ“≈†Ω)F–”ä÷ (†…”†Õœƒ≈Ã≈ƒ†¡Δ‘≈“†‘»≈†«¡Õ≈)c1ha(”…ÕœŒ°††…†◊…ÃÆΔá”»†Œ’Õ¬≈“”†¡Œƒ†”œ’Œƒ”Æ)cQica(‘»≈Œ†Ÿœ’†Œ≈≈ƒ†‘œ†‘“Ÿ†‘œ†‘Ÿ–≈†…Œ†‘»≈†”¡Õ≈)a(Œ’Õ¬≈“”†…Œ†‘»≈†”¡Õ≈†œ“ƒ≈“ÆÆÆ)+jca(”œ’Œƒ”†”…Õ–Ã≈ø††◊≈ÃÃÆÆƆՆ¡†Ÿ†¬†≈°)kcLlca(‘Ÿ–≈†ß”ß†Δœ“†”Ãœ◊¨†ßΔß†Δœ“†Δ¡”‘¨†œ“)a(ß”†”√œ“≈†œΔ†)F–”`Δ”–”%–”qΔ”"«S(‘“Ÿ†¡«¡…Œø†≈Œ‘≈“†Ÿ†œ“†Œ∫)&¡@Ã`¡@9(Œ)%Q‡LΔ”q∞ “q± XM6π®U…V∞ W≥' a(™)GY…c+]cP± dµ2 e± a(¡––Ã≈≠”…ÕœŒ)dµ2 e≤ˇ 0bcPµ a(√œ–Ÿ“…«»‘†±π∏∞†¬Ÿ†Õ…√“œ≠”–¡“√¨†…Œ√)Ggcdµ2 e± a(¡––Ã≈≠”…ÕœŒ)Gdµ2 e≤ˇ a)5≥`Δ”± Δ” ± %a(Δ¡…“†”√œ“≈†¬’‘†√œ’Ƭ≈†¬≈‘‘≈“°)7∏`Δ”± Δ” ≤ %a(÷≈“Ÿ†«œœƒ†”√œ“≈Ɔ‘“Ÿ†Δœ“†‘»≈†‘œ–°)<Ω`Δ”≤ Δ” ≥# %a(≈ÿ√≈ÃÃ≈Œ‘°†‘“Ÿ†Δœ“†¡†◊»…⁄†Δ…“”‘†√á””°)1¬`Δ”≥" %a(Ÿœ’ß“≈†¡†◊»…⁄†≠†Δ…“”‘†√á””°°°°°°°)Bƒ`Δ”–”%a(Ÿœ’ß÷≈†¬≈¡‘≈Œ†‘»≈†–“≈÷…œ’†œŒ†‘»…”†“œ’Œƒ°)Δ”qΔ”⁄± B•o≤ M6∏da(Ÿœ’“†”√œ“≈†…”†)FΔ”E(†Δœ“†)F“E(†“œ’Œƒ®”©°)“q“± ß`“ ∂ $±©®_±Æ]©S(»…‘†“≈‘’“Œ†‘œ†√œŒ‘…Œ’≈Æ)&ÿ@M6π®o≤ `–”∞ %a(–“≈÷…œ’”†»…«»†”√œ“≈†Ω)F–”Go≤ c_±€0Æ`Δ”± %a(Ÿ’√√ÀŸ†”√œ“≈°†Œ≈≈ƒ†Õœ“≈†–“¡√‘…√≈°∏da(Ã≈‘ß”†ƒœ†…‘†¡«¡…Œ°)dµ2 e≤ˇ yU…V± W¥( f/?± r"z¡q/?∏ r± ¬q/?≥% r± g¡h¬"{¡q/?≥% r± ¬q/?∑ r± g¡h¬"|¡q/?∂ r≥! ¬q/?≥& r± g¡h¬"}¡q/?≥& r± ¬q/?∑ r≥ g¡h¬Y…Å_±‹N§o≤ M6∏da(«œœΔ†’–°°†Ÿœ’†«œ‘†)F⁄± E(†“…«»‘¡-Œr¥ %\¥¬ˇYŒ.@o≤ M6∏ddµ2 e± a(Ÿœ’“†‘’“Œ°)dµ2 e≤ˇ EUŒV± W⁄ J¬-Œrq.?6± @r`¬-Œr ±Ä $±JOd6±?e∞ T`¬-Œr±∞ ± %\≥,Y`¬-Œr±∞ ≤ %\≥^^`¬-Œr±∞ ≥ %\¥êc`¬-Œr±∞ ¥ %\¥¬h`¬-Œr±∞ ¡-Œr$±§rYŒ6wdµ2 e± o≤ M6LOG t W$(X,2),W$(X,3),W$(X,4),W$(X,5),W$(X,6) .˝ÇX A∫D$;"CLOSE";F$ M≠SW–1ƒ± X•´2060 y ∫D$;"OPEN POSTED ";F$;",L40" ô ∫D$;"READ POSTED ";F$;",R0" ß ÑR2:´2065 » ER–‚(222):π216,0:≠ER—œ5ƒ1998 „∫D$;"CLOSE POSTED ";F$ ∫D$;"OPEN POSTED ";F$;",¡-Œrq/?¥ r± [%Ëd∏ e√œÃdµ eÿd∂ eŸd≤e”»¡–≈ÚM≤ ÙM± ˜U…V± W⁄⁄Y…%d∏ e∞ dµ eÿd∂ eŸd≤e”»¡–≈M≤ U…V± W⁄⁄Y…[ €⁄q∞ ‹⁄q⁄± ·UŒV± W⁄¡-Œrq/?¥ r± Î`¡-Œr± %\≥,`¡-Œr≤ %\≥^ı`¡-Œr≥ %\¥ê˙` rD¬4≥ r\∑X_±‹:,”»¡–≈q∞ √œÃq±à ÿq∏ Ÿq± d± eµ2 d± e±d \±Ë[:^”»¡–≈q∂@ √œÃq≤à ÿq≤ Ÿq± d± e±d d± e±d \±Ë[:ê”»¡–≈q±Ä √œÃq≤ˇ ÿq∏ Ÿq≤ d± e±ñ d± e±d \±Ë[:¬”»¡–≈q±¿ √œÃq∂D ÿq≤ Ÿq≤ d± e≤» d± e±d \±Ë[ÙŒ†—’œ‘≈” aƒ@E(¬Ãœ¡ƒ†”…ÕœŒ”»¡–≈”) N¡@"± r⁄q∞ “q± M6π®T d± e±≠ d± e¥0 d± e±¿ d± e±à d± e≤– d± e¥ d± e±Δ d± e± d≤ e≤ ] d≤ e∏ d≤ e≤ d≤ e≤– d≤ e≤ˆ d≤ e±¶ d≤ e± d≤ e∑L d≤ e± d≤ e∞ d≥ eπ` " Œq± O¡4≥˜ ]†™™™™™™™™™™™™™™™™™™™™™™™™™ ]†™™†¡––Ã≈≠”…ÕœŒ†††††††††™™ ]†™™†Õ…√“œ≠”–¡“√¨†…Œ√Ɔ††™™ ]†™™†–ƜƬœÿ†≥≤µ†††††††††™™ ]†™™†Ã…Œ√œÃŒ¨†Õ¡””†∞±∑∑≥†™™ ]†™™†√œ–Ÿ“…«»‘†††±π∏∞††††™™ ]†™™™™™™™™™™™™™™™™™™™™™™™™™. ƒ@p(Ñ)c]†…Œ”≈“‘†√œŒ‘“œÃ≠ƒ†¬≈‘◊≈≈ *"; 0¡39:∫"* àH( (4);"BLO ¿h¯ ` d ó f i ∫ ï n ∫"This disk contains p†¢ äÈ–¸ç0¿Ë‡˙–Úà–Ì` ∏ gazine Volume 1, 1980 and Nibble" ‡ Ç ∫"Express, Volume 1. Enjoy!" ) å ∫:∫"Press RETURN to CATA ¢ Ω Ë…$…%…&…'… (… )… *…+… L`ΔLVÊLVÊLVΔLVΔLdÊLdÊLdΔLd© Ö0§• ¯L•Ö0§• ¯L *"; Ø- ∫"* *"; ‡2 ∫"* 1980 *"; 7 ∫"* MISSION? HIT RETURN";A$:ë:´40 ION? HIT RETURN";A$:ë:´40 8 "IF YOU'VE BEEN PLAYING THE EASY GAME":∫"YOU'RE A WINNER! NOW WE'LL ADVANCE TO":∫"THE HARD GAME":HD$–"H" zƒ ≠TMœPTƒPT–TM Ñ« ´4007 Ɔ°:â:ü:ÅNN–1¡100:∫"** CRASH **";:ÇNN:ù ÿ•ÅNN–1¡250«50:π780,NN:π781,50:å782:ÇNN Ò¶ÅNN–1¡2000:ÇNN:å…936 ßÑ"ANOTHER ì108,68¡112,72:ì108,72¡112,68:± V∏ °:â:ÅNN–250¡0«…15:∫"** WINNER **";:π780,NN:π781,10 sΩ å782:ÇNN:ÅN–1¡500:ÇN:∫:∫ ͬ ≠TMœPTƒó:¢10:ü:∫"CONGRATULATIONS!":ù:∫"YOU'VE BEATEN THE PREVIOUS HIGH SCORE ":∫"OF ";PT;" WITH YOUR SCORE OF ";TM i√ GC–GC»1:≠GC–1ƒ∫:∫¡140,60¡120,60¡120,80¡100,80 Äflì100,80¡100,40¡160,40¡160,60¡200,60¡200,80¡215,80¡215,40¡265,40¡265,130¡220,130¡220,158¡160,158 –‰ì220,158¡160,158¡160,140¡140,140¡140,158¡80,158¡80,120¡60,120¡60,100¡10,100 ˚Óí3:ì106,66¡114,66¡114,74¡106,74¡106,66 Ò0¡168,10¡168,30:ì158,20¡168,20:ì173,10¡183,10¡173,30¡183,30:ì198,10¡188,10¡188,30¡198,30:ì188,20¡193,20 ß’ì10,80¡80,80¡80,100¡100,100¡100,140¡120,140¡120,120¡180,120 ⁄ì180,120¡180,140¡200,140¡200,110¡245,110¡245,60¡235,60¡235,100¡180,100¡180,80¡140,8059¡0,159¡0,0 }—ì70,10¡60,10¡60,20¡70,20¡70,30¡60,30:ì75,30¡75,10¡85,10¡85,20¡75,20:ì90,30¡90,10¡100,10¡100,30:ì90,20¡100,20 Ó“ì115,10¡105,10¡105,30¡115,30:ì130,10¡120,10¡120,30¡130,30:ì120,20¡125,20:ì140,30¡140,10¡146,20¡152,10¡152,30 g”ì158,30¡158,1";‚(218)»‚(219) 256 œÄ 4–≤ ** DELETE RECORDS ** <—Z–0 a’ó:¢10:ü:∫"READING ";F$;" FILE":ù z⁄∫D$;"OPEN";F$;",L40" í‰∫D$;"READ";F$;",R0" ôÈÑR ŒÎ≠R–0ƒû:∫" NO RECORDS STORED IN ";F$:ù:BZ–1:´2050 ŸÓÅX–1¡R ÚÛ∫D$;"READ";F$;",R";X '¯ÑW$(X,1),10500:≤ ** RETURN TO MAIN MENU ?ûER–‚(222):π216,0:≠ER—œ5ƒ1998 R£∫D$;"CLOSE";F$ d§∫D$;"OPEN";F$ }•∫D$;"WRITE";F$;",R0" Ѷ∫0 óß∫D$;"CLOSE";F$ •®R–0:´1040 Œ∫"CHECK APPLESOFT MANUAL PG. 136 FOR ERR":∫"THE ERROR IS #";‚(222):∫"LOCATED IN LINE #250:∞700:M1–170:M2–250:∞700:M1–190:M2–75:∞700 {˛M1–203:M2–75:∞700:M1–230:M2–75:∞700:M1–126:M2–250:∞700:M1–170:M2–250:∞700 ÕM1–190:M2–100:∞700:M1–203:M2–100:∞700:M1–190:M2–100:∞700:M1–230:M2–250:∞700:± ˺π780,M1:π781,M2:å782:± –í3:ì0,0¡279,0¡279,1M—–0ƒå…936:ü:∫¿10)"OUT OF FUEL";:∫¿10)" ":∞4000 B≠X–XOÕY–YOƒ300 ]í0:ìXO,YO:≠NS$–"N"ƒ300 w π780,150:π781,10:å782 è,XO–X:YO–Y:∞100:´210 flÚ≤ THE 500 SUBRTNE SETS UP THE MUSIC. M1=PITCH, M2=DURATION. 700 PLAYS IT. -ÙM1–230:M2–75:∞700:M1–126:M2–)œ.95ƒVV–VV»1 # ≠ÿ(1)—–90ƒVV–VV…1 7Ú X–XO»HV:Y–YO»VV ÖÛ TM–TM…1:¢21:∫¿10)"FUEL LEFT= ";TM:≠TM—100ƒ¢21:å…868:∫¿10)"FUEL LEFT= ";TM ∑ı ¢22:å…868:∫"HORIZ =";HV;:∫¿25)"VERTICAL =";VV Õí3:ìX,Y:≠PT–0ƒ267 ˘ ¢23:∫¿4)"PREVIOUS RECORD SCORE IS: ";PT / ≠TTO INDICATE PRESENCE IN THE MAZE...THEREFORE MUST BE OUTSIDE. [Ø Z–0:±:≤ RESET Z EACH TEST å» X–15:Y–90:HV–0:VV–0:TM–600:XO–15:YO–90:å…936 £“ ≠ÿ(0)œ–165ƒHV–HV»1 π‹ ≠ÿ(0)—–90ƒHV–HV…1 –Ê ≠ÿ(1)œ–165ƒVV–VV»1 ·Á ≠HD$–"E"ƒ240 ˜Ë ≠€(1)—.05ƒHV–HV»1 È ≠€(1ÕX—–200)Õ(Yœ–60ÕY—–100)ƒZ–8 Bñ ≠(Xœ–140ÕX—–180)Õ(Yœ–60ÕY—–80)ƒZ–9 j† ≠(Xœ–100ÕX—–160)Õ(Yœ–40ÕY—–60)ƒZ–10 í¢ ≠(Xœ–100ÕX—–120)Õ(Yœ–60ÕY—–80)ƒZ–11 • ≠(Xœ–106ÕX—–114)Õ(Yœ–66ÕY—–74)ƒ3000:≤ BRANCH TO WIN =™ ≠Z—–0ƒ4000:≤ BRANCH TO CRASH...NO FLAGS WERE SET –6 +â ≠(Xœ–200ÕX—–220)Õ(Yœ–110ÕY—–140)ƒZ–6 Tä ≠(Xœ–220ÕX—–265)Õ(Yœ–110ÕY—–130)ƒZ–6 |ã ≠(Xœ–245ÕX—–265)Õ(Yœ–40ÕY—–110)ƒZ–6 £å ≠(Xœ–215ÕX—–245)Õ(Yœ–40ÕY—–60)ƒZ–6 Àç ≠(Xœ–215ÕX—–235)Õ(Yœ–60ÕY—–100)ƒZ–6 Ûé ≠(Xœ–180ÕX—–235)Õ(Yœ–80ÕY—–100)ƒZ–6 ë ≠(Xœ–180HE CRASH SUBRTNE. 7d ≠(Xœ–10ÕX—–80)Õ(Yœ–80ÕY—–100)ƒZ–1 _n ≠(Xœ–60ÕX—–100)Õ(Yœ–100ÕY—–120)ƒZ–2 áx ≠(Xœ–80ÕX—–100)Õ(Yœ–120ÕY—–158)ƒZ–3 ∞} ≠(Xœ–100ÕX—–140)Õ(Yœ–140ÕY—–158)ƒZ–4 ŸÇ ≠(Xœ–120ÕX—–180)Õ(Yœ–120ÕY—–140)ƒZ–5 á ≠(Xœ–160ÕX—–220)Õ(Yœ–140ÕY—–158)ƒZE MAZE âb ≤ IF X AND Y ARE SENSED, THEN Z IS SET THE NUMBER OF THE RECTANGLE. AT THE END OF THE TEST, Z IS TESTED. IF Z IS GREATER THAN c ≤ ZERO IT MEANS X AND Y ARE IN BOUNDS. IF Z=0 THEN NO X AND Y HAVE BEEN SENSED IN BOUNDS AND THE PROGRAM GOES TO T:Ñ"EASY OR HARD GAME? TYPE 'E' OR 'H'";HD$ j & ∞500:∫"DO YOU WANT STARWARS MUSIC EACH GAME?":Ñ"Y OR N ";M$ v ( ë:∞2000 à - ≠M$—œ"N"ƒ∞500 ë 2 ´200 a ≤ THE FOLLOWING SUBROUTINE TESTS WHETHER X AND Y ARE CONTAINED IN THE SERIES OF 11 RECTANGLES MAKING UP THF THE MAZE":û:∫ è ∫"BE CAREFUL! IN THE HARD VERSION OF THE":∫"GAME YOUR SHIP IS PULLED BY HOSTILE ":∫"MAGNETIC FORCES.. SO TAKE CARE " æ ! ∫"NOT TO CRASH!!!!!!!!!!!!!!!!!!!!!!!!!!!" * " ù:∫"DO YOU WANT YOUR SHIP SIGNAL SOUNDS? ":Ñ"TYPE Y OR N";NS$97,12:π798,3:π799,76 / π800,14:π801,3:π802,96 9 å…936 à ¢7:û:ñ10:∫"** SPACE MAZE **":¢23:ñ4:∫"COPYRIGHT 1980..MICRO-SPARC, INC.":ù ¢9:∫"YOU WILL PILOT A SPACE CRUISER THRU THE":∫"STAR MAZE TO REACH THE PRIZED DILITHIUM":∫"CRYSTALS AT THE CENTER O GOES INTO MEMORY BLOCK HEX $30E (782), THE TONES RESPOND TO POKE 0 TO 255 v ≤ PITCH= POKE780,P DURATION=POKE781,D ≈ π782,173:π783,48:π784,192:π785,136:π786,208:π787,5:π788,206:π789,13:π790,3 π791,240:π792,9:π793,202:π794,208:π795,245:π796,174:π7 ! ≤ ************************* A ≤ ** SPACE MAZE ** a ≤ ** MICRO-SPARC ** Å ≤ ** P.O. BOX 325 ** ° ≤ ** LINCOLN MASS 01773 ** ¡ ≤ ** COPYRIGHT C 1980 ** · ≤ ************************* J ≤ THE FOLLOWING SUBROUTINE ∫D$;"OPEN";F$;",L40" 3 ≠ISœ0ƒ1080:≤ DIRECT EDIT L$∫D$;"WRITE";F$;",R0" S)∫I `.ÅX–R»1¡I z8∫D$;"WRITE";F$;",R";X ¥=∫W$(X,1):∫W$(X,2):∫W$(X,3):∫W$(X,4):∫W$(X,5):∫W$(X,6) √?≠ISœ0ƒ1095 BÇX ›G∫D$;"CLOSE";F$ ÈI≠ISœ0ƒ± ıL≠SW–1ƒ± QBU–1:´00):± "fi∫Á(9);"40N":≤ CTRL I 40N 1„∫D$;"PR#0" =Ê≠SW–1ƒ± hÁâ:Ω:BU–1:´10002:≤ ** RETURN TO MENU ** àË≤ ** ADD TO CURRENT FILE ** ìÌ•´1950 ¨Ú∫D$;"OPEN";F$;",L40" ƒ¸∫D$;"READ";F$;",R0" ÀÑR fi ∫D$;"CLOSE";F$ ˜I–R:∞200:≤ **INPUT** ˝â ` ` ¢ •gÖ¸•hÖ˝† ±¸H»±¸–h`H»»»±¸V…≤–˜¿à¿–äÖ˚»Ñ˚à»±¸–˚8òH§˚–Δ˚0© ë¸hÂ˚Ö˚•¸Ö˛•˝Öˇ†±˛ Hà±˛H8Â˚벻±˛È ë˛hÖ˛hÖˇ∞„êZêëhh† ±¸HÖ˙e˚Ö˛»±¸Ö˝Hi Öˇ•˙Ö¸à±˛ë¸Ê¸–Ê˝Ê˛–Êˇ•ˇ≈∞êÍ•˛≈ØꉕØÂ˚ÖØÖi•∞È Ö∞ÖjÊi–Êjò븻븻ë¸hÖ˝hÖ¸êù [ œƒ†”»œœ‘…Œ«°°)(äca(…Δ†Ÿœ’†◊¡Œ‘†‘œ†–ំ¡«¡…Œ”‘†‘»≈) èa(√œÕ–’‘≈“†‘»≈Œ†‘Ÿ–≈†ßŸßÆ)%îa(œ‘»≈“◊…”≈¨†‘Ÿ–≈†¡ŒŸ†Ã≈‘‘≈“†¡Œƒ)ôS(»…‘†“≈‘’“Œ)&⁄@£*@ M6π®a(◊»…√»†”≈“÷…√≈†◊…ÃÆŸœ’† œ…Œ†ø)AE a(≈Œ‘≈“†ß¡ß†Δœ“†¡…“†Δœ“√≈†œ“)S(≈Œ‘≈“†ßŒß†Δœ“†Œ¡÷Ÿ†)&¡@M6π®T†◊œ“‘»†≤)(wca(Δ…“…Œ«†‘◊œ†Õ…””…Ã≈”†œ“†ƒ“œ––…Œ«)'xa(‘◊œ†¬œÕ¬”†¡‘†‘»≈†”¡Õ≈†‘…Õ≈†Õ¡À≈”)(ya(‘»≈†”≈√œŒƒ†œŒ≈†¡†ß«’…ƒ≈ƒß†Õ…””…Ã≈)'za(¡Œƒ†–’‘”†…‘†’Œƒ≈“†–¡ƒƒÃ≈†√œŒ‘“œÃ),{ca(≈¡√»†”…ƒ≈†◊…ÃƬ≈† ’ƒ«≈ƒ†¡‘†‘»≈†≈Œƒ)Äa(œΔ†‘»≈†Õ…””…œŒ)&Öca(«œœƒ†Ã’√À†¡Œƒ†«œ√‘q/?µ r”√‘q/?µ r¡”√q∞ Œ÷Ÿq∞ ¬Õ”q± ”»”q± [XM6π®]†™™†…Œ‘“œƒ’√‘…œŒ$]Pµ a(‘»…”†…”†¡…“Ø”≈¡†¬¡‘‘Ã≈°°)"bPµ a(¡…“†Δœ“√≈†÷”Ɔ‘»≈†Œ¡÷Ÿ)#gP∑ a(¡†¬œÕ¬≈“†…”†◊œ“‘»†±†»…‘)&lP∑ a(¡†ƒ≈”‘“œŸ≈“†…”†◊œ“‘»†±†»…‘))vP∑ a(”’¬”†¡Œƒ†Δ…«»‘≈“”†¡“≈q≥ ΔŸœq≥ ΔÿŒq¥ ΔŸŒq≥ #ã–ÿœq≥ –Ÿœq≥ –ÿŒq≥ –ŸŒq≥ Céƒÿœq∞ ƒŸœq≤ ƒÿŒq± ƒŸŒq≤ ”ÿœq≥# ”Ÿœq≤ ”ÿŒq≥" ”ŸŒq≤ -ì√Δq∂D √¬q≥" √ƒq±™ √”q≤ˇ √Ãq±w √ÿqµ: (ñÑq∑ ƒÀq≤ ƒ q± ” q± ≈ÿ–Ãq± _ò–”q± ””q± –√‘q/?µ r¬√‘q/?µ rƒ¡Œƒ†”≈‘†÷¡“…¡¬Ã≈” uf∑ UŸV≤ W≤ i∞ j≥' kŸzYŸ!f≤ UŸV≥ W≥' i∞ j≥' kŸYŸ ÑUŸV≥ W≥' i∞ j≥' kŸYŸÜf∏ √‘ƒq≤7ái∞ j≥' k∞ l∞ m≥' n∞ l∞ m≥' n≥' i∞ j≥' k≥' c⬟±q∞ ¬Ÿ≤q∞ ÕŸ±q∞ ÕŸ≤q∞ ¬ÿœq≥! ¬Ÿœqµ ¬ÿŒq≥! ¬ŸŒqµ Δÿœe”»¡–≈M≤ õ]†™™†≈ÿ–Ãœ”…œŒ†”œ’Œƒúd≤Å e¥ d≤è e≤˙ M≤Ä †]†™™†≈“¡”≈†≈ÿ–Ãœ”…œŒ1°d≤e”»¡–≈`ΔŸŒ ≤ %d∏ e∞ `ΔŸŒ≤ %d∏ e√Ã%¶dµ eΔÿŒd∂ eΔŸŒd≤e”»¡–≈M≤ ©`¬Ÿ±≤ ¬Ÿ≤≤ %\µ∫´[#∫f∑ UŒV≤ W≤ i± j≥& kŒYŒ[%p]†™™†ƒ“¡◊†œ√≈¡Œ† [?]†™™†”–á”»†“œ’‘…Œ≈0@dµ eΔÿŒd∂ eΔŸŒ”»¡–≈q∂@ √œÃqÑ\± \± Pd≤Å e± d≤è e±ñ M≤Ä r[§fƒÀg¬ÿ±h¬Ÿ±¬Ÿ±q∞ [ÆfƒÀg¬ÿ≤h¬Ÿ≤¬Ÿ≤q∞ [!4`”»Ã± ƒÿŒ¥ ”ÿŒ ≥! %\±á]†™™†≈ÿ–Ãœ”…œŒ9à”»¡–≈q∏P dµ eΔÿŒd∂ eΔŸŒd∏ e≈ÿ–Ãd≤ \∏U ;åo≤ P± a(Δ…«»‘≈“†ƒœ◊Œ°)o≤ P± a(Œ¡÷Ÿ†”√œ“≈Ω)FŒ÷Ÿñ[€]†™™†ΔáÀ†“œ’‘…Œ≈,‹dµ eΔÿŒd∂ eΔŸŒd≤e∏P d∏ e≤ˇ M≤ Îd≤Å e± d≤è e±ñ M≤Ä :Ìf∞ gΔÿŒhΔŸŒd≤e∏P d∏ e∞ dµ eΔÿŒd∂ eΔŸŒM≤ %ˇ`ÕŸ±¥ %ÕŸ±q∞ `ÕŸ≤¥ %ÕŸ≤q∞ Δÿœq¬ÿœΔŸœq¬ŸœΔÿŒq¬ÿŒΔŸŒq¬ŸŒ\µàŒ÷ŸqŒ÷Ÿ± ”»¡–≈q± \πZ ?o≤ P± a(¬œÕ¬≈“†ƒœ◊Œ°)o≤ P± a(Œ¡÷Ÿ†”√œ“≈Ω)FŒ÷ŸM≤ %7`¬Ÿ±≥ %¬Ÿ±q∞ `¬Ÿ≤≥ %¬Ÿ≤q∞ F[w]†™™†Δ…«»‘≈“†”»œ‘†ƒœ◊ŒCxΔÿœq–ÿœΔŸœq–ŸœΔÿŒq–ÿŒΔŸŒq–ŸŒ\µàŒ÷ŸqŒ÷Ÿ≤ ”»¡–≈q∞ 1¡70:∫"-";:ÇX:∫ P–T:∞980 WÑPK–1:V$–" *** TOTAL ***":∞10:PK–(52»B…C…1):V$–‰(T):∞15 Åâ≠FL—œ1ƒ990:≤ ** SKIP CR CD SUMMARY ** âã∫:∫ éÅX–1¡5:P–CC(X):∞980:∫CD$(X);:V$–‰(CC(X)):PK–(15»B…C…1):∞15:Ç ”¿´990 ‘B–9:C–(Pœ–10)»(Pœ–100)»(Pœ–1000)»(Pœ–100–W$(X,3):∞10 2fPK–(52…„(W$(X,4))):V$–W$(X,4):∞10 CkW–Â(W$(X,5)) îlT–T»W:≠FL–1ƒCC–Â(W$(X,2)):CC(CC)–CC(CC)»W:≤ ** GRAND TOTAL AND CR CD TOTALS" ΔmT–”(T 100».5)À100:CC(CC)–”(CC(CC) 100».5)À100 ”pP–W:∞980 ÒuV$–‰(W):PK–(52»B…C…1):∞15 ¯zÇX |ÅX–6:V$–FF$:∞10:PK–44:V$–"MO":∞10:PK–50:V$–"DAY":∞10 K@PK–56:V$–"AMOUNT":∞15 bCÅX–1¡70:∫"=";:ÇX:∫ mHÅX–1¡I ÇMPK–1:V$–‰(X):∞10 öRPK–9:V$–W$(X,6):∞10 ¿WPK–(31…„(W$(X,1))):V$–W$(X,1):∞10 Ê\PK–(41…„(W$(X,2))):V$–W$(X,2):∞10 aPK–(46…„(W$(X,3))):V$≠N–7ƒP–1 ˛≠N–6ƒP–2 "≠N–5ƒP–3 /≠N–4ƒP–4 <≠N–3ƒP–5 I≠N–2ƒP–6 V ≠N–1ƒP–7 \!± yX≤ ** WEAVING ROUTINES ** ábY–20:´700 ±äHT–0:≤ ** REPRINT TREADLE SEQUENCE ** ¬ã≠TN—–20ƒST–1 ⁄å≠TNœ20ÕTN—–40ƒST–21 Úç≠TNœ40ÕTN—–60ƒST–41 é≠TNœ60ƒST,PP Î ´200 C1–C1»1:´200 6,≤ ERASE TIEUP ERRORS [6∞360:∞370:≤ ERASE CURRENT TIE UP Ö@C1–C1…1:∞360:∞370:≤ ERASE LAST TIE UP éJ´200 ∏hí0:ÅPI–0¡14«2:ì200»(C1 3),PI:ÇPI:í3:± ÓrÅPI–0¡70«10:T%(PI»C1)–0:ÇPI:±:≤ ERASE TABLE ENTRY ˚Ù≠N–8ƒP–0 ˘99=WEAVE";:¢22:∫ Y à ≠C1–10ƒ¢24:∫"10 TREADLES REACHED. GO TO WEAVE.":ÅPI–1¡1000:ÇPI:´600 ë Õ ¢23:å…868:∫"TREADLE #";C1;:Ñ" ENTER HARNESS #(S)";N ü — ≠N–55ƒ300 ≠ “ ≠N–77ƒ240 ª ” ≠N–99ƒ600 ƒ ⁄ ∞500 ÷ Ë T%(P 10»C1)–1 ı È OO–”(200»(C1 3)):PP–”(P 2) Í í3:ìOO1ŒNœ8ƒ122 $ á ∫"A= ";A;" B= ";B;" "; @ â ÅL–1¡5:∫Á(A);Á(B);:ÇL:∫ K å ÅR–1¡2 _ é ∫" K":≤ CTL I K j è π36,30 v ë ÅP–1¡20 Å ñ ∫Á(X); à õ ÇP é ù ∫ õ † ≠R–1ƒX–B ¢ • ÇR ≠ ß ∫Á(10) π ¥ ä0:´100 — » ≤ ** ENTER TIEUP ** ¢24:å…868:∫"55= ERASE 77= NEXT TREADLE :∫ M y ≠C–81ƒ¢24:û:∫"80 THREADS REACHED.. GO TO TIE UP":ÅPI–1¡1000:ÇPI:ù:´200 Ç z ¢23:å…868:∫"THREAD #";C;:Ñ" HARNESS #? (1-8) ";N ⁄ } ≠C–80ƒ¢21:å…868:ü:∫"80 THREADS USED. AUTO-SWITCH TO TIEUP.":ÅPI–1¡1000:ÇPI:ù:ó:´200 Ì Ç ä1:∫Á(2);Á(30) ¯ Ñ π36,30 Ö ≠N— ÜT%(80),TR%(80),R%(641) " ´100 ó d ∫"THIS PROGRAM OVER-PRINTS TWO ASCII ":∫"CHARACTERS OF YOUR CHOICE. ENTER THE":∫"ASCII DECIMAL NUMBER FOR EACH." π i Ñ"ENTER 'A'";A:Ñ"ENTER 'B'";B ¡ n ë:ó … s X–A x ¢24:∫"55= ERASE AND REENTER. 99=GO TO TIEUP";:¢22ƒƒÃ≈)c*«f± U…V∞ W≥' g≤ h…U V± W± Y Z…/»f∞ U…V≥' W∞ X6± g≤ h…U V± W± Y Z…7–LM6π®a(√œŒ‘œÃ†»œ“…⁄œŒ‘¡Ã†Õœ÷≈Õ≈Œ‘†◊…‘»†¬’‘‘œŒ)c*—f± U…V∞ W≥' g…h≤ U V± W± Y Z…/“f∞ U…V≥' W∞ X6± g…h≤ U V± W± Y Z… ⁄M6π®[ƒ †‘œ†”‘¡“‘†«¡Õ≈†º≠)G/å}œ‘∞q2?∞ r∑ œ‘±q2?± r∑ ‘∞qœ‘∞‘±qœ‘±ñ}f± /†}f∞ g± hœ‘±g≥ hœ‘∞f± g± h‘±g≥ h‘∞"™}œ‘∞q‘∞œ‘±q‘±`.?6± @r± $≥º$¥}‘∞q2?∞ r∑ ‘±q2?± r∑ _≥†}ºd6±?e∞ M6π®5ΔLM6π®a(√œŒ‘œÃ†÷≈“‘…√¡Ã†Õœ÷≈Õ≈Œ‘†◊…‘»†–¡ÄB ` ë ï ` Ôÿ ©†Ä Ÿ¢ éïéñ†8π ï¢ êÓï–Óñ –Ú»¿ƒêË` / FQ\±π o≤ P≤ a(ƒ≈”‘“œŸ≈“†”’ŒÀ°)o≤ P≤ a(¡…“Δœ“√≈†”√œ“≈Ω)F¡”√V[Ø]†™™†”…ŒÀ†”’¬C∞Δÿœq”ÿœΔŸœq”ŸœΔÿŒq”ÿŒΔŸŒq”ŸŒ\µà¡”√q¡”√≤ ”»¡–≈q¥0 \±æ Aµo≤ P≤ a(”’¬Õ¡“…Œ≈†”’ŒÀ°)o≤ P≤ a(¡…“Δœ“√≈†”√œ“≈Ω)F¡”√…[]†™™†¬œÕ¬≈“†”»œ‘†ƒœ◊ŒC†Ã≈Δ‘Ω)F¬Õ”[3$`ÕŸ≤∞ $±.”»”q”»”± d≤Å e± d≤è e±æ M≤Ä %Õÿ≤q”ÿœÕŸ≤q”ŸœB+o≤ P± M6∏da(Õ…””…Ã≈”†Ã≈Δ‘Ω)F”»”GP≤ a(¬œÕ¬”†Ã≈Δ‘Ω)F¬Õ”.[K]†™™†”…ŒÀ†ƒ≈”‘“œŸ≈“NLΔÿœqƒÿœΔŸœqƒŸœΔÿŒqƒÿŒΔŸŒqƒŸŒ\µà¡”√q¡”√± ”»¡–≈q≥ ΔÿŒqƒÿœΔŸœqƒŸŒq¬Õ”± d≤Å e± d≤è e≤» M≤Ä Û¬ÿ≤q¬ÿœ± ¬Ÿ≤q¬Ÿœ&˘o≤ P≤ M6∏da(¬œÕ¬”†Ã≈Δ‘Ω)F¬Õ”¸[ ]†™™†”‘¡“‘†Œ≈◊†Õ…””…Ã≈†”»œ‘ `ÕŸ±∞ $±$”»”q”»”± d≤Å e± d≤è e±æ M≤Ä Õÿ±qƒÿœÕŸ±qƒŸœD!o≤ P± M6∏da(Õ…””…Ã≈”†Ã≈Δ‘Ω)F”»”GP≤ a(¬œÕ¬”»≈“†Õ…””…œŒ)&¡@_≤ 9Q$ÑŒ”»œœ‘q/?µ r`Œ”»œœ‘± %\±Ë[$∂¡”»œœ‘q/?µ r`¡”»œœ‘± %\±[ Á]†™™†”‘¡“‘†Œ≈◊†¬œÕ¬†ƒ“œ–3Ë`¬Ÿ±∞ $±Ú¬Õ”q¬Õ”± d≤Å e± d≤è e≤» M≤Ä <Ô¬ÿ±q–ÿœ± ¬Ÿ±q–Ÿœo≤ P≤ M6∏da(¬œÕ¬”†Ã≈Δ‘Ω)F¬Õ”[3Ú`¬Ÿ≤∞ $±¸¬Õ”≈“†≤Œƒ†√á””)(`¡”√∂ ¡”√± %a(¬œÕ¬≈“†±”‘†√á””)$`¡”√± ¡”√± %a(√»…≈Δ†¬œÕ¬≈“)%`¡”√± ¡”√± %a(≈ÿ≈√†œΔΔ…√≈“Æ)% `¡”√± ¡”√≤ %a(◊…Œ«†√¡–‘¡…Œ°)%`¡”√≤ %a(«≈Œ≈“¡Ã°) 'UŸV± W±ËYŸ⁄”q∞ ⁄»q∞ :*o≤ S(»…‘†“≈‘’“Œ†‘œ†Δßؔ¡…Æ¡Œœ‘YY–T:T–YY (XX—œ0) %∫D$;"PR#1" 1'∫Á(9);"100N" A*∫Á(2);Á(30) _4∫¿25)F$;" SUMMARY REPORT" á9∫¿27)"TODAY'S DATE ";MT;"/";D;"/";Y £;≠OM–3ƒ∫¿27)"SORTED ";A$ ≥<FF$–È(F$,7) 1>∫:PK–1:V$–"SEQ":∞10:PK–12:V$–"** PAID TO **":∞10:PK–28:V$–"ACC":∞10:PK–3“)cP}P∂ a(±≥†Ω†¡÷≈“¡«≈)cZ}P∂ a(≤µ†Ω†≈ÿ–≈“‘)c6d}P∂ a(®¡ÃÆŒ’Õ¬≈“”†∞†‘»“’†≤µ†¡“≈†÷¡Ã…ƒ©)ccP∂ (n}S(Ã≈÷≈Æ)'Ã`à ∞ Ã≤ $≥<}Ãq≤ à x}LM6π®sÇ}P± a(»œÕ≈)GP≥ a(÷…”…‘œ“)ca(††††Õœ÷≈†«¡Õ≈†√œŒ‘“œÃ”†‘œ†–…√À†‘≈¡Õ)a(†††≠憖“≈””†¡ŒŸ†À≈Ÿ}o± Pµ a(”–¡√≈†¬¡“†Ω†“’ŒŒ…Œ«†–áŸ)c#%}Pµ a(ߖ߆††††††Ω†–¡””†–áŸ)c,&}Pµ a(ßÀ߆††††††Ω†–’Œ‘†œ“†—’…√À†À…√À)c*'}Pµ a(ßΔ߆††††††Ω†Δ…≈Æ«œ¡Ã†¡‘‘≈Õ–‘)(}U…V± W±'Y…3<}M6π®o∂ a(™™™™†√»œœ”≈†Ÿœ’“†”À…ÃÆÃ≈÷≈Æ™™™™) F}ccP∂ a(∞††Ω†¬≈«…ŒŒ≈)r À≈Ÿ<(Δ)r À≈Ÿ<(–)r$≥8|L|`À≈Ÿ<(Δ)r$≤xiV|`À≈Ÿ<(À)r$≤§j`|`À≈Ÿ<(–)r$≤–kˇ|[ }]†«¡Õ≈†…Œ…‘”}Oÿ4µ rDŸ4µ rN }Ÿq≤ ÿq∞ œÿq∞ œŸqŸ¬q∞ –ƒq¬œ¬q¬–Ÿq∞ √Ãq∞ N»œÕ@"≥ rC÷…”@"≥ r8#}M6π®o∏ a(™™†À≈Ÿ”†¡√‘…÷≈†¡‘†¬≈«…ŒŒ…Œ«†œΔ†ƒœ◊Œ†™™)+$ Ç !∫ "&∫Á(9)"K";:≤ CTL I K (0± Ml≤ ** ERASE LAST SHUTTLE THROW ** oqA–0:X–(TR%(TN…1)…1)»70:Z–X…70 ~vÅN–X¡Z«…10 êÄ≠T%(N)–1ƒ∞800 £äÇN:A–3:Y–Y…2:± ˜–∫Á(9)"40N":ä0:∫"ERROR..RECOVER BY ENTERING 'GOTO 1100'":∫"AND HITTING RETURN":Ä 0 '~≠N—0ƒ∫Á(9);"40N":ä0:Ä:≤ CTL I 40N :Å≠T%(N)–1ƒ∞1800 AÜÇN ]ãπ36,82»TR%(II):∫TR%(II) hç∫Á(10) pïÇII åö∫Á(9)"40N";:≤ CTL I 40N †üπ54,240:π55,253 ™°´1100 Δ≤ ** PRINT TREADLING ** ◊L–”(NÀ10) 80 ‰ÅJ–L¡L»Q ˛≠R%(J)–WƒπD,J…L:∫"X"; ˇπD,ZZ:∫"X"; ÇZZ " ÅZZ–0¡9 =≠T%((Z 10)»ZZ)—œ1ƒ1560 Qπ36,83»ZZ:∫"X"; `ÇZZ:∫Á(10) n ÇZ:∫Á(10) ä"ÅZ–1¡95:∫"-";:ÇZ:∫Á(10) §@≤ ** PRINT PATTERN ** ØB•´2000 «E∫Á(9)"K";:≤ CTL I K ÷JÅII–1¡TN…1 ÚhX–(TR%(II)…1)»70:Z–X…70 |ÅN–X¡Z«…155,193 }„∫Á(30);:≤ CTL SHIFT N FOR 12 CHAR PER INCH ON IDS 440. SET PRINTER TO 8 LINES/INCH. ENABLE LINE FEED SUPPRESSION. åÊ∫Á(9)"95N" ∞Á∫Á(30):≤ CTL SHIFT N FOR 12 CPI ÀÎ∫X$:∫:≤ PRINT COMMENTS ÷ÅZ–0¡7 „ıÅZZ–0¡79 ˛˙≠R%((Z 80)»ZZ)—œ1ƒ1540 :å…868 ΔA–3:Y–20 …± 2≤ ** ERASE TIE UP ** Cí0:ÅU–0¡30«3 QÅV–0¡16«2 ^#ìU»200,V h(ÇV:ÇU Ç-ÅPI–0¡79:T%(PI)–0:ÇPI å2∞1200 ï3C1–0 †<ó:´200 æ‹≤ ** PRINTING ROUTINES ** Ù›ó:¢21:∫"ENTER COMMENTS (OR JUST HIT RETURN).":ÑX$ ·π54,0:πƒ ]†»…Õ≈Õ∫≠≤∑≥π≤ ]†“’Œ†±∞∞d a(ÑÕœŒ†√…œ)» a(ѬÜ¡ƒ†Δ“≈≈øÆœ¬ )˙ Mπóa(Ñ√¡‘¡Ãœ«),Δ“≈≈q.?πïr≤ .?πñr êa(”≈√‘œ“”∫†)FΔ“≈≈E(†Δ“≈≈¨†)Göb¥Δ“≈≈E(†’”≈ƒ)§S(Œ≈ÿ‘†ƒ…”Àø)&¡@_≤˙ ƒ ”√“± %a(«’ŒŒ≈“†±”‘†√á””)$È`”√“± ”√“± %a(√»…≈Δ†«’ŒŒ≈“)#Ó`”√“± ”√“± %a(≈ÿ≈√†œΔΔ…≈“) Û`”√“± ”√“≤ %a(√¡–‘¡…Œ°)¯`”√“≤ %a(¡ƒÕ…“¡Ã°)*o≤ a(¡…“Δœ“√≈†”√œ“≈†)F¡”√E(†“¡‘≈”†)G `¡”√≥ %a(¬œÕ¬≈“†¥‘»†√á””)( `¡”√≥ ¡”√∂ %a(¬œÕ¬”°†™™)`Œ÷Ÿ¡”√%a(™™†‘»≈†Œ¡÷Ÿ†◊…Œ”°†™™)5æ`Œ÷Ÿ–»” Œ÷Ÿ¡”√%–»”qŒ÷Ÿ`¡”√–»” ¡”√Œ÷Ÿ%–»”q¡”√P¡`Œ÷Ÿ¡”√%a(†™™†¡†‘…≈†¬¡‘‘Ã≈†°†™™)o≤ a(Œ¡÷Ÿ†”√œ“≈†)FŒ÷ŸE(†“¡‘≈”†)G”√“qŒ÷Ÿ ⁄`”√“≥ %a(«’ŒŒ≈“†¥‘»†√á””)(fl`”√“≥ ”√“∂ %a(«’ŒŒ≈“†≤Œƒ†√á””)(‰`”√“∂ ¥ %\±x!ΔÿŒqÕÿ≤ΔŸŒqÕŸ≤`ÕŸ≤¥ %\±‹W]†™™†‘≈”‘†≈Œƒ†œΔ†«¡Õ≈8X`¬Õ”∞ ”»”∞ ¬Ÿ±∞ ¬Ÿ≤∞ ÕŸ±∞ ÕŸ≤∞ $∑º7Zo≤ P≥ M6∏db√‘ƒGo≤ √‘ƒq√‘ƒ± `√‘ƒ∞ $∑º]_≤ ª]†™™†≈÷¡Ã’¡‘≈†”√œ“≈”UºM6π®o≤ `¡”√Œ÷Ÿ%a(™™†‘»≈†¡…“†Δœ“√≈†◊…Œ `ÕŸ≤≤ %fÑgÕÿ≤hÕŸ≤ÕŸ≤qÕŸ≤± =`¡@9(¡) Õÿ≤ –ÿŒ%⁄»q± `¡@9(¡) Õÿ≤–ÿŒ%⁄»q6± Õÿ≤qÕÿ≤⁄»`¡@9(¡)$µ3`2?± r±† %Õÿ≤qÕÿ≤± `2?± r ∏P %Õÿ≤qÕÿ≤± %`Õÿ≤ ± %Õÿ≤q± `Õÿ≤≥# %Õÿ≤q≥# Af± gÕÿ≤hÕŸ≤`=Õÿ≤>ÕŸ≤± r≤ %\±`=Õÿ≤>ÕŸ≤± rNOT A NUMBER..PLEASE REENTER":´240 y˙ ó:∫"LAST ACCT#";W$(I,1);" CD#";W$(I,2);" DT ";W$(I,3);"/";W$(I,4);" AMT $";W$(I,5) ú˛ ≠ISœ0ƒX–I:∞1050:I–IS:IS–0:´204 •ˇ ´203 µ¢23:å…868:± ·¢23:∫"INVALID ENTRY.. PLEASE REENTER":± ˚ ≤ ** PRINT SUMMARY ** ! TO: ";:ù:∫"--------------";:ñ10:Ñ"";W$(I,6):û OÏ ∞270:≠W$(I,6)–""ƒW$(I,6)–" " ìÌ ≠„(W$(I,6))œ14ƒ¢23:∫"MAX 14 CHARS ALLOWED..PLEASE REENTER":´235 ∏ ¢22:ñ25:å…868:Ñ"AMOUNT:";W$(I,5) ÿÒ ∞270:≠„(W$(I,5))–0ƒ∫"":´240 "Ú ≠Ê(W$(I,5))—48ŒÊ(W$(I,5))œ57ƒ¢23:∫"G ";O V≠O–4ƒTN–TN…1:´700 9[≠O–1ƒ∞1200:TN–0:HH–0:´700 R`≠O–2ƒTN–0:HH–0:´1300 `j≠O–3ƒ1500 Äo≠O—1ŒOœ4ƒ∫"ENTER 1-4":´1100 ät´1100 ™∞≤ ** ERASE WOVEN PATTERN ** Ω≤A–0:ÅU–0¡C 2«2 ÀµÅV–20¡Y«2 ◊∫í0:ìU,V ÏΩ¢21:ü:∫"ERASING" ˆƒÇV:ÇU ≈ù:¢21OR ** ÌC–C…1:A–0:L–0:N–M ;ÚíA:ÅPI–0¡14«2:ì(C 2),PI:ÇPI o˜ÅPI–0¡560«80:R%(PI»C)–0:ÇPI:≤ ERASE TABLE ENTRY ÄL–1:A–3:´122 ôL≤ ** OPTIONS MENU ** ÕNó:¢23:∫"MENU: 1=ERASE PTRN 2=ERASE PTRN/TIEUP" Q¢24:å…868:Ñ"3= PRINT PATTERN 4= RESUME WEAVIN«í3:X–(TR%(TN)…1)»70:Z–X…70:Y–Y»2 1 ÅN–X¡Z«…10 CÀ≠T%(N)–1ƒ∞800 J–ÇN S’´701 d L–”(NÀ10) 80 r%ÅJ–L¡L»79 Ñ*≠R%(J)–1ƒ´820 ç/´850 ü4íA:ì(J…L) 2,Y ¶RÇJ ¨W± ¥ÑM–N «âR%((P 80)»C)–L ◊éíA:ìC 2,P 2 „¢C–C»1:± Ë≤ ** ERASE THREADING ERRS ALLOWED";:Ñ"HIT RETURN TO GO TO OPTIONS LIST";XX$:´1100 X¬HH–HH»2:≠FG–1ƒHH–HH»1:FG–0 l√¢21:ñHH:≠IV–1ƒû çƒ∫TR%(TN):ù:≠TR%(TN)œ–10ƒFG–1 Œ≈≠HHœ–75ÕIV–0ƒHH–0:IV–1:≤ 1ST WRAPAROUND AND INVERSE PRINTING ˝Δ≠HHœ–75ÕIV–1ƒHH–0:IV–0:≤ SECOND WRAPAROUND "50 DΩTN–TN»1:¢23:å…868:∫"ENTER TREADLE #";:ÑTR$:TR%(TN)–Â(TR$):¢21 Yæ≠TR%(TN)–99ƒ1100 Ñø≠TR%(TN)–55ƒ∞1900:TN–TN…2:HH–HH…2:´701 ‰¿≠TR%(TN)—1ŒTR%(TN)œ10ƒ¢23:∫"THE LIMIT IS 10 TREADLES.. REENTER.":ÅII–1¡350:ÇII:TN–TN…1:´701 9¡≠TNœ–79ƒTN–79:∫"80 LINE≤ ** REPRINT TREADLE SEQUENCE ** 1ã≠TN—–20ƒST–1 Iå≠TNœ20ÕTN—–40ƒST–21 aç≠TNœ40ÕTN—–60ƒST–41 ré≠TNœ60ƒST–61 zè¢21 àêÅPI–ST¡TN •îπ36,HT:∫TR%(PI);:HT–HT»2 ªôÇPI:¢19:∫:HH–HT:± ºó:¢24:∫"55= ERASE LAST THROW 99= OPTIONS LIST";:¢20:∫:≠TNœ1ƒ∞6hí0:ÅPI–0¡14«2:ì200»(C1 3),PI:ÇPI:í3:± ]rÅPI–0¡70«10:T%(PI»C1)–0:ÇPI:±:≤ ERASE TABLE ENTRY jÙ≠N–8ƒP–0 w˘≠N–7ƒP–1 Ñ˛≠N–6ƒP–2 ë≠N–5ƒP–3 û≠N–4ƒP–4 ´≠N–3ƒP–5 ∏≠N–2ƒP–6 ≈ ≠N–1ƒP–7 À!± ËX≤ ** WEAVING ROUTINES ** ˆbY–20:´700 äHT–0: YOU HIT":∫"'C' FOR CREATE. ON SUBSEQUENT SESSIONS":∫"YOU CAN SIMPLY READ IN THE MODEL FROM" î'‚∫"DISK AND WORK STRATEGY ALTERNATIVES":∫"DIRECTLY." Æ'Á∫:Ñ"HIT RETURN.";X$:± ¥'pÄ Í''É JAN,FEB,MAR,APR,MAY,JUN,JLY,AUG,SEP,OCT,NOV,DEC ≈≈OCT,NOV,DEC ≈h ∫"SYSTEM WILL THEN TAKE OVER AND PRINT ":∫"THE COMPLETE ANALYSIS." m&’Ñ"HIT RETURN TO GOTO NEXT PAGE";X$:ó:∫ ›&ÿ∫:∫"HIT RETURN TO BEGIN.":∫"WHEN YOU RETURN, YOU'LL BE ASKED IF YOU":∫"WANT TO CREATE, OR READ, THE MODEL." \'›∫"IF IT IS YOUR FIRST SESSION, YOUR %'S SHOULD EQUAL 100%.":∫ |%…∫"THEN ENTER THE NUMBER OF NEW HIRES ":∫"PLANNED AND THE MONTH PLANNED TO HIRE":∫"THEM." ˚%Œ∫:∫"TO STOP ENTERING NEW HIRE INFORMATION":∫"ENTER 0 AND HIT RETURN ON THE NEXT":∫"REQUEST FOR NEW HIRE INFORMATION. THE" B&” _ •–`©(碩 çy©â碩çy•ÖL ¡˚† ±(¶ –¶L‡ … –©†–©X) @**jj()ø ¡»¿(–‘©ç ¡ÊL•L≈0¬¿`ˇˇ ±@Q`¬Ÿ≤≥ %\±Æ è]†™™†‘≈”‘†Õ…””…Ã≈†£±†»…‘Eê`ÕŸ±∞ $µÙf∞ `ÕŸ±≤ %fÑgÕÿ±hÕŸ±ÕŸ±qÕŸ±± f± gÕÿ±hÕŸ±K©`=Õÿ±>ÕŸ±± r≤ %\±`=Õÿ±>ÕŸ±± r¥ %\±xΔÿŒqÕÿ±ΔŸŒqÕŸ±ΔŸŒqÕŸ±™`ÕŸ±¥ %\±‹ Û]†™™†‘≈”‘†Õ…””…Ã≈†£≤†»…‘7Ù`ÕŸ≤∞ $∂Xf∞¬ÿ≤ ”ÿŒ≤ %⁄”q± `¡@9(Œ) ¬ÿ≤”ÿŒ≤ %⁄”q6± ¬ÿ≤q¬ÿ≤⁄”<`¡@9(Œ)$≥@3=`2?∞ r±† %¬ÿ≤q¬ÿ≤± `2?∞ r ∏P %¬ÿ≤q¬ÿ≤± 3@`¬ÿ≤ ¥ %¬ÿ≤q¥ `¬ÿ≤≥$ %¬ÿ≤q≥$ fµ g¬ÿ≤h¬Ÿ≤1E`=¬ÿ≤>¬Ÿ≤± rƒ %\±L`=¬ÿ≤>¬Ÿ≤± r” %\±∞LΔÿŒq¬ÿ≤ΔŸŒq¬Ÿ≤O`¬Ÿ≤≤ %\≤ %fÑg¬ÿ±h¬Ÿ±¬Ÿ±q¬Ÿ±± fµ g¬ÿ±h¬Ÿ±CÎ `=¬ÿ±>¬Ÿ±± r± %\±L`=¬ÿ±>¬Ÿ±± r± %\±∞ΔÿŒq¬ÿ±ΔŸŒq¬Ÿ± `=¬ÿ±>¬Ÿ±± r± %\±∞ ı `¬Ÿ±≤ %\±@`¬Ÿ±≥ %\±§+]†™™†¬œÕ¬†Œ’Õ¬≈“†≤7,`¬Ÿ≤∞ $¥êf∞ `¬Ÿ≤≤ %fÑg¬ÿ≤h¬Ÿ≤¬Ÿ≤q¬Ÿ≤± E;`¡@9(Œ) 204 (‹ W–Â(W$(I,1)):≠Wœ24ŒW—1ƒ∞280:´205 G· ¢21:å…868:∫F$;:Ñ"";W$(I,2) P‚ ∞270 {„ W–Â(W$(I,2)):≠FL–1Õ(W—1ŒWœ5)ƒ∞280:´225 ´Ê ¢21:ñ25:å…868:Ñ"MONTH,DAY:";W$(I,3),W$(I,4) ¥Á ∞270 ÎË WM–Â(W$(I,3)):WD–Â(W$(I,4)):≠WMœ12ŒWDœ31ƒ∞280:´230 .Î ¢22:å…868:∫"PAID"SAVE IT ON DISK." ~$ƒ∫:∫"YOU'LL THEN BE ASKED TO ENTER THE":∫"THE NUMBER OF SALESMEN ON BOARD AT THE":∫"START OF THE YEAR":∫ Ô$Δ∫"THEN YOU'LL BE ASKED FOR THE % OF TIME":∫"TO BE SPENT ON EACH PRODUCT YOU HAVE":∫"ENTERED INTO THE SYSTEM" %«∫"THE SUM OF∫"TO ENTER:":∫¿5)"1. PRODUCT NAME":∫¿5)"2. DOLLAR UNITS (1, 100, 1000)":∫¿5)"3. $ SALES VALUE PER UNIT" ß#∫∫¿5)"4. PRODUCTIVITY PROFILES":Ñ"HIT RETURN FOR PAGE 2";X$ $øó:∫"WHEN YOU HAVE COMPLETED THE PROCESS OF":∫"ENTERING THE MODEL, YOU SHOULD THEN":∫ NEXT 20% OF THE SALESFORCE.......":∫"THE NEXT 20%.... ":∫"AND SO ON THROUGH THE 5 PRODUCTIVITY" y"°∫"RANGES OF SELLING" ¸"¶∫:∫"YOU SHOULD ENTER THE NUMBER OF PRODUCTS":∫"YOU ARE MODELING AT THE START OF THE":∫"SESSION. THEN THE SYSTEM WILL ASK YOU" h#∞ `m † ± âm± âm± âm± âm± âm± âm ¶m»¿(–⁄`J.VmJ.UmJ.TmJ.SmJ.RmJ.QmJ.Pm`å@m†¢ ΩPmë˙à˘•˙iÖ˙…êLΔmÊ˚© ¢ùPm ˙¨@m`© Ö˙©@Ö˚©ˇÖ ¢ † ±˙E ë˙à–˜Δ˚ Ú`ˇˇˇˇˇˇˇˇˇˇˇˇˇ 0N" 8>˝*∫"ERROR #";‚(222);" IN LINE #";‚(218)»‚(219) 256 ™>+∫"IF YOU HAVE BEEN ALREADY TYPING IN TEXT":∫"YOU CAN RECOVER IT BY ENTERING: ":∫:∫" GOTO 1300 (RETURN) ":Ä ±H 40" (=A'∫"12 CHAR/INCH 85 45" K=B'∫"16.5 CHAR/INCH 115 60" n=D'∫:û:Ñ"SPECIFY LINE LENGTH ";SL õ=E'Ñ"# OF CHARACTERS TO INDENT FOR TAB ";TB ß=L'SL–SL»1 œ=Q'Ñ"HIT RETURN KEY TO BEGIN ";XX$:ù:± >¯*∫Á(9)"40N":ä0:∫:≤ PRINT "" IS PRINT"CTRL I 4 ¬ÿŒ¥ ¬ÿŒ ≥" %\πÑ!Õ `¬Õ¬± –ÿŒµ ¬ÿŒ ≥" %\±Ë=œ `”»”∞ $≤◊ `¡@9(¡) ƒÿŒ∑ ƒÿŒ ≥# ”ÿŒ∑ ”ÿŒ ≥# %\π∂;– `¡@9(¡) /?± r∑ ƒÿŒ∑ ƒÿŒ ≥# ”ÿŒ∑ ”ÿŒ ≥# %\π∂!“ `”»Ã± ƒÿŒ≥ ”ÿŒ ≥" %\±÷ ]†™™†¬œÕ¬†Œ’Õ¬≈“†±E◊ `¬Ÿ±∞ $≥,f∞ `¬Ÿ± %”√‘q”√‘± _≤» &¥ ]†™™†“≈”≈‘†ƒ≈”‘“œŸ≈“†¡Œƒ†√œ’Œ‘ƒœ◊Œ π ƒÿŒq± ƒ√‘q/?± r\± [ º ]†™™†“≈”≈‘†”’¬†¡Œƒ†√œ’Œ‘ƒœ◊Œ3æ Δÿœq”ÿœ\± ”√‘q/?± r”ÿŒq≥# ””q/?≥ r± [« ]†™™†Δ…“…Œ«†”≈—’≈Œ√≈U» ¬Õ¬q.?6±ü?r”»Ãq.?6±û?r`¬Õ”∞ $≤œ `¡@9(Œ) –ÿŒ¥ –ÿŒ ≥# À I–I»1:ù % à ¢19:å…868:∫"REC #";I J Õ ¢20:å…868:û:Ñ"ACCOUNT #";W$(I,1) S œ ∞270 p “ ≠W$(I,1)–"END"ƒù:I–I…1:± ô ÷ ≠W$(I,1)–"REDO"ƒI–I…1:I–I»(I–0):´204 ¬ ◊ ≠W$(I,1)–"REDO"ƒI–I…1:I–I»(I–0):´204 Ÿ ≠W$(I,1)–"EDIT"ƒIS–I:Ñ"RECORD # TO EDIT?";I:W$(IS,1)–"":´ÅN–1¡12:∫N$(N); ! x ñ20:∫N$(N»12) ( Ç ÇN . á ∫ e å ≠FL–1ƒû:∫"1=MC 2=VSA 3=AMEX 4=GAS 5=OTHER" î é ≠FL–2ƒû:∫"ENTER CHECK# 999 FOR CASH ENTRY" ƒ ë ∫"TYPE ACCOUNT#, 'REDO', 'EDIT' OR 'END'":ù ñ ∫ ⁄ † π34,‚(37):± ‡ Ø ± ˜ » ≤ ** INPUT DATA ** ∞100–WK(H,F):WK(H,F)–WK(V,F):WK(V,F)–TK ) F Ç S H T$–W$(H,6):W$(H,6)–W$(V,6):W$(V,6)–T$ ] K H–H…M i P ≠H—1ƒ87 q U ´30 { W J–J»1 á Y ≠JœKƒ23 è [ ´25 © _ ü:∫"SORT COMPLETED":ù Ø a ± ‘ d ≤ ** WRITE ACCOUNTS ON SCREEN ** ˚ i ó:ñ8:û:∫"* ADD ";F$;" RECORDS *":ù n ** ≤ ';' PRINTING & ∫√PK…SY)V$; > SY–SY»(PK…SY)»„(V$) D ± _ ≤ END OF LINE PRINTING n ∫√PK…SY)V$ | PK–0:SY–0 Ç ± ü M–R:≤ ** SORT ROUTINE ** ¥ M–”(MÀ2):≠M–0ƒ95 ¬ J–1:K–R…M H–J ‘ V–H»M Ó ( ≠WK(H,SR)—WK(V,SR)ƒ87 ˘ 2 ÅF–1¡5 # 7 TK∏E! ≤ ************************* A ≤ ** APPLE T.R.A.C. ** a ≤ ** MICRO-SPARC, INC. ** Å ≤ ** P.O. BOX 325 ** ° ≤ ** LINCOLN MASS 01773 ** ¡ ≤ ** COPYRIGHT (C) 1981 ** · ≤ ************************* ´10000:≤ ** HEADER ROUTINE ˛ z ˇ # ? ”’–≈“†◊≈¡÷≈“†††††††††††††††††† ¡”√……†œ÷≈“≠–“…Œ‘†ƒ≈Õœ††††††††† Δœœ‘¬¡ÃƆ†††††††††††††††††††† –œ…Œ‘≈“†”’¬“œ’‘…Œ≈†††††††††††† Õœ“≈†÷≈“”¡‘…Ã≈†√¡‘¡Ãœ«†††††††† »…“≈”†–¡√À†“œ’‘…Œ≈†††††††††††† “≈Õ†“≈Õœ÷≈“††††††††††††††††††† ”…ÕœŒ††††††††††††††††††††††††† ”…ÕœŒ”»¡–≈”††††††††††††††††††† «àààààààà††††††††††††††††††††† ¡àààààààà÷œÃ†±†Œœ†¥††††††††††† »àààààààà††††††††††††††††††††† ΔơƔƑƆ¡Œ¡ÃŸ”…”†††††††††††††! ‘ƜƒƫƻƆ–Ã’”†††††††††††††††8 …Œ–’‘¡ÃƆ†††††††††††††††††††† «“†–“…Œ‘†††††††††††††††††††††† «“†Õ¡√»†Ã¡Œ«†††††††††††††††††† Õ¡√»†Ã¡Œ«†”√“≈≈Œ†ƒ’Õ–††††††††† Δ“≈≈ø††††††††††††††††††††††††† Δ“≈≈øÆœ¬ ††††††††††††††††††††† ”‘¡“ơƆ††††††††††††††††††††† !”‘¡“Æ”»¡–≈”††††††††††††††††††† "¡…“Ø”≈¡†¬¡‘‘Ã≈†††††††††††††††† ¡…“”≈¡†Õ¡√»†Ã¡Œ«†††††††††††††† ≈àààààààà††††††††††††††††††††† ¡àààààààà÷œÃ†±†Œœ†≥††††††††††† Δàààààààà††††††††††††††††††††† Ãœ◊†“≈”†”»¡–≈†¡””Ÿ†Ã¡Œ«††††††† ”–¡√≈†¡Œ…Õ¡‘…œŒ††††††††††††††† «’…ƒ≈ƒ†Õ…””…Ã≈†«¡Õ≈††††††††††† ”‘¡“†¡‘‘¡√À†¬¡”…√††††††††††††† »…≠“≈”†††††††††††††††††††††††† ”‘¡“†¡ØƆ†††††††††††††††††††† ”‘¡“†¡‘‘¡√À††††††††††††††††††† ¡––Ã≈†‘Æ“Æ¡Æ√Ɔ†††††††††††††††G " ‘“¡√†«“¡–»†“œ’‘…Œ≈†††††††††††† ”–¡√≈†Õ¡⁄≈†††††††††††††††††††† √àààààààà††††††††††††††††††††† ¡àààààààà÷œÃ†±†Œœ†≤††††††††††† ƒàààààààà††††††††††††††††††††† Ãœ◊≠“≈”†”»¡–≈◊“…‘≈“††††††††††† Ç»≈ÃÃœ††††††††††††††††††††††††† ÑÃœ¡ƒ≈“Æœ¬ ∞††††††††††††††††††† Ñ…Œ‘¬¡”…√††††††††††††††††††††††* ¡àààààààà††††††††††††††††††††† ¡àààààààà÷œÃ†±†Œœ†±††††††††††† ¬àààààààà††††††††††††††††††††† "»…“≈”†Õ’Ñ…√œÃœ“†À¡Ã≈…ƒœ”√œ–≈† j\≤±aa(†††††††††)\≤±a",j`»%»œÕq»œÕ≥ `7»%÷…”q÷…”≥ >6jΔÖœ”q≤ ƒœ◊Œq± Ÿ‘«q± »q»± LU…V± W±∞Y…L_≥,>öjΔÖœ”q≤ ƒœ◊Œq± Ÿ‘«q± »q»± LU…V± W±∞Y…L_≥,K§jwU…V± W¥êY…Δqπc ΔÖœ”ΔÖœ”qΔÖœ”/?Δr\≤±aU…V± W≥,Y…_≥˛ ≥, ®a`ƒœ◊Œ¥ Ÿ‘«∞ $≤±aa()G[±aU V± W≥ UÀV± W± 5≤a q.?6±–?r.?6±–?r.?6±–?r.?6±–?r.?6±–?r.?6±–?r≥aYÀU V± WπZ Y Z [*xiwΔq/?∂A r`ΔÖœ”Δ±e $≤j\≤±a_≤6jjU…V± WµÙY… jKM6π®o± P± dµ2 e± ja(Δ…≈뜡Ã)dµ2 e≤ˇ "_≥,≥b2?∞ r_µ≥ NKM6π®o± P± dµ2 e± *Na(‘œ’√»ƒœ◊Œ)dµ2 e≤ˇ 4N\≤±aa(†††††††††††)\≤±aa()F>N`»%»œÕq»œÕ∑ `7»%÷…”q÷…”∑ ΔÖœ”q≤ ƒœ◊Œq± Ÿ‘«q± »q»± 5CN`‘…Õ≈$≤HN—‘“q—‘“± `—‘“µ $≥: —‘“q¥ L_≥, HN\≤±aU…V± W≥,Y…L_˛ `Ÿ‘« ± $≥ ΔÖœ”q±d ΔÖœ”»q»± 3 Ÿ‘«q± ƒœ◊Œq± `±d ΔÖœ” Ÿ‘«%Ÿ‘«q±d ΔÖœ”& `‘…Õ≈$≥,0 —‘“q—‘“± : ‘…Õ≈q≤å `—‘“µ %Q<? KM6π®o± P≤ b—‘“cP± a(—’¡“‘≈“)U…V± W±∞Y…LD `—‘“≥ $≥,*N »q∞ ΔÖœ”q≤ Ÿ‘«q± ƒœ◊Œq± ŸŸ$≥ _¥ê∏ \≤®a$¬ U…V± Wµ `ÿ-…rÿ Ÿ-…rŸ$≥à Y…ƒ _≥à \≤®a'à U V± W∏ f¥ iÿ-…rjÿ-…r± kŸ-…r÷ UÀV± W¥( YÀ ‡ fπ iÿ-…rjÿ-…r± kŸ-…rÍ UÀV± W¥( YÀZ ¬¬q∞ HÙ ƒœ◊Œqƒœ◊Œ± `ƒœ◊Œ µ ‘…Õ≈ Ÿ‘«± $≥,`ƒœ◊Œ µ Ÿ‘«± 7‘…Õ≈$≥0 *X–0¡39:∫"*";:ÇX:∫:¢10:ñ(15):û:∫"T.O.U.G.H.":ù:ñ5:û:∫"COPYRIGHT 1980 (C) BY MICRO-SPARC":ù « 3 ¢14:∫"1= TYPE TEXT AND STORE ON DISK":∫"2= READ DISK AND PRINT":∫"3= READ DISK & EDIT/DELETE/INSERT TEXT" 4 ∫"4= ADD SENTENCE(S) TO TEXT":¢20:ÅX–0¡39:∫"*";:ÇX:∫(X)):M$–Í(L$(X),XX,1) D û:≠M$œÁ(96)ÕM$—Á(123)ƒM–Ê(M$)…32:M$–Á(M):ù T ≠M$—Á(64)ƒù é ∫M$;:ù:ÇXX:∫:ÇX:¢23:∫"HIT ANY KEY TO CONTINUE ";:æZZ$ ò ó:ÇZZ ∂ ≠SLœ–80ƒCC–‚(37)…2:¢1:¢CC º # ± Ò ( ∫Á(12):π36,SL…10:∫"PAGE ";PG:∫:PG–PG»1:PK–PK»2:± Y 2 ó:â:ù:¢8:ÅJECT WILL YOU USE?":∫"(PRESS RETURN TO SEE CATALOG)":Ñ" ";ST$:≠ST$–""ƒ∫Á(4);"CATALOG":´14 h ∞10000:´50 r å…936 á ≠SL—40ƒPZ–12:´22 ° ≠SLœ39ÕSL—80ƒPZ–6:´22 ™ PZ–4 ∫ ≠R2—œIƒPZ–4 Õ ÅZZ–R1¡R2»1«PZ È ÅX–ZZ¡ZZ»PZ…1:≠XœR2ƒÇ:± ∫X;")";:ÅXX–1¡„(L$******************* ≤ ≤ RUNS ON 32-48K APPLE II OR APPLE II PLUS, APPLESOFT II (ROM , DISK II, PARALLEL OR SERIAL PRINTER (WITH PRTR CTRL CHANGES IN LINES 1215-1220, 1248-1250) » ∫Á(4);"MAXFILES1" · å‚(103)»‚(104) 256»5 È â:ó Y ∫:∫"WHAT TITLE/SUB¨6' ≤©Ö8•hÖ9LÍÑG†"ëg§GH© ë(hL˝ † - 3 •´11000 S ≤ ************************* s ≤ ** T.O.U.G.H. SYSTEM ** ì ≤ ** MICRO-SPARC, INC. ** ≥ ≤ ** P.O. BOX 325 ** ” ≤ ** LINCOLN, MASS 01773 ** Û ≤ ** COPYRIGHT (C) 1980 ** ≤ ****** !!! " ÿƒqÿƒ± [$‚dÃœ√e± Ãœ√qÃœ√± ÿƒqÿƒ± [0`–‘∞ $±FdÃœ√e¥ Ãœ√qÃœ√± ÿƒqÿƒ± [$FdÃœ√e± Ãœ√qÃœ√± ÿƒqÿƒ± [ †¨Ã)FÃœ√”‘+˝a(Õ≈Õœ“Ÿ†¡ƒƒ“≈””∫††ÃœΩ†)FÃE(††»…Ω†)F»Q0Ë`–‘∞ $±dÃœ√e± Ãœ√qÃœ√± ŸƒqŸƒ± [$dÃœ√e± Ãœ√qÃœ√± ŸƒqŸƒ± [0L`–‘∞ $±~dÃœ√e≤ Ãœ√qÃœ√± ŸƒqŸƒ± [$~dÃœ√e± Ãœ√qÃœ√± ŸƒqŸƒ± [0∞`–‘∞ $±‚dÃœ√e≥ Ãœ√qÃœ√± W≤ d∏ e∞ dµ eÿœÃƒd∂ eŸœÃƒd≤ e±¢ M≤ 6⁄dµ eÿd∂ eŸd∏ e≤› d≤ e±¢ M≤ ÿœÃƒqÿŸœÃƒqŸÓYÿZŸ$a(”»¡–≈†¡ƒƒ“≈””∫†ÃœΩ)FÃE(†»…Ω)F»@Ûo≤ S(≈Œ‘≈“†±Ω®Œ≈◊†”»¡–≈©††≤Ω®≈Œƒ©)'≈`≈≤ $∑¯M6π®_≤ 9¯M6π®a(Œœ◊†Ÿœ’†√¡Œ†ß¬”¡÷≈†®Œ¡Õ≈©¨†¡)F”‘E(≈ÿ≈qÿƒŸ≈qŸƒ5äo≤ `–‘∞ %a(–Ãœ‘†œŒ†)`–‘ ∞ %a(–Ãœ‘†œΔΔ)_µ˛!ºdÃœ√e∞ Ãœ√qÃœ√± dÃœ√e∞ VæM6π®a(”»¡–≈†√œÕ–Ã≈‘≈ƒÆ†‘œ†”¡÷≈†œŒ†ƒ…”À¨†’”≈∫)a(¬”¡÷≈†®Œ¡Õ≈©†¨¡)F”‘E(†¨Ã)FÃœ√”‘2¡UŸV± W≤ Xµ »q”‘≤ Ãq”‘ ≤ d≤eÃd≤e» ¬d≤ e±¢ 9ΔUÿV± ††ÃΩÃ≈Δ‘††ΔΩΔ…Œ…”»)˛Àq.?6± @r`À ±Ä $µ˛d6±?e∞ `À<(’)r%\±Ë`À<(ƒ)r%\±L `À<(“)r%\±∞&`À<(Ã)r%\±0`À<(–)r%–‘q6–‘S`À<(Δ)r$∑º?X`ÿƒ ∞ %ÿƒq∞ `ÿƒ≥ %ÿƒq≥ `Ÿƒ ∞ %Ÿƒq∞ `Ÿƒ≥ %Ÿƒq≥ /]f∂ gÿƒhŸƒ`–‘ ∞ %f∞ gÿ≈hŸG AND PLANNING!":∫ 6ë ∫"HIT ANY KEY TO BEGIN":æK$:∫K$ F» ó:ÅX–4¡0«…1 Õ ∫"FOR THE ";X 20;"-";(X»1) 20;" % OF THE SALESFORCE" ¡“ ∫"ENTER THE PROBABLE SALES OF '";PN$(I);"'":∫"FOR EACH MONTH" Õ‹ ÅN–1¡12 Ô· ∫M$(N);" SALES=";:ÑP(I,X»1,N) /Ê ÇN:ó:ÇX:≤ REMONTH FOR THE NEXT 20%":∫"OF YOUR SALESFORCE. YOU WILL CONTINUE" πá ∫"ENTERING THE 'SALES MODEL' ALL THE WAY":∫"THROUGH TO THE MONTHLY SALES FOR THE":∫"BOTTOM 20% OF YOUR SALESFORCE." å ∫:∫"IT'S A TEDIOUS PROCESS BUT PAYS BIG":∫"DIVIDENDS IN FORECASTINT THE UNIT SALES THAT ARE MADE EACH":∫"MONTH BY 5 GROUPS OF SALESMEN." ƒ} ∫:∫"FIRST, YOU'LL BE ASKED TO ENTER THE":∫"AVERAGE SALES FOR EACH MONTH FOR THE":∫"TOP 20% OF YOUR SALESFORCE. THEN YOU" AÇ ∫"WILL BE ASKED TO ENTER THE AVERAGE":∫"SALES FOR EACH ICE":∫"1 = $ DOLLARS":∫"2 = $100'S OF DOLLARS":∫"3 = $1000'S OF DOLLARS";:ÑUN É q Ñ"WHAT IS THE SALES VALUE/UNIT?";SV(I):ó:≠Iœ1ƒ200 Õ s ∫"NOW PLEASE ENTER THE SALES MODEL FOR":∫"' ";PN$(I);" ' BY MONTH.":∫ Fx ∫"THIS WILL INVOLVE MAKING A JUDGEMENT":∫"ABOU90:ÜPN$(NP),P(NP,5,12),PN(NP,12),U(NP,12),D(NP,12):∞350:´500 i d Ñ"NUMBER OF PRODUCTS TO BE MODELED? ";NP ù i ÜPN$(NP),P(NP,5,13),PN(NP,13),U(NP,13),D(NP,13) ™ n ÅI–1¡NP: ‰ o ∫"WHAT IS THE NAME OF PRODUCT #";I:ÑPN$(I):∫:≠Iœ1ƒ113 M p ∫"ENTER THE UNITS OF PROR N";:ÑXX$:≠XX$–"Y"ƒ∞5000 £ 1 ∫:∫"TO ADJUST THE REPORT WIDTH:":∫"ENTER 'G' FOR > 80 COLUMNS":∫"ENTER 'L' FOR <= 80 COLUMNS":∫:Ñ"ENTER G OR L";ZZ$:K–6:≠ZZ$–"G"ƒK–5 € 2 D$–Á(4):Ñ"READ OR CREATE SALES MODEL. R OR C? ";XX$ 3 ∫D$;"NOMONI,O,C" < 7 ≠XX$–"R"ƒ∞3W$;:SY–SY»(PK…SY)»„(W$):± * # ∫√PK…SY)W$:± _ ( ÜM$(13),T(13),NZ(20),PZ(20),NH(13),MH(13),MO(13) l ) ÜCC$(20) Ç - ÅN–1¡12:áM$(N):ÇN Δ / ó:∫:∫:∫¿10)"FORECAST AND SALES TREND":∫¿12)"(F.A.S.T) ANALYSIS" 0 ∫¿11)" MICRO-SPARC, INC. ":∫:∫"INSTRUCTIONS? ENTER Y Ï ! ≤ ************************* A ≤ ** F.A.S.T. ANALYSIS ** a ≤ ** MICRO-SPARC, INC. ** Å ≤ ** P.O. BOX 325 ** ° ≤ ** LINCOLN, MASS 01773 ** ¡ ≤ ** COPYRIGHT (C) 1980 ** · ≤ ************************* Û SY–0:PK–0:´40 ∫√PK…SY) Ê(K$)»32:K$–Á(H):≤ TEST FOR ALPHA CHARACTER AND CONVERT TO LOWER-CASE Uq ≠UC–1ƒUC–0 dr ≠XS–1ƒUC–1 vs ≠K$œÁ(31)ƒ240 òx ≠K$–Á(27)ƒUC–1:´105:≤ ESC KEY æy ≠K$–Á(19)ÕXS–1ƒXS–0:´130:≤ CTRL S ÷z ≠K$–Á(19)ÕXS–0ƒXS–1 Î{ ≠K$–Á(24)ƒó:´865 OÇ ≠UC–0ÕK$œÁ(64)ÕK‚(104) 256»34)) 6k ≠K$—Á(32)ƒK$–Á(Ê(K$)»64):UC–1:´109 Ol K$–Á(Ê(K$)…128):UC–0 ~m ≠UC–1ÕK$œÁ(64)ÕK$—Á(91)ƒû:∫K$;:ù:UC–0:´240 ≤n ∫K$;:≠K$–Á(34)ƒK$–Á(39):≤ SWITCH QUOTATION MARK ·o ≠K$–"@"ƒ500:≤ '@" KEY TO TRIGGER DISK SAVE Fp ≠UC–0ÕK$œÁ(64)ÕK$—Á(91)ƒH–E AFTER LAST WORD IN EACH LINE":ù:ÅX–0¡39:∫"*";:ÇX:∫ x_ π34,‚(37):û:∫"ENTER TEXT..LINE # ";I:ù:ÅKK–1¡SL…1:∫Á(95);:ÇKK:∫ ë` ≠SL—–40ƒCC–‚(37):¢CC ≤b ≠SLœ40ÕSL—–80ƒCC–‚(37)…1:¢CC Ãd ≠SLœ80ƒCC–‚(37)…2:¢CC ÷h N–N»1 Ìi æK$:≠K$—œÁ(21)ƒ109 j K$–Á(‚(‚(103)»CE A WORD":∫"CTL 'Y'","= LINE, NO JUSTIFY" Ñ\ ∫"RETURN KEY","= LINE, JUSTIFY":∫"CTL 'T'","= TAB":∫"'@' KEY","= END, AND WRITE DISK" Ó] ∫"'ESC' KEY","= CAPITAL LETTER":∫"CTL 'G' (BELL)","= IN LINE OPTIONS":∫"CTL 'S'","= SHIFT LOCK CAP'S" 4^ û:∫"TYPE SPAC #5 û:Ñ"ENTER YOUR SELECTION";V:ù P6 ≠V—1ŒVœ4ƒ∫"INVALID ENTRY..TRY AGAIN":´53 `< ≠V–1ƒ∞10023 äA ≠V–2ŒV–3ŒV–4ƒü:∫"READING DISK":ù:´600 *[ â:ó:ÅX–0¡39:∫"*";:ÇX:∫"CTL 'X'","= ABORT CURRENT LINE":∫"RIGHT ARROW","= COPY CHARACTER":∫"LEFT ARROW","= BACKSPAF ó ÅI–0¡39:∫"*";:ÇI M ∫"* *"; ~( ∫"* Nibble Magazine Programs *"; Ø- ∫"* *"; ‡2 ∫"* 1980 *"; 7 ∫"* 1≠XX$—œ"Y"ƒ500 $6∫D$;"OPEN MODEL" :7∫D$;"WRITE MODEL" B;∫NP J=∫UN V@ÅI–1¡NP bB∫PN$(I) mD∫SV(I) xEÅX–1¡5 ÑFÅN–1¡12 íH∫P(I,X,N) úJÇN:ÇX ®LÅN–1¡12 µM∫PN(I,N) øNÇN:ÇI ’O∫D$;"CLOSE MODEL" fiT´500 Û^∫D$;"OPEN MODEL" c∫D$;"REAMOVE HOME INSTRUCTION IN ORDER TO SCROLL MONTHS Ü ó:∫"NOW ENTER THE PROBABLE SALES (BY MONTH)":∫"FOR A TYPICAL NEW HIRE SALESPERSON" í˙ ÅN–1¡12 ¥∫M$(N);" SALES ";:ÑPN(I,N):ÇN Õó:∫"NEXT PRODUCT":ÇI ˝,ó:Ñ"STORE SALES MODEL ON DISK? Y OR N.";XX$ ÅX–1¡I…1 ∫Á(34);L$(X) $ÇX 4∫D$;"CLOSE" c≠RV$–"B"ƒ±:≤ RETURN TO CALL FROM LINE 1067 z ∫D$"IN#0":∫"END":Ä õXX–0:≤ *** READ DISK FILE *** µZ∫D$;"OPEN TFILE-";ST$ œ]∫D$;"READ TFILE-";ST$ ÷bÑI fidÑSL ÊfÑTB ÒqÅX–1¡I vå768,L$(X)OUTINE !.≠MU–2ŒMU–3ŒV–3ƒ∫Z:´305 (/∫I E1ÅKK–1¡SL…1:∫Á(95);:ÇKK:∫ ]6≠SL—41ƒCC–‚(37):¢CC ;≠SLœ–41ÕSL—–80ƒCC–‚(37)…1:¢CC ô@≠SLœ80ƒCC–‚(37)…2:¢CC üE± ±Ù≤ ** WRITE ** Àˆ∫D$;"OPEN TFILE-";ST$ Ê˘∫D$;"WRITE TFILE-";ST$ Ô˛∫I…1 ˜ ∫SL ˇ∫TB )ƒ1300:≤ CTRL G GETS THE EDIT OPTIONS LIST c ≠K$–Á(19)ƒ290:≤ CTRL S LOCKS/UNLOCKS CAPITAL LETTERS Å ≠K$—Á(32)ƒLL–LL…1:FL–FL…1 ñX$–X$»K$:LL–LL»1 ¢FL–FL»1 Ã"≠LLœ–SL…7ƒ∫Á(7);:≤ END OF LINE BEEPER ’'´105 ,≤ SET UP TEXT ENTRY SCREEN FORMAT SUBRRS UNJUSTIFIED END-OF-LINE U‹ ≠K$–Á(20)ƒÅX–1¡TB:∫S$;:X$–X$»S$:FL–FL»1:LL–LL»1:Ç:´105 èÊ ≤ *** BUILD IN SPACES BETWEEN WORDS AND SENTENCES *** ÷ ≠K$–" "ÕX$—œ""ÕÈ(X$,1)—œ" "ƒA$(N)–X$»S$:X$–"":LL–LL»1:FL–FL»1:´104 Â˙ ≠UC–1ƒUC–0 Ùˇ ≠XS–1ƒUC–1 *≠K$–Á(7™ ≠K$–Á(8)ƒN–N…1:FL–FL…(„(X$)»„(A$(N))):LL–LL…(„(X$)»„(A$(N))):ñFL»1:X$–"":´105 ¥ ≠K$–"@"ƒ500:≤ '@" KEY TO TRIGGER DISK SAVE èæ ≠FL–40ƒFL–0 Õ» ≠K$–Á(13)ƒ800:≤ RETURN KEY TO TRIGGER END OF LINE SPACING “ ≠K$–Á(25)ƒA$(N)–X$:X$–"":´950:≤ CNTL-Y TRIGGE$—Á(91)ƒH–Ê(K$)»32:K$–Á(H):≤ TEST FOR ALPHA CHARACTER AND CONVERT TO LOWER-CASE tá ≠K$–Á(26)ŒK$–Á(23)ƒK$–Á(Ê(K$)»5) ∞ñ ≠K$–Á(8)ÕN–1ÕLL–0ƒ∫"":X$–"":´105:≤ LEFT ARROW BACKSPACE Âó ≠K$–Á(8)ÕÈ(X$,1)—œ""ÕN–1ƒñ1:X$–"":LL–0:FL–0:´105 ˝† ≠K$–Á(8)ÕLLœ–40ƒ900 O s ¢ Ω0 Ë…$…%…&…'… (… )… *…+… L`ΔLVÊLVÊLVΔLVΔLdÊLdÊLdΔLd© Ö0§• ¯L•Ö0§• ¯L : √††††††††††††††…Œ‘¬¡”…√†††††††††††††ä–ä–≠Å¿© ÖH é˝¢/µ—ºdùdî— Û` πdô“ à˜©–Ö”– ≠d¨eÖ‘Ñ’8•“˝úÖ“ç•”È Ö”çºúπdë“»–¯©ˇÖÊ`¶‰é–¢–‡–¢ ©ˇùD•”}TÖfl•“Öfi©d†ç婆 êL§•‘¶È}ú™† πdëfi» –˜•“ç` †††††††Ãœ¡ƒ…Œ«†…Œ‘≈«≈“†¬¡”…√çç Ãœ¡ƒ…Œ«†¡––Ã≈”œΔ‘†¬¡”…√çç †††††††††††††…Œ‘œ†Õ≈Õœ“ŸÆçç Δ–¬¡”…Ü‚Δ‚0&¶‚Ωå›D–Úç•”}T穆 êL§Δ—–÷†ˇÑË ò$»їÑÂå(0PLê¢Ωd£çËΩdçL© Ö‘©¯Ö’† ±‘ë‘»–˘•’iÖ’–hL* „Ö€Ñ⁄© çÖÊÖ†±⁄ç ç»±⁄çç`¢ †ˇòùD ˙`¢–¢¨ÏàÑfl†Ñfi h ¡ *L‡©`®™,0¿ –˝,0¿Iˇ™ –˝,0¿à–Í`©d†ç婆 êhhL§¶È ‡ê†ç©dç©ç t©† êL§†πd穆 êL§©Ö— ÖÁ¶Á† Ωd —fi–Ë»¿êÒ∞•Ái#ÖÁ† Δ—–fiŒ–ΔL®äÈ™Ωd)ÖÈ Ωdç Ωd熡Ñ˻їÑ©† êL§¢ é¢ ËËPÊ˺d0ıG≠ à ©@Ö–„åÑ„©ˇùd˺d•Ê0åÜÁ €¶Á–ΔRäHòæåùDÖ‰•ËùTh™Ê—–Æ $Â0lp•Â ÄÖ•„ç :¢ DL DLŸlfi d Ôÿ 4¢ ÜÊ≠ ‡IL™≠Å¿≠ ‡ILH®≠ã¿≠ã¿©Uç –ç–Õ ––`Õ–≠Å¿≠Å¿(–Sò(≠Ä¿≠ ‡…L– ≠‡…Ò–L™≠Å¿≠Å¿©¿Öfi©Öfl©Ö$–,≠Ä¿≠ ‡… – ≠‡…–L™≠Å¿≠Å¿©°Öfi©Öfl©Ö$–hL © Ö% "¸† ±fi Ì˝»–ˆ¢ Ω⁄ Ì˝Ë–ıhH ©ˆ†ÖfiÑfl–© †ÖfiÑfl©dÖ“©Ö” òÑË»å©ç© Ÿπ¥–Hπ≥–H fi•âLÜ›L…fi•¢æ≤–®hÖ^Ê^hÖ_òH rΕ°H•†H•üH•ûH•ùHl^ †ˇh#…d j›ÑáhJÖhÖ•hÖ¶hÖßhÖ®hÖ©hÖ™E¢Ö´•ù`© Ö ± ∞LJÏ }‡∞d….Ù……U…»Á…"–•∏§πi ê» Á„L=Á…Δ–†–8•ù–†,† L„…¬–LT„…“êL fl ªfi {›©),©(,©,† —∏–L± ¢L‘†hhL◊› „flֆѰ¶¢ ܨ`¶† ±†™»±†®äLÚ‚L˘Í ± „flÖÖÑÜ e”¢ iöËËËËäËËËËËËÜ`† ˘Í∫Ω Ö¢•Ö§Ü æÁ 'Ά ¥Î∫8˝ ΩÖuΩÖvΩÖ∏ΩÖπL“◊äi™ö ∑ …,–Ò ± ˇ‹ {›$8$0∞`∞˝¢£L‘¶∏–ΔπΔ∏¢ $HäH© ÷” `fi© Öâ ∑ 8Èœê…∞…*IEâ≈âêaÖâ ± Lò›¶â–,∞{iêwe–LóÂiˇÖ^ e^®hŸ≤–∞g j›H ˝›h§á™V–_Fä*¶∏–ΔπΔ∏†Öâ–◊Ÿ≤–∞HêÖáÑටÄÜ∏Ñπ ∑ – $P ˝)ç ¢ˇ†–0 Z€ ‹€Ü∏Ñπ ± $1$P ËÜ∏© Ö Ö…"©:Ö©,Ö•∏§πi ê» Ì„ =Á {⁄Lr‹H≠ 0h JÏ• c⁄ ∑ …,Lq€•∏§πÖÑÄ•á§àÖ∏Ñπ ∑ 3 æfiLÒ€•–ÃLÜ€ £Ÿ»™–¢*»±∏_»±∏Ö{»±∏»Ö|±∏™ òŸ‡É–›L+‹•§Ä¶LSÿ† ±©fl†‹L:€`?EXTRA IGNORED ?REENTER –† \€Iˇ`•$…ê ˚⁄–!i)Ö$ê ıÊ…)L…fi(ê äÂ$ê™Ë – ± L◊⁄ W€–Ú Á„ Ê™† Ë ª±^ \€»…–Û €LD€© ,©? Ä…†êÛ Ì˝)H•Ò ®¸h`•0†ˇ–•{§|ÖuÑvL…fih$ÿ¢˛LÈÚ©Ô†‹ :€•y§zÖ∏Ñπ` „¢†© ç©@ ΀`…"– Åfi©; ¿fi =€L«€ Z€ „©,çˇ ,’≠ …–Lcÿ Z€L,’¶}§~©ò,© ÖÜÑÄ „flÖÖÑÜ•∏§πhL*ÿ ± ⁄…,Óh`¢ ÜPÜQ∞˜È/Ö•QÖ^…∞‘•P &^ &^ePÖP•^eQÖQP&Q•PeÖPêÊQ ± L⁄ „flÖÖÑÜ©– ¿fi•H•H {›h* m›–h rÎ ·† •†ëÖ»•°ëÖ`L'Îh†±†≈pê–ె≈o꧰ƒjê–•†≈i∞•†§°L∑⁄† ±† ’„•å§çִѨ ‘©ù† ÖåÑç 5ʆ ±åëÖ»±åëÖ»±åëÖ` =€ ∑ $)…¿9…√4…, …;D {›$0› 4Ì Á„Lœ⁄©Ñ?Ñ÷`•g§hÖ<Ñ=•i§jÖ>Ñ?`Δv(–Le÷ l÷L5Ÿ© ÷”•πH•∏H•vH•uH©∞H ∑ >ŸL“◊ ⁄ ¶Ÿ•v≈Q∞ ò8e∏¶πêË∞•g¶h ÷ê •õÈÖ∏•úÈ Öπ`–˝©ˇÖÖ e”ö…∞ ¢,¢ZL‘L…fihh¿B;ÖuhÖvhÖ∏hÖπ £Ÿòe∏Ö∏êÊπ`¢:,¢ ܆ Ñ•¶Öܱ∏Ë≈‰»…"–ÛÈhhh` {› ∑ …´©ƒ ¿fi•ù– ¶Ÿ∑ ∑ ∞L>ŸL(ÿ ¯ÊH…∞…´–âΔ°–ˇˇˇˇ∏êÊπ$Ú¶vË©# \€¶u•v $Ì W€ ± (ÿL“◊b-ÈÄê…@∞ ®π–Hπ –HL± LF⁄…:øL…fi8•gȧh∞àÖ}Ñ~`≠ ¿…É` S’¢ˇ$ÿLÈÚ…∞–<•∏§π¶vË ÖyÑz•u§vÖwÑxhh©]†”êL1‘L<‘–¢“§z–L‘•yÖ∏Ñπ•w§xÖuÑv`8•ØÂgÖP•∞ÂhÖQ ÿ Õ˛ ŸLÕ˛ ÿ ˝˛•gePÖi•heQÖj•RÖ÷ Ÿ ˝˛$÷Le÷LÚ‘©P† Ö<Ñ=©RÖ>◊Öц ◊ÖÑL‘±JH»±J®h`LN◊§≠0¿Ê–Ê–`ÍL,◊àL2◊–Χ ≠0¿Ê–Ê–`ÍLF◊à—LL◊–Î≠ˇ ®πñ◊Ö ≠˝JF –˘πñ◊8 ֻπñ◊e Ö © 8Ì˛Ö© Ö•–òÍÍLá◊Ê–Ê–`ÍLî◊–Ï ˆˆËË€€œœ√√∏∏ÆƧ§õõííääÇÇ{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# ! H• ⁄˝ò ä÷• ä÷h í÷»–‰Ê –fl¶>•ë ÑÑ Ê • E÷• E÷ &•≈>êÏ• ë Ê –⁄Ê –’`Ö• E Ö• EÖ •ë± ≈ÁH• ⁄˝• ä÷•ë ä÷h ä÷• ⁄˝• ä÷• ä÷ -ˇ©çLÌ˝ ⁄˝©†LÌ˝ÑÖ ä÷ -ˇ• EÖ†Fê#©† Ì˝•=…P©ƒi Ì˝©≠ Ì˝ò–©± Ì˝π”÷ Ì˝à÷§LÖ÷∞π∏∑∂µ¥≥≤±† ÑÑàò–† ◊Öц! ◊ÖÑ † 鯶/ – • ))–Ö âˆ"÷&±§6 ¢ µ ëBË ¥¸Δ/Ùêƒ`©T†’L∞’Üÿ8¢ˇµMıÀïœË˜ Ò T’¢ ,Ò T’¶ÿ` ˙¸© …¸Ö. ˙¸†$ ˝¸∞˘ ˝¸†; ϸE.Ö. ∫¸†4êL&ˇÍÍÍ¡<ÎH -ˇ í˝±< ⁄˝©† Ì˝©® Ì˝h ⁄˝©© Ì˝©çLÌ˝©çLÌ˝ç˘å˙©Lç¯`©√†’L∞’© –’©ˇ –’L:ˇÖ IˇÖ•=ÖÖ Ö † ÑÑÑ ¶>• ë»–˚Ê –ˆ¶>±≈ `Lk„ âˆ∞34Ù âˆL h8Œ …56!;<…79)ÿF:&‡◊8J©9j”*‘0v •¶ ©≠ Ì˝©æ Ì˝•¶ Â é˝ åˆ+<¢;—¬ LhÓ Lk„Ï‹Ù∞ ¿ 'ÿcÁg=%;! ,¢<+∂kΩı«,w( g¸ÂGŸ ⁄ı˜g¸˜G€˜ ] ‹Ò˝˝ $ › ∫ t Ω ∞<— ∠N Ã8 i| fl âˆÃ(| `©‹†‘L∞’§4π …™– Ê4¢µ<ï ˘`†±<ô ௠ç$ Ø”H ö”h .–Æ#` ˘“L}–≠%J ê” u– ö”äHò™ Ø”®h d—Æ#` ê”L– ˘“ Q” ;“Æ#` ˘“ Q” ö“Æ#`é#†2 í”ç'†( í”H≠(Ö≠)Ö† í”9¢ ¡∞1 êÊ®±e™»±m)®h`†±J–à±J`é#†±J™»±J®‡ÈêÌLhÓ† í”…¿∞Ù`é# Ò ˝˛© Ö<ç(eŒ®©Ö=ç)eœ∞%ƒ HÂÀh∞ Ñ>Ö?»–iÑJÖKÑÃÖÕ ˙¸© ˇÆ#•& •')*& ç"•'JJ)"ç"≠% m% ™ •0)ËJ–¸ç!äm%êÓ!ç `ÜÑ™JJJJÖSä)™ºÎ—ÑPI™ºÏ—»ÑR¨%¢ é*°ÖQ¢ÄÜTÜUÆ'•T8ePÖTê ÿ–•UeRÖUê Ÿ– –•QJJJ–”Ê–Ê°–…`ÜÑ™JJJJÖSä)™ºÎ—ÑPI™ºÏ—»ÑR¨%¢ é*°ÖQ¢ÄÜTÜUÆ'•T8ePÖTê ¿–•UeRÖUê Ÿ– –•QJJJ–”Ê–Ê°–…` ꔕ',Í—–"&∞,Û–i 8∞i#H•&i∞∞iÖ&h∞i f&i¸Ö'`•'i,Í—–Û&êi‡,.—•&iPIIÖ&≠&êi‡f&ê–H© ç ç!ç"hH8Ì HäÌ!ÖS∞ hIˇiH© ÂSÖQÖUhÖPÖThç é!òÌ"êIˇi˛ÖRå"fS8ÂP™©ˇÂQÖ ¨%∞ à–8•TeRÖT•UÈ ÖU±&E %0Q&ë&Ë–Ê k•S∞⁄ ˘–•TePÖT•UeQPŸÅÇÑàꆿ ˇ˛˙ÙÏ·‘≈¥°çxaI1ˇ – (© ç&≠W¿≠S¿≠P¿© Ö ≠&Ö† Ñ• ë ¢–»–ˆÊ•) –Ó`ç"é å!H)¿Ö&JJ&Ö&hÖ' &' &' f&•') &Ö'ä¿ †#i»È∞˚å%™ΩÍ–Ö0òJ≠$Ö ∞)` .–• Q&%0Q&ë&`$•0J∞I¿Ö0`à†'©¿Ö0å%• …¿• IÖ `•0 IÄ0‹©Å»¿(êfl† ∞€•Q)'©%01&–Ó*©%0•Q)±&E %0–Ó*Q&ë&•QeS)…j∞è00 V–MH(Q)»1 xÅX–1¡MO(Q) D{U(I,V)–U(I,V)»”((NZ(I) PN(I,X))À100».5) N~V–V»1 bÖÇX:V–MH(Q)»1:ÇI q∑Q–Q»1:´610 òº≤ DISTRIBUTE SALESFORCE BY PRODUCT ¢¡Q–Q…1 ÆΔÅI–1¡NP «ÀSP(I)–NS (PT(I)À100) Œ–ÇI ⁄≤ DISTRIBUTE SALESFORCE BY PRODUCTIVITY RANKI$(I);:ÑPT(I) ÇI XQ–1 WbÑ"# OF NEW HIRES PLANNED? 0 TO END ";NH(Q):≠NH(Q)–0ƒ700 àlÑ"HIRE AT THE END OF MONTH #? (1-12) ";MH(Q) úmNH(Q)–NH(Q) 100 ¿nÅI–1¡NP:NZ(I)–NH(Q) (PT(I)À100) ÷oPZ(I)–PZ(I)»NZ(I) ˚qMO(Q)–12…MH(Q):≤ MONTHS ON BOARD t:Ñ"# OF SALESMEN";NS:NS–NS 100 7ˆ≠UN–1ƒZ$–"($ UNITS)" P˜≠UN–2ƒZ$–"($ 100'S)" j¯≠UN–3ƒZ$–"($ 1000'S)" s˘CC–1 õ˙∫"COMMENTS? TYPE 'END' TO CONTINUE" ®˚ÑCC$(CC) ø¸≠CC$(CC)–"END"ƒ510 –˝CC–CC»1:´507 ‹˛ÅI–1¡NP ∫"% OF TIME TO BE SPENT ON ";PND MODEL" hÑNP iÑUN $jÅI–1¡NP 0lÑPN$(I) ;nÑSV(I) FoÅX–1¡5 RpÅN–1¡12 `rÑP(I,X,N) jtÇN:ÇX vvÅN–1¡12 ÉwÑPN(I,N) çxÇN:ÇI £|∫D$;"CLOSE MODEL" ¨Å´500 ¡Ü∫D$;"OPEN MODEL" ÷à∫D$;"READ MODEL" fiäÑNP Ùå∫D$;"CLOSE MODEL" ˙é± Ùó≠YY–0ƒA$(N…3)–A$(N…3)»S$:´860 S R≠FA–1ƒDMY–1:ÅX–1¡YY»1:A$(X)–A$(X)»S$:ÇX:FA–0:´860 è W≠FA–0ƒDMY–1:ÅX–N…2¡((N…2)…YY)«…1:A$(X)–A$(X)»S$:ÇX:FA–1 Δ \ÅX–1¡N…1:L$(I)–L$(I)»A$(X):A$(X)–"":ÇX:LG–„(L$(I)) Ó ]≠È(L$(I),1)–" "ƒL$(I)–Ë(L$(I),LG…1) ˙ ^≠MUœ0ƒ± `I≠LI—N…2ÕAF–0ƒDMY–1:ÅX–N…2¡((N…2)…LI)«…1:A$(X)–A$(X)»S$:ÇX:AF–1:´860 ê≤ ** # OF FILL SPACES NEEDED > THAN # OF WORDS ... MULTIPLE PASSES ** ù≠N—3ƒN–3 ∞ZZ–”(LIÀ(N…2)) ≈>YY–LI…(ZZ (N…2)) —@ÅM–1¡ZZ fiCÅX–1¡N…2 ÒHA$(X)–A$(X)»S$ ˚MÇX:ÇM O END OF LINE SPACING **** 6 L$(I)–"":≠N—–1ÕFL—–1ƒ864 \%A$(N)–X$:ÅX–1¡N:TT–TT»„(A$(X)):ÇX k*LI–SL…LL…1 ¡,≠LI—0ƒWK$–È(A$(N…1),‘(LI)»1):LE–„(A$(N…1))…‘(LI)…1:A$(N…1)–Ë(A$(N…1),LE)»"-":´860 ˛/≠LI—N…2ÕAF–1ƒDMY–1:ÅX–1¡LI»1:A$(X)–A$(X)»S$:ÇX:AF–0:´860 FADD DATA *** 0Δû:Ñ"REVIEW TEXT? Y OR N?";RV$:ù >«R1–1:R2–I Y»≠RV$–"Y"ƒR1–1:R2–I:∞18 vÀI–I»1:N–0:LL–0:FL–0:TT–0 ¢Õû:Ñ"BEGIN NEW PARAGRAPH? Y OR N?";NP$:ù ¥Œ≠NP$—œ"Y"ƒ725 Ì–L$(I)–"":I–I»1:∫Á(13):≤ INSERT EXTRA PARAGRAPH SPACE ı’´91 ≤ **** *x≠„(L$(X))œ1ƒL$(X)–È(L$(X),„(L$(X))…1) Cy≠„(L$(X))–1ƒL$(X)–"" I{Ç ]è∫RT$;D$;"CLOSE" åº≤ *** OPTION BRANCH AFTER READING DISK *** …Ω≠V–1ƒDMY–1:Ñ"PRINT TO PRINTER? Y OR N";XX$:≠XX$–"Y"ƒ1200 fiæ≠V–3ƒI–I»1:´1300 Îø≠V–4ƒ710 ı¡´1200 ≈≤ *** 0:ìA,B:ìC,D:ìE,F:ìG,H:´110 # ñ ´120 :J–J»2 z ≠J–75ƒ124 > { P–2 J:íZ:ìX,Y¡X»P,Y¡X»P,Y»P¡X,Y»P¡X,Y f | ≠J–75ƒJ–1:X–138:Y–77:P–2:Z–€(1) 7»1 ä ~ í0:ìL,M¡L»K,M¡L»K,M»K¡L,M»K¡L,M æ Ç A–A…7:B–B…5:C–C»7:D–D…5:E–E»7:F–F»5:G–G…7:H–H»5 » á N–N»1 Û å í0:ìA»7,B»5:ìC…7,D»5:ìE…7,F…5:ìG»7,H…5 ë ≠N–15ƒN–:¢23:∫"NOW ADD A FEW STARS!" L W ÅI–1¡100:X–€(1) 260»10:Y–€(1) 140»5:ìX,Y:ÇI Ç d ó:¢23:∫"NOW THE STARS AND SPACE PANEL ZOOM IN!":ù ô i X–138:Y–77:J–1:Z–3 … n A–135:B–75:C–145:D–75:E–145:F–85:G–135:H–85 ‰ x í7:ìA,B:ìC,D:ìE,F:ìG,H y L–X:M–Y:K–P:X–X…2:Y–Y…2W THE FIRST PLANET!" 5 9 ì9,0¡276,0¡276,159¡9,159¡9,0 B < ÅZ–1¡180 b > R–25:X–10»fl(ZÀ180 3.1415) R Ö A Y–96…fi(ZÀ180 3.1415) R:ìX,Y:ÇZ ß F ¢23:∫"NOW THE SECOND PLANET!" ∂ G ÅZ–180¡360 ◊ K R–20:X–275»fl(ZÀ180 3.1415) R ˙ P Y–60…fi(ZÀ180 3.1415) R:ìX,Y:ÇZ U ó% ∫"" ) ≤ ************************* I ≤ ** SPACE ANIMATION ** i ≤ ** MICRO-SPARC, INC. ** â ≤ ** P.O. BOX 325 ** © ≤ ** LINCOLN MASS 01773 ** … ≤ ** COPYRIGHT (C) 1980 ** È ≤ ************************* 7 ë:í3:ó:¢23:ü:∫"DRA *"; & < ÅI–0¡39:∫"*";:ÇI 0 F π34,7 P P ∫:∫Á(4);"BLOAD LOADER.OBJ0" Z Z å4096 ` d ó f i ∫ ï n ∫"This disk contains programs from Nibble" ø x ∫"Magazine Volume 1, 1980 and Nibble" ‡ Ç ∫"Express, Volume 1. Enjoy!" ) å ∫:∫"Press RETURN to CATALOG1160 ~í0:ìX,Y "àX–X»H:Y–Y»V:± 1∞≤ TEST HIT ǵ≠XœTXÕYœTYÕX—TX»TDÕY—TY»TDƒSC–SC»1:¢22:å…868:∫"A HIT! SCORE =";SC:S–50:´1300 Ï∫≠T–0ƒSC–SC…1:¢22:å…868:∫"A MISS! SCORE =";SC:S–10:í0:ìTX,TY¡TX»TD,TY¡TX»TD,TY»TD¡TX,TY»TD¡TX,TY:´1250 ƒ¢23:ñ22:å…868:T—50ƒV–V…1 !^≠PBœ–50ÕPB—–200ƒV–0 6h∞1100:∞1200:´210 IË≤ READ PADDLES kÚPA–ÿ(A) 50À50:PB–ÿ(B) 50À50:± }L≤ PLOT POINTS ±V≠X»Hœ278ŒX»H—1ƒí0:ìX,Y:X–140:Y–70:H–0:V–0:´1160 Â`≠Y»Vœ158ŒY»V—1ƒí0:ìX,Y:X–140:Y–70:H–0:V–0:´1160 ıtí3:ìX»H,Y»V y≠ZZ–2ƒNTROLLED MOTION , ≠XX–1ÕPAœ–50ÕPA—–200ƒH–0 I ≠XX–1ÕPBœ–50ÕPB—–200ƒV–0 _ ≤ CONSTANT MOTION â ≠XX–3ƒH–H»”(€(1) 3…1):V–V»”(€(1) 3…1) í "´360 ´ ,≤ ACCELERATED MOTION Ω 1≠PAœ200ƒH–H»1 Œ 6≠PA—50ƒH–H…1 Ê @≠PAœ–50ÕPA—–200ƒH–0 ¯ J≠PBœ200ƒV–V»1 T≠PB–1ƒ¢21:ñ20:∫"CONTROLLED MOTION" M π ≠XX–2ƒ¢21:ñ(20):û:∫"ACCELERATED MOTION":ù { æ ≠XX–3ƒ¢21:ñ(20):û:∫"CONSTANT MOTION":ù ê » ≤ CONSTANT SPEED © “ ∞1000:≤ READ PADDLES ∑ ◊ ≠XX–2ƒ300 « ‹ ≠PAœ200ƒH–2 ◊ Ê ≠PA—50ƒH–…2 Á ˙ ≠PBœ200ƒV–2 ˜ ≠PB—50ƒV–…2 ≤ COTRACER' OPTION (2) ";ZZ ( ≠SCœHSƒHS–SC ? XX–0:SC–0:Q–…16336 [ T–60:TT–T:TD–13:XX–XX»1 j X–140:Y–80 ê ñ ë:í3:ì0,0¡279,0¡279,159¡0,159¡0,0 Æ † ∞1250:≤ DRAW FIRST TARGET ‘ ™ ≠HSœ0ƒ¢23:∫"PREV' HIGH SCORE=";HS ¯ Ø ¢21:å…868:û:∫"GUIDED MISSILE":ù ¥ ≠XX"ENTER THE NUMBER OF THE PADDLES YOU":∫"ARE USING. ENTER THE HORIZONTAL CONTROL":∫"FIRST, AND THEN THE VERTICAL CONTROL" † Ñ"SEPARATED BY A COMMA - A,B :";A,B ≈ ∫:∫"** A PERFECT SCORE IS 30 **" ∫:∫"NOW SELECT STANDARD MISSILE MOTION (1)":Ñ"OR THE 'w ≤ *********************** = ≤ * GUIDED MISSILE GAME * [ ≤ * MICRO-SPARC, INC. * y ≤ * P.O. BOX 325 * ó ≤ * LINCOLN MASS 01773 * µ ≤ * COPYRIGHT (C) 1980 * ” ≤ *********************** ¯ ó:¢10:∫¿10)"GUIDED MISSILE GAME" x ∫:∫ ONTINUE";X$:ù:¢5:å…958:CTR–1 $6∫X; >6π36,3:∫Ë(W$(X,6),10); ^6π36,17…„(W$(X,1)):∫W$(X,1); ~6 π36,23…„(W$(X,2)):∫W$(X,2); û6 π36,27…„(W$(X,3)):∫W$(X,3); æ6 π36,30…„(W$(X,4)):∫W$(X,4); œ6(W–Â(W$(X,5)) 7*T–T»W:≠FL–1ƒCC–Â(W$(X,2)):CC(CC)–CC(CC)»W:≤ 1¡5:CC(J)–0:Ç -5ˆó:∫¿7);F$;" SUMMARY REPORT" H5˚≠OM–3ƒ∫¿7)"SORTED ";A$ e5 ∫:∫"# * PAID TO * A# "; z5≠FL–1ƒ∫"CARD# "; è5≠FL–2ƒ∫"CHECK#"; ≠5 ∫" MO DY AMOUNT":∫:CTR–0 Ω5 π34,‚(37)»1 “5X–X»1:≠XœIƒ´5180 6CTR–CTR»1:≠CTRœ16ƒ¢24:û:Ñ"HIT RETURN TO CWK(X,2)–Â(W$(X,3)):WK(X,3)–Â(W$(X,5)) `4(BAL(WK(X,1),WK(X,2))–BAL(WK(X,1),WK(X,2))»WK(X,3):ÇX:± q4)≠PQ–3ƒ∫Á(18) Å4+∫Á(9);"40N" ò4-≠PQ–2ƒ∫Á(27);Á(19) ©4.≠PQ–3ƒ∫Á(18) ∏4/∫D$;"PR#0" fi40Ω:BU–1:´10002:≤ ** RETURN TO MENU ¯4ÏX–0:YY–T:T–0:≠XXƒT–YY 5ÓÅJ–)»B…C…1):V$–‰(BAL(X,N)):∞10 43 TL(N)–TL(N)»BAL(X,N) G3 ÇN:PK–0:SY–0:∫ N3 ÇX f3ÅX–1¡130:∫"-";:ÇX:∫ Ü3PK–1:V$–"** TOTALS ** ":∞10 í3ÅX–1¡12 §3P–TL(X):∞4295 Œ3B–14:PK–((X 9)»B…C…1):V$–‰(TL(X)):∞10 ◊3ÇX:∫ ·3%´4395 %4&ÅX–1¡R:WK(X,1)–Â(W$(X,1))::∫¿XN)MO$(6); a2¸∫¿XN)MO$(7);:∫¿XN)MO$(8);:∫¿XN)MO$(9);:∫¿XN)MO$(10);:∫¿XN)MO$(11);:∫¿XN)MO$(12) w2˛ÅX–1¡130:∫"=";:ÇX Å2ˇ∫:L–0 ù2 ÅX–1¡24:NM$(X)–N$(X):ÇX º2ÅX–1¡24:PK–1:V$–NM$(X):∞10 Ÿ2ÅN–1¡12:≠BAL(X,N)–0ƒ4362 Ó2P–BAL(X,N):∞4295 B–14:PK–((N 9;Á(31) 1Ú≠PQ–2ƒ∫Á(27);Á(20) .1Û≠PQ–3ƒ∫Á(15) ñ1ÙPK–30:V$–"YEAR-TO-DATE SPENDING ANALYSIS":∞15:PK–35:V$–"TODAY'S DATE: "»‰(MT)»"/"»‰(D)»"/"»‰(Y):∞15 •1¯XN–7:XJ–10 2˙∫¿1)"EXPENSE DESCR'";:∫¿XJ)MO$(1);:∫¿XN)MO$(2);:∫¿XN)MO$(3);:∫¿XN)MO$(4);:∫¿XN)MO$(5); FILE ** 10Ÿ≤ ** ADD CURRENT CARDS TO BALANCE ** F0⁄≠BZ–1ƒBZ–0:´4325 P0€∞4390 }0ÂF$–"CHECK #":∞2000:≤ ** READ CHECK FILE" í0Ê≠BZ–1ƒBZ–0:´4332 ú0Í∞4390 Ω0ÏSW–0:≤ ** SHUT OFF SWITCH ** –0Ì≠PRTYPE–1ƒ5500 fl0Ô∫D$;"PR#1" 0∫Á(9);"130N" 1Ò≠PQ–1ƒ∫Á(2) the disk.":π…16368,0:µ…16384,128:æZ$:â:ó ? ñ ∫:∫Á(4);"CATALOG" E † ø –I»1 a∞300 kN–1:LL–0 $ pX$–"" 2 yTT–0:FL–0 = z≠V–3ƒ± I |≠MUœ0ƒ± Y }≠WK$–""ƒ105 ¶ ~DMY–1:ÅMM–1¡„(WK$):M$–Í(WK$,MM,1):û:≠M$œÁ(96)ÕM$—Á(123)ƒM$–Á(Ê(M$)…32):ù ∂ ≠M$—Á(64)ƒù ı Ä∫M$;:ù:Ç:LE–„(WK$):FL–LE:LL–LE:A$(N)–WK$:N–N»1:WK$–"":´105 Ñ≤ BACKTHE BEST SCORE OF ";HS L≠SCœHSƒ∫"YOU BEAT THE PREVIOUS HIGH SCORE OF ";HS uıÑ"TO PLAY AGAIN, HIT RETURN ";X$:´18 € 2,Y3¡X2,Y3»TD !sìX3,Y2¡X3»TD,Y2 5xìX1,Y3¡X1,Y3»TD YñX1–X1…L:X2–X2»L:Y1–Y1…L:Y2–Y2»L `†ÇI o™S–50:´1250 Å‹≤ END OF GAME ™·ó:∫"YOUR SCORE FOR THIS GAME IS ";SC ‡Ê≠SC–30ƒ∫"A PERFECT SCORE! YOU'RE QUITE A PLAYER!" Î≠SC—30ÕSC—HSƒ∫"TRY TO BEAT í0:ìTX,TY¡TX»TD,TY¡TX»TD,TY»TD¡TX,TY»TD¡TX,TY ^#X1–TX:X2–TX»TD:X3–X1:Y1–TY:Y2–TY»TD:Y3–Y1 i(ÅI–1¡5 q-L–3 Ç2í3:≠I–5ƒ1380 ö<ìX3,Y1…L¡X3»TD,Y1…L ≤FìX2»L,Y3¡X2»L,Y3»TD PìX3,Y2»L¡X3»TD,Y2»L ‚ZìX1…L,Y3¡X1…L,Y3»TD ˘dí0:ìX3,Y1¡X3»TD,Y1 nìX–T…1:∫"TIME LEFT=";T:± 5‚í0:ìX,Y:X–140:Y–70:H–0:V–0 \ÁT–TT:TX–€(1) 200»20:TY–€(1) 100»30 ÖÍÅP–1¡S:R–‚(Q)…‚(Q)»‚(Q)…‚(Q)»‚(Q):ÇP §ÎTD–TD…1:≠TD–2ÕXX–3ƒâ:´1500 ∂≠TD–2ÕXX—3ƒ20 ËÒí3:ìTX,TY¡TX»TD,TY¡TX»TD,TY»TD¡TX,TY»TD¡TX,TY Óˆ± ˛≤ EXPLOSION 0:≤ CLOSE FILE .AûER–‚(222):π216,0:≠ER—œ5ƒ1998 BA†∫D$;"CLOSE ";F$ vA¢∫D$:≠E1–0ƒû:∫"NO RECORDS IN ";F$:ù:ÅX–1¡1000:ÇX úAßXX–0:´10500:≤ RETURN TO MAIN MENU ¿A'≤ * DISPLAY INTRODUCTION SCREEN »A'â:ó fiA'XL–‚(54):XH–‚(55) B'ñ7:∫"HOME FINANCE MANAGEMENT"00ƒE1–E1»100:I–100:´5760 7@{≠(R…E1)—–100ƒI–(R…E1):E1–R L@ÄÅZ–B1¡E1:XX–XX»1 f@Ö∫D$;"READ ";F$;",R";Z °@äÑW$(XX,1),W$(XX,2),W$(XX,3),W$(XX,4),W$(XX,5),W$(XX,6) ß@éÇ …@è∫D$:≠PRTYPE–1ƒSW–1:∞5100:SW–0 Ê@ê≠PRTYPE–2ƒSW–1:∞800:SW–0 ˆ@î≠E1—Rƒ´5740 Aô´5792 POSTED CARD/CHECK FILES H?ET–0:E1–0:ÅX–0¡5:CC(X)–0:ÇX:≤ INIT VARIABLES S?I•´5790 m?N∫D$;"OPEN ";F$;",L40" Ü?S∫D$;"READ ";F$;",R0" ç?XÑR ú?b≠R–0ƒ´5792 æ?l≤ ** PRINT RECORD 100 AT TIME «?nXX–0 Í?qü:∫"READ 100 RECORDS OF ";F$:ù @vB1–E1»1:≠(R…E1)œ1RESS RETURN FOR NEXT 3 MONTHS";XX$ )>ÂÇN O>ÍÑ"PRESS RETURN TO GO TO MENU";XX$ Y>Ô´5630 ù>ÙÅX–1¡R:WK(X,1)–Â(W$(X,1)):WK(X,2)–Â(W$(X,3)):WK(X,3)–Â(W$(X,5)) ÿ>˘BAL(WK(X,1),WK(X,2))–BAL(WK(X,1),WK(X,2))»WK(X,3):ÇX:± Ù>˛´10500:≤ RETURN TO MENU ?D≤ *LIST2:ZT–ZT»9:P–BAL(X,I):∞5340 S=«π36,ZT…C…1:∫BAL(X,I);:TL(I)–TL(I)»BAL(X,I):ÇI:∫:ZT–8 Ñ=Ã≠X–18ƒÑ"PRESS RETURN FOR REST OF REPORT";XX$ ã=—ÇX §=÷ÅYY–0¡39:∫"-";:ÇYY:∫ ¯=€∫"**TOTALS**";:ZT–8:ÅI–N¡N»2:ZT–ZT»9:P–TL(I):∞5340:π36,ZT…C…1:∫TL(I);:ÇI:∫:ZT–8 ">‡Ñ"P000)»(Pœ–10000):± 5<|≤ **YTD SPENDING-SCREEN VERSION @<©ó:ZT–8 ì<Æπ36,5:∫"YEAR-TO-DATE SPENDING ANALYSIS":π36,5:∫"TODAY'S DATE: ";MT;"/";D;"/";Y ´<≥ÅN–1¡12«3:∫"DESCR"; ⁄<∏ÅI–N¡N»2:ZT–ZT»9:π36,ZT:∫MO$(I);:ÇI:∫:ZT–8 Ù<ΩÅX–1¡24:∫Ë(N$(X),10); =¬ÅI–N¡N»LAST PART OF REPORT ";XX$ ;æÇX 5;√∫"** TOTALS **"; a;»P–TL(MT):∞5340:B–5:π36,9»B…C…1:∫TL(MT); í;ÕP–TL(MT…1):∞5340:B–5:π36,21»B…C…1:∫TL(MT…1); ∂;“P–TA:∞5340:B–5:π36,32»B…C…1:∫TA „;◊Ñ"PRESS RETURN TO GO TO MENU ";XX$:´5630 <‹C–(Pœ–10)»(Pœ–100)»(Pœ–1:å≠BAL(X,MT…1)–0ƒ5285 3:ëP–BAL(X,MT…1):∞5340:B–5 T:ñπ36,(20»B…C…1):∫BAL(X,MT…1); l:õP–PC(X,2):∞5340:B–3 â:†π36,(28»B…C…1):∫PC(X,2); û:•≠AV(X)–0ƒ∫:´5305 ¥:™P–AV(X):∞5340:B–5 Ã:Øπ36,31»B…C…1:∫AV(X) ‰:¥P–PC(X,3):∞5340:B–3 ;π≠X–18ƒÑ"HIT RETURN FOR 9:∫"CUR MO";:π36,18:∫"%";:π36,21:∫"LST MO";:π36,29:∫"%";:π36,32:∫"AVG MO" `9dÅX–0¡39:∫"=";:ÇX:∫ l9iÅX–1¡24 ~9n∫Ë(NM$(X),9); î9s≠BAL(X,MT)–0ƒ5260 Æ9xP–BAL(X,MT):∞5340:B–5 9}π36,8»B…C…1:∫BAL(X,MT); ‚9ÇP–PC(X,1):∞5340:B–3 ˇ9áπ36,(17»B…C…1):∫PC(X,1); ETURN FOR CARD TOTALS";X$:ù :8Fâ:ó:ñ10:∫"* CARD TOTALS *" w8H¢4:ÅX–1¡5:P–CC(X):∞980:∫CD$(X);:π36,(15»B…C…1):∫CC(X):ÇX †8K¢24:û:Ñ"HIT RETURN TO CONTINUE";X$:ù ®8Oâ:± Æ8Pó ‡8Uπ36,4:∫"TREND ANALYSIS FOR ** ";MO$(MT);" **" Ó8ZXM–4:XP–2 I9_∫"DSCR";:π36,*GRAND TOTALS AND CR CD TOTALS P7,T–”(T 100».5)À100:CC(CC)–”(CC(CC) 100».5)À100 ]7.P–W:∞980 q70π36,27»B…C…1:∫W {72´5135 í7<ÅX–0¡38:∫"-";:ÇX:∫ ü7>P–T:∞980 7@π36,1:∫"*** TOTALS ***";:π36,26»B…C:∫T Ó7B≠FL—œ1ƒ5195:≤ SKIP CARD SUMMARY D¢24:û:Ñ"HIT Rb”√¡q¡± [-» d±JCe∞ o≤ P± a¬@GP≥% a(´¥∞)ÿq∞ +Õ ”√q”√¥( o≤ P≥$ M6∏db”√¬q¬± [-,d±JCe∞ o≤ P± a√@GP≥% a(≠µ∞)ÿq∞ +1”√q”√µ2 o≤ P≥$ M6∏db”√√q√± [-êd±JCe∞ o≤ P± aƒ@GP≥% a(´≥∞)ÿq∞ +ï”√q”√≥ o≤ P≤–d±KCe∞ d±JCe∞ K M±D \≤_≤ M±õD ÿq.?±JCr`ÿ∞ %\ÿ±d ÿq.?±KCr`”‘%\∏ ‘q”( ŒqŒ± o≤ P± bŒ- `Œ±Ë Œ±d %\µà2 `”±d Œ∞ $≥∏ 7 _≤ -d d±JCe∞ o≤ P± a¡@GP≥% a(´µ∞)ÿq∞ +i ”√q”√µ2 o≤ P≥$ M6∏dz ]†™™™™™™™™™™™™™™™™™™™™™™™ ]†™™†”‘¡“†¡‘‘¡√À†¬¡”…√†™™ ]†™™†Õ…√“œ≠”–¡“√†††††††™™ ]†™™†–ƜƆ¬œÿ†≥≤µ††††††™™ ]†™™†Ã…Œ√œÃŒ†Õ¡””†∞±∑∑≥™™ ]†™™†√œ–Ÿ“…«»‘†√†±π∑π††™™ ]†™™™™™™™™™™™™™™™™™™™™™™™ ] a()# ]†’”≈†ÃœÕ≈Õ∫¥∞π∂†¡Œƒ†»…Õ≈Õ∫∏±π≤ \ 2. TAX-FEDERAL,23. VACATION,24. WATER [M +É JAN,FEB,MAR,APR,MAY,JUN,JLY,AUG,SEP,OCT,NOV,DEC ∂M+É MASTERCHARGE = $,VISA CARD = $,AM EXPRESS = $,GASOLINE = $,OTHER CARDS = $ 5. CLOTHES KIDS,6. DONATIONS,7. ELECTRICITY,8. ENTERTAINMENT ŒL˝*É 9. FOOD,10. GIFTS,11. HOBBY-ADULT,12. HOBBY-KIDS,13. HOME-GAS,14. HOME-MAINT',15. INSURANCE,16. INVESTMENTS,17. LIQ/CIG'S,18. MORTGAGE %M+É 19. TELEPHONE,20. TAX-LOCAL,21. TAX-STATE,20:∫"1 = CREDIT CARDS":ñ10:∫"2 = CHECKS" OKÜ)¢20:û:Ñ"ENTER YOUR SELECTION:";FL:ù lKã)≠FL—œ1ÕFL—œ2ƒ∞280:´10630 ÇKê)≠FL–1ƒF$–"CARD #" ôKö)≠FL–2ƒF$–"CHECK #" µK§)¥OM´1000,2000,3000,4000 @L¯*É 1. AUTO EXPENSE,2. BOOKS/MAGS.,3. BUSINESS EXP,4. CLOTHES ADULT,:∫"3 = SORT RECORDS ":ñ10:∫"4 = REPORT/LIST OPTIONS":ñ10:∫"5 = END THE SESSION" xJJ)¢11:û:Ñ"ENTER YOUR SELECTION: ";OM:ù ÅJT)∞270 ôJ^)≠OM–5ƒ∫"ALL DONE":Ä ¥Jh)≠OM—1ŒOMœ5ƒ∞280:´10570 ≈Jm)≠OM–4ƒ´10660 ˘Jr)¢15:∫"ENTER THE NUMBER OF THE FILE TO BE USED." 'K|)ñ1$(150,6),W(75,13),TL(12),NM$(24),AV(24),PC(24,3),WK(150,5),CC(5) XI)≤ *** MAIN LOOP *** bI)å…936 jI")I–0 ÉI,)ñ13:∫"* MAIN MENU *" ¯I6)¢3:∫"ENTER THE NUMBER OF THE OPTION YOU WANT":∫"TO USE.":ñ10:∫"1 = ADD RECORDS":ñ10:∫"2 = POST (DELETE) RECORDS" OJ@)ñ10:ù -HP(¢22:å…868:û:Ñ"IN MO,DAY,YR :";MT,D,Y:ù IHZ(≠MTœ12ŒDœ31ƒ∞280:´10320 fH†(≤ * FILL CONSTANT ARRAYS zH™(D$–"":≤ CTRL-D êH¥(∫D$;"NOMON I,O,C" ´Hæ(ÜN$(24),MO$(13),CD$(5) ¡H»(ÅX–1¡24:áN$(X):ÇX ÿH“(ÅX–1¡12:áMO$(X):ÇX ÓH‹(ÅX–1¡5:áCD$(X):ÇX @IÊ(ÜBAL(24,12),WLECTION:";PRTYPE:ù 5G(≠PRTYPE—1ŒPRTYPEœ2ƒ∞280:´10250 ∏G (≠PRTYPE–2ƒ∫:∫"1= CENTRONICS COMPATIBLE":∫"2= CENTRONICS 737":∫"3= EPSON MX-80 PRINTER":Ñ"ENTER SELECTION ";PQ:≠PQ—1ŒPQœ3ƒ10270 ”G<(≤ * ACCEPT REPORT DATE HF(¢20:û:∫"ENTER THE REPORT HEADING DATE: ""HIT RETURN TO CONTINUE ";X$:ù:π32,0:π33,40 MFÿ'≤ * ACCEPT OUTPUT DEVICE TYPE UF‚'â:ó yFÏ'ñ8:∫"* INITIALIZATION SCREEN *" ∂Fˆ'¢3:∫"ENTER THE REPORT OUTPUT DEVICE":∫"YOU WISH TO USE." ÊF (∫:ñ10:∫"1 = SCREEN ONLY":ñ10:∫"2 = PRINTER" G (¢10:û:Ñ"ENTER YOUR SEFILE AND UPDATE THE YEAR-":∫"TO-DATE BALANCES. NOTE: EACH" öE∞'∫"'POSTED' TRANSACTION WILL BE WRITTEN":∫"TO AN AUDIT TRAIL FILE FOR FUTURE":∫"REFERENCE." ØE∫'∫:ñ13:∫"* * *" ÙEƒ'∫:∫"FOR EACH OPTION, FOLLOW THE ":∫"INSTRUCTIONS ON THE SCREEN." +FŒ'¢24:û:Ñt'ó:π33,37:π32,3 &D~'∫:ñ13:∫"* ADD *" ïDà'∫:∫"USE THE 'ADD' OPTION TO ENTER DETAIL":∫"EXPENSE TRANSACTIONS INTO THE CREDIT":∫"CARD AND CHECK FILES." ¨Dí'¢8:ñ13:∫"* POST *" ;E¶'∫:∫"USE THE 'POST' OPTION TO REMOVE":∫"A DETAIL TRANSACTION FROM ITS":∫"ACTIVE SION" NC.'∫:∫"TRAC WILL MAINTAIN YOUR EXPENSE DATA":∫"IN THE FOLLOWING FILES:" óC8'∫:ñ10:∫"CREDIT CARD FILE":ñ10:∫"CHECK FILE":ñ10:∫"YEAR-TO-DATE FILE" ”CB'ñ10:∫"POSTED CREDIT CARD FILE":ñ10:∫"POSTED CHECK FILE" ˝CL'¢24:û:Ñ"HIT RETURN TO CONTINUE ";X$:ù D B'ÅI–0¡39:∫"=";:ÇI ~B '∫"THIS IS YOUR PERSONAL SYSTEM FOR MANAG-":∫"ING CREDIT CARDS, CHECKS AND OVERALL":∫"HOME FINANCES." πB$'∫:∫"YOU'LL BE ASKED TO SELECT FROM THESE ":∫"OPTIONS:" C)'ñ10:∫"ADD":ñ10:∫"POST":ñ10:∫"SORT":ñ10:∫"REPORT":ñ10:∫"END THE SESMT…1); õP–PC(X,2):∞5340:B–3 ;†π36,(28»B…C…1):∫PC(X,2); P•≠AV(X)–0ƒ∫:´5305 f™P–AV(X):∞5340:B–5 ~Øπ36,31»B…C…1:∫AV(X) ñ¥P–PC(X,3):∞5340:B–3 Àπ≠X–18ƒÑ"HIT RETURN FOR LAST PART OF REPORT ";XX$ “æÇX Á√∫"** TOTALS **"; »P–TL(MT):∞5340:B–5:πêyo≤ P± a(‘…Õ≈∫)GöyU…V± W≥ ÿ-…rq± Y…§yU…V≥ Wµ Ÿ-…rq≤ Y…ÆyŸ-± rq∑ Ÿ-≤ rq≥! ∏yÿ-¥ rq≤ ÿ-µ rq≥# .¬yfπ U…V± Wµ iÿ-…rjÿ-…r± kŸ-…rY…f√ÃÃy`7‘…Õ≈ —‘“¥ %Q58|À≈Ÿq.?6± @r`À≈Ÿ ± $≥8|d6±?e∞ `À≈Ÿ<(†)r$≥ˇ|&B|`À≈Ÿ<(À††)GP≥$ b±d ΔÖœ”G%^yo≤ P≤ a(ƒœ◊Œ†††)GP≤ bƒœ◊ŒG+hyo≤ P≤ a(Ÿ¡“ƒ”†‘œ†«œ†††)GP≥$ bŸ‘«G"ryo≤ P± a(—‘“††)GP≤ b—‘“Gwyo≤ P≤ a(†)G7|yo≤ P± a(†)G`‘…Õ≈±%P± b8‘…Õ≈≥ r∂< E(∫)G.Üy`8‘…Õ≈≥ r ∂< ± %a(∞)Gb8‘…Õ≈≥ r ∂< Gy`ΔÖœ”±d $≥@yP≥ _≥Fy$@yU…V≥ W≥' Xµ P…◊qΔÖœ”…µ Ay`◊µ2 %◊q±d ◊Ey`◊∞ $≥Fyb◊GY…_≥Jy Fya(«)G6Jy`»%dµ2 e∂? o≤ P≤ a(»œÕ≈)Gdµ2 e≤ˇ P± b»œÕG:Oy`7»%dµ2 e∂? o≤ P≤ a(÷…”…‘œ“)Gdµ2 e≤ˇ P± b÷…”G2Tyo≤ P≤ a(Ÿƒ”†‘œ†«œ¡Ã†V¥ W≥% Xµ U V∞ W≥ l± m≥& n …Y Z…yl± m≥& n≥' yŸq≤ ÿq∞ œÿq∞ œŸqŸ!y¬q∞ –ƒq¬œ¬q¬–Ÿq∞ ""yf± i∞ j≥' k∞ i∞ j≥' k≥' ,yU…V≥ W≥' Xµ l∞ m≥' n…6yY…7y√Ãq± `»%√Ãq± ;yf√Ãiÿjÿ± kŸ$<yo≤ U…V≥ W≥' Xµ P…a(††)GY… =cc\qP± a(◊“…‘‘≈Œ†¬Ÿ)cfqP± a(Ãœ’†»¡≈»Œ)"kqo≤ a(®√©†±π∑∏†¬Ÿ†Ãœ’†»¡≈»Œ)G pqU…V∞ W±d±ªe… ≤ Y…[0uΔÖœ”q≤ »q± :uΔÃq¥ Du»œÕq∞ ÷…”q∞ Nuƒœ◊Œq± Ÿ‘«q± Xu‘…Õ≈q≤å —‘“q± y[*yf¥ U…V∞ W≤ l± m≥& n…Y…–¡””q∞ /yU…Z–k`ΔÖœ”πZ $≤⁄kM6π®o≤ a(™™†√¡Œß‘†–¡””†…Œ‘œ†≈Œƒ†⁄œŒ≈†™™)GU…V± W±Y…M6π®_≥y,⁄k–¡””q± ¬¬q± Ãÿq∑ ßq/?≥ r”÷√q¥ -‰k`7ß%ßq∑ `ß± %ßq≤ `ß≤ %ßq≥! Ókœ¬q∞ wU…V± W±ñ Y…_¥öHqKM6π®o∑ "RqP± a(™™™†Δœœ‘¬¡ÃÆ™™™)cN$(I);" =$";SV(I):ÇI 1˘∫:ÅI–1¡(K 16):∫"=";:ÇI:∫ Y˙∫¿30)"UNIT SALES FORECAST BY MONTH" t˚ÅI–1¡(K 16):∫"-";:ÇI:∫ †SY–0:ÅI–1¡12:PK–(I K)»8:W$–M$(I):∞30:ÇI ≈PK–(K 16…6):W$–"TOTALS":∞35:SY–0 ‡ÅI–1¡(K 16):∫"-";:ÇI:∫ Ï ÅI–1¡NP ∫PN$(I);:SY–„(P OF SALESMEN AT THE START OF THE YEAR =";”(NSÀ100):∫ G·≠NH(I)—–0ƒ2040 ¢‰ÅI–1¡Q:∫”(NH(I)À100);" NEW SALES PEOPLE PLANNED TO BE HIRED AT END OF MONTH ";MH(I):ÇI ¯∫:ÅI–1¡NP:∫"% OF SALES TIME PLANNED FOR ";PN$(I);" =";PT(I);"%";:∫√K)"SALES VALUE FOR ";P,I –ä1 *’∫Á(9);"100N":≤ PRINTER WIDTH :⁄∫Á(2);Á(30) ©€ÅI–1¡(K 16):∫"=";:ÇI:∫:∫¿K 3)"*** FORECAST AND SALES TREND (F.A.S.T.) ANALYSIS ***":ÅI–1¡(K 16):∫"=";:ÇI:∫ ÷›∫:∫"** PLANNING ASSUMPTIONS/COMMENTS **" Ûfi∫:ÅI–1¡CC…1:∫CC$(I):ÇI:∫ 4fl∫"NUMBERNG flÅI–1¡NP ‰ÅX–1¡5 .ÈES(I,X)–SP(I) .2 8ÓÇX:ÇI QÛ≤ COMPUTE UNIT SALES ]¯ÅI–1¡NP h˝ÅX–1¡5 tÅN–1¡12 £U(I,N)–U(I,N)»”((P(I,X,N) ES(I,X))À100».5) ÆÇN,X,I … ≤ COMPUTE SALES VALUES ’%ÅI–1¡NP ·*ÅN–1¡12 ˘/D(I,N)–U(I,N) SV(I) 4ÇNË(L$(I),LG…1) ª∫Á(13) $ Ω≠MUœ0ƒ± - ¡´864 J Ë≤ ** EDITING ROUTINES ** r Òû:II–I:Ñ"ENTER LINE # TO RETYPE ";Z Œ Úó:∫"LINE ";Z:ÅXX–1¡„(L$(Z)):M$–Í(L$(Z),XX,1):û:≠M$œÁ(96)ÕM$—Á(123)ƒM–Ê(M$)…32:M$–Á(M):ù fi Û≠M$—Á(64)ƒù Ì Ù∫M$;:ù:Ç:∫ ı ¸¢10 !I–Z:N–URN NO HIT ' ìLL–LL…(„(X$)»„(A$(N…1))) 4 ïCS–‚(37) N ñ≠GT–1ƒGT–0:¢CS»1:´921 V ó¢CS n ôFL–LL…(”(LLÀ40) 40) x õñFL»1 à ùN–N…1:X$–"" ë ¢´105 ∫ µ≤ **** NEW PGH WITH RIGHT ARROW **** ∂L$(I)–"":ÅX–1¡N…1:L$(I)–L$(I)»A$(X):A$(X)–"":Ç:LG–„(L$(I)):L$(I)–SPACING P Ö≠LL–40ŒLL–80ƒGT–1:≤ GATE FOR BACKSPACE TAB BETWEEN LINES NO OVERFLOW y Ü≠LL—–79ÕLL…(„(X$)»„(A$(N…1)))—40ƒ915 ™ à≠LLœ–80ÕLL—–119ÕLL…(„(X$)»„(A$(N…1)))—80ƒ915 › ä≠LLœ–120ÕLL—–132ÕLL…(„(X$)»„(A$(N…1)))—120ƒ915 Ò ãCS–‚(37):¢1:¢CS å´170:≤ RET o≤ P≥$ M6∏db”√«q«± [ o≤ P≥ M6∏db”[ËQU–N¡@"≤ rC¬@"≤ rC√@"≤ rCƒ@"≤ rC≈@"≤ rCΔ@"≤ rC«@"≤ rCÿ@"≤ rCÕ@"¥( rC¬¬@"¥ rP’¬¬@p(††††)¡@p(†‘…≈†Δ…«»‘≈“††††)¬@p(†ÀÃ…Œ«œŒ†√“’…”≈“)√@p(†»œ”–…‘¡Ã†”»…–††)E⁄ƒ@p(†ÀÃ…Œ«œŒ†Δ…«»‘≈“)≈@p(†≥$ M6∏db”√ƒqƒ± [-Ùd±JCe∞ o≤ P± a≈@GP≥% a(´≤∞)ÿq∞ +˘”√q”√≤ o≤ P≥$ M6∏db”√≈q≈± [-Xd±JCe∞ o≤ P± aΔ@GP≥% a(≠¥∞)ÿq∞ +]”√q”√¥( o≤ P≥$ M6∏db”√ΔqΔ± [-ºd±JCe∞ o≤ P± a«@GP≥% a(≠≤∞)ÿq∞ +¡”√q”√≤;:¢22:∫ R y ≠C–81ƒ¢24:û:∫"80 THREADS REACHED.. GO TO TIE UP":ÅPI–1¡1000:ÇPI:ù:´200 á z ¢23:å…868:∫"THREAD #";C;:Ñ" HARNESS #? (1-8) ";N fl } ≠C–80ƒ¢21:å…868:ü:∫"80 THREADS USED. AUTO-SWITCH TO TIEUP.":ÅPI–1¡1000:ÇPI:ù:ó:´200 Ì Ç ≠N–99ƒ200 ¸ Ñ ≠N–55ƒ1000 Ö THE IDS 440, SET SWITCH 5 OFF AND SWITCH 3 ON":Ñ"PRESS RETURN TO CONTINUE";XX$ i Q–79:W–1:D–36:L–1:A–3 Ö ÜT%(80),TR%(80),R%(641) é ´100 ™ d ≤ ** ENTER THREADING ** ≤ n ë:ó Œ s íA:ÅPI–0¡14:ì160,PI:ÇPI x ¢24:∫"55= ERASE AND REENTER. 99=GO TO TIEUP"˘! ≤ ************************* A ≤ ** SUPER WEAVER ** a ≤ ** MICRO-SPARC ** Å ≤ ** P.O. BOX 325 ** ° ≤ ** LINCOLN MASS 01773 ** ¡ ≤ ** COPYRIGHT C 1980 ** · ≤ ************************* Á ó O ∫"SUPER WEAVER":∫"ON N$(I)) ÅN–1¡12 # W$–‰(U(I,N)) =!PK–(N K)»11…„(W$):∞30 N%TX–TX»U(I,N) ^*ÇN:W$–‰(TX) }+PK–(K 16)…1…„(W$):∞35:SY–0 â,TX–0:ÇI £∑ ≤ PRINT DOLLAR VALUES æ∏ ÅI–1¡(K 16):∫"=";:ÇI:∫ π ∫:∫¿K 5)" $$ COMPOSITE NET CONTRACT VALUE IN ";Z$:ÅI–1¡(K 16) Y æfi „flÖÖÑÜ•∏§πÖáÑà¢ˇ VËù …ç–ı‡Ôê¢Ô© ù ä Ωˇ)ùˇ –ı¢ˇ© ÖÖ© † Ì„ =Á {⁄•á§àÖ∏Ñπ`l8 ˇ CI–2ƒCI$–Á(29):CP–85:WS–6 9%∫≠CI–3ƒCI$–Á(30):CP–102:WS–7 Z%ª≠CI–4ƒCI$–Á(31):CP–140:WS–10 á%ºÑ"ENHANCED OR NORMAL MODE? E OR N? ";XX$ ≤%Ω≠XX$–"E"ƒEN–1:CP–”(CPÀ2):WS–WS 2:´1215 ª%æEN–2 Ë%ø∫D$;"PR#1":≤ TURN ON PRINTER IN SLOT 1 ˜%ƒ∫Á(9)"80N" &≈∫CI$ ($µÑ"CENTER TEXT ON PAGE? Y OR N?";RV$ m$∂Ñ"SINGLE OR DOUBLE SPACING? S OR D? ";SC$:MOD–58:≠SC$–"D"ƒMOD–28 €$∑Ñ"PRINT LINE #'S? Y OR N ";II$:∫"SPECIFY PRINT DENSITY (CHAR/INCH)":Ñ"1=8 2=10 3=12 4=16 CH/INCH ";CI ˙$∏≠CI–1ƒCI$–Á(28):CP–72:WS–5 %π≠INSERT A LINE **** X#?û:Ñ"INSERT FROM LINE #";ML:Ñ"TO LINE #";EL:NL–EL…ML:≠NL—–0ƒNL–1:ù É#AÅX–(I»NL)¡(ML»NL)«…1:L$(X)–L$(X…NL):ÇX ®#CÅX–ML¡ML»NL…1:L$(X)–"":ÇX:I–I»NL Æ#D± #∞≤ *** PRINT ROUTINE *** –#≤û $≥Ñ"AUTO PAGE NUMBER ON OVERFLOW? Y OR N";PO$)? D OR E? ";DE$ &"4≠MU–5ƒDE$–"ERASE" ="5≠MU–4ƒDE$–"DELETE" Ç"6∫DE$;" FROM LINE #";:ÑML:Ñ"TO LINE #?";EL:NL–EL…ML:≠NL—–0ƒNL–1:ù Æ"7≠MU–5ƒDMY–1:ÅX–ML¡ML»NL…1:L$(X)–"":ÇX:± Ó"9ÅX–ML¡I…NL:L$(X)–L$(X»NL):ÇX:I–I…NL:ÅX–I»1¡I»NL:L$(X)–"":ÇX Ù":± #=≤ **** 1:LL–0:FL–0:TT–0:´105 !!!≠MUœ0ƒ± F!"û:Ñ"ADD NEW TEXT? Y OR N?";RV$:ù b!#≠RV$–"Y"ƒV–4:I–I…1:´710 ®!$û:∫"WRITE TO DISK OR PRINTER OR BOTH?":Ñ"'D' OR 'P' OR 'B'";RV$:ù π!)≠RV$–"D"ƒ500 ≈!*≠MUœ0ƒ± ◊!+≠RV$–"B"ƒ∞500 ·!.´1200 "3û:Ñ"DELETE OR ERASE LINE(Sƒq∞ ≈q∞ Δq∞ «q∞ _≤ I¨a(Ÿœ’“†”√œ“≈†œΔ†)F”√E(†»¡”†¬≈¡‘≈Œ†‘»≈)a(–“≈÷…œ’”†»…«»†”√œ“≈†œΔÆÆ)F»”±a(√œŒ«“¡‘’á‘…œŒ”°) ∂»”q”√[#†o∂ Pµ a(Ÿœ’†”»œ‘†ƒœ◊ŒÆÆÆÆÆ)•o∑ P± b¡E(ÆÆ)E¡@¶o∏ P± b¬E(ÆÆ)E¬@®oπ P± b√E(ÆÆ)E√@™o± P± 0d∏ e∞ d∏"e±å M≥ƒ2d∏ e±| d∏"e±ú M≥ 4d∏ e±à d∏"e±ú M≥ 6d∏ e≤ˇ d∏"e±å M≥ ò[ ∏ KM6π®Ω `”√»”%\≥¨\¥†/¿ o≤ S(¡Œœ‘»≈“†Õ…””…œŒø†»…‘†“≈‘’“Œ)&ÿ@\≤fl0« ”√q∞ d±KCe∞ ]†“≈”≈‘†”√œ“≈†¡Œƒ†£†œΔ†”»œ‘”2à ¡q∞ ¬q∞ √q∞ eÿÿd∏"eŸŸM≥ƒY… d∏ e∞ d∏"e∞ M≥ƒ d∏ e≤ˇ d∏"e∞ M≥ "d∏ e≤ˇ d∏"e±ü M≥ $d∏ e∞ d∏"e±ü M≥ &d∏ e∞ d∏"e∞ M≥ (d∏ e∞ d∏"e±Ç M≥ƒ*d∏ e±| d∏"e±ö M≥ ,d∏ e±à d∏"e±ö M≥ .d∏ e≤ˇ d∏"e±Ç M≥ ‘…≈†”’––߆”»…–)Δ@p(†‘◊¡†Δ“≈…«»‘≈“††)'fl«@p(†√œÕÕ†”¡‘≈ÃÃ…‘≈†)M6π®Œq¥†[-o≤ a(‘…Õ≈†Ã≈Δ‘ÆÆ)GP≤ a(”»œ‘”†’”≈ƒÆÆ)*a(–“≈÷†»…«»†”√œ“≈Ω)F»”GP≤ a(”√œ“≈Ω)(o≤ a(ᔑ†»…‘Ω)GP≤ a(”√œ“…Œ«ÆÆ) d∏,e≤ˇ "U…V± W±d ÿÿq/?≤˙ rŸŸq/?±x rd∏ — ≠N–55ƒ300 “ ≠N–77ƒ240 * ” ≠N–99ƒ600 3 ⁄ ∞500 E Ë T%(P 10»C1)–1 d È OO–”(200»(C1 3)):PP–”(P 2) r Í í3:ìOO,PP { Î ´200 å C1–C1»1:´200 • ,≤ ERASE TIEUP ERRORS 6∞360:∞370:≤ ERASE CURRENT TIE UP Ù @C1–C1…1:∞360:∞370:≤ ERASE LAST TIE UP ˝ J´200 ' ≠N—1ŒNœ8ƒ122 á ∞500 å ∞900 ( ñ ´122 @ » ≤ ** ENTER TIEUP ** ¢24:å…868:∫"55= ERASE 77= NEXT TREADLE 99=WEAVE";:¢22:∫ » à ≠C1–10ƒ¢24:∫"10 TREADLES REACHED. GO TO WEAVE.":ÅPI–1¡1000:ÇPI:´600 Õ ¢23:å…868:∫"TREADLE #";C1;:Ñ" ENTER HARNESS #(S)";N…„(W$):∞35:TX–0:SY–0 Í ÇI 1 Ô ∫:∫"TOTALS";:SY–6 E Ù ÅN–1¡12:ÅI–1¡NP Z ˘ T(N)–T(N)»D(I,N) a ˛ ÇI p W$–‰(T(N)) ä PK–(N K)»11…„(W$):∞30 ô TX–TX»T(N) † ÇN Õ W$–‰(TX):PK–(K 16)…1…„(W$):∞35:TX–0:SY–0 ∫Á(9);"40N":ä0:∫:Ñ"SKIP TO NEW PAGE AND HIT RE:∫"-";:ÇI:∫ ∫ ÅN–1¡12 6ª PK–(N K)»8:W$–M$(N):∞30:ÇN [º PK–(K 16)…6:W$–"TOTALS":∞35:SY–0 vΩ ÅI–1¡(K 16):∫"-";:ÇI:∫ Çø ÅI–1¡NP ú¬ ∫PN$(I);:SY–„(PN$(I)) ®Ã ÅN–1¡12 π÷ W$–‰(D(I,N)) ”ÿ PK–(N K)»11…„(W$):∞30 ‰€ TX–TX»D(I,N) ‡ ÇN:W$–‰(TX):PK–(K 16)…1.íL$(D1»X)–L$(S1»NL»X):≤ DESCENDING MOVE ALGORITHM :.ïÇX m.ñML–S1»NL:MU–4:∞1081:MU–7:≤ DELETE SOURCE LINES s.õ± å.‹≤ RETYPE MULTI LINES π.·û:Ñ"ENTER STARTING LINE # TO RETYPE ";Q1 Ë.ÊÑ"ENTER THE ENDING LINE # TO RETYPE ";Q2:ù ˜.Ë≠Q2œIƒQ2–I /ÎÅQQ–NATION PARAGRAPH STARTING LINE ";D1:ù K-ÉNL–S2…S1»1:DD–0:T1–S1:T2–S2:T3–D1 ì-Ñ≠S2—D1ƒNL–T3…T2…1:S1–T2»1:S2–T3…1:D1–T1:≤ ASCENDING MOVE CONVERSION £-á≠NL—–0ƒNL–1 ÿ-åML–D1:MU–6:∞1089:MU–7:≤ INSERT DESTINATION LINES ˛-ëÅX–0¡NL…1:≤ COPY INTO DESTINATION 3"CATALOG":´1350 (,I∫D$;"OPEN TFILE-";K$ A,K∫D$;"READ TFILE-";K$ P,PÑY:ÑSL:ÑTB l,UÅX–(I»1)¡(Y»I):ÑL$(X):Ç Ä,Z∫RT$;D$;"CLOSE" é,_I–X:´1300 §,x≤ PARAGRAPH SHIFT Ù,}û:Ñ"SOURCE PARAGRAPH STARTING LINE ";S1:Ñ"SOURCE PARAGRAPH ENDING LINE ";S2 %-ÇÑ"DESTI´1319 +<≠XX$–"Y"ƒ1319 V+>I–I…1:Ñ"APPEND FILE FROM DISK ? Y/N ";K$:≠Ë(K$,1)–"Y"ƒ1350 Ä+?MU–20:≤ TRIGGERS RETURN BUT NO ACTION â+A∞864 ñ+BL$(I)–"" ÷+CMU–0:N–N…1:V–1:´91:≤ RESET EDIT POINTERS. RETURN TO TYPING. +FÑ"WHAT SUBJECT ? ";K$ ,G≠K$–""ƒ∫D$;*&π34,‚(37)…1 *'IX–I:π34,8 =*(û:Ñ"ENTER SELECTION ";MU:ù p**≠MU—0ŒMUœ10ƒ∫"INVALID ENTRY.. TRY AGAIN":´1320 Ç*-≠MU–1ƒRV$–"Y" ô*/≠MU–10ƒ∫÷(0):´1342 Œ*2¥MU∞1700,1009,1500,1076,1076,1087,1400,1600,1200 Ÿ*3DE$–"" ˚*4≠MU–1ŒMU–2ŒMU–3ŒMU–9ŒV–3ƒI–IX +7 LINE";:∫¿23)"7= P'GRAPH SHIFT" Å)∫"3= RETYPE MULTI-LINES";:∫¿23)"8= FIND & REPLACE":∫"4= DELETE LINE(S)";:∫¿23)"9= PRINT TEXT" º) ∫"5= ERASE LINE(S)";:ñ22:∫"10=";:û:∫" RESUME TYPING":ù Ê) ñ18:∫"CTRL X=";:û:∫" ABORT OPTION ":ù ˇ)%ÅZA–0¡39:∫"*";:ÇZA:∫ RINTING":û:Ñ"ANOTHER COPY? Y OR N ";ZZ$:ù:≠ZZ$–"Y"ƒ1213 C(È≠MU–9ƒ± I(ÏÄ Ö(â:ó:ÅZA–0¡39:∫"*";:ÇZA:∫" ** EDITING OPTIONS LIST **" ë(•´11000 ©(V–0:≤ ERASE POINTER ¬(å‚(103)»‚(104) 256»5 )∫"1= REVIEW TEXT";:∫¿23)"6= INSERT LINE(S)":∫"2= RETYPE 1'‘PK–PK»1:≠PO$—œ"Y"ƒ1239 R'’SP–”((PKÀMOD…”(PKÀMOD)) MOD».05) “(PKÀMOD):≠SP–0ƒ∞40 m'◊ñCTR:∫L$(X):≠SC$–"D"ƒ∫ t'ÿÇX Õ'‡∫Á(9);"40N":≤ RESET PRINT LINE TO 40 CHARACTERS TO PREPARE FOR SHUTTING OFF PRINTER Ô'‚∫D$;"PR#0":≤ SHUT OFF PRINTER 7(Áó:∫"END OF P;Á(EN); &»CTR–1 4&…≠RV$–"Y"ƒCTR–”(((CP…SL)À2)…WS) E& ≠CTR—1ƒCTR–1 N&ÀPK–0 W&ÃPG–2 j&Õ≠II$—œ"Y"ƒ1235 å&ŒÅX–1¡I:PK–PK»1:≠PO$—œ"Y"ƒ1232 ≈&œSP–”((PKÀMOD…”(PKÀMOD)) MOD».05) “(PKÀMOD):≠SP–0ƒ∞40 Ê&–ñCTR:∫X;".";L$(X):≠SC$–"D"ƒ∫ Û&—ÇX:´1248 ˛&”ÅX–1¡I °†–“œÕœ‘≈ƒ†‘œ†ΔÃ≈≈‘†¡ƒÕ…“¡Ã)`_¥î-îo± a(Ÿœ’“†”√œ“≈†œΔÆÆ)F”√E(†◊¡”†“Å¡‘≈ƒ∫)ôo± P¥ aÕ@[ào≤ P± a¬¬@ç[° œ‘†¬¡ƒÆÆ¡––“≈Œ‘…√≈†“¡‘…Œ«)._¥î(6Õ@p(«œœƒÆÆ–“œÕœ‘≈ƒ†‘œ†≈ÿ≈√†œΔΔ…√≈“Æ)8_¥î-@Õ@p(÷≈“Ÿ†«œœƒÆÆ–“œÕœ‘≈ƒ†‘œ†Δ…“”‘†œΔΔ…√≈“)B_¥î(JÕ@p(≈ÿ√≈ÃÃ≈Œ‘°†–“œÕœ‘≈ƒ†‘œ†√¡–‘¡…Œ°)L_¥î.TÕ@p(œ’‘”‘¡Œƒ…Œ«°†–“œÕœ‘≈ƒ†‘œ†“≈¡“†¡ƒÕ…“¡Ã)V_¥î/^Õ@p(”–≈√‘¡√’á“bƒE(ÆÆ)Eƒ@¨o± P± b≈E(ÆÆ)E≈@Æo± P± bΔE(ÆÆ)EΔ@∞o± P± b«E(ÆÆ)E«@3¥`”√ ±d $¥`”√ ≤» $¥`”√ ≥,$¥"`”√ µÙ$¥,3æ`”√ ∂ä$¥6`”√ ∑Ó$¥@`”√ ∏R$¥J`”√ ±Ë$¥T»_¥^Õ@p(Ãœ’”Ÿ)_¥îÕ@p(–œœ“)_¥î"Õ@p(Δ¡…“)_¥î#,Õ@p(Œ 'GR PRINT' AGAIN." B ∫:û:Ñ"INVERT BLACK/WHITE IMAGE? Y OR N";A$ f ≠A$–"Y"ƒü:∫"INVERTING":ù:å28116 à å…936:∫"SETTING UP TO PRINT": ë ´100 ú 2 ÅR–1¡8 ≥ 4 ≠FL–0ƒFL–1:X–A:´56 Δ 6 ≠FL–1ƒFL–0:X–B — 8 ÅS–1¡8 ‚ : N–N»1:L(N)–X Ó < ÇS:ÇR:± ˘ K ÅR–1¡2 M ÅX****** D$–Á(4) / ∫D$;"BLOAD GR MACH LANG" B ÜH(200),L(200) Δ å…936:∫"APPLE II/IDS 440 HIRES SCREEN DUMP":∫:∫"BE SURE YOU HAVE A GRAPHICS PICTURE IN":∫"PAGE 1 OF THE HIRES AREA (8192-16384) ∫"IF NOT, START OVER AND PUT ONE THERE.":∫:∫"THEN RUNõ& π74,72:π75,113:≤ SET LOMEM:29000 F ≤ ************************* f ≤ ** APPLE/IDS GR PRINT ** Ü ≤ ** COPYRIGHT (C) 1980 ** ¶ ≤ ** MICRO-SPARC, INC. ** Δ ≤ ** P.O. BOX 325 ** Ê ≤ ** LINCOLN, MA 01773 ** ≤ ******************* Ê(Í(L$(X),Y…1»Q,1)):≠Dœ95ƒSW–1 $4jÇ c4m≠SW–0ƒÅQ–1¡RE:K–Ê(Í(RE$,Q,1)):K$–K$»Á(K…32 (Kœ95)):Ç:´1660 ¥4rD–Ê(Í(L$(X),Y,1)):E–Ê(Ë(RE$,1)):≠Dœ64ÕD—96ÕEœ95ƒK$–Á(E…32)»È(RE$,RE…1):´1660 ø4wK$–RE$ Õ4|≠Y–1ƒ1670 ‚4~≠Y»SEœ–(LE)ƒ1675 #5ÅX$–Ë(L$(X),Y…1)»K$»È(L$(XLACE ? Y/N ";XN$:≠XN$–"Y"ƒ1630 $3]± 33^≠SW–1ƒ1640 A3`≠Y–1ƒ1637 V3a≠Y»SEœ–(LE)ƒ1638 í3cX$–Ë(L$(X),Y…1)»RE$»È(L$(X),LE…Y»1…RE):L$(X)–X$:X$–"":± Ω3eX$–RE$»È(L$(X),LE…RE):L$(X)–X$:X$–"":± Ê3fX$–Ë(L$(X),Y…1)»RE$:L$(X)–X$:X$–"":± 4hSW–0:K$–"":ÅQ–1¡SE:D–Zœ95)):Ç 72OÅY–1¡LE…SE»1:≠SE$–Í(WK$,Y,SE)ƒ∞1620:Y–Y»SE ò2PÇ:X–X»1:π1082,”(XÀ100)»176:π1083,”((X…”(XÀ100) 100)À10)»176:π1084,(X…”(XÀ10) 10)»176:X–X…1:Ç û2Q± Δ2T∫"LINE # ";X;:ñ12:∫"AT POSITION ";Y —2WG–÷(0) ·2Y≠AN$—œ"R"ƒ± 2Z≠WS–0ƒ1630 3[∞1680:Ñ"REPUAL ? A/M ";XN$:≠XN$–"M"ƒWS–1 P1HÑ"IS ALL DATA CORRECT ? Y/N ";K$:≠K$—œ"Y"ƒ1600 ∞1Jó:π34,9:¢9:û:∫"SEARCHING LINE #":ù:SE–„(SE$):RE–„(RE$):ÅX–R1¡R2:LE–„(L$(X)):≠SEœLEŒLE–0ƒÇ:± 1K≠SW–0ƒWK$–L$(X):´1615 2MWK$–"":ÅY–1¡LE:Z–Ê(Í(L$(X),Y,1)):WK$–WK$»Á(Z…32 (OR SEARCH ONLY ? R/S ";AN$:≠AN$–"R"ƒ∫"WHAT STRING TO REPLACE WITH ? ";:X$–"":UC–0:∞1690:RE$–X$ ÿ0FSW–0:Ñ"BROAD OR EXACT SEARCH ? B/E ";X$:≠X$–"B"ƒX$–SE$:SE$–"":ÅX–1¡„(X$):Q–Ê(Í(X$,X,1)):SE$–SE$»Á(Q…32 (Qœ95)):Ç:SW–1 1GWS–0:≠AN$–"R"ƒÑ"REPLACE AUTO OR MANQ1¡Q2:Z–QQ:∞1010:ÇQQ /± V/@ó:Ñ"SEARCH ALL LINES Y/N ? ";X$:≠X$–"Y"ƒR1–1:R2–I:´1602 ï/AÑ"STARTING LINE # ? ";R1:Ñ"ENDING LINE # ? ";R2:≠R1—1ƒR1–1 §/B≠R2œIƒR2–I ¥/C≠R1œR2ƒ1601 Ò/D∫"WHAT STRING TO SEARCH FOR ? ";:X$–"":UC–0:∞1690:SE$–X$ ^0EÑ"REPLACE Δ…«ˇ ˇˇˇˇÄÉÜâåèíïòúü¢•®´Æ∞≥∂πºø¡ƒ«…ÃŒ—”’ÿ⁄‹fi‡‚‰ÊËÍÏÌÔÚÛıˆ˜¯˘˙˚¸¸˝˛˛ˇˇˇˇˇˇˇˇˇˇˇ˛˛˝¸¸˚˙˘¯˜ˆıÛÚÔÌÏÍËʉ‚‡fi‹⁄ÿ’”—ŒÃ…«ƒ¡øºπ∂≥∞Æ´®•¢üúòïíèåâÜÉ|yvspmjgc`]ZWTQOLIFC@>;8631.,*'¡@ ∫†‘…≈†Δ…«»‘≈“†††† ¬@ ‘†ÀÃ…Œ«œŒ†√“’…”≈“ √@ Ó†»œ”–…‘¡Ã†”»…–†† >@CFƒ@ †ÀÃ…Œ«œŒ†ÖEê @ –•AJJJ–”Ê–Ê°–…`ˇ˛˙ÙÏ·‘≈¥°çxaI1ˇÑÜÖC¨-¢ °ÖAÆ/ ? –˙•AJJJ–ÓÊ–Ê°–‰`•& •')*& ç*•'JJ)*ç*≠- m- ™ •0ËJ–¸ç)äm-êÓ)ç(`)Jê ™Jêi©ç,`ˇˇˇˇˇˇˇˇˇˇˇˇˇˇˇˇˇé#≠"Æ ¨! & Æ#` ±L é#≠ Æ!¨" ï Æ#`é#≠&ç/≠'¨$Æ% ºÆ#`ˇˇˇˇˇˇE %0Q&ë&•C∞ÿ [•De@ÖD•EeAP◊F0êà†'©@Ö0å-• & `0˚©»¿(ê͆ ∞Ê•A) ±&E %0Q&ë&•AeC)…j∞Ω00•',π–"&∞,∫i 8∞i#H•&i∞∞iÖ&h∞i f&i¸Ö'`•'i,π–Û&êi‡,ª•&iPIIÖ&≠.êi‡f&ê– ÑÜ™JJJJÖCä)™ºÑ@I™º»ÑB¨-¢ °ÖA¢ÄÜDÜEÆ/•D8e@ÖDê ?•EeB ˇ© ç.≠W¿≠S¿≠P¿≠.Ö† Ñòë»–˚Ê•) –Ú`ç*é(å)H)¿Ö&JJ&Ö&hÖ' &' &' f&•') .Ö'ä¿ †#i»È∞˚å-™Ω| Ö0òJ≠,ê i Ö ` @ & Q&%0Q&ë&`H© ç(ç)ç*hH8Ì(HäÌ)ÖC∞ hIˇiH© ÂCÖAÖEhÖ@ÖDhç(é)òÌ*êIˇi˛ÖBå*fC8Â@Ö ©ˇÂAç+¨-∞ 8•DeBÖD•EÈ ÖEÊ –Ó+5±& ç,≠Dç$≠(Cç ≠)Cç" ƒ › ~K ~K≠Dç, ƒ ›`ÓIC≠IC`à– ¨’˛© ô ›»–˙¨÷˛– ¨’˛ô ‹»–˙L√Î`≠Œ˛Æœ˛L∑ÎÆœ˛äH≠Œ˛H ÍhÖFhÖG∞ ≠ ‹çŒ˛≠ ›çœ˛† Ω˚8≠–˛Èç–˛ √Î`† •FH•GHåØ˛π ‹…æ ›–ê Í∞ ¨Ø˛ Ω˚»–„™hÖGhÖFä`≠˛–™æ ›π ‹ô ›äô ‹`†±@™…êB…º∞>ÖKà±@ÖJ–5ËËËË V¸9Xø–(‰K–ÛËËç(C≠ Cç)C ˘L ˘L≠ Dç.C≠#Cç-C “H≠(CçC≠-Cç#C©çJCL*M≠Cç(C≠ Cç)C ˘L≠Dç.C≠$Cç-C “H≠(CçC≠-Cç$C©çJCL*M≠Cç(C≠ Cç)C ˘L≠Dç.C≠%Cç-C ¬H≠(CçC≠-Cç%C©çJCL*M≠Cç(C≠ Cç)C ˘L ˘L≠Dç.C≠&Cç-C “H≠(CçC≠-Cç&C©çJCL*M≠Cç(C≠Cç)C ˘L≠Dç.C≠'Cç-C ¬H≠(CçC≠-Cç'C©çJCL*M≠ D`≠DCi˙Õ>Cê` ˘K`≠ECiÕ>C∞`≠ECi˙Õ>Cê` .L`≠FCiÕ>C∞`≠FCi˙Õ>Cê` `L`≠GCiÕ>C∞`≠GCi˙Õ>Cê` íL`≠HCiÕ>C∞`≠HCi˙Õ>Cê` «L`†¢ äÈ–¸ç0¿ËåLC–Ò`≠ Cç(C≠Cç)C ˘L≠ Dç.C≠!Cç-C ¬H≠(Cç C≠-Cç!C ~K©çJCL*M≠Cç(C≠Cç)C ˘L≠ Dç.C≠"Cç-C ¬H≠(CçC≠-Cç"C©çJCL*M≠C©ìç" ©ˇç,©Çç ©öç" ƒ©Çm1Cç=Cç ©ìç" `≠>Cç ≠?Cç"© ç, ƒ≠>Cm@Cç ç>C≠?Ci˘ç"ç?C…ê ©ˇç, ƒ`© çAC©Çç>C©ìç?C`≠?C…\ê`≠?C…[LãJLbK…MLïJLFK…?LüJL*K…1L©JLK…#E…%…`≠BC…iÕ>C∞`≠BCi˙Õ>Cê` íK`≠CCiÕ>C∞`≠CCi˙Õ>Cê` «K`≠DCiÕ>C∞Dç% ƒ ›`≠0CH≠/CH¢˛ ,I≠/C)¸ç/Chm/Cç/Chm0Cç0C`‡ 0& 04† N/Cê»N0Cê≠/C Äç/C¿ ‰≠0C Äç0C0⁄ Ë≠/C*.0C./CLWI`¢ ˚ò…ê+…*ê-…?ê/…Tê1…iê3…sê5…Éê7…®ê9…Ωê;…“ê=…Áê?LflI©˙ç1C`©˚ç1C`©¸ç1C`©˝ç1C`©˛ç1C`©ˇç1C`©ç1C`©ç1C`©ç1C`©ç1C`©ç1C`©ç1C`©Çç ©öç"© ç, ƒ≠=Cç (CçC≠-Cç%C`≠Dç.C≠Cç(C≠ Cç)C≠Dç+C≠&Cç-C dH≠(CçC≠-Cç&C`≠Dç.C≠Cç(C≠Cç)C≠Dç+C≠'Cç-C dH≠(CçC≠-Cç'C`≠Dç,≠(Cç ≠)Cç"≠.Cç$≠Dç% ƒ ›≠ Dç,≠(Cm+Cç(Cç ≠)Cç"≠.Cç$≠Dç% ƒ ›≠(C…Ú∞≠(C…ê` ‚H≠Dç(C≠Dç-C` ‚H≠ Dç(C≠Dç-C`≠Dç,≠(Cç ≠)Cç"≠.Cç$≠,J≠>CçC≠?CçC≠ACç:C íF`©@çLC ~K©çLC`≠ Dç.C≠ Cç(C≠Cç)C≠!Cç-C≠Dç+C dH≠(Cç C≠-Cç!C`≠ Dç.C≠Cç(C≠Cç)C≠Dç+C≠"Cç-C dH≠(CçC≠-Cç"C`≠ Dç.C≠Cç(C≠ Cç)C≠Dç+C≠#Cç-C dH≠(CçC≠-Cç#C`≠Dç.C≠Cç(C≠ Cç)C≠Dç+C≠$Cç-C dH≠(CçC≠-Cç$C`≠Dç.C≠Cç(C≠ Cç)C≠Dç+C≠%Cç-C dH≠çAC ,J≠>CçC≠?CçC≠ACç8C íF≠9C… LDF≠a¿0LtF©ç9CÓKC≠1Cç3C©@çLC ~K©çLC≠Cç>C≠Cç?C≠3Cç@C≠9CçAC ,J≠>CçC≠?CçC≠ACç9C íF≠:C… L„F≠8C…`≠9C…` ¿F`≠ CçBC≠CçCC≠CçDC≠CçEC≠CçFC≠CçGC≠CçHC vJ`≠:C… L„F≠b¿0LG©ç:CÓKC≠1Cç4C G≠Cç>C≠Cç?C≠4Cç@C≠:CçAC I≠/Cç C≠ C… Œ CLE ~G≠$C… L+E©ç$C I≠/Cç C≠ C… Œ CL;E ¨G≠%C… LSE©ç%C I≠/Cç C≠ C… Œ CLcE ⁄G≠&C… L{E©ç&C I≠/Cç C≠ C… Œ CLãE H≠'C… L£E©ç'C I≠/Cç C≠ C… Œ CL≥E 6HÍ hI ÂI≠8C… LÁE≠b¿0LF©ç8CÓKC©@çLC ~K©çLC≠1Cç2C≠Cç>C≠Cç?C≠2Cç@C≠8C˛äIˇ #1?M[Ù 0P`†¿@p¯¸˙ ©ÇçCçCçC©ìçCçCçC© ç8Cç9Cç:C©dç/C©ç'ç&ç0C© ç!≠DçC≠DçC≠Dç C≠Dç C≠Dç C≠Dç C≠DçC≠Dç CçCçCçC≠ DçCçCçC≠!C… L≥D©ç!C I≠/CçC≠C… ŒCL√D "G≠"C… L€D©ç"C I≠/CçC≠C… ŒCLÎD PG≠#C… LE©ç#C •JÖLÆø˛`ä–≠¿˛QŒ¿˛ ±LëN∞0ä »–Û•MÊOÓΩ˛–Óæ˛ÊMEK·∏P.≠¿˛»–•MEK–Œ¿˛àÄ”±L-¬˛M¡˛–Δ»– ÊOÓΩ˛–Óæ˛,uÒåº˛pËéø˛òeNÖNêÊO(`•JÖN•KÖO¨§˛L◊· Ï∞/ ⁄ ÒPÛ √ê …L8– aÌ ?̆ Ƨ˛ΩÿëJ© ùÿË»¿–`Lº†±@çÈ˛çø˛»±@çÍ˛ç¿˛¨§˛π ÿ`†±@ÖN»±@ÖO¨§˛πÿ`¢ ¨§˛πÿùº˛ùü˛}È˛ùòÈ˛–©LLº≠È˛Í˛–L√ e¸∞Ì ·Ò…êLÑÒ Ï∞fi ⁄ Òp·∞Ò≠¿˛JÎçƒ˛ √ı)@–·ç√˛•NÖJ•OÖK Ï∞iÊKÊKŒ¿˛Œ¿˛ÓΩ˛ÓΩ˛– Óæ˛≠æ˛IJŒƒ˛– vÒ≠ø˛¿˛J–§∞Ã≠æ˛J≠Ω˛j®±HÖFÊI—H– … –ç√˛±HΔI∞©ÖG≠√˛¢x•KÖE ›fi∞(êò(H vÒhH √h8`†8≠È˛Ìø˛ë@»≠Í˛Ì¿˛ë@L Ϩ§˛8•N̺˛ÖN∞ΔOπ ÿ 8笲π ÿç¡˛¨º˛ ˇˇÖG≠§˛ .˛®ΩDzô ÿ ÓÖF¨§˛≠¨˛ô ÿ ”˚∞$ ◊·≠îøôÿπÿ…∞+©ˇôÿ†© ôº˛à˙ Ïê H¨§˛π ÿ 0¸¨§˛© ô ÿh8` ⁄Ì∞‰Æ£˛˛ ŸΩŸ ÄùŸ¨§˛π ÿ†ë@`© 稲穲畲®Æ•˛–Ó¨˛π ÿ–ä–(å§˛©ˇç•˛– ò ®¢π ÿ›j˛–à –ÙÓ©˛π ÿ)8`ò)‡i –ø` ÷Ò ªÒH ËÒh)–©N–$ê%¨§˛πÿ̺˛çÈ˛çø˛πÿÌΩ˛çÍ˛ç¿˛ @ˇ,.%$666&$?><76$$$46., ˇˇ ˇˇ ˇˇ(-5-=77??<<?--, $,555>>>'$??,,,(6.-???...- ˇˇ=?/-,-=7.=?' ˇˇ--?'??-5>?--, ˇ%'4></5>/57'-56$,&-.><-<',.$%5>'46=.-.>< ˇˇ ˇˇ??,,,-5,-..>??/->>66$$'' ˇˇ ˇˇ,$465--??>6&$'??-ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ " |!ç∫"METHOD FOR EVALUATING ALTERNATIVE":∫"STRATEGIES FOR DEPLOYING AND HIRING":∫"SALESMEN ACROSS MULTIPLE PRODUCT LINES." ı!í∫:∫"YOU WILL BE ASKED TO ENTER A PROFILE":∫"OF SALES PRODUCTIVITY BY MONTH":∫"FOR THE TOP 20% OF YOUR SALESFORCE..." `"ú∫"THEN(X K)»11…„(W$):∞30 ] ÇX C b W$–‰(PZ(I)À100):PK–(K 16)…1…„(W$):∞35 J g ÇI i l ∫:∫:ÅI–1¡(K 16):∫"=";:ÇI:∫ o Ä ≤ ë †∫Á(9);"40N":≤ RESTORE DISPLAY ò •ä0 • ™∫"END":Ä !àó:∫:∫"THE FORECAST AND SALES TREND (F.A.S.T)":∫"ANALYSIS MODEL IS A QUICK AND POWERFULW$;:SY–„(W$) : ÅN–1¡12 A ? W$–‰(P(I,X,N)):PK–(N K)»11…„(W$):∞30 H @ ÇN y A W$–‰(ES(I,X)À100):PK–(K 16)…1…„(W$):∞35:SY–0 Ö D ÇX:∫:ÇI ¢ I ∫:ÅI–1¡(K 16):∫"=";:ÇI:∫ º N ∫:∫"NEW HIRE PROFILE" fi S ÅI–1¡NP:∫PN$(I);:SY–„(PN$(I)) Í U ÅX–1¡12 X W$–‰(PN(I,X)):PK–(W$):∞35:SY–0 M + W$–"IN EACH RANGE":∫W$;:SY–„(W$):PK–(K 16)…1…„(W$):∞35:SY–0 h - ÅI–1¡(K 16):∫"-";:ÇI:∫ ñ . SY–0:ÅI–1¡12:PK–(I K)»8:W$–M$(I):∞30:ÇI:∫ ± / ÅI–1¡(K 16):∫"-";:ÇI:∫ Ω 0 ÅI–1¡NP — 2 ∫PN$(I):RNK–100 fl 5 ÅX–5¡1«…1 7 RNK–RNK…20:W$–‰(RNK)»" %+":∫TURN";XX$ 6 ä1:∫Á(9);"96N":∫Á(30):≤ PRINTER CONTROLS S ∫:ÅI–1¡(K 16):∫"=";:ÇI:∫ É ∫:∫¿20)"*** SALES PRODUCTIVITY PROFILE ***" â ! ∫ & W$–"% OF SALESPEOPLE":∫W$;:SY–„(W$):PK–25:W$–"SALES PRODUCTIVITY BY MONTH":∞30:W$–"# OF SALESPEOPLE":PK–(K 16)…1…„$; ˜ÅI–0¡279 ¸X–‚(N»I) 8˝≠X—œ3ÕX—œ9ƒ∫Á(X);:´1025 H˛∫Á(3);Á(3); OÇI VÇN a ∫C$;B$ x∫" 40N":≤ CTLI 40N åπ54,240:π55,253 ô∫"END":Ä Ù H(X) “ π8,L(X»1):π9,H(X»1) 6 ◊ π23,L(X»2):π24,H(X»2) P ‹ π25,L(X»3):π26,H(X»3) j Ê π27,L(X»4):π28,H(X»4) Ñ Î π29,L(X»5):π30,H(X»5) è å28000 ñ ı ÇX ® êπ54,0:π55,193 ¡ Ô∫" 120N":≤ CTLI 120N fl ∫B$;Á(30):∫C$;Á(30);C$;K$ ˆ ÚÅN–17000¡25920«280 Ù∫C$;K–Y¡Z«4 O N–N»1:H(N)–X # Q ÇX:ÇR:± 2 d N–0:ÅM–1¡3 ? i ÅY–32¡35 N n Z–Y»28:∞75 U s ÇY \ x ÇM r ñ N–0:A–0:B–128:∞50 Ö õ A–40:B–168:∞50 ò † A–80:B–208:∞50 ø ¥ C$–Á(3):K$–Á(11):B$–Á(2):PR$–Á(30) à µ K$–Á(14) · æ π250,104:π251,66 » ÅX–1¡192«6 Õ π6,L(X):π7,'∫D$;"BLOADINPUTALL" !8'U$–Á(27) ,8'MOD–60 58 'EN–2 G8 'I–1:LL–0:FL–0 \8$'∫D$;"NOMONI,O,C" m8%'N–0:S$–" ":± s8''ó ß8)'ÅZA–0¡39:∫"*";:ÇZA:∫:ñ13:û:∫"** T.O.U.G.H.**":ù ÿ8+'ñ4:û:∫"COPYRIGHT 1980 - MICRO-SPARC, INC.":ù N9-'∫"THE 'TEXT OUTPUTER, UPDATER, AND"";RP:ù /7Æ≠RP—1ŒRPœ2ƒ∫"ERROR..TRY AGAIN":´1705 [7≥≠RP–1ƒR1–1:R2–I:∞18:±:≤ ** ALL LINES ** Ø7∏û:Ñ"ENTER STARTING LINE # TO REVIEW";R1:Ñ"ENTER ENDING LINE # TO REVIEW";R2:ù:ó æ7Ω≠R2œIƒR2–I »7¬∞18:± ‹7'ÜA$(90),L$(200) Ê7'X$–"" ¸7'D$–Á(4):RT$–Á(13) 8öæK$:K–Ê(K$):≠K–26ŒK–22ƒK$–Á(K»5) 76õ≠K–27ƒUC–1:´1690 M6ú≠UC–1ÕKœ64ÕK—91ƒû X6ù∫K$;:ù y6û≠UC–0ƒK$–Á(K»32 (Kœ64ÕK—91)) ä6ü≠K–13ƒUC–0:± ¶6†≠K–8ƒ∫Á(92):X$–"":´1690 æ6°X$–X$»K$:UC–0:´1690 —6§≤ REVIEW LINES 7©û:Ñ"REVIEW (1) ALL LINES OR (2) SELECTIVE?),LE…Y»1…SE):L$(X)–X$:X$–"":K$–"":± S5ÜX$–K$»È(L$(X),LE…SE):L$(X)–X$:X$–"":K$–"":± Å5ãX$–Ë(L$(X),Y…1)»K$:L$(X)–X$:X$–"":K$–"":± ≠5ê∫X;")";:ÅXX–1¡„(L$(X)):M$–Í(L$(X),XX,1) ‹5ëû:≠M$œÁ(96)ÕM$—Á(123)ƒM–Ê(M$)…32:M$–Á(M):ù Ï5í≠M$—Á(64)ƒù ˝5ì∫M$;:ù:Ç:∫:± "6†°¢£ çÛI•çÙL ¢•BçJ˝– †ÏÑD†÷ÑEdF…–¢é罕CJJJJ™ΩÔ÷çé˝Ωn˝çH˝Ω}˝çI˝¢µCùé˝ –¯ ç˝∞ ÆJ˝–ÆÌ÷¨Ó÷≠Ï÷â–©/Ä)DI@©+8` ” @A ÄÅÇe¿¡¬√ƒ≈Δ«»… ÀÃÕŒœ –—“ˇˇˇˇˇ ˇÒ‚ ˘‹˜•˜C˜!‚$·|·óÓ1˜ÀÔOÚIÙ∏ÙÏÎÎŒı ˜†¸ë¸ËË V¸XøôXø‰K–Ú¨§˛π ÿ ô ÿ™•Kùoø`©V8`™ΩnøçÏ˛ΩoøçÌ˛` "¸® ûoøûnøÆÌ˛ËËËË V¸Iˇ9XøôXøÏÌ˛–Ô`ä)®π&˛HäJJJ®h`•O…ê≥ÆͲ≠È˛È∞ eNäeO™‡ø∞ùË V¸9Xø–ì‰O–Û`†≠Ï˛ë@»≠Ì˛ë@`† ’˚∞ ≠Ì˛ÖO≠Ï˛ÖN <¸† ¢±NëJ»–˘ÊKÊO Ú`≠É¿≠É¿©Ö?© Ö>©—Ö=d<† ¢à±<ë>ò–¯Ê=Ê? –Ò≠ã¿≠ã¿úõøúÚ© !!!! ! ! ! !!! OMOTED TO FLEET ADMIRAL" "`´4500 Lî¢18:∫"YOUR SCORE OF.."SC" WAS RATED:" ]ô¢19:ñ4:∫M$:± nà¢21:ñ16:∫BB$ tç± ˇ E RATING" .´4500 <6M$–"GOOD..PROMOTED TO EXEC OFFICER." F8´4500 r@M$–"VERY GOOD..PROMOTED TO 1ST OFFICER" |B´4500 •JM$–"EXCELLENT! PROMOTED TO CAPTAIN!" ØL´4500 fiTM$–"OUTSTANDING! PROMOTED TO REAR ADMIRAL" ËV´4500 ^M$–"SPECTACULAR! PR∞¢13:ñ16:∫G;"..";G$ &¥≠SC—100ƒ4100 7µ≠SC—200ƒ4120 H∂≠SC—300ƒ4130 Y∑≠SC—500ƒ4140 j∏≠SC—650ƒ4150 {π≠SC—750ƒ4160 å∫≠SC—850ƒ4170 ûª≠SC—1000ƒ4180 ®»´4190 ΩM$–"LOUSY":´4500 —M$–"POOR":´4500 Â"M$–"FAIR":´4500 ,M$–"NOT BAD..APPRENTICSC;" HAS BEATEN THE":∫"PREVIOUS HIGH SCORE OF..";HS K±∫"CONGRATULATIONS!" W∂HS–SC:± w†¢6:ñ5:∫"YOU SHOT DOWN....." ç•¢7:ñ16:∫A;"..";A$ £¶¢8:ñ16:∫B;"..";B$ π®¢9:ñ16:∫C;"..";C$ –™¢10:ñ16:∫D;"..";D$ Á¨¢11:ñ16:∫E;"..";E$ ˛Æ¢12:ñ16:∫F;"..";F$ π800,136:π802,156:å3786 46π800,255:π802,140:å3786 :ò± F∏ â:å…936 WΩ ≠SCœHSƒ∞3500 aæ ∞4000 ë¿ ¢21:Ñ"ANOTHER MISSION? HIT RETURN";X$:∞2015 ≈« SC–0:π17227,0:≤ RESET SCORE AND NUMBER OF SHOTS Èà A–0:B–0:C–0:D–0:E–0:F–0:G–0:´20 3¨∫"YOUR SCORE OF ";02,0:å3786 &"π800,255:π802,159:å3786 @$π800,0:π802,159:å3786 X&π800,0:π802,0:å3786 r(π800,0:π802,130:å3780 é*π800,124:π802,154:å3786 ™,π800,136:π802,154:å3786 Δ.π800,255:π802,130:å3786 ‡0π800,0:π802,140:å3780 ¸2π800,124:π802,156:å3786 4–4000:± 3¢21:∫"TIME LEFT..";:ñ23:∫"SHOTS USED.." b¢22:∫"PREV HIGH SCORE=";HS;:ñ26:∫"SCORE.." â¢23:∫"LAST HIT=";:ñ27:∫"SCORING.." ñπ812,255 ªÅI–1¡100:XX–€(1) 250:YY–€(1) 120 ÿπ800,XX:π802,YY:å3780:ÇI π800,0:π802,0:å3780 π800,255:π8–ÜA$(20),B$(20),C$(20),D$(20),E$(20),F$(20),G$(20),X$(2),M$(40),BB$(4) ò’BB$–" ":A$–" TIE FIGHTER ":B$–" KLINGON CRUISER":C$–" HOSPITAL SHIP " fi⁄D$–" KLINGON FIGHTER":E$–" TIE SUPPLY SHIP":F$–" TWA FREIGHTER " flG$–" COMM SATELLITE ":å…936:N23:ñ10:∫E$;:ñ37:∫"+20":X–0 A ˘SC–SC»20:¢22:ñ36:å…868:∫SC:E–E»1:± j Xπ17226,0:¢23:ñ10:∫F$;:ñ37:∫"-40":X–0 ë ]SC–SC…40:¢22:ñ36:å…868:∫SC:F–F»1:± ∫ ºπ17226,0:¢23:ñ10:∫G$;:ñ37:∫"-20":X–0 · ¡SC–SC…20:¢22:ñ36:å…868:∫SC:G–G»1:± ¯ ¢21:ñ35:å…868:∫S:± ˛ ËÄ H± * » π17226,0:¢23:ñ10:∫B$;:ñ37:∫"+40":X–0 Q Õ SC–SC»40:¢22:ñ36:å…868:∫SC:B–B»1:± z ,π17226,0:¢23:ñ10:∫C$;:ñ37:∫"-50":X–0 ° 1SC–SC…50:¢22:ñ36:å…868:∫SC:C–C»1:± êπ17226,0:¢23:ñ10:∫D$;:ñ37:∫"+30":X–0 Ò ïSC–SC»30:¢22:ñ36:å…868:∫SC:D–D»1:± Ùπ17226,0:¢ ≠X–4ƒ∞400:´35 " ≠X–5ƒ∞500:´35 4 ≠X–6ƒ∞600:´35 F ! ≠X–7ƒ∞700:´35 ` # S–‚(17227):≠S—œTƒ∞800 h $ T–S } ( N–N…1:¢21:ñ16:∫N ï - ≠N–1000ŒN–100ƒ∞5000 © 2 ≠Sœ300ŒN–0ƒ3000 ± 7 ´24 ⁄ d π17226,0:¢23:ñ10:∫A$;:ñ37:∫"+50":X–0 i SC–SC»50:¢22:ñ36:å…868:∫SC:A–A»1:4);"BLOAD STAR.AL":∫Á(4);"BLOAD STAR.SHAPES":∫Á(4);"BLOAD HI-RES":π103,1:π104,16:π4096,0:∫Á(4)"RUN STAR ATTACK" Ç ∞2000:π17227,0 è π17226,0 ï â † å17434 Æ ∞2050:´26 π å17563 » X–‚(17226) ⁄ ≠X–1ƒ∞100:´35 Ï ≠X–2ƒ∞200:´35 ˛ ≠X–3ƒ∞300:´35 u ! ≤ ************************* A ≤ * APPLESOFT STAR ATTACK * a ≤ * BY MIKE HARVEY * Å ≤ * COPYRIGHT (C) 1983 * ° ≤ * BY MICROSPARC, INC. * ¡ ≤ * CONCORD, MA 01742 * · ≤ ************************* o ¥‚(103)–1Õ‚(104)–16´15:∫Á( USE THE TABLE ON THE":∫"NEXT PAGE TO DECIDE ON THE LINE LENGTH" n;7'∫:Ñ"HIT RETURN KEY TO GO TO NEXT PAGE";XX$ Ó;9'ó:ñ9:∫"** TABLE OF LINE LENGTHS **":∫:∫"DECIDE ON PRINT SIZE (8.3, 10, 12, 16.5":∫"CHARACTERS/INCH). THEN DECIDE ON NORMAL" f<;'∫"OR ENHANCEDGENERALLY SELF-PROMPTING.":∫:∫"TO COMPENSATE FOR THE DIFFERENCES IN " æ:3'∫"PRINT SIZES...WHICH BECOMES ESPECIALLY":∫"IMPORTANT IN AUTOMATIC TEXT CENTERING,":∫"USE THE FOLLOWING GUIDELINES:" ?;5'∫"DECIDE WHICH SIZE TO USE FOR FINAL TEXT":∫"PRINTING. THEN :∫"GENERALIZED FORMATTER (T.O.U.G.H.) IS":∫"A SYSTEM FOR MANAGING TEXT OF ALL" —9/'∫"TYPES. IN OPERATION WITH THE APPLE II":∫"AND THE IDS 440 PRINTER, IT CAN HANDLE":∫"4 DIFFERENT PRINT SIZES AS WELL AS WIDE" E:1'∫"'ENHANCED' PRINTING.":∫:∫"THE SYSTEM IS ˇˇ @ ,.%$666&$?><76$$$46., ˇˇ ˇˇ ˇˇ(-5-=77??<<?--, $,555>>>'$??,,,(6.-???...- ˇˇ=?/-,-=7.=?' ˇˇ--?'??-5>?--, ˇ%'4></5>/57'-56$,&-.><-<',.$%5>'46=.-.>< ˇˇ ˇˇ??,,,-5,-..>??/->>66$$'' ˇˇ ˇˇ,$465--??>6&$'??-ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ ˇˇ !! ç,≠Dç$≠(Cç ≠)Cç" ƒ › ~K ~K≠Dç, ƒ ›`ÓIC≠IC`∫ ç(C≠ Cç)C ˘L ˘L≠ Dç.C≠#Cç-C “H≠(CçC≠-Cç#C©çJCL*M≠Cç(C≠ Cç)C ˘L≠Dç.C≠$Cç-C “H≠(CçC≠-Cç$C©çJCL*M≠Cç(C≠ Cç)C ˘L≠Dç.C≠%Cç-C ¬H≠(CçC≠-Cç%C©çJCL*M≠Cç(C≠ Cç)C ˘L ˘L≠Dç.C≠&Cç-C “H≠(CçC≠-Cç&C©çJCL*M≠Cç(C≠Cç)C ˘L≠Dç.C≠'Cç-C ¬H≠(CçC≠-Cç'C©çJCL*M≠ D`≠DCi˙Õ>Cê` ˘K`≠ECiÕ>C∞`≠ECi˙Õ>Cê` .L`≠FCiÕ>C∞`≠FCi˙Õ>Cê` `L`≠GCiÕ>C∞`≠GCi˙Õ>Cê` íL`≠HCiÕ>C∞`≠HCi˙Õ>Cê` «L`†¢ äÈ–¸ç0¿ËåLC–Ò`≠ Cç(C≠Cç)C ˘L≠ Dç.C≠!Cç-C ¬H≠(Cç C≠-Cç!C ~K©çJCL*M≠Cç(C≠Cç)C ˘L≠ Dç.C≠"Cç-C ¬H≠(CçC≠-Cç"C©çJCL*M≠C©ìç" ©ˇç,©Çç ©öç" ƒ©Çm1Cç=Cç ©ìç" `≠>Cç ≠?Cç"© ç, ƒ≠>Cm@Cç ç>C≠?Ci˘ç"ç?C…ê ©ˇç, ƒ`© çAC©Çç>C©ìç?C`≠?C…\ê`≠?C…[LãJLbK…MLïJLFK…?LüJL*K…1L©JLK…#E…%…`≠BC…iÕ>C∞`≠BCi˙Õ>Cê` íK`≠CCiÕ>C∞`≠CCi˙Õ>Cê` «K`≠DCiÕ>C∞Dç% ƒ ›`≠0CH≠/CH¢˛ ,I≠/C)¸ç/Chm/Cç/Chm0Cç0C`‡ 0& 04† N/Cê»N0Cê≠/C Äç/C¿ ‰≠0C Äç0C0⁄ Ë≠/C*.0C./CLWI`¢ ˚ò…ê+…*ê-…?ê/…Tê1…iê3…sê5…Éê7…®ê9…Ωê;…“ê=…Áê?LflI©˙ç1C`©˚ç1C`©¸ç1C`©˝ç1C`©˛ç1C`©ˇç1C`©ç1C`©ç1C`©ç1C`©ç1C`©ç1C`©ç1C`©Çç ©öç"© ç, ƒ≠=Cç (CçC≠-Cç%C`≠Dç.C≠Cç(C≠ Cç)C≠Dç+C≠&Cç-C dH≠(CçC≠-Cç&C`≠Dç.C≠Cç(C≠Cç)C≠Dç+C≠'Cç-C dH≠(CçC≠-Cç'C`≠Dç,≠(Cç ≠)Cç"≠.Cç$≠Dç% ƒ ›≠ Dç,≠(Cm+Cç(Cç ≠)Cç"≠.Cç$≠Dç% ƒ ›≠(C…Ú∞≠(C…ê` ‚H≠Dç(C≠Dç-C` ‚H≠ Dç(C≠Dç-C`≠Dç,≠(Cç ≠)Cç"≠.Cç$≠,J≠>CçC≠?CçC≠ACç:C íF`©@çLC ~K©çLC`≠ Dç.C≠ Cç(C≠Cç)C≠!Cç-C≠Dç+C dH≠(Cç C≠-Cç!C`≠ Dç.C≠Cç(C≠Cç)C≠Dç+C≠"Cç-C dH≠(CçC≠-Cç"C`≠ Dç.C≠Cç(C≠ Cç)C≠Dç+C≠#Cç-C dH≠(CçC≠-Cç#C`≠Dç.C≠Cç(C≠ Cç)C≠Dç+C≠$Cç-C dH≠(CçC≠-Cç$C`≠Dç.C≠Cç(C≠ Cç)C≠Dç+C≠%Cç-C dH≠çAC ,J≠>CçC≠?CçC≠ACç8C íF≠9C… LDF≠a¿0LtF©ç9CÓKC≠1Cç3C©@çLC ~K©çLC≠Cç>C≠Cç?C≠3Cç@C≠9CçAC ,J≠>CçC≠?CçC≠ACç9C íF≠:C… L„F≠8C…`≠9C…` ¿F`≠ CçBC≠CçCC≠CçDC≠CçEC≠CçFC≠CçGC≠CçHC vJ`≠:C… L„F≠b¿0LG©ç:CÓKC≠1Cç4C G≠Cç>C≠Cç?C≠4Cç@C≠:CçAC I≠/Cç C≠ C… Œ CLE ~G≠$C… L+E©ç$C I≠/Cç C≠ C… Œ CL;E ¨G≠%C… LSE©ç%C I≠/Cç C≠ C… Œ CLcE ⁄G≠&C… L{E©ç&C I≠/Cç C≠ C… Œ CLãE H≠'C… L£E©ç'C I≠/Cç C≠ C… Œ CL≥E 6HÍ hI ÂI≠8C… LÁE≠b¿0LF©ç8CÓKC©@çLC ~K©çLC≠1Cç2C≠Cç>C≠Cç?C≠2Cç@C≠8C D1 ˇ #1?M[Ù 0P`†¿@p¯¸˙ ©ÇçCçCçC©ìçCçCçC© ç8Cç9Cç:C©dç/C©ç'ç&ç0C© ç!≠DçC≠DçC≠Dç C≠Dç C≠Dç C≠Dç C≠DçC≠Dç CçCçCçC≠ DçCçCçC≠!C… L≥D©ç!C I≠/CçC≠C… ŒCL√D "G≠"C… L€D©ç"C I≠/CçC≠C… ŒCLÎD PG≠#C… LE©ç#C PRINTING. THEN TRY TO MAKE":∫"YOUR LINE LENGTH EQUAL TO OR LESS THAN":∫"THE LINE LENGTH SHOWN BELOW:" §<='∫:ñ18:∫"LINE LENGTHS":∫"PRINT SIZE NORMAL ENHANCED" ø<>'ÅZA–0¡39:∫Á(95);:ÇZA:∫ ‚<?'∫"8.3 CHAR/INCH 60 30" =@'∫"10 CHAR/INCH 70 ”»¡–≈q≥ √œÃq√ƒΔÿœqƒÿœΔŸœqƒŸœΔÿŒqƒÿŒΔŸŒqƒŸŒ\± ƒÿœqƒÿŒƒÿŒqƒÿŒ± `ƒÿŒ≥" %\±π } `ƒ√‘∞ %ƒ√‘qƒ√‘± ê ]†™™†”’¬Õ¡“…Œ≈†“œ’‘…Œ≈Fë `”√‘∞ $±Ø ”»¡–≈q¥0 √œÃq√”Δÿœq”ÿœΔŸœq”ŸœΔÿŒq”ÿŒΔŸŒq”ŸŒ\± $í ”ÿœq”ÿŒ”ÿŒq”ÿŒ””`”ÿŒ∞ %\±æ Ø `”√‘∞ K `¬√‘∞ %¬√‘q¬√‘± P _π_ $T ]†™™†“≈”≈‘†Δ…«»‘≈“†¡Œƒ†√œ’Œ‘ƒœ◊Œ@U –ÿŒq≥ –√‘q/?± r\± –”q/?≥ r± ΔÿŒqΔÿœΔŸŒqΔŸœ\± [#Y ]†™™†“≈”≈‘†¬œÕ¬≈“†¡Œƒ†√œ’Œ‘ƒœ◊Œ2Z ¬ÿŒq≥" ¬√‘q/?± r\± ΔÿŒqΔÿœΔŸŒqΔŸœ\± [^ ]†™™†ƒ≈”‘“œŸ≈“†“œ’‘…Œ≈h_ `ƒ√‘∞ $±}g `–√‘∞ $¥- ”»¡–≈q∞ √œÃq√ΔΔÿœq–ÿœΔŸœq–ŸœΔÿŒq–ÿŒΔŸŒq–ŸŒ\± –ÿœq–ÿŒ–ÿŒq–ÿŒ–”`–ÿŒ≥" %\∏U - `–√‘∞ %–√‘q–√‘± 0 ]†™™†¬œÕ¬≈“†“œ’‘…Œ≈h2 `¬√‘∞ $∑K ”»¡–≈q± √œÃq√¬Δÿœq¬ÿœΔŸœq¬ŸœΔÿŒq¬ÿŒΔŸŒq¬ŸŒ\± ¬ÿœq¬ÿŒ¬ÿŒq¬ÿŒ± `¬ÿŒ≤ %\πZ ]†ƒ“¡◊†Œ≈◊†”»¡–≈D d∏ e∞ dµ eΔÿŒd∂ eΔŸŒd≤e”»¡–≈M≤ []†≈“¡”≈≠≈Œƒ†œΔ†Ã…Œ≈H d∏ e√Ãdµ eΔÿœd∂ eΔŸœd≤e”»¡–≈M≤ _± ]†≈“¡”≈†œÃƒ†Ã…‘≈†¬Ã’≈E d∏ e√Ãdµ eΔÿœd∂ eΔŸœd≤e”»¡–≈M≤ []†≈“¡”≈†œÃƒ†Ã…‘≈†¬Ã’≈ ]†™™†Δ…«»‘≈“†–áŒ≈†“œ’‘…Œ≈ ]†™™™™™™™™™™™™™™™™™™™™™™™™™( M6π®\∑XM6π®L\∂p`⁄@9(Ÿ)%\∏@ L o≤ `–»”∞ %a(–“≈÷†»…†”√œ“≈Ω)F–»”GP≤ a(‘…Õ≈†Ã≈Δ‘††Ω)F√‘ƒGo≤ _≤ @ d∏ e∞ dµ eΔÿœd∂ eΔŸœd≤e”»¡–≈M≤ ]†≈“¡”≈†œÃƒ†”»¡–≈A d∏ e√œÃdµ eΔÿŒd∂ eΔŸŒd≤e”»¡–≈M≤ [ B d≤à e∞ d≤Õ e± d∑J e∞ d∑K e± a(ѬÜ¡ƒ†¡…“”≈¡†Õ¡√»†Ã¡Œ«) ]†™™™™™™™™™™™™™™™™™™™™™™™™™ ]†™™†¡…“Ø”≈¡†¬¡‘‘Ã≈††††††™™ ]†™™†Õ…√“œ≠”–¡“√†††††††††™™ ]†™™†–ƜƆ¬œÿ†≥≤µ††††††††™™ ]†™™†Ã…Œ√œÃŒ†Õ¡””¨†∞±∑∑≥†™™ ]†™™†√œ–Ÿ“…«»‘†±π∑π††††††™™ """""" );"RUN APPLE T.R.A.C." $ ES TO:":∫¿10)"MICRO-SPARC":∫¿10)"P.O. BOX 325" N :∫¿10)"LINCOLN, MASS. 01773" Ç ?∫:Ñ"HIT RETURN TO RETURN TO MENU OF OPTIONS";X$ ä DΩ:ó ˜ N∫"THE WINNING ENTRY WAS PUBLISHED IN ":∫"VOLUME 2, NUMBER 8.":∫:û:Ñ"HIT RETURN TO GO BACK TO TRAC ";X$:ù X∫Á(4AT THE PROGRAM":∫"ORIGINALLY DISPLAYED WHEN THE GRAPH":Ñ"ROUTINE WAS SELECTED: ";X$:ù ¬ 0å…936:∫"THIS IS THE UNWRITTEN GRAPHICS OPTION":∫"FOR TRAC.":∫:∫"YOU CAN WIN A PROGRAMMA JOYSTICK AND AN" . 5∫"EXPANDA-PORT FOR THE BEST PROGRAM.":∫:∫"SEND YOUR ENTRI ó ! ∫"TRAC GRAPH ROUTINE" r ∫:∫"WHEN THE TRAC PROGRAM WAS FIRST":∫"PUBLISHED IN VOLUME 1, NUMBER 1, THE" û( ∫"GRAPH ROUTINE WAS INTENTIONALLY LEFT" …2 ∫"OUT. A CONTEST WAS HELD TO SEE WHO" ·< ∫"COULD WRITE ONE." U F ∫:û:∫"HIT RETURN TO SEE WH " " " " † ÅZ–1¡1500:ÇZ ™ ´20 X ë í”(€(1) 8) & X–”(€(1) 8) 7( ÅA–0¡139«X»2 I2 ìA,0¡139…A,79 _< ì279…A,0¡140»A,79 sF ìA,159¡139…A,80 ãP ì279…A,159¡140»A,80 íZ ÇA ¢d ÅB–0¡79«X»2 ¥n ì0,79…B¡139,B »x ì140,B¡279,79…B fiÇ ì0,80»B¡139,159…B ˆå ì279,80»B¡140,159…B ˝ñ ÇB "" 
