ðJ™ÿÿ<ÿÿÿ&³ÿÿMJÿÿ=JÊÿÿ¥JÈÿÿJ@ÿÿF‘ÿÿ 3 ÿÿ½ÌÿÿCÈÿÿ @ÿÿ>‘)ÿÿ… <ÿÿ]¥ÿÿ©Èÿÿ?J@ÿÿ…*‘ÿÿÀ… ÿÿ J™ÿÿJ<ÿÿJ…ÿÿJJ)ÿÿJJ*ÿÿŠJ¥ÿÿ@Èÿÿ„@ÿÿA½‘ÿÿ… ÿÿ fÿÿÌ2ÿÿ¢*ÿÿ'&ÿÿ…>Jÿÿ l<ÿÿ©?&ÿÿ+æJÿÿ¦?Jÿÿô…JÿÿÐJ`ÿÈÌ+ÿf¦ÿ>½@ÿ™…È‘ÿ í@ ÿ Ð‘ÿÿ = ÿæ3JÿAJÿ¹æ*Jÿ™&6HŽé7Ž÷7©ø7ê7à7á7©ì7â7í7ã7ñ7©ô7ŠJJJJª©øx “7¢ÿšŽë7 “þ ‰þLñ7ã78ç7íã7à7©ì7í7ð7ç7ñ7þ6© á7â7©Hÿ6©ô7 “7ã7ñ7à7á7 “7`å7¬ä7 µ7¬í7ÈÀ Ð îì7Œí7îñ7Îá7Ðß`x =°(`(8`¼5ñ7©ð7ù5Iÿë7`©¨‘BÈÐû` è76`û77þ`ïØ¢2 ±>…&JJJ;È±>…'JJJ3;È±>…*JJJf;È±>J&*J&'J&&™;È±>J&*J&'JÌ;¥&*)<¥')3<¥*)f<ÈÊª±>ª)™<ŠJJJÿ;`8½À½ŽÀ0|†'Žx<…&©ÿÀŒÀHhê & ô8ˆÐø©Õ ó8©ª ó8© ó8˜ šÐ¹È½3È½fÈ¥&)™;‘>È¥')Ì;‘>ÈÊ³™`…*ÍxðY†+©…&x…'8å*ðB°IÿîxiþÎxÅ&¥&É©¨x) +ª½À¹: :¥') +ª½€À¹œ: :æ&Ð´©ÿ :¦+`¢ÊÐýæFÐæG8éÐð`0($ p,&" (0 8@ HPX !"#$`h%&px'€ˆ)*+,-./123˜ 4¨°¸5679:ÀÈÐ;<Øà>èðø «®¯µ¶·º»½¾¿Ö×ÚÛÝÞßêëíîïõö÷úûýþÿ¤-¹Ð< L > „H…I ±HªŒø ÑHðŠH±HªhH‘H½ŽÀ ½ŒÀÝŒÀÐöˆÐøhª½ŽÀ½ŒÀ½ŒÀHhŽøÝŒÀ½‰À ±H™6ÈÀ Ðö ±H ÑHð‘H( j½ŠÀ°½‹Àf5 ±<…FÈ±<…GÈ±H ;>(Ð ˆÐýæFÐ÷æGÐó ±HðUÉðSj° 8 0Œx®ø e9ÎxóxH©` ‚>ÎøÐ#© ;>h ;>L›=¤.Ìxð"xH˜ ‚>hÎxå0Êh©@(L)>ð@ ±H…/Lœ> ±HH¥/ ‘HhðÅ/ð© ÐÛ ¥-ÑHð Îx©€ÐÊ( ý8°ˆ( Á9®ø$8 ‘H½ˆÀ` j8ð©°îH ±Nx`….½€À½‚À½„À½†À {>¹x$50¹øx¥.$50™ø™xL:ŠJJJJ¨`H ±Hjf5 {>h $50™ø™x`©€x©…A :©ª…J P„G©'…K½À½ŽÀ©ÿÀÝŒÀ$ˆðHhêHhêêÀÝŒÀ°îÆKÐð¤GêêÐHhHhÁêÀÝŒÀˆÐð©Õ Ê?©ª Ë?©µ Ë?¥/ »?¥A »?¥K »?¥/EAEKHJJÀÝŒÀh ª Ê?©Þ Ë?©ª Ë?©ë Ë?©ÿ Ë? „F Ðˆð HhêHhÀÝŒÀ°ðÆFÐò¤G$À½ŒÀ¥Ki …Kéð °,…K©ÿLç>Hh¤G½À½ŽÀ04ˆHhêê$HhˆÐõ e9°¥-ð ¤GˆÀL®>æA¥AÉ#° :¤GÈÈ„GL®>©@L)>L'>HJJÀÝŒÀhÁ ªêHhêÀÝŒÀ`èð`LÝ%c*p*q*` ['Œ·*` ~.®›3š #ºŽ›3© L…3L„©¿…A¢†@ ¡@…&˜E&…&˜A@@Å&ÐÈÐïðÆAÐã¥A)ß…C†B¡BH…&˜E&…&˜A@BÅ&Ð ÈÐï¤ChLQhB¤AÈŒy8˜ízx8ívð{v ©I7©„H7¢†@½)¨½*…AL“±@m{‘@ÈÐæAÈÐæA¥AÝ,ç˜Ý+áŠiªì(Ë¢Žœ3½Z…@½[…A¢¡@ Žø¤/ÀÐ±@Ív Íw°m{‘@8¥/e@…@©eA…A®œ3Ý]Í¥@Ý\ÆŠiªìY¯©?…A¬yˆ„C©…@…B¨±@‘BÈÐùÎ|ðÆAÆCÐîLT$VXZdflpx|~€Á*ý*ä7è7î7ð7„„(ý*—37à7þ5þ58:=ÿ?@##¥t†o…p „‹¥m¦n…›†œ©U¢…^†_ÅRð ð÷©…¥i¦j…^†_älÐÅkð ðó…”†•©…¥”¦•änÐÅmÐLY…^† ±^ªÈ±^È±^e”…”È±^e•…•(ÓŠ0Ð¦¦¦€e^…^æÓ½u*“*`*»5ê".Q`pN%$–#Ð$ï$b"p"t"é"%Å%%Ü%¢"—"€"m%2"<"("-"P"y%%0#\##|"6èå$ããàà6èå$ããààü$ü$eØà<ÔòÔ%%g„<òé7JJJJj*ê7h*àI Ð¶*¢ ½aUÊÐ÷L¼©@¶*¢½kUÊÐ÷8°¶*Ð© Ð ©L ²% Q(©^*R*(jQ*0l^l\ ¶*¢½wUÊÐ÷¢½“*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*ðvc*Ž]*ÐÜ¢ Ý@)ðÊÐøð¶½J)0G e*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 #hW*LÔ'© ª" d' ˜‘@`©Ð© ª"Lê"©Ðö½5 ¾5© c* È"Lê" £" Œ&ÐûLF%©LÕ#©c*l*Ð m*Ð©l*l*½5m*¾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©¼5 ¨&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*JðLž%¢½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—#© ª"¿5f*`©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´*…@` + d'°©¨‘@Å5ÉÐ¢ŽÃ5`©Ð ©Ð©Ð© \* æ?¶*ð¥Ø0¢ '®\* ' È Q( ^&®\*©°lZl^½?*ªŽc*½q)H € Å®c*èhí`f*¿5h*À5j*Á5Ã5Ä5¥@O*¥AP*` ¹u*‘@ˆø` ±@™©5ÈÀ&Ðö` ŒQ*ŒR*`©…E ’'Ls' š'ð ª'Ð ¥@…D¥A…EÐì ±@Ùu*Ðãˆö`8`®Ð %±@ð ªˆ±@†A…@Š` ±@`³*ð´*Å@Ðµ*ÅAðÊ`MÂ5ð )ð ê"LÐ&`8…@…AW*c* ˜‘@ 8¥@é-‘@H¥AéÈ‘@ªÊhHÈ‘@ŠÈ‘@ªÊhHÈ‘@ÈŠ‘@Îc*ðªh8é&È‘@HŠéÈ‘@…Ah…@Lå'H©È‘@È‘@¶*ðh…t…ph…s…o`h…M…Ëh…L…Ê`¥9ÍðV*¥8U*…8…9¥7ÍðT*¥6S*…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½Æ4ðS0J ½È4 ª˜ íý½È4) °ˆÐú¹§3 íý© íý½ç4…D½è4…E B.© íýèèè ½Æ4 íýèˆö /. 02§°žL3© íýÎ3Ð ý©3` ©H¥DÙ¤3ù¤3…D¥Eé…EhiHLG.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 Þ5‘BÈß5‘Bhªh¨©Ð©ŽÓ5ŒÔ5 R0 ±BÜ5mÚ5Þ5È±BÝ5mÛ5ß5` ä/©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Íá5ðf /å5ÍÝ5Ðä5ÍÜ5å5Íß5Ðä5ÍÞ5 ^/×`8ä5íÜ5 i¨ ÈÀÐó®œ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ñ5ð8©™ö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©må5å5`©Ð"©Ð©Ð©Ð©Ð©ÐLí?ê© ÐÅ58Å5©…H ~.(®›3š`õøÿ dÔÉÁÂÓÒÁÂ ÅÍÕÌÏÖ ËÓÉÄþz# ÿþu*`C(6,6)ÐÉ27:C(6,7)ÐÉ16:C(6,8)ÐÉ3ÍC(6,9)Ð12:C(6,10)Ð29:C(6,11)Ð48:C(6,12)Ð69:C(6,13)Ð92:C(6,14)ÐÉ44:C(6,15)ÐÉ43:C(6,16)ÐÉ40:C(6,17)ÐÉ35:C(6,18)ÐÉ28:C(6,19)ÐÉ19:C(6,20)ÐÉ8:C(6,21)Ð5:C(6,22)Ð20:C(6,23)Ð37:C(6,24)Ð56:C(6,25)Ð77:C(6,26)ÐÉ110:C(6,27)ÐÉ107:C(6,72)ÐÉ296:C(4,73)ÐÉ503:C(4,74)ÐÉ532:C(4,75)ÐÉ294:C(4,76)Ð300ÉC(4,77)Ð0:C(4,78)ÐÉ126:C(4,79)ÐÉ193:C(4,80)ÐÉ142:C(4,81)Ð86:C(4,82)Ð0:C(4,83)ÐÉ58:C(4,84)ÐÉ67:C(4,85)Ð22:C(4,86)Ð0:C(4,87)ÐÉ8:C(4,88)Ð1:C(6,1)ÐÉ52:C(6,2)ÐÉ51:C(6,3)ÐÉ48:C(6,4)ÐÉ43:C(6,5)ÐÉ36:(4,53)ÐÉ643:C(4,54)ÐÉ98:C(4,55)Ð748:C(4,56)Ð0:C(4,57)ÐÉ7506:C(4,58)ÐÉ13843:C(4,59)ÐÉ17842:C(4,60)ÐÉ18334<ÅC(4,61)ÐÉ14150:C(4,62)ÐÉ4121:C(4,63)Ð12922:C(4,64)Ð0:C(4,65)ÐÉ832:C(4,66)ÐÉ1489:C(4,67)ÐÉ1796:C(4,68)ÐÉ1578:C(4,69)ÐÉ660:C(4,70)Ð1133:C(4,71)Ð0:C(4C(4,34)ÐÉ43284:C(4,35)Ð10032:C(4,36)Ð84075:C(4,37)Ð0:C(4,38)ÐÉ2816:C(4,39)ÐÉ5363:C(4,40)ÐÉ8179:C(4,41)ÐÉ8574:C(4,42)ÐÉ8700:C(4,43)ÐÉ7481hÁC(4,44)ÐÉ4648:C(4,45)Ð68:C(4,46)Ð6936:C(4,47)Ð0:C(4,48)ÐÉ358:C(4,49)ÐÉ673:C(4,50)ÐÉ902:C(4,51)ÐÉ1002:C(4,52)ÐÉ930:C(4,16)ÐÉ2365:C(4,17)ÐÉ3350:C(4,18)ÐÉ4098:C(4,19)ÐÉ4530:C(4,20)ÐÉ4567:C(4,21)ÐÉ4130:C(4,22)ÐÉ3140:C(4,23)ÐÉ1518:C(4,24)Ð815:C(4,25)Ð3938:C(4,26)Ð0:C(4,27)ÐÉ29592:C(4,28)ÐÉ56881ˆ½C(4,29)ÐÉ79564:C(4,30)ÐÉ95338:C(4,31)ÐÉ101900:C(4,32)ÐÉ96947:C(4,33)ÐÉ78176:5ÔµC(2,82)Ð131:C(2,83)Ð75:C(2,84)ÐÉ30:C(2,85)Ð5:C(4,1)Ð0:C(4,2)ÐÉ8558:C(4,3)ÐÉ16649:C(4,4)ÐÉ23806:C(4,5)ÐÉ29562:C(4,6)ÐÉ33450:C(4,7)ÐÉ35003:C(4,8)ÐÉ33754:C(4,9)ÐÉ29236:C(4,10)ÐÉ20982:C(4,11)ÐÉ8525:C(4,12)Ð8602¯¹C(4,13)Ð30866:C(4,14)Ð0:C(4,15)ÐÉ1222:C(2,61)ÐÉ2937:C(2,62)ÐÉ2860:C(2,63)Ð2145±C(2,64)Ð677:C(2,65)Ð600:C(2,66)Ð390:C(2,67)Ð110:C(2,68)ÐÉ160:C(2,69)ÐÉ198:C(2,70)Ð110:C(2,71)Ð143:C(2,72)Ð120:C(2,73)Ð60:C(2,74)ÐÉ10:C(2,75)ÐÉ45:C(2,76)Ð18:C(2,77)Ð179:C(2,78)Ð135:C(2,79)Ð30:C(2,80)ÐÉ55:C(2,81)Ð1(2,41)Ð405:C(2,42)Ð18:C(2,43)ÐÉ290:C(2,44)ÐÉ420:C(2,45)ÐÉ255:C(2,46)Ð340:C(2,47)Ð883'C(2,48)Ð825:C(2,49)Ð660:C(2,50)Ð415:C(2,51)Ð135:C(2,52)ÐÉ117:C(2,53)ÐÉ260:C(2,54)ÐÉ195:C(2,55)Ð195:C(2,56)Ð11063:C(2,57)Ð10125:C(2,58)Ð7500:C(2,59)Ð3755:C(2,60)ÐÉ165:C)ÐÉ285:C(2,23)ÐÉ285:C(2,24)ÐÉ114:C(2,25)Ð285:C(2,26)Ð44003:C(2,27)Ð42120:C(2,28)Ð36660:C(2,29)Ð28190:C(2,30)Ð17655:C(2,31)Ð6378T©C(2,32)ÐÉ3940:C(2,33)ÐÉ11220:C(2,34)ÐÉ13005:C(2,35)ÐÉ6460:C(2,36)Ð11628:C(2,37)Ð1393:C(2,38)Ð1320:C(2,39)Ð1110:C(2,40)Ð790:CC(2,2)Ð4125:C(2,3)Ð3750:C(2,4)Ð3155:C(2,5)Ð2385:C(2,6)Ð1503:C(2,7)Ð590:C(2,8)ÐÉ255:C(2,9)ÐÉ915:C(2,10)ÐÉ1255:C(2,11)ÐÉ1122:C(2,12)ÐÉ345:C(2,13)Ð1265:C(2,14)Ð1011¥C(2,15)Ð975:C(2,16)Ð870:C(2,17)Ð705:C(2,18)Ð495:C(2,19)Ð261:C(2,20)Ð30:C(2,21)ÐÉ165:C(2,22:C(1,67)Ð16:C(1,68)Ð9:C(1,69)Ð0:C(1,70)ÐÉ11:C(1,71)Ð89:C(1,72)Ð84:C(1,73)Ð69:C(1,74)Ð44:C(1,75)Ð9:C(1,76)ÐÉ36:C(1,77)Ð59:C(1,78)Ð54:C(1,79)Ð39:C(1,80)Ð14:C(1,81)ÐÉ21:C(1,82)Ð7:C(1,83)Ð6:C(1,84)Ð3¡¡C(1,85)ÐÉ2:C(1,86)Ð17:C(1,87)Ð12:C(1,88)ÐÉ3:C(2,1)Ð4253:h¨h¢öšH˜H`©ºŽ(0,22)Ð358530:C(0,23)Ð281979:C(0,24)Ð61845:C(0,25)ÐÉ346731:C(0,26)ÐÉ42966:C(0,27)ÐÉ39672:C(0,28)ÐÉ3018†#âC(0,29)ÐÉ15678:C(0,30)Ð1878H$åC(0,31)Ð19734:C(0,32)Ð34353:C(0,33)Ð41412:C(0,34)Ð35802:C(0,35)Ð11628:C(0,36)ÐÉ37791:C(0,37)ÐÉ116820:C(0,38)ÐÉ105864:É100026:C(0,6)Ð54855:C(0,7)Ð207579:C(0,8)Ð336201:C(0,9)Ð414786:C(0,10)Ð413409:C(0,11)Ð298155:C(0,12)Ð31119:C(0,13)ÐÉ429594ž"ÞC(0,14)ÐÉ373230:C(0,15)ÐÉ349401f#áC(0,16)ÐÉ280275:C(0,17)ÐÉ172935:C(0,18)ÐÉ39186:C(0,19)Ð104445:C(0,20)Ð236709:C(0,21)Ð331635:C:C(6,72)ÐÉ9:C(6,73)ÐÉ6:C(6,74)ÐÉ1:C(6,75)Ð6:C(6,76)Ð15:C(6,77)ÐÉ20:C(6,78)ÐÉ17:C(6,79)ÐÉ8:C(6,80)Ð7:C(6,81)Ð28:C(6,82)ÐÉ4:C(6,83)ÐÉ3:C(6,84)Ð0:C(6,85)Ð5:C(6,86)ÐÉ2:C(6,87)ÐÉ1:C(6,88)Ð2z"ÝC(0,1)ÐÉ441870:C(0,2)ÐÉ418011:C(0,3)ÐÉ348429:C(0,4)ÐÉ239109:C(0,5)ÐÉ20:C(6,50)ÐÉ15:C(6,51)ÐÉ8:C(6,52)Ð1:C(6,53)Ð12:C(6,54)Ð25:C(6,55)Ð40:C(6,56)ÐÉ56:C(6,57)ÐÉ53:C(6,58)ÐÉ48:C(6,59)ÐÉ29:C(6,60)ÐÉ8:C(6,61)Ð19:C(6,62)Ð52:C(6,63)Ð91:C(6,64)ÐÉ14:C(6,65)ÐÉ13:C(6,66)ÐÉ10:C(6,67)ÐÉ5:C(6,68)Ð2¸!ÙC(6,69)Ð11:C(6,70)Ð22:C(6,71)ÐÉ10,28)ÐÉ98óÑC(6,29)ÐÉ83:C(6,30)ÐÉ62:C(6,31)ÐÉ35:C(6,32)ÐÉ2:C(6,33)Ð37:C(6,34)Ð82:C(6,35)Ð133:C(6,36)Ð190:C(6,37)ÐÉ30:C(6,38)ÐÉ29:C(6,39)ÐÉ26:C(6,40)ÐÉ21:C(6,41)ÐÉ14:C(6,42)ÐÉ5:C(6,43)Ð6:C(6,44)Ð19:C(6,45)Ð34:C(6,46)Ð51:C(6,47)ÐÉ24:C(6,48)ÐÉ23Ú ÕC(6,49)Ð @?P*U*U*U*U*U*U*U ~( |T*ÐªÕªÕªÕªÕŠ(U p PxP*U*U¨Õª•*U*U @@ (U*ÕªÕª ÕªÕªU*A<@*@|UP~(U ÕªÕªÕ‚ÀªÕªÕªT*p?@@l@|||p@@*p(U*U*U*U*U`?@*UªÕªÕªÔªÕªÕ*U~*T*U*U*U*U*x?@*U ÕªÕªÕªÕªÕªÕªÕªÕªÕªP*U~( x(UªÕªÕ€ÀªÕª•P*pP@*`(U*`U*ÐªÕªÕªÕ‚ÀªÕªÕªÕ‚(U*@(|?*U*¨ÕªÕªÕªÕªÕª•(U*U~ (`? U ÕªÕŠÔªÕª…T*~P|U*ªÕªÕªÕªÕªÕªÕªÕª•*U*|@ p(U ¨ÕªÕ‚ÀªÕª•P*xT @*U*U*U*U*U*U*U(|T*ÐªÕªÕ€ªÕªÕŠ(U p Pp@*U*UP*U*UpP(U*ÕªÕª ÕªÕªU*@:@>B<8~~BB@*~p? U@|(U*€ÕªÕªÕ‚ÐªÕªÕªT*pP@|@8@@*`U*U*U*U*` `@*UªÕªÕªÕªÕªÕ@*U*@*U*U*U*Up*U €ÕªÕªÕªÕªÕªÕªÕªÕªÕªT*U( x(UªÕªÕ€"ÀªÕª•P*xP*U`*(@T*ÀªÕªÕªÕŠÔªÕªÕªÕ‚(U*@ x*U* ÕªÕªÕªÕªÕª…*U* (`? U ÕªÕŠÔªÕª…T*~@x?U*U¨ÕªÕªÕªÕªÕªÕªÕª…*U*~P p(U ¨ÕªÕ‚ÐªÕª•P*x~*U*U*U*U*U*U*U`?*|P*ÐªÕªÕ€ÀªÕªÕŠ(U x(@ `@*U*U*T*U*UxP U*ÕªÕª… ÕªÕªU*@F\D"BDBB$*p|(@|(U*€ÕªÕªÕŠÔªÕªÕªU*xP@<@@@(P*U*U*U | T@@*UªÕªÕª€ÕªÕª•@*U p@|p@@ U*U*U*`*U*ÕªÕªÕªÕªÕªÕªÕªÕªÕªT*U@( x(UªÕªÕ€ "ÀªÕª•P*xP UP*(T*ÀªÕªÕªÕª€ÕªÕªÕªÕ€*U*` p(U*U€ÕªÕªÕªÕªÕª@*U*@ (`? U* ÕªÕªÔªÕªT*~@ pT*U ÕªÕªÕªÕªÕªÕªÕª…@*U*P p(U ¨ÕªÕ‚ÐªÕª…P*|Ux(U*U*U*U*U*U*x@*xP*ÐªÕªÕ‚ÀªÕªÕ‚(U x(@ @*U*U* U*U*|T U*ÕªÕª… ÕªÕª U*`BbDBBbD(*@ x U*ÕªÕªÕªÔªÕªÕªU*|P@@@8@ |*U*U*@(T@*U¨ÕªÕª… ÕªÕª•@*U@ p@|x@@P*U*U`*U*ÔªÕªÕªÕªÕªÕªÕªÕªÕŠU*@* x(UªÕªÕ‚"ÀªÕª•P*xPU*U*(T*UªÕªÕªÕª•¨ÕªÕªÕªÕ*U ` ` U*UÔªÕªÕªÕªÕŠ@*U*`((`? U* ÕªÕªÔªÕªT*~@ `T*U€ÕªÕªÕªÕªÕªÕªÕªP*U @T p(U ¨ÕªÕ‚ÐªÕª…P*|Tp? U*U*U*U*U*U*~@*xP*ÐªÕªÕ‚ÐªÕªÕ‚(U |(*~(U*U*U*U*U*?T ~T*ÔªÕª…¨ÕªÕª U*`? FB<>B~RD Ux@*@ x U*ÔªÕªÕª€ÕªÕªÕªU*|Pp|||x|p| UpT*U*p*P@*U¨ÕªÕª…¨ÕªÕª•P*U@ @@@@@(U*ÐªÕªÕªÕªÕªÕªÕªÕªÕŠU*`* x(U¨ÕªÕ‚>ÀªÕª•P*xPT*(U (~P*UªÕªÕªÕªÕ‚ÐªÕªÕªÕª•*U p?@ U*U ÀªÕªÕªÕªÕ‚P*U*p((@ U* ÕªÕªÕªÕªT* `P*U ÔªÕªÕªÕªÕªÕªÕªT*U `T p U ¨ÕªÕŠÐªÕª…P*|P@U*U*U*U*U*U*@P pP*ÀªÕªÕŠÐªÕªÕ‚*U|(*| U*U*U T*U*U*@ ~T*ÔªÕª• ¨ÕªÕª U*`? :BDBBBJDU@P* p? U*ÔªÕªÕª… ÕªÕªÕŠ U*~Tp|||p|`|U@?~@*P*U¨ÕªÕª•¨ÕªÕª…P*@@ @@@@T(U*ÐªÕªÕªÕªÕªÕªÕªÕªÕ‚ U*p x(U¨ÕªÕ‚ "ÀªÕª•P*xT@*U@*U |P*U¨ÕªÕªÕªÕªÕªÕªÕªÕªÕª•@*U x U*U*ªÕªÕªÕª•U*U*|*(@ U* ÕªÕª ÕªÕªU**@P*U*ÔªÕªÕªÕªÕªÕªÕŠT*UpT*p U ¨ÕªÕŠÐªÕª…P*|P P*U*U*U*U*U pTpP*ÀªÕªÕŠÔªÕªÕ€*U|((xU*U*U**U*U*U*` ~T*ÔªÕª•¨ÕªÕŠ U*`? DBBD$F$T*xT p?U*ÔªÕªÕª•¨ÕªÕªÕŠ U*~TT~p?P*P*U ¨ÕªÕª•ªÕªÕª…P*`@ @@L@|@T~ U*ÀªÕªÕªÕªÕªÕªÕªÕªÕ‚(U*x?@ x(U¨ÕªÕ‚"ÀªÕª•P*xT*U*U* |P*U¨ÕªÕªÕªÕªÕªÕªÕªÕªÕª…@*U| T~?U*U* ÕªÕªÕª U*U*~?*(@U*€ÕªÕª€ÕªÕªU**@*U*ÐªÕªÕªÕªÕªÕªÕ‚U*Ux*p U ¨ÕªÕŠÐªÕª…T*|@*|@*U*U*U*U*U|Tp?@*UÀªÕªÕªÔªÕªÕ€*U~*(pT*U*U*U*U*U*U*U*x |T*ÔªÕª•ªÕªÕŠ U p >>B8~BP*U*`U*ÐªÕªÕªÕªÕªÕªÕŠ U*P xT P~(U ÕªÕªÕ€ªÕªÕª…P*`?@@L@||@@|@P~ U*ªÕªÕªÕªÕªÕªÕªÕªÕ(U*|?@ x(U¨ÕªÕ‚"ÀªÕª•P*xT U*U@*U* x@*U ÕªÕªÕªÕªÕªÕªÕªÕªÕª…P*U| T|T*U*ÐªÕªÕŠ(U*U @ (AU*€ÕªÕª€ÕªÕªU*(~@*U*ªÕªÕªÕªÕªÕªÕ U*U|?*`? U ÕªÕŠÔªÕª…T*| (B4Ê(X(I)ÉA4)))hHÐ5ÄX(I)ÐB4Ê(X(I)ÉA4)DrHÐ6ÄX(I)ÐB4Ê(X(I)ÌA4)_|HÐ7ÄX(I)ÐB4Ë(X(I)ÉA4)†HÐ8ÄX(I)Ð(X(I)ÉA4)Ë(X(I)ÉB4)ªHÐ9ÄX(I)ÐÝ(É(X(I)ÉA4)Ê(X(I)ÉA4)ËB4)Óš‚I:º:º"WHAT IS THE POWER INCREMENT."ì¸º"(I.E., F(X)^M): ";Â„M4:M4Ð1Ä«3170¾ º"WHAT IS YOUR CHOICE: ";:„H:º0Ü HÐ0Ä«2840Xæ º"WHAT IS THE VALUE FOR A: ";:„A4:º~º"WHAT IS THE VALUE FOR B: ";:„B4–º:IÐ1ÁN:HÐ0Ä°4800´@HÐ1ÄX(I)ÐÝ(B4Ê(X(I)ÉA4))ÒJHÐ2ÄX(I)ÐÜ(B4Ê(X(I)ÉA4))ðTHÐ3ÄX(I)Ðß(B4Ê(X(I)ÉA4))^HÐ4ÄX(I)ÐÞP º" (0) DEFAULT"1Z º" (1) EXP(B(X-A))"Ld º" (2) LOG(B(X-A))"gn º" (3) SIN(B(X-A))"‚x º" (4) COS(B(X-A))"¨‚ º" (5) B(X-A)":º" (6) BX^A"¿– º" (7) B/(X-A)"Ú º" (8) (X-A)/(X-B)"þª º" (9) EXP(-(X-A)(X-A)/B)":º!X(I):D(I)ÐY(I):‚I:º:º#º °7390:º:—LØ —:º:º"YOU MAY CHOOSE ONE OF SEVERAL"rö º"FITTING FUNCTIONS. THE DEFAULT"— º"IS EITHER THE VARIABLE ITSELF"¼ º"OR THE USER FUNCTION INSERTED"Ü º"STARTING AT LINE 4800.":ºÿ< º"THE MENU OF FUNCTIONS IS:":º2151ÅX1ÐX(1):X2ÐX(N):ºCüº"DO YOU WISH TO PLOT DATA (Y/N): ";Y „A$:A$Ð"N"Ä«2520l A$ÑÏ"Y"Ä«2310‘$ º"INPUT PLOT WIDTH: ";:„L:º:L4Ð0µL º"DISPLAY PLOT VALUES (Y/N): ";ÊV „A$:A$Ð"Y"ÄL4Ð1Üj A$Ð"Y"Ä«2430ït A$ÑÏ"N"Ä«2390~ IÐ1ÁN:C(I)Ð;A$!ºç(4);"WRITE";A$"ºN*#IÐ1ÁN5$ºX1(I)<%‚IG&IÐ1ÁNR'ºY1(I)Y(‚In)ºç(4);"CLOSE";A$vfIÐ1ƒgJÐ1ÁNÉ1šhX(J)ÑX(JÈ1)Ä«2240Ä„AÐX(J):BÐY(J):X(J)ÐX(JÈ1):Y(J)ÐY(JÈ1)Ú¬X(JÈ1)ÐA:Y(JÈ1)ÐBáÀ‚JðÁIÐNÄ«2245úÂIÐIÈ1Ã«6*KKÐ1ÁLË5:º"I----";:‚K:º"I";:E4Ð(KÉ1)Ê5È1:E4ÐLÈ1ÄºG*QE4ÐLÈ1Ä«343a*RE4ÐE4È1:E4ÏÐLÈ1Ä«342p*Tº"-";:«338y*Vº":"*W±™*Xº"CONTINUE";:„R4$:º:±B**** DATA PLOT (SCALED) *****":º:º])2º"MAXIMUM VALUE= ";C:º:º:°331:KÐ1ÁN4:0.6ÊLËN4Ñ1Ä«315†)8PÐ1Á(Ó(0.6ÊLËN4)):º":";ÀLÈ1);":":‚P );E2ÐAÊD(K):E2ÏÐ1Ä«319¯)=º"*";:«322Ô)?º":";:ºÀE2È1);"*";:Ó(E2)ÐLÄ«323ä)BºÀLÈ1);":";ÿ)Cº:‚K:°331:º:°344:º:º:±Ð1ÁA:DÐDÈW(K)Ê(UÊD(MÈK)ÈD(MÉK)):‚K:DÐDËV:±I(KÐ1ÁN4:Y1(K)ÐY1(KÈA):‚K:±š(DÐ0:KÐ1ÁN4:DÐDÈ(Y(K)ÉY1(K))Ê(Y(K)ÉY1(K)):‚K:DÐÚ(DË(N4ÉIÉ.999999)):N2Ï0ÄDÐ0 ($±Ô(%º:º"INPUT DESIRED PLOT WIDTH: ";:„L:CÐ0:KÐ1ÁN4ç(*CÑD(K)ÄCÐD(K)ø(+‚K:AÐLËC:º:º")/º"*B(I,J)Ð3Ä°263'øB(I,J)Ð5Ä±/'ùB(I,J)Ð3Ä±<'úLÐ12:KÐ1k'üK1ÐOÁL:W(K1)ÐC(B(I,J),K):KÐKÈ1:‚K1:AÐLÄ±z'LÐLÉ1:«252’'KÐ0Á12:W(K)Ð1:‚K:±«'KÐ0Á12:W(K)ÐÉK:‚K:±ç'KÐ0ÁA:D(K)Ð0:D(KÈN4ÈAÈ1)Ð0:‚K:KÐ1ÁN4:D(KÈA)ÐY(K):‚K:±*(DÐ0:DÐDÈW(0)ÊD(M):K(0,72)ÐÉ15912:C(0,73)Ð117Í&ñC(0,74)Ð17082:C(0,75)Ð20358:C(0,76)ÐÉ10530:C(0,77)ÐÉ12210:C(0,78)ÐÉ6963:C(0,79)Ð4983:C(0,80)Ð12243:C(0,81)ÐÉ4158:C(0,82)ÐÉ630:C(0,83)ÐÉ171:C(0,84)Ð603:C(0,85)ÐÉ117:C(0,86)ÐÉ90é&òC(0,87)Ð48:C(0,88)ÐÉ3:±ü&öB(I,J)Ð5Ä°259'÷1524:C(0,56)ÐÉ137340:C(0,57)ÐÉ1165777%êC(0,58)ÐÉ59253ë%íC(0,59)Ð19737:C(0,60)Ð95568:C(0,61)Ð133485:C(0,62)Ð88803:C(0,63)ÐÉ93093:C(0,64)ÐÉ124740:C(0,65)ÐÉ99528:C(0,66)ÐÉ32043:C(0,67)Ð53262:C(0,68)Ð115632:C(0,69)Ð98010:C(0,70)ÐÉ72963&îC(0,71)ÐÉ22230:CC(0,39)ÐÉ74601:C(0,40)ÐÉ27846:C(0,41)Ð26376:C(0,42)Ð76830:C(0,43)Ð109071i$æC(0,45)Ð45084:C(0,44)Ð105444$%éC(0,46)ÐÉ96084:C(0,47)ÐÉ160740:C(0,48)ÐÉ141873:C(0,49)ÐÉ88749:C(0,50)ÐÉ11799:C(0,51)Ð71592:C(0,52)Ð137085:C(0,53)Ð153387:C(0,54)Ð82251:C(0,55)ÐÉ12&ÃJÐ1Á3000:‚J5&Èº:‚I:º:º:º"THE SAMPLE INDEX OF"X&úº"CORRELATION IS ";:YÐ0:IÐ1ÁN{&YÐYÈY1(I):‚I:YÐYËN:Y1Ð0:IÐ1ÁNœ&JY1ÐY1È(YÉY1(I))Ê(YÉY1(I)):‚I³&^YÐY1Ë(NÉ1):AÐDÊDËYÉ&_AÐAÊ(NÉLÉ1)Ë(NÉ1)ã&rAÏ1Äº"NOT AVAILABLE"ò&|AÏ1Ä«5540'†AÑ1EÉ05Ä‚J:‚I%N4ÐN:NÐLÈ1:°5620:NÐN4F%Zº:º:º"THE CALCULATED COEFFICIENTS"g%xº"AND THE STANDARD ERROR OF"Œ%‚º"THE ESTIMATES ARE:":º:IÐ1ÁLÈ1¨% º"A(";IÉ1;") = ";F(IÉ1)Å%ªº"WITH STANDARD ERROR ";ä%´B(I,I)Ñ0Äº"NOT AVAILABLE"&¾B(I,I)ÏÐ0ÄºDÊÚ(B(I,I))E PROGRAM WILL"4$.º"NOW ATTEMPT TO ALLOCATE ARRAY"[$8º"SPACE.":†A(NÈ2,NÈ2),B(NÈ2,2ÊNÈ4)f$LN6Ð1:º~$`º"CALCULATING....." $tIÐ0ÁL:JÐ0ÁL:A(I,J)Ð0:KÐ1ÁNÇ$œA(I,J)ÐA(I,J)È(X(K)ÌI)Ê(X(K)ÌJ):‚Ké$°‚J:‚I:IÐLÈ1Á1ÇÉ1:JÐLÈ1Á1ÇÉ1%âA(I,J)ÐA(IÉ1,JÉ1):#¢² X(I)=6*X(I)-22#¬² C(I)=6*C(I)-2p#¶² NOTE THAT THIS FORM IS AVAILABLE IN THE FUNCTIONS LIST.~#ÀX(I)ÐX(I)Œ#ÊC(I)ÐC(I)’#Ô±#Þ² ********************Ã#ò—:º:º:N6Ð1Ä«4960ê#º"YOU PREVIOUSLY CHOSE NOT TO USE"$$º"THIS OPTION. THà‚I:«1650%"p² ********************D"z² USER FUNCTION SUBROUTINE…"„² THE FUNCTIONAL FOR DESIRED IS ENTERED USING X(I) AND C(I).Á"Ž² FOR EXAMPLE, IF THE FUNCTION TO BE USED AS A VARIABLE#˜² IS F(X)=6X-2, THEN THE FORMS TO BE USED ARE SHOWN BELOW. ";!„A$:A$Ð"Y"Ä«4160'!"A$Ð"N"Ä€1!,«4110U!@—:º:º:º"CURRENT DATA FILE:":º:ºy!|IÐ1ÁN:X(I)ÐX1(I):Y(I)ÐY1(I):‚Iœ!¤º" I";À9);" X(I)";À24);" Y(I)"Ä!®º"---";À9);"------";À24);"------":ºå!ÂIÐ1ÁN:ºI;À9);X(I);À24);Y(I)ý!ÖÓ(IË14)ÐIË14Ä°8230 "THE", ªº"REGRESSION COEFFICIENTS (Y/N): ";B ´„A$:A$Ð"Y"Ä°4850T ÈA$Ð"Y"Ä«4060g ÒA$ÑÏ"N"Ä«4020x ÓJÐ1Á4000:‚J› Üº:º"DO YOU WISH TO REPEAT THE"À ðº"PROCEDURE USING THE SAME DATA"ä úº"BUT DIFFERENT PARAMETERS FOR"!º"THE REGRESSION (Y/N):ÉB4)-âHÐ9ÄC(I)ÐÝ(É(C(I)ÉA4)Ê(C(I)ÉA4)ËB4)=ìM4Ð1Ä«3840NöC(I)ÐC(I)ÌM4cD(I)ÐF(0):JÐ1ÁL€D(I)ÐD(I)ÈF(J)ÊC(I)ÌJ:‚J§2C(I)ÐX1È(IÉ1)ÊX3:Y(I)ÐD(I):‚I:L2ÐL½ZLÐL1:°7390:LÐL2:ºã‚º:º:º"DO YOU WISH CALCULATION OF" º"THE STANDARD ERROR OF I)ÐX1È(IÉ1)ÊX3:HÐ0Ä°48007’HÐ1ÄC(I)ÐÝ(B4Ê(C(I)ÉA4))UœHÐ2ÄC(I)ÐÜ(B4Ê(C(I)ÉA4))s¦HÐ3ÄC(I)Ðß(B4Ê(C(I)ÉA4))‘°HÐ4ÄC(I)ÐÞ(B4Ê(C(I)ÉA4))¬ºHÐ5ÄC(I)ÐB4Ê(C(I)ÉA4)ÇÄHÐ6ÄC(I)ÐB4Ê(C(I)ÌA4)âÎHÐ7ÄC(I)ÐB4Ë(C(I)ÉA4)ØHÐ8ÄC(I)Ð(C(I)ÉA4)Ë(C(I) (Y/N): "; Ê „A$:A$Ð"N"Ä«39703Þ A$ÑÏ"Y"Ä«3530Zè º:º"WHAT IS THE PLOT WIDTH: ";:„L1eL4Ð0:º‰º"DISPLAY PLOT VALUES (Y/N): ";ž$„A$:A$Ð"Y"ÄL4Ð1°8A$Ð"Y"Ä«3660ÃBA$ÑÏ"N"Ä«3620ÝLº:º"CALCULATING....."ùjX3Ð(X2ÉX1)Ë(NÉ1):IÐ1ÁN~C( º"THE CALCULATED REGRESSION"?* º"COEFFICIENTS ARE:":º:IÐ0ÁL[H º"A(";I;") = ";À8);C(I)lR JÐ1Á1000:‚J‹\ E(I)ÐC(I):F(I)ÐC(I):‚I:º:º¬Ž º"THE STANDARD ERROR OF THE"Ì˜ º"REGRESSION FIT IS ";D:º:ºé¶ º"DO YOU WISH A PLOT OF" À º"THE FITTED CURVE„M:MÑÐNÉ1Ä«3270ŠMÑ1Ä«3190%º:”º"** ERROR **":ºd¨º"YOU ARE ATTEMPTING TOO HIGH A FIT."…²º"THE MAXIMUM IS ";NÉ1:«3170Æº:º"WHAT IS THE VARIANCE REDUCTION"ÓÚº"FACTOR FOR TERMINATION: ";:„E:—ü º"REGRESSION UNDER WAY.....":º:°6270 àC4Ð0:IÐ1ÁN:X(I)Ñ0ÄCÐ1/þ‚I:C4Ð0Ä«3140]M4ÑÏÓ(M4)Äº"NO COMPLEX NUMBERS ALLOWED."~M4ÑÐ0Äº"ILLEGAL OPERATION."„&º0º"CHOOSE ANOTHER POWER INCREMENT: ";·:«3010ÒDIÐ1ÁN:X(I)ÐX(I)ÌM4:‚Iûbº:º"WHAT IS THE ORDER OF THE FIT: ";v«2130AÐX(J) BÐY(J)+*X(J)ÐX(JÈ1);4Y(J)ÐY(JÈ1)H>X(JÈ1)ÐAUHY(JÈ1)ÐB\R‚Jc\‚IifºupX1ÐX(1)zX2ÐX(N)‡„º°Žº"DO YOU WISH TO PLOT DATA (Y/N): ";¸˜„A$Ê¢A$Ð"N"Ä«2390Ý¬A$ÑÏ"Y"Ä«2200ã±—þ¶º"INPUT PLOT WIDTH: ";Xº"WHAT IS THE FILE NAME: ";&b„A$9lã(A$)Ð0Ä«1880?vºEŠºe”º"IS THE DISKETTE READY: ";mž„B$¨ºD$;"OPEN";A$’©ºD$;"WRITE";A$™ºN®²IÐ1ÁN:ºX1(I):‚IÃÆIÐ1ÁN:ºY1(I):‚IÖÐºD$;"CLOSE";A$áøIÐ1ÁNîJÐ1ÁNÉ1X(J)ÑX(JÈ1)Ä1!E4ÐE4È1:E4ÏÐLÈ1Ä«8490*1!º"-";:«845031*!º":"91>!± J1Ð1Á1000:‚J1:‚I:°8280/0& º"CONTINUE";:„A$:±A0X E3ÐEÉ5ÊÓ(EË5)K0Y º" ";Y0l BÏ0ÄE3Ð0j0€ Ô(B)ÏCÄE3Ð0z0Š E3Ñ1Ä«83700” JÐ1ÁE3:º"-";:‚J§0² Ó((LÉ3)Ë5)Ñ1Ä«8410É0¼ JÐ1ÁÓ((LÉE3)Ë5):º"I----";:‚Jí0Ú º"I";:E4Ð(JÉ1)Ê5È1ÈE3:E4ÐLÈ1Äºÿ0ø E4ÐLÈ1Ä«85108190/†D(I)ÐD(IÈ1)Ä«8190,/E2ÏÐ1Ä«8120N/¤º" *";À2ÈAÊD(IÈ1));"*";:«8150„/¸º" :";:E2ÑAÊD(IÈ1)ÄºÀE2È2);"*";À2ÈAÊD(IÈ1));"*";´/¹E2ÏÐAÊD(IÈ1)ÄºÀ2ÈAÊD(IÈ1));"*";ÀE2È2);"*";Í/ÖÓ(AÊD(IÈ1))ÐLÄ«8170Ý/àºÀLÈ2);":";é/êº:IÐIÈ1ü/ôJ1Ð1Á1000:‚J10þB)ÏCÄ«7830.‚ºÀEÈ2);"0"*.–°8280:IÐ1ÁN>.¾E(IÉ1)ÑUÄ«7920a.ÈKÐUÁE(IÉ1):º" :";ÀLÈ2);":":‚Ko.ðE2ÐAÊD(I).E(I)Ð0Ä«8070’.E2ÏÐ1Ä«7990£."º" *";:«8020É.6º" :";:ºÀE2È1);"*";:Ó(E2)ÐLÄ8030ø.TºÀLÈ2);":";:L4Ð1ÄºÀLÈ4);C(I);ÀLÈ14);Y(I);/^º:«IÐ1ÁN:BÏD(I)ÄBÐD(I)-è—+-‚I:BÏ0ÄBÐ0E-.IÐ1ÁN:D(I)ÐD(I)ÉB:‚Ic-VCÐ0:IÐ1ÁN:CÑD(I)ÄCÐD(I)s-t‚I:CÑ0ÄCÐ0Œ-œE(0)Ð0:E(N)Ð1:IÐ2ÁN¼-ºE(IÉ1)ÐÓ(.5Ê(C(I)ÉC(IÉ1))ÊLË(C(N)ÉC(1))È.5)É-Î‚I:AÐLËCé-öAÐAÊ.8:EÐAÊÔ(B):º:º:º:º:º:ºø-ZBÏ0Ä«7830 .nÔ()ÐF(I),v‚I:VÐ0:IÐ1ÁN;,”VÐVÈ(V(I)ÉY(I))Ê(V(I)ÉY(I)):‚I],²VÐÚ(VË(NÉLÉ1)):LÐM:EÐ0Ä«7170q,îEÊVÏEÊV1Ä«7300z,øV1ÐVŠ,MÐN1Ä«7200”,«6600µ, IÐ1ÁL:C(IÉ1)ÐC(I):‚I:C(L)Ð0Å,RLÐLÉ1:DÐV:±î,„LÐL2:VÐV2:IÐ1ÁL:C(I)ÐC2(I):‚I:«7200-ÞBÐ1000000000:N"+A1ÐA1ÈX(I)ÊE(I)ÊE(I):‚I:C1Ð0J+®IÐ1ÁN:C1ÐC1ÈE(I)ÊY(I):‚I:MÐMÈ1:IÐ0b+àLÐMÉI:B2ÐB1(L):D1Ð0v+þLÏ1ÄD1ÐB1(LÉ1)ž+D1ÐD1ÉA2ÊB1(L)ÉF2ÊA1(L):B1(L)ÐD1ËF1½+A1(L)ÐB2:IÐIÈ1:IÑÏMÄ«6880Ý+:IÐ1ÁN:V(I)ÐV(I)ÈE(I)ÊC1:‚I,XIÐ1ÁN1:F(I)ÐF(I)ÈB1(I)ÊC1:C(II)ÊE(I):‚I:B1(1)Ð1ËF1.*ŒF(1)ÐB1(1)ÊC1:IÐ1ÁNK* V(I)ÐV(I)ÈE(I)ÊC1:‚I:MÐ1t*ÈIÐ1ÁL:C2(I)ÐC(I):‚I:L2ÐL:V2ÐV:F2ÐF1’*A2ÐA1:F1Ð0:IÐ1ÁN:B1ÐE(I)º*,E(I)Ð(X(I)ÉA2)ÊE(I)ÉF2ÊD(I):D(I)ÐB1á*@F1ÐF1ÈE(I)ÊE(I):‚I:F1ÐÚ(F1):IÐ1ÁN+hE(I)ÐE(I)ËF1:‚I:A1Ð0:IÐ1ÁK,J):‚J:‚I:‚K7)ŽIÐ1ÁN:JÐ1ÁN:B(I,J)ÐB(I,JÈN):‚J:‚I:±[)~N1ÐMÈ1:V1Ð100000000:LÐ0:IÐ1ÁN1€)¦A1(I)Ð0:B1(I)Ð0:F(I)Ð0:‚I:IÐ1ÁN¢)ØV(I)Ð0:D(I)Ð0:‚I:D1ÐÚ(N):WÐD1Ä) IÐ1ÁN:E(I)Ð1ËW:‚I:F1ÐD1:A1Ð0ì)<IÐ1ÁN:A1ÐA1ÈX(I)ÊE(I)ÊE(I):‚I:C1Ð0*dIÐ1ÁN:C1ÐC1ÈY(MÐI(”‚I:MÐKÄ«58609(¨JÐKÁ2ÊN:BÐB(K,J):B(K,J)ÐB(M,J)I(ÆB(M,J)ÐB:‚Jp(äJÐKÈ1Á2ÊN:B(K,J)ÐB(K,J)ËB(K,K):‚J(KÐ1Ä«5960—(IÐ1ÁKÉ1:JÐKÈ1Á2ÊN½( B(I,J)ÐB(I,J)ÉB(I,K)ÊB(K,J):‚J:‚IÌ(>KÐNÄ«6030ä(HIÐKÈ1ÁN:JÐKÈ1Á2ÊN )\B(I,J)ÐB(I,J)ÉB(I,K)ÊB(ºÓ(10000Ê(1ÉAË2))Ë10000<'AÏÐ1EÉ05ÄºÓ(10000ÊÚ(1ÉA))Ë10000w'šº" WITH STANDARD ERROR ";Ó(10000ÊAËÚ(NÉLÉ1))Ë10000'¤º:±œ'ôIÐ1ÁN:JÐ1ÁN:B(I,JÈN)Ð0¿'B(I,J)ÐA(I,J):‚J:B(I,IÈN)Ð1:‚IÕ'XKÐ1ÁN:KÐNÄ«5860æ'lMÐK:IÐKÈ1ÁN(ŠÔ(B(I,K))ÏÔ(B(M,K))Ä"COEFFICIENTS. THE FITTED CURVE"I4 º"MAY THEN BE PLOTTED. SUBSEQUENTLY"m> º"THE ANALYSIS MAY BE REPEATED"‘H º"USING THE ORIGINAL DATA SET."ŸR IÐ1Á3000¦\ ‚I¬f ±¾Ž BÐ10000Ê10000É¢ IÐ1ÁNÜ¬ BÏD(I)ÄBÐD(I)ã¶ ‚IðÊ BÏ0ÄBÐ0ûÞ IÐ1ÁNè HESE DATA"/äº"MAY THEN BE PLOTTED. THE USER"Oîº"IS THEN PROMPTED FOR THE"oøº"INITIAL PARAMETER VALUES"” º"(ESTIMATES) AND THE STARTING "· º"INCREMENT. THE PROGRAM THEN"Û º"PERFORMS THE CALCULATION AND"ú º"DISPLAYS THE REGRESSION" * º SQUARES COEFFICIENTS FOR"B€º"NONLINEAR FUNCTIONS. THE PROGRAM"kŠº"ITSELF IS SELF-PROMPTING AND EASY"z”º"TO USE."€žºŽ¨IÐ1Á6000•²‚I¼¼º"THE PROGRAM FLOW IS AS FOLLOWS."ÂÆºèÐº"FIRST THE USER ENTERS THE DATA" Úº"AND EDITS THEM. T4)ÐIË14Ä°4320þ‚I«1540$—*º0&ºR0º"REGRESSION II INSTRUCTIONS"t:º"--------------------------"zDº€Nº¥Xº"REGRESSION II IS AN EFFECTIVE"Çbº"ONE DIMENSIONAL REGRESSION"ðlº"PROGRAM WHICH CAN BE USED TO FIND"vº"THE LEAST"Ä«2910@A$Ð"N"Ä€J«2860%^—+hºErº"CURRENT DATA FILE:"K|ºQ†º\šIÐ1ÁNk¤X(I)ÐX1(I)z®Y(I)ÐY1(I)¸‚I¤Âº" I";À9);" X(I)";À24);" Y(I)"ÊÌº"---";À9);"------";À24);"------"ÐÖºÛàIÐ1ÁNõêºI;À9);X(I);À24);Y(I) ôÓ(IË1°5320ª D(I)ÐY´ Y(I)ÐD(I)%¾ ‚I.È L2ÐL7Ò LÐL1AÜ °3470Jæ LÐL2Pð ºVú ºwº"DO YOU WISH TO REPEAT THE"œº"PROCEDURE USING THE SAME DATA"Ãº"BUT DIFFERENT INITIAL PARAMETER"í"º"VALUES FOR THE REGRESSION (Y/N): ";õ,„A$6A$Ð"Yö º$ º"WHAT IS THE PLOT WIDTH: ";, „L15 L4Ð0; º_( º"DISPLAY PLOT VALUES (Y/N): ";g2 „A$x< A$Ð"Y"ÄL4Ð1ŠF A$Ð"Y"Ä«2650P A$ÑÏ"N"Ä«2610£Z º»d º"CALCULATING....."Ðx X3Ð(X2ÉX1)Ë(NÉ1)Û‚ IÐ1ÁNðŒ C(I)ÐX1È(IÉ1)ÊX3û– XÐC(I) NING THE PARAMETERS TO BE"A~ º"FITTED HAS BEEN INSERTED IN THE"gˆ º"PROGRAM STARTING AT LINE 5280."m’ ºsœ º¦ IÐ1Á6000ˆ° ‚I’º °4640¯Ä º"DO YOU WISH A PLOT OF"ÐÎ º"THE FITTED CURVE (Y/N): ";ØØ „A$êâ A$Ð"N"Ä«2810ýì A$ÑÏ"Y"Ä«2520À„LÊºÔL4Ð08Þº"DISPLAY PLOT VALUES (Y/N): ";@è„A$QòA$Ð"Y"ÄL4Ð1cüA$Ð"Y"Ä«2320v A$ÑÏ"N"Ä«2280 IÐ1ÁN C(I)ÐX(I)$ D(I)ÐY(I)¤. ‚Iª8 º°B ººL °3470ÀV ºÆ[ —Ì` ºój º"IT IS ASSUMED THAT THE FUNCTION"t º"CONTAI±·°µ¬²¬°²³¬³¶°µ¬¹¬°³²¬´°°µ¬¸¬°´¶¬´±°µ¬¸¬°¬°µ±¬´³µ°¬°¬°µ²¬´³µ°¬°¬°µ³¬´³µ°¬°¬°µ´¬´³µ°¬°¬°¸¬±³°µ¬±¬°²¶¬±³°µ¬±¬°±±¬±³µµ¬±¬°²¸¬±³°µ¬±¬°±·¬²³°µ¬±¬°±¶¬²³°µ¬±¬°±¸¬²³°µ¬±¬°²²¬²³°µ¬²¬±³³¬²¶µµ¬·¬±²±¬²¹°µ¬µ¬°³°¬³²°µ¬¶¬°³±¬³³°µ¬²¬°´µ¬³´µµ¬·¬°´´¬³´µµ¬·¬°²¹¬³²°µ¬¶¬°³´¬³°°µ¬²¬°¹¬±¹°µ¬¸¬°±°¬±¬±±°°¬¸¬³±³¬±·µµ¬±°¬±²·¬³µ°µ¬·¬°´²¬³²°µ¬¶¬±±µ¬²´°µ¬³¬±±¹¬²²°µ¬¸¬²²µ¬²²µµ¬¸¬²³¬±´°µ¬³¬±´¬±´·µ¬³¬±µ¬±µ°µ¬³¬±¶¬±µ·³¬³¬±´°¬³´°µ¬´¬±³¸¬³´°µ¬´¬±³µ¬³´°µ¬´¬±³¹¬³´°µ¬´¬±·¬±²°µ¬¸¬°²°¬²¸°µ¬²¬°±´¬²°°µ¬±¬°´³¬´²°µ¬µ¬°³·¬´³°°¬°¬°²´¬²·°°¬°¬°³¶¬²·°°¬° 6aö'YÐ69Äº"COMPUTED NUMBER IS TOO BIG OR TOO SMALL";\a÷'YÐ4ÎYÐ13ÎYÐ12ÎYÐ14ÎYÐ15Äº"DISK";xaø'YÐ5Äº"FILE NOT FOUND";”aù'YÐ6Äº"FILE NOT FOUND";µaû'YÐ8Äº"DISK I/O--TRY AGAIN";Ìaü'YÐ9Äº"DISK FULL";éaý'YÐ10Äº"PROTECTED FILE";bþ'YÐ11Äº"BAD DISK CX:XÐS2(IIÈ1):S2(IIÈ1)ÐS2(II):S2(II)ÐX5`’'‚:LÐLÉ1:‚:±[`Ø'Œ773:XÐâ(218)Èâ(219)Ê256:YÐâ(222)y`â'YÐ133Äº"DIVIDE BY ZERO";œ`é'YÐ107ÍXÐ2792ÄºD$;"CLOSE":«804Þ`ì'(YÐ5ÎYÐ6)ÍXÐ2791ÄNVÐNVÉ1:º"NO STORED VAR",ER$:ºD$;"CLOSE":«5añ'YÐ254Äº"BAD INPUT RESPONSE";_V'XYÐXYÈC(C2,I)ÊC(C1,I)"_['‚:±7_t'LÐC(C1,0)É1:XYÐLG_x'LÑÐ0«10010O_z'XÐ0m_~'IIÐ1ÁLÈ1:S1(II)ÐC(C1,II)}_'S2(II)ÐII:‚¯_‚'LÏ10Äº"PLEASE WAIT--COMPUTATION IN PROGRESS"¼_ƒ'JJÐ1ÁXYÈ_ˆ'IIÐ1ÁL%`'S1(II)ÏS1(IIÈ1)ÄXÐS1(IIÈ1):S1(IIÈ1)ÐS1(II):S1(II)Ð10^'C(C1,0)ÑÏC(C2,0)Ä¡:«8185^'C(C1,0)Ð0Ä¡:«816P^'XÐ0:YÐ0:X2Ð0:Y2Ð0:XYÐ0`^'C3Ð2«10050q^$'IÐ1ÁC(C1,0)—^)'XÐXÈC(C1,I):X2ÐX2ÈC(C1,I)ÊC(C1,I)Ÿ^.'‚:±°^B'IÐ1ÁC(C1,0)Ì^G'XÐXÈC(C1,I):YÐYÈC(C2,I)æ^L'X2ÐX2ÈC(C1,I)ÊC(C1,I)_Q'Y2ÐY2ÈC(C2,I)ÊC(C2,I).3480242:T2ÐÉ.0958798:T3Ð.7478556:T4Ð.47047:C3Ð.5L]{#T5Ð1Ë(1ÈT4Ê(TSË1.414))y]}#TPÐ1É(T5Ê(T1ÈT5Ê(T2ÈT3ÊT5)))ÊÝ(ÉTSÊTSË2)ƒ]#«9055 ]Œ#T5Ð1:IÐ1ÁT4É1:T5ÐT5ÊI:‚¦]Ž#±Å]¾#T5Ð1:IÐ1ÁT4É2Ç2:T5ÐT5ÊI:‚ä]È#T5ÐT5ÊÚ(T2)Ë2Ì((T4É1)Ë2):±ò]'ENÐ1:«650^'C3Ð1«100\i#TSÏ25.45ÄIN$Ð"<.025"3\j#TSÏ63.66ÄIN$Ð"<.01"M\k#TSÑÐ12.71ÄIN$Ð"<.10"S\l#±s\n#DFÐ2ÍTSÏ14.089ÄIN$Ð"<.005"“\p#DFÐ2ÍTSÏ31.598ÄIN$Ð"<.001"³\r#DFÐ2ÍTSÑÐ14.089ÄIN$Ð"<.01"Ò\t#DFÐ3ÍTSÏ12.94ÄIN$Ð"<.001"ò\v#DFÐ3ÍTSÑÐ12.94ÄIN$Ð"<.005"ø\w#±1]x#T1Ð2:T1ÐÉT1:TPÐ0[P#IÐ1Á5d[U#TPÐTPÈS2(I)ÊT6Ê((1È((S1(I)È1)ÊT6)Ì2ËDF)ÌT1È(1È((ÉS1(I)È1)ÊT6)Ì2ËDF)ÌT1)j[Z#‚{[_#TPÐ1É2ÊC3ÊTPŽ[`#IN$Ðä(ÂRD(TP))§[a#TPÑ.001ÄIN$Ð"<.001"[b#±½[d#DFÏ55«9080Ø[f#DFÏ3ÍTSÏ10ÄTPÐ0:«9057ç[g#DFÏ1«9070\h#TSÏ12.71ÄIN$Ð"<.05"954:S2(4)Ð.26926024Z0#S1(5)Ð.1488743:S2(5)Ð.2955242JZ1#TSÏ10ÎDFÏ55«9060oZ2#T1Ð(DFÈ1)Ë2:T2Ð3.1415926:T3ÐDFË2Z7#T1ÐÓ(T1)ÄT4ÐT1:°9100:«9020¡Z9#T4ÐT1Ê2:°9150«Z<#C3ÐT5ËZA#T3ÐÓ(T3)ÄT4ÐT3:°9100:«9030ÝZC#T4ÐT3Ê2:°9150õZF#C3ÐC3Ë(T5ÊÚ(DFÊT2)) [K#T6ÐTSË360,4370,4380,YºD$;"DELETE";N$;",V0,D";D13Y «5SYºD$;"LOCK";N$;",V0,D";D1:«5uYºD$;"UNLOCK";N$;",V0,D";D1:«5ŠY&ºD$;"CATALOG":«5¬Y(#S1(1)Ð.9739065:S2(1)Ð.0666713ÎY*#S1(2)Ð.8650634:S2(2)Ð.1494513ðY,#S1(3)Ð.6794096:S2(3)Ð.2190864Z.#S1(4)Ð.4333S OR VAR. CLEAR"$XÍ„"(1 OR 2):";IN6XÑ´IN«4320,4330=XÖ«5RXàIÐ1ÁNVÇ3:JÐ0Á2rXáºV$(IÈJ);Ã5);:IÈJÏÐNVÄº:«5|Xâ‚:º:‚ƒXå«5Xê„"ARE YOU SURE?:";IN$ÂXïIN$Ð"Y"ÎIN$Ð"YES"ÄNVÐ0:V$(1)Ð""ÉXô«5áXþENÐENÉ51:ENÐ0«4390öX„"FILE NAME:";N$ Y´EN«4qâ(49408)ÑÏ24Îâ(49416)ÑÏ8Äº"NO PRINTER IN SLOT#1",ER$:«5cWrNNÐ0ÄºI$;"40N":ºD$;"PR#0":UUÐ0:VVÐ0–WwNNÐ40ÄºD$;"PR#1":ºI$;"40N":ºI$;"I":UUÐ1:WWÐ40ËW|NNÏ40ÍNNÑ151Ä—:ºD$;"PR#1":ºI$;NN;"N":UUÐ1:WWÐNNéW~NNÐ255ÍUUÐ1ÄºI$;"K":VVÐ1ðW«5XÌº"VAR. NAMEOW";À5);"MEAN";À15);"95% C.I."8VBJÐ1ÁL:T4ÐS1(JÈTC)ËTCvVDº"R";J;À5);ÂRD(T4);À15);"(";ÂRD(T4ÉT3);",";ÂRD(T4ÈT3);")"VEPPÐPPÈ1:PPÏ18Ä°10300™VF‚:«5»VmNNÑÏ1Äº"LINE LENGTH?",ER$:«5ñVnNNÐTT(2,1):NNÏ150ÍNNÑ255Äº"LINE TOO LONG",ER$:«5ýVoI$Ðç(9):WST.DEV=";ÂRD(Ú(T2))2U6DFÐT1:°3282:T3ÐSUMÊÚ(T2ËL)ZU8º:º"VAR";À5);"MEAN";À15);"95% C.I."|U:IÐ1ÁTC:C1ÐTT(2,I):T4ÐS1(I)ËLºU<º"V";I;À5);ÂRD(T4);À15);"(";ÂRD(T4ÉT3);",";ÂRD(T4ÈT3);")"ÔU=PPÐPPÈ1:PPÏ18Ä°10300öU>‚:DFÐT1:°3282:T3ÐSUMÊÚ(T2ËTC)V@º:º"R=SS/DF";T%º"VAR";À10);TCÉ1;À15);ÂRD(Y);À27);ÂRD(YË(TCÉ1))mT'º"ROW";À10);LÉ1;À15);ÂRD(X);À27);ÂRD(XË(LÉ1))—T(X2ÐX2ÉXYÉXÉY:T1Ð(LÉ1)Ê(TCÉ1):T2ÐX2ËT1ÆT)º"ERROR";À10);T1;À15);ÂRD(X2);À27);ÂRD(T2)ðT,º"TOTAL";À10);TCÊLÉ1;À15);ÂRD(X2ÈXÈY)U1º:º"POOLED C(TT(2,I),J)5SS1(JJ)ÐS1(JJ)ÈT1:S2(JJ)ÐS2(JJ)ÈT1ÊT1=S‚:‚WSXYÐSUMÊSUMËNN:XÐ0:YÐ0~SIÐ1ÁTC:YÐS1(I)ÊS1(I)ÈY:‚:YÐYËLÉXY¯SJÐ1ÁL:JJÐJÈTC:XÐS1(JJ)ÊS1(JJ)ÈX:‚:XÐXËTCÉXY¹S PPÐ10ÕS"º"ANALYSIS OF VARIANCE"T#º"DUE TO";À10);"DF";À15);"SS";À27);"MSá‚:«5"Rº"ANALYSIS OF VARIANCE"dRº"DUE TO";À8);"DF";À12);"SS";À21);"MS=SS/DF";À30);"F-RATIO":±tR TCÑÏNC«806•RNNÐ0:SUMÐ0:X2Ð0:W1Ð1E4:°4010ÅRLÐC(TT(2,1),0):IÐ1ÁTC:LÑÏC(TT(2,I),0)«818ËR‚ðRJÐ1ÁL:JJÐJÈTC:S1(JJ)Ð0:S2(JJ)Ð0SIÐ1ÁTC:T1ÐÚ(SUMË(NNÉTC)),QÒº"POOLED ST.DEV=";ÂRD(T1)XQ×º"95% C.I. FOR MEANS (USING POOLED SD)"zQÚIÐ1ÁTC:C1ÐTT(2,I):T3ÐC(C1,0)žQÜDFÐNNÉTC:°3282:SUMÐSUMÊT1ËÚ(T3)ãQÞº"V";I;À8);"( ";ÂRD(S1(I)ËT3ÉSUM);" , ";ÂRD(S1(I)ËT3ÈSUM);" )"ýQßPPÐPPÈ1:PPÏ20Ä°10300R);ÂRD(X2ÉX)=PÈº:º"LEVEL";À8);"N";À12);"MEAN";À21);"ST.DEV."GPÌSUMÐ0iPÍIÐ1ÁTC:C1ÐTT(2,I):T3ÐC(C1,0)ƒPÎPPÐPPÈ1:PPÏ20Ä°10300ÓPÏº"V";I;À8);T3;À12);ÂRD(S1(I)ËT3);À21);ÂRD(Ú((S2(I)ÉS1(I)ÊS1(I)ËT3)Ë(T3É1)))øPÐSUMÐSUMÈ(S2(I)ÉS1(I)ÊS1(I)ËT3):‚QÑT1ÐIÐ1ÁTC:YÐYÈS1(I)ÊS1(I)ËC(TT(2,I),0):‚8O¹°4098:W1Ð1E4AOºPPÐ8§O»º"FACTOR";À8);TCÉ1;À12);ÂRD(YÉX);À21);ÂRD((YÉX)Ë(TCÉ1));À30);ÂRD(((YÉX)Ë(TCÉ1))Ë((X2ÉY)Ë(NNÉTC)))æO¾º"ERROR";À8);NNÉTC;À12);ÂRD(X2ÉY);À21);ÂRD((X2ÉY)Ë(NNÉTC))PÃº"TOTAL";À8);NNÉ1;À12ARED=";ÂRD(C1Ê100);"%"Nç±,N¥NCÑÏTC«806LN§NNÐ0:X2Ð0:SUMÐ0:°4010:«4020NªIÐ1ÁTC:C1ÐTT(2,I):NNÐNNÈC(C1,0):S1(I)Ð0:S2(I)Ð0N¬JÐ1ÁC(C1,0):T1ÐC(C1,J)»N®SUMÐSUMÈT1:S1(I)ÐS1(I)ÈT1ÝN°X2ÐX2ÈT1ÊT1:S2(I)ÐS2(I)ÈT1ÊT1çN²‚:‚:±üN´XÐSUMÊSUMËNN:YÐ0'O¶"T-RATIO"HMÚº"--";À5);ÂRD(AA(0));À17);ÂRD(AA(1));À30);ÂRD(AA(0)ËAA(1))TMÜIÐ1ÁNN MÞº"X";I;À5);ÂRD(AA(2ÊI));À17);ÂRD(AA(2ÊIÈ1));À30);ÂRD(AA(2ÊI)ËAA(2ÊIÈ1))¨Mâ‚:±îMäº"ST.DEV OF Y ABOUT LINE=";ÂRD(SUM):º"WITH ";DF;" DEG OF FREEDOM"NæW1Ð10:º"R-SQU,L`DFÐLÉNNÉ1:SUMÐ(TSÉAA(2)ÊT1ÉAA(4)ÊT3)ËDFXLbAA(3)ÐÚ(SUMÊT4ËARG):AA(5)ÐÚ(SUMÊT2ËARG)¢LdAA(1)ÐÚ(SUMÊ(1ËLÈ(T4ÊS1(1)Ì2ÈT2ÊS1(2)Ì2É2ÊT5ÊS1(1)ÊS1(2))Ë(ARGÊLÊL)))ÀLfC1Ð1ÉSUMÊDFËTS:SUMÐÚ(SUM)ÓLh°3800:°3812:«5 MØº:º"VAR";À5);"COEFF";À17);"ST.DEV";À30);$K@T3ÐXYÉXÊYËL:T4ÐX2ÉXÊXËL:S1(2)ÐX:KBC2ÐTT(2,2):°10000JKDT5ÐXYÉXÊYËL^KVARGÐT2ÊT4ÉT5ÊT5zKWAA(2)Ð(T4ÊT1ÉT5ÊT3)ËARG–KXAA(4)Ð(T2ÊT3ÉT5ÊT1)ËARGÂKZAA(0)Ð(S2(1)ÉAA(2)ÊS1(1)ÉAA(4)ÊS1(2))ËLL\º"Y= ";ÂRD(AA(0));"+(";ÂRD(AA(2));")X1+(";ÂRD(AA(4));")X2)ËT1)*J-AA(1)ÐÚ(AA(10)Ê(1ËLÈ(XËL)Ì2ËT1))BJ0°3800:SUMÐÚ(AA(10))_J4C1ÐAA(2)Ì2ÊT1Ë(Y2ÉYÊYËL)sJ6DFÐLÉ2:°3812:«5™J8W1Ð1E4:C3Ð2:C2ÐTT(2,1):C1ÐTT(2,2)®J:°10000:LÐC(C1,0)ÚJ<T1ÐXYÉXÊYËL:T2ÐX2ÉXÊXËL:S1(1)ÐX:S2(1)ÐYêJ=TSÐY2ÉYÊYËLK>C1ÐTT(2,3):°10000):T1Ð(XYÉXÊYËL)Ë(X2ÉXÊXËL),I T2Ð(YÉT1ÊX)ËLGI"º"REGRESSION EQUATION"mI$º"Y= ";ÂRD(T2);"+(";ÂRD(T1);")X1"ƒI&AA(0)ÐT2:AA(2)ÐT1“I(T1ÐX2ÉXÊXËLÇI)ARGÐ(Y2ÉYÊYËL)É(XYÉXÊYËL)Ì2ËT1:AA(10)ÐARGË(LÉ2)îI*ARGÐ0ÄAA(1)Ð1EÉ6:AA(3)Ð1EÉ6:«3632J+AA(3)ÐÚ(AA(10;ÂRD(TS):TSÐÔ(TS)!H¢ °9080:«3260;H± TCÑÏ3ÎTT(1,3)ÑÏ3«810aH³ IÐ1ÁTC:AA(I)ÐTT(2,I):‚:C2ÐAA(TC)xH» AA(2)ÏC(C2,0)«812‘H½ C(C2,AA(2))ÐAA(1):«5«HNCÑÏTCÎNCÑ2ÎNCÏ3«806·HNNÐNCÉ1ÆHNNÏ1«3640óHW1Ð1E4:C3Ð2:C2ÐTT(2,1):C1ÐTT(2,2):°10000ILÐC(C1,0)G‘ XÑ92ÄXÐ90:SUMÐ1.6458G’ XÏÐ92ÍXÑ99ÄXÐ95:SUMÐ1.96RG” XÏÐ99ÄXÐ99:SUMÐ2.576iG– SUMÐSUMÊAA(2)ËÚ(L)ŽG˜ º"A ";X;"% C.I. FOR THE MEAN IS"¾Gš º"( ";ÂRD(YÉSUM);", ";ÂRD(YÈSUM);" )":«5ÚG TSÐ(YÉAA(1))ÊÚ(L)ËAA(2)öGŸ º"TEST OF MEAN =";AA(1)H º"Z="ARG,0):«5(F TCÑÏ3ÎTT(1,3)Ñ3ÎNNÑÏ2«810CF IÐ1Á2:AA(I)ÐTT(2,I):‚hF† C1ÐTT(2,3):LÐC(C1,0):W1Ð1E5:C3Ð1yFˆ °10000:YÐXËL”F‰ Y2ÐÚ((X2ÉXÊXËL)Ë(LÉ1))ÉFŠ º"N=";L;Ã2);"MEAN=";ÂRD(Y);Ã2);"ST.DEV=";ÂRD(Y2)åFŒ º"ASSUMED SIGMA=";AA(2)õFŽ ENÐ45«3485G XÐAA(1E\ ENÐ35ÄARGÐÔ(ARG),E^ ENÐ39ÄARGÐÒ(ARG)BE` ENÐ40ÄARGÐÚ(ARG)XEb ENÐ38ÄARGÐÜ(ARG)€Ed C(C1,0)ÐXX:IÐ1ÁXX:C(C1,I)ÐARG:‚:«5Ef IÐ1ÁC(ARG,0):YÐC(ARG,I)¯Eh ENÐ35ÄXÐÔ(Y)ÁEj ENÐ39ÄXÐÒ(Y)ÓEl ENÐ40ÄXÐÚ(Y)åEn ENÐ38ÄXÐÜ(Y) Fp C(C1,I)ÐX:‚:C(C1,0)ÐC(";ÂRD(T3);Ã2);"ST.DEV=";ÂRD(Ú(T4))TDýDFÐÓ(T5ÊT5Ë((T2ËNC)Ì2Ë(NCÉ1)È(T4ËL)Ì2Ë(LÉ1)))wDþº"APPROX. DEG. OF FREEDOM=";DF’D º"TEST OF MEAN1=MEAN2"§D TSÐ(T1ÉT3)ËÚ(T5)±D «3253ËDM TT(1,TC)Ñ3ÎTCÑÏ2«810ñDR ARGÐTT(2,1):C1ÐTT(2,2):C3ÐTT(1,1)EW C3Ð3«3430,2):W1Ð1E5:NCÐC(C1,0):LÐC(C2,0)7CîC3Ð1:°10000:T1ÐXËNCQCðT2Ð(X2ÉXÊXËNC)Ë(NCÉ1)uCòT3ÐC1:C1ÐC2:°10000:C1ÐT3:T3ÐXËL›CôT4Ð(X2ÉXÊXËL)Ë(LÉ1):T5ÐT2ËNCÈT4ËLßCúº"V1";À4);"N=";NC;À10);"MEAN=";ÂRD(T1);Ã2);"ST.DEV=";ÂRD(Ú(T2))"Dûº"V2";À4);"N=";L;À10);"MEAN=.96È1Ë((DFÉ1)Ê.414):±+BÔDFÑ2ÄSUMÐ63.66:±ABÕDFÑ3ÄSUMÐ9.925:±dBÖSUMÐ2.576È1Ë((DFÉ1)Ê.197É.1):±yBÚDFÑ2ÄSUMÐ6.31:±›BÛSUMÐ1.645È1Ë((DFÉ1)Ê.64È.1):±¨BÜARGÐ90:±ÓBÞIÐ1ÁARG:C(C1,I)ÐÛ(1):‚:C(C1,0)ÐARG:«5éBéTCÑÏNCÎNCÑÏ2«806CëC1ÐTT(2,1):C2ÐTT(2UM);" TO ";ÂRD(Y2ÈSUM);" )"$A«5BA²TSÐ(Y2ÉARG)ÊÚ(L)ËY:DFÐLÉ1[A´º"TEST OF MEAN=";ARGvAµº"T=";ÂRD(TS):TSÐÔ(TS)€A·°9000 A¼º"TEST SIGNIFICANCE P=";IN$§AÁ«5ÀAÐARGÑ92ÄARGÐ90:«3290ÙAÑARGÏ97ÄARGÐ99:«3284öAÒARGÐ95:DFÑ2ÄSUMÐ12.71:±BÓSUMÐ1NÐ42«3294#@ŠW1Ð1E5:C3Ð1:LÐC(C1,0)0@ŒLÑ2«812B@°10000:Y2ÐXËL\@‘YÐÚ((X2ÉXÊXËL)Ë(LÉ1))’@”º"N=";L;Ã2);"MEAN=";ÂRD(Y2);Ã2);"ST.DEV.=";ÂRD(Y)¢@™ENÐ30«3250³@›DFÐLÉ1:°3280Æ@žSUMÐSUMÊYËÚ(L)í@£º"A ";ARG;"% C.I. FOR THE MEAN IS"A¨º"( ";ÂRD(Y2ÉSN ";IN$;",V0,D1"2?xºD$;"POSITION ";IN$;",R";C2É4F?yºD$;"READ ";IN$¥?z„S1(2),S1(3),S1(4),S1(5),S1(6),S1(7),S1(8),S1(9),S1(10),S1(11),S1(12),S1(13),S1(14),S1(15)µ?|ºD$;"CLOSE"»?~±Þ?…TCÑÏ2ÎTT(1,2)Ñ3ÎTT(1,1)Ï2«810ù?‡C1ÐTT(2,2):ARGÐTT(2,1) @ˆE0ÄIN$Ð"P>.05--NOT SIGNIF":«3180@>.IN$Ð"TB2$$":°3190:T1ÐS1(C1)_>0ARGÑÐT1ÄIN$Ð"P<.01":«3180u>:IN$Ð"P<.05":«3180€>NW1Ð1E3»>ST1ÐC1Ê(C1ÈC2È1)Ë2:TSÐ(T1ÉARGÉ.5)ËÚ(C2ÊT1Ë6):TSÑ0ÄTSÐ0Ò>X°9080:IN$Ð"P="ÈIN$ó>lº"TEST SIGNIFICANCE ";IN$:«5?vºD$;"OPE,=Ó(Y2Ë2)Ê2ÑÏY2ÄYÐS2(Ó(Y2Ë2)È1ÈX2):«3098P=YÐ(S2(Y2Ë2ÈX2)ÈS2(Y2Ë2È1ÈX2))Ë2w=º"V2";À4);"N=";Y2;À12);"MEDIAN=";Y“=º"SUM OF RANKS=";ÂRD(X)¶=C1ÐX2:C2ÐY2:Y2ÑC1ÄC2ÐX2:C1ÐY2Ï=!C1ÈC2Ï30ÎC1Ð15«3150ð=&IN$Ð"TB1$$":°3190:T1ÐS1(C1)>+ARGÏT1ÎT1ÐÈ1)ÉARG<XYÑARGÄARGÐXY'<YÑXÄXÐY?<IIÐ1:JJÐ1ÈX2:W1Ð1E5J<IÐ1ÁLs< S3%(I)Ð1ÄS2(II)ÐS1(I):IIÐIIÈ1:«3086Œ<S2(JJ)ÐS1(I):JJÐJJÈ1’<‚»<Ó(X2Ë2)Ê2ÑÏX2ÄYÐS2(Ó(X2Ë2)È1):«3092Ù<YÐ(S2(X2Ë2)ÈS2(X2Ë2È1))Ë2=º"V1";À4);"N=";X2;À12);"MEDIAN=";YËARG:JÐIÁJJ:S2(J)ÐSUM:‚2;åJJÐLÉ1ÄS2(L)ÐL:«3050=;çIÐJJ:‚_;êXÐ0:YÐ0:X2ÐC(C1,0):Y2ÐC(C2,0)j;ìIÐ1ÁLˆ;îS3%(I)Ð1ÄXÐXÈS2(I):«3058–;ðYÐYÈS2(I)œ;ò‚;ôX2ÑÏY2«3070Â;öARGÐY:XÑYÄARGÐXÌ;ù«3077ï;þXYÐX2:ARGÐX:Y2ÑX2ÄXYÐY2:ARGÐY<XYÐXYÊ(X2ÈY2S2(I)Ð1:‚:ÆC2ÐTT(2,2)G:ÈIÐLÈ1ÁLÈC(C2,0):S1(I)ÐC(C2,IÉL):S2(I)Ð2:‚l:ÊLÐLÈC(C2,0)É1:XYÐL:°10114:LÐXYÈ1†:ÌIÐ1ÁL:S3%(I)ÐS2(I):‚ž:ÑIÐ1ÁLÉ1:ARGÐ1:JJÐI«:ÓJÐIÈ1ÁLÁ:ÖS1(J)ÏS1(I)«3040Ö:ÙARGÐARGÈ1:JJÐJ:‚ô:àSUMÐ0:JÐIÁJJ:SUMÐSUMÈJ:‚;âSUMÐSUMPOISSON PROBS FOR MEAN=";ARGC9dº"X";À10);"PROB.";À20);"CUM.PROB."Q9hYÐ1:«2924[9jYÐYÊKy9lXÐÂRD(X2ÊARGÌKËY):C3ÐC3ÈX9nºK;À10);X;À20);C39rKÐKÈ1:(XÑ1ËW1)Í(KÏARG)«5·9w«2922Í9½TCÑÏNCÎNCÑÏ2«806æ9ÂC1ÐTT(2,1):LÐC(C1,0) :ÄIÐ1ÁL:S1(I)ÐC(C1,I):Y2ÄLÐLÉ1:«2853(80Z%(II)Ð42:LÐLÉ1:«285388I–(1):W1Ð1E5Z8JIÐ0Á3:º"+";:JÐ1Á9:º"-";:‚:‚`8KºŠ8Lº"YMIN=";ÂRD(XY);" YSCAL=";AA(1);" ";ª8Nº"XMIN=";X2;" XSCAL=";AA(2)±8S«5Ê8YTCÑÏ1ÎTT(1,1)Ð3«810Ú8^ARGÐTT(2,1)ù8`W1Ð1E4:C3Ð0:KÐ0:X2ÐÝ(ÉARG)9bº"%(JJ));:Z%(JJ)Ð32:‚:º:¹37,â(37)É1:ARGÐ20«2889O7 Z%(1)Ð45:C2Ð5ÄC2Ð0:Z%(1)Ð43~7$S1(L)ÏÐXYÍLÏ0ÄIIÐ(S2(L)ÉX2)ËAA(2)È1:«28607%LÑÐ0«2855¡7&S1(L)ÏÐXY«2852Ã7'XYÐXYÉAA(1):ARGÐARGÈ1:C2ÐC2È1Í7)«2846é7,IIÏ40ÎIIÑ1ÄLÐLÉ1:«28538.S1(L)ÏXYÈAA(1)ÎYÑ))6S2(I)ÏXÄXÐS2(I).6S2(I)ÑX2ÄX2ÐS2(I)E6‚:YÐS1(L):Y2ÐS1(1)q6TCÐ6ÄY2ÐAA(5):YÐAA(6):X2ÐAA(2):XÐAA(3)6ARGÐ(YÉY2)Ë20:TCÐ2Ä°20166AA(1)ÐARG»6ARGÐ(XÉX2)Ë40:TCÐ2Ä°2016É6AA(2)ÐARGè6XYÐ19ÊAA(1)ÈY2:ARGÐ0:C2Ð5:î6².7JJÐ1Á40:ºç(Z IÐ1ÁC(NVÉ1,0):„C(NVÉ1,I):‚:«2770N5õ (TCÑÏ2ÍTCÑÏ6)Î(NCÑÏ2)Î(TCÐ6ÍNNÑÏ4)«810d5ù C3ÐTT(2,1):W1Ð1E45ú TCÐ2ÄC1ÐTT(2,2):«2823¥5ÿ C1ÐTT(2,4):IÐ2Á6:AA(I)ÐTT(2,I):‚¿5C(C1,0)ÑÏC(C3,0)«818Ñ5 °10100:LÐXYÈ1å5 XÐÉ1E30:X2Ð1E306IÐ1ÁL:S2(I)ÐC(C3,S2(IÐN$È"$$V"'4Ü ºD$;"OPEN";IN$;",V0,D";D174Þ ENÐ24«2790Z4ß C1ÐÉ1:IÐ1ÁNV:N$ÐV$(I)ÄC1ÐIÉ1k4à ‚:C1ÐÉ1«8164á ºD$;"WRITE";IN$:ºN$;",";C(C1,0)±4ã IÐ1ÁC(C1,0):ºC(C1,I):‚:«2770æ4æ ºD$;"READ";IN$:NVÐNVÈ1:NVÏYYÈ1ÄºD$;"CLOSE":«822ü4ç „V$(NV),C(NVÉ1,0)"5è3ª IÐ0ÁYY:ºC(I,0):JÐ1ÁC(I,0)/3¯ ºC(I,J):‚:‚D3¾ IÐ1ÁNV:ºV$(I):‚N3Ã «2770b3È ºD$;"READ ";IN$o3Ê „L,C1,NV†3Ë LÑÏXXÎC1ÑÏYYÄ«900¦3Í IÐ0ÁYY:„C(I,0):JÐ1ÁC(I,0)¶3Ï „C(I,J):‚:‚Ë3Ð IÐ1ÁNV:„V$(I):‚ã3Ò ºD$;"CLOSE ";IN$:«5 4× „"VARIABLE NAME:";N$:IN$TCÐ3ÄC(TT(2,3),IÈ1)ÐX212ƒ PPÐPPÈ1:PPÏ19Ä°1030072„ ‚V2† TCÐ3ÄC(TT(2,3),0)ÐAA(1)È1]2‡ «5“2Œ „"VARIABLE OR FILE?(1 OR 2):";IN:´IN«2775,2705:«5Ä2‘ „"FILE NAME:";IN$:ºD$;"OPEN ";IN$;",V0,D";D1Ô2¢ ENÐ24«2760é2¥ ºD$;"WRITE ";IN$ÿ2§ ºXX;",";YY;",";NVÐAA(2):C1Ð1ÉC2:W1Ð1E4:C3Ð0:ARGÐ1G1k º"X";À10);"PROB.";À20);"CUM.PROB."b1n IÐ2ÁAA(1):ARGÐARGÊI:‚q1q IÐ0ÁAA(1)ˆ1u XÐ1:JÐ1ÁI:XÐXÊJ:‚¥1v YÐ1:JÐ1ÁAA(1)ÉI:YÐYÊJ:‚¶1x XYÐARGË(XÊY)×1z X2ÐÂRD(XYÊC2ÌIÊC1Ì(AA(1)ÉI))ä1| C3ÐC3ÈX2û1~ ºI;À10);X2;À20);C32‚ 0~ C3Ñ3«2435Q0€ JÐ1ÁC(TT(2,I),0):C2ÐC2È1:C(C1,C2)ÐC(TT(2,I),J):C2ÐXXÈ1«2435W0 ‚h0ƒ C2ÐXXÈ1«804|0ˆ ‚:C(C1,0)ÐC2:«5£0_ (TCÐ2ÍNNÑÏ2)Î(TCÐ3ÍTT(1,3)Ñ3)«810¾0a IÐ1Á2:AA(I)ÐTT(2,I):‚ð0f º"BINOMIAL PROB FOR N=";AA(1);" AND P=";AA(2)ù0g PPÐ2 1i C2ÐJ/8 ‚/9 SUMÐ0*/= JÐIÁJJ:SUMÐSUMÈJ:‚:/B SUMÐSUMËARGX/E JÐIÁJJ:C(C2,S2(J))ÐSUM:‚x/F JJÐLÉ1ÄC(C2,S2(L))ÐL:«2380ƒ/G IÐJJ:‚”/L C(C2,0)ÐL:«5¨/e TT(1,TC)Ñ3«806½/j C1ÐTT(2,TC):C2Ð0Î/t IÐTCÉ1Á1ÇÉ1Ý/u C3ÐTT(1,I)0y C3Ð1ÄC2ÐC2È1:C(C1,C2)ÐTT(2,I)16ÄARGÐS1(L):º"MAXIMUM=";ARG:«5G. ENÐ17ÄARGÐS1(1):º"MINIMUM=";ARG:«5u. ENÐ18ÍÓ(LË2)Ê2ÑÏLÄARGÐS1(Ó(LË2)È1):«2322š. ENÐ18ÄARGÐ(S1(LË2)ÈS1(LË2È1))Ë2. º"MEDIAN=";ARG´.$ «5Ì.. IÐ1ÁLÉ1:ARGÐ1:JJÐIÙ.1 JÐIÈ1ÁLï.3 S1(J)ÏS1(I)«2361/5 ARGÐARGÈ1:JJ0)ÑÏL«818-Ö‚!-Ù°10100:LÐXYÈ1H-ÞIÐ1ÁARG:C1ÐTT(2,I):C2ÐTT(2,ARGÈI)i-ãKÐ1ÁL:C(C2,K)ÐC(C1,S2(K)):‚|-èC(C2,0)ÐL:‚:«5š- ENÐ22Í(TCÑÏ2ÎTCÑÏNC)«806°- ENÑ19ÍTCÑÏNC«810Í- C1ÐTT(2,1):°10100:LÐXYÈ1ç- C2ÐTT(2,2):C1ÐTT(1,2)÷- ENÐ22«2350. ENÐAA(2),*«2068-,TCÑÏNCÎÓ(TCË2)Ê2ÑÏTC«806:,¢ARGÐTCË2G,§IÐ1ÁARG],¬C1ÐTT(2,I):°10100w,±C(TT(2,ARGÈI),0)ÐXYÈ1ž,¶JÐ1ÁXYÈ1:CTT(2,ARGÈI),J)ÐS1(J):‚§,»‚:«5Å,ÏTCÑÏNCÎÓ(TCË2)Ê2ÑÏTC«806ç,ÔARGÐTCË2:C1ÐTT(2,1):LÐC(C1,0) -ÕIÐ2ÁARG:C(TT(2,I),+ º"OF BIN BIN"9+ARGÐ1:C2Ð0:C3ÐAA(1)ÈAA(2)Ë2:W1Ð1E5I+ARGÏLÄº:«5g+S1(ARG)ÑC3ÄC2ÐC2È1:«2073q+«2080‹+ARGÐARGÈ1:ARGÏL«2080•+«2070²+ ºÂRD(AA(1));À9);C2;À13);Ä+"C2Ð0Äº:«2085Ú+#IÐ1ÁC2:º"*";:‚:ºï+%C2Ð0:C3ÐC3ÈAA(2),&AA(1)ÐAA(1)È0,2028,2028,2030!*êARGÐ10:«2030+*ìARGÐ5B*îARGÐARGÊ10Ì(ÉC2):±P*øAA(2)ÐARGc*ýARGÐS1(1):T1Ð1u*þARGÑÏ0Ä°2016”*ÿAA(1)ÐARGÊÒ(S1(1))ÈAA(2)Ë2ž*«2060©*IÐ2Á3½*AA(IÉ1)ÐTT(2,I)ß*TT(1,I)Ð2ÄAA(IÉ1)ÐK(TT(2,I))å* ‚ë* ºÿ*º"MIDDLE # IN")ÝC1ÐTT(2,1):°10100:LÐXYÈ1*)ÞTCÐ3«2050O)ßARGÐ(S1(L)ÉS1(1))Ë10:°2016:«2040q)àC2Ð0:ARGÐÔ(ARG):ARGÐ0Ä¡:«815•)áARGÑ1ÄARGÐARGÊ10:C2ÐC2È1:«2017»)äARGÏÐ10ÄARGÐARGË10:C2ÐC2É1:«2020Ê)æARGÐÓ(ARG)ß)çENÐ20ÄARGÐARGÈ1î)èT1Ð1«2030*é´ARG«2030,203);À6ÊIÈ6);(¾‚:ºARG:º"(¿W1Ð1005(ÁAA(2)Ð0:JÐ1ÁLA(ÃIÐ1ÁTC~(ÆAA(1)ÐS1(I)ÊS2(J)ËARG:AA(3)Ð(C(TT(2,I),J)ÉAA(1))Ì2ËAA(1)˜(ÈAA(2)ÐAA(2)ÈAA(3):‚:‚¶(Ìº"CHI-SQUARE=";ÂRD(AA(2))Ú(Íº"DEG OF FREEDOM=";(TCÉ1)Ê(LÉ1)á(Ï«5õ(ÕNCÑÏ1ÎNNÏ2«810þ(ÖT1Ð0'”IÐ1ÁTC'–º"V";I;À6ÊIÈ6);.'™‚:º"TOTALS"9'žJÐ1ÁLE' ºJ;À6);Q'£IÐ1ÁTCl'¨ºC(TT(2,I),J);À6ÊIÈ6);y'ª‚:ºS2(J)ƒ'«ºÀ6);'IÐ1ÁTC²'¯ºÂRD(S1(I)ÊS2(J)ËARG);À6ÊIÈ6);¼'²‚:º:ºÖ'´PPÐPPÈ3:PPÏ18Ä°10300Ý'·‚Jî'¹º"TTLS";À6); (¼IÐ1ÁTC:ºS1(I&qTCÑÏNC«806)&tLÐC(TT(2,1),0):W1Ð105&vIÐ1ÁTCN&xLÑÏC(TT(2,I),0)«818Z&yS1(I)Ð0e&{JÐ1ÁL†&€S1(I)ÐS1(I)ÈC(TT(2,I),J):‚:‚‘&…JÐ1ÁL&†S2(J)Ð0©&ˆIÐ1ÁTCÊ&ŠS2(J)ÐS2(J)ÈC(TT(2,I),J):‚:‚ë&ARGÐ0:JÐ1ÁL:ARGÐARGÈS2(J):‚õ&‘ºÀ6);þ&’PPÐ1 «1825%%CH$Ð"E"«55%&CH$Ñ"-"ÎCH$Ï"9"ÎCH$Ð"/"«802?%+N$Ð""M%,N$ÐN$ÈCH$d%0CHÐCHÈ1:CHÏL«1810‡%2CH$Ðê(IN$,CH,1):CH$ÑÏ" "«1836 %:C(TT(2,NN),RO)Ðå(N$)Â%?C(TT(2,NN),0)ÐC(TT(2,NN),0)È1Þ%DC(TT(2,NN),0)ÐXXÈ1«804ö%INNÐNNÈ1:NNÏTC«1810&N«18251782$þC(TT(2,TC),0)ÐARG:«5-$ NCÑÏTC«806J$IÐ1ÁTC:C(TT(2,I),0)Ð0:‚S$ROÐ0i$CHÐ0:NNÐ1:ROÐROÈ1}$º"DATA ROW";RO;—$„" ";IN$:IN$ÐIN$È" "¦$IN$Ð" "«5¿$IN$Ð"END"ÎIN$Ð"E"«5Ì$LÐã(IN$)ã$!CHÐCHÈ1:CHÏL«1810%#CH$Ðê(IN$,CH,1):CH$Ð" "É1:AA(I)ÐTT(2,I):‚N#íTCÐ2ÄC(TT(2,TC),0)ÐXX:IÐ1ÁXX:C(TT(2,TC),I)ÐAA(1):‚:«5q#ïTCÉ1Ð2ÄI1ÐAA(1):I2ÐAA(2):I3Ð1˜#ñTCÉ1Ð3ÄI1ÐAA(1):I2ÐAA(3):I3ÐAA(2)§#ôARGÐ0:IÐI1Î#öARGÐARGÈ1:ARGÐXXÈ1ÄARGÐARGÉ1:«804å#ùC(TT(2,TC),ARG)ÐI1$ûI1ÐÂRD(I1ÈI3):I1ÑÐI2«I):‚"?C(NC,0)ÐMR:«5,"©TCÑÏNCÎTCÑÏ2«806b"«C3Ð2:NCÐC(TT(2,1),0):C1ÐTT(2,1):C2ÐTT(2,2):°10000"¿X2ÐX2ÉXÊXËNC:Y2ÐY2ÉYÊYËNC:X2Ð0ÎY2Ð0«815¬"ÂARGÐ(XYÉXÊYËNC)ËÚ(X2ÊY2)Æ"Çº"CORR COEFF=";ARG:«5í"ÛTCÑ2ÎTCÏ4ÎTT(1,TC)Ñ3ÎNNÑÏTCÉ1«810#àW1Ð1E6:IÐ1ÁTCÐTT(2,1)!*TT(1,1)Ð3«1585IÐ1ÁN®#HX9(I)ÐX1(I)µ#R‚I»#\ºã#fº"HOW MANY PARAMETERS ARE THERE: ";ê#p„L $zLÏNÉ1Äº"NOT ENOUÈ2);":";"¤º"®IÐIÈ1"¸‚I)"Ì°4370:"àº"CONTINUE";B"ê„A$H"ï—N"ô±`"E3ÐEÉ5ÊÓ(EË5)j"º" ";x"&BÏ0ÄE3Ð0‰":Ô(B)ÏCÄE3Ð0™"DE3Ñ1Ä«4460¥"NJÐ1ÁE3¯"Xº"-";¶"b‚JÎ"lÓ((LÉ3)Ë5)Ñ1Ä«4500ã"vJÐ1ÁÓ((LÉE3)Ë5)ñ"€º"I----";ø"Š‚J#”º"IÀLÈ4);C(I);ÀLÈ14);Y(I);!º'!«4280>!6D(I)ÐD(IÈ1)Ä«4280O!@E2ÏÐ1Ä«4200k!Tº" *";À2ÈAÊD(IÈ1));"*";u!^«4240€!hº" :";¯!rE2ÑAÊD(IÈ1)ÄºÀE2È2);"*";À2ÈAÊD(IÈ1));"*";ß!|E2ÏÐAÊD(IÈ1)ÄºÀ2ÈAÊD(IÈ1));"*";À2ÈE2);"*";ø!Ó(AÊD(IÈ1))ÐLÄ«4260"šºÀL Ô(B)ÏCÄ«3910 2ºÀEÈ2);"0"* F°43705 PIÐ1ÁNI nE(IÉ1)ÑUÄ«4000Y xKÐUÁE(IÉ1)m ‚º" :";ÀLÈ2);":"t Œ‚K‚ E2ÐAÊD(I)” ´E(I)Ð0Ä«4150¥ ÈE2ÏÐ1Ä«4070° Òº" *";º Ü«4100Å æº" :";Ö ðºÀE2È2);"*";è úÓ(E2)ÐLÄ4110!ºÀLÈ2);":";:L4Ð1ÄºD(I)ÐD(I)ÉBò ‚ICÐ0%IÐ1ÁN8CÑD(I)ÄCÐD(I)?$‚IL8CÑ0ÄCÐ0WLE(0)Ð0bVE(N)Ð1m`IÐ2ÁNjE(IÉ1)ÐÓ(.5Ê(C(I)ÉC(IÉ1))ÊLË(C(N)ÉC(1))È.5)¤~‚I®’AÐLËC¹¦AÐAÊ.8ÆºEÐAÊÔ(B)ÌÄºÒÎºØØºÞâºäìºêöºð—ÿ BÏ0Ä«3910:";N‚NÑÏ1ÍNÑÏ2«120"Œ¹771,N7Èº"RUN STAT$$""ÑÏ"Y"ÍIN$ÑÏ"N"«80! TIN$Ð"N"«75O d¹768,XXË256:¹769,XXÉÓ(XXË256)Ê256:¹770,YYU iº nº:º"DO YOU HAVE JUST ONE DISK DRIVE?"” o„"(Y OR N):";IN$¯ pIN$ÑÏ"Y"ÍIN$ÑÏ"N"«110· qNÐ1È sIN$Ð"Y"«140x„"WHICH DRIVE WILL BE USED FOR DATA FILES? (1 OR 2)ÑÏ"Y"ÍIN$ÑÏ"N"«500 FIN$Ð"Y"ÄXXÐ100:YYÐ15:«1006 HºZ Kº"HOW MANY NUMBERS DO YOU WANT" L„"IN A VARIABLE?(30 TO 500):";XX” MXXÑ30ÎXXÏ500«75¦ NYYÐÓ(1500ËXX)¬ OºÎ Pº"YOU HAVE ";YY;" VARIABLES."÷ Q„"IS THIS ACCEPTABLE? (Y OR N):";IN$ SIN$¸±°´±°¸¹·±°²±°°±°µ±°³·¸¹··¶µ¸µ·°·³¸°·¶µµ°·µ·¹¶²¶¹·°µ®µ³®µ·®µµ®µ®µ±µ®´®³¹®³¶®³´®³¸µ®´±®´¸®µ±®´¶®´¸µ®´¶®´´®´µ®µ¶®´¸°°°°°°°°°°°°°°ÔÒÁÆÆÉÃÓÁÌÅÓÒÅÓÉÓÔÁÎÃÅÎÏÒÍÁÌÔÒÁÎÑÂÒÁÎÄ±ÂÒÁÎÄ²ÂÒÁÎÄ³ÂÒÁÎÄ´±°°¬±µ¬¹±°²µ³´³°´¸·±¸²±´µ±¸¸²·µ³µ±³¶²²²°±°²±³°²°´µ²¸µ°±´±°±°µ°±²²³±µ´µ²³µµ²±µ³±¹´´µ±¹¹¸¹¹²±°°¹¹±°±¹·¹¹¹¸±°³¹µ±°°±°°±°µ¹¹¹¸±°²±°°¹¶±°·±°·¹¸±°±¹¹±°±±±°¹¶¹·¹¶¹¶±°µ¹·±°³±°±¹·¹´¹¶±°±¹¸¹²±°¹¹³¹´¹ 8.² COPYRIGHT SERENDIPITY SYSTEMS INC 19796¥«5Lº"NOMON C,I,O":—R‘pº"BLOAD RAINBOW,A$2000"(IÐ1Á10000:‚‰-‰:—®2º"DO YOU WANT THE STANDARD SIZE"Ó3º"WORKAREA (15 VARIABLES OF 100"÷4„"ENTRIES EACH)? (Y OR N):";IN$ <IN$+ ² ********************A+² LEAST SQUARE SUMMATION SUBROUTINEI+RÐ0T+(SÐ1ÁN`+2XÐX9(S)j+<°5280†+FRÐRÈ(YÉY1(S))Ê(YÉY1(S))+P‚S™+ZYÐÉÚ(R)Ÿ+d±¢DÐÚ(D)*¬±*ÊIÐ1ÁL0*ÔA(I)ÐA(I)ÈKÊD(I)ËD7*Þ‚IA*ò°6430L*üY(3)ÐYR*±]*.IÐ1ÁLh*BAÐA(I){*VBÐD(I)ÊKË(2ÊD)‹*jA(I)ÐA(I)ÈB•*~°6430¦*’BÐ0ÄBÐ1EÉ11º*¦D(I)Ð(YÉY(3))ËBÑ*ºD(I)Ð0ÄD(I)Ð1EÉ05Ü*ÎA(I)ÐAç*ØYÐY(3)î*â‚Iø*ö°6010þ*±Ð1ÁL)”A(I)ÐA1(I))ž‚I()¨Y(1)ÐY(2)6)²Y(2)ÐY(3)A)¼IÐ1ÁLP)ÆA1(I)ÐA(I)W)Ð‚Ia)ä°6430l)îY(3)ÐYv)°6190)DÐ0Ä±‹)*°6090—)>N8ÐN8È1£)HN8ÏMÄ±Ç)RÔ((Y(3)ÉY(2))Ë(Y(2)ÉY(1)))ÑEÄ±Ñ)f«5710Ù)zDÐ0ä)„IÐ1ÁLö)ŽDÐDÈD(I)ÊD(I)ý)˜‚I*************(|N8Ð0(¤DÐ1,(©LÑ2Ä«5600<(®D(1)Ð1ËÚ(L)K(³LÑ2Ä«5600V(¸IÐ2ÁLf(ÂD(I)ÐD(IÉ1)m(Ì‚Ix(àJÐ1Á3‚(ô°6430(þY(J)ÐY—(°6190¡(&°6090¨(0‚JÏ(N(Y(3)ÉY(2))Ë(Y(2)ÉY(1))Ï0ÄKÐKÊ1.2ä(bY(3)ÑY(2)ÄKÐKË2ù(vY(3)ÏY(2)Ä«5800)ŠI±'–² ********************W' ² THIS IS WHERE THE FUNCTION CONTAINING THE PARAMETERSƒ'ª² IS PLACED. AN EXAMPLE IS SHOWN BELOW.·'´² OBSERVE THAT THE A(I) ARE THE PARAMETERS, ANDÐ'¾² X IS THE VARIABLE.ë'ÈYÐA(1)ÈA(2)ÊXÈA(3)ÊXÊXñ'Ò±(Ü² ********NÉLÉ1ÑÐ0Äº"STANDARD DEVIATION INFINITE."<&NÉLÉ1ÑÐ0Ä«5150a& º"THE STANDARD DEVIATION OF THE"„&º"REGRESSION IS ";Ú(RË(NÉLÉ1))Š&º²&(º"THE NUMBER OF ITERATIONS WAS ";N8¸&2º¾&<ºÇ&PLÐL9Ð&ZEÐE9Ù&dMÐM9ä&nIÐ1ÁNô&xX1(I)ÐX9(I)û&‚‚I'ŒTARTING VALUES"+%.º"FOR THE PARAMETERS: "1%8º<%BIÐ1ÁLP%Lº"A(";I;") = ";Z%V„A(I)a%`‚Ig%jºm%tº„%~º"CALCULATING...."Š%ˆº%’ºš%œ°5500 %¡—¸%¦º"THE RESULTS ARE:"¾%°ºÉ%ºIÐ1ÁLá%Äº"A(";I;") = ";A(I)è%Î‚Iî%Øºô%âºú%ìº(&öGH DATA."$„LÏNÉ1Ä«4710)$ŽLÑ1Ä«4720/$˜ºO$¢º"CONVERGENCE CRITERION: ";V$¬„Ee$¶EÑ0Ä«4780k$Àº’$Ôº"MAXIMUM NUMBER OF ITERATIONS: ";™$Þ„M¨$èMÑ1Ä«4830®$òºÒ$üº"STARTING STEP CONSTANT, K: ";á$KÑ0Ä«4860è$„Kî$º%$º"INPUT THE S:";N‚NÑÏ1ÍNÑÏ2«120"Œ¹771,N7Èº"RUN STAT$$"I DATA FILES? (1 OR 2):";Ng‚NÑÏ1ÍNÑÏ2«120rŒ¹771,N‡Èº"RUN STAT$$"Iº"RUN STAT$$"I"IÑÏ"Y"ÍIN$ÑÏ"N"«80! TIN$Ð"N"«75O d¹768,XXË256:¹769,XXÉÓ(XXË256)Ê256:¹770,YYU iº nº:º"DO YOU HAVE JUST ONE DISK DRIVE?"” o„"(Y OR N):";IN$¯ pIN$ÑÏ"Y"ÍIN$ÑÏ"N"«110· qNÐ1È sIN$Ð"Y"«140x„"WHICH DRIVE WILL BE USED FOR DATA FILES? (1 OR 2)ÑÏ"Y"ÍIN$ÑÏ"N"«500 FIN$Ð"Y"ÄXXÐ100:YYÐ15:«1006 HºZ Kº"HOW MANY NUMBERS DO YOU WANT" L„"IN A VARIABLE?(30 TO 500):";XX” MXXÑ30ÎXXÏ500«75¦ NYYÐÓ(1500ËXX)¬ OºÎ Pº"YOU HAVE ";YY;" VARIABLES."÷ Q„"IS THIS ACCEPTABLE? (Y OR N):";IN$ SIN$8.² COPYRIGHT SERENDIPITY SYSTEMS INC 19796¥«5Lº"NOMON C,I,O":—Rpº"BLOAD RAINBOW,A$4000"(IÐ1Á10000:‚‰-‰:—®2º"DO YOU WANT THE STANDARD SIZE"Ó3º"WORKAREA (15 VARIABLES OF 100"÷4„"ENTRIES EACH)? (Y OR N):";IN$ <IN$ OW BE GIVEN A CHANCE TO"= .º"AMEND THIS CHOICE IF THERE IS"` 8º"ENOUGH MEMORY AVAILABLE. IF"… Bº"NOT, THE PROGRAM WILL FAIL.":ºª Vº"DO YOU WISH TO SKIP THE ERROR"Ç `º"CALCULATIONS (Y/N): ";Þ j„A$:ã(A$)Ð0Ä«4970ì ~A$Ð"Y"Ä±ÿ ˆA$ÑÏ"N"Ä«4970I,2)=X(I,2)*X(I,2)@¬² THE STATEMENT BELOW SIMPLY CONVERTS THE`¶² FIRST VARIABLE TO ITSELF.rÀX(I,1)ÐX(I,1)xÊ±Ô² ******************************³è—:º:º:N6Ð1Ä«5030×º"YOU CHOSE EARLIER NOT TO USE"ïº"THIS FUNCTION.":º $º"YOU WILL N(I):E1(I)ÐE2(I):‚I:LÐL7:DÐD3"à±Gp² ******************************fz² USER FUNCTION SUBROUTINE“„² THE USER MAY INSERT A FITTING FUNCTIONÁŽ² HERE. THE EXAMPLE SHOWN BELOW (IN REM) ë˜² CONVERTS THE SECOND VARIABLE INTO A¢² QUADRATIC- X(É1)Ê7);"------";:‚J=ŒºÀ6È(JÉ1)Ê7);"------";:º:º:IÐ1ÁM:ºI;`¾JÐ1ÁL:ºÀ6È(JÉ1)Ê7);X(I,J);:‚J‹ÜºÀ6È(JÉ1)Ê7);Y(I):Ó(IË10)ÑÏIË10Ä«4100£ðº" CONTINUE";:„A$´‚I:º:º:«1450è@IÐ1ÁN:D2(I)ÐD(I):E2(I)ÐE1(I):‚I:D3ÐD:N5ÐN:L7ÐLšNÐN5:IÐ1ÁN:D(I)ÐD2t„A$:ã(A$)Ð0Ä«3700)ˆA$Ð"Y"Ä«37507’A$Ð"N"Ä€Aœ«3700k¦º:º:º:IÐ1ÁM:JÐ1ÁL:X(I,J)ÐX1(I,J):‚J}öY(I)ÐY1(I):‚I« —:º:º"CURRENT DATA FILE:":º:º" I";:JÐ1ÁLÍFºÀ6È(JÉ1)Ê7);"X(I,";J;")";:‚JõZºÀ6È(JÉ1)Ê7);" Y(I)":º"---";:JÐ1ÁLxºÀ6È(J"Ä°4840Ô A$Ð"Y"Ä«3560,Þ A$ÑÏ"N"Ä«35102è º_ò º"DO YOU WISH AN INTERPOLATION (Y/N): ";vü „A$:ã(A$)Ð0Ä«3580ˆA$Ð"N"Ä«3650›A$ÑÏ"Y"Ä«3580$°8690:º:«3570ÒB—:º:º"DO YOU WISH TO REPEAT THE"Vº"PROCEDURE USING THE SAME DATA (Y/N): "; ‚J:IÐ1ÁN:E(I)ÐD(I):F(I)ÐD(I):‚I:º:ºSf DÐÚ(DË(MÉN)):º"THE STANDARD ERROR OF THE"sz º"REGRESSION FIT IS ";D:º:º•˜ º"DO YOU WISH CALCULATION OF"¶¢ º"THE STANDARD ERROR OF THE"Þ¬ º"REGRESSION COEFFICIENTS (Y/N): ";õ¶ „A$:ã(A$)Ð0Ä«3510Ê A$Ð"YCORRESPONDING STANDARD DEVIATION: ";vº" ";Ú(DË(MÉN))WŠD2ÐD:LÐLÈ1:LÑÐL5Ä«3030`²LÐL5†Æ—::º:º"THE CALCULATED REGRESSION"«äº"COEFFICIENTS ARE:":º:JÐ1ÁL5È1Í JÐ1Äº"CONSTANT TERM : ";D(1)ü JÏ1Äº"COEF. FOR VARIABLE ";JÉ1;" : ";D(J)%1EÉ15J—=hº:º"REGRESSION UNDER WAY.....":D2Ð10000000000T†IÐ1ÁN7:E1(I)Ð1:‚Ia¸L5ÐL:LÐ1}ÖNÐLÈ1:°4160:°7570:º:º:º¨&º"COEFFICIENTS CALCULATED THUS FAR:":ºÐ:IÐ1ÁN:IÐ1Äº"CONSTANT TERM: ";D(1)ôNIÏ1Äº"VARIABLE ";IÉ1;": ";D(I)#X‚I:º:º"I,J)Ð1Ë(A4ÊX(I,J))>Œ HÐ8ÄX(I,J)Ð(1ÉA4ÊX(I,J))Ë(1ÉB4ÊX(I,J))c– HÐ9ÄX(I,J)ÐÝ(ÉA4ÊX(I,J)ÊX(I,J))o ‚I:º:‚Jwª —:º‡È E9Ð0Ä«2870§Ò º"SOLVING ...":NÐL5È1:°7470½°6750:°8190:«3270í6º"WHAT IS THE VARIANCE REDUCTION FACTOR: ";@„E5:E5ÑÐ0ÄE5Ð º"WHAT IS THE VALUE FOR B: ";:„B4:( IÐ1ÁM:HÐ0Ä°4740WF HÐ1ÄX(I,J)ÐÝ(A4ÊX(I,J))tP HÐ2ÄX(I,J)ÐÜ(A4ÊX(I,J))‘Z HÐ3ÄX(I,J)Ðß(A4ÊX(I,J))®d HÐ4ÄX(I,J)ÐÞ(A4ÊX(I,J))Ún HÐ5ÄX(I,J)Ðß(A4ÊX(I,J))ËC0S(A4ÊX(I,J))ôx HÐ6ÄX(I,J)ÐA4ÊX(I,J)‚ HÐ7ÄX( (6) AX":º" (7) 1/(AX)"Nt º" (8) (1-AX)/(1-BX)":º" (9) EXP(-AX*X)"nˆ º:º"WHAT IS YOUR CHOICE: ";…œ „A$:ã(A$)Ð0Ä«2460Ÿ° HÐæ(A$)É48:HÑ0Ä«2460®Ä HÏ9Ä«2460ÆÎ H(J)ÐH:º:HÐ0Ä«2600îì º"WHAT IS THE VALUE FOR A: ";:„A4:ºþ HÑÏ8Ä«2600$IÐ1Á9000:‚I6èJÐ1ÁL:—:º:º"CHOICE FOR DIMENSION ";JVüº"----------------------":ºy º"THE MENU OF FUNCTIONS IS:":º£$ º" (0) DEFAULT":º" (1) EXP(AX)"Í8 º" (2) LOG(AX)":º" (3) SIN(AX)"÷L º" (4) COS(AX)":º" (5) TAN(AX)"` º" 4ÐA4Ë3:B0ÐB0Ë3"+H!B1ÐB1Ë3:B2ÐB2Ë3[+\!DÐA0Ê(A2ÊA4ÉA3ÊA3)ÉA1Ê(A1ÊA4ÉA3ÊA2)ÈA2Ê(A1ÊA3ÉA2ÊA2)j+f!DÐ0Ä«8630£+p!AÐB0Ê(A2ÊA4ÉA3ÊA3)ÈB1Ê(A3ÊA2ÉA1ÊA4)ÈB2Ê(A1ÊA3ÉA2ÊA2)+z!AÐAËDæ+„!BÐB0Ê(A3ÊA2ÉA1ÊA4)ÈB1Ê(A0ÊA4ÉA2ÊA2)ÈB2Ê(A2ÊA1ÉA0ÊA3)ð+Ž!BÐBËD),˜!CÐB0Ê(A1ÊA3,*l A0Ð1:A1Ð0:A2Ð0:A3Ð0:A4Ð0:B0Ð0:B1Ð0:B2Ð0Y*¼ J3Ð1Á3:A1ÐA1ÈC1(J3):A2ÐA2ÈC1(J3)ÊC1(J3)x*Ú A3ÐA3ÈC1(J3)ÊC1(J3)ÊC1(J3)«*ä A4ÐA4ÈC1(J3)ÊC1(J3)ÊC1(J3)ÊC1(J3):B0ÐB0ÈD3(J3)Þ*ø B1ÐB1ÈD3(J3)ÊC1(J3):B2ÐB2ÈD3(J3)ÊC1(J3)ÊC1(J3)+!‚J3:A1ÐA1Ë3:A2ÐA2Ë3:A3ÐA3Ë3:AD(I)ÐA5ÉE1(I):°8190:M1ÐD2)JM1ÏM0ÄE1(I)ÐÉE1(I)Ë2M)^M1ÑM0ÄE1(I)Ð1.4ÊE1(I)`)rM1ÏM0ÄD(I)ÐA0q)|M1ÏM0Ä«7960{)†M0ÐM1‰)‚I:DÐ0Ä± )¸Ô((L1ÉD)ËD)ÑÐE5Ä±´)ÌL1ÐD:M0ÐD:«7770á)þDÐ0:JÐ1ÁM:YÐ0:KÐ1ÁN:YÐYÈD(K)ÊZ(J,K):‚K*: DÐDÈ(Y(J)ÉY)Ê(Y(J)ÉY):‚J:±JÉ1):‚J(`‚I:±5(’°7470:IÐ1ÁN7:E1(I)Ð1:‚I:°7730:±H(2L1Ð1EÈ30:M0ÐL1t(ZIÐ1ÁN:A5ÐD(I):°8190:C1(2)ÐD(I):D3(2)ÐD¢(ŒD(I)ÐA5É10ÊE1(I):°8190:C1(1)ÐD(I):D3(1)ÐDÖ(´D(I)ÐA5È10ÊE1(I):°8190:C1(3)ÐD(I):D3(3)ÐD:°8300ì(ð°8190:DÏM0Ä«7960û(M0ÐD:«8080)'žN1ÐN:°5930:°6050:MÐM43'øIÐ1ÁN:E1(I)ÐB(I,I):‚I?' E9Ð0Ä±p'4°5660:IÐ1ÁM:JÐ1ÁN:B(J,I)ÐZ(I,J):‚J:‚I:M2ÐN¥'zN2ÐM:°5450:N1ÐN:N2ÐM:°5930:IÐ1ÁM:B(I,1)ÐY(I):‚IÖ'ÊN1ÐM:N2Ð1:M2ÐM:°5450:IÐ1ÁN:D(I)ÐC(I,1):‚I:±(.IÐ1ÁM:Z(I,1)Ð1:JÐ2ÁL5È1:Z(I,J)ÐX(I,:KÐNÄ«6460?&öIÐKÈ1ÁN:JÐKÈ1Á2ÊN:B(I,J)ÐB(I,J)ÉB(I,K)ÊB(K,J)L&‚J:‚I:‚Kv&<IÐ1ÁN:JÐ1ÁN:B(I,J)ÐB(I,JÈN):‚J:‚I:±¦&^M4ÐM:N4ÐN:IÐ1ÁM:JÐ1ÁN:A(I,J)ÐZ(I,J):‚J:‚IÚ&Â°5570:N1ÐM:N2ÐN:N3Ð0:°5840:N1ÐN:N2ÐM:°5660:N1ÐMþ&:N2ÐN:°5750:M1ÐN:N1ÐM:M2ÐM:°5450,IÈN)Ð1:‚I %KÐ1ÁN:KÐNÄ«6290J%MÐK:IÐKÈ1ÁN:Ô(B(I,K))ÏÔ(B(M,K))ÄMÐI\%B‚I:MÐKÄ«6290Œ%VJÐKÁ2ÊN:BÐB(K,J):B(K,J)ÐB(M,J):B(M,J)ÐB:‚J³%’JÐKÈ1Á2ÊN:B(K,J)ÐB(K,J)ËB(K,K):‚JÂ%°KÐ1Ä«6390ö%ºIÐ1ÁKÉ1:JÐKÈ1Á2ÊN:B(I,J)ÐB(I,J)ÉB(I,K)ÊB(K,J)&Ø‚J:‚I:±4$I1Ð1ÁN1:I2Ð1ÁN2:A(I1,I2)ÐB(I1,I2):‚I2:‚I1:±f$vI1Ð1ÁN1:I2Ð1ÁN2:B(I1,I2)ÐC(I1,I2):‚I2:‚I1:±˜$ÐI1Ð1ÁN1:I2Ð1ÁN2:C(I1,I2)ÐA(I1,I2):‚I2:‚I1:±Ê$*I1Ð1ÁN1:I2Ð1ÁN2:A(I1,I2)ÐC(I1,I2):‚I2:‚I1:±ø$¢IÐ1ÁN:JÐ1ÁN:B(I,JÈN)Ð0:B(I,J)ÐA(I,J):‚J %ÔB(I$#úAÑ1EÉ05ÄºÓ(10000Ê(1ÉAË2))Ë10000I#AÏÐ1EÉ05ÄºÓ(10000ÊÚ(1ÉA))Ë10000‚#º" WITH STANDARD ERROR ";Ó(10000ÊAËÚ(MÉN))Ë10000Š#º:±¯#JIÐ1ÁM1:JÐ1ÁN2:C(I,J)Ð0:KÐ1ÁN1Ú#rC(I,J)ÐC(I,J)ÈA(I,K)ÊB(K,J):‚K:‚J:‚I:±$ÂIÐ1ÁN:JÐ1ÁM:B(I,J)ÐA(J,I):‚J:‚IR ";""E1(I)Ñ0Äº"NOT AVAILABLE"<"(E1(I)ÏÐ0ÄºDÊÚ(E1(I))`"2º:‚I:º:º:º"THE SAMPLE INDEX OF""dº"CORRELATION IS ";:YÐ0:IÐ1ÁM:YÐYÈY1(I):‚IÃ"–YÐYËM:Y1Ð0:IÐ1ÁM:Y1ÐY1È(YÉY1(I))Ê(YÉY1(I)):‚Ið"ÈYÐY1Ë(MÉ1):AÐDÊDËY:AÏ1Äº"NOT AVAILABLE"ÿ"æAÏ1Ä«5400!’†A(M,M),B(M,2ÊM),C(M,M)$!œN6Ð1*!¡—Q!¦º:º:º"THE CALCULATED COEFFICIENTS"r!Äº"AND THE STANDARD ERROR OF"Ž!Îº"THE ESTIMATES ARE:":º¸!ì°6750:IÐ1ÁN:IÐ1Äº"CONSTANT = ";F(1)ç! IÏ1Äº"COEF. FOR VARIABLE ";IÉ1;" = ";F(I)"º"WITH STANDARD ERROÁÃÍÅ ×ÉÄÇÅÔÓ±¶±°¹¯²µ¯·¹ ÔÒÉÐ ÈÁ×ËÉÎÓ°™C(1,45)ÐÉ51:C(1,46)ÐÉ136:C(1,47)Ð43:C(1,48)Ð42:C(1,49)Ð39:C(1,50)Ð34:C(1,51)Ð27:C(1,52)Ð18:C(1,53)Ð7:C(1,54)ÐÉ6:C(1,55)ÐÉ21:C(1,56)Ð167:C(1,57)Ð162:C(1,58)Ð147:C(1,59)Ð122:C(1,60)Ð87:C(1,61)Ð42:C(1,62)ÐÉ13:C(1,63)ÐÉ78:C(1,64)Ð25ÃC(1,65)Ð24:C(1,66)Ð212:C(1,24)ÐÉ21:C(1,25)ÐÉ42ý•C(1,26)Ð329:C(1,27)Ð324:C(1,28)Ð309:C(1,29)Ð284:C(1,30)Ð249:C(1,31)Ð204:C(1,32)Ð149:C(1,33)Ð84:C(1,34)Ð9:C(1,35)ÐÉ76:C(1,36)ÐÉ171:C(1,37)Ð269:C(1,38)Ð264:C(1,39)Ð249:C(1,40)Ð224:C(1,41)Ð189:C(1,42)Ð144:C(1,43)Ð89:C(1,44)Ð24æ67:C(1,2)Ð4622ŽC(1,4)Ð422:C(1,5)Ð387:C(1,3)Ð447‘C(1,6)Ð322:C(1,7)Ð287:C(1,8)Ð222:C(1,9)Ð147:C(1,10)Ð62:C(1,11)ÐÉ33:C(1,12)ÐÉ138:C(1,13)ÐÉ253:C(1,14)Ð79:C(1,15)Ð78:C(1,16)Ð75:C(1,17)Ð70:C(1,18)Ð63:C(1,19)Ð54:C(1,20)Ð43:C(1,21)Ð30:C(1,22)Ð15:C(1,23)ÐÉ42:V(6,11)Ð7:V(0,1)Ð4292145:V(0,2)Ð2812095:V(0,3)Ð245157:V(0,4)Ð490314:V(0,5)Ð478686fŠV(0,6)Ð277134 V(0,7)Ð160446:V(0,8)Ð16731:V(0,9)Ð4719:V(0,10)Ð99:V(0,11)Ð3:KÐ1Á12:V(0,K)Ð12ÊV(0,K):‚K:KÐ1Á12:V(5,K)Ð27É2ÊK:V(3,13ÉK)ÐKÊ(KÈ1)Ê(2ÊKÈ1)Ë3:‚K:C(1,1)Ð4:V(4,2)Ð197340:V(4,3)Ð3634092:V(4,4)Ð260658:V(4,5)Ð23256:V(4,6)Ð334152:V(4,7)Ð24024†…V(4,8)Ð5148:V(4,9)Ð1188:V(4,10)Ð252:V(4,11)Ð12T‰V(6,1)Ð26910:V(6,2)Ð17710:V(6,3)Ð33649:V(6,4)Ð6783:V(6,5)Ð3876:V(6,6)Ð6188:V(6,7)Ð1001:V(6,8)Ð429:V(6,9)Ð462:V(6,10)Ð(1,2)Ð805:V(1,3)Ð3059:V(1,4)Ð2261:V(1,5)Ð323:V(1,6)Ð1105:V(1,7)Ð143:V(1,8)Ð429:V(1,9)Ð231:V(1,10)Ð21:V(1,11)Ð35:V(2,1)Ð30015ŒV(2,2)Ð6555S„V(2,3)Ð260015:V(2,4)Ð7429:V(2,5)Ð4199:V(2,6)Ð46189:V(2,7)Ð2381:V(2,8)Ð429:V(2,9)Ð429:V(2,10)Ð231:V(4,1)Ð1776060 tB(N1,N2)Ð7ÄEÐ6" uN1Ñ0ÄEÐ80 vN2Ï2ÄEÐ5> wN3Ñ3ÄEÐ1M xN3Ï25ÄEÐ2e yN3ÑE(B(N1,N2))ÄEÐ1t zN2ÏN1ÄEÐ3‚ {N2Ñ0ÄEÐ8˜ |Ó(N3Ë2)ÐN3Ë2ÄEÐ8§ }N3ÏN4ÄEÐ7µ ~N1Ï5ÄEÐ4» ±|€U(1)Ð1:U(2)Ð1:U(3)ÐÉ1:U(4)ÐÉ1:U(5)Ð1:U(6)Ð1:U(0)Ð1:V(1,1)Ð5135:VA):°246:°267:fMÐAÈ1ÁN4ÈAÈ1:°275:Y1(M)ÐD:‚M:°282:°286:ºømB(1,0)Ð5:B(1,1)Ð3:B(1,2)Ð7:B(2,0)Ð1:B(2,1)Ð3:B(2,2)Ð6:B(3,0)Ð1:B(3,1)Ð4:B(3,2)Ð6:B(4,0)Ð2:B(4,1)Ð4:B(4,2)Ð0:B(5,0)Ð2:B(5,1)Ð7:B(5,2)Ð0:E(1)Ð5:E(2)Ð7:E(3)Ð3:E(4)Ð5:E(5)Ð3:E(6)Ð5:E(0)Ð5:± sEÐ0K:º:°344BHº"THE STANDARD DEVIATION":º"BETWEEN THE SMOOTHED AND"uJº"UNSMOOTHED DATA SETS IS ";:ºD:º:°344:KÐ1ÁN4›OD(K)ÐÔ(Y1(K)):‚K:º:º:°293:º:º:º:€ÍXIÐN1:JÐN2:KÐ1ÁN4:Y1(K)Ð0:‚K:°109:°119:EÏ0Ä±Ö`°128aUÐU(B(I,J)):AÐ(N3É1)Ë2:VÐV(B(I,J),13É**"/ )º" ERROR CODE ";E:º:º"RESTART":º:«24k .º:º"INPUT DATA AS PROMPTED:":º:KÐ1ÁN4:ºK;À6);:„Y(K):‚K¦ 5º:º:KÐ1ÁN4:D(K)ÐÔ(Y(K)):‚K:°293:º"CALCULATING.....":ºÖ =°88:º:º:º"THE SMOOTHED DATA IS: ":º:KÐ1ÁN4ú CºK;À6);Y1(K):KË20ÐÓ(KË20)Ä°344E‚†Y(N4È52),Y1(N4È52):ºR º"HOW MANY POINTS ARE":º"TO BE AVERAGED OVER: ";:„N3:º º"WHAT IS THE DESIRED LEVEL":º"OF FIT (1,2,3,4,5): ";:„N1Ê º:º"WHAT IS THE DESIRED":º"DERIVATIVE (0,1,2): ";:„N2å #°109:°115:º:º:EÐ0Ä«46 (º"*** ERROR IN INPUT *š"—nº:º:º"DATA SMOOTHER":º:º:º"COPYRIGHT 1979 BY":º:º"DYNACOMP":º"P.O. BOX 162":º"WEBSTER, N.Y.":º:º:ºŠ ²TABLE 7 NOW IS TABLE 0ý†B(5,2),C(6,91),E(7):†U(6),V(6,12),W(12):º:º:º:º:º"INPUT THE NUMBER OF":º"DATA POINTS IN SET: ";:„N4:†D(N4È52) ";:„Y(I):º:«16709XIÐ1ÁN:X1(I)ÐX(I):Y1(I)ÐY(I):‚I:º:º_”º"SAVE DATA ON DISKETTE (Y/N): ";už„A$:A$Ð"N"Ä«2150ˆ²A$ÑÏ"Y"Ä«1950Ž¼º²Æº"WHAT IS THE FILE NAME: ";:„A$ÅÚã(A$)Ð0Ä«1990Ëäºïº"IS THE DISKETTE READY: ";:„B$ ºç(4);"OPEN"DO YOU WISH TO EDIT"5º"THE CURRENT DATA (Y/N): ";Kš„A$:A$Ð"N"Ä«1880^®A$ÑÏ"Y"Ä«1690z¸º:º"WHICH DATA PAIR: ";ŒÌ„I:IÏNÄ«1740›àIÑ1Ä«1740¸êº:º:º"X(";I;") = ";X(I);Õþº" CHANGE TO: ";:„X(I):ºîº"Y(";I;") = ";Y(I);&º" CHANGE TO:0‚NÐNÉ1:«13006–IÐAÁNÉ1:X(I)ÐX(IÈ1):Y(I)ÐY(IÈ1)_´X1(I)ÐX(I):Y1(I)ÐY(I):‚I:NÐNÉ1:«1300‚æº:º"ENTER DATA AS PROMPTED:":º£IÐ1ÁN:º"X(";I;") = ";:„X(I)²"X1(I)ÐX(I)Ù,º" Y(";I;") = ";:„Y(I)ñ@Y1(I)ÐY(I):‚I:«4160ùrº:º†º"9);"------";À24);"------":º<ìIÐ1ÁN:ºI;À9);X(I);À24);Y(I)TÓ(IË14)ÐIË14Ä°8230[‚IaºŒº"DO YOU WISH TO DELETE DATA (Y/N): ";¢(„A$:A$Ð"N"Ä«1650µ<A$ÑÏ"Y"Ä«1320ÑFº:º"WHICH DATA PAIR: ";ãZ„A:AÏNÄ«1370ònAÑ1Ä«1370xAÑNÄ«143 YOU WISH TO ADD: ";+„N7:N7ÏN5ÉNÄ«1010;$N7Ñ1Ä«1010c.º:IÐNÈ1ÁNÈN7:º"X(";I;") = ";:„X(I)ŠVº" Y(";I;") = ";:„Y(I)®jX1(I)ÐX(I):Y1(I)ÐY(I):‚I:NÐNÈN7Ðœº:º:º"CURRENT DATA FILE:":º:ºóÎº" I";À9);" X(I)";À24);" Y(I)"Øº"---";À$:A$Ð"N"Ä«1180!ŽA$ÑÏ"Y"Ä«8903˜N5ÉNÏ0Ä«1000[¢º:º"INSUFFICIENT ARRAY SPACE LEFT."Š¶º"DO YOU WISH TO RESTART PROGRAM (Y/N): ";œÀ„A$:A$Ð"Y"Ä€®ÊA$ÑÏ"N"Ä«960¸Þ«1180¾èºìòº"YOU MAY ADD UP TO ";N5ÉN;" DATA PAIRS."üº:º"HOW MANY DOOUGH ARRAY SPACE HAS BEEN"C äº"ALLOCATED. RESTART PROGRAM.":º:º:€N IÐ1ÁNX „X(I)j X1(I)ÐX(I):‚Iu *IÐ1ÁN +„Y(I)‘ ,Y1(I)ÐY(I):‚I¦ -ºç(4);"CLOSE";A$Î \º"NUMBER OF DATA PAIRS FOUND: ";N:ºù pº"DO YOU WISH TO ADD TO DATA (Y/N): ";z„A&„A$:A$Ð"N"Ä«1510&:A$ÑÏ"Y"Ä«550,DºPNº"WHAT IS THE FILE NAME: ";:„A$bbã(A$)Ð0Ä«590ˆ€º:º"IS THE DISKETTE READY: ";:„B$œ¨ºç(4);"OPEN";A$°©ºç(4);"READ";A$·ª„NÇ«NÑÐN5Ä«780Ü¬ºç(4);"CLOSE";A$ó¼º:º"** ERROR **":º Úº"NOT EN0)(š†X1(N),Y1(N),N(N),A1(N),B1(N):º:º2›†G(0)[¸º"WILL YOU BE REPEATEDLY REQUESTING"‡Âº"COEFFICIENT ERROR ESTIMATES (Y/N): ";œÌ„A$:A$Ð"N"Ä«510®àA$ÑÏ"Y"Ä«460Èê†A(N,N),B(N,2ÊN):N6Ð1ÖþNÐNÉ2:º:ºþº"LOAD DATA FROM DISKETTE (Y/N): "; DYNACOMP"+ º" 6 RIPPINGALE RD."O ªº" PITTSFORD, NEW YORK":ºn ¾º" (716) 586-7579":º æº:IÐ1Á5000:‚I¨ 6º:º:º"HOW MANY DATA POINTS ARE TO"Ò Tº"BE PROCESSED: ";:„N:N5ÐN:NÐNÈ2:N6Ð0†X(N),Y(N),V(N),C(N),D(N),C2(N),E(N),F(10 FITTING PACKAGE":º:ºÕ xƒ 205,127,10,34,22,64,197,1,248,55,237,120,193,0,0,201,197,1,248,55,58,127,56,58,64,56,230,4,32,16,10,230,8,40,8,237,120,230,127,254,10,40,233,193,183,201,33,227,3,34,22,64,195,25,26õ Œº" COPYRIGHT 1980 BY" –º" ;) UÐ21² U AFFECTS THE VERTICAL PLOT SCALE[² INCREASING U WILL COMPRESS THE PLOTa#—Š(IÐ1Á6:º:‚I:º" REGRESSION I"–2JÐ0Á54<‡Y¨F¹MÈJ,YÇPº" ------------":ºÔZMDÐMDÈ16÷dº" A ONE-DIMENSIONAL CURVE" nº" „X(I)¤º$®º"Y(";I;") = ";Y(I);9¸º" CHANGE TO: ";CÂ„Y(I)IÌºSÖ«1560cà² SAVE DATAnêIÐ1ÁN}ôX1(I)ÐX(I)ŒþY1(I)ÐY(I)“‚I™—ŸºÅ&º"SAVE DATA ON DISKETTE (Y/N): ";Í0„A$ß:A$Ð"N"Ä«2040òDA$ÑÏ"Y"Ä«1840øI—þNº‚I ð«2910ºº4º"DO YOU WISH TO EDIT"U"º"THE CURRENT DATA (Y/N): ";],„A$o6A$Ð"N"Ä«1770‚@A$ÑÏ"Y"Ä«1580ˆJº¢Tº"WHICH DATA PAIR: ";©^„I¸hIÏNÄ«1630ÇrIÑ1Ä«1630Í|ºæ†º"X(";I;") = ";X(I);ûº" CHANGE TO: ";šÐAÁNÉ12X(I)ÐX(IÈ1)&<Y(I)ÐY(IÈ1)5FX1(I)ÐX(I)DPY1(I)ÐY(I)KZ‚IUdNÐNÉ1_n«1190ex—„‚º"ENTER DATA AS PROMPTED:"ŠŒº•–IÐ1ÁN© º"X(";I;") = ";³ª„X(I)Â´X1(I)ÐX(I)ã¾º" Y(";I;") = ";íÈ„Y(I)üÒY1(I)ÐY(I)Ü;Y(I)’Ó(IË15)ÐIË15Ä°4320$œ‚I*¦ºU°º"DO YOU WISH TO DELETE DATA (Y/N): ";]º„A$oÄA$Ð"N"Ä«1540‚ÎA$ÑÏ"Y"Ä«1210ˆØº¢âº"WHICH DATA PAIR: ";©ì„A¸öAÏNÄ«1260ÇAÑ1Ä«1260Ö AÑNÄ«1320àNÐNÉ1ïAÐNÄ«1380ù«1190(IX(I)%èº" Y(";I;") = ";/ò„Y(I)>üX1(I)ÐX(I)MY1(I)ÐY(I)T‚I_NÐNÈN7e.—k8º…Bº"CURRENT DATA FILE:"‹Lº‘Vº´`º" I";À9);" X(I)";À24);" Y(I)"Újº"---";À9);"------";À24);"------"àtºë~IÐ1ÁNˆºI;À9);X(I);À24)ART PROGRAM (Y/N): ";R„A$+\A$Ð"Y"Ä€=fA$ÑÏ"N"Ä«850Gp«1070Mzº{„º"YOU MAY ADD UP TO ";N5ÉN;" DATA PAIRS."Žº§˜º"HOW MANY DO YOU WISH TO ADD: ";¯¢„N7Á¬N7ÏN5ÉNÄ«900Ð¶N7Ñ1Ä«900ÖÀºæÊIÐNÈ1ÁNÈN7úÔº"X(";I;") = ";Þ„Y(I):‚I ²ºD$;"CLOSE";A$ Ú—& äºL îº"NUMBER OF DATA PAIRS FOUND: ";NR øº} º"DO YOU WISH TO ADD TO DATA (Y/N): ";… „A$— A$Ð"N"Ä«1070© A$ÑÏ"Y"Ä«780º *N5ÉNÏ0Ä«890À 4ºæ >º"INSUFFICIENT ARRAY SPACE LEFT."Hº"DO YOU WISH TO RESTPEN";A$1ºD$;"READ";A$ :„N0DNÑÐN5Ä«6706NºIXº"** ERROR **"Obºvlº"NOT ENOUGH ARRAY SPACE HAS BEEN"™vº"ALLOCATED. RESTART PROGRAM."Ÿ€º²ºD$;"CLOSE";A$¸Šº¾”€ÉžIÐ1ÁNè¨IÐ1ÁN:„X(I):X1(I)ÐX(I):‚I ©IÐ1ÁN:„Y(I):Y1(I)ÐN),Y1(N),A1(N),B1(N),A(NÈ1)%‘†G(1)+šº1¤ºY®º"LOAD DATA FROM DISKETTE (Y/N): ";a¸„A$sÂA$Ð"N"Ä«1400…ÌA$ÑÏ"Y"Ä«440‹Ñ—‘Öº±àº"WHAT IS THE FILE NAME: ";¹ê„A$Ëôã(A$)Ð0Ä«480Ñþºíº"IS DISKETTE READY: ";õ&„B$0ºD$;"O)* º"DO YOU WISH INSTRUCTIONS (Y/N): ";2 „A$D A$Ð"Y"Ä°3090U "A$Ð"Y"Ä«320g ,A$ÑÏ"N"Ä«270m 6—s @º– Jº"HOW MANY DATA POINTS ARE TO" Tº"BE PROCESSED: ";´ ^„N½ rN5ÐNÆ |N6Ð0÷ ††X(N),Y(NÈ1),C(N),D(N),C2(N),E(N),F(N),X9(N)†X1(RAMETER FITTING PACKAGE" xº$ ‚ºG Œº" COPYRIGHT 1980 BY"a –º" DYNACOMP"ƒ º" 6 RIPPINGALE RD."¨ ªº" PITTSFORD, NEW YORK"® ´ºÎ ¾º" (716) 586-7579"Ô ÈºÚ æºè ðIÐ1Á1000ï ú‚I ÿD$Ðç(13)Èç(4 # UÐ12² U AFFECTS THE VERTICAL PLOT SCALE.]² INCREASING U WILL COMPRESS THE PLOT.h(IÐ1Á6n2—u<‚I›Fº" REGRESSION II (PARAFIT)"ÁPº" -----------------------"ÇZºñdº" A ONE DIMENSIONAL LEAST SQUARES" nº" PA f—:º:º:º"YOU MAY CHOOSE ONE OF SEVERAL"NŽº"FITTING FUNCTIONS. THE DEFAULT"s˜º"IS EITHER THE VARIABLE ITSELF"™¢º"OR THE USER FUNCTIONS INSERTED"·¬º"STARTING AT LINE 4800."Û¶º"EACH DIMENSION CAN BE FITTED"Àº"WITH A DIFFERENT FUNCTION.":º:)ÐY(I):‚I:º]—<žº:º"DO YOU WISH TO SAVE DATA (Y/N): ";R²„A$:A$Ð"N"Ä«2150eÆA$ÑÏ"Y"Ä«1970‡äº:º"WHAT IS THE FILE NAME: ";žø„A$:ã(A$)Ð0Ä«2040àºD9$;"OPEN"ÈA$:ºD9$;"WRITE";A$:ºM:ºL:IÐ1ÁM:JÐ1ÁL:ºX(I,J):‚JýHºY(I):‚I:ºD9$;"CLOSE"ÈA$( TO DELETE DATA (Y/N): ";/¤„A$:A$Ð"N"Ä«1880B¸A$ÑÏ"Y"Ä«1700]Âº:º"WHICH DATA SET: ";oÖ„I:IÑ1Ä«1750~êIÏMÄ«1750ôIÐMÄ«1850ÀþJÐIÈ1ÁM:KÐ1ÁL:X(JÉ1,K)ÐX(J,K):‚K:Y(JÉ1)ÐY(J)Ç0‚J×:MÐMÉ1:«1680XIÐ1ÁM:JÐ1ÁL:X1(I,J)ÐX(I,J):‚J:Y1(ITA (Y/N): ";"Ò„A$:A$Ð"N"Ä«16805æA$ÑÏ"Y"Ä«1490Rðº:º"WHICH DATA GROUP: ";d„I:IÏMÄ«1540Žº:JÐ1ÁL:º"X(";I;",";J;") = ";X(I,J);°6º" CHANGE TO: ";:„X(I,J):‚J:ºâ^º"Y(";I;") = ";Y(I);:º" CHANGE TO: ";:„Y(I):ºì†«1470º:º"DO YOU WISHÉM;" CAN BE ADDED.":º:«11803âI1ÐMÈ1:MÐMÈA4:«1300>º:I1Ð1k—:º:º"ENTER DATA AS PROMPTED:":º:IÐI1ÁM—<JÐ1ÁL:º"X(";I;",";J;") = ";:„X(I,J):‚JÆdº" Y(";I;") = ";:„Y(I):‚IÔŒº:º:«3850Üªº:º¾º"DO YOU WISH TO EDIT":º"THE DAF DATA POINTS "@8º" FOUND WAS: ";M:º"THE NUMBER OF DATA "eLº" DIMENSIONS IS: ";L:L5ÐL:º’jº"DO YOU WISH TO ADD DATA (Y/N): ";:I1Ð1¨~„A$:A$Ð"N"Ä«1420»’A$ÑÏ"Y"Ä«1150çœº"HOW MANY MORE: ";:„A4:A4ÑÐM5ÉMÄ«1250ºº:º"ERROR- ONLY ";M5 **":º# ¢ºM;" POINTS WERE FOUND,"G ¬º" ";M5;" WERE DIMENSIONED."n ¶ºL5;" WAS GIVEN AS THE NUMBER OF "— Àº" DIMENSIONS, BUT ";L;" FOUND."¯ Êº"RESTART PROGRAM."å ÞIÐ1ÁM:JÐ1ÁL:„X(I,J):‚J:„Y(I):‚I:ºD9$;"CLOSE"ÈA$í $—:º.º"THE NUMBER ODATA"º"FROM DISK (Y/N): ";5„A$:A$Ð"N"Ä«1280G A$ÑÏ"Y"Ä«780p*º:º"WHAT IS THE NAME OF THE FILE: ";†>„A$:ã(A$)Ð0Ä«830¨RºD9$;"OPEN";A$:ºD9$;"READ";A$¾S„M:„L:MÑÐM5Ä«890ÇW«900×zLÑÐL5Ä«990 „ºD9$;"CLOSE"ÈA$:—:º:º"** FATAL ERRORº" OR (M)ATRIX INVERSION: ";6”„A$:ã(A$)Ð0Ä«660G¨A$Ð"I"Ä«710Y²A$ÑÏ"M"Ä«660m¼E9Ð1:N6Ð0Ä«600–Æ†X(M,L),Y(M),Z(M,N),D(M),D1(N),Y1(M)ÖÐ†E(M),C1(M),X1(M,L),F(N),E1(N),H(N),D2(N),M2(N),E2(N),Y2(M)ÜÕ—ÚN7ÐN:º:º:º"DO YOU WISH TO LOAD 10 º:E6Ð1Ä«630 —:º< º"WILL YOU BE REQUESTING AN"Z &º"ERROR ESTIMATE FOR THE"‚ 0º"CALCULATED COEFFICIENTS (Y/N): ";— :„A$:A$Ð"N"Ä«630© NA$ÑÏ"Y"Ä«570Å X†A(M,M),B(M,2ÊM),C(M,M)Ù bN6Ð1:E9Ð1Ä«710û vº:º"CALCULATE BY (I)TERATION" ŠOW MANY DATA POINTS ARE TO": @º" BE PROCESSED: ";:„Mc ^M5ÐM:º"HOW MANY DATA DIMENSIONS ARE"† rº"THERE TO BE ENTERED: ";:N6Ð0œ †„A$:ã(A$)Ð0Ä«390µ šLÐæ(A$)É48:LÑ1Ä«390Ø ®L5ÐL:E9Ð0:º:NÐLÈ1:NÑÐMÉ1Ä«520 àº:º"THERE IS NOT ENOUGH DATA.":º:«3ï$D9$Ðç(13)Èç(4)—* IÐ1Á6:º:‚IU<º" * MULTIPLE LINEAR REGRESSION *"]Pº:ºxº" COPYRIGHT 1980 BY"˜‚º" DYNACOMP"¹Œº" 6 RIPPINGALE RD."ß–º" PITTSFORD, NEW YORK":ºðÜIÐ1Á5000:‚Iø"—:º 6º"H j;CONVERTING... d;MISSING FIN j;MISSING NEXT? d;MISSING ELSE d;MISSING CASE/SELECTîZ:8°…|h…“h…”æ“Ðæ”ŠH˜H ±“ð ½;ÈÐö(¢½;ð ½;èÐõ :ÿ :ÿ :ÿ w5h¨hª¥|` y5 ü)?Lðý O5©Z: ˆ:Z:ð ª:Lc5 Ø5Z:Ðò ; 8Z:ð ÷;Lc5 d; t7ÉÐ ´9 Î9¦à ü ü ü üh` pü püLpü d;UNDEFINED "DO" d;STAK EMPTY d;PGM TOO BIG ?C RO Q¢½R:)? ðýÊÐõ ý) „$H œüh`PGM SAVED (Y/N)¿¢½w:ð y5èÐõ ý)H y5 w5hÉYðîZ:` j; d;UNMATCHED FIN OR ELSE j;MISSING FOR? d;DUPLICATE "TO" j;UNREFERENCED "TO" æ!ÒâÎ ê L)2 ‰ö‰Óüé`€Já?›©ª…0 Ô ýÉÓf3 ê ©ÿ…/Ð ‰ö)ÔIQøJQú!:BQÓû|$q*q ¢ $3 ýÉƒÐLAÉœ ‰ö|a9éa:¶ À ‰ö*º©4 f ‰ö$9¥ •þLA¥ ‹þLA ‰öIùÓAÓYô*l;8 ª è ‰ö3ø2)81 5 ‰ö(9£8 ¥MÖJ78%9<)q(q öLA ‰öè<2°qàq"lÍþ ê ‰ö):(;ë ª ‰ö)8*9ø(¹ø è ‰öºÞªëµ;€©ª…0 Í ‰ö&·; Í LAl; ª ‰ö)8l;ë ª ‰ö)¸:l; ª ‰ö(Ùª1*2ò 5LA ê Í ‰öëðó ‰ö€)4×$(Û J$1IÓÓëÀÉƒÐ×LÑüýþÿÕª–ÿÿªªªªÿÿÞªíÿÿÿÿÿÿÿÿÕªô ‰öâ'èd +5%7LA+×X6õ ‰öl;8íëøLl8ì(Û¥ ª ‰ö)×â` Žý ê Í ‰ö+ëØë)×çðë ª H 5ðø ‰öâ':¢Ö ?7ù ±‘¥ÐÆÆ¤¦ÐˆÊ†„äÐâÄÐÞ ‰ö7éAYòû` ê ‰ö):(;ë% ª ŒLu ‰ö<)q'q*qq§¹ ,þ ‰ö7`y?ýþÏÇÒÁÍ® ÅÎÔÅÒ ÇÒÅÅÔÉÎÇ ÐÒÏÇÒÁÍ ÎÁÍÅº×ÈÉÃÈ ÓÌÏÔ¿ ×ÈÉÃÈ ÄÒÉÖÅ¿ ÐÌÁÃÅ ÄÉÓË ÉÎ ÄÒÉÖÅ ÈÉÔ ÁÎÙ ËÅÙ ÔÏ ÂÅÇÉÎÕÐÄÁÔÅ ÁÎÏÔÈÅÒ ÄÉÓË¿ ¨Ù¯Î© ÄÉÓË ×ÒÉÔÅ ÐÒÏÔÅÃÔÅÄÄÉÓË É¯Ï ÅÒÒÏÒ–—š›žŸ¦§«¬®¯²³´µ¶·¹º»¼½¾¿ËÍÎÏÓÖ×ÙÚÛÜÝÞßåæçéêëìíîïòóôõö÷ùúûÀû%<ˆÐî(Å=Ð¾°½ š„<¼ŒÀûY¤<ˆ™Ðî„<¼ŒÀûY¤<‘&ÈÐï¼ŒÀûYÐ`¨¢¹J>ÌJ>™…<±& <‘&Èèà3ÐäÆ*ÐÞÌÐ`L-ÿ` xs`ïØ ÕÎÉÖÅÒÓÁÌ ÕÐÄÁÔÅ ³®² Ê® Ã® ÔÈÏÍÐÓÏÎ ±¹¸° ÅÎÔÅÒÉÎÇ ÏÎÌÙ ¼ÒÅÔÕÒÎ¾ ÆÏÒ ÁÎÙ ÒÅÓÐÏÎÓÅ ×ÉÌÌ ÔÅÒÍÉÎÁÔÅ ÔÈÅ ÐÒllÉ Ð®kðñÉ Ú©lîkÐÐ`hhtÉÐ 1 ˜ð 1 ¯Lh…h… ±…È±…©e¨¥iH˜H ±…$È±…% Bü ±ð íýÈÐö`¢½èÐ÷L «˜…sJ>s™sèàVì¢˜Ðç½s)?sèàVó©…© …©¢VÐ½s]r¨¹À ‘æÐæÊÐés]s¨¹À ‘æÐæ½sèÐé B2Ê(A0ÊA2ÉA1ÊA1)&-¢!CÐCËD:CÑÏ0Ä«86503-¶!D(I)Ð0:±G-Ê!D(I)ÐÉBË(2ÊC):±v-ò!—:º:º"INPUT THE VARIABLES:":YÐD(1):IÐ1ÁL5ª-"º"VARIABLE ";I;": ";:„D1(I):YÐYÈD(IÈ1)ÊD1(I):‚IÔ-B"º:º"CALCULATED INTERPOLATION: Y=";Y:±DÉA2ÊA2)ÈB1Ê(A1ÊA2ÉA0ÊA3)ÈB2Ê(A0ÊA2ÉA1ÊA1)?,¢!CÐCËD:CÑÏ0Ä«8650L,¶!D(I)Ð0:±`,Ê!D(I)ÐÉBË(2ÊC):±,ò!—:º:º"INPUT THE VARIABLES:":YÐD(1):IÐ1ÁL5Ã,"º"VARIABLE ";I;": ";:„D1(I):YÐYÈD(IÈ1)ÊD1(I):‚Ií,B"º:º"CALCULATED INTERPOLATION: Y=";Y:±D(A1ÊA2ÉA0ÊA3)È F8ÉCð M;©C (8©FL(8àÐ ´9 Î9° #:L@9¦àð 8°êíLÂ9àÐh¥ð : ,; : F8ð : Â8 :LT9 (8…Ÿ… ´9 8 8 Î9¦àðð w6 ê7 ‘6 ä: e8 Î9° ö: w5L¬9¦àð 8°çê Â9©FL(8¦†¤¦ž†¥ n8Le8 8¦¥†ž¦¤†` t7É È±mðÉ"ð Ñðó 8°å`±ðÉ"Ðò8 ±m…zÈ±m…{` ±k…zÈ±k…{`H¥t…¡¥s… ÐÆ¡Æ ˜‘ …Ÿ…•…Le8H¥ å¯¥¡å°°hLC:¥ ÐÆ¡Æ h‘ `¥¡Åt¥ Ås 5:©` ± Hæ Ðæ¡h`¥g…m¥h…n`¤o„‘¥…Ž¥m…¥n…`¥Ž…¥…n¥…m¤‘„o` ±mHÈ±m…nh…m8 ±mÐÈ±mÐ`¦ð5àð1àð-àðàÐ& F8ÉCðùÉFÐàðL;ÉEÐàÐ©FL(8L=;L»:`àÐ ©E (8©FL(8à ðàÐ ©F (8©CL(8àðà Ð,À [:ÉCðÉQÐõ`H©Å$…$hLy5FIN UNLESS WHEN ELSE ‚ WHILE UNTIL SELECT CASE (OTHERWISE) ( "TO "DO „o¢ÿ©…©…r…ž¤oˆæÈèæž½*7ð&É ð ÑmðærL‰7¥rÐÛ¥ÉÐÈ±mðÍ~5ðÍ€5Ðñ©……r…žæž È±mðÍA7ÐæÍC7ÐÆÈ±mðÉ,ðõÉ:ÐóLÄ7¥`¤žÀ ¢ÿè½*7ðÄÐ y5)É ÐÈLô7` F8ð¢ Â8L6Lc5¥ðÉðÉðÉðÉðæŸL=6ÆŸ „Ÿ¦• ¢†•† Ô:`¥Ÿe•¦†•ªð0©: 7© àÐ¤ÀðÀÐ©: 7ÊÐã` ±mªÈ±m Í3¥$É°© y5L‚6`¤žÀ° ÈÈ„¨æ¨¤¨±mÐLw5*°j 7L6Jª¥hÉÐ©Ð…”Ð©…”©Ð…“ ±“Ð© 7L6àÐ 7±“*Êæ“Ðæ”ÐÝ¥ÉðÉð` w5¢ ©- y5ÊÐø w5Lw5,À¥vÅlÐ¥uÅkÐe¢…k¥le£…l¥ue¢ˆ‘pÈ¥ve£‘p¥u…p¥v…qLä4¥¯e¢…¯…i¥°e£…°…j`Ž‹5ŒŒ55¢?µkŽ5Êø`¢?½Ž5•kÊø5¬Œ5®‹5`© €l6«°Ä²¥€³ƒ±ÆÐ¼..................................................................... O5©ÿ…œ 8 t7$œ ë6 w6 K6 ê7 ‘6 «8 6 7ÉQð 8°Ø¥ð ,;…ÅƒÐ¥„Å‚ðÆ„©ÿÅ„ÐÆ…Æ€Å€ÐÆL4`H©…¢©…£ ?4h¤o‘m`¤oÀ°L-ÿØ¥meo…‚¥ni…ƒ¥¯…„e¢…€¥°……e£… Û4æoL4©ÿ…¢…£ Ì48¥€å¢…‚¥å£…ƒ¥¯…„¥°…… Û4 ä3¤oðÆo`¤oðÀÐ „oð°L-ÿ©‘mæo Ì48 ¥€ñm…¢È¥ñm…£ x4L“4Ø¥meo…€¥ni…`Ø¥m…p¥n…q ±p…uÈ±p…vÐ¥uðH¥vÅÐ¥ÅuÐe¢…¥e£…RE= SIZE AFTER= ¢½ª ±gÐÈ±gðà¯ðàLðà¼Ð Ó5LE3àCÐ È; ±¨Ðú` ±Lø' dè©…|…}¢µwð½W3e|…|½R3e}…}ÖwÐíÊæ¥|…z¥}…{†`¥z…|¥{…}¢©•wÊù¢8¥|ýW3…~¥}ýR3…¥…}¥~…|öwÐãÊà ¢µwÐˆÊÐø¢†`†z…{ ‰3ˆ¹w ° á3ˆõ`l6 ±‚‘€¥ƒÅ…Ð¥‚Å„ð6æ‚Ðæƒæ€ÐæLæ3 ±„‘€¥SK)! OR! ]CALL -155 (TAPE)! *3010.3FFFR 3010G!2. ]LOAD/ENTER STRUCTURED-BASIC PGM!3. ](TURN ON PRINTER)!4. ]&LIST!5. ]SAVE STRUCTURED-BASIC PGM!6. ]&CONVERT!7. ]SAVE (WITH NEW NAME)!8. ]&& (FOR OLD "&" CMD)!ÿ ÿSWL+010 LDAcc1 3@LÜ5SIZE BEFOtÅI'Ðœ¥HÅs–° ÆFæFÐæG±FÉÿðÉ!Ð© ^1L1`¥L…s¥M…t¢½3•/Êøh¨hª¥hÉðh(L<h(Là €l6!<<< APPLESOFT PLUS >>>!STRUCTURED BASIC PRE-COMPILER!VERSION 1.3 -- SERIAL# 00099!!COPYRIGHT 1979 BY SENSIBLE SOFTWARE!::: ALL RIGHTS RESERVED :::!!1. ]BRUN APLUS (DI0ðHŠH˜H¢µ/3Êø ©‘gˆù¥h…j…°©…i…¯©ô^©_õøöù÷ú Xüú2…Fû2…G 1¥síþ2…J¥tíÿ2…K©Lõü2eJ…H…Löý2eK…I…M÷ü2…<ý2…=þ2…>ÿ2…?¥H…B¥I…C ,þ¥H…:¥I…; ±H Žø¥/ÉÐ6 ±HÍý2-Ðˆ±HÍü2# ÿ2ÑHÐˆþ2ÑH ±HeJ‘HÈ±HeK‘H¥He/…HæIæHÐæI¥ A D$Ðç(4)#ºD$;"NOMON C,I,O")—@(ºD$;"RUN INIT$$"ƒÐ¥„Å‚ðÆ„©ÿÅ„ÐÆ…Æ€Å€ÐÆL÷8`Ø¥m…p¥n…q ±p…uÈ±p…vÐ¥uðH¥vÅÐ¥ÅuÐe¢…¥e£…¥vÅlÐ¥uÅkÐe¢…k¥le£…l¥ue¢ˆ‘pÈ¥ve£‘p¥u…p¥v…qL&9¥¯e¢…¯…i¥°e£…°…j`¥g…m¥h…n „o©…r`¤o„‘¥m…¥n…¥r…›©…r`¥›…r¥…n¥…m¤‘„o`æo¤o±mðÍ\:ðÍa:ð8` „r±mHÈ±m…nh…m „o ±mÐÓÈ±mÐÎ`É0 ¢µwÐˆÊÐø¢†`†z…{ Ë7ˆ¹w ° #8ˆõ`l6©ÿ…¢…£ ƒ88¥€å¢…‚¥å£…ƒ¥¯…„¥°…… 9 Ô8¤oðÆo`¤oðÀÐ „oð°L-ÿ©‘mæo ƒ88 ¥€ñm…¢È¥ñm…£ /8LJ8Ø¥meo…€¥ni…`H©…¢©…£ ¤8h¤o‘m`¤oÀ°L-ÿØ¥meo…‚¥ni…ƒ¥¯…„e¢…€¥°……e£… 9æoLõ8 ±‚‘€¥ƒÅ…Ð¥‚Å„ð6æ‚Ðæƒæ€ÐæLÖ8 ±„‘€¥…Å4€>"TO SEND MESSAGE">Hº"SEND-MESSAGE-ROUTINE OUTPUT"FRFINTIN FIN ¼: ÁCASE$ Æ(AÑ10)3 Ëº"SMALL A"; ÐFINF Õ(AÏ20)¤ Úº"A>20 -- THIS IS A VERY LONG SENTENCE TO DEMONSTRATE WRAP-AROUND INDENTATION ON SCREEN."¬ ßFIN¼ ä(OTHERWISE)Ó éº"10 <= A <= 20! "Û îFINã óFINé :ÿ *"DO SEND MESSAGE"WHILE(IÑ4) ®IÐIÈ1 ¸ºI,$ ÂFIN* Ìº0 ô:: þº:IÐ0I UNTIL(IÏ4)S IÐIÈ1[ ºI,c &FINi 0ºo X: ]SELECT(NAME$)Ž b("FOOL")› gº"FOOL!"£ lFIN® q("OK")À vº"GOOD SHOW!"È {FINØ €(OTHERWISE)ú …º"OTHER CATEGORIES OF NAME$!" ŠFGd:nWHEN(1Ñ2) xº"1<2"(‚FIN1ŒELSE=–º"1=>2"E FINKÈ:[ÍUNLESS(AÑ1)lÒº"A NOT < 1"t×FINzÜ:‘á(2Ñ3)Äº"2<3":«240æº"2=>3"£ë:®ð(9Ï4)¹õº"9>4"ÁúFINÇ,:Í6ºÛ/IÐ1Á10Ç2ãJºI,ëT‚:ºñ:ûšº:IÐ0 ¤n8 8 ó9L8 ý> F8…oÆo©…£©…¢ ?4€5¤o‘m„5È‘mL8 F8…— F8…k F8…l F8…¦ F8…Œ`¥Œ (8¥¦ (8¥l (8¥k (8¥—L(8.DL 0077 5-BYTE UNPACKD DEC#kDEC3 .DL 0077 3-BYTE PACKED DEC#lHEX2 .DL 007A 2-BYTE HEX#mCBUF .DL 007C 3-BYTE H/D CONV BUFnXBUF .Dc007F Xß„o„Œ «> ÿ9~5 oÉEÐ ð= s> º=©GL(8ÉRÐLw>É(Ð ð= s> F8ÉCð •>L]>Lõ>`‡5Ð©:Ð 5Ð‚5Ð~5 ‘mÈ±mð©:‘mÈÐõ` ó9 ý> F8…oÆo~5 oÉ Ð©C (8 S© ±=©CL(8ÉÐ©C (8 C© ±=©CL(8É ÐD V? º=©(L(8ÉÐ w>©RL(8ÉÐ©FL(8`®‚5 …¢ŠH„o¥¢ð ›L•>ÉWÐ ÉUÐ L^<ÉÐ n> 8°ÞLc5H „o s>hH ‰3„’È˜ ’<¤oh‘mÆ’¦’µw 0æo¤o‘m¦’Ðî`…¢©…£L?4…¢©ÿ…£Lu4ÉÐ „oˆ5 -4 º=©GL(8ÉÐ©û –=L²<ÉÐ©ý –=ˆ5‘m º= ±= (8©WL(8É Ð ±= (8©UL(8ÉÐ©þ –=ˆ5‘m º=©EL(8ÉÐL¥É¼ð É·ðÉ:`©€`L¾ÿÿªhÉÖðHŠLˆ•¢LÔ16Ö YOU (0=NOVICE, 9=EXPERT)"%¦ „SKILL;° SKILLÐÓ(10ÉSKILL)Xº SKILLÑ0ÎSKILLÏ9ÄSKILLÐ9oÄ SKILLÐ30Ê(SKILLÉ1)wÎ FIN†Ø "TO DELAY"—â DÐ1Á3000:‚DŸì FIN´ö "TO SKILL-DELAY"Æ DÐ1ÁSKILL:‚DÎ FIN0 ¢17:–6,B º"PRODUCED BY SENSIBLE SOFTWARE"4L ¢23aV º"COPYRIGHT 1979 -- ALL RIGHTS RESERVED"p` SKILLÐ1400j "DO DELAY"…t —°~ º"THE OBJECT OF BARRICADE IS TO FORCE"åˆ º"YOUR OPPONENT TO HIT A WALL BEFORE YOU":º"DO."í’ º:ºœ º"HOW GOOD ARE„RXÐ35:XRÐRXŽLYÐ20:YLÐLY/˜RYÐ20:YRÐRY?¢ RED:LX,LYO¬ BLU:RX,RY]¶DLÐ1:DRÐ3mÀKYBDÐÉ16384ÊSTROBEÐÉ16368ŠÔZEROÐ0™ÞPUSHEDÐ128¡èFINµò"TO INITIALIZE"ËüSLÐ0:SRÐ0:²SCORESÓ ‰:—ß ¢10:–14å Ÿö$ º"BARRICADE"ü. 8 äº"<== "SL"HITS";, îºÀ30)SR" HITS ==>"6 øº:º:º> FINW "TO DRAW GAME-BOARD"_ ˆ:—w WHTÐ15:REDÐ3:BLUÐ14€ * WHTŒ 4Ž0,39Å0™ >Ž0,39Å39¥ H0,39Å0² R0,39Å39Å \ºÀ5)"2"À35)"0"Ü fºÀ4)"Q+W"À34)"O+P"ð pºÀ5)"A"À35)"L";ÿ zLXÐ5:XLÐLX ANALYZE WIN":SLÐ9ÎSRÐ9Ä‰*D—:º""7N(LHÑÏ0)CXSLÐSLÈ1_bº"<==PLAYER HIT WALL,";glFINtv(RHÑÏ0)€€SRÐSRÈ1‹ŠºÀ22);¥”º"PLAYER HIT WALL==>"žFIN¼¨"DO DELAY"Ä²FINà¼"TO GIVE FINAL RESULTS"èÆº:ºóÐºÀ18); Úº"SCORE"J(1)TXRÐRXÈ1^FIN$h(2)0rYRÐRYÈ18|FINH†(OTHERWISE)TXRÐRXÉ1\šFINd¤FINl®FIN‚¸"TO MOVE-PLAYERS"‘ÂLHÐ×XL,YL) ÌRHÐ×XR,YR)ªÖLXÐXL´àLYÐYL½ê REDÈôLX,LYÒþRXÐXRÜRYÐYRå BLUðRX,RYø&FIN 0"TO PFIN Z(204) dDRÐ2# nFIN+ xFIN3 ‚FINN Œ"TO CALC-PLAYER-MOVES"] –SELECT(DL)e (0)q ªYLÐLYÉ1y ´FIN ¾(1) ÈXLÐLXÈ1• ÒFIN Ü(2)© æYLÐLYÈ1± ðFIN¹ ú(3)Å XLÐLXÉ1Í FINÕ FINä "SELECT(DR)ì ,(0)ø 6YRÐRYÉ1@FINESULTS" `€/ j"TO CHANGE-PLAYER-DIRECTION?"= tKÐâ(KYBD)K ~SELECT(K)U ˆ(178)^ ’DLÐ0f œFINp ¦(209)y °DLÐ3 ºFIN‹ Ä(215)” ÎDLÐ1œ ØFIN¦ â(193)¯ ìDLÐ2· öFINÁ (176)Ê DRÐ0Ò FINÜ (207)å (DRÐ3í 2FIN÷ <(208) FDRÐ1Ïè"DO INITIALIZE".òUNTIL(SLÐÏ10ÎSRÐÏ10)Gü"DO DRAW GAME-BOARD"^UNTIL(LHÑÏ0ÎRHÑÏ0)€"DO CHANGE-PLAYER-DIRECTION?"›"DO CALC-PLAYER-MOVES"±$"DO MOVE-PLAYERS"Æ."DO SKILL-DELAY"Î8FINãB"DO ANALYZE WIN"ëLFIN V"DO GIVE FINAL ROMMAND";'bÿ'YÐ53Äº"ILLEGAL QUANTITY";Vb(YÐ77Äº"SYSTEM ERROR--PLEASE REPORT";ER$:€kb (º" ERROR",ER$:«5}b<(PPÐ0:WWÏ40Ä±¤bC(º"PRESS SPACE-BAR TO CONTINUE";ER$¾bF(â(É16384)ÑÐ127«10310ÎbK(¹É16368,0:±E±æ¸Ðæ¹jL¥êÉ ðï8é08éÐ`€TA *BIAS+01P:`:CALC NEW BEGIN ª ±gÐÈ±gðà¯ðàVÐ ®:LA7àRÐ þ< ±¨Ðú` ±LûSIZE BEFORE= SIZE AFTER= ¢½N7 T:èàÐõL„7¢½[7 T:èàÐõ8¥¯ågª¥°åh 8LR:' dè©…|…}¢µwð½™7e|…|½”7e}…}ÖwÐíÊæ¥|…z¥}…{†`¥z…|¥{…}¢©•wÊù¢8¥|ý™7…~¥}ý”7…¥…}¥~…|öwÐãÊàSUE MSG1 LDA MSG1 STA *ZERO0 LDA MSG1+01@ STA *ZERO+01P JSR TALK` :p :CALC RELOCATION BIAS€ CLC (PAD HIME BY 1) LDA *HIME SBC END STA *BIAS LDA *HIME+010 SBC END +01@ S" FOR RAM A-SOFTP LDA 0F4` STA $085Ep LDA 03€ STA $085F::ENABLE OLD "&..." ON "&&..." LDA &PTR STA &PTR+060 LDA &PTR+01@ STA &PTR+07P LDA &PTR+02` STA &PTR+08p:€ JSR HOME: :ISF,X€ DEX BPL P::DELETE CURRENT ASOFT PGM LDY 0A0C LDA 00@ STA (ABEG),YP DEY` BPL Cp LDA *ABEG+01€ STA *AEND+01 STA *ATOP+01 LDA 04 STA *AEND STA *ATOP0:@:ENABLE "&@LÜ5SIZE BEFORE= SIZE AFTER= ¢½3 88èàÐõL93¢½3 88èàÐõ8¥¯ågª¥°åh Ä3L68' dè©…|…}¢µwð½N3e|…|½I3e}…}ÖwÐíÊæ¥|…z¥}…{†`¥z…|¥{…} TXA PHA TYA PHA0:@:SAVE WORK SPACE ON PAGE 0P LDX 1F`P LDA *ILEN,Xp STA MBUROGRAM! 2 - &V TO OPTIMIZE VARIABLES! 3 - &R TO OPTIMIZE STRUCTURE! 4 - SAVE OPTIMIZED PROGRAM!!!! CONSULT DOCUMENTATION FOR COMPLETE!! COMMAND AND USAGE DESCRIPTIONS.!!ÿ STA CSWL LDA CATP+01 STA CSWL+010 LDAcc1 7/…HæIæHÐæI¥tÅI'Ðœ¥HÅs–° ÆFæFÐæG±FÉÿðÉ!Ð© ^1L1`¥L…s¥M…t¢½3•/Êøh¨hª¥hÉðh(L<h(Là €l6! THE APPLESOFT OPTIMIZER! =======================!!! INSTRUCTION SUMMARY! -------------------!!! 1 - LOAD APPLESOFT P16368,0:±I†HŠH˜H¢µ/3Êø ©‘gˆù¥h…j…°©…i…¯©ô^©_õûöü÷ý Xüú2…Fû2…G 1¥síþ2…J¥tíÿ2…K©Lõü2eJ…H…Löý2eK…I…M÷ü2…<ý2…=þ2…>ÿ2…?¥H…B¥I…C ,þ¥H…:¥I…; ±H Žø¥/ÉÐ6 ±HÍý2-Ðˆ±HÍü2# ÿ2ÑHÐˆþ2ÑH ±HeJ‘HÈ±HeK‘H¥HeIÐ1Á200:A$Ðê(NIL$,I,1):A$Ð"*"Äº" ";:«221209^V:º" ";:žBhV‚I:zrVLIN$Ð"APPLESOFT OPTIMIZER":NIL$Ð"SENSIBLE SOFTWARE"®|V¢17:–21Éã(LIN$)Ë2:ºLIN$:º:–21Éã(NIL$)Ë2:ºNIL$:ºí†V–10:º"PROGRAMMA INTERNATIONAL":º:–12:º"COPYRIGHT (C) 1980" VµÉ16384,128:¹É "g VNIL$ÐNIL$È"*** * * ** * * * * *** *** ** * * * * * ** ** * * ** * "œ "VNIL$ÐNIL$È"*** *** * * * * * * * * *** "® ,V©255::‰:—:¢2ß 6VIÐ1Á200:A$Ðê(LIN$,I,1):A$Ð"*"Äº" ";:«22090í @V:º" ";:žú JV‚I:º:º:º+TV* ** ** * * "n úULIN$ÐLIN$È"*** *** * * * * *** *** * * * * * * *** * ** * * * * ** * * * * * * * * "¦ VLIN$ÐLIN$È"* * * *** *** * * * * * * * * * *" VNIL$Ð" *** *** *** *** * * *** *** *** * * * * * * * * * * * * IÐ0Á32:‡A:¹768ÈI,A:‚$Œ768?dƒ165,105,133,62,56,233Hnƒ240gxƒ133,60,165,106,133,63,233o‚ƒ15°Œƒ133,61,169,16,133,66,169,48,133,67,160,0,32,44,254,76,16,48 ðULIN$Ð" *** *** *** *** *** *** * * * * *** * * * * * * * * * * * ** * C¦Ê¤oµw 0‘mæoÊóÈ±mÉ,ð‘ÆoL‡> ±mªˆ±m…m†nLp> ±mÐÈ±mÐ`8`L,X STA *CBUF+02 LDA *CBUF+01 SBC CNVH,X STA *CBUF+030 BCC B004@ LDA *CBUF+03P STA *CBUF+01` LDA *CBUF+02p STA *CBUF€ INC *DEC5,c l…n ,8L >æŒÐæ©…Ž¥m…k¥n…l ±k…mÈ±k…nL= HÈ±mðÍa:ðÐôhL5=hL¶= ±m…zÈ±m…{ Ë7„’©¢•†Êû©…$èˆ¹w 0•† ðý˜Ðñ ¢9 ‘9 )?° ¥Œ‘È¥‘L·9 „oæo¤o±mÐL?ÍY:ðÍe:ð ÍZ:ðÍ[:Ðá¢È±mÕ†ð„oÉ0\É:°XÈ±mL¯>èä’ÐäÈ±mÉ0É:àæŽ¥Œ…z¥…{ Ë7„8¥å’…¢ð©…£ ¤8Lþ>©ÿ…£æo ,8æoC *: g7 ‘9©…Œ…Ž©… )?° w7L>: „o±mð'É:ÐÈ±mð &8L= „o >> Q8L=Í\:ðîæo¤o±mðÉ:ÐôÈ±mÉ:Ð„o &8LT=Í\:Ðà Q8æoˆ±mÉ:Ð„o &8æo >>¥ŽðL>…œæo Èæoðx±kÍ]:ðqÍ^:ðlÉ´ðhÍY:ðÍb:ð Í`:ðÍ_:ÐL'>Ía:ÐæœÉ:Ð¢†œÉÐÁ©:‘kÈ„o©ÿ…£©ü…¢¥œð ±mÍa:Ð Æ¢¤oˆ©,‘k ±m‘kÈ±m‘k¥k…m¥ T:¥– T: < 3<¦š¤™Ê±— T:ÈŠÐö :…Œ R:©A…•Æ•© …– ; ‘9 È9°` :õ¤oÀˆ±mÈÉ.ðçÉ0¬²³¬²³¬²³¬²³¬²³¬²³¶¬±¶¬²¸¬´°¬µµ¬²´¬²´¬²´¬²´¬²´¬²´¬²´¬²´¬²´¶¬±¶¬²¸¬´²¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ·¬±·¬²¹¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶·¬±·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²··¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬±°°¬±±·¬±³µ¬±µ´¬±·¬±·µ¬±³¬²²¬³³¬´µ¬µ¸¬·²¬¸·¬±°³¬±²±¬±³¹¬±¸¬±¸¬±¸µ¬±³¬²³¬³´¬´¶¬¶°¬·´¬¹°¬±°·¬±²´¬±¹¬±¹¬±¹¬±¹µ¬±´¬²´¬³µ¬´¸¬¶²¬··¬¹³¬±±°¬²°¬²°¬²°¬²°¬²°¶¬±´¬²µ¬³·¬µ°¬¶´¬·¹¬¹µ¬²±¬²±¬²±¬²±¬²±¬²±¶¬±µ¬²¶¬³¸¬µ±¬¶¶¬¸²¬²²¬²²¬²²¬²²¬²²¬²²¬²²¶¬±µ¬²·¬³¹¬µ³¬¶¸¬²³¬²³¬±±¬±±¬±±¬±±´¬±°¬±·¬²¶¬³µ¬´¶¬µ¸¬·±¬¸µ¬¹¹¬±±µ¬±²¬±²¬±²´¬±°¬±¸¬²·¬³·¬´¸¬¶°¬·³¬¸¸¬±°³¬±±¹¬±³·¬±³¬±³´¬±±¬±¹¬²¸¬³¸¬µ°¬¶³¬·¶¬¹±¬±°¶¬±²³¬±´±¬±¶°¬±´´¬±±¬²°¬²¹¬´°¬µ²¬¶µ¬·¹¬¹´¬±±°¬±²·¬±´µ¬±¶´¬±µ´¬±²¬²±¬³±¬´²¬µ´¬¶·¬¸²¬¹·¬±±´¬±³±¬±µ°¬±¶¹¬±¶µ¬±²¬²±¬³²¬´³¬µ¶¬·°¬¸´°¬°¬±°¬´¬´¬´¬´¬´¬´¬´¬´¬´¬´¬´°¬¶¬±±¬±·¬µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ°¬·¬±²¬±¸¬²¶¬¶¬¶¬¶¬¶¬¶¬¶¬¶¬¶¬¶°¬·¬±³¬²°¬²·¬³¶¬·¬·¬·¬·¬·¬·¬·¬·³¬¸¬±´¬²±¬²¹¬³¸¬´¹¬¸¬¸¬¸¬¸¬¸¬¸¬¸³¬¸¬±µ¬²²¬³±¬´°¬µ±¬¶³¬¹¬¹¬¹¬¹¬¹¬¹³¬¹¬±µ¬²³¬³²¬´²¬µ³¬¶µ¬·¸¬±°¬±°¬±°¬±°¬±°´¬¹¬±¶¬²´¬³´¬´´¬µµ¬¶¸¬¸±¬¹¶ ‘U ¹¸‘™õˆ÷©»…s…o©‘…t…p`L»‘¢ „:±¸…½’ðÅÐÈèÐï)Åðæ: ©€=’ÐìèÐö¢LÔÈ˜e¸…¸æ¹:¦:è½;’HÊ½;’H`PRNÔCLRLIÎCLRPAÇHISCREEN²HISCREEÎBELÌCLRERÒERPTCÈREPÔL’›üAü°•¥•ÜûÉ•Î•Ø• ¾Þ© …©……=…>…ã {Ý¥…<¢¡ • +ë ¾Þ ãßiÐÈ…„ ±HÈ±…h…ˆ±ðÙs“ð¢LÔÈÀÐ !!! ! ÿ…ÛæúÐæû¥úÅÒ¥ûåÓ¿` ±ÖHÈ¥Ø‘ÚÈ¥Ù‘Ú¥Ý‘Ö…Ùˆ¥Ü‘Ö…Øˆ±Ú‘Öh‘Ú`¢µÐÌ”èà0Ðö¥k•¥l•¢µPü”èàÐö¢© ²”Êú`¢½Ì”•Ðèà0Ðö•…k•…l¢½ü”•PèàÐö` ¥PJ¢þµTuV•TèÐ÷¢vPÊûˆÐå`SRT#(VARIABLE LE AÂ$ NOT FOUNDÈÀÐñðA ±Ö1ÚÚ0 ˆ±ÚÐ2È±Ö0+ ±Ö1ÚÖ0!ˆ±ÖÐÈ±Ú ±ÖHˆúÈ±Ú‘Öh‘ÚÀÐôL‡’L–’ ±k iek…R¥li…S¥Þ…P¥ß…Q¥ì…T©…U …”¥P…ø¥Q…ù©…þ…ÿ ±k…ÓÈ±k…Ò¦ì¥þeü…þ¥ÿeý…ÿÊÐð`$Ôs¥ø…Ö…Ú¥ù…×…Û¦ì¥ÖeÞ…Ö¥×eß…×¥Úeö…Ú¥Ûe÷…ÛÊÐã©ÿ…ú…û ±Ö…ØÈ±Ö…Ù±Ú…Ýˆ±Ú…Ü ”¥Öeþ…Ö¥×eÿ…×¥Úeþ…Ú¥ÛeÖ¥×eß…×¥Úeö…Ú¥Ûe÷…ÛÊÐã ±Ö…ØÈ±Ö…Ù±Ú…Ýˆ±Ú…Ü¥ñðL³’ ±Öðb…ï±Úð\…ð¢´â½•0±ØÑÜ° ™“L‡’±ØÑÜ?ð ™“L‡’Ð5ÈÄïðÄððÄðéðÈÄïð ÄððÞ˜ÕçÐÀèäÕÐ¹ð8¥Þåò…Þ¥ßåó…ß°æíÐæî¥õÅîÐ¥ôÅíLÓ‘L²‘LÛ‘j°Lñ’ ±ÖÑÚˆ±ÖñÚ"±ÖQÚ0ÉÈ±ÚHˆ±ÚH±Ö‘ÚÈ±Ö‘Úˆh‘ÖÈh‘ÖL‡’±ÖQÚ0Þ¥ ±ÖÑÚð°æ¬ •–ç ±½ÉDð©ÿ0©™•ÈŒ • ±É)ðÉ,ð®ÐŸ„Õ ±Ð˜ ±kÍ²”ÐÈ±kÍ³”ð ±kekHÈ±kel…lh…kÅm¥lån°L,‘Lµ ±k ¨ÈÈÈ±k…Q…ýÈ±k…P…ü¥Þ…R¥ß…S¥Ò…T¥Ó…U …” ±k iek…R¥li…S¥ì…T©…U …”¥P…Ð¥Q…Ñ$Ô H“FófòÐ¥óÐ b”`8¥àåò…ô¥áåó…õ©…í…î¥í…Þ¥î…ß¥Þeò…ö¥ßeó…÷¥Ð…Ö…Ú¥Ñ…×…Û¦ì¥ÖeÞ…H 5”h¢†Ò†ÓÝ£”ÐW ±èàÐó¢ð ±É,ð ²”èàÐñð:Ê½²”É$ð5É%ÐàÐ©€Ð¢©€²”²”Êõ©…ì©Ð&àÐ©³”©…ì©ÐLÄ©€àð ³”³”©…ì©…ñ ± gÝ Rç¥P…Þ¥Q…ß ± gÝ Rç¥P8åÞ…à…ò¥Qåß…á…óæòÐæó¥ñÐtð¢½¨” € íýèà$Ðó b”LÉÞ Œ •„Ô ± øæàÐÆÔ ± gÝ Rç¥P…Ò¥Q…ÓLÑÊ¬ •–â ± ø³¬±°¬²°¬³±¬´´¬²´¬²´¬²´¬²´¬²´¬²´¬²´¬²´¬²´³¬±±¬²°¬³²¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ¬²µ³¬±±¬²±¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶¬²¶´¬±±¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·¬²·´¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬²¸¬±´°¬±·¬±·°¬¸¬±¶¬²¶¬³·¬´¹¬¶²¬·¶¬¹²¬±°¸¬±²µ¬±¸¬±¸¬±¸³¬¹¬±·¬²·¬³¸¬µ°¬¶´¬·¸¬¹´¬±±±¬±¹¬±¹¬±¹¬±¹³¬¹¬±¸¬²¸¬³¹¬µ²¬¶¶¬¸±¬¹·¬²°¬²°¬²°¬²°¬²°³¬¹¬±¸¬²¹¬´°¬µ³¬¶¸¬¸³¬²±¬²±¬²±¬²±¬²±¬²±³¬±°¬±¹¬²¹¬´²¬µµ¬·°¬²²¬²²¬²²¬²²¬²²¬²²¬²²³¬±°¬±¹¬³°¬´³¬µ·¬²³¬²³¬²³¬²³¬²³¬²³¬²³¬²³±¬±±¬±±¬±±°¬·¬±³¬²±¬³°¬´°¬µ±¬¶³¬·¶¬¹°¬±°¶¬±²¬±²¬±²°¬·¬±´¬²²¬³±¬´±¬µ³¬¶µ¬·¹¬¹³¬±°¹¬±²µ¬±³¬±³°¬·¬±´¬²²¬³²¬´³¬µ´¬¶·¬¸±¬¹¶¬±±²¬±²¹¬±´·¬±´°¬¸¬±µ¬²³¬³³¬´´¬µ¶¬·°¬¸´¬¹¹¬±±µ¬±³³¬±µ±¬±µ°¬¸¬±µ¬²´¬³´¬´¶¬µ¸¬·²¬¸¶¬±°²¬±±¹¬±³·¬±µµ¬±¶°¬¸¬±¶¬²µ¬³¶¬´·¬¶°¬·´¬¸¹¬±°µ¬±²²°¬°¬°¬´¬´¬´¬´¬´¬´¬´¬´¬´¬´¬´°¬°¬°¬±µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ¬µ°¬°¬±°¬±¶¬²³¬¶¬¶¬¶¬¶¬¶¬¶¬¶¬¶¬¶°¬°¬±°¬±·¬²´¬³²¬·¬·¬·¬·¬·¬·¬·¬·°¬°¬±±¬±·¬²µ¬³´¬´³¬¸¬¸¬¸¬¸¬¸¬¸¬¸°¬¶¬±±¬±¸¬²¶¬³µ¬´µ¬µ¶¬¹¬¹¬¹¬¹¬¹¬¹°¬¶¬±²¬±¹¬²·¬³·¬´·¬µ¸¬·±¬±°¬±°¬±°¬±°¬±°°¬¶¬±²¬²°¬²¸¬³¸¬´¹¬¶±¬·´¬¸·¬± @*U*U*U*U*U*U*U(|T*ÐªÕªÕ€ªÕªÕŠ(U p "Pp@*U*UP*U*UpP(U*ÕªÕª ÕªÕªU*@@*~p? U@|(U*€ÕªÕªÕ‚ÐªÕªÕªT*pP"*`U*U*U*U*` `@*UªÕªÕªÕªÕªÕ@*U*@*U*U*U*Up*U €ÕªÕªÕªÕªÕªÕªÕªÕªÕªT*U( x(UªÕªÕ€"ÀªÕª•P*xP*U`*(@T*ÀªÕªÕªÕŠÔªÕªÕªÕ‚(U*@ x*U* ÕªÕªÕªÕªÕª…*U* (`? U ÕªÕŠÔªÕª…T*~@x?U*U¨ÕªÕªÕªÕªÕªÕªÕª…*U*~P p(U ¨ÕªÕ‚ÐªÕª•P*x~*U*U*U*U*U*U*U`?*|P*ÐªÕªÕ€ÀªÕªÕŠ(U x( "@ `@*U*U*T*U*UxP U*ÕªÕª… ÕªÕªU*@*p|(@|(U*€ÕªÕªÕŠÔªÕªÕªU*xP " (P*U*U*U | T@@*UªÕªÕª€ÕªÕª•@*U U*U*U*`*U*ÕªÕªÕªÕªÕªÕªÕªÕªÕªT*U@( x(UªÕªÕ€ "ÀªÕª•P*xP UP*(T*ÀªÕªÕªÕª€ÕªÕªÕªÕ€*U*` p(U*U€ÕªÕªÕªÕªÕª@*U*@ (`? U* ÕªÕªÔªÕªT*~@ pT*U ÕªÕªÕªÕªÕªÕªÕª…@*U*P p(U ¨ÕªÕ‚ÐªÕª…P*|Ux(U*U*U*U*U*U*x@*xP*ÐªÕªÕ‚ÀªÕªÕ‚(U x("@ @*U*U* U*U*|T U*ÕªÕª… ÕªÕª U*`È„`‰¬ñë…,TÀ,SÀ© L¹•,UÀ,RÀ©@…æ,WÀ,PÀ©…ç©…ù`©…Ø`h¨h¦ßšH˜H` ¾Þ {Ý ûæŠH ¾Þ {Ý ûæh \ÛÊÐú`ð) M•¥>Ð.L•”Iÿªè¤ÄÐè©.‘ÈŠe…¥‘ÈÄÐù¥Å°Lü”L†” „:„>¦äðÊ±É-ÐÊŠÉðéæ>Ðô…:L•”©*…¸©•…¹ ãß…„ „>±…È±HÈ±…h…© …©…ãLÜ“OV$:¥<ð¢£LÔÈ±É:Ðæ; ûæŠ`¥;ð ûÚ`©d î ùê¥…:¥:ð UêÆ:õ©¡ •®¢•†¢ ¾ç '“¥Åð(eÅ°…¤ˆ±É.ÐÆÆðˆ±É-Ð ©0‘ \ÛÈÐíÈ±ðÉ,ÐèÈL’` .• Úý E•` .•…:¢:©1Ð©0 \ÛÊÐð E•`¥<ÐL2•8¥ðmå°9Iÿ¨È¥É0Ð¦=æÐæ©- \ÛÆÆ:¥¦>ð8˜å>ð°Lü”¨¥ \ÛˆÐúð¥… ¥>ð±É.Ð©…>ðÆ:©…:©, \ÛL4”± \ÛÈÄÐÖ E•¥&…¸¥'…¹`¦äð&$¦äðÊäðLü”è†8¥å°i… M•LZ” ±É-ÐÆ=æ:LÜ“8¥å8åí¢†;½x“ðíÑðèÐôŠ ªè½€“HÊ½€“HŠ8é°Lr“ðûJÉÐ©…:¥¸…&¥¹…'˜e…¸©e…¹©…¥)Ð ± Jì ûæŠL“ ±ÉSÐ© H ±h¤™È„Ä:ÐÓ¥Å°L“’©¡ • ùê¥<Ð. 4í…„ „±ðÉEÐhhLü”É.Ð„æÈÐè„¥Ð„Le“ ± …È± …È± …¢†; ·É:Ðæ;`FRMT,'HB$FXC“¯“¹“Ô“Y”””Õ”È±Ð¢LÔÉ'ðA"kºÀ10);"7) C.I. OF MEAN:SAMPLE S.D.";À50);"8) MANN-WHITNEY U-TEST";À50);"9) CHISQUARE CONT. TABLE"ªºÀ9);"10) CORRELATION COEFFICIENT";À49);"11) REGRESSION"òºÀ9);"12) ONEWAY ANALY. OF VAR.";À49);"13) TWOWAY ANALY. OF VAR."ü¢22:±J¢20:±FFÐ34:¢53ºÀ5);"COMPLEX STATISTICS"˜ º:ºÀ10);"1) BINOMIAL DISTRIBUTION";À50);"2) POISSON DISTRIBUTION";À50);"3) ONE SAMPLE T-TEST"ºÀ10);"4) TWO SAMPLE T-TEST";À50);"5) TEST OF MEAN:KNOWN SIGMA";À50);"6) C.I. OF MEAN:KNOWN SIGMILE";À50);"6) UNPROTECT A FILE"*ñ¢20:±7øFFÐ26:¢7TùºÀ5);"SIMPLE STATISTICS"úº:ºÀ10);"1) AVERAGE";À50);"2) STANDARD DEVIATION";À50);"3) COUNT"×ýºÀ10);"4) SUM";À50);"5) MINIMUM";À50);"6) MAXIMUM"þºÀ10);"7) MEDIAN";À50);"8) RANK""4) PRINTER CONTROL (IF AVAIL)";À50);"5) LIST VAR NAMES"Dç¢20:±QéFFÐ20:¢9kêºÀ5);"DISK FUNCTIONS"Ìëº:ºÀ10);"1) LOAD DATA FROM DISK";À50);"2) STORE DATA ONTO DISK";À50);"3) LIST DISK FILES" îºÀ10);"4) DELETE A FILE";À50);"5) PROTECT A F;À49);"12) SQUARE ROOT"_ÙºÀ9);"13) LOG BASE E";À49);"14) ABSOLUTE VALUE";À49);"15) SIGN"iÝ¢22:±wßFFÐ15:¢10ŽàºÀ5);"DATA OUTPUT"õáº:ºÀ10);"1) PRINT VARIABLE(S)";À50);"2) PLOT TWO VARIABLES";À50);"3) HISTOGRAM OF ONE VARIABLE":äºÀ10);IFORMLY"JÏºÀ10);"3) REPLACE AN ENTRY";À50);"4) FILL WITH RANDOM NUMS"ÑºÀ10);"5) COMBINE VARS AND/OR NUMS";À50);"6) ORDER (ASCENDING)"ÕÓºÀ10);"7) ORDER (AND CARRY)";À50);"8) ADD";À50);"9) SUBTRACT"ÖºÀ9);"10) MULTIPLY"À49);"11) DIVIDE"NS";À90);"4) SIMPLE STATISTICS"\ Åº:ºÀ10);"5) COMPLEX STATISTICS":º:º:º:ºÀ10);"0) EXIT"… Æ¢23:„"CATEGORY NUMBER:";MM:MMÐ0«795™ ÇMMÑÏÓ(MM)ÄMMÐ0¢ È«702® ËFFÐ0:¢3Í ÌºÀ5);"BUILDING A DATA SET"Íº:ºÀ10);"1) KEYBOARD INPUT";À50);"2) FILL UNQ1Ð1ÍIÑTC«816$ûQ1Ð2ÍC1Ê2ÑÏTC«8008Q1Ð2ÍIÑÐC1«816HNVÐNVÈ1:«76g¼UUÐ1ÄºI$;"40N":ºD$;"PR#0"…¾—:´MM«715,735,745,760,775¥À¢5:ºÀ5);"OPTION CATEGORIES"âÁº:ºÀ10);"1) BUILDING A DATA SET";À90);"2) DATA OUTPUT" Ãº:ºÀ10);"3) DISK FUNCTIO3:NCÐNCÈ1:JÐ1ÁNV)AIN$ÐTK$(I):N$ÐV$(J)EDN$ÐIN$ÄTT(2,I)ÐJÉ1:«80LF‚JUH«500fLNVÏYYÈ1«822…NV$(NV)ÐTK$(I):TT(2,I)ÐNVÉ1ŒP‚I XN$Ðä(KN%(IN,2))«ZIÐ1Á4É\¹2165ÈI,48Èå(ê(N$,I,1)):‚Ðb«4ìôC1ÐÓ(TCË2):Q1ÐKN%(IN,4)úöQ1Ð0«816 ùÈ1:TK$(TC)ÐCH$# CHÐCHÈ1:CHÏL«50C CH$Ðê(IN$,CH,1):CH$Ð" "«20_ #TK$(TC)ÐTK$(TC)ÈCH$:«30r 2NNÐ0:NKÐ0:NCÐ0 3IÐ1ÁTC:N$Ðè(TK$(I),1)¥ 5N$ÏÐ"A"ÍN$ÑÐ"Z"«60Ã 6N$Ñ"+"ÎN$Ï"9"ÎN$Ð"/"«802ã 7TT(1,I)Ð1:TT(2,I)Ðå(TK$(I))ó 8NNÐNNÈ1:«80<TT(1,I)ÐMÐ0:«6+ UUÐ1Ä—:ºD$;"PR#1":VVÐ1ÄºI$;"K"J ENÐKN%(IN,1):°850:N$ÐA$ÈN$| UUÐ1ÄºI$;WW;"N":WWÐ40ÄºI$;"I":VVÐ1ÄºI$;"K"™ ºN$;:„":";IN$:IN$Ð""«14ª IN$ÐIN$È" "Á TCÐ0:CHÐ0:LÐã(IN$)Ö CHÐCHÈ1:CHÏL«50ö CH$Ðê(IN$,CH,1):CH$Ð" "«20 TCÐTCÏZ/² COPYRIGHT 1979--SERENDIPITY SYSTEMS INC:£38200Rº"BLOAD START$$"qº"BLOAD START1$$":«1000{«3005£„" OR 0:";IN$:IN$Ð"0"ÄMMÐ0±°700:Œ773Ë„"OPTION NUMBER:";IN$óINÐå(IN$)ÈFF:INÏ(NT)ÎÓ(IN)ÑÏIN«820 INÐFFÄM"" " """""""""