IMD 1.16: 29/05/2007 12:38:13 FOGCPM.041 ååååååååååååååå--FOGCPM041GFX COM€ GFX COMs !-04-00 86  GFX DOC€"#$%&'()*+,-./01GFX DOC€23456789:;<=>?@AGFX DOCBCDE-CPM041 DOC¡¢£¤GFX1 GFX?FGHIJKLMGFX2 GFXNOGFX3 GFXPQRGFXDATA CECSTUVGFXTITLECECWXYZOLD-NEW BAS[\]^RIENDEERGFX_`abSANTA GFXcdeSHIP GFX#fghijSLIEGH GFX#klmnoSUPER GFXpqrTRAIN GFX$stuvwTURKEY GFXxyzWELCOME GFX{|}~WITCH GFX€�AUTOCHG SUB‚AUTOREP BASƒAUTOST COM„…†‡BATS GFXˆ‰ŠGFX BASW‹Œ�Ž��‘’“”•AL-LOGO COM–AL-LOGO ASM—˜™ALGRAPHSCOMšALGRAPHSASM%›œ�žŸåThis is the disk name. ååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååÃëÚ+"öå6# x±Â+áÑÁÉ:¡·`iÈ*æå "æá>Ú×"ÉÍÕ/Øå##~>Ò;+> Í6*Ñs#rûÿ õw+åÍŠ1å>2 Íu+ñ#w+õë>3Í6*s#rûÿñw+§ÉÍ6*xDMã"’+áÖÚ�+Ñs#r#À+!ûÿ æ+>2âÉÍ:*ã+Í6*Íx+Ã�*ÅÕ~#þîʽ+#~+Ò½+~õ+ëx Í6*s#rûÿñw+§ÑÁɯ2,x‡_ÆOÍ:*Ã÷+¯2,x‡_ÆOÍ6*ë9ëw#w+x§Ê,Ñ+r+s=Â,Áûÿñw>#w+§ÀÃ�*~þ7ÀÕå^#VþîÂE,þÊE,!~áѧÉáÑ7ÉÍx1Öê§ÀÍP*¯ÉÍx1þ¢Èþ É~þ7ÀÕë!~#fo~þðÊ�,þî7Â�,#~+îÖ~ëÑÉw}D#wx#ÉÍÑ1êÉõëÍ]*ñÍLÄ,åÕ!Øÿ9ë*ì?ÑáÐ>Ã×":uÖÂÆ,2g>2u:uþÊÒ, ÅÍQPÊJ-òã,ñö€õÍ6P:uþÊ,-õ!lÍ¿PÍs"Òû,ÍÚQ!-åÍ«QáÁÃH-Á*fåxþÊ-ÍüQÍ>QÃ'-ÍÐQ!lÍ‚PÍÑPá§ÂH-ñö@õ]T}£_|¢³ÂH-)Ò>-ñ°öõñÉñ¯ÉÍx1þèÌP*ÃI&>4ͺ-ÃK3ÁyÕ=Âd-Íe#Íx2É#~+þÂŒ-x‡òƒ-xöGÉÍe#>ÍÎ.xæÊ›-Íe#>ÃÎ.xæ¿Gæ Ê©->ÃÎ.xæÈ#~+þÀ>ÃÎ.>XÍ6*s#r+Ã}*ÕW‡‚!Û-ÍL^#V#~ëÑÃ.è ñ ú  !è> Ã.!ñ> Ã.! > Ã.!> Ã.!> Ã.ÅÕëOÍÂ*åyÍLáÑÁ¯ÉÅÕåõÖ !·.ÍLFÍŠ1Íq-x2Í.§òH.ñåÍu+Ãw.#N+åÍŠ1Íq-Ú±.xæÂn.#~+¹Új.ãÍÎ.ãÃn.yÍÎ.å Íu+ñwë!~#fo#~ë#w:Í.æÊ�.6~+þž.~þ ž.6 þ«.~þ«.6Í3ó.áááÑÁÉ€ @ PPPPPP   #¾Êï.þÌò.ÕÅõ~þÌò.+åÍu+ñÁÑw#w+§ÉÍe#É*#~6+§Â/Õå›Í]*ëá6€#s#rëÑ>6###s#r#6@"=#wúÿ¯ÉÅÕ:uGfþÂ?/b!Ÿ/####~#¸ÂB/F#N#~#foå~#fo´Êx/åÕÑÅÕÍdLÑÁáÂU/##ÑÑÁ~ÉáÅÕ>�O¯Í–,ÑÁå6î#p#6 ####åyÍLͶ,á+wáÑÁ~É39;5å!Â/Í#L~áÉÍ2ØÈ>Ã×"åÅÍ@&ÁÚÑ0:ä§Êú/Í3Í÷-Í3>Í".ÍŠ1åÍP*þêÊÙ/þçÊ 0þåÂÚ0`i)9^#V!~§Ì`-y¾Âá0#~#fo##A:êÚx0ãÍ3x¹>Ä".á ÊU0^#V#ëÍ©+Í3> Í".ëÃ10áå#~͸/o&"f>2uÍ./Í©+Í3> Í".á§É"–0x‡G‡ÆO>$Í6*H"è0Ñs#r# ‹0Hë ëåë+V+^ëÍ©+ëãs#r#Ñ Â 0ÑÕ͸/w*è0üÿÑw+Í3ë§ÉáyÖOØÃÑ0Íe#ÃÑ0Íe#ÃÑ0*ðë*ö}“_|šWÒý0Í}LÍZM Bytes Free ŠÉÍ2ØÊ01:ã#§ÀÍx1þ¢È:ëæ€Â>Ã×"~>Ü×"å###^#Vë"ë*:ëæ€õÊZ1ÍVL>Êf1Ãj1#{•zœ+Òj1>Í×"ëë"ñÄK3Ñ>?ú-:Þ#§*ß#ÀͰ2Þ#"ß#ÉÕ*Oë*QÍVLÌ{#+V+^"QëÑÉÍP*þïÊ´1þðʺ1Íe#ÉÍ©+þ1Í++Øõ~=wþ2ÂÏ1~#foñÉãåÍP*á¾~#ãÈå!é1Í#L~Í×"áÉäé—X[åꛞ˜ ÍP*þîÀ#~+þÉ>¯õ>2á#Íx1Öó§>2á#ÁÀÍP*|µÂ/2¸Èë!~#‡Ò@2~#foÃ32úW2##~»#~#Â32ºÂ32ûÿ¯ÉÃ÷.Íx1þêÂç-ÍP*Í@&ØöÉÍb&ØþÈÍe#É> 2åqã" 3y2323‡OÍ]*ëá#s#r++å+++++~æÀáÊ©2 ã}|ëåx±ÊÑ2!^#Vz£<Ì 3z³Ì3Í»LÄ 3DMÑ!35á©2x±Ê3åúÿ~͸/! Ü 3=Âë2DMÍ+ëáå+++r+sá:3OýÍe#!ÉÍe#ÉÕë*Qs#r#Õ"Q{•zœáÑ#~+ÐÍe#å*Q++"QáÉáááááÉÑÉ:¡·È!9"d3!c3"ä#̓3Í\1Ó*ò"ô!"Û"á"ä#!Û"ݯ2ßÉÍÂ*"â!Û~#fo´ÊÝ3"v=##å~#foåÍ]=Íi=Ê·3͈4Í�4Í’4Ã¥3á~ÖYÊ¿3=Ìä3Í‹;ë:êæ >*âĪMá#r+s++Ã�3*â>ÉëÕÍ$4Ñ!~#fo~ëþØþÐ~þZÌ= åÆ' Í6*ë ë>ÍLÑ>ÍLõÿÉ!N#F*v=~#fo´È##^#VþXÀå!~#fo"‚4á++~+ngµÈ##^#Vë~þ4À#####~¹À#~¸À*v=w#w#~#fo>³–w=‘q#pÉ>Ô4>Ô4>å*â32ã3ãͤ4ñ2ã3É~þÚï4ÅÕåÍ]=Íi=ʼ4ͤ4ð4áÍÊ4x§Â¬4ÑÁÉ:ã3=Êã4òæ4Íï4Í{8ÍE5Íþ5Ãt6ÃÌ5Íï4Í{8Ãt6Õå~þÒ5ÆþÂ<5^#Vþî>Ê<5>Ã<5ÍH=‡Ú5>Ã<5#~þÊ5þÊ5####^#VþÒ<5>áÑå###wáÉ~þØþ2Ê=ÅåÍH=GÚÀ5N#^#V#~#fo Ä^,ÚÀ5ëÍ^,Ú|5áÁFÍ™9FÉxæ ÊÀ5ã~ã¾ÂÀ5OÕë!~#foÍ^,Ú¿5"È5á"Ê5ëÑ~å#F!Ã5w#p+Í™9Áë! s#r`iÁFÉááÁÉóЭÐ~þ Àë!N#F# ë¾Âû55! F+Në+p+qûÿ ͈4ës#røÿ É~þ Ê6þ À2k6Åå^#V#~#foþ7Ì^,Úh6"p6!N#F#~#foÍ^,Úh6"r6ëãë!q#pÕ!l6w+Í™9ã͈4DMáÑå!q#p#Áq#pëÁFÉáÁÉ ¿ÐóÐ~ÖØþ0Ðë!Ö[ÍL~Oë‡Øú�6:ã3þÀyæ Ê­6##~++æÀë!~#foÍ!,ëØWyæJë!ÍILÍ6Ù6717?7L7“7í6ï78~#fo~þ Ê98ëÉëyæÈæ>!ÂO8y§ò98ÃD8~#fo~þÊ98ëþØþÐÍ=ëwGÉëåÍï-Í3ë##~#foÍ3> Í".ÍŠ1͈4ëá6 å s#ráÉyæþPëÀ©ò98ÃD8~#fo~þëÀë4FÉyæ`ëÊ98î@æ`ÀëÅ##~#fo ~#fo Á~#foy§ü\L}þëÐz§ÀCë5###pëyæÆwGÉÅÕ##^#Vã~ãþʧ7þÂã7ëÍ!,ëÚã7î@æ`Âã7! ~<ÂÊ7#~þÊã7ë"í7!æ7Í™9ëÁ! s#r`i4ÁFÉáÁÉñáÐÕ##å~#fo"828!8Í™9ëás#rá6FÉ {Ð>ë͈4ëõ>Í6*s#rûÿñw+FÉ##~#foÉ6 Fë5ëÉëG2x8!5###yæwë©ðë> Í6*s#rûÿ6+É~þØÍH=O‡Øð‡ò�8Ãâ8Ååõæ€Êš8~Ú±8N#F#^#Vë ¾Úµ8ñáÁÉ +++ëp+q+r+sñá‡úÔ8##>®w++ÁFÉ~å!'Í#L~áwÁFÉÅåõFHæ Êð8yîO^#V#å~#fo:ã3§Â 9~¸Ên9¹Ên9¸Ê9¹Ê9áñáÁÃ�8:ã3§Â09xþ Êi9þ ÊH9DM!~#fo### ¾Úi9Êi9!Á ~#~Õå!úÿ Í{8ëár+sáññÖ9áááÁÉÅ Ns#Fráã^q#Vp++Áåëxæ®wÍ{8ëár+sñáÁFÉÁFÉ~2M:##~2N:##~#N#F#^#V=´9PYÕ! N#F!^#VþðÊ6:ë ë!†:Í#L~2u!lÅõÍLñÑõ!fþÂ÷9!bÍL:N:æÄm;:M:!:å!O:Í5L^#VÕÃs"!uñ¾w> Ä×"~Í./ëÁ! s#r`i#w+É! N#FÑ!y†w#xŽwëÉŽ:—: :©: ¾: Á: Ê: Ó: Ù:ß:ñ:; ;;#;3;C;Í{#ÍEQáñ>õéÍÐQáñ>õéÍüQáñ>õéÍEQ:g§> Ä×"áñ>2uõéÃ6PÒ@UÍ];ÃÎNÒ VÍ];Ã4OÍU;Ã-SÍU;ÄSÒTòë:ÍU;à SÍ];ÿMÒûSòý:ÍU;ÃSÍ];üMÍU;ÃéS*f:m¤g:l¥oøQ*fÍ\L+øQ*f:m´g:lµoøQ*f:m¬g:l­oøQ*l:g/´g:f/µoøQ*fë*lÉÍP*l"f*n"hÉ:uGl!fþÂ;!bNwy#Â;ÉåÍU=Íi=ʨ;Í·;yæÊ�;ÕåÍè;áÑÃ�; µ;áåÍä;áÉÅÕ~þ4Ô{#þ###6+~++ÚÞ;åÍ]=Íi=ÊÝ;Í·;ÃÑ;áÍ@<ÑÁÉ~#fo~þÚú;~#fo#~+þÈ~ƒ^#V2#<Í2=åñå~#fo´ÊG3å##~#fo~þÂ0<#####~»#~áÂ<ºÂ<^#Vás#rÉëþÊã<þÚi<þÚiÌ×"á¯ÉÍÂ*å##s#rÁáq#pëöÉ !#€'€(€)€+€,€-€.€0€õ6#~õ6+ÍE5#ñw+~þÂ=ñwÉñÉå!%=Í#L~áÉgæo¬…þ ÚA=Ö ‡*âÃLå!¢[…oÒR=$~áÉ##~æO++###^#VBëâ,ër+sx##^#VëÉúÐ@Ó€ZGFX RELbopqrstuvwxyz{bGFX PRNGFX BAS€W*+,-mnWGFX BASRELCRFPRNƒ(Ê@Õ$PR0AŒ�ÒE#8ʰ½$PR0EŒ� RD•TÉ Å$IPUBŒîRET´Êе$PEKCŒ‹ÒEô´Ë(å$POKCŒ²‰RDdÄDËp•$FLDBŒÎ‰RDÄTäɈ�$LENBŒÀ�²D8y= M1% ržŠÒDuD¤ÈðÝ$GTJCŒôŽRDäT¤Ï…$NEJCŒúŒÒDU¤Ë€Ý$EQJCŒÉ�ÒDU¤XΨM$EQJIŒù�ÒDe4ÄÎÈu$EQSAŒŽ ÒDäUDÍå$EQTAŒÃRE44ÌÈ]$IN0AŒÿ‹ÒD”ã#4 C$="":N=34:M=4:GOSUB 176 355 IF F$="" THEN 362 ELSE 356 356 ON ERROR GOTO 211 357 OPEN "O",#1,F$+".GFX" 358 FOR N1=0 TO 3072 359 Z=N1+61440!:T=PEEK(Z):IF T<>32 THEN 360 ELSE N3=N3+1:GOTO 361 360 PRINT#1,T;N3;:POKE Z,127:N3=1 361 NEXT N1:PRINT #1,32;1:CLOSE 362 RETURN 363 END *128) STEP 128:POKE W2+B,32:NEXT W2:RETURN 353 REM * 12-save routine ***************************************************** 35PB:GFX,=B:GFX/O/E/Z SC?Command error?File not found?Can't enter file~æÈÍÍG#ÃÂC!‘CÃÜC! CÃÜC!°CÍÂCÃoDCOMSCNèC"">èC·Ê2D:DG:DO*.¾Â(D# ÂDÃ2D Â(DÈÃD¯2èCóÓ>2ï!~þÃÂ6~þÃÂÓ>2ïû*+ù++"y=*">å:„=·Â2|=*y=ùÍ*G:?Cþ ÊoD¯2ˆ=2€=2†=2…=2ƒ=2‚=2‡=<2�=2=ÍCů2x=ÍõEØ.>ÍØE#>þ »D>€2x=å!‰=ÍÌEá> 2#>2+>¯2">yÖ,·2‚=ÂåD:x=î€2‚=ÍõEØ4>:ƒ=·ÊòD1>ÍØE#>:">2~=Ö 2}=ÂE:x=Æ@2x=å!ª=ÍÌEáyþ=7ÀÍõEþ 7À`"ÍØE">·ú7Eþ 7Èå!Ë=ÍÌEá:x=‡!‰=ܬE‡!ª=õ:ƒ=·ÊgE³=1>>õ ñ=Â]EñܬE:€=·Â|E:}=·Â|E:~=2€=Íõ Íñ_ͯ2€ÍaHÍHÍHá*y=##:�=2|=GÉõ"> ~·ÂÆE·úÆEw# ¼EñÉ #üE w#ÂÏEÉ:{=·Èå!+>~þ ÂóEæw#ÂéEáÉÍ Gþ:7>ÂFx·ÊõEëͶGOx=yÂ:Fþ[ÐþAØÖ@ë2">Ô Gxþ Ú'F ÅëÕ#>ʃFͶGÃ.FþTÂSFͶGþT7ÀͶGþY7ÀŸë·ÃFþLÂmFͶGþS7ÀͶGþT7À>þë·ÃFþR7ÀͶGþD7ÀþR7À>þë·ÃFáÁ> �Ú”Fë6 #=òŒFëyÖ.2{=Ì GëÕ+>xþÚ¬FʹFͶGíFáyÖ/·yÀͶGþLÂÒF2€=ͶGOúFÍØFÃËFå!ôFÍ#LÊåFá7É~æ~!êÊ!0Ü@H<þÍ�AÍâNü<<!%;ÍuR!€Í[X!ÿÍkX!%;ÍuR!!;Íqi;!Í™i!ÍõEÍ�G!ÍÙHÍ/O<<â!ÍõE!Í'QÍQ»ÍCIÍÅM<<ÍO͵O8<ƒÍ/O0<ÃÝ!ÍõEÍ�GÍÅM4<ÍUQ))ÍÙHÍÅM<<ÍO͵O4<¸Í/O<<Ã?Í/O<<Ã*!ÍõEÍ�G! Í'QÍQå!Í'QÑ))TÍÙHÍÅM <<ÍO ͵O (<ûÍÅM<<ÍO͵O,<óÍ/O<<Ãz!ÍõEÍ�GÍÅM <ÍUQ))ÍÙHÍÅM<<ÍO͵O$<ÍâNB<ÍâNF<ÍâNJ<<ÍâNN0<ÍâNR<ÍâNV<!%;ÍuRÍâNZ <ÍâN^<ÍâNb<ÍâN/<ÍâNf<ÍâN<<ÍâNj<<ÍèL!ÍISÍ'KÍÅM<ÍOnÍ/Oõ ÍèL!Í'QÍQ»Í'KÍÅM<<ÍO͵On™ ÍèL!$Í'KÍÄOü<<Ø Ãð ÍèL!ôÍ'K!6Í[XÍ�h!€Í[XÍÄO<<ü à $ÍèL!%;Í'KÍèL!%;Í'KÍèL!%;Í'KÃ7&ÍâN<<<ÍO>ÍýM�;ÍßO>-Ã?-R!:Í«W!:Í&QÍÇNNÍÉM6ÍÉM<Í“XÍâN>0<!%;ÍšSð,ÃM-!�Í&QÍÇNNÍÉM6ÍÉM<Í“X!ÍTÍáPÍOVÍpOV,<åÍmOV<Ñ|²g}³o|µÂi.Ã’-ÍÅMVŒ;ÍUQÍéW.B.Ï-ª-ö-ÍÅMNˆ;͆PÀ-ÍâNN¤;Ã�,ÍÅMNˆ;ÍONÃ�,ÍÅMN<<ÍÕO„;ç-ÍâNN€;Ã�,ÍÅMN<<ÍONÃ�,ÍÅM6<<ÍéOØ;.ÍâN60<Ã�,ÍÅM6<<ÍO6Ã�,ÍÅM6ˆ;͆P3.ÍâN6|;Ã�,ÍÅM6ˆ;ÍO6Ã�,ÍÅM6<ÍÕOØ;Z.ÍâN60<Ã�,ÍÅM6<ÍO6Ã�,ÍÄO<,Ãu.ÍHXÍÄO „;§.Ä.ÍâN…6ÍÇNNÍO‰ÍâN „;ÍâN<ÍHXÍâN�6ÍÇNNÍO‘ÍÅMf‘ÍO•ÍÅMf‰ÃN/ÍâN™�Í/O…Ã9/ÍÅM��Í‚XÍáPÍO¡Í¿O,</ÍâN¡x;Ã/Ã/ͰO¡4<2/Ã/ÍÅM¡4<ÍUQ))Í$OÍTQÍÅM��Í“XÍÅM�<<ÍO�͵O�™Þ.ÍÅM�Ø;ÍO�͵O�•Ï.ÍHXÍÄOZ P‚·8Ãã8ÍýMê<;ÍÉMì;ÍOÍ5X9ÍýMê<;ÍéM8;ÍOÍ5X9ÍÅMêæÍOêÍ]Pæ9ͺOêâñ7à 9͵Oêâñ7ÍHXÍÇNÍÉMÍOîͺOî<.9ÍâNî<ÍÅMî4;ÍOòÍ/OîÃQ9! ÍŒXöÍÅMö<<ÍOö͵OöòB9ÍHXÍÅM0;ÍOúÍ/OÊ9ÍÅMö! Í“XÍÅMöØ;ÍOö͵Oöúv9ÍHX!%;ÍuRÍâN ,;ÍâNø;Í5X'!%;ÍšSj:ÃÅ9Í_Mm*!s:Íqi!�:Í»Rë!Í™iÍ/O0<ÃD:ÍÅM.<ÍO*Í{X*ÍáPÍO"Í¿O"4<:ÍÅM2<<ÍO2Ã=:!Í€L!"ÍèJ!2ÍèJ!ÍŒX*ÍâN2<<ÍÅM.<<ÍO.͵O.(;ë9!Í€L! ÍúJ!ÍK!ͱdÍHXÍ.BÍ.Bv:Oz:0~:.MFX…: ‰:GFXTITLE.CEC˜:gœ:G :.GFX§:) ¬:(°: - (A,D,E,M,Q,R,S) Æ:fÊ:FÎ:rÒ:RÖ:aÚ:AÞ:dâ:Dæ:sê:Sî:pò:Pö:mú:Mþ:e;E;b ;B;q;Q ;GFXDATA.CEC$;I(;@Œ†8ŒP†P„€@p�†ÀŠ€†€‡€‚€ˆøv�ÍÌL…p…‡ H…`Š0…~‡@@…€�àƒÍÌL|XP…X…|�8…€{�{�ÍÌL~ÿz�z‰‰…x……(…ð‰zˆð�ÿo�@ƒ ƒ0„ „`ƒƒ‚„>>‡xl�pp�„@‚H‡Fˆ …@„††�†3d3e3fOgjh{i°jëkMlˆmn+o‘p­qI)Ʋr 5=¾sÖtÖu# vy wy xÌ yØ zð {ü | $•7&©!}!~/!–"‹F!€m:kh!�“"‰”!‚À!ƒì!„"…K"†m"‡‡"ˆ–"Ц"ŒÙ"�#Ž1#�]#�‰#‘¼#’Þ#“ø#” $–$—2$˜2$™”$š”$›'°§$œÉ$�æ$Ÿã$ž!%¡% C%¢w%¤‹&«]%£¥%¥î%§Ý%¦&¨7&ªr)È™)Êm*Ó+Ú7+ßx.û_/›9a#1¦49Ç&¬ø&­'®'¯'±'²X'³d'´p'µš'·|'¶Ü'¸ñ'¹I(¾±(Á8(¼(º#(»ã(ÄF(½R(¿m(ÀÞ(ÃÃ(Âr)É )ÅI)Ç™)ˬ)ÌÅ)Íã)Î*Ðï)Ïd*ÒD*Ñm*Ô™*Õž*ÖÀ*×Ú*Øô*Ù+Û+Ý+Ü4+Þ7+àC+á�,éÙ,ív+âä+äµ+ã,å¾,ìi.ùF,çx,è',æM-ñœ,ê¨,ëð,î-ï?-ðf-ò’-ó.÷B.øÏ-õª-ôö-öu.úx.ü§.þ„.ý¹.ÿÏ.Þ.//2/_/k/Œ/ }/Ÿ/ 1­/ µ/ Ë/ í/&0I0r0¡0Ê0Ö0ò01 1#1/1u1¡1�1Â12 72!h2"š2#²2%¦2$÷2)è2(Ç2&Ü2'3*03+N3,Ã30Z3-ø31b47_3.�3/"45424344'46¦4:Ù4<²4;R5>m5?ž5@¬5Aã5B6C16D]6FH6E57Nf6GŠ6H¡6IS7O�7PÌ6J×6K7L7M�7Q 9[¦7Rñ7S9\b9_*8TC8Uã8Z|8V•8W·8XÍ8Y9].9^b9`›9b·9cj:jÅ9dÊ9eã9fë9g:h=:i[[[[ BASLIB #000000 5.30 - OWNED BY MICROSOFT, 1980 ö¯Ã©@lPV2DM*ùÅÿ"WT*ÃC##"UTÓA>Ã2 @2£@*^#Vë"¡@ë##^#Vë"¤@ Í2¦@·!Êô@!!""§@!A"|A6#6P>„2ƒA>2‚A>ÿ2�AÉÅÕåÍ @·Ã9AÅÕåÍ£@Ã9AÅÿÃ0AÅÿÕåõ _ÍñáÑÁÉÃODIDVIMUDVDœFMÃQÃQ!9"JAõͲC ë!ÍBͲCëñ·Ê¶Aë!ëÍB�A!OAÍB!RÇ"ˆA!O€"ŠAͲC|µÊçA> KB6Ã#s#r#=ÂÜA>Û2DA>Ó2GA>É2FA2IA!=A"VA!$\"LA>&2NAÍÂ@ÃfW6#}»ÂB|ºÂBÉÉÍÒX STOÐÍCÃ.BͨC*VAéé.. . ........ÍVVë*dA|µÂ5B:aA§Â£B*_A|µÊ£BÕÍ©BëͲC  s#rÑͲC  {ÍDw#6á"bA*JAù*_A>2aAéÍDÃ(BÅ!9N#FͲCÕ~‘#~˜ÒÛB~+¶ÊáB~“#~šÚÛB+^#V#ñå##ùB###ùBá|µÊíB~#foÁÉ!ÿÿõBÁÉÍÒX Internal Error - No Line Number ŠÃ=AͲC~#¶ÊŠCÍÒX at line Í©BÍ=CèCë>õÍqC<ÚVCÍjCñÖÂ@CõÍqC<ÚVCÆ0ÍYoÍjCñÖÒRCÉ}“_|šWÉ!€CÍp~#foë>ÿÉÿÿöÿœÿüðØÍÒX at address áã|ÍöX}ÍöXãåèC> ÍYo> ÃYoã~#ã*ÁCÍp~#foÉzå!9"@AáÉå!ÃÉCÑ*@AùëéÍÏC"BAãÕÅå!ðCãå*BAÉÁÑáÉáÑÁÉ€ÉͨC! D~<ÊD=»ÊD#~§#òDÃD#ÃØXSyntax Error in DATÁRETURN without GOSU Type MismatcèOut of DatáIllegal Function CalìOverflo÷Out of Memorù Subscript Out of Rangå Division By ZerïOut of String SpacåString Formula Too CompleøRESUME without Erroò2Field Overflo÷3Internal Erroò4Bad File Numbeò5File Not Founä6Bad File Modå7File Already Opeî9Disk I/O Erroò:File Already Existó=Disk Fulì>Input Past Enä?Bad Record Numbeò@Bad File NamåCToo Many FileóÿUnprintable ErroòÍÅCÅÕÍA!ØE>ÊïEÍAw>Í$VÑÁÉ|·ÂKBÍÅCÅÕå}ÍþiÊMmþÊFþÂJm`i"TA!&F"lA!¦F"nAáÑÁÉõÅÕþÊ‚Fõ ,ͺFñþÊ]FþÊlFÍU[Í€YÑÁ*qå*qå*qå*qåÃ|FÍ\[ÍÎZÑÁ*qåÃ|FÍ\[ÍiYÑÁ*qå*qå Â&Fëé,ZͺFåÿ~#§Â‹FxáÍ$VÑÁåÃ|FÍÖC!>ÃVBͺFÍVÍ$VÑÍxRëÑÁÉÍ�fÚ�Fþ ÂÊFºFþ"ÂßFG{þ,xÂßFPXÍ�fÚ-G!fIÿOzþ"yÊGþ åÊMGáþ ÂGO{þ,yÄŒGÍ�fÚ-Gþ ÂG{þ Ê'Gþ,> Ê'G·Ê'GºÊ-G»Ê-GÍŒGÍ�fÒäFåþ"Ê8Gþ Â`GÍ�fÚ`Gþ Ê8Gþ,Ê`Gþ ÂXGÍ�fÚ`Gþ Ê`G*TA( 4á:ŒA·Ê†G{þ,†G6å!fIÍVáO ʆG+~þ ÊzG#6!fIÉ·Èw#ÀÁÃaG�áåN#"›Gë!9"–G"˜Gy2šG*TA|µÊ¿G*lAé!©H"dAëA~õ#Åå*fJõÍøo:ŒA·ÂßG~§Ê©HñþÊdHõþÂñGÍU[ÃôGÍ\["fJñþÊHþÊ&HÍ€YÑÁ*qå*qå*qå*qåÃ3HÍÎZÑÁ*qåÃ3HÍiYÑÁ*qå*qå*fJÍøoÊWH~#"fJëþ,ÊÇGþ ©H:ŒA·Ê©HÃÇG~§Â©H!"dAëé~,þ"ÂoH#"å~§ÊƒH¸ÊƒH# ÂrHéHþ"‰H#"fJxþ"ÊžH ÊžH+~þ Ê“HáÑyÁÍ$VåÃ3HÍÒX?Redo from Start Š*–GùÍVV!ÖHÍ I*›G:šGOÃÆGë*˜G+~+þÊIþÊöHþÊöHë +w ÂøHëÃI++å~#foÍxRá"˜G!šG5ÀÑ*–Gùáëé÷ã~2I#ãÕ~#^#VëÍÄXë++ÍLVÑÍvmÚB:fI·ÉÍÅCÅÕå*TA|µÂbI!fIÍVÍ$VÑÍxRëÑÁÉ*nAé$)ó€ ó€ó(„…(¥…(¦…(§…ð�€€ñ�û(„…¶‡…‘ …‘ ˆ…¼…)˜åž &–„˜»…ƒ&)„‚Û8«¥Ê�…ï"%(„¹…ƒ )„‚Û8¥Ê�…ï%(„º…(„·€(„¸UD‡—Žý…ù‡…Š‹ š5ü˜Ú‡…æ€Ù€Š‹ š#ü˜Ò‡…ç€Ú€f$)„˜‡…Š%‹ ƒñŒ€(„˜|‡Ú‡µÊ‡…ÿ š¼ü˜Ò‡…è€ÔÛ€6Š3‹.ƒñŒ€(˜|‡Ú�µÂ‡‚…ÿ$)„˜z¬|ú�}ÍÅC}ÅÕåÍþiÊMmþÂJm!© ~#fo"hJ!² "jJáÑÁÉÍÅC|·ÂKBåÕë*hJ}“o|šgÚ_m"hJ*jJë"jJáÍÌV#s#r++ÑsëÉÍÅCÍ0KÃLÍÅCÍ;KÃLÍÅCÍFKÃLÍÅCÍKÃLÍÅCÍ0KÃ6LÍÅCÍ;KÃ6LÍÅCÍFKÃ6LÍÅCÍ›KÃ6LÍÅCÍ0KÃäKÍÅCÍ;KÃäKÍÅCÍFKÃäKÍÅCÍ›KÃäKÅÕåqÃQKÅÕåqÃQK"qÅÕåÃZKH~# ÂRKx24Y:wA§Â LÍÛKŠKÍ*]ÍV<ÍBL~§ÊƒKÍÅn#ÃwKÍ1LáÑÁÉÍ*]~§Ê†Kþ ÄÅn#Ã�K>24Y:wA§ÅÕå LF#~#foxÍÛKÌBLÍÒKÊÉK~#ÍÅnýKÍÒKáÑÁÃLVÍÛKÈ>"ÃÅnÅG:{A§xÁÉÍÛKÊmoå*|A+~<ÊL=ÊL###~þÂLå*rAãÉáÃmoë!†Kå*xAéå*|A~á=ÖÒL/<ÍBLÈõÍ1Lñ=Ã'L> ÃÅnÍÛKÈ>,ÍÅnöÉåÕÅW*|A#^ ÌlLÊfL+†=»ÚfL:A=ÊfLÍmozÁÑá§Éõ{ÿÖÚ~Lõ{Æ_ñÃpLñÉÍÅC|·ÂºLÅÕå}ÍþiþÊ™LþÂJm`i"TA++"|A!ÅL"rA!ÀL"pA¯2wAÍMáÑÁÉÍÖCÃKBñáÃ3eÅÕͶl}“o|šgþÿÒâL> ÍÅn+|µÂ×LÑÁáÃmoå!A"|A!"TA¯2wAÍMáÉå!‚A"|A!"TA¯2wAÍMáÉ!zA~6#wÉÕͲC n&ÑÉåÕͲC ^#VëÑÍáP|·áðÍàC!JMÃàu‘:aA§Ê?Bá^#Vë¯2aAéãÕ^#V#ë"_AëÑãÉå!"_Aá:aA§È*bAåͲC nÃVBá~!¡MÍäXNʘMÿÍÖCi&ÃVBЉ ‹ÍàCÍiyÄYwÉáPOP Í5NÍQNÍWNÍ5N€ÍQN€ÍWN€Í5NÍQNÍWNÍcNÍ5N�ÍQN�ÍWN�ÍcN�Í5NÍQNÍWNÍ5N‚ÍQN‚ÍWN‚Í5NÍQNÍWNÍcNÍ5NƒÍQNƒÍWNƒÍcNƒÍrNÍ�N^#V#åëÍœNá"ÁMáÑÁã*ÁMãÉÍrNÃ;NÍrN^#åÍZOÃlNÍrN^#V#åëÍ–NÃANã"ÃMáã~2ÀMáã"ÁMãÍÅCÅÕå*ÃMå*ÁMÉ:ÀMÃŽo:ÀMÃÍo:ÀM·ú®NÍ»NàuBvávUvæÍ»NšsŠs¢r„q‡ãÍp~#foãÉö¯ãÕÍŽoÑöã:q§ÊÛN†2q#ãÐÃHBö¯ãÕ^#V#Õ^#V#ãͰoáÑãÉö¯ëãÕ^#V#ãåͰoÑáãëÉö¯ÕåÍ¥oáÑÉö¯ãÕ^#V#åëÍ¥oÃòNö¯Õåë͘oáÑÉö¯ãÕÍŽoÑãÉö¯ãÕ^#åÍZOë͘oáÑãÉö¯ãÕ^#åÍZOÍ¥oÃFOë&€ÿ)))ëõͲCñÉ>!>!>!>!>!>áÕ^#V#Õ^#V#ãÞP>!>!>!>!>!>áÕ^#V#å!qÞP>ÃÆO>ÃÆO>ÃÆO>ÃÆO>ÃÆO>ãÕ^#V#Õ^#V#ãýP>ÃðO>ÃðO>ÃðO>ÃðO>ÃðO>ãÕ^#V#å!qýP>ÃP>ÃP>ÃP>ÃP>ÃP>ãÕ^#V#å!qÃÄP>Ã@P>Ã@P>Ã@P>Ã@P>Ã@P>ãÕ^#åÍZOqýP>ÃiP>ÃiP>ÃiP>ÃiP>ÃiP>ãÕ^#V#å!øCëýP>Ã’P>Ã’P>Ã’P>Ã’P>Ã’P>ãÕåøC!qýPÅéPÅ ë GÍ;R ÁʹPáãëÉÅÃÈPÅ ë GÍ;R ÁáÊÜP~#foÃÞP##ÑãÉÍàCÃÁwö¯ÍàCú uë͘oà uö¯ÍàCò@uë͘oÃ@uëãÕ^#V#ãÍQëáãëÉÕÅÍ-xÁÑÉö¯2ŒAÍÅCÉö¯ÍÅCõÃ6Qö¯ÍÅCõö¯ÕÅõÍÍoñåõÍmQñÑå͘oáÁÑñÈ|·ÈÃKBö¯ÍÅCõÃdQö¯ÍÅCõö¯ÕÅÍmQÃJQ·ò„Q:ŒA·ÊºQ!ùCÍšsÍ@uÑQ:ŒA·Ê½Q!ýCÍàu:q·õæ2q:qþ�ÒÙQÍãQ:q·Â±QñóQñð|/g}/oÉÍ@u:qþ�ÚãQ!qâQÍ;RþÂÙQ!€ÉÍÖCÃHB€�:qgo·ÈW*q|7õgÒÿQ:q·ÂÿQ+>�’ÍRñÐ|/g}/oÉþÚR!ÉÖÚ,RG|Ê(R·ÃRo&ÉÆ Gȯ|g}oÃ/RÍER>ØÈɧÂRR~§È+~?É~§Â]RöÉ+®#øÒjRë–À+ òjR¯ÉÍÅCÅÍþUÔ²Rë~#¶#¶++ÄÌVÕ>Í p+V+^+ë·Ê¥R+r+sáÍWÁÉáÁÉÍÅCÕëÍxRÑÉÕ~Í5VÑÉÍÅC†ÚKBÕåÕͼUãÍÜRáãÍÜRÍLVÑáÍLVëÉå~#õ~#foñëÍ pëáÉÍÅC|§ÂKBÅBKÍ&SPYÁÉÍÅC|§ÂKBÅBK •ÒS o¯_ÃúRÍÅCz´ÂKBÅÕz³Ê.S »Ò4S_“½Ò:So}`iÍ5VÑãÍLVDMáÉÍÅC|§ÂKBå!9>Í$VñÉ>ÃxS>ÃxS>ÃxS>ÃxS>ÃxS>ͯS!È+É>ÜS>ÜS>ÜS>ÜS>ÜS>åͯSáãÊ«S~#foãÉ##ãÉÅÕåõGN§ÊÛSy§ÊÛS#~#foë~#fo¾ÂäS#ÊÚS ÂÊS y°ÊäSyÖ<.ÚîS)ÊîS)ñ¥áÑÁõÍLVëÍLVñÉ~õÍLVño&É~§ÊKBÕ#^#V++ÑõÍLVño&ÉÍÅC~<ÊKBÅÕååͼUã~õ#~#foñëåÍ p6á+ÍxbÍU[Í€YáÍLVáÑÁÃLV!ð;Ã[T^T"aTdT:gT!jTmTãpTsT|vT}yT||THT ‚T…TÍjÅÕ_!RT4˜T5*ST"ST~#N#F#‡ÚØTú²T ÍpÛTy“xšÒ½T ÛTå+++6@#y“w#xšwáÑÁ+++6###É!RT~6þÚéTÍþTØTÍHU*ST#~“#~šÒ˜TÍÖCÃBBÕ!å*UT"ST~#^#V#‡ÚEUú$UÍpÑÕà Uã|µÂ0Uáåà Uñ++~ƒ_w#~ŠWw#åà UÑÑÉÕÍþT*UTDM~#^#V#‡Ú¢UòbUÃQU+z¾ÄV+{¾ÄV##¯{zë~#q#pë_§ÊQUy½Â—Ux¼Â—UDMÃQU~#—UÃQUYP+++ë"ST6@###{•_zœW+r+sÑÉ·ÊñUõ*YT|µÂÏUÍÖCÃEBñõå͈Tã^#V+ë"YTáñëw#s#r++ë+r+s##ëÉ!øUýUÉÕë*§W{•zœ*©Wë?ÒV}“|šÑÉåÅÿ~# §ÂVyÁáÉÅÕGåͼUãxëÍ páÑÁÉÅÕåÕGͼUxÁãÅ#N#Fá& Ã-VÍþUÐÍÌVÃWÅÕå*§Wë*©WëÍpÊ{VÍOWÊuVÍÌVåÍWá###Ã\VáÑÁÉÍ¡VÍÒX during G.C. ŠÃ=AÍ¡VÍÒX ŠÃ=AÍÒX Internal Error - String Space CorrupôÉ#ÅN#Få*UTy•xœÚW*WTy•xœÒWáÕ++å`i+V+^áÍp–V##Ñ6+6+~6  >@¯ÁÉá++ÁÉÕë*YTë"YTs#r+ÑÉÕÅÍHUÁ*ST#~‘_#~˜WÒ?WÍÖCÃQBr+s##6€"WT###ÑÉë!YT~#fo´ÊcWÍpÂSWëÉ<ëÉ*UT"STë*WT}“o|šgë6@#s#r#6€"WT*©Wë*§W"YT}Æw>Œ#w##ÍpÂŽW++6+6É[TˆT>Ã×W>Ã×W>Ã×W>õåÕ~·#^#VëÑÊÎW+r+sëÑñ=¼W>ÍàCG~Owy#ÂÛWÉïÃïW>2èW|§Â*X+})ÑÕëN#¹Ò&Xë~#foë ãë:èW§ÂXñéå!9"JA!OA4É ñéá~‡Íp#åÃKB!OA4!9"JAá^#V#åëé!OA~ÖwÚ6B!9"JAáÉ|·ÂKB}þÚKB!€AwÉ|·ÂKB}þÚKB!ƒAwÉáÕÍ�oÑåÍÅCÍ£Xn&ÉãÕÍ�oÑãÍÅC|·ÂKB}õÍ£XñwÉÅÕ:qþ�ÚºX:q§úºX!ÀXÍàuÍruÑÁÉ€‘§Èõ~ÍYoñ#=ÂÆXÉãÍØXãÉ~æÍYo¾#ÀÃØXÅG~#¸ÊôX§#ÂæX++´ÁÉõÍÿXñæÆ0þ:Ú YÆÃYoͯ y<<Í€&y!yÍ›&Í’&å!Í×&Ñ))Tͦ&Íø&Í’bò\Y*q}/o|/g#"q|ÀÍ�YÍÁwÃ\Y!q~î€wɯ2qÉÍ’bàúwYÍ@uÍ�YÉ*qÍ�YÃÁwÍ’bÐüwYÍ u>>Ã2[~·ÈÍ%A#Ã’YÃ%A+Y!qðY>Ž!qq2·Y¯Ž# ¶YÉ!qÚs!qÍ—ZÍ1q>È>ÚÙY>ÿ§É|’À}“É+É!M[ârÍ_ZÍHx+6¸!q>¸�Íãt¯2qÉ!I[ÃUv!E[âr!qâr~ƒ_#~ŠW#~‰OÉÍ’yÃãu!bÃàuÍ“wÂ2Z¯É‡Ÿ<ÀÖÉáÉo&Í�YÃÁwë*qãå*qãåëÉÍbZë"q`i"qëÉ!q^#V#N#F#É!I[ÃávÍ€yxþ˜{Òuy!q6€ÍUxwg>˜�ÍÝyÉÙyÛZë:4YGw#›ZÉ–ZðZ!q—ZÕqÍ’bØqÉÍ’bòŽZ*q|µÈ|ŸÀ<ÉÍ’b*qøâêZͪZ!bͤZÍÀYÍpYÃíZÍ$Z:q·õæ2q:qþ�ÒocÍqZ:q·Â[ñëÃ[ñëò[|/g}/oÃ-[!ocå:qþ�Ò6[ÍqZëÑ"q>24YÉ€�Í*ZÀajÃ,[ „ÍÌÌÌÌÌL}ÍdYÍŠYö¯ZcÅõ>2 Yñëÿ`hÌ-[ë~þ&Ê­bþ-õÊ„[þ+Ê„[+ÍxbÚk\þ.Ê\þeÊ–[þEÂÀ[åÍxbþlÊ®[þLÊ®[þqÊ®[þQáÊ¿[:4YþÊÙ[>ÃÙ[~þ%Ê\þ#Ê/\þ!Ê0\þdÊÙ[þDÂð[·Í9\ÍxbÍ£bÍxbÚÞ\Âð[¯“_å{�_ôH\üX\Âô[áñåÌ;YáÍ’bèå!9ZåÍ6[ÉÍ’b Âð[Ü9\Ä[Íxbñå!9Zå!ÎZåõÃð[·Í9\ÍxbÃð[åÕÅõÌiYñÄ€YÁÑáÉÈõÍ’bõäkZñìZñ=ÉÕåõÍ’bõäZñìãYñáÑ<ÉÕx‰GÅå~Ö0õÍ’bò¤\*qÍ ÍÛYÒ \T])))ñO |·úž\"qáÁÑÄ[yõÍwY7ÒÀ\t”$Í*Zò½\ÍkZñÍÓ\Ø\͇YÍZͪZñÍ;Z͇YÍÀYØ\ÍDZÍ;ZÁÑÃZ{þ Òí\ƒ†Ö0_úÃã[·Ã']ñå!qÍ’bâ]:#qÃ]y®áÃ']:qÃ#]ñññ:qÃ']ñ:q/Ã']Ãoc¯Íµ]æÊ5]6+ëͼZëòG]6-ÅåÍ;YáÁ´#60:7YW:4YÚÚ^ÊÒ^þÒ¾]ÍÃa!YF :7Y_æ Ê€]x¹*€]{æ€]AqÍxbÊ ]þEÊ ]þDÊ ]þ0Ê€]þ,Ê€]þ.£]+60{æÊ®]+:LAw{æÀ+pÉ27Y!Y6 ÉÍDZë*qå*qåëõ¯2YñõÍi^Eå~¸Ê ^þ:Òê]þ0Úê] #~·ÂÛ]>D¸GáÂÙ]ñÁÑë"q`i"qëÁÑÉÅ#~þ+ÊQ^þ-Ê(^Ö0Ox‡‡€‡�GþÒQ^#~·Â^`ÁxþEÂF^y„þ áÒú]>€2YÃV^|�þáÒú]Ã>^ÁáÃú]ñÁÑë"q`i"qëÁÑÍTZ#þåÞWÍe`õ:Y·ò„^ñ‚ÃŽ^ñ‚ú’^ºÒ’^ÖáõÍa60ÌiZÍ+a+~þ0Ê¡^þ.ÄiZñÊÓ^õÍ’b>"�w#ñ6+òÄ^6-/</Ö ÒÆ^Æ:#p#w#6ë!YÉ#ÅþzÒZ_Ú÷_Íü`ÑzÖôØ`ÍÃa{·ÌáY=ôØ`åÍc]áÊ _p#6!Y#:5Y•’È~þ Ê_þ*Ê_+åõ"_ÅÍxbþ-Èþ+ÈÕ_:LA»{ÑÈÁþ0ÂR_#ÍxbÒR_++wñÊH_ÁÃ_ñÊR_á6%ÉåÚþ_Êv_bÍÆYú„_áÁÍ*]+6%ɶÊÍ*Zòm_ÍŽZÄe`áÁú©_Å_x’“ôØ`Íï`Í+a³Äè`³ÄaÑÃö^_y·ÄV\ƒú´_¯ÅõüX\ú¶_Á{�Á_‚xúÒ_’“ôØ`ÅÍï`Ãã_ÍØ`yÍaO¯’“ÍØ`ÅGOÍ+aÁ±Âî_*5Yƒ=ôØ`PÃÿ^åÕÍwYѯÊ`ÍŽZ7Äe`áÁõy·õÄV\€OzæþŸW�O“õÅüX\ú$`ÁñÅõú2`¯/<€<‚GÍ+añôá`ÍaÁñÂU`ÍáY~þ.ÄiZ"5YñÚ\`ƒ�’Åͱ^ëÑÃÿ^Õ¯õÍ’bâ‰`:qþ‘Ò‰`úa!qÍ—ZÍ ZñÖ õÃn`Í»`Í’bêž`C‘ùOÍ*Zä`bÍÆYò·`ñÍI\õÃŒ`ñÍX\õÍ»`ñ·ÑÉÍ’bêÍ`t”ø#Í*ZÃÓ` bÍÆYáò¯`é·È=60#ÃÙ`Âè`ÈÍa60#=Ãä`{‚ ÍaÅõåÕ/áå>žÍ­YÒTaá>ŽÍ­Yëáp#ñÁ=ÂKaÅå!qÍQZÇaÅåÍ$Z>ÍqZÍTZáÁ¯hb?ÍaÅõåÕÍ_Zá/{–_#zžW#yžO++Ò›aÍZ#ÍTZëáp#ñÁÚ�a>ÃÉaÕnb>ÍaÅõåëN#FÅ#ãë*q/}“o|šgÒÜa"qÑáp#ñÁ=ÂÉaÍawÑÉù¢áÿŸ1©_c²þÿ¿É¶€¿É¶€Æ¤~�@zóZ rN ¥ÔèèvHä TÊš;áõ€–˜@B †''èd #~þ:Ðþ Êxbþ Êxbþ Êxbþ0?<=É:4YþÒŸbÖ·7ÉÖ·Éþ-Èþ+È+ÉÍxbÍ5cþOʾbþHʾb+ÍÊbÚÓbëÍ-[ëÉþH#ÊÿbÃÙbÍÖCÃHBÅMë!ÍëbëÚéb}‘§ÁÉÖ0?ÐþÐ)Ø)Ø)صoÃëbÅMë!ÍcëÚc}‘§ÁÉÍ5cÖ0?Ðþ Ú'cÖ?ÐþÐÆ )Ø)Ø)Ø)صoÃcþaØþ{ÐÖ ÉÎZÅÍ’bø:qþ�À:q·ø€‘ÃZõ: Y2Yñõ¯2 YñÉÍÖCÃHBÍÖCÃHBÍ$1@T;Í+1³ÍÄ/<<Ãg1Í!ÍÛ/))))TÍ#/Í0Ím,Í\)Í01<<Í71Í1³C1ÍË0Jü;¡1Ã�1ÍD1!ÍJ1))))TÍU1ÍX1Í[1Íe)ÃÂ1Í‚1Ía1<<Í–1))))TÍ“1ͬ1Í™1Íœ1Íó0·DÍ<1<<Ãõ1Í¢1!͈1))))XÍ·1ͺ1ͽ1ÍÅCÅÕ}ÍþiÊMmþÊJm!' ~·Êld þÊld#~·ÂadÅ`iÍHfÁÃBd>€–O #~ÖÖŸgoÑÁÉPY!' ůwÍ|f:¨@ÍBiþÿÊhm=Êbm= dѯÍÃSm<ÊhmÁ!% ^#Vr+sÉÍÅC}§Ê©iÅÕå!"(dáå}ÍþiÊõdÅ PYÕþÂëd!âdåå`i>ÃDe!' ~·ÄwdÑÍ|fÍÁÍœjáÑÁÉÍÅCÅÕ}ÍþiÊMmþ!&Âe!® ~+ngÑÁÉÍÅCÅÕ}ÍþiÊMm! n&ÑÁÉáñåõ*TA~þÊGmþÊ\lñÕÅDMõ'~þ€åÌtdá4N#ñõVþ pÊheÆàzˆw ñÁÑwáÉ+s#r#6€#6€áãDMå:¦@·Ê“e!" s#r#6ÃØe! {zVºÊÐeÕõåÅucÍÑÕÍÑáñwÕÕÍÑ<ÂÎeÍ<ÊhmÁÑ!! {æwá:7m·ÂåeÍHfáÉ!! ~þõuc!) ÕåÌfÍtdÑáñÌfáÃ>mÅ€~# fÁÉÅå*TA~þÊŠl( ~·Ê3f+~#5–O ~·áÁÉ+~·Ê?fÍEfÂf7áÁ>É*TAÕT]% N#F+q#p##å€#6 Â]fÍ|f:§@ÍBi·>Âuf>€áw+w·ÑÉÅÕå!(ëÍáÑÁÉÍfØþ7?ÀÅå*TA' 6#67áÁÉå~·Êemõ#^#fk_þÚÅfN#~þ:ÊÉf++@ÊemyÖ@ÚemþÒemd #úg~þ.ÂófÍgñ7õÃßf#Âàf¯2dñáõÍLVñÉzþ ÊemþÚemÈ> ÃgÊúf> ÂgÃúfÍÅCÅÕåëͨfucÍdÍ<Ê\m!õcd> Í páåͨf:d!õc¾ÂkmdÍ<ÂVmõcÍáÑÁÉÕÅ*&d~·ÊJm#N#F++ÍLV æßþOʳgþIʳgþRÂJm*(d|µÂ³g!€"(dáÕ}Ñ_ÕÍþiÂÆgÍœj{ÍþiÂYmÑzáÅÕͨfÑÁÅõ ÍØjñá"TAå#d> Í p66ÑÕÍ|fáå~þÂhÕÍÑÍ<ÊhmÃ'hÍ<Â'hÑÕþÂ\mÃhÑÕ!%¯w#w#w#wá~þÊChþÀÍEfÉ) €p# ÂIhÉåÕÅÍ©iÍõ Íñ_ÍÁÑáÉÍÅCÅÕåͨfucÍdÕÍ<ÑÕõÄñÑÊ\mÍáÑÁÉÍÅCÅÕå!d6# Í:iúhÍÅCÅÕåͨf¯2d!dÍ6i!dÍ6iucÍdÍþÿÊ\m懇‡‡‡O!vc  ~#Í”nyþ i~þ Êi>.Í”n Âóh:AÆ W:€AºÚ"i> Í”nÍ”nÜ‘ndÍþÿÂãháÑÁÉ~þ*À6?# Â:iÉÕOÅÍÁÑõ!!4ÂZi#4ÂZi#4yþ"Âoiñ·ÈþÊhmþ>È<ÉñÉ"&d>2ZAå!Ål"[Aá:XA§À<2XAå*VA"*d!½i"VAáÉÍÅC"(dåÕÅÍzgÁÑáÉå*hA|µÊ»i##n͹dêiáÉ.Í´d**déÍÅCöÃÒiÍÅC¯2,dÅÕåÂúj"-dëÃújÍÅCöÃîiÍÅC¯2,dÅÕåÂûj"-dëÃûj§ÊMm<ÊMm=_å!hA~#fo´Ê"j##{¾Ê8j++Ãj*hAåÍAj"hAÁq#p#s#4#5++###DM §áÉÅÕ!jA"/d~#fo´Êzj+V+^##å*(d{•zœáÚFjBK^#V+å*/ds#r!¹ DMáÃŒj¹*(då DMÍ%WÑs#r#å 6# x±Â�jáÑÁÉÅÕå !hAT]~#fo´ÊMmx¼Â§jy½Â§j~#~+ë*jAë"jAs#ráÑÁÉþÀ*(dÕ€|µÊèjë!© s#r¯#wÂòjÑÉö¯2×j}ÍþiþÂJmÅ!­ ^#Vå:,d§Âk*-dëá{²ÊPm+s#rÁÅ!° ¯w#w!© ~#foëÕå!€Í8máÂMkËkBK>ë!å)ãÒ`k)#Ãak)ãë)ëÒok ãÒnk#ã=ÂVk}æ_Á}la)ÚkmÒ†k#x·Âkm"ÑjáÁå!² "Ój!) "Õjáå!€}“o|šgÑÕÍ8mÚµkbk:×j·Êûk€Í8mÒÊkåÍláÅDM*Õjë*ÓjÍOl"ÓjPYÁÍlá}“o|šgµå*Ñj#"Ñj˜kááÑÁÉåÍláÅDM*Ójë*ÕjÍOlë"ÓjPYÁÃàkö¯27mÅÕå*Ñjë!« å~#foÍ8más#rÂ>l:7m·ÊKl!KlåÅå!& ÃoeáÑÁÉÅ~# x±ÂPlÁÉñÕÅõDM͸lÊ_mÍ­l!± ñwõ!( V6þ Ê…lÆàzÎwñÁÑáÉÕͶlÊ_mÍ­l!± ~·ÑáÁÉ!©Ã¨l!° ^#VÉ!° s#rÉDMÍ¥lÕÍŸlëÑÍ8mÉÅÕ}ÍþiÊMmþÊØlþÂJm`i"TA!èl"]AÑÁÃmÍ�fÐÍÖC!>ÃVBÍÅC|²ÂKB,Ê m-:ZA·ÊMmå*[AãÉ!A"]AÅÕ{ͼUåf$%Ê3mÕå!,må*]AéáÑÃmáÑÁÉ|’À}“Éå!"TAáÉñáÉ>6>4>?>=>:>7>5>2>3>@>C>ÍÖCo&ÃVBÍàC!"TA!fI"fJÈm:Iæ™mÍÒX? Ã™mpÍ¿nÃÍm:�n·>\2�n³mʘmÍ”n+ÊÇm~Í”nÃÛm+Í”nÂÛmÍ”nÍ‘n!fIõ¯2�nñÃÞmÍ¿nOþÊŸm:�n·Êôm>\Í”n¯2�nyþÊ^nþÌ—n7Èþ Ê…nþ Ê^nþ ÂnÊ™mÃ^nþÌ—nÊ™mþÂ6nÊ™mÍ”n> Í”n>ÃÀmþÂ@n>#ÃÇmþÂYnÅÕå6Í‘n!fIÍ©náÑÁÃÛmþ ÚÛmx<>Êinyq#Í”nÖ ÂÛm> Í”nÍ¿n·Êvnþ ÊÛmÃÞm:IæÌ‘n¯wÉèCÃYoõ>^Í”nñõö@Í”nÍ‘nñÉ~§Èþ ¸nõ> Í”nñÍ”n#énÍAÉå*|Aþ ÊÜnõ#~+<ÊÛn=–Ümoñõþ ÌDoþÌGoþ Úín4+~#<Êo=Â@oñþ ÊKoáÍ%Aþ ÀõÅ:„AGÊo¯ÅÍ%AÁà oÁñÉ:YA§Â5o<2YAå*VA"Ãn!wo"VAáñþ ÊKoÍ,AáÉ*pAé6É5À4É> ÍÅn~=æÂKoáÉå*|Aå!A"|AÍÅná"|AáÉ> ÍÅn> ÃÅn:‚A=ʈo> Í,A> Í,A*Ãnéö¯^#V#å͘oáÉ·!qò´o!qïo·qò´oqö·ü´ow#w#w#w#É·òÚo>ÅqÃào>ÅqÕÅoõ ~#ñ=ÂäoÑÁ!ÅoÉ#~þ Ê÷oþ Ê÷oÉ…oÐ$ɧÈÅGw# pÁÉ{­Àz¬É6#ÖÒ%qÉÍUu$q·Ê`qÍ™yOÊeq!¡yå!q®yø#–Â]q+ÂPqÁÉ©ÉÍ™y?ÉáyåÍIráÍiyÍ uÃ~qåÍIráÍuÍ,r!qÍUuÊêq:q·Ê™y:$q/¸�NÍãtñüýs¯2q:qõÍJtÍ™yÁxð/<É!q~5·#Ê$rÉq!qNwy#Â4rÙyqëÃXu!qÃUu!qÃluÍÌu!Ìuãé!$qÃfr!q>ÑF+N+Å=Âirëé!qÃ}r!q>ÑÁq#p#=€rëé!qârá"KpÍtrÍcrÍOr*KpéÍUuÊPy:q·ÊPy!#qN#FÍ9wÍÌtq·ÕÊßrÅGÜtÍuxÁ ÂÈrÑ¿rÃJt!qÍëtÃ×r²jöô¢0 TeÂB׳]�Âh!¢ÚI�.›kÁ‘ €�åÍIráÍiyÍ uÃ&såÍIráÍu!qârÍŠM!qÿq#~æ€ö++w+qÂAsÙy€DNnƒù"~€‚`Þù3ó5�zÏÑ÷r1{ÏÑ÷r1€Àh!¢ÚI‚ÍUuÊ™yyî€O2#qàsÍUuÊ™y:q·Ê,r�Ò²s/<õÍ,rñþ9Ò™yõ:#qOÍHxG¯2qñ!#qÍãt:q2qx!qq·ò1tÍtÒésë4Íu:q·üýs!q~æ€++®wÙy!q4À#Ât4Ê,s+6€É!qq¯Ž# Âtɯž# Â'tÉÍ'tÒJt/!q¯Oyžw#ÂBt¯G:q·Âst!qVwz# ÂXtxÖþÀÂKtÃPy!q͆t·òktx·Êés!q†wÒPyÃés~w# ˆtÉåÍIráÍiyÍ uçtåÍIráÍu!qÚsåÍIráÍiyÍ uÃÃtåÍIráÍuÍ,r!qÊsy2#q!qRp~q+ÂÙtÉqåÖÚútáåNsY+ÂïtÃåtÆ W¯áÈå~w+ÂuÃýt!qÃuÍÁwà uÍiy¯!qw#Â&uÙyÍ7u}ÉÍluÍ@uÃruÍluÍHx!qF#^#V#NÃ0yÍru}Éq~#ÂZu·G++NÈyáyqÃXu!qÍiy>�¸Ê¯uÒ‡uÍŠM�Í’yͽuÍ€yëÊ«uë!q6€ÍUxg>˜�ÍÝy|ÔxëÉ!É>€©²³Â�uakÉÍiyÈõüÌuÍYwñúÌuÙy!q~·È+>€®wÙyÍÓwÃãuÍŠyÊ™y:q·Êry�Òöu/<Í$xþÒ™yõÍHxgñåÍÝyñ·!qò(v~ƒ_#~ŠW#~‰OÒ0y#4Êy.ÍóyÃ0y¯�G~›_#~šW#~™OÜxÃrxÍÓwÃEvÍŠyÊ™y>€©OÃæuÍÓwÃXvÍŠyÊxÍ™yȯ�GÍ9wë"qëy2qF¯oÍxÍ$x!Då*q:q‰OÒ•vqë4ëÑÊyívÑͽvg.å*q:q‰OÑz‹ÑÒ–vͽvg.ÿå*q:qãvx<=úÔv{_zWxG)yOŸëãéHGáÃ0yÍÓwÃävÍŠyÊuyÍ™yÈÍ9wyÅ+FÅ+FÅ+FÅw`hã|·Ê1wgyãÒw:q‰O|g}oxGã-| wáã}·ÂwÑÃrxáElaOÃw!q~€G¨xòQwÆ€ÊOywÍHxw+É·áúyÃPyÍ€yxþ˜{Òuy!q6€ÍUxwgúwwz³Âvw >˜�ÍÝy|ÔBy{õ>˜2qÍrxñØ/<Éx±Ê™y!¡yåÍ™yy/È!q®~ðÍ®w©É#~¸À+~¹À+~ºÀ+~“ÀááÉLUX)!�€"qÜxÃrxëÍ]xëÍÁwÁÑÍ$xÉëz³Êxz·Büx|¨G|µÈ|·ëüxÅÍ©yñ·üxëÉÍŠM‰¯O“_yšWÉ!q~/w¯o�G}›_}šW}™OÉÍ]xÍuyÁÑÉ|µÈë|µÈDM!>)ë)ëÒCx =Â;xÉ!q~7w?##wy7O®É*qãå*qãéáã"qáã"qÉajSX͹xÊPyJS\E!q–ÒPy/õ·ÃÄyõå ÒÃyñ7>á{_zW}o|gñ=ºy|·g}oÉÖÚìyCZQÃßyÆ o¯-ÈyOzW{_xGÃïyqë*qDMÉ^#V#N#F#x·Èyáy:q·È:qŸ·7ÀÆÉ|/G}/O!>õ·ÃÄyõå ÒÃyñ7>á{_zW}o|gñ=ºy|·g}oÉÖÚìyCZQÃßyÆ o¯-ÈyOzW{_xGÃïq‰OÒ•vqë4ëÑÊyívÑͽvg.å*q:q‰OÑz‹ÑÒ–vͽvg.ÿå*q:qãvx<=úÔv{_zWxG)yOŸëãéHGáÃ0yÍÓwÃävÍŠyÊuyÍ™yÈÍ9wyÅ+FÅ+FÅ+FÅw`hã|·Ê1wgyãÒw:q‰O|g}oxGã-| wáã}·ÂwÑÃrxáElaOÃw!q~€G¨xòQwÆ€ÊOywÍHxw+É·áúyÃPyÍ€yxþ˜{Òuy!q6€ÍUxwgúwwz³Âvw >˜�ÍÝy|ÔBy{õ>˜2qÍrxñØ/<Éx±Ê™y!¡yåÍ™yy/È!q®~ðÍ®w©É#~¸À+~¹À+~ºÀ+~“ÀááÉLUX)!�€"qÜxÃrxëÍ]xëÍÁwÁÑÍ$xÉëz³Êxz·Büx|¨G|µÈ|·ëüxÅÍ©yñ·üxëÉÍŠM‰¯O“_yšWÉ!q~/w¯o�G}›_}šW}™OÉÍ]xÍuyÁÑÉ|µÈë|µÈDM!>)ë)ëÒCx =Â;xÉ!q~7w?##wy7O®É*qãå*qãéáã"qáã"qÉajSX͹xÊPyJS\E!q–ÒPy/ D=Directory On/Off Q=Quit | |--------------------------------------------------| |----- No File Menu -------|------- Edit Menu -----| | B=Big Letter Creation | A=Alpha-Graphics | | E=Load & Edit | E=Eraser | | M=Move & Edit | M=Merger | | P=Printer Menu | R=Reverser | | S=Slide-Show | S=Save | |==================================================| Command ? Thió  ió  thå  menõ yoõ wilì seå wheî yoõ ruî  thå  GFØ � prograí  oî thió disk®  Thió ió thå "Nï Filå Menu"¬  anä  iô � supplieó á lisô oæ singlå letteò commands®  Simplù typinç  á � letteò  startó  thå prograí oî thå choseî courså oæ  action® � Thå  "Ediô  Menu¢ commandó arå includeä herå aó  á  remindeò � beforå  yoõ  enteò thå "Edit¢ mode®  ALÌ oæ  thå  "Nï  File¢ � commandó  (excepô "Printeò Menu"© deposiô yoõ iî thå  "Edit¢ � modå upoî thå completioî oæ thieò respectivå functions. Wheî  yoõ  chooså á commanä letter¬  thaô  letteò  wilì � precedå  (surroundeä  bù parentheses© anù otheò promptó  yoõ � musô  answeò iî ordeò foò youò commanä tï bå  executed®  Yoõ � wilì  noticå thaô onlù onå otheò menõ ió provideä  for¬  thå � "Printeò Menu"¬ whicè ió discusseä later. Š---------------------------------------------------- All Menus ==> D=Directory On/Off Q=Quit ---------------------------------------------------- D=Directory On/Off Á  `toggle§  commanä  whicè turnó  thå  disë  directorù � displaù oî anä off®  Yoõ maù typå á "D¢ anù timå yoõ seå thå � "Commanä ?¢ prompt® Q=Quit Tï exiô thå printer¬  edit¬ oò nï filå menuó typå á "Q¢ � aô thå "Commanä ?¢ prompt. ------------------------------------------------------------ ************************************************************ -No File Menu- ************************************************************ B=Big Letter Creation E=Load & Edit M=Move & Edit P=Printer Menu S=Slide-Show ************************************************************ ------------------------------------------------------------ B=Big Letter Creation ------------------------------------------------------------ Threå  timeó yoõ wilì bå askeä foò "Inpuô Linå ¢ anä á blinkinç cursoò iî thå uppeò  lefô � corner®  Uså  thå  arro÷ oò taâ keyó tï  movå  thå  blinkinç � cursoò  tï  thå placå yoõ wanô thå firsô characteò  iî  youò � filå tï appear¬  theî presó ® Thå screeî clearó anä youò � desigî  filló  thå screeî iî thå choseî position®  Yoõ  wilì �Štheî seå thå "Ediô Menu¢ prompô "Commanä ¿  (A,D,E,M,Q,R,S)¢ ------------------------------------------------------------ S=Slide-Show ------------------------------------------------------------ Tï creatå á slidesho÷ oæ youò GFØ fileó iô ió necessarù � tï  understanä  thå  (A©  fivå  typeó  oæ  informatioî  thaô � compriså á Slide-Sho÷ file¬  anä thå (B© propeò constructioî � oæ  thaô file®  Afteò supplyinç thå Slide-Sho÷ filenamå  yoõ � wilì seå thió prompô oî thå screenº ******* Press ANY KEY to stop the Slide-Show ******* ------------------------- (A) Types of Information: 1) Slide-Sho÷ Filenameº  Anù namå maù bå used¬  buô thå filå �    typå oæ ".MFX¢ musô bå used. 2) Filenamå oæ á Slideº  Á ".GFX¢  typå filå yoõ havå createä �    witè thå GFØ program. 3) Timå oî screenº  Thió numbeò ió multiplieä bù onå  seconä �    foò  á totaì lengtè oæ time®  Thå valuå musô bå betweeî ± �    anä 65535. 4) Typå  oæ screeî erasureº  Therå arå teî typeó oæ  erasurå �    accesseä bù thå numberó ± througè 10:     #1 = Normaì Erasurå - Instantly¬ alì aô once.     #2 = Toð tï Bottoí - Onå linå aô á time.     #3 = Bottoí tï Toð - Thå oppositå oæ #2.     #4 = Lefô tï Righô - Onå columî aô á time.     #5 = Righô tï Lefô - Thå oppositå oæ #4.     #6 = Sideó tï Middlå - Onå columî oî eacè side®     #7 = Middlå tï Sideó - Thå oppositå oæ #6.     #8 = Top/Bottoí tï Middlå - Onå linå eacè (Top/Bottom)     #9 = Middlå tï Top/Bottoí - Thå oppositå oæ #8.     #10= Sideó ¦ Top/Bottoí tï Middlå - Twï columnó oî eacè �           sidå theî onå linå toð anä bottom¬  repeateä untiì �           thå middlå oæ thå screeî ió reached. 5) Falså filenameº  Iæ thå lasô entrù iî youò "MFX¢ filå  ió �    "0,0,0¢  theî  thå  Slide-Sho÷  repeató untiì  á  keù  ió �    depressed. ---------------------------------- (B) Structure of ".MFX" type file: 1) Uså Wordstaò tï creatå anä savå á non-documenô filå  witè �    thå filå typå oæ ".MFX" 2) Eacè  linå  oæ  thå filå musô bå followeä bù  á  carriagå �    return¬ INCLUDINÇ thå lasô line. 3) Aî  optionaì  featurå oæ thå Slide-Sho÷ functioî  ió  thå �    additioî  (aô thå enä oæ youò MFØ file© oæ á falså  entrù �    oæ "0,0,0¢ whicè telló Slide-Sho÷ tï continuouslù  repeaô �    thå sho÷ untiì anù keù oî thå keyboarä ió depressed® 4) Eacè  linå  oæ  thió "MFX¢ filå containó á  filenamå  (NÏ �    Filetype)¬  á timespan¬  anä aî eraså number®  Herå ió  á �    samplå "MFX¢ file:     HELLO,30,3     DITTO,10,4     YOURS,1,1 Š    0,0,0 ------------------------------------------------------------ ************************************************************ - Edit Menu - ************************************************************ A=Alpha-Graphics E=Eraser M=Merger R=Reverser S=Save ************************************************************ ------------------------------------------------------------ A=Alpha-Graphics ------------------------------------------------------------ Therå  arå  twï  promptó whicè accepô inpuô  witè  thió � function®  Á blinkinç cursoò showó positioî anä thå positioî � doeó noô changå froí functioî tï function®  Thå firsô ió thå � functioî  prompô anä thå seconä ió thå graphiã numbeò  inpuô � prompt: A=AlphaNumeric G=Graphics M=MoveCursor =End> Input Graphic Number (1-32) ---------------- A=Alpha-Numericº  Tï  enä  thió functioî anä returî  tï  thå � functioî prompô enteò aî ® Thió  ió somewhaô likå typinç excepô thaô thå  carriagå � returî anä taâ arå disabled®  Thå arro÷ keyó movå yoõ arounä � thå screeî anä thå cursoò deletes® ----------- G=Graphicsº  Tï enä thió functioî anä returî tï thå functioî � prompô  enteò á numbeò greateò thaî 3² aô thå inpuô  graphiã � prompt®  Tï  changå  graphicó characteró anä returî  tï  thå � inpuô prompt¬  presó ®  Á prompô followó thió  functioî � choice: Input Graphic Number (1-32) Thå  arro÷  anä taâ keyó functioî properlù tï movå  thå � blinkinç  cursoò  anä leavå thå desireä  characteò  iî  eacè � position. -------------- M=Movå  Cursorº  Tï  enä  thió functioî anä  returî  tï  thå � functioî prompô enteò aî . Thå  arro÷  anä taâ keyó functioî properlù tï movå  thå � blinkinç  cursoò tï á desireä positioî withouô changinç  anù � characteró oî thå screen. ------------------------------------------------------------ E=Eraser ------------------------------------------------------------ Š Á  simplå operatioî designeä tï allo÷ easù deletioî  oæ � largå  blockó oî thå screen®  Therå arå twï seperatå promptó � placeä  oî thå screeî onå aô á time®  Á blinkinç  cursoò  ió � seeî  afteò  eacè  prompt®  Uså thå arro÷ anä  taâ  keyó  tï � positioî thå cursor® Thå twï locationó yoõ supplù creatå thå � borderó  foò  thå  blocë whicè ió deleted®  Iæ  yoõ  makå  á � mistakå  anä  dï  noô  wisè tï deletå  afteò  choosinç  thió � operatioî  simplù placå thå cursoò tï thå lefô oò abovå  thå � uppeò lefô (first© locatioî wheî yoõ arå askeä tï supplù thå � loweò  righô (second© corner¬  effectivelù creatinç  á  non-� block¬  anä nï erasurå occurs®  Herå arå thå twï promptó yoõ � wilì see: Positioî Cursoò tï UPPEÒ LEFÔ corneò Position Cursor to LOWER RIGHT corner ------------------------------------------------------------ M=Merger ------------------------------------------------------------ Afteò  creatinç morå thaî onå desigî yoõ wilì  probablù � wisè  tï joiî somå screenó oò copù á desigî iî morå thaî onå � locatioî  oî  thå  screen®  Pleaså notå  thaô  onlù  designó � alreadù  saveä  oî disë maù bå merged¬  noô  thå  onå  beinç �  edited. Thå  mosô effectivå anä efficienô methoä ió tï uså thå � beginninç characteò oæ youò filå aó thå startinç  point®  Iæ � youò  desigî beginó oî á linå oò columî otheò thaî thå uppeò � lefô  corneò oæ thå screen¬  thå positioî yoõ arå  askeä  tï � supplù ió noô thaô actuaì relativå location® Simplù  put¬  thå firsô characteò oæ youò desigî ió thå � positioî yoõ supplù witè thå blinkinç cursor¬  noô thå uppeò � lefô  corneò  oæ thå design®  Tï allo÷ foò thå  fe÷  designó � whicè  dï  noô  begiî iî thå uppeò lefô anä dï  neeä  tï  bå � mergeä  iî  á relativå manner¬  placå onå characteò  iî  thå � uppeò  lefô  corneò oæ thå desigî  witè  thå  Alpha-Graphicó � function¬  savå thå file¬ theî merge® Thå firsô characteò iî � thå filå no÷ correspondó tï thå relativå uppeò lefô anä youò � mergå  wilì  reflecô  thaô witè á  correspondinglù  relativå � location®  Herå  ió  thå prompô yoõ wilì seå afteò  yoõ  arå � askeä tï supplù thå mergå filename: Positioî Cursoò tï UPPEÒ LEFÔ corneò ------------------------------------------------------------ R=Reverser ------------------------------------------------------------ Thió  operatioî  ió designeä tï reverså blockó  oî  thå � screen®  Normaì (Alpha-Numeric© characteró arå noô affected¬ � anä onlù standarä graphicó characteró whicè havå aî oppositå � standarä graphicó characteò arå changed®  Thió doeó NOÔ givå � yoõ aî altereä characteò seô oò truå videï reversal¬  buô iô � doeó  allo÷  foò  á  quicë anä easù  changå  oæ  á  design'ó � appearance. Therå arå twï seperatå promptó placeä oî thå screeî onå � aô á time®  Á blinkinç cursoò ió seeî afteò eacè prompt® Uså � thå  arro÷  anä taâ keyó tï positioî  thå  cursor®  Thå  twï �Šlocationó  yoõ supplù creatå thå borderó foò thå blocë whicè � ió  reversed®  Iæ  yoõ  makå á mistakå anä dï  noô  wisè  tï � reverså  afteò  choosinç  thió operatioî  simplù  placå  thå � cursoò  tï thå lefô oò abovå thå uppeò lefô  (first©  corneò � wheî  yoõ  arå  askeä  tï supplù thå  loweò  righô  (second© � corner¬  effectivelù creatinç á non-block¬  anä nï  reversaì � occurs® Herå arå thå twï promptó yoõ wilì see: Positioî Cursoò tï UPPEÒ LEFÔ corneò Position Cursor to LOWER RIGHT corner ------------------------------------------------------------ S=Save ------------------------------------------------------------ Therå  arå onlù twï wayó tï exiô thå "Edit¢ portioî  oæ � thå  GFØ program®  Onå ió tï typå "Q"¬  anä thå otheò ió  tï � typå  "S"®  Typinç  "Q¢ resultó iî á losó oæ thå filå  beinç � edited¬ anä returî tï thå "Nï File¢ menu® Typinç  "S¢ wheî editinç á filå saveó thå filå tï  disë � foò futurå use® Yoõ arå askeä tï supplù á filename¬ anä theî � seå thå statementº ************ Saving File - Please Wait ************* Wheî thå savå operatioî ió completed¬  yoõ arå returneä � tï thå "Nï File¢ menu. ------------------------------------------------------------ |**************************************************| | - Printer Command Menu - | |--------------------------------------------------| | B = Begin print-out | | F = Filename for print-out | | P = Position to begin print-out | | S = Size of print-out | |-----------------| Print Sizes |------------------| | 1=Normal 2=1/2 Wide 3=1/2 Tall 4=1/2 Wide & Tall | #################| Current Status |################# Position = Print Size = Filename = Command ? Theså arå thå singlå keù commandó thaô givå yoõ  almosô � totaì  controì  oæ thå printeò (Epsoî MX-8°  witè  Graftrax© � regardinç  youò  GFØ  designs®  Yoõ  wilì  noticå  thaô  thå � "Currenô Status¢ linå changeó iî responså tï youò  commands® � Afteò supplyinç á filenamå yoõ maù chooså tï begiî youò � print-ouô oî á linå otheò thaî thå firsô line® Iæ yoõ chooså � thå  "P¢  function¬  yoõ wilì seå thå screeî filì witè  youò � desigî anä thió prompô appear: Position Cursor to BEGINNING line Thå positioî yoõ chooså doeó noô carrù oveò froí desigî � tï design¬  eacè timå yoõ stoð thå printeò oò iô finisheó  á � print-ouô  thå  positioî revertó tï it'ó normaì  place¬  thå �Šfirsô  line®  Thå  optioî  oæ  á  beginninç  columî  ió  noô � implementeä duå tï logicaì considerations. Thå sizå oæ youò printouô wilì effecô thå looë oæ  youò � printouô iæ yoõ havå choseî á sizå otheò thaî thå "1=Normal¢ � sizå  anä havå useä alpha-numeriã characteró iî thå  design® � Onlù  sizå  #±  anä #³ prinô thå normaì  characteró  anä  #³ � changeó  thå  linå  spacinç  sï thaô halæ  oæ  thå  linå  ió � overprinted®  Sizeó  #²  anä #´ dï noô prinô anù  characteró � otheò thaî thå standarä 3² graphicó characters. Afteò  typinç  "B¢ aó youò command¬  yoõ wilì  seå  thå � statementº *********** Press ANY KEY to stop print ************ Iæ yoõ dï noô stoð thå print-ouô iô finisheó afteò  thå  � bottoí linå oî thå screeî ió printed® Pleaså notå thaô sincå thå sourcå codå ió supplieä witè � thió prograí iô ió possiblå tï alteò iô foò otheò doô matriø � printers¬  buô alì oæ thå codeó anä datá senô tï thå printeò � no÷ residå iî thå GFXDATA.CEà file®  Thå noteó iî Appendiø Å � coveò thå datá anä equationó senô tï thå printer® ------------------------------------------------------------ ************* *AUTOREP.BAS* ************* Thió   program¬   iî  conjunctioî  witè  severaì  otheò � programs¬ performó á replacemenô oæ thå AUTOST.COÍ graphics® � Thió  meanó thaô wheî yoõ warí oò colä booô  youò  disketteó � yoõ  wilì seå youò customizeä messagå ¡  Theså arå thå fileó � needeä foò AUTOSÔ graphicó replacement: Ours: ----- AUTOST.COM AUTOREP.BAS AUTOCHG.SUB SET.SUB "your".GFX Osborne's: ---------- MBASIC.COM DDT.COM XSUB.COM SUB.COÍ Pleaså makå surå alì theså fileó arå oî onå disk® Belo÷ � arå  thå  steð  bù steð  instructionó  foò  thå  replacemenô � procedure® Yoõ maù bå confuseä bù theså instructions¬ pleaså � reaä  theí  carefully®  Filå nameó arå oæ majoò  importance® � Therå arå essentiallù TWÏ mistakeó thaô caî bå madå witè thå � filenames. 1) "SUB.COM¢  ió actuallù "SUBMIT.COM¢ founä oî  youò  "CPM¢ �    utilitù diskette¬ anä haó tï bå nameä "SUB.COM" 2) "AUTOST.COM¢ ió -NOT-¬  É repeat¬  -NOT- thå "AUTOST.COM¢ �    founä  oî youò "CPM¢ utilitù diskette®  Thå  "AUTOST.COM¢ �    filå  distributeä witè thió diskettå waó createä bù Franë �    Barnharô oæ thå St® Louió Osbornå Group¬ anä ió availablå �    tï thå public¬ unlikå thå "AUTOST.COM¢ supplieä tï yoõ bù �    thå   Osbornå   Computeò   Corporation®    Thå   graphicó �Š   replacemenô   wilì   -NOT- worë   witè   youò    originaì �    "AUTOST.COM¢ file® É  aí  assuminç thaô yoõ havå alreadù createä  á  "GFX¢ � typå  filå  tï placå oî somå diskettå oæ youò choicå  aó  aî � auto-start® Yoõ no÷ wisè thió creatioî oæ youró tï greeô yoõ � wheî yoõ warí oò colä booô thaô diskette® Thå  mosô  versatilå  portioî oæ  youò  ne÷  auto-starô � prograí haó yeô tï bå accessed® Noô onlù caî yoõ replacå thå � graphics¬ buô yoõ maù alsï supplù thå computeò witè á seô oæ � commands¬  jusô  likå thå oneó yoõ normallù typå iî aô "A>"® � Tï  dï  this¬  yoõ  musô creatå  á  NON-DOCUMENÔ  filå  witè � Wordstaò calleä SET.SUB¬  whicè haó thå commandó yoõ wanô tï � executå  wheî thå disë ió warí oò colä booted®  Belo÷ ió  aî � examplå  oæ  á SET.SU file.(Iô askó foò á  disë  directory¬ � runó  GFX.COM¬  anä wheî yoõ exiô GFX.COÍ giveó yoõ  anotheò � disë  directory.© Makå surå alì thå lineó enä witè á RETURN¬ � eveî thå lasô one.(Foò morå informatioî abouô thió importanô � functioî   consulô   á   referencå  booë   oî   CP/Í   abouô � "SUBMIT.COM") A sample "SET.SUB" file: DIR A: GFX DIR A: Procedure for AUTOST Graphics replacement: 1) Placå the disë iî drivå A 2) Typå "MBASIà AUTOREP" � 3) Yoõ  arå  theî askeä foò youò "GFX¢  filename®  Typå  thå �    filenamå  ®  (DÏ NOÔ SUPPLÙ THÅ FILÅ  `TYPE'¬  iô  ió �    assumeä  tï  bå  `.GFX'.© Yoõ seå youò GFØ  filå  oî  thå �    screeî  anä afteò á momenô thå screeî ió cleareä anä  yoõ �    seå "A>". 4) Typå "SU AUTOCHG" 5) Wheî  yoõ seå thå "A>¢ again¬  anä nothinç ió  happening¬ �    typå "^C¢ (controì C)® 6) Placå   AUTONEW.COM¬   SUB.COM¬   anä   SET.SU  oî   thå �    appropriatå diskette. 7) Type "REN AUTOST.COÍ=AUTONEW.COM" 8) Done. ------------------------------------------------------------ *********** OLD/NEW.BAS *********** Noteº  Thió prograí ió supplieä foò thoså peoplå whï havå aî � earlieò versioî oæ thå GFØ prograí calleä "GRAPHICS.BAS"® Aó � aî addeä bonus¬ foò thoså oæ yoõ whï wisè tï integratå á GFØ � desigî intï aî MBASIà prograí É havå includeä thå optioî  oæ � changinç  GFØ fileó intï basiã programs®  Theså programó caî � theî  bå  mergeä  intï youò  existinç  program¬  oò  ruî  bù � themselves® Iô ió verù convenienô tï obtaiî á printouô oæ thå nameó � oæ thå fileó thaô yoõ arå goinç tï converô beforå  beginninç � thå conversioî process® Š Tï  changå  GRAPHICS.BAÓ  fileó  tï  GFØ   files: 1) Puô MBASIC.COÍ oî á cleaî anä SYSGEN'eä disk. 2) Movå   OLD/NEW.BAÓ   tï   thaô   disë   anä   renamå   iô �    "GRAPHICS.BAS". 3) Placå thió disë iî drivå Aº  anä youò "old¢  GRAPHICS.BAÓ �    disë witè thå fileó tï bå converteä iî B:. 3) Typå  ^C® 4) Typå "MBASIà GRAPHICS¢ anä presó RETURN. 5) At the prompt "NEW/OLD (N/O) ?" type "NEW". 6) Yoõ  arå  no÷ askeä foò thå drivå tï reaä fileó froí  anä �    thå drivå tï writå fileó to® Typå "B¢ theî "A". 7) Supplù thå filenamå oæ á filå tï bå converted¬  anä  wheî �    thaô  filå  ió converteä anä written¬  yoõ arå askeä  foò �    anotheò filename. 8) Presó RETURÎ wheî yoõ havå converteä alì youò files. 9) Typå "SYSTEM¢ anä theî geô á directorù oæ disë A:®  Therå �    arå  youò newlù converteä files®  Thå olä fileó  arå  noô �    eraseä  oò  overwritten¬  eveî  iæ yoõ  arå  readinç  anä �    writinç tï thå samå disk. Foò  thoså  oæ yoõ wishinç tï converô  GFØ  fileó  intï � basiã programó simplù answeò "OLD¢ foò steð µ above® ------------------------------------------------------------ Theså  appendiceó  arå supplieä aó á referencå  tï  thå � variouó  functionó oæ thå GFØ program®  É dï noô intenä  foò � theí tï bå á completå notatioî aó thå prograí maù bå updateä � bù  otheró oò myself®  Mosô oæ thå noteó hereiî arå useä  aó � programminç notes on the GFXDATA.CEC file. APPENDIX A Easy Operator Customizing Thå datá filå foò GFX.COÍ ió compriseä oæ morå thaî onå � typå  oæ data®  É wilì begiî bù describinç thå  portionó  oæ � thió  filå whicè maù bå customizeä (witè Wordstaò aó á  NON-� DOCUMENT© tï suiô individuaì operators. Thå  firsô  linå oæ GFXDATA.CEà consistó oæ  á  number¬ � whicè ió "600"® Thió ió useä tï seô thå "waiting¢ timå limiô � oæ  thå  prograí anä ió roughlù equaì tï onå seconä  iî  thå � compileä version® Thå timå limiô ió useä afteò eacè inpuô tï � allo÷ thå operatoò tï seå thieò input® Iô ió alsï multiplieä � bù  µ  tï  seô á longeò limiô oî non-inpuô promptó  sucè  aó � "Presó anù keù tï stoð print"®  Yoõ maù alteò thió numbeò tï � suiô  youò  needs¬  buô  keeð iî minä  thaô  thå  slide-sho÷ � functioî alsï useó thió number aó á baså time limit. Thå  lasô  twï lineó oæ thå filå supplù thå  slide-sho÷ � typå  oæ informatioî tï starô thå program¬  that'ó whaô  yoõ � seå  beforå yoõ seå thå menõ ¡  Skið tï Appendiø Ç foò  thaô � info¬ whicè telló yoõ tï seå thå "Slide-Show¢ informatioî iî � the previous pages. ------------------------------------------------------------ APPENDIX B Š Prompt and Menu Data Listeä belo÷ arå thå lineó oæ datá supplieä tï GFX®  DÏ � NOÔ  changå  eitheò thå amounô oæ lineó  oò  thieò  relativå � positions®  Treaô  eacè  individuaì  linå aó  seperatå  datá � becauså thaô ió ho÷ thå GFØ prograí thinkó oæ  them®  Shoulä � yoõ  neeä oò wisè tï changå thå menuó oò variouó promptó  dï � sï  witè  utteò discretion¬  unlesó yoõ decidå tï alteò  thå � basiã  sourcå prograí anä intenä tï uså thaô insteaä oæ  thå � compileä program¬ whicè ió mucè slower® |****************| GFX Main Menu |*****************| |All Menus ==> D=Directory On/Off Q=Quit | |--------------------------------------------------| |----- No File Menu -------|------- Edit Menu -----| | B=Big Letter Creation | A=Alpha-Graphics | | E=Load & Edit | E=Eraser | | M=Move & Edit | M=Merger | | P=Printer Menu | R=Reverser | | S=Slide-Show | S=Save | |**************************************************| | - Printer Command Menu - | |--------------------------------------------------| | B = Begin print-out  | | F = Filename for print-out | | P = Position to begin print-out | | S = Size of print-out | |-----------------| Print Sizes |------------------| | 1=Normal 2=1/2 Wide 3=1/2 Tall 4=1/2 Wide & Tall | |****************| Disk Directory |****************| Command ? Filename Input Line Position Cursor to UPPER LEFT corner Position Cursor to LOWER RIGHT corner A=AlphaNumeric G=Graphics M=MoveCursor =End> Input Graphic Number (1-32)(>32 to End) ** Error, File NOT found - Please check directory ** #################| Current Status |################# Print Size = Filename = Print Size (1-4) ? Position Cursor to BEGINNING line *********** Press ANY KEY to stop print ************ ************ Saving File - Please Wait ************* |==================================================| ******* Press ANY KEY to stop the Slide-Show ******* Position = ------------------------------------------------------------ APPENDIX C Reversing Data Yoõ wilì notå thaô thå 3² numberó followinç thå promptó � anä  menuó arå limiteä tï thå numberó 1-32®  Thió ió á  hanä � compileä  lisô oæ thå standarä graphiã seô oæ thå Osbornå  ± � whicè  swapó thå numberó oæ mirroò imagå  characters®  Therå �Šshould be no need to alter this group of data. 0,4,14,18,1,6,5,17,21,9,25,11,12,13,2,15,16,7,3,19,26,8,32, 24,23,10,20,27,28,29,30,31,22 ------------------------------------------------------------ APPENDIX D Control Routine Data Thå nexô grouð oæ datá ió useä tï controì thå prograí � flo÷ accordinç tï thå needó oæ thå variouó functions® Therå � arå 1² lineó eacè oæ 2° numbers® Onå line¬ linå 10¬ haó twï � groupó oæ numbers® DÏ NOÔ alteò anù oæ thió datá unlesó yoõ � intenä tï alteò thå sourcå program® Thå structurå oæ thå � datá ió aó follows: |Prompt Routine Output Data Identifier | | |Prompt Routine Input Subroutine/Data Identifier | | | | |Subroutine Identifiers-----------| | | | | V V V V 20,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 23,3,1,8,1,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0 22,2,2,1,9,1,9,1,9,0,0,0,0,0,0,0,0,0,0,0 21,2,1,2,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 21,2,1,6,1,6,4,0,0,0,0,0,0,0,0,0,0,0,0,0 21,2,1,10,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 21,2,1,6,2,4,1,6,2,4,0,0,0,0,0,0,0,0,0,0 27,4,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 25,1,1,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 33,4,1,2,4,11,0,0,0,0,0,0,0,0,0,0,2,4,1,0 21,2,1,12,1,12,0,0,0,0,0,0,0,0,0,0,0,0,0,0 23,3,1,8,1,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ------------------------------------------------------------ APPENDIX E Printer Data Thió  wilì bå thå mosô importanô Appendiø foò thoså  oæ � yoõ witè printeró otheò thaî Epson®  É havå seeî thå prograí � ruî  á Staò Micronicó printeò witè nï modificatioî anä therå � maù  bå  others®  Iæ  yoõ wisè tï  modifù  thå  prograí  foò � another¬  incompatiblå printer¬ É hopå É caî supplù yoõ witè � enougè informatioî abouô thå printeò routinå tï allo÷ yoõ tï � dï sï eveî iæ yoõ aren'ô aî experienceä programmer. Somå timå shoulä bå spenô researchinç thå variouó codeó � anä datá needeä bù youò printeò tï operatå iî á bit-graphicó � modå  beforå attemptinç tï alteò thå sourcå prograí  printeò � routinå oò thå printeò datá iî thå GFXDATA.CEà file¬  listeä � below®  Yoõ  wilì  noticå therå arå 32 lineó oæ  ¶  numbers® � Eacè  numbeò  representó  onå  column¬   anä  onå  linå � representó  thå correspondinç standarä graphiã characteò  oæ � thå  Osbornå 1®  Thå singlå numbeò telló thå  printeò  whicè �Šwireó oî thå prinô heaä shoulä bå fireä iî thaô column®  Thå � prinô wireó oî thå Epsoî arå numbereä froí thå bottoí tï thå � top¬  eacè onå á successivå poweò oæ two¬ sï thaô thå numbeò � 12· fireó alì · pinó availablå tï thå program. 127,127,65,65,127,127 127,127,127,0,0,0 15,15,15,120,120,120 15,15,15,127,127,127 0,0,0,127,127,127 120,120,120,127,127,127 15,15,15,0,0,0 0,0,0,15,15,15 127,63,31,15,7,3 0,0,63,63,56,56 3,7,15,31,63,127 0,0,127,127,0,0 28,28,127,127,28,28 0,28,62,62,28,0 120,120,120,15,15,15 28,28,31,31,28,28 56,56,63,63,0,0 127,127,127,120,120,120 120,120,120,0,0,0 0,0,0,0,0,0 0,0,0,120,120,120 96,112,120,124,126,127 127,127,127,127,127,127 120,120,120,120,120,120 15,15,15,15,15,15 127,126,124,120,112,96 127,127,127,15,15,15 28,28,28,28,28,28 0,0,126,126,30,30 0,0,0,0,0,0 30,30,126,126,30,30 30,30,126,126,0,0 0,0,0,0,0,0 ------------------------------------------------------------ APPENDIX E (continued) No÷ wå reallù geô tï thå fuî parô foò thoså oæ yoõ witè � á  "foriegn¢  doô matriø printer®  Thå nexô fouò  lines¬  oæ � differinç length¬  arå thå printeò controì codes¬ anä caî bå � changeä  foò  differenô printers¬  buô thieò USÅ  cannoô  bå � changed. Thå  firsô linå representó thå Epsoî  printeò  power-uð � statuó  code®  Thå  firsô numbeò oî thå linå "2¢  telló  thå � prograí ho÷ manù characteró iô takeó foò thå code®  Thå nexô � (yoõ  guesseä  it© twï numberó arå thå actuaì  codå  numberó � "27,64¢ whicè telló thå printeò "POWER-UÐ STATUS". Thå seconä linå startó ofæ thå samå way¬  witè á numbeò � representinç ho÷ manù numberó follow® Numberó ² ¦ ³ senä thå � commanä tï "CHANGÅ THÅ LINÅ SPACING"®  Buô wait¬ foò alì yoõ � Epsoî printeò expertó ouô there¬  wå botè kno÷ iô onlù takeó � threå numberó foò thå linå spacing¬  whù thå fiftè numbeò  ¿ � Well¬  wå havå fouò differenô prinô styleó availablå anä twï �Šoæ  thoså prinô styleó neeä differenô linå spacinç thaî  thå � otheò  two®  Startinç tï makå senså ¿  Thå fourtè anä  fiftè � numberó arå thå twï differenô linå spacinç numbers®  #´  (7© � foò normal/higè styleó anä #µ (4) foò half/higè styles. Thå  thirä  linå  agaiî startó  witè  "4¢  tellinç  thå � prograí ho÷ manù numberó follow¬  buô thió timå it'ó nothinç � fancy¬  iô  jusô  telló  thå  Epsoî iô shoulä  gï  intï  thå � graphicó mode. Thå lasô twï numberó telì thå prograí ho÷ manù columnó � (total©  wå arå sendinç thå printer®  Witè twï oæ thå  prinô � styleó (normaì widå 1&3© iô doesn'ô matter® Buô wheî wå wanô � half/widå  styleó  (2&4©  wå havå tï  filì  iî  thoså  "960¢ � columnó witè something¬  sï thå prograí figureó ouô ho÷ manù � wå  senô thå printer¬  useó thå numbeò wå givå iô (960©  anä � comeó  uð witè ho÷ manù blanë columnó iô shoulä  send®  Makå � senså  ¿  Thå  lasô numbeò jusô telló thå prograí  ho÷  manù � normaì  characteró thå printeò caî accept¬  iî thió caså 80® � Noticå thaô 960=80*12¬ thå maximuí thå Epsoî caî print. Here's a recap: 2,27,6´ - Poweruð codå ( Turî alì speciaì thingó off © 4,27,65,7,´ - Linå spacinç codå ( Ho÷ manù dotó high ) 4,27,76,192,³ - Graphicó Modå ( Leô thoså dotó go ! ) 960,8° - Columns printer can handle ( Graphicó anä Normal ) Foò  thoså oæ yoõ whï don'ô wanô tï seå exactlù ho÷ thå � printeò routinå works¬  skið aheaä twï pageó tï Appendiø  F¬ � wherå  É finisè ouô thå explanatioî oæ thå GFXDATA.CEà datá � file. ------------------------------------------------------------ APPENDIX E (continued) GFX Printer Routine Notes 282 Ok, at what line do we start ? (J1) 283 Senä  thå  printeò thå linå spacinç code¬  twï  optionaì �     numbers. 287 Send the Graphics Mode codes. 288 Begin next line. Test to see if finished. 289 Look at character on line, test for non-graphics. 290 Loop 6 times for each character - send numbers to printer 291 } What print style size ? { 292 293 } Half/High - Turn off top three pins { 294 295 What print style size, normal or half wide ? 296 Send number to printer.(Normal wide - send twice) 297 Send number to printer.(Half wide - send once) 298 Do it again on this line until done. 299 Print style 1 and 3 get alphanumerics too ! 300 Did we see alphanumerics on this line ? 301 (Gosub 311) Reset printer to power up status. 302 Look at maximum spaces. Test for non-alphanumeric. 303 Prinô character®  Dï tilì done® Senä Carriagå returî tï emptù �     thå buffer® (Goto 305) 304 Send extra numbers when using styles 2 & 4. 305 Done yet ? Š306 Should we stop ? 307 (Gosub 311) Reset printer to power up status. 308 Let's go on to the next line. 309 (Gosub 311) Reset printer to power up status. 310 Senä  Carriagå returî tï emptù buffer®  Reseô alì  variables® �     Returî tï commanä routine. 311 Send printer power up status code. ------------------------------------------------------------ APPENDIX E (continued) GFX Printer Routine 281 REM * 10-printer routine ************************************************** 282 J=J1-128 283 FOR B=1 TO P3(2)-2:LPRINT CHR$(P4(2,B));:NEXT B 284 IF P>2 THEN 286 ELSE 285 285 LPRINT CHR$(P4(2,B)):GOTO 287 286 LPRINT CHR$(P4(2,B+1)) 287 FOR B=1 TO P3(3):LPRINT CHR$(P4(3,B));:NEXT B:GOTO 288 288 J=J+128:G=0:IF J>64256! THEN C$="A" ELSE C$="" 289 FOR Y=1 TO 128:I=PEEK(J+Y):IF I>32 THEN G=1:I=32 290 FOR B=1 TO 6:X=(I*6)+B+100:K=D(X) 291 IF P>2 THEN 293 ELSE 292 292 IF P=2 THEN 297 ELSE 296 293 IF K>64 THEN K=K-64 294 IF K>32 THEN K=K-32 295 IF P>3 THEN 297 ELSE 296 296 LPRINT CHR$(K); 297 LPRINT CHR$(K); 298 NEXT B:NEXT Y 299 IF P=1 OR P=3 THEN 300 ELSE 304 300 IF G=1 THEN 301 ELSE 305 301 GOSUB 311 302 FOR Y=1 TO T:I=PEEK(J+Y):IF I<32 THEN I=32 303 LPRINT CHR$(I);:NEXT Y:LPRINT CHR$(13);:GOTO 305 304 FOR B=1 TO P3(4)-(128*6):LPRINT CHR$(0);:NEXT B 305 IF C$="A" THEN 309 306 C$=INKEY$:IF C$="" THEN 307 ELSE 309 307 GOSUB 311 308 GOTO 283 309 GOSUB 311 310 LPRINT CHR$(13);:Y0=0:X0=0:H=10:C$="":J1=0:J=0:RETURN 311 FOR B=1 TO P3(1):LPRINT CHR$(P4(1,B));:NEXT B:RETURN ------------------------------------------------------------ APPENDIX F Erase Screen Data Thå  nexô ninå lineó oæ µ numberó arå useä tï seeä  thå � erasinç screeî routine® DÏ NOÔ changå anù oæ theí oò strangå � thingó  wilì happen®  Simplù put¬  theù arå alì useä iî  thå � samå  place®  Á fe÷ differenô equationó arå useä whicè  telì � thå prograí wherå tï starô anä stoð erasing. 0,1,0,23,1 Š0,1,23,0,-1 0,2,0,51,1 0,2,51,0,-1 26,2,0,26,1 26,2,26,0,-1 11,1,0,11,1 11,1,11,0,-1 26,2,26,0,-1 ------------------------------------------------------------ APPENDIX G Beginning Screen Data Guesó  whaô  ¿  Iæ yoõ wanô youò owî desigî tï comå  uð � wheî yoõ starô thió program¬  jusô changå thió lasô grouð oæ � filenames¬ timelimits¬ anä eraså numbers¬ aó outlineä iî thå � Slide-Sho÷ instructions®  P.S®  - Yoõ can'ô specifù thå typå � oæ erasurå witè jusô onå filå entry¬  buô thå filå doeó filì � thå screen¬  anä ió theî eraseä alì aô once®  Whï eveò hearä � of a "one slide" Slide-Show ? GFXMSG.CEC,0,10 WELCOME,0,7 ------------------------------------------------------------ EOF---EOF---EOF---EOF---EOF---EOF---EOF---EOF---EOF---EOF--- ifferenô equationó arå useä whicè  telì � thå prograí wherå tï starô anä stoð erasing. 0,1,0,23,1 Š0,1,23,0,-1 0,2,0,51,1 0,2,51,0,-1 26,2,0,26,1 26,2,26,0,-1 11,1,0,11,1 11,1,11,0,-1 26,2,26,0,-1 ------------------------------------------------------------ APPENDIX G Beginning Screen Data Guesó  whaô  ¿  Iæ yoõ wanô youò owî desigî tï comå  uð � wheî yoõ starô thió program¬  jusô changå thió lasô grouð oæ � filenames¬ timelimits¬ anä eraså numbers¬ aó outlineä iî thå � Slide-Sho÷ instructions®  P.S®  - Yoõ can'ô specifù thå typå � oæ erasurå witè jusô onå filå entry¬  buô thå filå doeó filì � thå screen¬  anä ió theî eraseä alì aô once®  Whï eveò hearä � of a "one slide" Slide-Show ? GFXMSG.CEC,0,10 WELCOME,0,7 ------------------------------------------------------------ EOF---EOF---EOF---EOF---EOF---EO 22 0 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 2 1 14 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 77 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 2 1 14 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 77 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 2 1 14 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 22 77 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 2 1 14 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 22 77 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 2 1 14 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 77 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 2 1 14 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 77 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 2 1 14 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 12 77 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 2 1 14 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 12 77 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 14 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22  1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 77 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 102 4 111 1 114 1 116 2 104 1 101 1 22 4 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 77 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 14 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 77 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 79 3 115 1 98 1 111 1 114 1 110 1 101 1 49 2 22 3 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 77 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 14 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 77 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 38 7 22 7 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 77 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 14 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 22 77 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 69 2 112 1 115 1 111 1 110 1 77 2 88 1 45 1 56 1 48 1 12 2 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 22 77 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 14 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 77 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 2 1 14 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 2 77 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 2 1 14 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1  12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 2 77 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 2 1 14 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 2 77 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 77 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 77 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 14 1 22 1 22 77 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 2 1 22 1 22 1 12 1 12 1 22 1 22 1 2 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 22 1 12 1 12 1 22 1 22 1 14 1 14 1 22 1 32 1 22 1 22 1 12 1 11 12 1 22 1 22 1 22 1 2 1 22 1 22 1 22 1 12 1 22 1 22 1 22 1 2 1 14 1 22 1 22 1 22 1 12 1 2 10 131 22 1 22 1 22 1 8 1 85 12 115 1 101 1 114 1 83 2 117 1 112 1 112 1 111 1 114 1 116 1 101 1 100 1 83 2 111 1 102 1 116 1 119 1 97 1 114 1 101 1 22 90 22 128 24 3 24 1 22 2 22 1 22 1 22 1 8 1 71 14 70 1 88 1 46 1 67 1 79 1 77 1 22 98 23 3 22 1 22 2 22 4 22 118 22 4 22 2 24 1 24 1 24 1 22 1 10 3 22 1 8 1 86 7 101 1 114 1 115 1 105 1 111 1 110 1 52 2 46 1 49 1 21 96 22 1 22 1 22 1 25 1 22 2 21 1 22 1 23 1 23 1 10 2 25 1 21 2 8 1 22 118 21 2 8 1 22 3 22 4 22 2 23 1 23 1 23 1 8 1 22 112 21 3 8 1 22 2 23 1 23 1 23 1 22 1 22 2 22 4 92 18 11 1 47 1 22 98 22 4 22 2 24 1 24 1 24 1 25 1 22 2 22 4 27 12 12 1 27 1 22 98 22 4 22 2 22 6 22 4 47 12 11 1 92 1 92 92 11 1 47 1 22 10 22 6 24 1 24 1 24 1 22 1 22 2 22 1 22 1 27 102 12 1 27 1 22 10 22 6 23 1 23 1 23 1 22 1 22 3 47 103 11 1 92 1 22 16 22 4 22 3 10 3 22 1 22 1 22 1 22 1 22 114 22 4 22 3 22 3 22 125 22 3 10 6 22 1 22 1 22 1 8 1 83 86 117 1 112 1 112 1 111 1 114 1 116 1 116 2 104 1 105 1 115 1 115 2 111 1 102 1 116 1 119 1 97 1 114 1 101 1 44 1 22 7 22 1 22 1 22 2 22 6 22 122 22 6 24 1 24 1 24 1 24 1 115 89 101 1 101 1 68 2 73 1 83 1 75 1 46 1 68 1 79 1 67 1 102 2 111 1 114 1 21 14 22 1 22 1 22 1 22 1 23 2 23 1 23 1 23 1 22 1 22 128 97 87 100 1 100 1 114 1 101 1 115 1 115 1 97 2 110 1 100 1 100 2 101 1 116 1 97 1 105 1 108 1 115 1 46 1 21 18 22 1 22 1 22 1 25 1 32 1  2 110 1 100 1 100 2 101 1 116 1 97 1 105 1 108 1 115 1 46 1 21 1 92 1 92 92 11 1 47 1 22 10 22 6 24 1 24 1 24 1 22 1 22 2 22 1 22 1 27 102 12 1 27 1 22 10 22 7 0 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 6 1 4 79 79 2 115 1 98 1 111 1 114 1 110 1 101 1 83 2 116 1 97 1 110 1 100 1 97 1 114 1 100 1 71 2 114 1 97 1 112 1 104 1 105 1 99 1 115 1 67 2 104 1 97 1 114 1 97 1 99 1 116 1 101 1 114 1 83 2 101 1 116 1 40 2 48 1 45 1 51 1 50 1 41 1 1 2 4 79 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 1 1 4 79 48 2 49 3 50 3 51 3 52 3 53 3 54 3 55 3 56 3 57 3 49 3 48 1 49 2 49 1 49 2 50 1 49 2 51 1 49 2 52 1 49 2 53 1 1 1 4 79 95 2 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 1 2 4 79 0 2 1 3 2 3 3 3 4 3 5 3 6 3 7 3 8 3 9 3 10 3 11 3 12 3 13 3 14 3 15 3 1 2 4 79 1 49 4 79 49 2 54 1 49 2 55 1 49 2 56 1 49 2 57 1 50 2 48 1 50 2 49 1 50 2 50 1 50 2 51 1 50 2 52 1 50 2 53 1 50 2 54 1 50 2 55 1 50 2 56 1 50 2 57 1 51 2 48 1 51 2 49 1 1 1 4 79 95 2 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 95 3 1 2 4 79 16 2 17 3 18 3 19 3 20 3 21 3 22 3 23 3 24 3 25 3 26 3 27 3 28 3 29 3 30 3 31 3 1 2 4 79 1 49 4 79 78 11 117 1 109 1 98 1 101 1 114 1 51 2 50 1 105 2 115 1 116 2 104 1 101 1 34 2 66 1 76 1 65 1 78 1 75 1 34 1 115 2 112 1 97 1 99 1 101 1 1 9 4 79 95 6 95 1 95 1 95 1 95 1 95 1 95 1 95 1 95 2 95 1 95 1 95 1 1 31 4 79 84 2 104 1 101 1 111 2 118 1 101 1 114 1 104 1 101 1 97 1 100 1 108 2 105 1 110 1 101 1 105 2 115 1 116 2 111 1 115 2 104 1 111 1 119 1 114 2 101 1 108 1 97 1 116 1 105 1 118 1 101 1 112 2 111 1 115 1 105 1 116 1 105 1 111 1 110 1 1 2 4 79 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 1 1 32 1  24 1 24 1 24 1 2 1 2 4 79 1 49 4 79 78 11 117 1 109 1 98 1 101 1 114 1 51 2 50 1 105 2 115 1 116 2 104 1 101 1600 |****************| GFX Main Menu |*****************| |All Menus ==> D=Directory On/Off Q=Quit | |--------------------------------------------------| |----- No File Menu -------|------- Edit Menu -----| | B=Big Letter Creation | A=Alpha-Graphics | | E=Load & Edit | E=Eraser | | M=Move & Edit | M=Merger | | P=Printer Menu | R=Reverser | | S=Slide-Show | S=Save | |**************************************************| | - Printer Command Menu - | |--------------------------------------------------| | B = Begin print-out | | F = Filename for print-out | | P = Position to begin print-out | | S = Size of print-out | |-----------------| Print Sizes |------------------| | 1=Normal 2=1/2 Wide 3=1/2 Tall 4=1/2 Wide & Tall | |****************| Disk Directory |****************| Command ? Filename Input Line Position Cursor to UPPER LEFT corner Position Cursor to LOWER RIGHT corner (A,G,M) Alpha, Graphics, or Move-cursor ? (0-32) Input Graphic Number ** Error, File NOT found - Please check directory ** |################| Current Status |################| Print Size = Filename = Print Size (1-4) ? Position Cursor to BEGINNING line |********** Press ANY KEY to stop print ***********| |*********** Saving File - Please Wait ************| |==================================================| |****** Press ANY KEY to stop the Slide-Show ******| Position = 0,4,14,18,1,6,5,17,21,9,25,11,12,13,2,15,16,7,3,19,26,8,32,24,23,10,20,27,28,29,30,31,22 20,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 23,3,1,8,1,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0 22,2,2,1,9,1,9,1,9,0,0,0,0,0,0,0,0,0,0,0 21,2,1,2,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 21,2,1,6,1,6,4,0,0,0,0,0,0,0,0,0,0,0,0,0 21,2,1,10,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 21,2,1,6,2,4,1,6,2,4,0,0,0,0,0,0,0,0,0,0 27,4,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 25,1,1,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 33,4,1,2,4,11,0,0,0,0,0,0,0,0,0,0,2,4,1,0 21,2,1,12,1,12,0,0,0,0,0,0,0,0,0,0,0,0,0,0 23,3,1,8,1,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0 127,127,65,65,127,127 127,127,127,0,0,0 15,15,15,120,120,120 15,15,15,127,127,127 0,0,0,127,127,127 120,120,120,127,127,127 15,15,15,0,0,0 0,0,0,15,15,15 127,63,31,15,7,3 0,0,63,63,56,56 3,7,15,31,63,127 0,0,127,127,0,0 28,28,127,127,28,28 0,28,62,62,28,0 120,120,120,15,15,15 28,28,31,31,28,28 56,56,63,63,0,0 127,127,127,120,120,120 120,120,120,0,0,0 0,0,0,0,0,0 0,0,0,120,120,120 96,112,120,124,126,127 127,127,127,127,127,127 120,120,120,120,120,120 15,15,15,15,15,15 127,126,124,120,112,96 127,127,127,15,15,15 28,28,28,28,28,28 0,0,126,126,30,30 0,0,0,0,0,0 30,30,126,126,30,30 30,30,126,126,0,0 0,0,0,0,0,0 2,27,64 4,27,65,7,4 4,27,76,192,3 960,80 0,1,0,23,1 0,1,23,0,-1 0,2,0,51,1 0,2,51,0,-1 26,2,26,0,-1 26,2,0,26,1 12,1,12,0,-1 12,1,0,12,1 26,2,26,0,-1 GFX1,0,7 GFX2,0,6 GFX3,10,3 WELCOME,1,9 4,1,0 21,2,1,12,1,12,0,0,0,0,0,0,0,0,0,0,0,0,0,0 23,3,1,8,1,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0 127,127,65,65,127,127 127,127,127,0,0,0 15,15,15,120,120,120 15,15,15,127,127,127 0,0,0,127,127,127 120,120,120,127,127,127 15,15,15,0,0,0 0,0,0,15,15,15 127,63,31,15,7,3 0,0,63,63,56,56 3,7,15,31,63,127 0,0,127,127,0,0 28,28,127,127,28,28 0,28,62,62,28,0 120,120,120,15,15,15 28,28,31,31,28,28 56,56,63,63,0,0 127,127,127,120,120,120 120,120,120,0,0,0 0,0,0,0,0,0 0,0,0,120,120,120 96,112,120,124,126,127 127,127,127,127,127,127 120,120,120,120,120,120 15,15,15,15,15,15 127,126,124,120,112,96 127,127,127,15,15,15 28,28,28,28,28,28 0,0,126,126,30,30 0,0,0,0,0,0 30,30,126,126,30,30 30,30,126,126,0,0 0,0,0,0,0,0 2,27,64 4,27,65,7,4 4,27,76,192,3 960,80 0,1,0,23,1 0,1,23,0,-1 0,2,0,51,1 0,2,51,0,-1 26,2,26,0,-1 26,2,0,26,1 12,1,12,0,-1 12,1,0,12,1 26,2,2632323232323232323232323232323232323232323232323232323232323210228 32322222223232222222323221222532323232323232322232323224323224322 32322 323232323232323232323232323232323232323232322232223222222222223222322232322232223222222222223222322232222211222222321132322224112424232311232232321132222222112222320 32321132323211113232111132321111323211113232321132320 321023238 322232322232218 102532102222238 2232218 2221242422223224323232322 3232323232323232323232323232323232323232323232323210323232321 323232321 323232321 323232321 323232322132328 323232324 323232324 323232324 323232324 323232322532323232323232323232921147323227122732324711923232323232323232323232323232323232323232323222323232222222323232223232323232323232323232323232323232323232323232323232323224323232322 32323232323232323232323232323232323232222222222232323232323232323232323232323232323232323232323232323232323232323232322232323232323232321032323210253232102532321025323210253232322532323232222222222222323211222232111122221111322222113232222222222222321022323232322232323232223232323222323232322232323222222232222222228 32323232223232323222102222222522323232322222222222102222228 32323232223224242422322323232232323232222122222225223232322222323232222224242422232323232232323232223232323222222222228 2232323232223232323222222222223232323222222222222222323232322232323232222222228 223232322222323232222122222225222222222232323232223232323222323232322232323232223232323222102222228 2232323222222424242222232323222232323222212222222510222222222232323222223232322221222222223232323222323232322232323232323232323232323222323232323232323232223232323232323232323232323232323232322232323232323232323222323232322 3232323232323232323232473232324732323260323232323292323232323292323232323232323232323222222222223232323232222222222232323232323232323232329232323232329232323232326232323247323232473232323210228 32102532218 32323210253232102532323222323232322432322222222222223232322222326532222232242422223232323222222222223210228 32102532218 22323232222223232322223232322222323232222222222208223232322222242424252223232308223232322222222222251022222222223232323222323232322232323232223232323221222222222222228 32223232218 2232323222223232322222323210252222222532222222222222323232322224242432222323233222323232322222222222222222222222323232322224242432222323233222323232322232323232102222228 2232323232223232242422323223222232323222212222222522323232222232323222222424242222232323222232323222223232322222222222223232223232323222323232322232323232223232222222222232322222223232322232323232223232323222323222322232322222223222323210252232102532221025323222218 3232223221083222323221082232323232223232323222323232322232323232223232323222222222228 32323210228 32102222212225222232233222223232322222323232228 32323222228 32322222218 32222232218 2222323221222232323221102222228 22323232222232323222223232322222323232222122222225222323238 2232323222222424242522323232322232323232223232323222222222222232323222223232322222323221222232323222222222222222222222222232323222222424242222212223232232218 32223232218 102222228 223232323222242424242323232322323232322221222222252222222222323222323232322232323232223232323222323232322232322232323222223232322222323232222232323222223232322221222222252232323222223232322222323232222232323222218 321025322122253222323232222232323222223232322222322232222210228 2222253221228 32323210218 32102532212225323210228 32102532218 25323232212232323222210832102532212225323232223232323222323232322232322222222222323232102532321025323210253232102532323222222222223232323222222222220822323232222224242425222323230822323232228 32323232218 32323232218 32323232218 32323232218 3232323221222222222222222222082232322122223232322222323232222232321022323232323232108 32321025218 3225323221323232323232323232323232323232323232323232323232323232323232323232323232222222222222132222222232323222223232322222323221222232323222222222222222222222222232323222222424242222212223232232218 32223232218 102222228 22100 COMMON D$,F$ 110 DIM PR$(1000) 120 WIDTH 128 130 IF D$="" THEN 150 ELSE 140 140 IF MID$(D$,5,1)="A" THEN 340 ELSE 540 150 PRINT CHR$(26):PRINT"***************************************************" 160 PRINT"* Old Graphics/New GFX File Convertor *" 170 PRINT"***************************************************" 180 PRINT:INPUT"NEW/OLD (N/O) ";NO$ 190 IF NO$="N" OR NO$="O" THEN 200 ELSE 180 200 PRINT:INPUT"DRIVE TO READ FILES FROM ";P$ 210 IF P$="A" OR P$="B" THEN 220 ELSE 200 220 PRINT:INPUT"DRIVE TO WRITE CONVERTED FILES ";Q$ 230 IF Q$="A" OR Q$="B" THEN 240 ELSE 220 240 P$=P$+":":Q$=Q$+":" 250 PRINT"ENTER TO END CONVERSION PROGRAM" 260 PRINT:INPUT"FILENAME TO CONVERT ";F$ 270 PRINT CHR$(26):FOR B=1 TO 22:PRINT:NEXT B:POKE 61440!+(23*128),32 280 IF F$="" THEN 540 290 IF NO$="N" THEN 300 ELSE 550 300 G$=P$+F$+".BAS" 310 D$=Q$+P$+"A" 320 ON ERROR GOTO 530 330 CHAIN G$ 340 REM*****************WRITE PROGAM SECTION******** 350 Q$=MID$(D$,1,2):P$=MID$(D$,3,2) 360 RESTORE 510:F$=Q$+F$+".GFX" 370 FOR B=0 TO 60:O%=PEEK(62720!+B):POKE 64768!+B,O%:NEXT B 380 FOR B=0 TO 60:READ M:POKE 62720!+B,M:NEXT B:FOR B=1 TO TIMELIM*2:NEXT B 390 FOR B=0 TO 60:O%=PEEK(64768!+B):POKE 62720!+B,O%:NEXT B 400 REM **********SAVE PROGRAM TO DISK*********** 410 OPEN "O",#1,F$ 420 T=0:Z=0:N1=0:N3=0 430 FOR N1=0 TO 3072 440 Z=N1+61440!:T=PEEK(Z) 450 IF T<>32 THEN 460 ELSE 470 460 PRINT#1,T;N3;:POKE Z,127:N3=1:GOTO 480 470 N3=N3+1 480 NEXT N1 490 PRINT #1,32;32 500 CLOSE:C$="":PRINT CHR$(26):GOTO 250 510 DATA 32,32,32,32,32,32,32,32,32,32,32,83,65,86,73,78,71,32,70,73,76,69,32,95,32,80,76,69,65,83,69,32,87,65,73,84 520 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 530 PRINT"SORRY, UNABLE TO OPEN FILE FOR CONVERSION." 540 END 550 ON ERROR GOTO 530 560 S1=61440! 570 GOSUB 600 580 GOSUB 620 590 GOTO 680 600 REM * 2-clear screen routine ********************************************** 610 PRINT CHR$(26)CHR$(11)CHR$(11):POKE 64384!,32:RETURN 620 REM * 4-fill screen routine *********************************************** 630 S2=0:T=0:ON ERROR GOTO 530 640 OPEN "I",#1,P$+F$+".GFX" 650 WHILE T<>32:INPUT #1,T,S2:IF S1+S2>=64512! THEN 670 ELSE 660 660 POKE S1+S2,T:S1=S1+S2:WEND 670 CLOSE:RETURN 680 REM*****************WRITE PROGAM SECTION******** 690 CU=1:LN=100:IC=10 700 FOR B=0 TO 60:O%=PEEK(62720!+B):POKE &H9200+B,O%:NEXT B 710 FOR B=0 TO 60:READ M:POKE 62720!+B,M:NEXT B 720 FOR B=0 TO 60:O%=PEEK(&H9200+B):POKE 62720!+B,O%:NEXT B 730 DATA 32,32,32,32,32,32,32,83,65,86,73,78,71,32,70,73,76,69,32,95,32,80,76,69,65,83,69,32,87,65,73,84 740 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 750 PR$(CU)=STR$(LN)+" PRINT CHR$(26)":CU=CU+1:LN=LN+IC 760 PR$(CU)=STR$(LN)+" WHILE A<>32:Z1=Z:READ Z,A:Z=Z1+Z:POKE Z+61440!,A:WEND 770 CU=CU+1:LN=LN+IC 780 N2=0 790 FOR N=0 TO 2944 STEP 128 800 FOR N1=N TO N+127 810 Z=N1+61440! 820 T%=PEEK(Z) 830 IF T%=32 THEN 910 840 POKE N1+61440!,127 850 Z%=N1-N2 860 Z$=MID$(STR$(Z%),2):T$=MID$(STR$(T%),2) 870 IF LEN(PR$)<50 THEN PR$=PR$+Z$+","+T$+",":GOTO 900 880 PR$(CU)=STR$(LN)+" DATA "+PR$+Z$+","+T$ 890 CU=CU+1:LN=LN+IC:PR$="" 900 N2=N1 910 NEXT N1 920 NEXT N 930 PR$(CU)=STR$(LN)+" DATA "+PR$+"32,32" 940 CU=CU+1:LN=LN+IC 950 PR$(CU)=STR$(LN)+" END" 960 REM **********SAVE PROGRAM TO DISK*********** 970 OPEN "O",#1,Q$+F$+".BAS" 980 FOR N=1 TO CU+1:PRINT#1,PR$(N):NEXT N 990 CLOSE #1:GOSUB 600 1000 GOTO 250 SK*********** 970 OPEN "O",#1,Q$+F$+".BAS" 9 32,32,32,32,32,32,32,83,65,86,73,78,71,32,70,73,76,69,32,95,32,80,76,69,65,83,69,32,87,65,73,84 740 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 750 PR$(CU)=STR$(LN)+" PRINT CHR$(26)":CU=CU+1:LN=LN+IC 760 PR$(CU)=STR$(LN)+" WHILE A<>32:Z1=Z:READ Z,A:Z=Z1+Z:POKE Z+61440!,A:WEND 770 CU=CU+1:LN=LN+IC 780 N2=0 790 FOR N=0 TO 2944 STEP 128 800 FOR N1=N TO N+127 810 Z=N1+61440! 820 T%=PEEK(Z) 830 IF T%=32 THEN 910 840 POKE N1+61440!,127 850 Z%=N1-N2 860 67 0 46 1 69 1 46 1 67 1 46 1 26 9 26 1 26 2 26 1 26 17 26 1 26 18 26 1 26 2 26 1 26 17 26 1 26 61 26 1 26 2 26 1 26 2 26 1 26 2 26 1 26 11 26 1 26 2 26 1 26 2 26 1 26 12 26 1 26 2 26 1 26 2 26 1 26 2 26 1 26 11 26 1 26 2 26 1 26 2 26 1 26 61 26 1 26 2 26 1 26 2 24 1 11 1 26 10 26 1 26 2 26 1 26 2 26 1 6 1 26 1 26 13 26 1 26 2 26 1 26 2 24 1 11 1 26 10 26 1 26 2 26 1 26 2 26 1 6 1 26 1 26 62 24 1 11 1 10 3 22 1 22 1 8 1 26 10 26 1 6 1 26 1 10 3 22 1 22 1 8 1 26 13 24 1 11 1 10 3 22 1 22 1 8 1 26 10 26 1 6 1 26 1 10 3 22 1 22 1 8 1 10 61 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 10 10 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 10 12 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 10 10 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 6 55 22 5 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 7 22 4 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 8 22 5 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 7 22 4 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 51 21 5 22 1 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 6 3 21 5 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 6 4 21 5 22 1 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 6 3 21 5 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 21 52 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 21 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 22 52 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 3 25 1 21 1 8 1 22 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 3 25 1 21 1 8 1 22 51 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 22 3 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 50 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25  1 25 1 25 3 10 3 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25 1 25 1 25 3 25 51 22 2 25 8 22 2 10 6 25 1 25 3 10 6 25 1 25 3 25 8 22 2 25 8 22 2 10 6 25 1 25 3 10 6 25 1 25 3 32 32 2 2 10 6 25 1 25 3 10 6 25 1 25 3 25 8 22 2 1 22 1 22 1 22 4 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 3 25 1 21 1 8 1 22 51 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 22 3 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 50 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25  67 0 46 1 69 1 46 1 67 1 46 1 24 283 24 1 24 1 24 1 24 1 13 1 10 122 22 1 22 1 22 1 25 1 10 123 22 1 22 1 22 1 22 1 8 1 10 116 8 1 6 1 22 5 13 1 22 1 22 1 13 1 22 1 10 107 8 1 22 8 22 1 1 1 22 5 23 1 23 1 23 1 23 1 22 1 10 106 10 1 13 1 8 1 22 7 22 1 21 6 22 1 22 1 22 1 22 1 25 1 10 105 10 1 10 1 8 1 8 1 8 1 22 6 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 100 10 1 13 1 10 1 8 1 2 1 8 1 8 1 21 5 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 98 10 1 14 1 10 1 10 1 8 1 8 1 13 1 8 1 8 1 10 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 96 10 1 13 1 10 1 10 1 10 1 8 1 8 1 8 1 2 1 8 1 8 1 22 6 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 94 10 1 10 1 10 1 2 1 10 1 10 1 8 1 13 1 8 1 8 1 8 1 8 1 8 1 22 5 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 1 22 1 22 1 8 1 10 92 13 1 10 1 10 1 10 1 10 1 10 1 10 1 8 1 8 1 8 1 8 1 13 1 8 1 8 1 8 1 21 4 0 6 0 1 25 6 21 2 22 1 22 1 22 99 22 1 21 12 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 5 8 1 22 98 22 1 21 13 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 7 22 1 22 1 22 1 8 1 22 109 22 1 22 1 22 3 22 1 22 1 10 8 22 1 22 1 22 1 22 1 22 1 22 1 8 1 22 106 22 1 22 1 22 3 22 1 22 1 10 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 22 105 22 1 22 1 22 3 22 1 22 1 22 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 105 22 1 22 1 22 3 22 1 22 1 22 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 105 22 1 22 1 22 3 22 1 22 1 22 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 23 105 23 1 23 1 23 3 23 1 23 1 21 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 105 22 1 22 1 22 3 22 1 22 1 21 8 22 1 22 1 22 1 22 1 22 1 22 1 25 1 32 32  1 22 1 25 1 22 105 22 1 22 1 22 3 22 1 22 1 21 8 22 1 1 22 1 22 1 22 1 22 1 25 1 21 5 8 1 22 98 22 1 21 13 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 7 22 1 22 1 22 1 8 1 22 109 22 1 22 1 22 3 22 1 22 1 10 8 22 1 22 1 22 1 22 1 22 1 22 1 8 1 22 106 22 1 22 1 22 3 22 1 22 1 10 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 22 105 22 1 22 1 22 3 22 1 22 1 22 7 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 105 22 1 98 0 121 1 74 2 101 1 114 1 114 1 121 1 83 2 99 1 104 1 111 1 108 1 108 1 101 1 47 15 8 1 47 126 22 2 8 1 1 105 8 1 8 1 47 17 22 3 22 1 8 1 10 15 1 89 8 1 8 1 8 1 47 15 10 3 1 1 10 16 22 1 1 89 8 1 8 1 8 1 8 1 47 13 10 3 22 1 1 1 10 15 22 1 22 1 10 88 1 1 47 16 10 3 22 1 22 1 1 1 92 1 10 13 22 1 22 1 22 1 10 87 22 1 1 1 47 15 10 3 22 1 22 1 22 1 1 1 0 1 10 12 22 1 22 1 22 1 22 1 10 86 22 1 22 1 1 1 47 14 10 3 22 1 22 1 22 1 22 1 1 1 0 1 10 11 22 1 22 1 22 1 22 1 22 1 10 85 22 1 22 1 22 1 1 1 47 13 10 3 22 1 22 1 22 1 22 1 22 1 1 1 0 1 10 10 22 1 22 1 22 1 22 1 22 1 22 1 92 1 10 83 22 1 22 1 22 1 22 1 1 1 47 12 10 3 22 1 22 1 22 1 22 1 22 1 22 1 1 1 0 1 10 9 22 1 22 1 22 1 22 1 22 1 22 1 22 1 0 1 10 82 22 1 22 1 22 1 22 1 22 1 1 1 47 11 10 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 1 1 0 1 11 16 0 1 10 81 22 1 22 1 22 1 22 1 22 1 22 1 1 1 47 10 10 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 1 1 0 1 11 16 0 1 1 88 47 9 1 13 0 1 11 16 0 1 1 88 47 8 1 14 0 1 10 13 22 1 22 1 22 1 22 1 22 1 1 1 21 78 22 1 22 1 22 1 22 1 22 1 8 1 1 2 47 7 1 15 0 1 10 12 22 1 22 1 24 1 22 1 24 1 22 1 1 1 21 79 22 1 22 1 22 1 22 1 22 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 8 1 1 13 0 1 10 1 22 1 22 1 11 1 22 1 11 1 22 1 11 1 22 1 11 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 1 1 21 80 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 0 1 8 1 1 12 0 1 22 1 22 1 22 1 11 1 22 1 11 1 22 1 11 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 1 1 21 81 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 4 1 1 1 21 82 22 1 22 1 27 1 22 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 27 1 22 1 22 1 22 1 9 1 20 1 22 1 8 1 21 82 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 4 1 22 1 22 1 21 83 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 9 1 20 1 22 1 22 1 21 84 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 4 1 22 1 22 1 83 77 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 23 73 23 1 23 1 23 1 23 1 23 1 23 1 23  1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 32 32 3 1 23 1 23 1 23 1 23 1 2 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 4 1 22 1 22 1 83 77 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 83 1 23 73 23 1 23 1 23 1 23 1 23 1 23 1 23  67 0 46 1 69 1 46 1 67 1 46 1 26 178 26 1 26 2 26 1 26 17 26 1 26 18 26 1 26 2 26 1 26 17 26 1 8 11 26 50 26 1 26 2 26 1 26 2 26 1 26 2 26 1 26 11 26 1 26 2 26 1 26 2 26 1 26 12 26 1 26 2 26 1 26 2 26 1 26 2 26 1 26 11 26 1 26 2 26 1 26 2 26 1 22 10 8 1 26 50 26 1 26 2 26 1 26 2 24 1 11 1 26 10 26 1 26 2 26 1 26 2 26 1 6 1 26 1 26 13 26 1 26 2 26 1 26 2 24 1 11 1 26 10 26 1 26 2 26 1 26 2 26 1 6 1 26 1 21 10 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 10 22 1 22 1 22 1 22 1 22 1 8 1 26 18 24 1 11 1 10 3 22 1 22 1 8 1 26 10 26 1 6 1 26 1 10 3 22 1 22 1 8 1 26 13 24 1 11 1 10 3 22 1 22 1 8 1 26 10 26 1 6 1 26 1 10 3 22 1 22 1 8 1 21 10 22 1 8 1 21 15 8 1 10 8 25 1 21 5 22 1 8 1 10 17 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 10 10 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 10 12 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 10 10 22 1 22 1 8 1 22 2 22 1 22 1 22 1 13 1 21 10 22 1 8 1 21 15 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 7 22 1 8 1 6 11 22 5 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 7 22 4 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 8 22 5 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 6 7 22 4 22 1 22 1 22 1 13 1 21 1 22 1 22 1 25 1 21 12 22 1 8 1 21 30 22 1 6 6 21 5 22 1 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 6 3 21 5 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 6 4 21 5 22 1 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 6 3 21 5 22 1 22 1 22 1 21 1 22 1 22 1 25 1 22 1 22 1 22 1 22 1 21 14 22 1 8 1 22 30 22 3 8 1 21 2 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 21 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 22 14 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 3 22 1 22 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 3 25 1 21 1 8 1 22 3 22 1  22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 3 25 1 21 1 8 1 8 8 22 5 22 31 22 4 22 3 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 22 3 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 21 8 8 1 22 4 22 31 10 3 25 1 10 2 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25 1 25 1 25 3 10 3 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25 1 25 1 25 3 21 10 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1  22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 25 3 22 2 25 8 22 2 10 6 25 1 25 3 10 6 25 1 25 3 25 8 22 2 25 8 22 2 10 6 25 1 25 3 10 6 25 1 25 3 32 32 2 2 10 6 25 1 25 3 10 6 25 1 25 3 25 1 10 2 25 1 22 3 22 1 10 3 25 1 22 1 22 4 22 1 10 3 25 1 22 1 10 3 25 1 21 1 8 1 10 1 25 1 10 2 25 1 10 2 25 1 21 1 8 1 10 1 25 1 10 2 25 1 21 8 8 1 22 4 22 31 10 3 25 1 10 2 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25 1 25 1 25 3 10 3 25 1 22 1 25 3 22 2 10 3 25 1 22 1 25 3 22 2 10 2 25 1 10 2 25 1 25 1 25 3 10 2 25 1 10 2 25 1 25 1 25 3 21 10 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1  10 2 22 1 8 1 10 5 22 1 22 1 22 1 8 1 22 3 22 4 22 3 23 1 23 1 23 1 8 1 22 3 22 1 22 1 22 1 22 1 22 3 22 1 22 1 22 1 22 1 10 3 22 1 8 1 22 84 22 1 22 1 22 5 22 7 22 4 22 3 22 4 22 3 22 7 22 4 22 3 22 1 22 1 22 84 22 1 22 1 22 5 24 1 24 1 24 1 24 1 22 3 22 4 22 3 24 1 24 1 24 1 25 1 22 3 24 1 24 1 24 1 22 4 24 1 24 1 24 1 22 1 22 3 22 1 22 1 21 84 22 1 25 1 23 5 23 1 23 1 23 1 22 1 22 3 22 4 22 3 22 7 23 1 23 1 23 1 22 4 21 1 22 1 23 1 23 1 21 3 22 1 25 1 22 95 22 3 22 4 22 3 22 7 22 7 21 2 8 1 22 91 21 6 22 1 22 1 22 1 25 1 21 3 22 1 22 1 22 1 25 1 22 3 22 7 22 1 22 1 22 1 22 1 22 3 21 3 8 1 22 4 22 599 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 8 1 10 9 22 1 22 88 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 8 1 10 7 22 1 22 1 22 88 22 1 22 1 22 13 22 1 22 1 21 12 22 1 22 1 8 1 10 5 22 1 22 1 25 1 22 88 22 1 22 1 22 13 22 1 22 1 21 13 22 1 22 1 8 1 10 3 22 1 22 1 25 1 22 89 22 1 22 1 22 13 22 1 22 1 21 14 22 1 22 1 8 1 10 1 22 1 22 1 25 1 22 90 22 1 22 1 22 13 22 1 22 1 21 15 22 1 22 1 22 1 22 1 25 1 22 91 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 9 22 1 22 1 22 1 22 92 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 10 8 22 1 22 1 22 1 22 1 8 1 22 91 22 1 22 1 22 7 22 1 22 1 22 4 22 1 22 1 10 14 22 1 22 1 25 1 21 1 22 1 22 1 8 1 22 90 22 1 22 1 22 7 22 1 22 1 22 4 22 1 22 1 10 13 22 1 22 1 25 1 21 3 22 1 22 1 8 1 22 89 22 1 22 1 22 7 22 1 22 1 22 4 22 1 22 1 10 12 22 1 22 1 25 1 21 5 22 1 22 1 8 1 22 88 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 12 22 1 25 1 21 7 22 1 22 1 22 88 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 12 25 1 21 9 22 1 32 1 2 1 22 1 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 9 22 1 22 1 22 1 22 92 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 4 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 10 8 22 1 22 1 22 1 22 1 8 1 22 91 22 1 22 1 22 7 22 1 22 1 22 4 22 1 22 1 10 14 22 1 22 1 2 8 2 1 2 127 2 127 2 1 2 126 2 1 2 127 2 1 22 126 22 1 22 1 2 77 21 49 22 1 25 1 24 2 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 2 58 10 48 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 6 9 57 9 4 27 1 27 1 27 1 27 1 16 1 13 39 22 1 1 1 18 1 22 1 22 1 22 1 22 1 22 1 22 1 24 1 24 1 24 1 24 1 24 1 24 1 22 1 22 1 5 2 24 4 10 6 22 1 22 1 22 1 22 1 8 1 11 46 11 4 6 2 6 2 11 1 21 40 1 1 1 1 22 1 22 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 24 1 22 1 22 1 22 1 5 1 22 1 22 1 22 1 24 1 10 3 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 2 22 1 22 1 23 1 23 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 2 22 1 23 1 23 1 23 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 23 1 23 1 22 1 22 1 22 2 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 23 1 23 1 22 37 22 1 22 1 22 1 22 1 22 10 22 1 22 1 5 1 22 1 22 1 22 1 22 1 22 3 22 1 22 1 13 1 22 1 1 1 27 1 22 1 13 1 22 1 22 1 22 2 22 1 22 1 24 1 23 1 22 1 22 1 10 1 11 2 8 2 22 1 22 1 13 1 22 1 22 1 22 1 22 2 22 1 22 1 11 1 22 1 22 1 22 1 11 3 22 3 22 1 20 1 23 1 22 1 22 1 22 2 22 1 22 1 22 2 22 1 22 1 22 2 22 1 22 1 22 1 22 1 22 2 22 1 13 2 22 37 22 1 22 1 22 1 22 1 22 1 22 1 22 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 20 1 22 1 22 1 22 1 22 1 22 1 22 2 22 1 22 1 13 1 22 1 1 1 22 1 22 1 13 1 22 1 22 1 22 2 22 1 22 1 24 1 24 1 22 1 22 1 21 1 11 2 25 2 22 1 22 1 22 1 22 1 22 1 22 1 22 2 22 1 20 1 31 1 22 1 22 1 22 1 11 3 22 3 22 1 20 1 23 1 22 1 22 1 22 2 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 13 1 11 1 21 34 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 1 22 1 22 1 22 1 24 1 24 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 35 22 1 22 1 22 1 22 1 22 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 22 1 10 1 22 1 8 1 22 1 10 1 22 1 8 1 22 1 22 4 22 1 22 1 23 1 23 1 22 1 22 1 22 1 23 1 23 4 22 1 22 1 22 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 22 1 22 1 22 1 23 1 23 4 22 1 22 1 22 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 23 1 22 1 22 1 22 1 23 1 23 4 23 1 22 1 22 1 22 1 23 1 23 1 23 1 23 1 23 1 23 1 22 1 22 1 22 1 23 1 23 1 13 39 30 1 13 1 21 11 22 1 25 1 21 2 22 1 25 1 13 5 30 1 13 1 13 3 30 1 13 1 13 6 30 1 13 1 13 9 30 1 13 1 13 6 30 1 13 1 13 9 30 1 13 1 13 7 30 1 13 1 13 7 30 1 13 1 11 37 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 98 798 121 1 74 2 101 1 114 1 114 1 121 1 83 2 99 1 104 1 111 1 108 1 108 1 101 1 32 32  11 1 98 798 121 1 74 2 101 1 1142 1 25 1 13 5 30 1 13 1 13 3 30 1 13 1 13 6 30 1 13 1 13 9 30 1 13 1 13 6 30 1 13 1 13 9 30 1 13 1 13 7 30 1 13 1 13 7 30 1 13 1 11 37 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 1 67 0 46 1 69 1 46 1 67 1 46 1 10 43 8 1 8 1 10 125 10 1 8 1 10 1 8 1 10 123 10 1 8 1 10 1 8 1 8 1 10 84 22 1 13 1 22 1 22 1 22 1 22 1 22 1 8 1 10 30 10 1 8 1 10 1 8 1 10 1 8 1 10 81 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 28 10 1 8 1 10 1 8 1 10 1 8 1 8 1 21 85 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 26 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 10 87 8 1 21 3 22 1 22 1 22 1 8 1 10 24 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 8 1 21 92 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 1 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 21 93 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 21 94 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 10 1 8 1 10 1 8 1 10 1 8 1 25 1 21 96 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 10 1 8 1 10 1 8 1 25 1 22 99 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 8 1 8 1 8 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 10 1 8 1 25 1 21 101 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 8 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 25 1 21 104 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 108 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 113 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 10 118 22 1 25 1 22 5 22 1 10 119 22 1 25 1 22 6 22 1 22 119 22 1 22 7 22 1 22 119 22 1 22 7 22 1 21 119 22 1 8 1 22 6 22 1 21 120 22 1 8 1 22 5 22 1 21 121 22 1 8 1 22 4 22 1 32 32 7 22 1 21 119 22 1 8 1 22 6 22 1 21 120 22 1 8 1 22 5 22 1 21 121 22 1 8 1 22 4 22 1 38 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 10 1 8 1 25 1 21 101 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 8 1 8 1 8 1 22 1 22 1 22 1 22 1 22 1 22 1 10 1 8 1 25 1 21 104 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 8 1 22 1 22 1 2 67 0 46 1 69 1 46 1 67 1 46 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 77 13 51 13 77 22 2 22 4 22 3 22 1 22 1 22 1 22 1 22 3 10 7 22 1 22 1 22 1 22 1 10 3 22 1 22 1 22 1 8 1 8 3 10 4 22 3 22 1 22 1 22 1 22 1 13 3 13 77 22 2 22 4 22 3 22 7 22 7 22 7 22 4 22 3 8 1 10 2 22 1 22 3 13 7 13 77 22 2 22 4 22 3 24 1 24 1 24 1 22 4 22 7 22 7 22 4 22 3 21 1 22 1 25 1 22 1 22 3 24 1 24 1 24 1 13 4 13 77 22 2 22 2 22 2 22 3 23 1 23 1 23 1 22 4 22 7 22 7 22 4 22 3 23 2 22 2 22 3 23 1 23 1 23 1 13 4 13 77 22 2 10 1 22 1 8 1 22 1 22 3 22 7 22 7 22 7 22 4 22 3 22 4 22 3 13 7 13 77 22 2 25 1 21 2 22 1 22 3 22 1 22 1 22 1 22 1 22 3 22 1 22 1 22 1 22 1 21 3 22 1 22 1 22 1 22 1 21 3 22 1 22 1 22 1 25 1 22 3 22 4 22 3 22 1 22 1 22 1 22 1 13 3 13 77 13 51 13 77 10 2 22 1 22 1 22 1 8 1 22 10 10 14 22 1 22 1 22 1 8 1 10 10 22 1 22 1 22 1 8 1 13 3 13 77 22 2 22 14 22 14 22 4 22 10 13 7 13 77 22 2 24 1 24 1 24 1 24 1 22 10 22 14 22 4 22 10 24 3 24 1 13 3 13 77 23 2 23 1 23 1 23 1 22 1 22 10 22 14 22 4 22 10 23 3 22 1 13 3 13 77 22 6 22 10 22 14 22 4 22 10 22 4 13 3 13 77 21 2 22 1 22 1 22 1 25 1 22 3 22 7 22 1 22 1 22 1 22 1 22 3 21 7 22 1 22 1 22 1 25 1 22 3 21 7 22 1 22 1 22 1 25 1 13 3 13 77 13 51 13 77 8 2 10 4 22 3 22 1 22 1 22 1 22 1 8 3 10 4 22 3 22 1 22 1 22 1 8 1 22 3 22 1 22 1 22 1 22 1 22 3 22 1 22 1 22 1 22 1 10 3 22 1 22 1 22 1 8 1 13 3 13 77 22 2 8 1 10 2 22 1 22 3 22 7 8 1 10 2 22 1 22 3 22 4 22 3 22 7 22 4 22 3 13 7 13 77 22 2 21 1 22 1 25 1 22 1 22 3 24 1 24 1 24 1 22 4 21 1 22 1 25 1 22 1 22 3 24 1 24 1 24 1 25 1 22 3 24 1 24 1 24 1 22 4 24 1 24 1 24 1 22 1 22 3 24 1 24 1 24 1 24 1 13 3 13 77 22 2 23 2 22 2 22 3 23 1 23 1 23 1 22 4 23 2 22 2 22 3 23 1 23 1 23 1 8 1 22 3 23 1 23 1 23 1 22 4 21 1 22 1 23 1 23 1 23 3 23 1 23 1 23 1 22 1 13 3 13 77 22 2 22 4 22 3 22 7 22 4 22 3 22 4 22 3 22 7 21 2 8 1 22 8 13 3 13 77 22 2 22 4 22 3 22 1 22 1 22 1 22 1 22 3 22 4 22 3 22 1 22 1 22 1 25 1 22 3 22 1 22 1 22 1 22 1 22 3 21 3 8 1 21 3 22 1 22 1 22 1 25 1 13 3 13 77 13 51 13 77 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 13 1 32 1 22 4 24 1 24 1 24 1 22 1 22 3 24 1 24 1 24 1 24 1 13 3 13 77 22 2 23 2 22 2 22 3 23 1 23 1 23 1 22 4 23 2 22 2 22 3 23 1 23 1 23 1 8 1 22 3 23 1 23 1 23 1 22 4 21 1 22 1 23 1 23 1 23 3 23 1 23 1 23 1 22 1 13 3 13 77 22 2 22 4 22 3 22 7 22 4 22 3 22 4 22 3 22 7 21 2 8 1 22 8 13 3 13 77 22 2 22 4 22 3 22 1 22 1 22 1 22 1 22 3 22 4 22 3 22 1 22 1 22 1 25 1 22 3 22 1 22 1 22 1 22 1 22 3 21 3 8 1 21 3 22 1 22 1 22 1 25 1 13 3 13 77 13 51 13 77 13 1 13 1 13 1  67 0 46 1 69 1 46 1 67 1 46 1 10 26 8 1 10 126 22 1 22 1 8 1 10 124 22 1 22 1 22 1 22 1 8 1 23 121 5 1 22 1 22 1 22 1 22 1 17 1 5 1 17 1 23 1 2 119 2 1 22 1 22 1 22 1 22 1 26 1 3 1 22 1 8 1 2 118 2 1 2 1 22 1 22 1 22 1 22 1 22 1 22 1 2 119 2 1 2 1 2 1 21 1 22 1 22 1 22 1 22 1 25 1 10 122 22 1 22 1 22 1 22 1 22 1 8 1 10 121 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 119 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 10 117 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 1 22 1 22 1 8 1 10 115 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 3 22 1 22 1 8 1 10 113 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 21 5 22 1 22 1 8 1 10 111 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 8 1 21 2 22 1 22 1 8 1 23 89 23 1 23 1 23 1 23 1 23 1 23 1 8 1 10 13 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 21 3 22 1 22 1 8 1 27 88 27 1 27 1 27 1 27 1 27 1 27 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 82 24 1 24 1 24 1 24 1 24 1 24 1 25 1 10 11 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 5 22 1 22 1 10 111 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 6 22 1 22 1 10 110 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 7 22 1 22 1 10 109 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 25 1 5 8 22 1 17 1 10 108 22 1 22 1 22 1 22 1 22 1 22 1 25 1 25 1 22 10 22 1 22 1 22 1 22 1 8 1 10 104 22 1 22 1 22 1 22 1 22 1 25 1 25 1 23 12 23 1 10 107 25 1 10 1 25 1 10 1 25 1 25 1 32 32 4 22 1 22 1 22 1 22 1 22 1 25 1 25 1 23 12 23 1 10 107 25 1 10 1 25 1 10 1 25 1 25 1 32 32 2 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 24 82 24 1 24 1 24 1 24 1 24 1 24 1 25 1 10 11 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 5 22 1 22 1 10 111 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 6 22 1 22 1 10 110 22 1 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 22 7 22 1 22 1 10 109 22 1 22 1 22 1 22 1 22 1 22 1 22 1 25 1 25 1 5 8 22 1 17 1 10 108 22 1 22 1 22 1 22 1 22 1 22 1 25 1 25 1 22 10 22 1 22 1 22 1 22 1 8 1 10 XSUB DDT AUTOST.COM M9000,9C01,0198 D0D98 S0D98 24 . G0000 SAVE 14 AUTONEW.COM GFX DOC€23456789:;<=>?@AGFX DOCBCDEGFX1 GFX?FGHIJKLMGFX2 GFXNOGFX3 GFXPQRGFXDATA CECSTUVGFXTITLECECWXYZOLD/NEW BAS[\]^RIENDEERGFX_`abSANTA GFXcdeSHIP GFX#fghijSLIEGH GFX#klmnoSUPER GFXpqrTRAIN GFX$stuvwTURKEY GFXxyzWELCOME GFX{|}~WITCH GFX€�AUTOCHG $$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå100 PRINT CHR$(26) 110 FOR X=1 TO 20:PRINT:NEXT X 120 INPUT"FILENAME FOR AUTOST.COM REPLACEMENT?";G$ 130 FOR X=1 TO 52:POKE 64127!+X,32:NEXT X 140 ON ERROR GOTO 330 150 OPEN "I",#1,G$+".GFX" 160 T=0:S2=0:S1=61440!:PRINT CHR$(26) 170 POKE 61440!+128,32 180 WHILE T<>32:INPUT #1,T,S2 190 POKE S1+S2,T:S1=S1+S2:WEND 200 CLOSE 210 GOTO 220 220 CLEAR 230 FOR I=1 TO 3073 240 H=PEEK (61439!+I) 250 IF H=32 THEN 300 ELSE 260 260 IF H>32 THEN 300 ELSE 270 270 IF H>64 THEN 280 ELSE 290 280 H=H+128:GOTO 300 290 H=H+96 300 POKE &H8FFF+I,H 310 NEXT I 320 POKE &H8FFF+I,&H24 330 SYSTEM H>64 THEN 280 ELSE 290 280 H=H+128:GOTOWITCH GFX€�AUTOCHG SUB‚AUTOREP $$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå*.|Ög"UcÍP˜ÍPgÍPjÍPW *U.ÍE*U.ˆ>w*U.‰|w*Uéw# x±ÂEÉ ÃÍSUB SETg$G$ $ jvvvh FOR THE OSBORNE AND EPSON W/GRAFTRAX v v xx vvvvh v wv v v v v vxxxv jvh uvvvy vuvww jy uh  v uh v v vwwwh v uh vwwwv v v \k/ v v vxxxy v v {l{ v v v v v /k\ \k/ v vxxxv vvv {l{ v vwwwv v /k\ v v v jvvvv v v v v  v v jvvvh vvv v v v vxxxx uvvvv wwwwv v BY C.E.COSTANTINOU VERSION 4.0 uvvvy  $$¢·Â¦ 2[à 7ÁÑáÉÍ >?ÍÇ Ãþ eÍ¢!g"cÉ> åÕÅ_Í¢ÁÑáÉþÈþaØæ_Éå!f~·> Êô 5*c~#"cÍÔ áÉþ Ò Æ0ÃÇ Æ7ÃÇ õæÍö ñæÃö > ÍÇ > ÃÇ ÅÕå Í¢æáÑÁÉë|Í }à þÒ@ þ ÒÇ >.ÃÇ ë*_}“o|šëÉþ Èþ,Èþ ÉÖ0þ ØÆùþØÃ« ë^#V#ëÉë!ÍY ))))µoÍÝ ÍP Âq ëÉs#r#å!V4áÉÍÝ !V6#þ ÊÕ þ,® >€2Vñ Ím Í… þ ÊÕ ÍÝ Ím Í… þ ÊÕ ÍÝ Ím Í… þ « Vþ�Ê« ·Éå!à XN!³~ëáÉÍã Êþ Ãö æ v BY C.E.COSTANTINOU VERSION 4.0 uvvvy  67 0 46 1 69 1 46 1 67 1 46 1 8 5 10 3 8 20 10 3 10 95 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 10 6 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 25 88 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 25 6 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 21 95 22 1 22 1 25 1 21 20 22 1 22 1 25 1 18 103 20 1 18 22 20 1 8 359 10 3 8 20 10 3 10 95 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 10 6 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 25 88 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 25 6 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 21 95 22 1 22 1 25 1 21 20 22 1 22 1 25 1 18 103 20 1 18 22 20 1 8 359 10 3 8 20 10 3 10 95 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 10 6 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 25 88 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 25 6 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 21 95 22 1 22 1 25 1 21 20 22 1 22 1 25 1 18 103 20 1 18 22 20 1 8 359 10 3 8 20 10 3 10 95 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 10 6 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 25 88 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 25 6 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 32 32 5 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 32 32 1 22 1 8 1 25 88 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 25 6 25 1 25 1 25 1 25 1 25 1 21 1 22 1 22 1 22 1 22 1 25 1 21 1 21 1 21 1 21 1 21 1 21 1 21 95 22 1 22 1 25 1 21 20 22 1 22 1 25 1 18 103 20 1 18 22 20 1 8 359 10 3 8 20 10 3 10 95 22 1 22 1 22 1 22 1 22 1 8 1 22 1 5 1 17 1 22 1 10 1 22 1 22 1 22 1 22 1 22 1 8 1 100 DIM A(50),G$(50),E(50),V(10),W(10),X(10),Y(10),Z(10) 101 DIM D(1000),A$(50),Q(20,20),P3(4),P4(3,10) 102 DIR=1:F$="":WIDTH 128:WIDTH LPRINT 255 103 F$="":OPEN "I",#1,"GFXDATA.CEC" 104 INPUT #1,TIMELIM 105 FOR B=1 TO 37:LINE INPUT #1,A$(B):NEXT B 106 FOR B=0 TO 32:INPUT #1,D(B+32):NEXT B 107 FOR B=1 TO 12:FOR N=1 TO 20:INPUT #1,Q(B,N):NEXT N:NEXT B 108 FOR B=1 TO 198:INPUT #1,D(B+100):NEXT B 109 FOR B=1 TO 3:INPUT #1,P3(B):FOR N=1 TO P3(B):INPUT #1,P4(B,N):NEXT N:NEXT B 110 INPUT #1,P3(4),P3(5) 111 FOR B=1 TO 9:INPUT #1,V(B),W(B),X(B),Y(B),Z(B):NEXT B 112 H=0:N=0:M=0:S1=61440! 113 GOSUB 198 114 B=0:GOSUB 317 115 CLOSE:F$="":C$="" 116 REM * GFX seed ************************************************************ 117 T=0:S2=0:S1=61440!:Z=0:N1=0:N3=0:X0=0:X1=0:X2=0:E1=0:E2=0 118 P=1:Y0=0:Y1=95:C=0:C$="":J=60536!:B1=0:B2=0:D(6)=0:G=61440!:H=1:E=1 119 REM * menu & directory routine ********************************************* 120 PRINT CHR$(26):FOR B=H TO H+8:PRINT A$(B):NEXT B:PRINT A$(35) 121 IF DIR=1 THEN 122 ELSE 123 122 PRINT A$(19):WIDTH 54:FILES:WIDTH 128 123 IF H=1 THEN 124 ELSE 149 124 PRINT:PRINT:PRINT:GOTO 169 125 REM * NO FILE menu decision ************************************************ 126 H=1:ON E GOTO 127,139 127 E=2:E1=1:C1$=C$ 128 IF C$="Q" OR C$="q" THEN 363 ELSE 129 129 IF C$="B" OR C$="b" THEN H=3:GOTO 137 ELSE GOTO 130 130 IF C$="E" OR C$="e" THEN H=4:GOTO 137 ELSE GOTO 131 131 IF C$="M" OR C$="m" THEN H=7:GOTO 137 ELSE GOTO 132 132 IF C$="P" OR C$="p" THEN H=10:GOTO 120 ELSE GOTO 133 133 IF C$="S" OR C$="s" THEN H=11:E=1:GOTO 137 ELSE GOTO 134 134 IF C$="D" OR C$="d" THEN 135 ELSE 136 135 IF DIR=1 THEN DIR=0 ELSE DIR=1 136 C$="":GOTO 116 137 GOTO 169 138 REM * EDIT menu decision *************************************************** 139 E1=2:C1$=C$ 140 IF C$="Q" OR C$="q" THEN H=1:E=1:GOTO 116 ELSE GOTO 141 141 IF C$="A" OR C$="a" THEN H=9:GOTO 169 ELSE GOTO 142 142 IF C$="E" OR C$="e" THEN H=12:GOTO 169 ELSE GOTO 143 143 IF C$="M" OR C$="m" THEN H=5:GOTO 169 ELSE GOTO 144 144 IF C$="R" OR C$="r" THEN H=2:GOTO 169 ELSE GOTO 145 145 IF C$="S" OR C$="s" THEN H=6:E=1:GOTO 169 ELSE GOTO 146 146 IF C$="D" OR C$="d" THEN GOTO 147 ELSE 148 147 IF DIR=1 THEN DIR=0: ELSE DIR=0 148 C$="":H=1:GOTO 169 149 REM* PRINTER seed ********************************************************** 150 IF J1<61439! THEN J1=61439! 151 C$="":G=0:S1=61440! 152 REM * PRINT menu status **************************************************** 153 PRINT:PRINT A$(28):PRINT A$(37);INT((J1-61440!)/128)+2;A$(29);P;A$(30);F$:PRINT:PRINT 154 REM * PRINTER menu decision ************************************************ 155 N=20:M=1:GOSUB 176 156 IF C$="D" OR C$="d" THEN GOTO 157 ELSE GOTO 159 157 IF DIR=1 THEN DIR=0 ELSE DIR=1 158 GOTO 119 159 IF C$="F" OR C$="f" THEN N=21:M=2:GOSUB 176 ELSE GOTO 161 160 GOTO 119 161 IF C$="P" OR C$="p" THEN GOTO 162 ELSE GOTO 164 162 N=32:M=3:L=16:GOSUB 171 163 J1=(128*Y0)+61439!:S1=61440!:GOTO 119 164 IF C$="Q" OR C$="q" THEN C$="":GOTO 116 ELSE GOTO 165 165 IF C$="S" OR C$="s" THEN N=31:M=1:GOSUB 176 ELSE GOTO 167 166 P=VAL(C$):GOTO 119 167 IF C$="B" OR C$="b" THEN GOTO 168 ELSE C$="":GOTO 119 168 IF P<1 OR P>4 THEN GOTO 119 ELSE GOTO 169 169 REM * decision routine ***************************************************** 170 L=1:N=Q(H,L):L=2:M=Q(H,L):L=3 171 ON Q(H,L) GOSUB 176,198,200,202,211,218,223,251,261,353,281,313 172 L=L+1:IF Q(H,L)=0 THEN 173 ELSE 171 173 IF L>19 THEN GOTO 174 ELSE GOTO 175 174 RETURN 175 IF H=10 THEN 119 ELSE 126 176 REM * 1-prompt routine ***************************************************** 177 REM * VARIABLE 'M' IS INPUT CONTROL 'N' IS OUTPUT CONTROL ****************** 178 FOR B=0 TO 256:D(B+500)=PEEK (61439!+(22*128)+B):NEXT B 179 PRINT CHR$(11); 180 IF H=1 THEN 181 ELSE 183 181 IF E=2 THEN 182 ELSE 184 182 PRINT A$(N);" - (A,D,E,M,Q,R,S) ";:GOTO 185 183 IF H=10 OR H=9 OR M=4 THEN GOTO 184 ELSE PRINT "(";C1$;") ";:GOTO 184 184 PRINT A$(N); 185 ON M GOTO 190,193,188,186 186 PRINT:TIMELIM=INT(TIMELIM*5):GOSUB 200 187 TIMELIM=INT(TIMELIM/5):GOTO 196 188 PRINT:GOSUB 223 189 GOTO 196 190 C$=INKEY$ 191 IF LEN(C$)>1 THEN C$="" 192 IF C$="" OR C$=CHR$(10) OR C$=CHR$(11) THEN 190 ELSE PRINT C$:GOTO 195 193 INPUT C$ 194 IF N=21 THEN F$=C$:C$="" 195 GOSUB 201 196 PRINT CHR$(11)CHR$(27)CHR$(82):POKE 64256!,32 197 FOR B=0 TO 256:POKE 61439!+(22*128)+B,D(B+500):NEXT B:RETURN 198 REM * 2-clear screen routine ********************************************** 199 PRINT CHR$(26)CHR$(11)CHR$(11):POKE 64384!,32:RETURN 200 REM * 3-time routine ****************************************************** 201 FOR B=1 TO TIMELIM:NEXT B:RETURN 202 REM * 4-fill screen routine *********************************************** 203 S2=0:T=0:ON ERROR GOTO 211 204 OPEN "I",#1,F$+".GFX" 205 IF H=5 OR H=7 THEN 206 ELSE 208 206 IF N=23 THEN 207 ELSE 208 207 INPUT #1,T,S2:POKE S1,T 208 WHILE T<>32:INPUT #1,T,S2:IF S1+S2>=64512! THEN 210 ELSE 209 209 POKE S1+S2,T:S1=S1+S2:WEND 210 CLOSE:RETURN 211 REM * 5-error routine ***************************************************** 212 IF ERR=53 OR ERR=64 THEN 213 ELSE 363 213 RESUME 214 214 N=27:M=4:C$="":CLOSE:GOSUB 176 215 IF E1<3 THEN H=1 ELSE H=10 216 IF E1=1 THEN E=1 ELSE E=2 217 ON E1 GOTO 119,125 218 REM * 6-move design routine *********************************************** 219 IF N=23 THEN 221 ELSE 220 220 N=23:M=3:GOTO 222 221 S1=61440!+X0+(Y0*128) 222 RETURN 223 REM * 7-position/alpha/graphics routine *********************************** 224 IF H=9 THEN 225 ELSE 233 225 IF C$="A" OR C$="a" THEN E2=1:X=32:GOTO 237 ELSE GOTO 226 226 IF C$="G" OR C$="g" THEN E2=2:N=26:M=2:GOSUB 176 ELSE GOTO 228 227 IF VAL(C$)>32 THEN E2=1:C=27:GOTO 229 ELSE X=VAL(C$):GOTO 237 228 IF C$="M" OR C$="m" THEN E2=3:GOTO 236 ELSE H=1:GOTO 249 229 ON E2 GOTO 231,232,230 230 IF C=27 THEN C$="":L=0:GOTO 169 ELSE GOTO 236 231 IF C=27 THEN C$="":L=0:GOTO 169 ELSE X=C:C$=CHR$(12):GOTO 241 232 IF C=27 THEN C$="G":GOTO 226 ELSE GOTO 237 233 IF H=9 THEN 234 ELSE 236 234 IF E2=3 THEN 236 E LSE 235 235 IF E2=1 THEN X=32:GOTO 237 ELSE GOTO 237 236 X=PEEK(X0+(Y0*128)+61440!) 237 C$="":X1=X:Y1=95 238 C$=INKEY$:X2=X2+1:IF X2>=TIMELIM/20 THEN 239 ELSE 240 239 SWAP X1,Y1:POKE X0+(Y0*128)+61440!,X1:X2=0 240 IF C$="" THEN 238 ELSE 241 241 POKE X0+(Y0*128)+61440!,X 242 C=ASC(C$):IF C>12 OR C<8 THEN 249 ELSE 243 243 ON C-7 GOTO 247,248,245,244,246 244 IF Y0-1<0 THEN Y0=23:GOTO 233 ELSE Y0=Y0-1:GOTO 233 245 IF Y0+1>=24 THEN Y0=0:GOTO 233 ELSE Y0=Y0+1:GOTO 233 246 IF X0+1=128 THEN X0=0:GOTO 233 ELSE X0=X0+1:GOTO 233 247 IF X0-1<0 THEN X0=127:GOTO 233 ELSE X0=X0-1:GOTO 233 248 IF X0+8>=128 THEN X0=0:GOTO 233 ELSE X0=X0+8:GOTO 233 249 IF H=9 THEN 229 ELSE 250 250 RETURN 251 REM * 8-reverser routine ************************************************** 252 IF N=24 THEN 254 ELSE 253 253 G1=X0:G2=Y0*128:N=24:M=3:RETURN 254 G3=X0:G4=Y0*128 255 FOR Y=G+G2 TO G+G4 STEP 128 256 FOR X=G1 TO G3 257 G5=PEEK(Y+X):IF H=12 THEN G5=22:GOTO 259 ELSE 258 258 IF G5>32 THEN 260 ELSE 259 259 POKE (Y+X),D(G5+32) 260 NEXT X:NEXT Y:RETURN 261 REM * 9-letters routine *************************************************** 262 IF J=60536! THEN 263 ELSE 265 263 OPEN "R",#1,"GFXTITLE.CEC",2 264 FIELD #1,2 AS LOT1$ 265 J=J+896!:D(3)=J 266 IF C$="" THEN 278 ELSE 267 267 FOR B1=0 TO 25 STEP 5 268 FOR B2=1 TO LEN(C$) 269 D(3)=D(3)+1:Z$=MID$(C$,B2,1) 270 IF ASC(Z$)<32 OR ASC(Z$)=96 THEN Z$=" " 271 IF (ASC(Z$))>96 THEN UPPER=64 ELSE UPPER=32 272 D(4)=((ASC(Z$)-UPPER)*30+1):D(3)=D(3)+1 273 GET #1,B1+D(5)+D(4):D(6)=VAL(LOT1$):D(5)=D(5)+1 274 POKE D(3)+D(5)+((B1/5)*128)+(B2*5),D(6) 275 IF D(5)>4 THEN 276 ELSE 273 276 D(5)=0:NEXT B2 277 D(3)=J:NEXT B1 278 IF J=60536!+(3*896) THEN 279 ELSE 280 279 CLOSE 280 RETURN 281 REM * 10-printer routine ************************************************** 282 J=J1-128 283 FOR B=1 TO P3(2)-2:LPRINT CHR$(P4(2,B));:NEXT B 284 IF P>2 THEN 286 ELSE 285 285 LPRINT CHR$(P4(2,B)):GOTO 287 286 LPRINT CHR$(P4(2,B+1)) 287 FOR B=1 TO P3(3):LPRINT CHR$(P4(3,B));:NEXT B:GOTO 288  288 J=J+128:G=0:IF J>64256! THEN C$="A" ELSE C$="" 289 FOR Y=1 TO 128:I=PEEK(J+Y):IF I>32 THEN G=1:I=32 290 FOR B=1 TO 6:X=(I*6)+B+100:K=D(X) 291 IF P>2 THEN 293 ELSE 292 292 IF P=2 THEN 297 ELSE 296 293 IF K>64 THEN K=K-64 294 IF K>32 THEN K=K-32 295 IF P>3 THEN 297 ELSE 296 296 LPRINT CHR$(K); 297 LPRINT CHR$(K); 298 NEXT B:NEXT Y 299 IF P=1 OR P=3 THEN 300 ELSE 304 300 IF G=1 THEN 301 ELSE 305 301 GOSUB 311 302 FOR Y=1 TO P3(5):I=PEEK(J+Y):IF I<32 THEN I=32 303 LPRINT CHR$(I);:NEXT Y:LPRINT CHR$(13);:GOTO 305 304 FOR B=1 TO P3(4)-(128*6):LPRINT CHR$(0);:NEXT B 305 IF C$="A" THEN 309 306 C$=INKEY$:IF C$="" THEN 307 ELSE 309 307 GOSUB 311 308 GOTO 283 309 GOSUB 311 310 LPRINT CHR$(13);:Y0=0:X0=0:H=10:C$="":J1=0:J=0:RETURN 311 FOR B=1 TO P3(1):LPRINT CHR$(P4(1,B));:NEXT B:RETURN 313 REM * 11-SLIDE-SHOW routine *********************************************** 314 IF N=36 THEN 316 ELSE 315 315 N=36:M=4:B=0:F$=F$+".MFX":RETURN 316 F1$=F$:B=0:C$="":OPEN "I",#1,F$+".MFX" 317 B=B+1:INPUT #1,G$(B),A(B),E(B) 318 IF A(B)<1 THEN A(B)=1 319 IF E(B)<1 OR E(B)>10 THEN E(B)=1 320 IF EOF(1) THEN 321 ELSE 317 321 I=B:CLOSE:TIMELIM1=TIMELIM:C$="":S1=61440!:S6=S1:S7=61504!:GOSUB 198 322 S1=61440!:J=0:K=0:F$="" 323 FOR K=1 TO I:J=K-1:F$=G$(K) 324 IF F$="0" THEN F$=F1$:GOTO 326 325 C$="":S1=S6:GOSUB 202 326 IF K=1 THEN 334 327 TIMELIM=INT(TIMELIM*A(J)):GOSUB 200 328 C$=INKEY$:IF C$="" THEN 329 ELSE 335 329 S1=S7:TIMELIM=INT(TIMELIM/A(J)):GOSUB 336 330 IF F$=F1$ THEN 316 331 PRINT CHR$(27)+"S"+CHR$(32);CHR$(32+INT(S6-61440!)); 332 IF J=K THEN 334 333 IF K=I THEN J=K:SWAP S6,S7:GOTO 327 334 SWAP S6,S7:NEXT K 335 C$="":H=1:PRINT CHR$(27)+"S"+CHR$(32);CHR$(32);:RETURN 336 REM * erase screen/step routine ******************************************* 337 IF E(J)=1 THEN 347 ELSE 338 338 E(J)=E(J)-1:FOR U=X(E(J)) TO Y(E(J)) STEP Z(E(J)) 339 B=V(E(J))+U:ON W(E(J)) GOSUB 348,351 340 IF E(J)>4 THEN 341 ELSE 346 341 B=V(E(J))-U:ON W(E(J)) GOSUB 348,351 342 IF E(J)=9 THEN 343 ELSE 346 343 IF INT(U/2)=U/2 THEN 344 ELSE 346 344 B=11+(U/2):GOSUB 348 345 B=13-(U/2):GOSUB 348 346 NEXT U 347 RETURN 348 REM * delete line routine ************************************************ 349 W1=S1+B*128:IF W1<61440! THEN W1=61440! 350 FOR W2=W1 TO W1+52:POKE W2,32:NEXT W2:RETURN 351 REM * delete column routine ********************************************** 352 FOR W2=S1 TO S1+(23*128) STEP 128:POKE W2+B,32:NEXT W2:RETURN 353 REM * 12-save routine ***************************************************** 354 C$="":N=34:M=4:GOSUB 176 355 IF F$="" THEN 362 ELSE 356 356 ON ERROR GOTO 211 357 OPEN "O",#1,F$+".GFX" 358 FOR N1=0 TO 3072 359 Z=N1+61440!:T=PEEK(Z):IF T<>32 THEN 360 ELSE N3=N3+1:GOTO 361 360 PRINT#1,T;N3;:POKE Z,127:N3=1 361 NEXT N1:PRINT #1,32;1:CLOSE 362 RETURN 363 END UB 348,351 340 IF E(J)>4 THEN 341 ELSE 346 341 B=V(E(J))-U:ON W(E(J)) GOSUB 348,351 342 IF E(J)=9 THEN 343 ELSE 346 343 IF I!1§pÖA x·Â Í^>hõÍcmÍcpÍc‚Íc Í^ñ<þÊ[õhÍc…Íc Í^ñþÊÃà à $g$AYAXAYAXAYAXAYAXA$G$Your Message Here$GFX3 GFXPQRGFXDATA CECSTUVGFXTITLECECWXYZOLD/NEW BAS[\]^RIENDEERGFX_`abSANTA GFXcdeSHIP GFX#fghijSLIEGH GFX#klmnoSUPER GFXpqrTRAIN GFX$stuvwTURKEY GFXxyzWELCOME GFX{|}~WITCH GFX€�AUTOCHG SUB‚AUTOREP BASƒAUTOST COM„…†‡BATS GFXˆ‰ŠGFX BASW‹Œ�Ž��‘’“”•AL-LOGO $$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå; LOGO.ASM ; ; Using Assembly Language Graphics Display ; to create a logo ; ; Robert E. Daniels, November 16, 1985 ; ;-------equates--------------------- tab equ 9 ; 9=09h=^I lf equ 10 ;10=0Ah=^J cr equ 13 ;13=0Dh=^M clear equ 26 ;26=1Ah=^Z escape equ 27 ;27=1Bh=^ESC graph equ 'g' nograph equ 'G' chrfun equ 2 ;CP/M function number 2 ;display ASCII character ;in register E on screen strfun equ 9 ;CP/M function number 9 ;send character string whose ;starting address is in DE register ;pair to screen bdos equ 5 ;----------------------------------- org 100h lxi sp,stack ;-------------------------- ;This whole section is ;borrowed from the big O ;logo part of the OCC ;AUTOST.ASM listing lxi d,grfmes; lxi b,272 ; <--this number is over: ldax d ; 255 + the number sui 65 ; of characters in stax d ; the string to be inx d ; displayed in the dcx b ; graphics mode mov a,b ; ora a ; jnz over ;-------------------------- lxi d,clear ;clear the screen call prchr mvi a,1 ;set counter for graphics line Šloop: lxi d,setup ;two line feeds and two tabs push a ;save counter to stack call prstr lxi d,grfon ;point to graphic ON call prstr lxi d,grfmes ;point to graphics message call prstr lxi d,grfoff ;point to graphics off call prstr lxi d,cr ;carriage return call prchr pop a ;recall counter from stack inr a ;add 1 to counter cpi 3 ;does counter = 3? jz done ;if so, go to warmboot push a ;save counter to stack lxi d,setup ;two line feeds and two tabs call prstr lxi d,abcmes ;point to alphabetic message call prstr lxi d,cr ;carriage return call prchr pop a ;recall counter from stack cpi 2 ;does counter = 2? jz loop ;if so, go to loop done: jmp 0 prchr: mvi c,chrfun jmp bdos prstr: mvi c,strfun jmp bdos setup: db lf,lf,tab,tab,'$' grfon: db escape,graph,'$' grfmes: db 'AYAXAYAXAYAXAYAXA$' grfoff: db escape,nograph,'$' abcmes: db 'Your Message Here$' ds 10h stack: end  d,grfon ;point to graphic ON call prstr lxi d,grfmes ;point to graphics message call prstr lxi d,grfoff ;point to graphics off call prstr lxi d,cr ;carriage return call prchr pop a ;recall counter from stack inr a ;add 1 to counter cpi 3 ;does counter = 3? jz done ;if so, go to warmboot push a ;save counter to stack lxi d,setup ;two line feeds and two tabs call prstr lxi d,abcmes ;point to alphabetic message call prstr lxi d,cr ;carriage return call prchr pop a ;recall counter from stack cpi 2 ;does counter = 2? jz loop ;if so, go to loop done: jmp 0 prchr: mvi c,chrfun jmp bdos prstr: 1¨ @ÕÅÍw˜Í|”Í|”Í|ÁÑzþÊ�=WÕxÅþbÊb_Íw ÍwÎÍ|ÁxÅÖA_ÍwÕÍ| Íw ÍwÃ!”Í|”Í|ØÍ|Ãà ÃÕÅõ”Í|ñÁÑ ÕÅÃ! $SCREEN GRAPHICS CHARACTER SET USING ASSEMBLY LANGUAGE$g$ $G$NOTES: ASCII 127 in NONgraphic mode produces  "a" in graphics mode produces 1 blank space "J" in graphics mode produces 3 blank spaces The character produced by \ appears to be a glitch$SUPER GFXpqrTRAIN GFX$stuvwTURKEY GFXxyzWELCOME GFX{|}~WITCH GFX€�AUTOCHG SUB‚AUTOREP BASƒAUTOST COM„…†‡BATS GFXˆ‰ŠGFX BASW‹Œ�Ž��‘’“”•AL-LOGO COM–AL-LOGO ASM—˜™ALGRAPHS$$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå"; ALGRAPHS.ASM ; ; ASSEMBLY LANGUAGE PROGRAM TO PRODUCE THE ; OSBORNE 1 SCREEN GRAPHICS CHARACTER SET ; ; Robert E. Daniels ; Raleigh Osborne Computer Club ; November 17, 1985 ; ;.......NOTE...................................... ; This is written for a 52 column screen. ; To adapt to an 80 column screen, change ; the two lines that read: mov d,10 ; to: mov d,13 ; ;-------equates----------------------------------- tab equ 9 ; 9=09h=^I lf equ 10 ;10=0Ah=^J cr equ 13 ;13=0Dh=^M clear equ 26 ;26=1Ah=^Z escape equ 27 ;27=1Bh=^ESC ; graph equ 'g' ;turn graphics mode ON nograph equ 'G' ;turn graphics mode off ; chrfun equ 2 ;CP/M function number 2 ;display ASCII character ;in register E on screen ; strfun equ 9 ;CP/M function number 9 ;send character string whose ;starting address is in DE register ;pair to screen ; wboot equ 0000h ;warm boot bdos equ 5 ;CP/M BDOS entry point ;------------------------------------------------- ; org 100h ; lxi sp,stack ; ;----set initial values of numeric variables------ ; ; mvi d,10 ;counter for number of characters left to ;be displayed (along with their equivalents ;in graphics) on the current screen line. ;Decremented to 0 and then reset to 10. ; mvi b,64 ;ASCII numeric value of current character. ;Starts at 1 less than starting character ;and is incremented by 1 from 65 through 97, ;stopping when b = 98. ; push d ;Store these two values push b ;to the stack ; lxi d,clear call prchr ;clear the screen lxi d,head call prstr ;DISPLAY THE HEADER TEXT lxi d,setup call prstr ;insert two cr's and two line feeds lxi d,setup call prstr ;insert two cr's and two line feeds loop: pop b ;Retrieve numeric value current character pop d ;Retrieve number of characters in line ; mov a,d ;Put number of characters left in current ;line in register A cpi 00 ;If this = 0, jz newl ;jump to "newline" subroutine ; dcr a ;Subtract 1 from number of characters left ;in the current line mov d,a ;Put this value in the accumulator push d ;Store this number to stack inr b ;Go on to the first/next character mov a,b ;Put this value in the accumulator push b ;Store numeric value of current character cpi 98 ;If this = 98 jz fnote ;jump to "footnote" and end mov e,a ;Put numeric value of current character ;in register E preparatory to BDOS call call prchr ;DISPLAY THE CURRENT CHARACTER lxi d,32 ;\ call prchr ;/ Add a blank space after it lxi d,grfon ;point to graphics ON command string call prstr ;Turn graphics mode ON pop b ;Retrieve numeric value current character mov a,b ;Put this value in the accumulator push b ;Save it again sui 65 ;Subract 65dec from this value mov e,a ;Put value of graphic equivalent ;in register E preparatory to BDOS call call prchr ;DISPLAY THE GRAPHIC EQUIVALENT lxi d,grfoff ;Point to graphics off call prstr ;Turn graphics mode off lxi d,32 ;\ call prchr ; \ lxi d,32 ; Add 2 blank spaces after it call prchr ;/ jmp loop ; fnote: lxi d,setup call prstr ;insert two cr's and two line feeds lxi d,setup call prstr ;insert two cr's and two line feeds lxi d,note call prstr ;DISPLAY THE TEXT OF THE FOOTNOTES ; done: jmp wboot ; prchr: mvi c,chrfun jmp bdos ; prstr: mvi c,strfun jmp bdos ; newl: ;subroutine to start a new line of display push d ;Store number of characters in current line push b ;Store numeric value of current character push psw ;Store Program Status Word ; lxi d,setup call prstr ;insert two cr's and two line feeds ; pop psw ;Retrieve Program Status Word pop b ;Retrieve numeric value of next character pop d ;Retrieve number of characters in line ;(just to get it out of the way) mvi d,10 ;Reset number of characters in new line push d ;Store number of characters in current line push b ;Store numeric value of current character ; jmp loop ;Jump to "loop" ; ;---directives to initialize storage areas in memory ; setup: db cr,lf,lf,'$' head: db 'SCREEN GRAPHICS CHARACTER SET USING ASSEMBLY LANGUAGE$' grfon: db escape,graph,'$' grfmes: db 8,9,10,'$' grfoff: db escape,nograph,'$' note: db 'NOTES:',13,10,10 db 'ASCII 127 in NONgraphic mode produces ',127,13,10 db '"a" in graphics mode produces 1 blank space',13,10 db '"J" in graphics mode produces 3 blank spaces',13,10 db 'The character produced by \ appears to be a glitch$' ds 10h stack: ;------------------------------------------------- end t two cr's and two line feeds ; pop psw ;Retrieve Program Status Word pop b ;Retrieve numeric value of next character pop d ;Retrieve number of characters in line ;(just to get it out of the way) mvi d,10 ;Reset number of characters in new line push d ;Store number of characters in current line push b ;Store numeric value of current character ; jmp loop ;Jump # This is the release date of the disk. SUPER GFX €p€ TRAIN GFX €sTURKEY GFX €x€ WELCOME GFX €{€ WITCH GFX € AUTOCHG SUB €‚€AUTOREP BAS €ƒ€AUTOST COM €„BATS GFX €ˆ GFX BAS €‹€+AL-LOGO COM €–AL-LOGO ASM €— ALGRAPHSCOM €šALGRAPHSASM €›€SANTA .GFX 6E 49 2560 20 SHIP .GFX CC A1 4480 35 SLIEGH .GFX C8 CE 4480 35 SUPER .GFX 52 4B 2688 21 TRAIN .GFX C5 93 4608 36 TURKEY .GFX 35 95 2688 21 WELCOME .GFX 15 73 3456 27 WITCH .GFX 3E 6E 2304 18 AUTOCHG .SUB EC D6 128 1 AUTOREP .BAS 4A 9E 640 5 AUTOST .COM 18 86 3584 28 BATS .GFX A5 BE 2560 20 GFX  Fog Library Disk FOG-CPM.041 Copyright (1986) by Fog International Computer Users Group to the extent not copyrighted by the original author for the exclusive use and enjoyment of its members. Any reproduction or distribution for profit or personal gain is strictly forbidden. For information, contact FOG, P. O. Box 3474, Daly City, CA. 94015-0474. as part of the description of a file indicates that the program is distributed on a "try first, pay if you like it" basis. If you find the program(s) meet your need, please refer to the author's documentation for information on becoming a registered user. Only by registering and paying for the programs you like and use will the authors of such programs continue development. Often, more complete documentation, additional modules, and new releases are available only to registered users. Osborne 1 graphics programs. Filename Description -04-00 .86 This is the release date of the disk. -CPM041 .DOC This is the description of the disk contents. GFX .COM F364 31K [Graphics Editor 1 of 22] A total graphics editor for screen and/or printer. Complete with sample pictures, MBasic source code, and a program to convert picture files to MBasic format so that you can integrate your work into a program. For the Osborne 1 but can be modified for other systems. GFX .DOC E530 36K [Graphics Editor 2 of 22] GFX1 .GFX 0ED1 8K [Graphics Editor 3 of 22] GFX2 .GFX 8F99 2K [Graphics Editor 4 of 22] GFX3 .GFX 6ECD 3K [Graphics Editor 5 of 22] GFXDATA .CEC 399C 4K [Graphics Editor 6 of 22] GFXTITLE.CEC E3CA 4K [Graphics Editor 7 of 22] OLD/NEW .BAS 0298 4K [Graphics Editor 8 of 22] RIENDEER.GFX E442 4K [Graphics Editor 9 of 22] SANTA .GFX 6E49 3K [Graphics Editor 10 of 22] SHIP .GFX CCA1 5K [Graphics Editor 11 of 22] SLIEGH .GFX C8CE 5K [Graphics Editor 12 of 22] SUPER .GFX 524B 3K [Graphics Editor 13 of 22] TRAIN .GFX C593 5K [Graphics Editor 14 of 22] TURKEY .GFX 3595 3K [Graphics Editor 15 of 22] WELCOME .GFX 1573 4K [Graphics Editor 16 of 22] WITCH .GFX 3E6E 3K [Graphics Editor 17 of 22] AUTOCHG .SUB ECD6 1K [Graphics Editor 18 of 22] AUTOREP .BAS 4A9E 1K [Graphics Editor 19 of 22] AUTOST .COM 1886 4K [Graphics Editor 20 of 22] BATS .GFX A5BE 3K [Graphics Editor 21 of 22] GFX .BAS A237 11K [Graphics Editor 22 of 22] AL-LOGO .COM 9EAA 1K [AL-LOGO 1 of 2] Assembly language graphics routine which prints Osborne logo on the screen. Source is included so you can do your own logo AL-LOGO .ASM 01B6 3K [AL-LOGO 2 of 2]  ALGRAPHS.COM E02F 1K [ALGRAPHS 1 of 2] Assembler program to display the Osborne 1 graphics set on screen. Source is included. ALGRAPHS.ASM 285B 5K [ALGRAPHS 2 of 2] Graphics Editor 22 of 22] AL-LOGO .COM 9EAA 1K [AL-LOGO 1 of 2] Assembly language graphics routine which prints Osborne logo on the screen. Source is included so you can do your own logo AL-LOGO .ASM 01B6 3K [AL-LOGO 2 of 2] åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå$ååååå%ååååå&ååååå'ååååå