home *** CD-ROM | disk | FTP | other *** search
/ A.N.A.L.O.G. Magazine 1986 January / 86_jan.atr < prev    next >
Encoding:
Atari ATR Floppy Disk Image  |  1986-01-01  |  90.0 KB

  1. û⇩Ç⑥Ç⇨◆@⑤L④◆⇨⇨כ⑨⇧⇦}י◆¼◆≡5 _◆¡⓪◆¼◆ª$Ä⇦⇨ª%Ä❎⇨⑧ l◆0¼①◆õ$)⇨¬ז①$≡①õ$Hזõ$ U◆h¿èL"◆⌐ij
  2. ¿`⌐Ç⑧e$à$É⇩µ%`¡②◆à$¡③◆à%`ì♪⇨î
  3. ⇨⌐Rá@É⇦⌐PáÇ✓ª!α✓ס◆( ü④L¨◆(ì⇩⇨⌐ì╱⇨î⑦③⌐1ì⇨⌐⇨ì    ③⌐Çì✓⇨
  4. ì    ⇨¡⑦③ì⇨⇨ YΣ⓪❎מ    ③⓪≡ªIÿ` ¡① d ⇦Lו②d✓Å
  5. M
  6. Å    ¶◆*♪Ç@ ⓪✓⇦⇩⇧¯¡ ◆à$¡◆à%¡
  7. ◆àCó◆⌐╱CÉ⑤á❎æ$Ñ$¥)③Ñ%¥1③⌐É U◆⌐d¥⑨③ט⓪∞Ñ$ì9③Ñ%ì:③¼    ◆óêÿ¥!③0⇨ S◆Φα✓ס±Ñ$ìτ⇩Ñ%ìΦ⇩⌐¿Öü③ז⓪·¿¨ə⇨≡ חD≡✓זזזijס≡⌐DÖə⇨⌐יÖ⇨⌐◆Ö⇨` ¡① }©J⇨¥é③)⇩≡⇨Lr ∮✓©é③חd✓Å
  8. M
  9. Å    ¶◆*♪Ç@ ⓪✓⇦⇩⇧¯¡ ◆à$¡◆à%¡
  10. ◆àCó◆⌐╱CÉ⑤á❎æ$Ñ$¥)③Ñ%¥1③⌐É U◆⌐d¥⑨③ט⓪∞Ñ$ì9③Ñ%ì:③¼    ◆óêÿ¥!③0⇨ S◆Φα✓ס±Ñ$ìτ⇩Ñ%ìΦ⇩⌐¿Öü③ז⓪·¿¨ə⇨≡❎} חD≡✓זזזijס≡⌐DÖə⇨⌐יÖ⇨⌐◆Ö⇨` ¡① }©J⇨¥é③)⇩≡⇨Lr ∮✓©é③ח⇦≡⓪ח✓≡Jח ≡ח    ≡⑨ Ñ②¿(ãÉ╱(ã     ⇦ p    Lו② Ñ②¬(ã∙¼③¨⇧④¥â③)⇩≡⑤ ⇦ æ⓪ J①¥Ä③©╱}ï③¥ì③L=     Ñ②¼(ã     IJ ¼③L❎    ¡♪③0qì③ A⓪¡ ③ì③¡③ì⓪③ æ⓪¼③ó
  11. ⌐ Ö╱④זט⓪∙ªI⌐B¥â③ J①¼③Ö❎④©ï③Ö⇦④⌐CÖ⇧④⌐Ö⇨④Ö⇩④ó©;③ח?≡⇨Ö╱④זΦα♪É≡ D⓪ W     À◆}⌐Ç¥à③ é②ס⇨L②Lו② Ñ②⌐⌐¥à③¡⓪③
  12.  
  13. ¥ü③⌐¥ç③¥Å③¥É③` W    ¼③¨⇧④¥â③)⇩¥ä③¨⇦④¥ï③¨❎④¥î③LΩì①③©A⇨à! ¡①¼
  14. ③¨⇩⇧ח∞ã⇦⌐à"©é③)✓≡-¶ç③ÿ§å③É① pã" ✓}Σ    áã❎õ$ì①③³ç③¡①③æG⌐@à③¥à③Lו②LÅ✓ Ñ②ê©à③0⇦8`⌐ì⑧③⌐⇧ìQ③Ñ")⇩≡<ס2Q③¡⑧③0⑧ Γã-áõGæ$זÿ§å③É⌡ U◆L#
  15.  ;
  16.  p8Ñ(²å③à(ã⇩ה)Ñ(0טÑ)סהNQ③`á    }õ$æGזÿ§å③É⌡¥ç③LU◆ ¡①©é③)⇩≡⇨L¡©ç③§å③É♪ δ     ΓÉ≡Lα    ¿õGì①③זÿ¥ç③¶ï③ס¶î③ס
  17. §å③É❎⌐⇨L»②Lו② ¡①©é③)✓≡W>à③ÉZ ç ⇦♪©É③H©Å③H©é③)⇧≡©â③H 
  18. }p    h¥â③ ΓÉ√©ì③¥ï③©Ä③¥î③ Ä¼③⑧hy⇩④Ö⇩④hy⇨④Ö⇨④©â③Ö⇧④ D⓪ ö⓪⌐¥é③Lא②>à③É≤ יL±
  19. ©ü③JJì⓪③ ♪ì③ ♪ !♪
  20. ì③LA⓪⌐á⇨ü③*êס∙` ¡①©B⇨ח³≡Fח♪}²≡7ח'ã8Θ É⑨
  21. ¿¨M♪H¨N♪H` 8 ñ♪Z ∞ Γ①\LÅ✓d⇩ב⇩ב⇩è⇩≥⇨ב⇩J⇩≤⇧≤⇧©J⇨ס⇩⌐!ó≡⇨⌐"¬Ä⑤③ì⇩⇨Ñ!ó ח✓≡GÑFì❎⇨ÑEì⇦⇨á@¡F⇩ É◆⓪(ijïס«⑤③≡◆⌐!ל⇩⇨סעL»② }ijÉס∙á⌐¯עEס❎זעE≡∮ Ñ②¡ó¡⇩⇨ח!≡⇩ó╱⌐áÅæEêס√©^♪ì✓③Φ©^♪æEזij❎ס⌡á
  22. ⌐æE⌐¯זכ✓③ס÷á7⌐æEז⌐æE«✓③⓪ádæEáè⌐/æEז⌐⇧æE ö⓪⌐¿Ö⇧④ז⓪·⌐◆ì③ D⓪מ}③⓪° .②Lא② } ëó
  23. ©;③¥F③ט⓪≈ d ⇦ é②✓óÄ⑤③¼③©;③ח?ס✓מ⑤③§F③ס7©F③ח?≡⇨Ö╱④זΦα♪סβ(ס⇨ .② é②ס «③©❎④¶⇦④ Z② D⓪¡⑤③≡❎ ⁿÉ«Lא②LΦ d IJ  é}②ס⇨ .② D⓪ ⁿÉϕ ö⓪Lא② æ⓪¼③ ⇦⌐ÇÖ⇧④ p     ① Γɰá❎ÿæE`⌐ ,⌐ì④③ d¼③¨⇧④)∞④③Ö⇧④ D⓪ ⁿÉΩLא②¼③¨⇧④) ≡ע Ñ②º©à③0B©M⇨§è③ס✓©L⇨§ë③≡©à③}≡✓ י⌐¥à③©M⇨¥î③©L⇨¥ï③ Ωã
  24. ©N⇨§å③É╱≡⇦ Ñ②ª¥ç③Lו② Ñ②½©ç③¥N⇨©ë③¥L⇨©è③¥M⇨Lו② ∮É[ T⓪áèõEá⇨⑧qEHזõEáïqE¬h¿èóÄ⑥③ 0á⇨èæGז¨קæGזij⓪ס÷⓪} HLו②¼⑥③⓪⇨Lα    õGì①③∈⑥③ח¢סΘij①ã✓⌐Çì⑥③Lא② ⁿãÑ ΣLו②FREE SECTORS«③á⌐ æG©⇧④) ≡⇦⌐*æGז⌐ æGז©╱④æGΦזijÉ⌡⌐ æGזî⑥③«③Ñ*jÉ①©⇧④jÉ♪ê⌐>æG①}á⇧⌐<æG¶⇩④©⇨④ód Ró
  25.  Ró⇧ Ró ÿ≡⇩ó+á①⌐¢æGáî⑥③`Ä③③ó¯àDäCΦ8ÑCϕ③③¿ÑDΘÉ⇦α    סΩè    0¼⑥③æG∈⑥③ÑDñC`á⇩õ$ê0dח:ס≈זז⌐✓óì②③õ$ח.ס♪α✓ס❎ז⌐♪ס∈É②},ח*ס    ⌐?∮②③ã%É$ח?≡ח0Éח:É⑦)∞חAÉ⇦ח[É⌐♪ì②③α♪≡⓪⌐ ס⇧ז∮②③≡¨¥;③Φסø¡;③ח ≡⇨ªI` Ñ②Ñ⌐¯ì♪③ì③ì⓪③⌐pì③∈⓪③⑧¡③i⓪⓪①∈③⌐✓ל③É⇩≡N A⓪⌐ì③¿¨⇧③}④≡#0!)Cח⇨≡⇦)⇧סנó©;③ח?≡❎ך╱④סIJΦזα♪ס∈⑧É¡♪③⓪②¡③ì♪③¡③ì ③¡⓪③ì③¨⇧④0£8ªI` } ∮ã⇧`Lñ✓©à③0
  26. ⓪    
  27. ¥à③ י0"LΓ J①©ç③áæG©î③ü③á}æGז©ï④}③æG י⓪♪⌐¥é③¡⇨⇨L»②³Å③ס⇨³É③ ר⌐¥ï③¥î③¥ç③⌐}¥å③⑧`8©è③¶ë③L②②©ï③¥ë③©î③¥è③`©à③≡⇨Lp©ï③î③ס⇩8` ר⑧ כ04á}õG)ⁿ§ü③ס,õG)⇨¥î③זõG¥ï③זõG⑤}H©ä③ס✓h0⇩⌐})Hh¥å③⌐¥ç③⑧` ©②©B⇨ח!≡⇦ Ñ②ñ8`⑧É⇧8✓⑧¡③ii¿(ó⇧⌐④סZá❎õEס6ñ!⌐Jij✓≡④î⇧⇨⌐Sì⇩⇨ SΣ⌐d¼Ω⇩⓪⇩⌐èñ!Ö⑧③ì✓③⑧ כ⓪ Ω⓪á❎æE⑧ ¿⓪ √⓪` T⓪⌐⑥}á❎æE Ω⓪8 ¿⓪ √⓪8Lכ⓪ÑFªEáhî
  28. ⇨á⇧î♪⇨ì❎⇨Ä⇦⇨ r◆⓪9ijâ≡⇨L©② Ñ②ú¡✓③⓪)✓⌐ì
  29. ⇨⌐⇦ì♪⇨ÑE⑧i⓪¬ÑFi(LÀ⓪ádõEÖ∈②⌐æEזijÉס≥`¼✓③⓪ ád¨∈②æEזijÉס÷`©ë③H)⑦}◆¿hè③≡/¨ת◆H©ë③á⇨^è③jêס∙⑧i
  30. ¿h①EæEijdá⇨É⇩áèõE⑧i⇧æEזõEiæE`á    זכ✓③ãWõE≡÷ó¯Φ
  31. Éⁿ©ת◆QEæEèHªIÿ8Θ
  32. ¥ï③⌐ijï③*ã·¥î③hï③¥ï③ijdá⇨É áè©â③)™    ⇧⑧}¥â③8õEΘ⇧æEזõEΘæEá❎ÿæE©î③` Ñ②óåI´ΦΦÄ
  33. ③ª!Ä⇧⇨ט©)③àE©1③àF©⑨③≡5ì✓③ªI¶ê③ס⑧¨!③⓪    זij✓É÷ Ñ②í⌐ÇÖ!③זÿ¥ê③êÿJH⌐jm9③àGhm:③àH` Ñ②á¶ê③≡    ê⌐¥⑨}ê③Ö!③`ªGÄ⇦⇨ªHÄ❎⇨Ll◆¶ë③©è③ Z② d②Lו②⌐ì◆⌐◆ì❎⇨áî⇦⇨ז⌐8 l◆¡⇦⇨IÇì⇦⇨0⇨∈❎⇨¼
  34. ⇨כ⇧◆סΣ`î◆ì⓪◆⌐⇧סכ _◆⌐}¥å③ ;
  35. Ñ$ל ◆Ñ%ϕ◆ã╱ pLl②`ó¼③¨╱ə}④§Ü②ס╱זΦα♪ס≥✓ªI(`DOS     SYShàChàDá⇧õC«
  36. ③ܪI¥C⇨¿¡①③`¡⇨⇨0ϕªI ⇨②⌐⇧סΣá⇧äB«∞◆0╱ª④Σ④≡ⁿîקx
  37.  
  38. àD¡⇧צ)π❎Dì⇧צ`}Need DOS2.5,type Y פדקרפ}מ¢d⇨≈¢♪⇧"ÇÇddÇ⇧¯³²ⁿ√\ככə⑨⑨∮əDOS     SYSCOPY3TO2COM}✓B⇩Ç}⇧⑧}C⇦DOS     SYS}¡
  39. ⇨àC✓¡♪⇨╱C*ח⇦É❎(áïס> י②ÑC8jJà3⌐jà2¡⇦⇨àC¡❎⇨àDá(É    õCæ2ê⓪∙0◆õ2æCê⓪∙⌐⇦ ∧②áijîקáäBXז`
  40. ◆N
  41. ◆⌐1ì?⑤⌐±ó④ l⑤⌐ ó⑦Ll⑤D:RAMDISK}.COM¢⌐Lלu ס⇨LÑ1⌐ì¥⑤⌐ϕó② ל⑦L    ⑤Ñ;ס⇨LÉΩÿHLøΩøΩ´Ä
  42. ③ T⓪á⇧`´Ä
  43. ③ ö⓪á⇧`1⌐ìß⑤⌐ƒà
  44. ⌐⑦à♪¡£ΩחÉס
  45. ⌐⑧ì ⇩⌐⑤ì⇩ α◆ΩΩΩÑ✓ס⑤ ן④`ìT⇨ÄU⇨ ô⑤⌐ij } ª⑤LÆ⑨¡¥⑤≡①¡ß⑦≡② ?⑨ .⑨ ô⑤ tΣ⌐ì¥⑤`à✓≡÷¯α⇩β⇩⌐Çìƒ⑤⌐Gìα⇩⌐⑥ìβ⇩ó⓪⌐⇨¥B⇨⌐⇦¥J⇨ î⑦⓪⇦⌐⇧ס~ó⓪⌐⌠¥D⇨⌐¥E⇨⌐⇩¥H⇨⌐¥I⇨ì♪⑦⌐◆¥B⇨ VΣ0d⌐¯ל⌠סVל⌡!}סQó⓪⌐á¥D⇨⌐⑤¥E⇨⌐⇦¥H⇨⌐¥I⇨ VΣ⓪Fijêס9 Æ⑨,ß⑤0⇨ ✓⑦⌐,ƒ⑤ìƒ⑤0 s⑧0❎hhLÕ⑦¡¥⑤ס
  46. ⌐ó⑦ ª⑨L⇧⑧⌐¬` Æ⑨⌐⇨ס≈ÿH Æ⑨h¿ס∈ó⓪¡á⑤¥D⇨H¡í⑤¥E⇨¿hזס¿זס¡"}ó⑤ìá⑤¡ú⑤ìí⑤⌐ó¥D⇨⌐⑤¥E⇨⌐⇩L❎⑥¡ó⑤8ϕá⑤¥H⇨¡ú⑤ϕí⑤¥I⇨¡í⑤ח4Ωã✓¡ú⑤חΩã¡♪⑦0✓⌐ǃ⑤ìƒ⑤³H⇨ס⇨³I⇨,ƒ⑤0③¡♪⑦0מ♪⑦ 9⑨⌐ì¥⑤ .⑨ó⓪⌐GìΓ⇩⌐⑥ìπ⇩ VΣ⓪⇨LO#}⑥,ß⑤0⇨ ❎⑦L≈⑤חÉ╱ח4*I⇧J`lΓ⇩lα⇩D1:AUTORUN.SYS¢NEED MEM.SAV TO LOAD THIS FILE.¢D1:MEM.SAV¢ Æ⑨⌐✓¥J⇨ y⑦08⌐♪¥B⇨⌐|¥D⇨⌐¥E⇨⌐è¥H⇨⌐⑤¥I$}⇨ VΣ0ə Æ⑨0⑤á`⌐⇨¥B⇨⌐;¥D⇨⌐⑦¥E⇨Lî⑦`¡?⑤ì<⑦ì0⑧LVΣ⑦áÉ`@⑤óÄß⑦ă⑤טå✓ v⑨ s⑧⓪╱⌐à✓≡? F⑦0❎מß⑦05⌐:ó⑧ ª⑨⌐[ó⑧ ª⑨⌐❎ìB⇨⌐ìD⇨⌐⇧ìE⇨⌐⇩ìH⇨⌐ìI%}⇨ VΣ¡⇧חYס8⌐à✓ó ⌐ ¥B⇨ VΣÑ ì£⑦Ñì¥⑦⌐@à ⌐⑤à⌐/ó⓪¥D⇨⌐⑧¥E⇨áîß⑤êî¥⑤ ñ⑤`E:¢D1:DUP.SYS¢ERROR-SAVING USER MEMORY ON DISK¢TYPE Y TO &}STILL RUN DOS¢ £⑨⌐⇨¥B⇨⌐;¥D⇨⌐⑦¥E⇨⌐ ¥J⇨ î⑦✓ £⑨(`⌐≡⇨ 9⑨ó⓪ VΣ⌐≡ə∈á⑧¡Γ⇩ìו⑨¡π⇩ìז⑨⌐Γ¬ìב⑨⌐⇩ ∩⑧⌐≡ə∈®⑧¡α⇩ìו⑨¡β⇩ìז⑨⌐α¬ìב⑨⌐⇩ ∩⑧ Æ⑨¡ß⑦-'}ö⑧≡╱∈ö⑧L③⑧Lu ìג⑨ΦÄד⑨ìה⑨ó⓪⌐ב¥D⇨⌐⑨¥E⇨⌐╱¥H⇨⌐¥I⇨LVΣ 9⑨⌐ì¥⑤ .⑨l·™ 9⑨⌐ì¥⑤ .⑨lə¡£⑦à ¡¥⑦à`¡ß⑦ס⇧` s⑧⓪╱⌐à✓≡$⌐⇨¥B⇨ î⑦⌐◆¥B⇨⌐è¥H⇨⌐⑤¥(}I⇨⌐|¥D⇨⌐¥E⇨ VΣ⌐ ¥B⇨LVΣ nΣó⌐⇨¥B⇨⌐,¥D⇨⌐⑧¥E⇨⌐ ¥J⇨LVΣ⌐ ó⓪¥B⇨ VΣó ⌐ ¥B⇨LVΣìD⇨ÄE⇨ó⇧ÄI⇨ט⌐    ìB⇨ΩΩ¡¥⑤≡σL¯④¯¯α⇩β⇩u ò ⑥⇩≤⇧    ⇧}¯¯ ❎3E:¢}DISK OPERATING SYSTEM II VERSION áØ«ŒáCOPYRIGHT 1984 ATARI CORP.¢¢A. DISK DIRECTORY  I. FORMAT DISK¢B. RUN CARTRIDG⇦*}E   J. DUPLICATE DISK¢C. COPY FILE       K. BINARY SAVE¢D. DELETE FILE(S)  L. BINARY LOAD¢E. RENAME FILE     M. RUN AT ADDRES⇦+}S¢F. LOCK FILE       N. CREATE MEM.SAV¢G. UNLOCK FILE     O. DUPLICATE FILE¢H. WRITE DOS FILES P. FORMAT SINGLE¢Lÿ É!N'ה⇦,}#⑦"ü&®)µ)9(ס&⌐*)/h)¼'·'⑨-ט&ó¯ןå①Φă⑤⌐⇩àR⌐'àSÑ⓪    Çà⓪ìפ v⑨¡®⑨חL≡/⌐ì¥⑤⌐יó  ל⑦L¶ }Insert DOS 2.0s, type Y פדקרפמ¢⌐⓪ì⌠⌐xà⑧⌐ à⑨⌐⇦-}ìD⇨⌐ìE⇨⌐fìH⇨⌐⇧ìI⇨ ß1ó¯ÜΦÄÅ#⌐qó! ª⑨⌐@ì®⇩ y0ח¢≡נ8ΘA0,ל⌠⓪'
  47. ¿õ⑧זàəõ⑧àá⇧õə¬êõə ã1 À1Ñə⑧i⇩àəÉ⇩µlə⌐dó! ã1L!NO SUCH ITEM¢SELECT⇦.} ITEM OR פדקרפמ FOR MENU¢⌡! ט0 ™.«⇧©zח:ס③⌐*¥{¥}⌐.¥|ΦΦΦÄ⇧⌐¢¥{Äó  ן1 π0 ™0⌐◆ó⓪¥J⇨⌐⇨¥B⇨ij Θ1¡⇧8ϕח⇨≡⇨L¿%«©|חDס≤LÀ⇦/}%DIRECTORY--SEARCH SPEC,LIST FILE?¢[# ט0 ™0 Õ&¡|חD≡ə⌐3ó" ã1L!NOT A DISK FILE¢ó⓪¡ß⑤חNס♪⌐!¥B⇨ Θ1L!⌐Eó# ã1⌐ì⇩ó ⌐!¥B⇨⌐±¥D⇨⌐⇦0}¥E⇨⌐Dì±⌐:ì≤¡}ח:ס⇩⌐1ì≥ó⓪⌐⇨¥B⇨⌐╱¥J⇨⌐|¥D⇨⌐¥E⇨ Θ1⌐⌠¥D⇨⌐¥E⇨⌐❎¥B⇨⌐ì⇧ó⓪⌐¥H⇨⌐⇧¥I⇨ Θ1¡⌡ח סh∈⇧¡⇧ל⇩0∞óá⇩¨⌠ח ≡    ¥⌠Φזα✓0≡⌐.⇦1}¥⌠Φá
  48. ¨⌠¥⌠זΦij0⌠Ä⌐?¥⌠Φ⌐¢¥⌠⌐±ó ã1 y0חYס¢¡⇧ì⇩«⌐¢¥⌠ó  Θ1 ;#Lè" ;#L!ó⓪⌐ ¥B⇨LΘ1TYPE "Y" TO DELETE...¢DELETE FILE SPEC⇦2}¢COPY--FROM, TO?¢OPTION NOT ALLOWED¢✓✓736 FREE SECTORS¢¢  COPYING---D1:DIREC¢K.COM¢l# ט0¡⇧ì¡|חDס◆ó פ.≡⇨L/%⌐ÇìÅ#⌐⇦3}ìÉ#⌐ìæ#ó⓪⌐╱¥J⇨⌐⇨¥B⇨⌐|¥D⇨⌐¥E⇨ Θ1⌐❎¥B⇨⌐④¥H⇨⌐¥I⇨⌐Æ¥D⇨⌐#¥E⇨ Θ1¡Æ#ח0Éח:ã♪⌐ ¥B⇨ Θ1L!¡É#לæ#≡❎∈æ#סIJ∈É#⌐ ¥B⇨ Θ1á⇩¨£#ךc$ס✓ê⓪⌡0ëSY⇦4}Sá1¡}ח:≡⇧¿îø#ó⇩á⇨©Æ#ח ≡⇦ÖØ#זΦα
  49. ס≡©Æ#ח ≡⑥⌐.ÖØ#ז©Æ#ח ≡⇦ÖØ#זΦαס≡⌐¢ÖØ#⌐ªó# ã1,Å#Pó⓪⌐Ø¥D⇨⌐#¥E⇨LJ- <.ó⓪⌐⇨¥B⇨⌐⇦¥J⇨⌐Ø¥D⇨⌐#¥E⇨ij Θ⇦5}1ó  ן1¡⇧H¡⇩H π0hì⇩hì⇧«©|חD≡⇨L¿%á1©}ח:≡⇧¿כø#ס╱ Æ⑨L®%ó îø#⌐Ø¥D⇨⌐#¥E⇨L∧%ó  ן1 π0« Φ.« פ.ס0⌐Oó% ã1L!WILD CARDS NOT A⇦6}LLOWED IN DESTINATION¢ ™0 <.¡|חK≡<חC≡8חEס✓óijL¿%חS≡(ó⓪⌐⇨¥B⇨⌐⇦¥J⇨ij Θ1«©|חK≡ חEס⑤⌐ì¯L⌡%⌐|ó# ã1 Æ⑨L!חC≡∩«ß⑤αAס✓חDסΣ⌐    ⇦7}ס⇩⌐✓ó ¥J⇨⌐⇨¥B⇨į Θ1⌐¥K⇨⌐◆«³¼¯¥B⇨⌐♪ÖB⇨Ñə¥D⇨ÖD⇨Ñ¥E⇨ÖE⇨«³¡⇦¥H⇨¡❎¥I⇨ VΣî°«¯¼³¨H⇨¥H⇨¨I⇨¥I⇨⑨H⇨≡⇨ Θ1¡°⓪כחê≡⇨L±1«³≡✓⌐ ¥B⇦8}⇨ VΣ«¯≡✓⌐ ¥B⇨ VΣ«¯ס◆⌐Ió' ª⑨,Å#⓪⇨L∮#L!£& ט0 ר0 ™0 Õ&⌐ ó⓪¥B⇨ Θ1L!RENAME - GIVE OLD NAME, NEW¢á⇧¡}ח:≡⇨)¿î÷LS)⑨'⌐²ס⇦⑨'⌐³ì⇩⇦9}' 70 ¨2⑧i0ìH'ìK' ™0⌐0ó' ã1 y0חYס✓¡⇩'á! ⇨'L!³ó⓪¥B⇨⌐J¥D⇨⌐'¥E⇨ÿ¥J⇨LΘ1WHICH DRIVE TO FORMAT?¢TYPE "Y" TO FORMAT DISK 1¢D1:¢½'¼²™⇦:}⌐¬ì²™ל²™ס⑦⌐Uì²™ל²™סî²™⌐ƒó' ã1L!¡ⁿ™ס±¬¡²™≡δל²™סµΦס≤ v⑨⌐╱óΣá_ \Σ⌐◆óΣáb \ΣL②⑨NO CARTRIDGE¢ז' 70 2 ™0àəå¡⇨ח⇦≡P v⑨L ⑨RUN FROM⇦;} WHAT ADDRESS?¢TYPE "Y" TO CREATE MEM.SAV¢∞' y0חYס  s⑧0⌐ó( ã1 Æ⑨L! F⑦⓪⌡L≡1MEM.SAV FILE ALREADY EXISTS¢ר( 70 ¨2 ™0ì÷    0ì+)ì⇦<}') S)⌐✓ó) ã1 y0חYסr⌐≥ó( ã1⌐⇨ó⓪¥B⇨⌐*¥D⇨⌐)¥E⇨⌐✓¥J⇨ Θ1ó⓪⌐ ¥B⇨ Θ1ó♪©.⑧¥{טס≈¡+)ì}Ä⇧ó⓪ ן1⌐ ìב⑨⌐ìג⑨⌐❎ìד⑨⌐∙ì≤/⌐③ì°/⌐3ìה⑨H⌐uìα⇩⌐ ì⇦=}β⇩מ®⑧L¢/L!DRIVE TO WRITE DOS FILES TO?¢WRITING NEW DOS FILES¢TYPE "Y" TO WRITE DOS TO DRIVE 1.¢D1:DOS.SYS¢ERROR - NOT VERSIO⇦>}N 2 FORMAT.¢ t*¡⌠ח⇩≡
  50. ⌐5ó) ã1L!`⌐) ט0⌐«ß⑤ìß⑤αNס⇨מß⑤ ™0 ⌐⑤α≡②α⇨≡⇦ÿL±1⌐¢ó) ã1 Æ⑨L!BAD LOAD FILE¢LOAD FROM WHAT FILE?¢צ) ט0 ⇦?}™0⌐#ó⓪¥B⇨ Θ1L!WHAT FILE TO LOCK?¢√) ט0 ™0⌐$ó⓪¥B⇨ Θ1L!WHAT FILE TO UNLOCK?¢DUP DISK-SOURCE,DEST DRIVES?¢TYPE "Y" IF OK TO US⇦@}E PROGRAM AREA¢CAUTION: A "Y" INVALIDATES MEM.SAV.¢⌐àF⌐⌠àE¡÷à!⌐ì∙ +⑤⓪⇨L≡1⌐
  51. ì⇧¡³ì³⌐✓ì⇩⌐ì♪⇨⌐⇧ì
  52. ⇨`⓪*⌐ì♪ 70 ¨2ì÷ ¨2ì¯⇦A} ™0¡÷ל¯≡.ó*⌐ך ã1 y0מ♪0)INSERT BOTH DISKS, TYPE RETURN¢⌐^ó, ã1 y0⌐❎ì╱⌐3ì◆¡σ⇩8ΘÇì⇦¡µ⇩Θì❎¡⇦ל╱¡❎ϕ◆ã
  53. ⌐Nó, ã1L! §,⌐ì⇦B}ß⑤ìC, t*¡
  54. ⇨ì∙¡♪⇨ì·¡⇧ì√¡⇩ìⁿ¡³ì²Lx+⌐ìß⑤,♪0
  55. ⌐^ó, ã1 y0 ⑨, í,0,ß⑤0╱ ו,LÄ+ ל,¡⇦⇨IÇì⇦⇨0⇨∈❎⇨ ®,¡⇧ל✓③≡V¡⇦ל⇦⇨¡❎ϕ❎⇨ãו¡ß⑤0⇦C}½מß⑤,♪0
  56. ⌐}ó, ã1 y0¡C,ס¿∈C,¡¯    0ìK'á!¡✓③⓪⇩á"¡
  57. ⇨H¡♪⇨H⌐² ⇨'hì♪⇨hì
  58. ⇨Lx+¡ß⑤⓪Õ¡¯à!⌐⌠àE⌐àF 5⑤⓪⇨L≡1L!á⇦¨D,àə¨I,àóíəH¨∙üəhÖ∙ê⓪⇦D}σ¡╱ì⇦⇨¡◆ì❎⇨`
  59. ♪⇧⇩³⇨⇨NOT ENOUGH ROOM¢INSERT SOURCE DISK,TYPE RETURN¢INSERT DESTINATION DISK,TYPE RETURN¢³מ⇩ס①∈⇧«⇧©⌠⇦E}ì³⌐✓ì⇩¡³`∈
  60. ⇨ס⇨∈♪⇨`¡÷⑧É⇦¡¯8ì⇧⇨ r◆⓪⇨L≡1`Ñ✓≡⌐-ó* ã1⌐Pó* ã1 y0חYס✓⌐à✓ìß⑦`hhL!NAME OF FILE TO MOVE?¢⇨- ט0 ™0¡|חD≡⇨L®% <.ó⇦F},⌐^ ã1 70 ™0 פ.ס❎⌐@LΣ#ó Φ.ó⓪⌐⇨¥B⇨⌐⇦¥J⇨ Θ1⌐ì
  61. ì♪ó⓪Ñə¥D⇨Ñ¥E⇨¡⇦¥H⇨¡❎¥I⇨⌐◆¥B⇨ VΣ⓪
  62. ijê≡⇨L≡1מ
  63. ó,⌐} ã1 70,⌡⓪⇨Lə.ó á    ¡♪ס❎á✓∈♪⇦G}ÿ¥J⇨⌐⇨¥B⇨⌐|á,Å#P⇦⌐Øá#¥D⇨ÿ¥E⇨ Θ1á⓪ó ⌐ךH⇨ס❎ךI⇨≡⌐♪¥B⇨Ñə¥D⇨Ñ¥E⇨¨H⇨¥H⇨¨I⇨¥I⇨ Θ1⌐ ¥B⇨ Θ1¡
  64. ס②ó,⌐^ ã1 70,⌡0⇨La-ó⓪⌐ ¥B⇨ VΣ,Å#P⓪⇦H}ó,⌐^ ã1 70 ™0L∮#L!Ñ✓≡⑤⌐-ó* ã1⌐Pó* ã1 y0חYסj⌐à✓ìß⑦⌐❎àə⌐3à¡σ⇩8Θ❎ì⇦¡µ⇩Θ3ì❎⌐ì╱ì◆⌐}⑧m╱ì╱⌐m◆ì◆¡❎ל◆É
  65. סσ¡⇦ל╱ã§¡◆ס✓⌐⇦I}}ל╱É⇧`¡╱8Θ}ì⇦¡◆Θì❎`⌐⌠àə⌐à⌐·ì⇦⌐ì❎`©|Φח*≡ח?≡    ח¢≡⇦ח,ס∮Φ`Φ©|ח:≡⇧ΦΦá¨-)§|ס⓪זΦij◆ס≥⌐ó/ ã1L!`DESTINATION CANT BE DO⇦J}S.SYS¢③0⌐ìá⑧ì®⑧ ט0¡ß⑤H«⇧⌐¢¥{ 2ìב⑨Äג⑨α4ã⇨מö⑧ 2ìד⑨Äה⑨8ϕב⑨ì≤/èϕג⑨ã⇨L!ì°/ij¢≡) 2ìΓ⇩Äπ⇩π⇩≡⇨מá⑧ij¢≡④ 2 ™0ìα⇩Äβ⇩β⇩≡⇨מ®⑧⌐ìß⑤⇦K}hחAס⇨מß⑤ó⓪⌐⇨¥B⇨,ß⑤0⇦⌐✓ס⇩⌐    ¥J⇨ Θ1⌐♪¥B⇨⌐IJ¥D⇨⌐⑨¥E⇨⌐╱¥H⇨⌐¥I⇨,ß⑤⓪⌐⇦¥H⇨⌐ב¥D⇨⌐⑨¥E⇨ Θ1ó⓪⌐∙¥H⇨⌐③¥I⇨³H⇨ס⇨³I⇨¡ב⑨¥D⇨¡ג⑨¥E⇨Lô⑧SAVE-GIVE ⇦L}FILE,START,END(,INIT,RUN)¢⌐¢óO¥ñט⓪·⌐ì⇧ì⇩ì⌡ S0 À1`⌐❎ìB⇨⌐ñìD⇨⌐ìE⇨⌐PìH⇨⌐ìI⇨ó VΣijÇס⇨מ⌡`⌐ì⌡ S0¡H⇨ì≈ À1¡⌡⓪╱ Æ⑨L!¡≈ח⇨⇦M}0
  66. ⌐¬ó0 ã1L~0¡ñ`PLEASE TYPE 1 LETTER¢,⌡0⇧`hhL! 70ó⓪ ן1Lπ0⌐✓ì⇨¼⇧«⇩L<1¼⇧«⇩⌐♪ì⇨©ñח,≡;ח¢≡7©Ñח,≡"ח¢≡⌐:§ª≡1§Ñס②מ⇨©ñח⇦N}A⓪"⌐DÖ|ז⓪əמ⇨מ⇨§ñ≡ϕמ⇨⌐DÖ|ז⌐:Ö|ז⌐ìß⑤©ñÖ|Φזח¢≡,ח,≡(ח/≡+ח.ס❎⌐⇦ì⇨מ⇨⓪∧⌐Éó1 ã1מ⌡©ñΦח,≡⇦ח¢ס⌠Ä⇩î⇧`©ñìß⑤Φ©ñÖ{Φ⓪ΘNAME⇦O} TOO LONG¢⌐♪ìB⇨ó VΣijÇס⇨L!` ª⑨LÀ1⌐¬¥I⇨⌐
  67. ¥H⇨⌐1¥E⇨⌐מ¥D⇨Lß1£⌐|⑧m⇧¥D⇨⌐i¥E⇨` VΣÿ0⇧`ÿ8Θdó/Φ8Θ
  68. ⓪·⑧i:ì2Ä2ó2⌐② ã1 Æ⑨L⇦P}!ERROR-   138¢⌐⇦ì⇨⌐ì⇦ì❎«⇩©ñ∈⇩ח¢≡+ח,≡' á20*á⇨⑧.❎.⇦ê⓪÷❎ì❎מ⇨⓪צ⌐ró2 ã1מ⌡`¿¡❎«⇦`⌐éó2סδTOO MANY DIGITS¢INVALID HEXA⇦Q}DECIMAL PARAMETER¢8Θ00ח
  69. 08Θ◆ח
  70. 0⇦ח⓪0⇩⌐¯ח`,⌡0'«⇩©ñΦחD≡°8Θ0≡⑧0⑥ח    ⓪②H©ñΦח,≡⇦ח¢ס⌠Ä⇩h`מ⌡⌐≡ó2Lã1NEED D1 THRU D8¢α⇩β⇩u⇦R} ECIMAL PARAMETER¢8Θ00ח
  71. 08Θ◆ח
  72. 0⇦ח⓪0⇩⌐¯ח`,⌡0'«⇩©ñΦחD≡°8Θ0≡⑧0⑥ח    ⓪②H©ñΦח,≡⇦ח¢ס⌠Ä⇩h`מ⌡⌐≡ó2Lã1NEED D1 THRU D8¢α⇩β⇩u⇦⇧; ================¢; =  Air Hockey  =¢; =      by      =¢; =  Chris Page  =¢; ================¢¢; Copyright (c) 1985 ANALOG C✓T}omputing¢¢; Special Thanks to:¢; David Sullivan & David Becker¢¢DEFINE¢  OPTION="3",SELECT="5",START="6",¢  NONE="7",LEFT="96✓U}",RIGHT="60",¢  TOP="56",BOT="144"¢¢BYTE¢  NINDEX,VOLUME,FRICTION=[1],¢  BOUNCE=[90],WIN=[10],PLAYERS=[2],¢  HUE,LUM,OPT,PUCK✓V}XD,PUCKYD,HITFLAG,¢  SERVER,GAMEOVER,SERVEIT,SDMCTL=559,¢  CONSOL=53279,CHACT=755,WSYNC=54282,¢  VCOUNT=54283,CRSINH=752,¢  C✓W}OLOR0=53270,COLOR1=53271,¢  COLOR2=53272,COLOR3=53273,¢  COLOR4=53274,RTCLOK=20,¢  DMACTL=54272,LMARGN=82,RMARGN=83,¢  CHBAS=✓X}756,PMBASE=54279,¢  HITCLR=53278,P2PL=53262,¢  GRACTL=53277,GPRIOR=623,¢  RANDOM=53770,COLPM0=53266,¢  COLPM1=53267,CH=764,RA✓Y}MTOP=106,¢  AUDCTL=53768,ATRACT=77,KEY¢¢BYTE ARRAY¢  DLIST,SCRMEM,RAMFONT,PMMEM($800),¢  BAR(0)=[$FF$FF],¢  PUCK(0)=[$60$F0$F✓Z}0$F0$F0$F0$F0$60],¢  TTOP(0)=['Q'R'R'R'R'R'R'צ'צ'צ'צ'R¢           'R'R'R'R'R'E],¢  TMID(0)=['R'T'T'T'T'T'T'T'T'T'T'T¢        ✓[}   'T'T'T'T'T'R],¢  TBOT(0)=['Z'R'R'R'R'R'R'צ'צ'צ'צ'R¢           'R'R'R'R'R'C],¢  NOTE(0)=[243 243 217 243 204 243¢          ✓\} 193 204],¢  YTOP(0)=[6 80],YBOT(0)=[62 144],¢  SCORE(2),PDLX(2),PDLY(2),OSTIK(2),¢  ROMSET($400)=$E000,HPOSP(4)=53248,¢  HPO✓]}SM(4)=53252,PCOLR(4)=704¢¢CARD¢  PUCKXV,PUCKYV,PUCKX,PUCKY,¢  MAXV=[500],DLISTL=560,SAVMSC=88,¢  XITVBV=$E462¢¢¢; --- Miscell✓^}aneous Procedures ---¢¢PROC SETVBV=$E45C(BYTE CMD,VBIHI,¢                  VBILO)¢¢¢PROC VBI()¢; VBI to play music¢  SOUND(0,✓_}NOTE(NINDEX),10,VOLUME)¢  SOUND(1,NOTE(NINDEX)-2,10,VOLUME)¢  VOLUME==-1¢  IF VOLUME=0 THEN¢    VOLUME=15¢    NINDEX==+1¢    ✓`}IF NINDEX=8 THEN¢      NINDEX=0¢    FI¢  FI¢; JMP XITVBV¢  [$4C XITVBV]¢RETURN¢¢¢PROC INITVBI()¢; Initialize music VBI¢  NIND✓a}EX=0¢  VOLUME=15¢  SNDRST()¢ ; set deferred vbi vector¢  SETVBV(7,VBI RSH 8,VBI)¢RETURN¢¢¢PROC DEBOUNCE()¢CARD I¢; Debounce c✓b}onsole keys¢  FOR I=0 TO 5000 DO¢    DO¢      UNTIL CONSOL=NONE¢    OD¢  OD¢RETURN¢¢¢; --- Title Screen ---¢¢PROC INITTITLE()✓c}¢BYTE I¢; Initialize title screen¢  GRAPHICS(0)¢  GPRIOR=17¢  GRACTL=0¢  SDMCTL=0¢  CRSINH=1¢  HUE=0¢  DLIST=DLISTL¢  DO¢    ✓d}UNTIL VCOUNT=0¢  OD¢  FOR I=3 TO 5 DO¢    DLIST(I+7)=DLIST(I)¢  OD¢  SETBLOCK(DLIST,10,$70)¢  FOR I=13 TO 25 STEP 2 DO¢    DL✓e}IST(I)=0¢  OD¢  SETBLOCK(DLIST+27,2,$70)¢  SETCOLOR(1,0,14)¢  SETCOLOR(2,0,8)¢  POSITION(11,0)¢  PRINT("Air Hockey")¢  POSITI✓f}ON(1,1)¢  PRINT("By: Chris Page")¢  POSITION(29,1)¢  PRINT("Thanks: D.S. and D.B.")¢  POSITION(17,2)¢  PRINT(¢   "June 30, 19✓g}84 - August 9, 1985")¢  POSITION(7,4)¢  PRINT("Copyright (c) 1984")¢  POSITION(34,5)¢  PRINT("Press  צקIJפק")¢  SDMCTL=33¢RETU✓h}RN¢¢¢PROC TITLECOLORS()¢BYTE I¢; Mid-screen color changes¢  HUE==+2¢  IF HUE&2 THEN¢    CHACT==+1&3¢  FI¢  FOR I=0 TO 30 DO¢ ✓i}   DO¢      WSYNC=0¢      COLOR4=VCOUNT LSH 1+HUE¢      IF VCOUNT=48 THEN¢        COLOR1=0¢      FI¢      UNTIL VCOUNT&128¢  ✓j}  OD¢  OD¢RETURN¢¢¢PROC TITLE()¢; Display title screen¢  INITTITLE()¢  INITVBI()¢  DO¢    TITLECOLORS()¢    UNTIL CONSOL=STAR✓k}T¢  OD¢  SDMCTL=0¢RETURN¢¢¢; --- Game Options ---¢¢PROC INITOPTIONS()¢; Initialize procedure OPTIONS()¢  GRAPHICS(17)¢  SDMCT✓l}L=0¢  GRACTL=0¢  DO¢    UNTIL VCOUNT=0¢  OD¢  DEBOUNCE()¢  SCRMEM=SAVMSC¢  DLIST=DLISTL¢  DLIST(3)==+1¢  SETCOLOR(0,3,14)¢  S✓m}ETCOLOR(2,0,14)¢  PRINTDE(6,"    GAME OPTIONS")¢  POSITION(0,2)¢  PRINTD(6,"נסקחנמ - NEXT OPTION")¢  PRINTDE(6,"צדכדבק - CHOO✓n}SE")¢  PRINTDE(6," צקIJפק - PLAY GAME")¢  POSITION(3,6)¢  PRINTD(6,"FRICTION: O")¢  IF FRICTION THEN¢    PRINTD(6,"N")¢  ELSE¢✓o}    PRINTD(6,"FF")¢  FI¢  POSITION(3,8)¢  PRINTD(6,"VELOCITY: ")¢  PRINTBD(6,MAXV/100)¢  POSITION(3,10)¢  PRINTD(6,"BOUNCE  :✓p} ")¢  PRINTBD(6,BOUNCE/10)¢  POSITION(3,12)¢  PRINTD(6,"WIN AT  : ")¢  PRINTBD(6,WIN)¢  POSITION(3,14)¢  PRINTD(6,"PLAYERS : ✓q}")¢  PRINTBD(6,PLAYERS)¢  SDMCTL=34¢  OPT=0¢RETURN¢¢¢PROC OPTIONCOLORS(BYTE OPT)¢; Mid-screen color changes¢; OPT=option line✓r} to hi-light¢  DO¢    WSYNC=0¢    UNTIL VCOUNT=15¢  OD¢  LUM=0¢  WSYNC=0¢  DO¢    WSYNC=0¢    COLOR0=LUM&$0F%$20¢    LUM==+2¢✓s}    UNTIL VCOUNT=25¢  OD¢  WSYNC=0¢  COLOR0=0¢  COLOR4=6¢  DO¢    WSYNC=0¢    UNTIL VCOUNT=40¢  OD¢  COLOR0=$F8¢  OPT==LSH 3+✓t}41¢  DO¢    WSYNC=0¢    UNTIL VCOUNT=OPT¢  OD¢  COLOR0=$FE¢  DO¢    WSYNC=0¢    UNTIL VCOUNT=OPT+8¢  OD¢  COLOR0=$F8¢RETURN¢¢✓u}¢PROC OPTIONS()¢CARD I¢; Get game options from player(s)¢  INITOPTIONS()¢  DO¢    FOR I=0 TO 10 DO¢      OPTIONCOLORS(OPT)¢  ✓v}    UNTIL CONSOL=START¢    OD¢    IF CONSOL=OPTION THEN¢      OPT==+1¢      IF OPT=5 THEN¢        OPT=0¢      FI¢    FI¢    I✓w}F CONSOL=SELECT THEN¢      IF OPT=0 THEN¢        FRICTION==!1¢        IF FRICTION THEN¢          SCRMEM(134)=46¢          SCR✓x}MEM(135)=0¢        ELSE¢          SCRMEM(134)=38¢          SCRMEM(135)=38¢        FI¢      ELSEIF OPT=1 THEN¢        IF MAXV=✓y}900 THEN¢          SCRMEM(173)==-7¢          MAXV=200¢        ELSE¢          SCRMEM(173)==+1¢          MAXV==+100¢        FI¢✓z}      ELSEIF OPT=2 THEN¢        IF BOUNCE=90 THEN¢          SCRMEM(213)==-9¢          BOUNCE=0¢        ELSE¢          SCRMEM(✓{}213)==+1¢          BOUNCE==+10¢        FI¢      ELSEIF OPT=3 THEN¢        IF WIN=90 THEN¢          SCRMEM(253)==-8¢          ✓|}WIN=10¢        ELSE¢          SCRMEM(253)==+1¢          WIN==+10¢        FI¢      ELSE¢        IF PLAYERS=2 THEN¢          SC✓}}RMEM(293)==-1¢          PLAYERS=1¢        ELSE¢          SCRMEM(293)==+1¢          PLAYERS=2¢        FI¢      FI¢    FI¢    U✓~}NTIL CONSOL=START¢  OD¢  SDMCTL=0¢  SNDRST()¢RETURN¢¢¢; --- Play Air Hockey ---¢¢PROC MAKEFONT()¢BYTE I¢CARD J¢; Change chara✓}cter set¢¢BYTE ARRAY¢  CDAT(8)=[$55$55$55$55$54$54$50$40],¢  EDAT(8)=[$40$50$54$54$55$55$55$55],¢  QDAT(8)=[$01$05$15$15$55$5✓Ç}5$55$55],¢  RDAT(8)=[$55$55$55$55$55$55$55$55],¢  SDAT(8)=[$FF$FF$FF$FF$FF$FF$FF$FF],¢  TDAT(8)=[$AA$AA$2A$AA$AA$AA$A2$AA],¢ ✓ü} ZDAT(8)=[$55$55$55$55$15$15$05$01]¢¢  RAMFONT=(RAMTOP-8)*$100¢  MOVEBLOCK(RAMFONT,ROMSET,$400)¢  ZERO(RAMFONT+536,192)¢  CHB✓é}AS=RAMTOP-8¢  SDMCTL=61¢  FOR I=0 TO 7 DO¢    FOR J=0 TO 3000 DO OD¢    RAMFONT(536+I)=CDAT(I)¢    RAMFONT(552+I)=EDAT(I)¢   ✓â} RAMFONT(648+I)=QDAT(I)¢    RAMFONT(656+I)=RDAT(I)¢    RAMFONT(664+I)=SDAT(I)¢    RAMFONT(672+I)=TDAT(I)¢    RAMFONT(720+I)=Z✓ä}DAT(I)¢  OD¢RETURN¢¢¢PROC POSPLAYER(CARD PLAYER¢               BYTE X,Y,LENGTH¢               BYTE ARRAY SHAPE)¢; Position Pl✓à}ayer¢  HPOSP(PLAYER)=X+LEFT¢  PLAYER==*$100+$400¢  MOVEBLOCK(PMMEM+PLAYER+Y+TOP,¢            SHAPE,LENGTH)¢RETURN¢¢¢PROC POSP✓å}DL(BYTE PADDLE,X,Y)¢; Position paddle¢  POSPLAYER(PADDLE,X,Y,2,BAR)¢RETURN¢¢¢PROC POSPUCK(CARD X,Y)¢; Position puck¢  X==/100✓ç}¢  Y==/100¢  POSPLAYER(2,X,Y,8,PUCK)¢RETURN¢¢¢PROC ERASEPDL(CARD PADDLE  BYTE Y)¢; Erase paddle¢  PADDLE==*$100+$400¢  ZERO(P✓ê}MMEM+PADDLE+Y+TOP,2)¢RETURN¢¢¢PROC ERASEPUCK(CARD Y)¢; Erase puck¢  Y==/100+TOP¢  ZERO(PMMEM+$600+Y,8)¢RETURN¢¢¢PROC ERASEALL✓ë}()¢; Clear Player memory¢  ERASEPDL(0,PDLY(0))¢  ERASEPDL(1,PDLY(1))¢  ERASEPUCK(PUCKY)¢RETURN¢¢¢PROC INITPMG()¢; Initialize ✓è}PMG¢  PMMEM=(RAMTOP-16)*$100¢  Zero(PMMEM,$800)¢  PCOLR(0)=$76¢  PCOLR(1)=$76¢  PCOLR(2)=$36¢  PMBASE=RAMTOP-16¢  GRACTL=3¢RE✓ï}TURN¢¢¢PROC INITPLAY()¢CARD I¢; Initialize game¢  GRAPHICS(0)¢  SDMCTL=0¢  DO¢    UNTIL VCOUNT=0¢  OD¢  SETVBV(7,$E4,$62)¢  S✓î}NDRST()¢  DEBOUNCE()¢  INITPMG()¢  SCRMEM=SAVMSC¢  SCORE(0)=0¢  SCORE(1)=0¢  OSTIK(0)=15¢  OSTIK(1)=15¢  SERVER=0¢  GAMEOVER=✓ì}0¢  CRSINH=1¢  DLIST=DLISTL¢  DLIST(2)=DLIST(3)+4¢  DLIST(3)=DLIST(4)¢  DLIST(4)=DLIST(5)¢  DLIST(5)=$30¢  DLIST(7)=$30¢  SET✓Ä}BLOCK(DLIST+8,21,4)¢  SETCOLOR(0,3,6)¢  SETCOLOR(1,0,14)¢  SETCOLOR(2,0,4)¢  SETCOLOR(3,2,14)¢  SETCOLOR(4,0,6)¢  POSITION(3,✓Å}0)¢  PRINTE("air hockey")¢  SAVMSC==+16¢  POSITION(0,0)¢  PRINTF(¢   " One : 00 | Win : %B | Two : 00",¢   win)¢  MOVEBLOCK(S✓É}CRMEM+55,TTOP,18)¢  FOR I=87 TO 663 STEP 32 DO¢    MOVEBLOCK(SCRMEM+I,TMID,18)¢  OD¢  MOVEBLOCK(SCRMEM+695,TBOT,18)¢  MAKEFON✓æ}T()¢  SOUND(3,0,0,3)¢  KEY=0¢  CH=$FF¢RETURN¢¢¢PROC SERVE(BYTE PLAYER)¢CARD I¢; Initialize positions¢  ERASEALL()¢  PDLX(0)=2✓Æ}8¢  PDLX(1)=28¢  PDLY(0)=YTOP(0)¢  PDLY(1)=YBOT(1)¢  PUCKX=3000¢  PUCKY=4000+6800*PLAYER¢  PUCKXV=0¢  PUCKYV=0¢  POSPDL(0,PDL✓ô}X(0),PDLY(0))¢  POSPDL(1,PDLX(1),PDLY(1))¢  POSPUCK(PUCKX,PUCKY)¢  HITCLR=0¢  HITFLAG=0¢  VOLUME=0¢RETURN¢¢¢PROC MOVEPADDLE(B✓ö}YTE P)¢BYTE STIK¢; Move paddle¢  ERASEPDL(P,PDLY(P))¢  STIK=STICK(P)¢  ; move puck 2 for one player game¢  IF PLAYERS=P THEN¢✓ò}    STIK=$F¢    IF PDLX(1)+2<PUCKX/100 THEN¢      STIK==-8¢    ELSE¢      STIK==-4¢    FI¢    IF PDLY(1)-6<PUCKY/100 THEN¢   ✓û}   STIK==-2¢    ELSEIF PDLY(1)-8>PUCKY/100 THEN¢      STIK==-1¢    ELSE¢      STIK==-2¢      IF RAND(2) THEN¢        STIK==+1✓ù}¢      FI¢    FI¢  FI¢  ; save stick position¢  OSTIK(P)=STIK¢  ; move paddle verticaly¢  IF (STIK&1)=0 THEN¢    PDLY(P)==-2¢✓ÿ}    IF PDLY(P)<YTOP(P) THEN¢      PDLY(P)=YTOP(P)¢    FI¢  ELSEIF (STIK&2)=0 THEN¢    PDLY(P)==+2¢    IF PDLY(P)>YBOT(P) THEN✓Ö}¢      PDLY(P)=YBOT(P)¢    FI¢  FI¢  ; move paddle horizontaly¢  IF (STIK&8)=0 THEN¢    PDLX(P)==+2¢    IF PDLX(P)>RIGHT-4 TH✓Ü}EN¢      PDLX(P)=RIGHT-4¢    FI¢  ELSEIF (STIK&4)=0 THEN¢    PDLX(P)==-2¢    IF PDLX(P)>240 THEN¢      PDLX(P)=0¢    FI¢  FI¢✓¢}  POSPDL(P,PDLX(P),PDLY(P))¢RETURN¢¢¢PROC REVERSEPX()¢; Reverse horizontal puck direction¢  VOLUME=14¢  PUCKXD==!1¢  IF PUCKX✓£}V<(90-BOUNCE) THEN¢    PUCKXV=0¢  ELSE¢    PUCKXV==-(90-BOUNCE)¢  FI¢RETURN¢¢¢PROC REVERSEPY()¢; Reverse vertical puck direct✓¥}ion¢  VOLUME=14¢  PUCKYD==!1¢  IF PUCKYV<(90-BOUNCE) THEN¢    PUCKYV=0¢  ELSE¢    PUCKYV==-(90-BOUNCE)¢  FI¢RETURN¢¢¢PROC MOV✓ß}EPUCK()¢BYTE PADDLE,XDIF,YDIF,STIK,ABOVE¢CARD ARRAY¢  XVELOC(0)=[400 140 100  80  40  0¢              40  80 100 140 400]¢; M✓ƒ}ove the puck¢  ERASEPUCK(PUCKY)¢; check for paddle collisions¢  PADDLE=0¢  IF PUCKY/100>70 THEN¢    PADDLE=1¢  FI¢  STIK=OSTI✓á}K(PADDLE)¢  IF P2PL THEN¢    IF HITFLAG=0 THEN¢      VOLUME=14¢    ; new x velocity & direction¢      XDIF=PUCKX/100+3-PDLX(P✓í}ADDLE)¢      PUCKXV=XVELOC(XDIF)¢      PUCKXD=0¢      IF XDIF>5 THEN¢        PUCKXD=1¢      FI¢    ; new y velocity & directi✓ó}on¢      YDIF=PUCKY/100-PDLY(PADDLE)¢      ABOVE=0¢      IF PADDLE THEN¢        IF PUCKY/100<PDLY(1) THEN¢          ABOVE=1¢ ✓ú}       FI¢      ELSE¢        IF PUCKY/100+8<PDLY(0) THEN¢          ABOVE=1¢        FI¢      FI¢    ; paddle not moving¢      ✓ñ}IF (STIK&3)=3 THEN¢        PUCKYD==!1¢    ; puck not moving¢      ELSEIF PUCKYV=0 THEN¢        PUCKYV=200¢        PUCKYD=0¢  ✓Ñ}      IF (STIK&3)=1 THEN¢          PUCKYD=1¢        FI¢    ; puck and paddle equal y coord¢      ELSEIF PUCKY/100+3=PDLY(PADD✓ª}LE)¢       THEN¢      ; do nothing¢      ELSE¢      ; moving puck and paddle down¢        IF PUCKYD=1 AND (STIK&3)=1¢        ✓º} THEN¢          IF ABOVE THEN¢            PUCKYV==-200¢            IF PUCKYV>200 THEN¢              PUCKYD==!1¢            FI✓¿}¢          ELSE¢            PUCKYV==+200¢          FI¢        ELSEIF PUCKYD=0 AND¢               (STIK&3)=2 THEN¢          IF✓⌐} ABOVE=0 THEN¢            PUCKYV==-200¢            IF PUCKYV>200 THEN¢              PUCKYD==!1¢            FI¢          ELSE¢✓¬}            PUCKYV==+200¢          FI¢        ELSEIF PUCKYD=1 AND¢               (STIK&3)=2 THEN¢          IF ABOVE THEN¢    ✓½}        PUCKYD==!1¢            PUCKYV==+200¢          FI¢        ELSEIF PUCKYD=0 AND¢               (STIK&3)=1 THEN¢         ✓¼} IF ABOVE=0 THEN¢            PUCKYD==!1¢            PUCKYV==+200¢          FI¢        FI¢      FI¢    FI¢    HITFLAG=1¢  ELSE✓¡}¢    HITFLAG=0¢  FI¢  HITCLR=0¢; move horizontaly¢  IF PUCKXV>MAXV THEN¢    PUCKXV=MAXV¢  FI¢  IF PUCKXD THEN¢    PUCKX==+PUC✓«}KXV¢  ELSE¢    PUCKX==-PUCKXV¢  FI¢; check boundaries¢  IF PUCKX>24000 THEN¢    REVERSEPX()¢    PUCKX=0¢  ELSEIF PUCKX>RIGHT*✓»}100 THEN¢    REVERSEPX()¢    PUCKX=RIGHT*100¢  FI¢  IF PUCKYV>MAXV THEN¢    PUCKYV=MAXV¢  FI¢; move verticaly¢  IF PUCKYD THE✓ã}N¢    PUCKY==+PUCKYV¢  ELSE¢    PUCKY==-PUCKYV¢  FI¢; check boundaries¢  IF PUCKY>24000 THEN¢    REVERSEPY()¢    PUCKY=0¢  EL✓õ}SEIF PUCKY>BOT*100 THEN¢    REVERSEPY()¢    PUCKY=BOT*100¢  FI¢; handle friction¢  IF PUCKXV THEN¢    PUCKXV==-FRICTION¢  FI¢✓Ø}  IF PUCKYV THEN¢    PUCKYV==-FRICTION¢  FI¢; fading collision sound¢  IF VOLUME THEN¢    VOLUME==-2¢    SOUND(0,10,8,VOLUME)✓ø}¢    SOUND(1,10,10,VOLUME)¢  ELSE¢    SOUND(0,0,0,0)¢    SOUND(1,0,0,0)¢  FI¢  POSPUCK(PUCKX,PUCKY)¢RETURN¢¢¢PROC GOAL(BYTE P✓œ}LAYER)¢BYTE I¢CARD J¢; Inc score, check for a winner¢  SNDRST()¢  ERASEPUCK(PUCKY)¢  VOLUME=0¢  SERVEIT=1¢  SERVER=PLAYER¢  S✓Œ}CORE(PLAYER)==+1¢  IF SCORE(PLAYER)=WIN THEN¢    GAMEOVER=1¢  FI¢; flash score¢  FOR I=0 TO 5 DO¢    SETBLOCK(SCRMEM+23+22*PL✓À}AYER,2,0)¢    FOR J=0 TO 5000 DO OD¢    SCRMEM(23+22*PLAYER)=¢           16+SCORE(PLAYER)/10¢    SCRMEM(24+22*PLAYER)=¢      ✓Ã}     16+SCORE(PLAYER) MOD 10¢    SOUND(0,20,10,8)¢    FOR J=0 TO 5000 DO OD¢    SOUND(0,0,0,0)¢  OD¢; cheering¢  IF GAMEOVER=✓Õ}0 THEN¢    FOR I=0 TO 30 DO¢      FOR J=0 TO 1000 DO OD¢      SOUND(0,10,8,I RSH 1)¢    OD¢    FOR J=0 TO 40000 DO OD¢    FOR✓¨} I=0 TO 30 DO¢      FOR J=0 TO 1000 DO OD¢      SOUND(0,10,8,15-I RSH 1)¢    OD¢  FI¢  SNDRST()¢  SOUND(3,0,0,3)¢RETURN¢¢¢PRO✓´}C MOVEALL()¢; Move paddles and puck¢; keep attract mode at bay¢  ATRACT=0¢; check for goal¢  IF PUCKX>2400 AND PUCKX<3700 THE✓†}N¢    IF PUCKY=0 THEN¢      GOAL(1)¢    ELSEIF PUCKY=BOT*100 THEN¢      GOAL(0)¢    FI¢  FI¢  IF GAMEOVER=0 THEN¢    MOVEPUCK✓¶}()¢    MOVEPADDLE(0)¢    MOVEPADDLE(1)¢  FI¢RETURN¢¢¢PROC ENDGAME()¢BYTE I¢CARD J,K¢; Cheer profusly and end game¢  SNDRST()¢✓©}  FOR I=0 TO 30 DO¢    FOR J=0 TO 1000 DO OD¢    SOUND(0,10,8,I RSH 1)¢  OD¢  FOR J=0 TO 200 DO¢    FOR K=0 TO 500 DO OD¢    ✓®}IF RAND(130)=0 THEN¢      FOR I=0 TO 15 DO¢        FOR K=0 TO 1200 DO OD¢        SOUND(1,30-I,10,I)¢      OD¢      FOR I=0 TO✓™} 15 DO¢        FOR K=0 TO 1200 DO OD¢        SOUND(1,15+I,10,15-I)¢      OD¢    FI¢  OD¢  FOR I=0 TO 30 DO¢    FOR J=0 TO 100✓ij}0 DO OD¢    SOUND(0,10,8,15-I RSH 1)¢  OD¢  FOR J=0 TO 40000 DO OD¢RETURN¢¢¢PROC PLAY()¢; Play Air Hockey¢  INITPLAY()¢  SERV✓IJ}E(SERVER)¢  DO¢    DO¢      UNTIL VCOUNT=100¢    OD¢    IF CH<>$FF THEN¢      KEY=GETD(1)¢    FI¢    IF KEY=32 OR SERVEIT=1 T✓א}HEN¢      SERVE(SERVER)¢      KEY=0¢      CH=$FF¢      SERVEIT=0¢    FI¢    MOVEALL()¢    UNTIL GAMEOVER=1 OR KEY=27 OR¢     ✓ב}     CONSOL=6¢  OD¢  IF KEY<>27 AND CONSOL<>6 THEN¢    ENDGAME()¢  FI¢  SNDRST()¢RETURN¢¢¢; --- Main Procedure ---¢¢PROC MAIN✓ג}()¢  LMARGN=0¢  CLOSE(1)¢  OPEN(1,"K:",4,0)¢  DO¢    TITLE()¢    WHILE CONSOL=6 DO¢      OPTIONS()¢      PLAY()¢    OD¢    UN✓ד}TIL KEY=27¢  OD¢  CLOSE(1)¢  GRAPHICS(0)¢  GRACTL=0¢RETURN¢¢¢    WHILE CONSOL=6 DO¢      OPTIONS()¢      PLAY()¢    OD¢    UN✓<⇧◆⇧✓⇧@⇧⑦⇦+⇦םחIJאלבן⇧⇩⇨⇦❎╱d?◆+Ç④⑤0@⇩②Ç②Ç④<(" BACKUP 130XE    by Wi ו}lliam W. Tan④?(⑥nR⑦✓ü-A⑥⑨A⑥d④"é④!ü②é④%    ü④F6â-A⇩V$+F:A⇧E,%@⇧,④R6ä-B❎@⑦⑥x='(INSERT SOURCE DISK,  ז}PRESS START④36à-@é④= A⇧@⑥éL╱(④/($INSERT DESTINATION DISK, PRESS START④;6à-@Ç④E A⇧@④I+Ç④L⑤⑥î  ◆F:B❎2y, ח}@╱A⇧@⑥û+◆à"@Ç+A⇩T②@⇧②Ç②Ç②⇩D:⑥áÉä②A⇩S④26å-?:A⑥<à<@⇧<A⇩ <â,④@✓ü-Ç⑨@⇨④V ט}ä②A⇩%%@⇦$ü④ë6å-?:A⑥<à<A⇩!%A⇧%$ü<A⇧%<B⇧cä,④ì    ü④É$⑥¬[[⇧104,104,104,141,2,3,104,141,11,3,104,141, י}10,3,104,133,204,104,133,203,104,141,5,3,104¢œ``⇧141,4,3,32,83,228,173,4,3,24,105,128,141,4,3,173,5,3,105,0,141,5,3,238,10,3 כ},208,3,238,11,3¢®''⇧198,203,208,224,198,204,16,220,96¢Ç④④⑨ D:BACKUP.BAS⑥,24,105,128,141,4,3,173,5,3,105,0,141,5,3,238,10,3 K⇧.⇧/⇧נ⇧©צצYOLגYNEתםZOLגZNEתQןIJןMODEõMODEØבCNקךXסYסYõעסחB❎2y⇧@①⇩@①⇨⇦@⑤❎@⑤╱◆@◆⓪מ}✓A⇧⇧    @Ç
  73. @H♪@û @ûA⇧b@û⓪A⇧Ç①@❎②B⇨ë②③@d⇧%%************************⓪נ}*******¢⇩%%* COLOR ALIGNMENT GENERATOR   *¢⇨%%* (C) 1983 BY DON LEE 2/15,83 *¢⇦%%* SEATTLE, WA. 98155          *¢❎%%*⓪ס}******************************¢╱%%*  (C) 1985 ANALOG COMPUTING  *¢◆%%*******************************¢✓╱╱¢    96Ç-B❎2y⓪ע}④ü-@①④!6é-â④-6ä-@①④36à-â④96å-â⑥
  74. 5◆+â④⑤0@⇩②â②â④#0@⇦②â②â④5A◆R②@⇧⑥ AA❎⑥④]⑤-@◆②@⇦⓪פ}④3(⑨COLOR ALIGNMENT GENERATOR④E-@⓪②@❎④](③(C) 1983 BY DON LEE⑥:⑤-@⇦②@✓④:( DISPLAY MODE     DISPLA⓪צ}Y CONTENT⑥(;⑤-@⇦②@    ④;(!____________     ________________⑥29⑤-@╱②@①④9(1 by 1         HORIZONTAL LINES⓪ק}⑥<7⑤-@╱②@②④7(3 by 3         VERTICAL LINES⑥F4⑤-@╱②@③④4(ə5 by 5         DOT PATTERN⑥P%⑤-@!②@④⓪ר}④%(♪CROSS-HATCH⑥U$⑤-@!②@⑤④$(
  75. COLOR BARS⑥W$⑤-@!②@⑥④$(
  76. GRAY SCALE⑥X$⑤-@!②@⑦④$(
  77. SOUND TE⓪ש}ST⑥Zh-â②@ ④-(⑨    PRESS נסקחנמ FOR MODE④L(ə  PRESS צדכדבק FOR CONTENT④h(⑦  PRESS צקIJפקá TO BEGIN⑥k7-@⇦②ü④(>⓪ת}:@û,⑤④)-@⑧②ä④7(>:@û,⑤⑥n 6ç-F:Ç,⑥s⑦⑦◆ç"@⇨A⇧0⑥x⑦⑦◆ç"@❎A⇧@⑥}⑦⑦◆ç"@╱A⇧R⑥
  78. A⓪ן}⇧⓪⑥é)①6é-ü%@⇧④◆é"@④)6é-@①⑥â@w②â⑥ä@-@⇦②ü④⑥(⇧ ⑤④"-@⇦②é④0(>:@û,⑤④66ü-é④@
  79. A⇧E⓪ך}⑥î)①6à-ä%@⇧④◆à"@⑧)6à-@①⑥ì@w②â⑥Ä6-@⑧②ä④⑥(⇧ ⑤④"-@⑧②à④0(>:@û,⑤④66ä-à⑥æ①✓ê-â⑨A⇧⓪ם}④⑤    ê④
  80. A⇧⓪⑥Æ╱╱¢ôəə********************¢öəə* WHAT DO YOU WANT *¢òəə********************¢û╱╱¢ÿ⑤⑤@w②⓪ף}⑥¢'◆ü"@①ë-@Ç④'6è-@H⑥á'◆ü"@②ë-@T④'6è-@2⑥Ñ'◆ü"@③ë-@⑥④'6è-@⑥⑥»⑦⑦◆⓪ץ}ä"@①A❎❎⑥œ⑦⑦◆ä"@②A╱❎⑥¨⑦⑦◆ä"@③A✓⇨⑥®⑦⑦◆ä"@④A◆❎⑥IJ⑦⑦◆ä"@⑤A!❎⑥ב⑦⑦◆ä"@⑥⓪§}A@❎⑥ל⑦⑦◆ä"@⑦A⇩#⑥ן
  81. A⇧◆⑥ך╱╱¢ם④④**************¢ף④④* SOUND TEST *¢ץ④④**************¢§╱╱¢∞G    ◆å"â⓪∧}⑤6å-A⇧!④+2â②å②@⓪②@╱④9✓ê-â⑨A⇩④=    ê④G
  82. A⇧◆⑥α;6å-④2â②å②@⓪②â④-✓ê-â⑨A⇧④1    ê④;
  83. A⇧◆⑥σ╱╱⓪∞}¢µəə********************¢τəə* THREE COLOR BARS *¢Φəə********************¢Θ╱╱¢¯⑦+@⑨④⑦ AA❎⑥⇧⇧9⑤A◆✓②@f⓪α}④'A◆    ②A⇧0④9A◆⓪②A⇩⓪⑥⇦⇧1⇨@⇧④,@◆②@⇦④1/@◆②@ ⑥❎⇧'⑤,@✓②@⇦④'/@✓②@ ⓪β}⑥    ⇧1⇨@⇩④,@ ②@⇦④1/@ ②@ ⑥
  84. ⇧'⑤,@⑨②@⇦④'/@⑨②@ ⑥⇧1⇨@⇨④,@1②@⇦④1/⓪Γ}@1②@ ⑥⇧'⑤,@2②@⇦④'/@2②@ ⑥③⇧⑤①✓ê-â⑨A⇧④⑤    ê⑥⑧⇧(②◆F:Ç,"@╱A◆②②â④(
  85. @⓪⑥⇧
  86. A⇩Ç⓪π}⑥,⇧╱╱¢-⇧*********************¢.⇧* 1 BY 1 COLOR BARS *¢/⇧*********************¢0⇧╱╱¢6⇧G    (⇧}④A◆R②@⇧④-⓪Σ}-@⇦②@ ④G(⑤PRESS צסIJבד FOR COLOR⑥7⇧.⑤-@⇦②@!④.(④PRESS צקIJפק FOR MENU⑥;⇧M⑨✓ï-â⑨A⇩@ə@⑥④%A◆②②ï⓪σ}④1A◆⓪②ï④CA◆d②A⇩U④M A⇨P⑥=⇧əə◆F:Ç,"@╱@⓪⑥@⇧  ◆F:A◆d,"A⇩UA⇨⑦⑥E⇧◆◆    ï⑥J⇧
  87. A⇨⑤⑥^⇧E⑤-⓪µ}@⓪②@#④3(⑧                        ⑤④E-@⓪②@#⑥_⇧④    ◆ï"â④(❎BLACK⑤⑥`⇧⑨◆ï"@⑥⑨(⇦RUST⑤⑥a⇧◆ï"@2(⓪τ}
  88. RED-ORANGE⑤⑥b⇧ ◆ï"@H (♪DARK-ORANGE⑤⑥c⇧⑧◆ï"@d⑧(⇨RED⑤⑥d⇧"◆ï"@Ç"(DARK-LAVENDER⑤⑥e⇧ ◆ï"@û (♪CO⓪Φ}BALT-BLUE⑤⑥f⇧%◆ï"A⇧②%(⓪ULTRAMARINE-BLUE⑤⑥g⇧ ◆ï"A⇧( (♪MEDIUM BLUE⑤⑥h⇧◆ï"A⇧D(    DARK-BLUE⑤⑥i⇧◆ï"A⇧`⓪Θ}(    BLUE-GREY⑤⑥j⇧ ◆ï"A⇧v (♪OLIVE-GREEN⑤⑥k⇧!◆ï"A⇧Æ!( MEDIUM-GREEN⑤⑥l⇧◆ï"A⇩✓(
  89. DARK-GREEN⑤⑥m⇧!◆ï"A⇩$⓪Ω}!( ORANGE-GREEN⑤⑥n⇧◆ï"A⇩@(╱ORANGE⑤⑥o⇧╱╱$⑥⌠⇧╱╱¢⌡⇧əə********************¢÷⇧əə* HORIZONTAL LINES *¢≈⇧əə**********⓪δ}**********¢°⇧╱╱¢∙⇧!+@#④⑦ AA❎④! A❎U⑥²⇧⑤①✓ê-â⑨A⇧④⑤    ê⑥³⇧əə◆F:Ç,"@╱@⓪⑥⇨⇩
  90. A❎⓪⑥#⇩╱╱¢$⇩****⓪∮}*********************¢%⇩* HORIZONTAL SUBROUTINE *¢&⇩*************************¢'⇩╱╱¢+⇩③③✓ì-â⑨@òəè⑥0⇩G⇨@⇧④③,â⓪ϕ}②ì④/A⇧Y②ì④#    ì④5,②@ò④G/A⇧Y②@ò⑥:⇩╱╱$⑥?⇩╱╱¢@⇩⑧⑧******************¢A⇩⑧⑧* VERTICAL LINES *¢B⇩⑧⑧*****⓪∈}*************¢C⇩╱╱¢]⇩!+@#④⑦ AA❎④! A╱U⑥b⇩
  91. A❎    ⑥ç⇩╱╱¢ê⇩***********************¢ë⇩* VERTICAL SUBROUTI⓪∩}NE *¢è⇩***********************¢ï⇩╱╱¢Å⇩③③✓ê-â⑨A⇧Yəë⑥ö⇩A⇨@⇧④③,ê②â④/ê②@ò④#    ê④/,A⇧Y②â④A/A⇧Y②@ò⑥ß⓪≡}⇩╱╱$⑥¶⇩╱╱¢©⇩***********************¢®⇩* CROSS-HATCH PATTERN *¢™⇩***********************¢ij⇩╱╱¢IJ⇩++@#④⑦ AA❎⓪±}④! A❎U④+ A╱U⑥ה⇩
  92. A❎    ⑥∈⇩╱╱¢∩⇩⑤⑤***************¢≡⇩⑤⑤* DOT PATTERN *¢±⇩⑤⑤***************¢≥⇩╱╱¢#⇨+@#⑥$⇨⓪≥} AA❎⑥%⇨③③✓Ä-â⑨A⇧Yəë⑥*⇨③③✓Å-â⑨@òəè⑥/⇨Q    ,Ä②Å④⑤,A⇧Y②Å④⑨    Å④%,Ä②@ò④)    Ä④5◆ü @③G,A⇧Y②@ô④Q
  93. A❎⓪≤}    ⑥2⇨⑤,A⇧Y②@ò④
  94. A❎    ⑥R⇨╱╱¢S⇨***********************¢T⇨* RAINBOW KEY PATTERN *¢U⇨********************⓪⌠}***¢V⇨╱╱¢à⇨⑦+@①④⑦ AA❎⑥ë⇨G6ê-@⇨④⑤6ì-â④!6É-A⇧Ç④5✓ï-@⇩⑨@③④9⇨ï④G✓æ-â⑨@⇦⑥ï⇨◆ê%@⇧!@y⓪⌡}A❎    ⑥Ä⇨③♪,ê%æ②ì④③/ê%æ②É⑥ô⇨%◆    æ④⑦6ê-ê%æ%@⇧④    ï④%
  95. A❎    ⑥À⇨╱╱¢Ã⇨⑧⑧******************¢Õ⇨⑧⑧* PLAYER-MISSILE *¢¨⇨⑧⑧⓪÷}******************¢´⇨╱╱¢ϕ⇨Xə6ç-F:A⇧╱,&@✓④&B❎By②ç④46Æ-A⇩V$ç④FA❎Y②@F④XB❎2w②@⇨⑥≥⇨!⑦✓ô-B❎2H⓪≈}⑨B❎2U④ô②â④!    ô⑥≈⇨'⑦✓ô-B❎2V⑨B❎2`④#ô②@⇩④'    ô⑥ⁿ⇨!⑦✓ô-A◆⇦⑨A◆◆④ô②â④!    ô⑥⇧⇦#⑦✓ô-A⇨ä⑨A⓪$④Æ%ô②â④#⓪°}    ô⑥╱⇦E✓ê-A⇦⑨A    ②əA⇧(④/✓ô-ê⑨ê%@ò④=Æ%ô②A⇩U④A    ô④E    ê⑥⇦╱╱$⑥ס◆╱╱¢ע◆⑧⑧******************¢פ◆⑧⑧* COLOR BAR ⓪∙}MENU *¢צ◆⑧⑧******************¢ק◆╱╱¢9✓⑦⑦◆ü"@①A⇨⓪⑥:✓⑦⑦◆ü"@②A⇩U⑥;✓t    (⇧}④-@⇩②@    ④=(PRESS נסקחנ⓪·}מ FOR NTSC PATTERN④O-@⇩②@⓪④t( PRESS צדכדבק FOR RAINBOW PATTERN⑥=✓⑤①✓ê-â⑨A⇩④⑤    ê⑥>✓c②◆F:Ç,"@⇨⑧(⇧}④*-@✓⓪√}②@②④G(⑧ONE MOMENT PLEASE.......④U✓ê-â⑨A⇩④Y    ê④c
  96. A0❎⑥C✓əə◆F:Ç,"@❎A!0⑥H✓əə◆F:Ç,"@╱@⓪⑥M✓⓪ⁿ}
  97. A!⓪⑥R✓əə◆I:â, AüPA!@⑥W✓
  98. A    ⇧⑥\✓n    (⇧}④-@✓②@②④=(Sorry...You don't have enough④O-@✓②@③⓪²}④n(əmemory for this pattern...⑥a✓①✓ê-â⑨A⇩④⑤    ê④
  99. A!❎⑥ג    ╱╱¢ד    ⑨⑨*******************¢ה    ⑨⑨* NTSC COLOR BARS *¢ו    ⑨⑨⓪³}*******************¢ז    ╱╱¢©♪!+@⑨④⑦ AA❎④! A⓪❎⑥א♪ü⑤A◆⇦②A⇩②④'A◆❎②A⇩F④9A◆╱②@f④KA◆◆⓪¯}②@ÿ④]A◆✓②A⇧0④oA◆    ②A⇩②④üA◆⓪②@ÿ⑥ב♪╱╱¢ג♪⑦⑦*****************¢ד♪⑦⑦* DISPLAY SETUP *¢ה♪⑦⑦*****①}************¢ו♪╱╱¢ז♪3①✓ê-â⑨@⇨④/B❎2H%ê②@R%ê$@!④3    ê⑥ח♪'⑦✓ê-B❎2V⑨B❎2`④#ê②@⇧④'    ê⑥כ♪%①✓ê-â⑨@⇨①⇧}④%✓ô-@⇧⑨@⇨⑥ע♪=◆⇨ô④,@⑦%ê%ô$@❎②â④=/@⑦%ê%ô$@❎②@#⑥α♪◆    ô④♪    ê④⑨✓ê-â⑨A⇧④    ê⑥σ♪əə◆F:Ç,@╱①⇩}A0E⑥Ω♪!⑦✓ê-B❎2H⑨B❎2U④ê②â④!    ê⑥∩♪!⑤A❎Y②@4④!B❎2w②â⑥⌠♪
  100. @⓪⑥¼╱╱¢¡④④**************¢«④④* G①⇨}RAY SCALE *¢»④④**************¢ã╱╱¢Ñh    (⇧}④-@✓②@②④8(⑧ONE MOMENT PLEASE.......④F✓ê-â⑨A⇩④J    ê④T+@⑨④^ ①⇦}AA❎④h A⓪❎⑥¬+⑦✓ô-@⇧⑨@◆④'A◆⇨%ô②ô%ô④+    ô⑥»
  101. A0⑤⑥⇨⓪╱╱¢⇦⓪*********************¢❎⓪* BREAK KEY DI①❎}SABLE *¢╱⓪*********************¢◆⓪╱╱¢    ⓪D②6ô-F:@⑥,④◆ô!A⇧',6ô-ô&A⇧(④8@⑥②ô④DB❎7t②ô⑥⓪╱╱$⑥Ç⑥⑥⑨D:C①╱}OLORBAR.BAS⑥*********************¢◆⓪╱╱¢    ⓪D②6ô-F:@⑥,④◆ô!A⇧',6ô-ô&A⇧(④8@⑥②ô④DB❎7t②ô⑥⓪╱╱$⑥Ç⑥⑥⑨D:C⓪ ⇧î⇧ì⇧E⇨G&[&MAXגMAXצםDLIñEXñTDñINSñATñCMPñLASñIñB¿FñLSñDLILSTñPARM¿NXPפDNUלDTכSTסLAצלIJINצADצאNEוזחיPMØכPMøוBOקTEןSKסTתLמLצL⑤✓}אPמLחLכLבLזCSUלןגKõKØKøKœKŒKã⇧⇩Ç⇨Ç⇦Ç❎Ç╱Ç◆Ç✓Ç    Ç
  102. @♪⑤    }Ç ÇÇ@⓪①②③④⑤⑥⑦⑧⑨ə⑤
  103. } !"#$%&'()*⑤♪}+,-./0123456dW6Ç-A%④ü-@r④'6õ⑤ }-@⇧④36Ø-@⇩④?6ø-@⇨④K6œ-@⇦④W6Œ-@❎⑥n`◆+é④⑨A◆⓪②A⇧(④+A◆    ②@⑤④7@é②Ø④I-@⓪②@⓪⑤}④`(①Initializing...á⑤⑥x__④â;Ç,②ä;Ø,②à;ü,②å;@⇦,②ç;Ø,②ê;ø,②ë;Œ,②è;@ ,②ï9Ç,②î;@ ,②ì;@@,②Ä;A⇩P,⑥}⑤}⓪⓪④Å9A⇧,⑥é①⑦õ②œ②é②⇩K:④⑨6Ä.⇧B④6É-é⑥î    6æ-é④⑤6Æ-AP④#AP⑥ì③ A@④③6â.è⑥Ä③ A@④③6ä.è⑥Å③ A@⑤}④③6å.è⑥É③ A@④③6ç.è⑥æ③ A@④③6ê.è⑥Æ③ A@④③6ë.è⑥á♪♪6æ-æ%é⑥¬E    6ô-é④6ö-é④⑥6à.④!◆B:â,%üÇB(Fatal error ⑤⓪}- too many DLIs!④E&⑥œK♪6ô-ô%õ④⑦◆ô!@╱A(%Too many steps!!!  Re-do this DLI.²²²④K
  104. A⇧p⑥®        (⇧}⑥ז(((     áááááááááá⑤①}áááááááááááááááááá⑥פ(((     áגכחáלβδσ≥áΓ∙áו≥στáIJ∈Σσ≥≤∩∈á⑥ץ(((     ááááááIJמIJכנוáבנלסרקחמוáááááá⑥µ**("    ááááááááááááááá⑤②}ááááááááááááá⑥≡&&(♪DLI Number ⑤æ⑤◆, Step ⑤ô⑤⇩:⑥·$$(A. Change a memory location⑥⇦⇧$$(B. Add to a memory location⑤③}⑥⇧##(C. Increment a memory loc.⑥⑧⇧##(D. Decrement a memory loc.⑥"⇧%%(E. Wait for horizontal sync.⑥,⇧(6ò-@❎④⑨ ⑤④}A⑥P④(◆û"6õA⇧É⑥1⇧>    6ù-û④⑤◆ù"@❎à7B:à,%õ,.â7@✓<@⓪,④>
  105. A⓪⓪⑥6⇧①①◆ù!ØA◆@⑥@⇧-    ◆ù"Ø#(④}Deposit ⑤⑤}result in:⑤④-
  106. A⇨@⑥J⇧##(ə}Select letter to change:⑤⑥T⇧ A③⑥^⇧əə(②A. A screen color⑥h⇧(⑤B. The character set⑥⑤⑥}r⇧(⑤C. A player position⑥|⇧(⑦D. Some other location⑥å⇧G6ò-@⇦④⑨ A⑥P④#A⇨P④Gû⑦A⇦②A❎⓪②A❎ ②A⑤⑦}◆@⑥É⇧.$(}Select a color to change:⑤④. A③⑥Ü⇧(③A. Player/missle 0⑥ñ⇧(③B. Player/missle 1⑥«⇧(③C. Player/mi⑤⑧}ssle 2⑥Õ⇧(③D. Player/missle 3⑥א⇧③③(♪E. Color 1⑥כ⇧**("F. Color 2    (Gr. 0&8 luminance)⑥ש⇧++(#G. Color 3    (Gr. 0&8⑤⑨} background)⑥α⇧""(əH. Color 4 / Fifth player⑥Ω⇧''(I. Background (Gr. 0&8 border)⑥⌠⇧(6ò-@    ④⑨ A⑥P④(◆û"6õA⇦⑤ə}⑥∙⇧①6ÿ-B❎2e%û④
  107. A✓⓪⑥³⇧⑨6ÿ-B❎Bü④⑨
  108. A✓⓪⑥✓⇩'(④}Select Pm to move:⑤④' A③⑥②⇩④④( A. Player 0⑥⇩④④( B. Pl⑤}ayer 1⑥&⇩④④( C. Player 2⑥0⇩④④( D. Player 3⑥:⇩⑤⑤(E. Missile 0⑥D⇩⑤⑤(F. Missile 1⑥N⇩⑤⑤(G. Missile 2⑥X⇩⑤⑤(H. Miss⑤}ile 3⑥b⇩(6ò-@✓④⑨ A⑥P④(◆û"6õA❎ ⑥g⇩①6ÿ-B❎2G%û④
  109. A✓⓪⑥l⇩◆ÖA╱@⑥v⇩'╱(④(①Value of constant⑤④'
  110. A╱P⑤}⑥Ç⇩╱(④(Memory location⑤⑥è⇩3    6Ü-é④③A╱ ④⑦⇩è④◆è4⇧X) A&④3
  111. A╱ ⑥Å⇩④◆è4*Ö"@⇩ə6¢-ÿ④$⑥ö⇩⓪◆è7õ<õ,4⇧-⑤}⑨6è.è7Ø,④6Ü-õ⑥ß⇩<B⇦④)◆@:è,!@G*@:è, @X¢-A:è,④<
  112. A◆ ⑥¿⇩⑧⑧◆è7õ<õ,0⇧$A╱ ⑥Ø⇩B    6¢-é④④✓£-Ø⑨B:è,④(6¥-@⑤}:è7£,,&@H④4◆¥!@    B6¥-¥&@◆⑥¶⇩⑦③6¢-¢$@⑥%¥④⑦    £⑥ס⇩⑤◆◆Ü⑤6¢-A⇩V&¢⑥ר⇩①①◆¢ éA╱ ⑥ם⇩╱╱$⑥Σ⇩'    6Ö-õ④③ A╱ ⑤ }④⑨6ÿ-¢④'◆ù øA✓⓪⑥∈⇩⑦⑦◆ÿ B❎2HA✓⓪⑥°⇩0╱(④0(%Can't INC/DEC a Hardware register!²²²⑥⇩⇨/╱(④/($HINT: INC/DEC a memory⑤!} location, and⑥ ⇨++(#  then change the hardware register⑥⑥⇨**("  to the value stored in memory on⑥ ⇨"⑧(⓪  the next step.④"⑤"}
  113. A◆@⑥*⇨2◆ÿ!B❎sC((④Can't change ROM!²²²④2
  114. A⇧É⑥4⇨①①◆ù!ØA⓪⑥>⇨    ◆ù"Ø⑤(╱}Add:⑤④
  115. A✓P⑥H⇨⑤⑤( }Change to⑤#}:⑤⑥R⇨& A③④ (A. A constant④&6ò-Ø⑥\⇨8&(B. The value in another memory④8(    location⑥f⇨4♪◆ù"õ*ö.(C. The value ⑤$}of the last step④46ò-ø⑥p⇨ A⑥P④◆û"6õA✓0⑥u⇨     ◆û"ø⑥6ß-6A⓪④ 
  116. A⓪⑥z⇨①①◆û"ØA    0⑥ä⇨1◆ÿ!B❎2e*ÿ B❎2u⑤%}*ù"õ' A③⓪④1
  117. A     ⑥Ä⇨P    6Ö-é④③ A╱ ④#◆¢ é)¢!A⇩U&(④F(Value out of range (0-255).④P
  118. A    ⓪⑥ÿ⇨L 6ƒ-B:à,④ 6à7ƒ%õ,⑤&}.>:A⇧i,④46à7ƒ%@⇩,.>:¢,④B6ß-¢&A❎④L
  119. A    P⑥ó⇨86Ö-@⇧④⑨ A╱ ④6¥-¢④%6ß-¢④/ A⑥Ç④86¥-B:à,⑥¼⇨3⑦6à7¥%õ,.>⑤'}:A⇧s,④%6à7¥%Ø,.>:ƒ,④36à7¥%ø,.>:¢,⑥À⇨①①◆ùØA⓪⑥ij⇨2╱(④(①Add this to which④"6Ö-Ø④, A╱ ④26á-¢⑥ט⇨K╱(④ə(Clear carr⑤(}y?Y⑤④!)õ②¥④((>:¥,④4◆¥@xK6à7B:à,%õ,.>:@$,⑥ק⇨G╱(④(⓪אinary or BCג?B⑤④#)õ②¥④*(>:¥,④G6à7B:à,%õ,.ç7õ%+¥"@h,,⑤)}⑥∧⇨L    6¥-¢④③ A⑥Ç④6¥-B:à,④06à7¥%õ,.>:A⇧    ,④>6à7¥%Ø,.>:ƒ,④L6à7¥%ø,.>:¢,⑥Φ⇨,    6¥-ÿ④③ A⑥Ç④6¥-B:à,④,6à7¥%õ,.å7ù<ù,⑥ϕ⇨①⑤*}6à7¥%Ø,.>:ƒ,④6à7¥%ø,.>:¢,⑥≥⇨5 6¥-B:Ä,④ə6Ä7¥,.>:ù&õ,④'6Ä7¥%õ,.⇧B④5◆ù"ŒA⓪ ⑥⌠⇨" 6Å8É,-ÿ④④6É-É%õ④"◆ù!ØA⓪ ⑥÷⇨" 6Å8É,-ß⑤+}④④6É-É%õ④"◆ù"õA⓪ ⑥°⇨ 6Å8É,-ÿ④⑦6Å8É&Ø,-á④6É-É%õ⑥ⁿ⇨②(    }Select:⑤④ A③⑥╱⇦((( A. Add another step to this DLI⑥⓪⇦ə⑤,}ə(②B. Do another DLI⑥ə⇦  (⑧C. Save this DLI & Quit⑥$⇦əə(②D. Re-do this DLI⑥.⇦əə(②E. Re-do all DLIs⑥3⇦(⑤X. List DLI⑤-}s entered⑥8⇦.    6ò-Œ④⑤6ö-ö%+ù ø,④ A⑥P④.◆û"6õA⓪ ⑥=⇦①①◆û"õA⇧Ç⑥B⇦①①◆û"œA⇧p⑥L⇦     ◆û"Œ %⑥V⇦①6à7B:à,%õ,.ä④◆û"ø⑤.}A①P⑥`⇦8 6ƒ-B:â,④⑦6â7ƒ%õ,.ê④'6â7ƒ%Ø,.>:æ&õ,④86â7ƒ%œ,.>:B:à,,⑥j⇦6â7ƒ%Œ,.à⑥t⇦②6Ä7B:Ä,,.⇩AB④
  120. A⇧`⑥~⇦%    ◆æ"õâ7Ø,.â7⑤/}@✓,④%
  121. A①Ç⑥ê⇦①①6â7B:â,%õ,.ë⑥£⇦①6â7B:â,%õ,.à④ A ⑥ª⇦;╱(④#(⑦Filename to list DLI to⑤④-A①É④1⇩è④;A⑥@⑥ã⇦3⑤0}◆è7Ø<Ø,0⇧:*è7ø<ø,0⇧:!6î.è④*6è.⇩D:④36è7ø,.î⑥´⇦⑦⑦⇦è②B⇧②B⇧    Ö⑥ג⇦⑨✓①õ④⑨⑦õ②@    ②é②è⑥מ⇦##(õ⑤11000 DIM DLI$(⑤B:â⑤1},⑤⇧)⑥ן⇦M✓£-é⑨P:+B:â,&õ,'@@,④-6ƒ-£$@@%õ④;6¢-ƒ%@9④D◆¢!B:â,M6¢-B:â,⑥Γ⇦1(õ⑤B⇧⓪⓪%£%£⑤❎ DLI$⑤④!◆£(õ⑤⇧(⑤⑤2}ƒ⑤⇧)⑤⑥∮⇦-)(õ⑤⇧=⑤>:@4,⑤â7ƒ<¢,⑤>:@4,④-    £⑥÷⇦-⑦(õ⑤ 11095 RETURN④-(õ⑤♪11100 DATA ⑤æ⑤⑥❎#♪✓£-õ⑨æ④ə(õ⑤⇧,⑤ï8£,⑤④    ⑤3}£④#(õ⑥
  122. ❎O✓①õ④♪(④( NEW and then④?(╱ENTER ⑤>:@4,⑤è⑤>:@4,④L(✓ to use.④O⑤⑥④❎0⑤@à②@'④-(⇩(#⑤æ⑤❎ Stp ⑤ô⑤4}⑤⇩)④0$⑥❎$ə(①}Choose a color:⑤④$ A③⑥(❎⑥⑥(A. Black/White⑥2❎⑦⑦(B. Brown/Yellow⑥<❎①①(    C. Orange⑥F❎⑤⑤(D. Red/Oran⑤5}ge⑥P❎③③(♪E. Red/Pink⑥Z❎①①(    F. Purple⑥d❎⑥⑥(G. Purple-Blue⑥n❎(◆H. Blue⑥x❎(◆I. Blue⑥é❎⑤⑤(J. Light Blue⑥î❎④④( K. Tur⑤6}quoise⑥û❎⑤⑤(L. Green-Blue⑥á❎⓪⓪(✓M. Green⑥¬❎⑦⑦(N. Yellow-Green⑥œ❎⑦⑦(O. Orange-Green⑥®❎⑧⑧(⓪P. Brown/Yellow⑥ז❎(6ò-@⑥⑤7}④⑨ A⑥P④(◆û"6õA③⓪⑥ל❎⑤⑤6¢-@⑥$+û&õ,⑥פ❎&(③}Select Luminance:⑤④& A③⑥ץ❎⑥⑥(A. 0 Very dark⑥µ❎②②(
  123. B. 2    ⑤8} .⑥≡❎②②(
  124. C. 4     .⑥·❎②②(
  125. D. 6     .⑥⇦╱⑥⑥(E. 8 <average>⑥╱②②(
  126. F. 10    .⑥⑧╱②②(
  127. G. 12    .⑥"╱⑨⑨(①H. 14 Very light⑥,╱(⑤9}6ò-@✓④⑨ A⑥P④(◆û"6õA④É⑥6╱②6¢-¢%û%û&Ø④②$⑥h╱7╱(④-(✓Error - ⑤F:A⇧ò,⑤ . Try again.④7
  128. A①É⑥r╱⑤( Your cho⑤:}ice?⑤④B⇦⑥|╱DA╱ö②é④!A◆⇩②@d④()õ②¥④3◆¥"@:⇧X,:6û-6õ④D
  129. A&⑥ü╱#①6û-¥&@d④#◆û õ)û!òA⑥`⑥å╱
  130. (>⑤;}:¥,④$⑥É╱'④6¢-P:¥'A⇩V,④$6ƒ-¥&¢$A⇩V④'$⑥ס◆''(}Select type of Display List:⑥ר◆""(əA. Standard BASIC GRAPHICS⑥ם◆++(⑤<}#B. Custom (self-made) Display List⑥∞◆!    6ò-Ø④③ A⑥P④!◆û&õA ⑥β◆①①◆û"ØA!⑥Σ◆4╱(④⓪A  ④0(əWhich GRAPHICS mod⑤=}e (0-31)⑤④4⇩í⑥Θ◆P5◆+í é)í!@1,)í"@⑥)+í!@$*í @(,F( Bad Mode!²²²④P
  131. A  ⑥∮◆'#A"%í④⑦"ó②ú②ñ④'6Ñ-+ú ⑤>}A    Ö,⑥∈◆_◆◆Ñ
  132. (④2(#Enter 'T0' to put DLI change on top④\(%of text window,'T1' for next line,etc④_(⑥≤◆;╱(④.(#Enter first ⑤?}mode line to be changed④1(④;6ï8é,-6õ⑥°◆♪♪✓£-õ⑨æ⑥·◆③③(✓by DLI #⑤£⑤⑥²◆FA e④①⇩è④ə6û-A:è,④ ◆û!ó<(Lowest line = ⑤ó⑤⇦!²²⑤@}²④F
  133. A B⑥⇩✓⑦♪6û-û%œ④①◆û"Œ⑦6û-ø⑥⇦✓    ◆û"œ6û-Ø⑥╱✓①①6û-û%Ø$+û!ñ,⑥◆✓C◆ûï8£&õ,(&DLIs must be entered top to bottom!²²²④C⑤A}
  134. A B⑥ ✓③ 6ï8£,-û④⓪    £④③$⑥①✓%A à④%◆è7õ<õ,0⇧T)(ÑA à⑥⑥✓E6û-A:è7Ø,,④⑨◆û é)û!ø(Text lines range from 0-3!²²²④E⑤B}
  135. A B⑥✓◆◆û6û-û%Ø⑥ ✓⑦6û-û%ú&õ④⑦
  136. A U⑥%✓⑤(Bad input!²²²④
  137. A B⑥4✓<╱(④/($Enter byte of DLIST to put each DLI:④⑤C}2(④<6ï8é,-6õ⑥>✓⑧♪✓£-õ⑨æ④⑧(❎DLI #⑤£⑤⑥H✓①A! ④①⇩û⑥R✓ 6ï8£,-û④⓪    £④③(④B⇦⑥\✓╱╱$⑥ÿ✓⓪⓪⇧23,999,999¢Ö✓⇧19,25,999¢Ü✓⇧⑤D}9,15,999¢¢✓⇧19,25,999¢£✓⇧39,45,999¢¥✓⇧39,45,999¢ß✓⇧79,85,999¢ƒ✓⇧79,85,999¢á✓⓪⓪⇧159,167,94¢í✓⓪⓪⇧191,999,94¢ó✓⓪⓪⇧191,⑤E}999,94¢ú✓⓪⓪⇧191,999,94¢ñ✓⇧19,25,999¢Ñ✓⇧9,15,999¢ª✓⓪⓪⇧159,167,94¢º✓⓪⓪⇧159,167,94¢⌐✓⓪⓪⇧23,999,999¢¬✓⓪⓪⇧11,999,999¢½✓⓪⓪⇧23,9⑤F}99,999¢¼✓⓪⓪⇧47,999,999¢¡✓⓪⓪⇧47,999,999¢«✓⓪⓪⇧95,999,999¢»✓⓪⓪⇧95,999,999¢ã✓⓪⓪⇧191,999,94¢œ✓⓪⓪⇧23,999,999¢Œ✓⓪⓪⇧11,999,999¢À✓⓪⓪⇧1⑤G}91,999,94¢Ã✓⓪⓪⇧191,999,94¢ג    ⇧Change,2¢ן    ⓪⓪⇧Add PEEK,3¢∮    ①①⇧Increment,1¢
  138. ①①⇧Decrement,1¢④
  139. əə⇧Wait for next line,0¢
  140. ə♪6ª-ª%⑤H}õ④⑦◆ª @"ə$⑥ 
  141. &(╱[More]⑤④⑥)õ②ª④6ª-é④#(⇧£⑤④&$⑥(
  142. ,④( }Dli so far:④ə6º-é④ 6¿-é④&6ª-Ø④,6⌐-é⑥2
  143. 0♪6º-º%õ④(④(❎Dli #⑤º⑤⑤I}⇧:④&6ª-ª%õ④0 A%É⑥7
  144. +♪6¿-¿%õ④⑦6¬-@:Ä7¿,,④+◆¬"@eA&⓪⑥<
  145. 3◆¬"@f②(④)(①RTI; Press a key:⑤④0)õ②¬④3$⑥A
  146. ⑦#A%⑤J}%@ $¬④"ì②¬⑥F
  147. ⓪(⇧ ⑤ì⑤⇧ ⑤④◆(¬A&É⑥K
  148. , 6½-Å8⌐,④④6⌐-⌐%õ④ A'④,◆¬ ØA&É⑥P
  149. 9 (⇨to ⑤④⑤6½-Å8⌐,④6⌐-⌐%õ④#◆½⑤K}é/(❎PEEK ⑤½④9
  150. A&P⑥R
  151. &⓪◆½"6A⓪(╱above ⑤④&
  152. A&P⑥U
  153. ④④(½%A❎⑤⇧ ⑤⑥Z
  154. ①①◆¬ øA&É⑥_
  155. C╱(④⓪ A%É④((②  Pla⑤L}ce result in ⑤④16½-Å8⌐,④96⌐-⌐%õ④C A'⑥é
  156. ə╱(④⓪ A%É④ə
  157. A&⑤⑥î
  158. !#A' ④!◆½ B❎2HA'⑧⑥Ä
  159. ⑧♪"¼②¡②ì④⑧◆(¼A'⑧⑥⑤M}É
  160. ⑥⑥◆¼"½*¡"6õA'⑤⑥Æ
  161. ⑤⑤◆½ ¼)½!¡A'⇩⑥ö
  162. /♪6½-½&¼④④6¡-B:ì,④!6ì7¡%õ,.⇧ ④/6ì7¡%Ø,.=:½,⑥¢
  163.  (ì⑤⇧ ⑤④$⑥ß
  164.  (½⑤⇧ ⑤④$⑥á
  165.   ⇧⑤N}53248,53251,H. pos. Player¢Ñ
  166. !!⇧53252,53255,H. pos. Missile¢¬
  167. ⇧53266,53269,Color Player¢»
  168. əə⇧53270,53274,PF color¢œ
  169. ⇧5428⑤O}1,-1,Character set¢¨
  170. ♪♪⇧0,0,x¢á⓪    6«-é④⓪6è.⑥¬⑥◆"»④⑥◆»"6õA@0⑥»④④6è7B:è,%õ,.>:»,⑥œ⑤♪6«-«%»④⑤
  171. A@⓪⑥®,◆"»④◆»«%Æ)⑤P}(③Data error in line ⑤Æ④,&⑥ז♪6Æ-Æ%Œ④$⑥ê③++⇧72,173,0,1,238,0,1,141,10,212,-1,5848¢ì③④④⇧104,64,-1,5173¢Æ③⇧141,141,238,206⑤Q},-1,5736¢ù③⑤⑤⇧216,248,-1,5479¢£③⑧⑧⇧201,32,208,-1,5461¢í③⇧169,0,141,0,1,-1,5336¢⓪'A❎Y②é④⑨#B⇧①④"æ⑥ə'%%6ã-F:A❎`⑤R},%A⇩V$F:A❎a,⑥$'(♪✓£-õ⑨æ④"Ö④$ã%Ö②F:ã%Ö,%A⇧(④(    £⑥.'B⑦6Ö-P:C:â,'A⇩V,④*6û-C:â,&Ö$A⇩V④6A❎②②û④BA❎③⑤S}②Ö⑥8'6⑤B❎Bå②A⇧Æ④!A⇩V②é④3A❎Y②@4④6$⑥Ç④④⑨ D:DLIMAKER.2⑥A⇩V,④*6û-C:â,&Ö$A⇩V④6A❎②②û④BA❎③④M⓪⇧⑦⇧⑧⇧0⇧;①M①IJCHSEקן⇧⇩④$$6Ç-?:A⑤G<@⇦<@⓪<ü,⑥V+④A◆⓪②④1A◆R②@⑨U}⇧④CA❎Y②④P(>:A⇧%,④S(④V(⑥())(!  ①②②②②②②②②②②②②②②②②②②②②②②②②②②②②②❎⑥2))(!  |& & & & & & & & & & & & & & &|⑥⑨V}<))(!  | ①②②②②②②②②②②②②②②②②②②②②②②②②②❎ |⑥F))(!  |&|                         |&|⑥P))(!  | |                         | |⑥Z⑨W}))(!  |&|   A LITTLE ANIMATION    |&|⑥d))(!  | |                         | |⑥n))(!  |&|    CAN REALLY SPICE     |&|⑥x))⑨X}(!  | |                         | |⑥é))(!  |&|      UP A SCREEN!       |&|⑥î))(!  | |                         | |⑥û))(⑨Y}!  |&|                         |&|⑥á))(!  | ə②②②②②②②②②②②②②②②②②②②②②②②②②⇨ |⑥¬))(!  |& & & & & & & & & & & & & & &|⑥œ;)(! ⑨Z} ə②②②②②②②②②②②②②②②②②②②②②②②②②②②②②⇨④;A❎Y②@4⑥®-⑦✓é-@⇧⑨A⑤④    é④-A❎Y②⑥ז1$6Ç-?:A⑤G<@⇩<@⓪⑨[}<ü,④1(>:A⇧%,⑥פ--(%①②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②❎⑥ץ--(%|(((((((((((((((((((((((((((((((((((|⑥µ--(%|(①②②②②②⑨\}②②②②②②②②②②②②②②②②②②②②②②②②②②❎(|⑥≡--(%|(|'º'º'º'º'º'º'º'º'º'º'º'º'º'º'º'|(|⑥·--(%|(|º'º'º'º'º'º'º'º'º'º'º'º'º'º'º'º|(|⑥⇦⇧--(⑨]}%|(|'º①②②②②②②②②②②②②②②②②②②②②②②②②②❎º'|(|⑥⇧--(%|(|º'|'''''''''''''''''''''''''|'º|(|⑥⑧⇧--(%|(|'º|'                       '|º⑨^}'|(|⑥"⇧--(%|(|º'|' COMBINING ARTIFACTING '|'º|(|⑥,⇧--(%|(|'º|'WITH MULTIPLE CHARACTER'|º'|(|⑥6⇧--(%|(|º'|'    SETS CAN YIE⑨_}LD     '|'º|(|⑥@⇧--(%|(|'º|' SOME STRANGE EFFECTS  '|º'|(|⑥J⇧--(%|(|º'|'                       '|'º|(|⑥T⇧--(%|(|'º|'''''''⑨`}''''''''''''''''''|º'|(|⑥^⇧--(%|(|º'ə②②②②②②②②②②②②②②②②②②②②②②②②②⇨'º|(|⑥h⇧--(%|(|'º'º'º'º'º'º'º'º'º'º'º'º'º'º'º'|(|⑥r⇧--(%|(|⑨a}º'º'º'º'º'º'º'º'º'º'º'º'º'º'º'º|(|⑥|⇧--(%|(ə②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②⇨(|⑥å⇧--(%|(((((((((((((((((((((((((((((((((((|⑥⑨b}É⇧?-(%ə②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②⇨④?A❎Y②@4⑥Ü⇧⑦✓é-@⇧⑨A⑤④    é⑥ñ⇧v+@⇩④A❎Y②④1A⑨c}◆R②@⇧④CA◆⓪②A⇧f④UA◆①②A⇧╱④v6Ç-?:A⑤G<@⇦<@⓪<ü,⑥«⇧a⑤-@⇩②@⇩④2(@╱⑤$ $ $ $ ⑨d}$ $ $ $④D-@⇩②@⇦④a(@╱⑤z z z z z z z z⑥Õ⇧a⑤-@⇩②@╱④2(@╱⑤ן ן ן ן ן ן ן ן④D-@⇩②@✓④a(⑨e}@╱⑤± ± ± ± ± ± ± ±⑥א⇧>╱(④,(! SOME SIMPLE FOUR-FRAME ANIMATION④>A❎Y②@4⑥כ⇧⑦✓é-@⇧⑨A⑤④    é⑥ש⇧1+@⑦⑨f}④A❎Y②④1A◆R②@⇧⑥α⇧$$6Ç-?:A⑤G<@✓<@⇧<ü,⑥Ω⇧ü⑦✓é-⑨@╱④8(@╱⑤③#############⑨g}######④<    é④P✓é-@⑤⑨@"④\-②é④}(@╱⑤③###################④ü    é⑥⌠⇧[⑤-@⇦②@✓④.(@╱⑤♪זנתáIJאנרקáIJ⑨q}⇩ב⇩Œ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯B%⇦DOS     SYSB*)DUP     SYSBsSAIRHOCK ACTB◆הBACKUP  BASB:לCOLORBARBASBM◆⇧DLIMAKERBASB"T⇧DYNAMIC1BASB    ⇧DYNAMIC2LSTB
  172. ê⇧FRACTALSBASB_Æ⇧INCOMINGBASB$±⇧PSFCONV BASB╱⑤⇩PSFLOAD BAS④@-@⇨②@⓪④[(@╱⑤צחלרכIJקחנמáנה⑥³⇧D⑤-@⇩②@②④2(@╱⑤החמדáצבפנככחמו™④DA❎Y②@4⑥✓⇩7⑦✓é-@⇧⑨r}⑨A⑤④    é④-A❎Y②④7
  173. @ ⑥⑧y!!******* FONT 1 DATA *******¢"y##⇧3,0,126,102,102,102,102,126,0¢,y  ⇧4,56,56,⑨s}16,56,84,186,40,40¢6y⇧5,0,0,0,135,252,48,48,0¢@yəə⇧6,0,0,0,24,60,24,0,0¢Jy%%⇧7,84,170,254,170,170,254,170,84¢Ty''⇧8,170,170⑨t},170,170,170,170,170,170¢^y⇧49,0,0,90,184,60,36,36,0¢hy  ⇧56,36,36,60,52,44,60,36,36¢ry  ⇧58,0,126,66,90,90,66,126,0¢|y✓✓⇧-⑨u}1¢åy!!******* FONT 2 DATA *******¢Éy⇧3,63,51,51,51,51,63,0,0¢Üy  ⇧4,56,56,16,254,16,56,68,68¢ñy⇧5,0,0,0,135,252,0,0,0¢«y⑨v}⇧6,0,0,60,126,126,126,60,0¢Õy!!⇧7,42,85,127,85,85,127,85,42¢אy⇧8,85,85,85,85,85,85,85,85¢כy⇧49,0,0,219,60,60,36,66,0¢שy⑨w}  ⇧56,0,102,60,44,52,60,102,0¢αy((⇧58,255,129,189,165,165,189,129,255¢Ωy✓✓⇧-1¢⌠y!!******* FONT 3 DATA *******¢³y##⇧3,153,153⑨x},153,153,159,0,0,159¢✓z""⇧4,186,186,84,56,16,56,68,130¢②z⇧5,0,48,48,183,252,0,0,0¢z%%⇧6,60,126,255,255,255,255,126,60¢:z  ⑨y}⇧49,0,129,90,60,60,165,66,0¢Dz⇧56,0,0,255,52,44,255,0,0¢Nz  ⇧58,0,126,66,90,90,66,126,0¢Xz✓✓⇧-1¢bz!!******* FONT 4 DATA **⑨z}*****¢lz##⇧3,204,204,204,207,0,0,207,204¢vz  ⇧4,56,56,16,254,16,56,68,68¢Çz⇧5,0,0,0,135,252,0,0,0¢èz!!⇧6,0,60,126,126,126,1⑨{}26,60,0¢¿z##⇧49,129,129,90,60,189,165,66,0¢Øz  ⇧56,0,102,60,44,52,60,102,0¢¶z((⇧58,255,129,189,165,165,189,129,255¢הz✓✓⇧-1¢סz⑨|}!!******* FONT 5 DATA *******¢םz&&⇧3,102,102,231,0,0,231,102,102,-1¢Σz!!******* FONT 6 DATA *******¢∈z""⇧3,51,243,0,0,243,5⑨}}1,51,51,-1¢°z!!******* FONT 7 DATA *******¢⇩{&&⇧3,249,0,0,249,153,153,153,153,-1¢ {!!******* FONT 8 DATA *******¢⑥{&&⇧3,0,0⑨~},252,204,204,204,204,252,-1¢Ç②②⑨
  174. D:LISTING1⑥⑥04,252,-1¢Ç⑤,153,153,153,153,-1¢ {!!******* FONT 8 DATA *******¢⑥{&&⇧3,0,0⑧>10 NUMSETS=8:GOSUB 30000¢30000 FOR X=0 TO 85:READ A:POKE 1547+X,A:NEXT X¢30010 DATA 104,104,104,141,8,6,104,104,141,10,6,160,Ç}0,104,153,0,6,200,204,8,6,240,5,24,105¢30020 DATA 4,208,242,104,169,0,141,9,6,133,20,169,7,162,6,160,57,32,92,228,96,72,138,7ü}2,165¢30030 DATA 20,205,10,6,208,24,169,0,133,20,174,9,6,189,0,6,141,244,2,232,236,8,6,208,2¢30040 DATA 162,0,142,9,6,104,170é},104,76,98,228¢30050 REM * 86 BYTES¢30060 REM ******* LOAD CHAR SETS*******¢30070 POKE 106,PEEK(106)-NUMSETS*4-1:GRAPHICS 0:Câ}HSET=(PEEK(106)+1)*256:? "ONE MOMENT"¢30080 CHI=CHSET/256¢30090 DIM XFR$(28):RESTORE 30100:FOR N=1 TO 28:READ ML:XFR$(N,N)=CHä}R$(ML):NEXT N¢30100 DATA 104,169,0,133,205,168,169,224,133,206,177,205,145,203,200,208¢30110 DATA 249,230,204,230,206,165,206à},201,228,208,239,96¢30120 FOR X=0 TO NUMSETS-1:POKE 203,0:POKE 204,CHI+X*4:XFR=USR(ADR(XFR$)):NEXT X¢30130 RESTORE 30180:FOR å}X=0 TO NUMSETS-1¢30140 READ A:IF A=-1 THEN NEXT X:RETURN ¢30150 FOR Z=0 TO 7:READ J:POKE CHSET+(1024*X)+A*8+Z,J:NEXT Z¢30160 ç}GOTO 30140¢ETS-1¢30140 READ A:IF A=-1 THEN NEXT X:RETURN ¢30150 FOR Z=0 TO 7:READ J:POKE CHSET+(1024*X)+A*8+Z,J:NEXT Z¢30160 ♪⇧⑤⇧⑥⇧å⇧Æ❎ñ❎CןCךןלSבטךחTןTךLןLךקצA⇧`⇧@û⇩™4#ÆP⇧⇨A⇨ %⇦T⇦A⇨ ❎?x⑥ë#ä╱?Vu╱Æç◆@①✓@⇧◆ég    >ùDt!P
  175. @⇧⑨Öö@!ë}♪™@yÖ ™8å #%?CÆûsâ
  176. 6Ç-A⇧`④ü-@û⑥④⑨6é-?P⓪④⑨
  177. A⇧⑥PLOT X,Y¢(+⑦6â-ä$+é&?P,%Ç④!6à-ü&ä$å④+!è}@`⑥2        ,â②à⑥<╱╱$⑥d A⇩`⑥n1+@$④'0@⇩②②④1⇨@⇧⑥x%⑦✓ç-@⇧⑨@⓪④! A⇧@④%    ç⑥é!!ï} @@④⑦ A⇧`④!
  178. A⇧0⑥î⑤⑤FUNCTION OF X,Y¢û①①X,Y TIMES L¢á5    6ê-é④6ë-å④é-ê$è&ë$ï④'6å-ê$ï%ë$è④56é-@⇧&é⑥¬⑧⑧!î}SQUARE ROOT OF X,Y¢œK    6î-å④⑧6ì-M:é$é%å$å,④06å-M:O:+ì&é,'@⇩,,④86à-ì&é④D◆à K6å-6å⑥®6é-M:O:+ì%é,'@⇩,,④#6à-!ì}ì%é④/◆à é-6é⑥ז⑥◆î ⑥6é-6é⑥פ&⑧◆H:, ?P6é-6é④&6å-6å⑥ץ-①6é-@⇧&é④6é-é'@⇩④-6å-å'@⇩!Ä}⑥µ╱╱$⑥≡╱╱⑤⑥·⓪⓪GET VALUES¢⇦⇧4    (⇧}④ (②FABULOUS FRACTIONS④4(By Alex Leavens⑥⇧,)(!Exclusively for ANALOG Computing.④,!Å}(⑥"⇧((( Please input values for X and Y.⑥,⇧.+(#X and Y do not have to be integers.④.(⑥@⇧⑨(⓪Please enter X,Y⑤④⇩è②ï⑥J⇧6ì!É}-è$è%ï$ï⑥T⇧③③6è-@⇦$è'ì⑥^⇧④④6ï-6@⇦$ï'ì⑥h⇧"(⑤How big is the window⑤④"⇩ä⑥r⇧6ä-+Ç%Ç,'ä⑥|⇧Q&(O.K.!  Screen will go!æ} black...④9(Please wait...④M✓ç-@⇧⑨A❎④Q    ç⑥å⇧╱╱$⑥Ç②②⑨
  179. D:FRAC.BAS⑥④"⇩ä⑥r⇧6ä-+Ç%Ç,'ä⑥|⇧Q&(O.K.!  Screen will go M⇧1⇧2⇧ó⇧⇦/ə/DSיDATñHEX¿ןמLINדDATLIמDõDØBYTדPASצCHKSUלTOTAכINñÇ⇧@⇩⇨⇦❎╱◆%ô}✓    
  180. ♪ Ç
  181. ⑥⑥*** INCOMING ***¢④I@ ④1(MAKE CASSETTE (0), OR DISK (1)⑤④5⇩Ç%ö}④I◆Ç!@⇧@ ⑥CB⇦④C⇧0,1,2,3,4,5,6,7,8,9,0,0,0,0,0,0,0,10,11,12,13,14,15¢(r④ü;@æ,②é9@",④/✓â-%ò}⑨@"④3"ä④<6é8â,-ä④@    â④L6à-A    É④V#A⓪④`A⇧ ④r(CHECKING DATA⑥28①6à-à%@⓪④(❎LINE:⑤à④!"ü④8◆B:ü,@É%û}A⇩ ⑥<F%6å-F:A⇧â,%F:A⇧ä,$A⇩V④+◆åàC(❎LINE ⑤à⑤     MISSING!④F⑤⑥Fq✓â-@⇧⑨@ëə@⇩④56ç-@:ü7â<â,,&@%ù}H④[6ê-@:ü7â%@⇧<â%@⇧,,&@H④q6ë-é8ç,$@⑥%é8ê,⑥P.◆è"@⇩*@⇧②ë④     â④$"ï④.
  182. @P⑥Z%♪6î-î%ë④⑦◆%ÿ}î!A    Ö%6î-î&A⓪⑥d⑨◆    â④♪"ï④⑨◆î"ï@P⑥n
  183. A⇩ ⑥x  ◆F:A⇧ò,@╱A⇩ ⑥é⑦⑦◆è"A⇧p⑥î⓪⓪◆(Ç%Ö}A⇧`⑥ûâ⑥*@⇧②A⇩$④)*@⇧②@⇩④<*@⇧②A⇩%④O*@⇧②@⇩④b*@⇧②A⇧!④u*@⇧②@T④%Ü}Ç①@⇧④â⑤⑥á<⑦✓â-@⇧⑨@#④**@⇧②④.    â④9①@⇧④<⑤⑥¬⓪⓪◆(ÇA⇩⑥œg+("INSERT DISK WITH DOS, PRESS %¢}RETURN⑤④8④ì;@⇧,④<⇩ì④g⑦@⇧②@✓②②D:AUTORUN.SYS⑥®⑥*@⇧②A⇩U④)*@⇧②A⇩U④<*@⇧②%£}④O*@⇧②@D④b*@⇧②A⇧Æ④u*@⇧②@a④
  184. A⇩⓪⑥ז{((READY CASSETTE AND PRESS RETURN⑤④H⑦@⇧②@✓%¥}②A⇧(②⇩C:④R#A⇩0④f✓â-@⇧⑨@@④j"ä④w*@⇧②ä④{    â⑥פM╱(④⑦( WRITING FILE④#6è-@⇩④/6à-A    É④9#A⓪④%ß}CA⇧ ④M
  185. @P⑥ץ⑨(BAD DATA: LINE ⑤à④⑤⑥µ``⇧0,36,216,43,255,43,169,0,141,47,2,169,60,141,2,211,169,0,141,231,2,133,1%ƒ}4,169,56,141,232,2¢≡//⇧133,15,169,121,133,10,169,54,133,11,24,96¢Φ⇨dd⇧0000000000696E636F6D696E674141000000000000000000000048%á}634900111918150000000000000000627900,532¢≥⇨dd⇧00636F6E7261640074617467650000F3E5ECE5E3F400696E697469616C006C6576656C707265737%í}300F3F4E1F2,897¢ⁿ⇨dd⇧F400746F00626567696E00686967680073636F72651A0000000C00000000000000000067616D6500006F766572,733¢╱⇦dd⇧0000%ó}00000000696E636F6D696E670000000000000000004100707070C6D13C4D00600D0D0D0D0D0D0D0D0D0D0D,769¢⓪⇦dd⇧0D8D0D0D0D0D0D0D0D0D0D0D0D0D0%ú}D8D0D0D0D0D0D0D0D0D0D0D0D0D0D8D0D0D0D0D0D0D0D0D0D0D0D0D0D8D0D,866¢ə⇦cc⇧0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D%ñ}0D0D41A02CA9008580A9608581A200A5809D,81¢$⇦dd⇧FD40A5819D5341E8E056F010A5801869288580A581690085814C0B2D60A90048209C2D68A0279180%Ñ}8810FB60A2,118¢.⇦dd⇧55202B2DCA10FAA253A9FF202D2DE8A9FF202D2D60A206A9009D01D2CACA10F960A27FA9009D805D9D005E9D80,298¢8⇦cc⇧5E9D0%ª}05F9D805FCA10EE60BE5940209C2DB91D402918AA980AA8A906858C18BD173D9180C8BD373D9180986927,87¢B⇦dd⇧A8E8C68CD0EC60BDFD408580BD53418%º}58160A683209C2DA582484A4AA8682903AAB1806020A72D3DCA2D918060,680¢L⇦dd⇧030C30C0FCF3CF3F3FCFF3FC20A72D3DCA2D1DDA2D91806040100401%¿}C0300C0320A72D3DDE2D488A4903AA68CA,352¢V⇦dd⇧30054A4A4CEE2D6020E22DC9029043A8A5824A4A4AAAA58338E906DD6D40B02FC003D01BA9019D1D4%⌐}0A5974A4A,102¢`⇦dd⇧9D45409D3140A905205F33A90985C94C3E2E205530A5828584A5838585A90720AC2EA9006020CE2DA90160C6A0,595¢j⇦dd⇧F00160%¬}A5A185A0A20F868EBDAD3FF045BDBD3F8582BDCD3F858320B92DA68EBDDD3F1865879DDD3FBDBD3F6586,583¢t⇦dd⇧C9A0B02B9DBD3F8582BDED3F1865899%½}DED3FBDCD3F6588C955B0149DCD3F858320F72DA68E9DAD3FC68EA68E10,597¢~⇦cc⇧B060A9009DAD3FF0F2858CA68ABDAD3DF005200C2FA68AAD0AD2259E%¼}9D6D3FA5849DED3DA5859D2D3E20062F9D,26¢ê⇦dd⇧6D3E20062F9DAD3EA9009DED3E9D2D3F20062F259D9DAD3DE68AA58A293F858AAAC68CD0BBA90F85A9%¡}A903859E,132¢Æ⇦dd⇧A907859CA93F859D60AD0AD2059C60BDED3D8582BD2D3E858320B92D60C69AF00160A59B859AA23F8696BDAD3D,761¢£⇦dd⇧F023200%«}C2FA696DEAD3DF019BD6D3E187DED3E9DED3EBD6D3F2901D00BBDED3DE9004C572F4C912FBDED3D6900,840¢ª⇦dd⇧C9A0B03F9DED3D8582BDAD3E187D2D3F%»}9D2D3FBD6D3F2902D008BD2D3EE9004C7E2FBD2D3E6900C955B0189D2D,591¢ã⇦dd⇧3E858320F72DD005A6969DAD3DC696A696300A4C272FA9009DAD3DF0F%ã}06099165E99245E99325E99405E609996,740¢´⇦dd⇧5E99A45E99B25E99C05E6099165F99245F99325F99405F6099965F99A45F99B25F99C05F60A599C599%õ}F0FC60A2,655¢ג⇦cc⇧08A90095C4CA10FB60868D8A0AA8BD5940AA209C2DA9009180C8918088A68DFE5940BD5940DD6D409045BD1D40,74¢מ⇦dd⇧2908D01D%Ø}205530BD6D40DD8140F038BD6D401869059D6D409D59402055304C5230BD6D404838E9059D6D40A918,355¢ן⇦dd⇧9D1D40203A34A68D68DD8140D007C94DF%ø}003200E34A48D20732DA68D60868FA9109D1D408AA820732DA68FA900,994¢Γ⇦dd⇧9D1D408A0A0A0A1869038584BD59401869038585A90A20AC2EA906205F%œ}33A90C85C4A68F60A90085A885AAA213,200¢∮⇦dd⇧BD1D402901F038E6A8BD1D402908D009BD5940C5AA900285AADE3140D021BD45409D3140BD5940C591D%Œ}011A909,179¢÷⇦dd⇧9D1D40A5979D45409D3140A90585CA20E72FCA10BEA5AA85C660A90085A4A5B6C902D004A207D006A5924A0901,300¢❎dd⇧AA869020%À}C631A690BDA140DD9740D028A5B5F02420BD31B01FA5B6F073C902F017BDBF4038E930C990B00DA592,328¢
  186. ❎cc⇧4A4AAABDDD40F006CA10F84CAF31A490B%Ã}9A53DD96D40B0F348204432681869149DED40A9009DF1409DF54095BC,27¢④❎dd⇧AD0AD229031869029DE9409DE540A490B9BF401869049DE14038EDC7402%Õ}907F009A9002A4901A8B9583D9DF940,936¢❎dd⇧FEDD40A90585CBD033BDBF4038E9284A4A4AAAE014B025BD1D402901D01EA490B9A53DDD6D40B0149D59%¨}40A597,363¢(❎dd⇧4A9D45409D3140A9019D1D4020E72FC6903005A6904CEF30A5A485A560AD0AD20D0AD2C59560BDC940F053E6A4,757¢2❎dd⇧DE9740D02%´}1BDA1409D97408A2901A8B9583D187DBF409DBF40D00BA5B6C902F055A9009DC940A5B6C902F04ABD,457¢<❎dd⇧D3401045BDBF4038E9288584BDA53D8585%†}A9009DBF409DC940A91920AC2EA906205F3360A5B5F021A599290FD0,633¢F❎dd⇧1B20BD31B016AD0AD2290F18658B9D97409DA1404A4A9DD340FEC94060B%¶}DED40A888205F32205F32205F32205F,242¢P❎dd⇧32205F32205F32205F3260B9805D3DC62D99805DC860B9805D1DC22D99805D60C6B1F00160A5B085B185%©}B1A900,285¢Z❎dd⇧85AAA20386B2BDDD40D0034C3A33B5BC290EF030BDE14038E92D4A4A4AAAE014B014BD6D40DD8140F00F186905,456¢d❎dd⇧9D6D409D5%®}9402055304C28338AA820B533A91985CBD063B5BC2901D043FEF140BDF140187DF5409DF540901AFE,922¢n❎dd⇧ED40BDED40A8C5AA900285AA205F32BDED%™}40186904A8206A32DEE540D041BDE9409DE540BDF940187DE140C930,766¢x❎dd⇧9004C9CA9029BDE14038E92D8584BDED4038E9148585A91420AC2EA9052%ij}05F33A900A6B29DE1409D04D09DDD40,205¢é❎dd⇧95BC9DE140C6B23005A6B24C8732A5AA85C660A5C105C0F02CF8A5C138E90185C1A5C0E90085C04C6B33%IJ}F81865,367¢î❎dd⇧C185C1A5C0690085C0A001A204B9C000209333CA8810F6D860E692A592290F85920A0A0A0A85BB8DC802A492B9,739¢û❎dd⇧A533A2134%א}8290F209E33684A4A4A4A09509DD13CCA600102030405060708091011121314151698203334F02DB9,653¢á❎dd⇧8140CDAB3D902548AA209C2D6838E90699%ב}8140996D40AA980AA8A20518BDE9339180C89180986927A8CA10F160,939¢¬❎dd⇧C3C3FFC3C3FFA205AD0AD2291FC914B0F7A8B96D40C94DD0EF8E093420B%ג}533A200CA10E460A90685AD85C560A2,996¢œ❎dd⇧13A000BD8140C94DF008C8DD6D40F0028888CA10EE881004A90185B760C909F002C90A608A203334D0F9%ד}86B786,325¢®❎cc⇧93A90085B58DC740A901859EA907859CA9FF859DA94F8584A9508585A9204CAC2EA90285B68593A90085B520DD,24¢ז❎dd⇧2F20502DA2%ה}7F9D805DCA10FA8DC740A904859BA91385B9A6B9BD6D40C94DF01618690385858A0A0A0A69038584,926¢פ❎dd⇧A901859EA90320AC2EC6B910DD302A204B3%ו}4A9808599D028AD0AD2297F18691085828584AD0AD2293F85838585,770¢ץ❎dd⇧20E22DC902B0E4A91020AC2EAD0AD20901859920D62FAD1FD0C907D01620%ז}1A2FA59910EFAD0AD20D0AD24AB0BE,691¢µ❎dd⇧4AB0894AB0AFA90A859B204B34204B34204038A97885AB8D7736A5C0C5C2901CA5C1C5C3901685C3A5C08%ח}5C2A2,357¢≡❎cc⇧05BDD13C9D712CCA10F7A9648D77364C0437A90085B5A90120FD39A5922901208A38A5B60A0A0AA8A207B9FF35,98¢·❎dd⇧9D962CC8CA1%ט}0F6A98C8D7736200F3620DD2F20502DA980859920D62FA599F00B0A0A0A490FF0F285C6D0EE85C6,447¢⇦╱dd⇧200F36A692BD7B3D8595BD6B3D858BBD5B3D%י}859B859A8A4AAABD8B3D8597BD933D85B085B18A4AAABD9F3D8591,200¢╱cc⇧8A4AAABDA33D85A185A0A900A2139D1D40CA10FAA2039DDD409DE140CA10F%כ}7A20F9DAD3FCA10FAA23F9DAD3DCA,24¢⑧╱dd⇧10FAA2079DC9409DBF409DD340CA10F4A2078A18690605BB49F09DB540CA10F2A900858A859360737265707%ל}06F,477¢"╱dd⇧686373656C747475687320D62FA5A2490685A2AAA005BD6D3699E42CE88810F6A5A2F01AA207AD0AD2297F1869,760¢,╱dd⇧379DBF40AD0A%מ}D2290F090A9DB540CA10E860ADE52CC5AB900A200E34A9008DE52CF017A21320D62FEEE52C8A29,719¢6╱dd⇧010A0A0A8D01D28E00D2CA10EB600D0D0D0D0%נ}D0D6A004D2C0046A9008D2F028D08D2A24C9580CA10FB2065E420,473¢@╱dd⇧012D203A2D205C2D206B3320FB39208C33201A3A20F92EA95085ABA905859F%ס}A9018593A9698D0002A9398D0102,275¢J╱cc⇧A9A08D3002A92C8D3102A95C8D07D4A9038D1DD0A9118D6F02A23AA035A906205CE4A205BD113D9D615ECA1%ע}0F7,18¢T╱dd⇧A9C08D0ED4A9008DC402A9CE8DC502A9428DC602A92E8D2F02A9008D7736A90085B785B885B520502D20DD2FA9,175¢^╱dd⇧348DC702A207A%פ}D0AD2290F09039DC9409D97409DA140CA10EDA902208A38200F36A207BD54399D975DCA10F7A9,862¢h╱dd⇧008599AD0AD2297F18693AA203189DE1406902%צ}CA10F88D1ED020D62FAD1FD02902D017A93C8DE52CA900859920,592¢r╱dd⇧7B33A91085C8AD1FD02902F0F9AD1FD029012D8402F00FA599297FD0CF20443%ק}64C59374C0437A90085C085C120,378¢|╱dd⇧6B33200F36AD1FD04A90FA203A2DA97D8DC740A9068594A900A2079D975DCA10FAA92E8DC702A213A94D9D6D%ר}40,327¢å╱dd⇧9D8140CA10F7A947A2019D76409D8A40CA10F720EF33203635A90185B5AD1FD0C907F008A93C8D77364C043720,231¢É╱dd⇧D93020472E201%ש}A2FA5B6D009208A30205D384C1338207432A5B8F0034C6434A5B5D0CDA2031DDD40CA10FA05A8,761¢Ü╱cc⇧05A4D0BFA90A859B85A18593204038201534A5%ת}B7D006207B334CDD374C643420472E201A2FA900A20F1DAD3FCA,42¢ñ╱dd⇧10FAA23F1DAD3DCA10FAC900D0E460C6AFD028A91785AFA5AE186901290385AE%ן}AAA000BD4C3920A22FBD503920,189¢«╱dd⇧AF2FBD443920BC2FBD483920C92F6085B6A8BEB138A000BDCC3820A22FBDD83820AF2FBDB43820BC2FBDC0382%ך}0,318¢Õ╱dd⇧C92FE8C8C00C90E260003060070000C0FF3F070100000001FF2078E4E2E2E2E2FC7811FEFF041E27474747473F,195¢א╱dd⇧1E887FE0000003%ם}FFFCE08000000080E0F0F0F8FC7E7FFFFFFFFC7B000000000000F8E4FEFF1FEC000000000000,551¢כ╱dd⇧1F277FFFF837070F0F1F3F7EFEFFFFFF3FDE000%ף}00000000C1F1F0F3FFE0000003078FDFFFFFEFFFFEC0000000C,216¢ש╱dd⇧1E5FFFFF7FFFFF3700000000000030F8F8F0FC7F0004060301711C06C38EC360%ץ}382080C0603C7EFFFFFFFF7E3C,391¢α╱dd⇧A203BD00D015BC95BCCA10F660488A489848D8A698A000B904D01905D02901F00EDED140BD9F4085CC38E9029%§}D,882¢Ω╱dd⇧9F40E8C8C8C00490E1205C39A59818690205BB8D0AD48D1AD08D1ED0A698A000BDB5409912D09913D0BDBF4099,508¢⌠╱dd⇧00D0186908C899%∧}00D0E8C8C00490E48698E006A5B32A290385B3490385B4A203A5B30A0A05B385B3CA10F58D0A,700¢³╱dd⇧D48D0CD0A20318BDE14065B49D04D0CA10F568A%∞}868AA6840A90048A205A900202E3ACA202E3A202E3ACA68202E,338¢✓◆cc⇧3A60ADDB3C495A8DDB3CADDE3C494E8DDE3C60DEDA3CBDDA3C290FC90A600950%α}9DDA3CCA60D8A900859885B3E6,16¢②◆cc⇧99A5B5F03DC694D039A9068594A20520233A902EA909202E3A20123ACA20233A9020A909202E3A20233A9016A9%β},64¢◆dd⇧05202E3ACA20233A900BA90085B520FB39A93085C8A5992903D044AD78024A4A4903AABD573D1865A3C90BB032,450¢&◆dd⇧85A3AA0A0A0A0A09%Γ}088DBD40BDA53C8587BDB03C8586BDBB3C8589BDC63C85888A0A0AA8A203B9E53C9D5D5EC8,672¢0◆cc⇧CA10F63053C69FD04FA905859FA593F00CA5B6C90%π}2D04120D9304C1C3BAD8402D036854DA20FBDAD3FF008CA10,71¢:◆dd⇧F88EBD403025ADC74049018DC74038E92C9DBD3FA94D9DCD3FA9009DDD3F9DED3FF%Σ}EAD3FA91085C7204833A203,520¢D◆dd⇧A5B81D08D0CA10FA290185B8205C398D1ED0A5992903F013A5C7F009C6C7A5C78D00D209208D01D24C623BA5A9,8%σ}07¢N◆dd⇧F0F68DC40209408D01D2AD0AD2291F1869288D00D2C6A9A5C5F039A5992901D03FA5AC09A08D03D2C6AC1034C6,195¢X◆dd⇧AD100AA90085C585A%µ}C85ADF01AA6ADBD993B8D02D2A205C93CD002A20A86ACD0123C483C485B79A5C6F0058D02,432¢b◆dd⇧D2A9A88D03D2A5B638E902F043A5CCF00E8D04D2A9%τ}A88D05D2A90085CCF034A5A5F02DA5B6F014A5A54809C08D,713¢l◆dd⇧05D2680A0A0A1869788D04D2D018E6A7A5A7290F85A7AABD853C8D04D2A5A5187D9%Φ}53C8D05D2A9008D07D2A5CA,828¢v◆cc⇧F00FAABD7E3C8D06D2BD783C8D07D2C6CAA5C9F00C8D06D2AABD6E3C8D07D2C6C9A5C4F00FAABD643C8D06D2BD,5%Θ}4¢Ç◆dd⇧5A3C8D07D2C6C4A5CBF00D0A0A0A8D06D2A9A68D07D2C6CBA5C8F010A9508D06D2C6C8A5C8290F09A08D07D24C,707¢è◆dd⇧5FE4A3A4A5A7A9A8A7%Ω}A6A8AA0406090B0F0C110D130E0C0A08060504030202014547494B4D4F0A0E12161A1E0A,444¢ö◆dd⇧0B0C0D0E0D0C0B0A090807060708090302010003020%δ}10002010002020001001F234C80BE004280B4DDE1FFFFFF,659¢ß◆dd⇧FFFF000000000000BE804C231F001F234C80BEFFFFFFFFFFFFFFFFFFFFFF00004C00%∮}005000000000005A00004E,218¢¿◆dd⇧0000000000F8F8000078F040003870600038707020383870703838383838381C1C381C1C08381C0C003C1E0400,75%ϕ}2¢Ø◆dd⇧3E3E0000387C7CFEFEFE0000022A022800000F3F302A0228000000000000000000000000220A02280000000080,452¢¶◆dd⇧A880280000F0FC0CA8%∈}802800000000000000000000000088A08028000000FF0100465A41505050504650505A50,293¢ה◆cc⇧28461E32461E411E322D28231E1915120E0B08050A1%∩}41E1E282832323C3C4646505A646EFFC0B0A09070503023,92¢ס◆dd⇧1E19140F0A0503BF3F1F1414222C36120B08081616242432320000000000000000000%≡}000000000000000000000,918¢ם◆②②* 4545 BYTES¢Ç⑥⑥⑨D:INCOMING.BAS⑥0503BF3F1F1414222C36120B08081616242432320000000000000000000$B⇧W⇧X⇧P⇩/②=②קIJSECTOפADDRESצDIRñHחLנןחST¿SבBUFFEפבלצהRAלDכADגNUMBEפIOCאADRHחADRLנNUMHחNUMLנסNצAñFñטםA⑤A⇧@û⇩)≥}⇨ü⇦⌠⇩⇩❎╱◆✓A    ⌠⇩①⇧
  187. ♪ ⓪①②)≤}③④⑤⑥⑦⑧⑨əü④ü④αα
  188.   PRINT SHOP IMAGE CON)⌠}VERTER¢④  (PICTURE LOADER/CONVERTER)¢④④BY MIKE MCCUEN¢(╱╱¢2(C) 1985 ANALOG COMPUTING¢<╱╱¢d A④④⑦ A⑤④)⌡}INIT¢iə A③④əTITLE/MENU¢n⑧ A@④⑧KEYPRESS¢s A②④SET UP OPTIONS¢x A ④READ DIRECTORY¢} A0)÷}④PRINT DIRECTORY¢é! A①④!GET SCREEN NUMBER¢ç A⓪④INSTRUCTIONS¢î AA④LOAD SCREEN¢æ! AB④!)≈}WAIT START/OPTION¢û AD④CHECK FILENAME¢¢ AP④SAVE SCREEN¢á ╱②④    '④ %⑥Ñ╱╱¢¬╱╱¢»╱╱¢Φ⇨INSTRUCTIONS F)°}OR LOAD¢ϕ⇨③◆+ß④③A◆⓪②ß⑥≥⇨⑧⑤(INSTRUCTIONS:④⑧(⑥≈⇨**("After the picture loads, the back-⑥ⁿ⇨**("ground will turn red.  Th)∙}is is the⑥⇧⇦**("prompt for you to insert a DOS 2.0⑥╱⇦,,($disk in the drive and press START to⑥♪⇦++(#save the screen.  The )·}filename will⑥⓪⇦**("be the same as the one used on the⑥⑤⇦⑧⑧(⓪Print Shop disk.⑥ə⇦.╱(④.(#If the screen is the wrong one, you)√}⑥⇦**("can abort the save by pressing the⑥$⇦--(%OPTION key when the screen turns red.⑥)⇦0╱(④&(PRESS RETURN TO CONTINUE...)ⁿ}④0 A@⑥.⇦╱╱$⑥L⇦əəGET SCREEN # TO LOAD¢Q⇦?%(④;(⓪SCREEN # TO LOAD⑤④?⇩Ö⑥V⇦#    ◆Ö!Ü⓪(⇩²²④⑨()²}⇨⑤④#
  189. A①❎⑥[⇦②◆Ö②%⑥`⇦ə 6Ä-ë8Ö,④ə6Å-Ä%@`⑥e⇦╱╱$⑥ã⇦33CLEAR SCREEN TO DISPLAY               OPTIONS¢Œ⇦G◆+ß④③)³}A◆⓪②ß④-(⑤DIRECTORY OF SCREENS:④G(⑤⑥´⇦╱╱$⑥④❎SET UP TITLE PAGE/MENU¢⑨❎%◆+ß④③A◆⓪②ß④%@é)¯}②@⇧⑥❎*╱(④*(     PRINT SHOP IMAGE CONVERTER⑥#❎(⑥              VER. 1.0⑥(❎!!(⑨           BY MIKE MCCUEN⑥-❎''(    *} (C) 1985  ANALOG COMPUTING⑥2❎3╱(④3('①②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②❎⑤⑥7❎00('|חמצדפקáךנרפáספחמקáצזנסáגIJקIJáגחציáIJמגá|*⇧}⑤⑥<❎00('|ספדצצáקזדáפדקרפמáידך«««áááááááááááááá|⑤⑥A❎00('ə②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②②⇨⑤⑥F❎╱╱$⑥x❎əəINITIALIZE VARIA*⇩}BLES¢é❎Y1④¢;@ ,②£;A⇩$,②ä;A❎②,②ë9@⑥,④96ä.⇧④J6ä7A❎②,.⇧④Y6ä7@⇩,.ä⑥ç❎+♪6£.⇧ ④6£7A⇩$,.⇧ ④+6£*⇨}7@⇩,.£⑥î❎╱╱$⑥ץ❎əəSET UP DISK I/O CALL¢β❎%⑦✓Ç-A⑤6⑨A⑤@④"ü④!Ç②ü④%    Ç⑥µ❎⑥⑥⇧104,32,83,228,96¢δ❎╱╱$⑥ס◆⑧⑧READ THE DI*⇦}RECTORY¢ר◆;⑤A◆p②@é④'A◆i②@⇧④;✓é-A⇨b⑨A⇨e⑥ם◆HəA◆y②P:é'A⇩V,④HA◆x②P:+é'A⇩V&P:é'A⇩V*❎},,$A⇩V,⑥∞◆  6â-C:ä,%+é&A⇨b,$A⇧(⑥Σ◆$④6à-P:â'A⇩V,④$6å-â&à$A⇩V⑥∈◆A◆r②å④A◆s②à⑥°◆⑥②6ç-?:A⑤6*╱},④⑥    é⑥²◆╱╱$⑥Õ♪""PRINT DIRECTORY, STORE NAMES¢©♪"    6ê-ß④"✓Ç-@⇧⑨B:ä,ə@2⑥א♪))◆ä7Ç%@⑧<Ç%@⑨,0⇩PAA0@⑥ו♪`;*◆}(ê%@⇧⑤⇧)⑤ä7Ç<Ç%@⑤,⑤╱START:⑤@:ä7Ç%@⑥,,④I6ê-ê%@⇧④`6ë8ê,-@:ä7Ç%@⑥,,⑥כ♪h 6¢.⇩D:④(6¢7@⇨,.ä7Ç<Ç%@*✓}⑤,④9✓¥-@⇧⑨B:¢,④E◆@:¢7¥,,"ß^6¢.¢7@⇧<¥&@⇧,④h
  190. A00⑥ע♪◆◆    ¥⑥ש♪&&6£7ê$@④&@③<ê$@④,.¢⑥α♪◆    Ç④6*    }Ü-ê⑥σ♪╱╱$⑥á⑨⑨WAIT FOR RETURN KEY¢¬I⑦@⇧②@⇦②ß②⇩K:④*)@⇧②ü④5①@⇧④I◆üA⇧UA@⓪⑥»╱╱$⑥⇦⓪##SET UP*
  191. } RESIDENT DISK HANDLER,¢⓪""READ SECTORS AND LOAD SCREEN¢⑧⓪1+@$④A◆⓪②@④④1A◆    ②⑥⓪A◆d②ß⑥"⓪%*♪}%6è-F:@ê,%A⇩V$F:@ë,⑥,⓪    6ï-è④6î-ß⑥6⓪'⑤A◆p②@é④'A◆i②@⇧⑥;⓪♪♪✓é-Ä⑨Å⑥<⓪⑧◆F:A◆d,"@(%* }⑥@⓪HəA◆y②P:é'A⇩V,④HA◆x②P:+é'A⇩V&P:é'A⇩V,,$A⇩V,⑥E⓪♪♪6â-ï%î⑥J⓪$④6à-P:â'A⇩V,④$6å-â&à$A⇩V⑥O⓪*}A◆r②å④A◆s②à⑥T⓪J②6ç-?:A⑤6,④ 6î-î%A⇧&④$    é④80@⇩②@⇦②ß④JA◆    ②@④⑥Y⓪╱╱$⑥h⓪WAIT FOR START OR *}OPTION¢r⓪⑧◆F:B❎2y,"@╱$⑥w⓪!⑧◆F:B❎2y,"@⇨'④②④!%⑥|⓪
  192. AB⓪⑥כ⓪④④ERROR DETECTED¢ש⓪?◆+ß④③A◆⓪②ß④*(◆ER*}ROR #⑤F:A⇧ò,④-(④?(Restarting...⑥α⓪①✓Ç-ß⑨A❎④⑤    Ç④⑧②④'④%⑥0①  CHECK FOR A VALID FILENAME¢5①&&6£.£7Ö$@④&@③*⓪}<Ö$@④,⑥:①)④✓Ç-@⇧⑨B:£,④)◆£7Ç<Ç,4⇧ AD ⑥?①
  193. ◆    Ç④
  194. $⑥D①6£.£7@⇧<Ç&@⇧,④$⑥ê③* SAVE SCREEN TO FILENAME*①}¢ë③* SELECTED AT BEGINNING¢ì③əə⑦@⇧②@✓②ß②£⑥Æ③Rə6É-F:A⇧╱,$A⇩V④<6æ-F:@ê,%A⇩V$F:@ë,④B6Æ-æ④R6ô*②}-É&æ%@⇧⑥ù③<⑦6ö-A✓2%@⑥④+ö%@⇩②@①④<6ò-P:Æ'A⇩V,⑥£③P③6û-Æ&ò$A⇩V④!ö%@⇦②û④/ö%@❎②ò④@6ù-P*③}:ô'A⇩V,④P6ÿ-ô&A⇩V$ù⑥í③①ö%@✓②ÿ④ö%@    ②ù⑥ª③b6ê-?:C:◆hhh¬LVΣ,<@⑥,④*①@⇧④b3 LOWER-CASE H, INVERS*④}E *, L, V, INVERSE LOWER-CASE D¢ã③╱╱$⑥Ç⑨╱D:PIC2⑥②ù⑥ª③b6ê-?:C:◆hhh¬LVΣ,<@⑥,④*①@⇧④b3 LOWER-CASE H, INVERS(4⇧'⇧(⇧x⇧k⇨⇨RAלDכADגNUMBEפIOCאADRHחADRLנNUMHחNUMLנח⇧⇩⇨⇦❎╱◆✓.⑥}    ê③⑨⑨* LOAD A GRAPHICS 8¢è③⑧⑧* SCREEN USING CIO¢ì③]+@$④A◆⓪②④1A◆    ②④]⑦@⇧②@⇦.⑦}②②D:FILENAME.EXT⑥Æ③Rə6Ç-F:A⇧╱,$A⇩V④<6ü-F:@ê,%A⇩V$F:@ë,④B6é-ü④R6â-Ç&ü%@⇧⑥ù③<⑦6ä-A✓2%@.⑧}⑥④+ä%@⇩②@◆④<6à-P:é'A⇩V,⑥£③P③6å-é&à$A⇩V④!ä%@⇦②å④/ä%@❎②à④@6ç-P:â'A⇩V,④P6ê-â&A⇩V$ç⑥í③.⑨}①ä%@✓②ê④ä%@    ②ç⑥ª③b6ë-?:C:◆hhh¬LVΣ,<@⑥,④*①@⇧④b3 LOWER-CASE H, INVERSE *, L, V, INVERSE LOWER-CASE .ə}D¢ã③╱╱$⑥Ç④④⑨ D:LOADER.BAS⑥⑥ª③b6ë-?:C:◆hhh¬LVΣ,<@⑥,④*①@⇧④b3 LOWER-CASE H, INVERSE *, L, V, INVERSE LOWER-CASE ,