@L `{j5  $% l0?$)$$Hȱ$ hL `H 0} h?> `  !I PR@1 L I`! S S) H$Ѝ$%`@ LGe$$%` % L$ LY0- HH ?@ 0 h Ę 0: < =;Ң79x 608:23 44 234, 8 4 ,P  ҥ V X0ɀ7Ф`# 21 4 2 L1 } ) 000 X 0 1 2 4 16` Z < A CE0l& 'L\䩏,,09$80}6L|Le1i1`00) ߍ ҍ ) `H) 000 h `ҍ ҩ(ҩҩ`: 0}8` k");1k0 -G$Ș L0 H y8(()(0˥)Nk`$GȘL )L  }L-GzȘ LL )W>\  MHH)H h  yhy||hy}} }{ V ILp> L  ` J u (`H % 6h @H?H`LdJ })LJJLw!,"!,{@F  LA ! 0E^  }^ E E7EȩEdE/EȩE { ! Vj )Lw    n wy }?7? ( ) w y~ R V LwL n w ) V  Lw y {    }E` , ny{) { V Lwy{) 0BML ML  N L }NLML [ fEqEHȱEqEhi 3Gȹ G KLiL-GziɛiL  L}FREE SECTORSy {H) *Gȩ GȽG GȌiyh%*J >G L[ !NHP } ~h  Ȍ  S IJ0L  L , ` uBj i" ~ }BLV J u0ҩ Ԑ 8Hhi i VL,0 LD1:AUTORUN.SYSH  <h`H} @I`N@{ HH`  n L Z `9LS2 D,f2)? @3 )D*D* CD( C2}2C ԠX`H h`ʆ X , 0 00  5 9@  5YD1:TOP*.* j`L8}L%D8:TOP*.* 8ׅ  ۍ n 1?  lTULBDU?6LVD8:MEM.SAVll{}BJ L iB ~0 LDE i V ,0 `DHEh }DEиL$% CC$$%%d$% 0%$%!} DDmLp (  % J)Lz J  (( L (y{) "} [L ( yLk0oj Ty y IB [y~C{}|? V#}   wLL   y{)~LzA! ߰")- y" $zzG$}@LL  @  LA  d JJHJJJjh) yLTHY`J)!0  Q L  SIB%}LdDOS SYSAUTOEPR COMB}%!}l /mȹm  D)ӥ    Lt䩀DEHIDE'}EHIB V B V`/DȄ   7.6 ]^ ȩHHLUh@l1 F APAGDKFNBO(}Bh 'A@')}AY ;@0,((6.hhhEDHIB V`4 A`4@@ D:PD*.* *}( A`6-AR26-?:C:,<,F +AY1A@2CA@2UA @+}aAVsAR@AAAPI%6-F:A`,%F:Aa,$AV7A@IA@U,};@,;@0,Z+%@@+%@@dO-@@,(>-@$@-}O( TOP#$MAGAZINn.-@@.(Programme Januar '92x>-@@>($ .} 7-@@ 7( COMPY-SHOP Texteditor5-@@5(   OH MY DOT! 8-@/}@8( à Visdom-Demo 0-@@0( Ġ Disk-Planer :-@@:( Š 0}Wuerfel baut den Turm 8-@@8( Ơ Illegal-Opcode-Monitor5-@@5( Ǡ WINDOWS fue1}r ATARI >-@@>($  >-@@,(Bitte w@hlen Sie!>AY2}@4!.@.@@K:# A`)@#6.>:,  A@) 4A6.3} D:CSMEDIT.COM) A) 4B6. D:OHMYDOT.COM) A"( 4C6. D:VISDOM.COM( A,* 4D 6.D:4}DISKPLAN.BAS* A 6) 4E6. D:WUERFEL.BAS) A @' 4F6. D:OPMON.BAS' A A4GAph 5} AEAAAA'@@d9@@!D@O@Y A0x6-?6}:C: hhhLl,}|||||||88|l8l88l8 0`>0000>600| | ٜLLI8FҰӥ8ҍL$@̩ >Y}` WL80L8ЭѢɛ!͈͉(ߎLѩF' Z} { ɛ'Ȅҥe҅Хi͍ ͌L ЅΥхLЅΥхL mFΐϥ΍ύ`έϩ [}΅ʥυ L X L#0ҩʍҩ` Uo~ %` `LҘ ˜ l΃ ]Lo8ML\}Lɝ ?I?L`@ oL` ˘L   ` ` ] ˜L`̒ ʭL ]}ȹF̓*8Fm8ҭ̒Fҥe҅ʐL   ]`΀F̓^}ҥ8҅ʥL``LI`}FΥiL F΅ʥυ˩@̩ͩ_}ɛ(,0 {'ȘF,06 # ȘF ם}Fʥi 㝩莀`eʅʥi`} lm̐ͥɿ` `(`i(̐`,,Heʍ!i"!ԭ"Ր!֭"װh `h`ɛa}`H)?h)` 8 `i@tʍuˍvw`tuʭv˭w`2 +i(:`'+:`b} L`FF ΃L`  LҞ` ` `  L ` ` {ɛ`c} ٜL9 9Щ> >LI ؖL L,`<,<` ,` Fd}L] ˘ɛ8uAvB ] xLBF8A̒ALǟ lL  4 5;e}<؅ڍ}مۍ~-&45;<}~}} ~,0L ڍAۍBL`2`ڍ}Aۍ~B f} ˘}~}} ~L ؍AٍBԅʥՅ xL,+2Ug}hh` ʅԅi˅Յi ɛ!hh8ԅإՅ٥ԍՍ L- L{= L{+ L{*в ⛥h}ԥՐ ʅ֥˅օʥׅL$  ֤0:) ʝ˝ L#) 0 ͅ!̈́i} $ʩ> L֣ʅܥ˅ͅ ̈́L9L),֣ ,֣ 0 0L#0أs ٣,j}!0 0٣   ֤L#Jj*Đףأ٣ ٣,֣#  ֤ƢnN.k}գ ܭݥ܍ݍ ڣأ,֣0L,֣0  X L# ,գ N8n4l}Bأ8٣0 A xLIA ٣ ꣑܈  m٣ܐL,ףia{`%, 0m} L#ɛf,0ɱɹ )d L~0Ηc{*, ݏ0̚ *c0LLn}j q9qWI` 俭0 m` 俹 H h`iq ,R /Ro}L.  L#.*)/ Ȍ. L+ ) -  =&טi/ ɛÍ0йp} 5 𩛙5`  0 LΥ ХIЈ`AЩш0 iА` ͐ɀ )͐q} ɀ `͐ )ΐ `D1: D1:12345678.123 D1:*.*  0 E5,10 ސ5Eɛ r}*ސdݐ C3 ƦB2DEJ VLЦ` BLV/6  & X L#1 Y F}AB s}BʝD˝E}HI V0 i}ʐƩ}8(ABe(ʐ x ] ƦL1 Y FʭLR1 Y b Ft},LEBʝD˝E8HI V$e(ʥ%e) l ] $S0LG ƦL# CS) ֤Lɛ19u}SC3)d ƦBRDE p/AЩѢBFDEHI VF0:/Fɛ #(0v}iА( ɛL/ ƦL0R 1  a,LHDE8HI B ƦL1 w}  L#  aԝD՝E؝HٝI B ƦL`LLL(P ƦBDEJ VLЦЭx} é/{ - mА ꩭL} Ʀ L#ɛ驐 {` y}0(H BHIh VLЦ`P:{[|\~}] O,R ͖ 1  }L&01 50OL6OP* Pz}+ P- P= iPЙɛ%HO ¨h)_, L>OP 1O ٪ iyP L쪹M }L&{} ͖ vL0 : ֡L# +` 7&8' L}=-<>.,wsefm!'$Ui~xG:7­oIɟ2ɞ}L Lɜ|}L`+ +::hh`++:hh`:'D ⛮D0 +hh`(+D LǫA}}B A ˘`L0hhL9hhL$  "#01C $@ABCDEFGHIJKLM4%84 %$)4/2NOPQRSTUVWXYZ[6~}%23)/. 3/&47!2% p %2eu~-8CU`k0ڭ $isk,aden(inzuladen!nh{ngen3peichern$irectory } ,|schen:eile7ort!bsatz2est"lock4ext "lockund$rucken"lockdef+opieren$ruck:3peich}ern,|schen$ruck: 5tilities3uchen7eitersuch%rsetzen-arkerset+eydef1uitLHASD ZWARBTBKDS}LZSWEMKQ|]ݧ#̠͟ZOK:7.,,%RJZ8z-ǯ  -;L^}}).SǰhҰ5/3 )*Q08'esamten4extl|schen * "is4extendel|schen * #ursoran"lockendes}etzen2%452. ,aufwerk$ateiname3peichervoll}4!34%,{nge"ytes7orte&rei"ytes,aufwerk}35#(%..!#(%23%4:%.$52#(4%84.)#(4'%&5.$%.4!34%'2/33+,%)..}',/"!,*%23%4:%..-!2+%23%4:%.  )/ &%(,%23%,%#4 4!34%4%8435#(%lj;k+*o}pui-=vcbxz436521, .nm/reytwq907~8<>fhdgsaLJ:K\^OPUI_|VCBXZ$#&%"![ ]NM?REYTWQ()'@}FHDGSA { }  ` {Zċ fffff>`<|~<}p88pf< 80 0 ~~`0 0```nf>ff~}f~~f<flxxlf`~cwkccfv~~nf3f͛6lgϟ?3}x<~~<0~0 ~ <>f>``|ff|<`<>ff>>ff>|``|f8<}<``lxlf8<fkc|fff>|f`>`<|~f>f<ck>6f< x}~ 0~f<>f>f`<|fl0fF68of;}p88pf< 8}0 0 ~~`0 0```nf>ff~f~}~f<flxxlf`~cwkccfv~~nff>fff<x}`x`~<~~<0~0 ~  <>f>``|ff|<`<>ff>>ff>|``|f8<<``lxlf}8<fkc|fff>|f`>`<|~f>f<ck>6f< x~ 0~;n}~x|nf<2|0f`>`<|~f>f<ck>6f< x~ 0~;n1 Der Compy-Shop-TextediorDer Editor ist sehr Benutzerfreundlich gehalten. Alle Funktionen sind M}enge-steuert, knnen aber auch durch einfache, logische Tastenfolgen erreicht wer-den. So knnen Sie zum Beispiel bereits }vorhandene Texte auf zwei verschiedeneArten einladen.1. Sie drcken CONTROL und L. Danach mssen Sie nur noch den Namen de}r Datei eingeben, die Sie einladen mchten.2. Sie drcken CONTROL und D. Anschlieend werden Sie nach dem Laufwerk ge- } fragt, von wo Sie die Datei laden wollen. Drcken Sie einfach auf die ent- sprechende Nummer. Sofort wird Ihnen das Inha}ltverzeichnis der Diskette des angewlten Laufwerks angezeigt. Sollten alle Dateien des Inhaltsverzeich- nisses im Fens}ter platz finden, erscheint unten ein Men mit fnf Auswahl- mglichkeiten. Sollten mehr Dateien im Inaltsverzeichnis steh}en als ange- zeigt werden knnen, haben Sie zwei Mglichkeiten: 1. Falls die Datei, die Sie laden mchten, bereits ang}ezeigt wird, drcken Sie einfach auf RETURN und Sie gelangen in das nchste Men. 2. Falls die Datei, die Sie laden} wollen, nicht im Fenster erscheint, drk- ken Sie einfach irgendeine andere Taste und der zweite Teil des Inhalts- } verzeichnisses wird angezeigt. Anschlieend erscheint auch hier wieder das Men. 1 - Disk Laden Hinzulad}en Anhngen Speichern Directory Nun knnen Sie aus diesem Men die Funktion auswhlen, die Sie ausfhren mchten.} Das geschiet mit den Cursor-Tasten und der RETURN-Taste. Whlen Sie zum Beispiel LADEN an, dann wird die erste Datei, obe}n links in der Ecke, invers dargestellt. Wieder knnen Sie mit den Cursor-Tasten von einer Datei zur anderen wandern. H}aben Sie die Datei gefunden, die Sie laden mchten, drcken Sie einfach RETURN.Mit der Zeit werden Sie feststellen, da }alle Funktionen so leicht zu Handhabensind. Hier aber erst einmal eine Liste aller verfgbaren Funktionen: CONTROL A }- Umlaut a, klein -  SHIFT/CONTROL A - Umlaut a, gro -  CONTROL D - Directory Abfrage CONTROL E - Defin}ierten Block anSHIFT/CONTROL E - Ersetzen aktivieren Cursorposition ein-SHIFT/CONTROL H - Softtrennung } fgen CONTROL I - Info Speicherbelegung CONTROL K - Makro definieren CONTROL L -} Datei laden CONTROL M - Block definierenSHIFT/CONTROL M - Marker setzen CONTROL O - Umlaut o,} klein - SHIFT/CONTROL O - Umlaut o, gro -  CONTROL S - Sonderzeichen sz- SHIFT/CONTROL S - Suchen Modus } CONTROL U - Umlaut u, klein - SHIFT/CONTROL U - Umlaut u, gro -  CONTROL W - Datei abspeichernSHIFT/C}ONTROL W - Wortumbruch ein/aus CONTROL X - Wort nach rechts CONTROL Y - Block definieren CONTROL Z -} Wort nach links CONTROL , - Zeilenanfang SHIFT/CONTROL , - Cursorform ndern CONTROL . - Zeilenende } SHIFT/CONTROL . - Cursorblinken ein/aus SHIFT < - Home Position CONTROL < - Zum TextanfangSHIF}T/CONTROL < - Zum Textanfang SHIFT > - Einfgmodus ein/aus CONTROL > - Ein Zeichen einfgen SHIFT/CONTR}OL > - Zum Textende CONTROL - - Eine Zeile aufwrts SHIFT/CONTROL - - Eine Seite aufwrts CONTROL = - Eine Zeil}e abwrts SHIFT/CONTROL = - Eine Seite abwrts CONTROL + - Ein Zeichen links CONTROL * - Ein Zeichen recht}s ESC - Menleisten an/aus TAB - Zum TAB springen SHIFT TAB - Tabulator setzen CONT}ROL TAB - Tabulator lschen CAPS - Grosschrift an/aus BACKSPACE - Zeichen links lschenCONTROL BACKSP. -} Zeich. rechts lschen SHIFT BACKSPACE - Text lschenSELECT/TASTE - Vordefinierten Makro aufrufenHaben Sie die Tabulat}or Positionen Verndert, so knnen Sie den ursprnglichenZustand durch drcken der Tastenfolge SHIFT/CONTROL/TAB wieder hers}tellen.Durch drcken der ESC-Taste aktivieren Sie die Menleiste. Von hier aus knnenSie alle Funktionen des Editors sehr }leicht anwhlen. Es gibt insgesamt vierverschiedene Men's, die durch drcken der Tasten 1 bis 4 umgeschaltet werden.Haben }Sie die ESC-Taste versehentlich gedrckt, bringt Sie ein erneutes drckender ESC-Taste wieder in den Texteingabe-modus zurc}k.Innerhalb der Menleiste knnen Sie alle Funktionen mit den Cursortasten an-whlen. Sie brauchen dabei die CONTROL-Taste} nicht zu drcken. Die jeweils an-gewhlte Funktion wird invers dargestellt. Mit der RETURN-Taste aktivieren Siedann die ei}nzelnen Funktionen. Hier eineListe aller vier Men's:MEN 1 - Disk Laden Hinzuladen Anhngen Speichern Directory}Laden - Zum Laden einer Textdatei, lscht den aktuellen Textbuffer, der Dateiname mu eingegeben werden.H}inzuladen - Ldt eine Textdatei an die aktuelle Cursorposition, verschiebt den vorhandenen Text nach unten.Anh}ngen - Ldt eine Textdatei an das Ende des vorhandenen Textbuffers.Speichern - Sichert den vorhandenen Textbuffer auf }Diskette. Die Laufwerks- nummer kann durch gleichzeitiges drcken der CONTROL-Taste und einer der T}asten zwischen 1 und 8 gendert werden.Directory - Zeigt die Directoty der Diskette im angegebenen Laufwerk. Zum } ndern der Laufwerksnummer drcken Sie einfach die Tasten 1 bis 8. Wird die Directory angezeigt, kann eine be}liebige Funktion aus dem Men 1 mit den Cursortasten angewhlt und ausgefhrt werden. Der Dateiname} braucht nicht eingegeben zu werden, er kann direkt mit Hilfe der Cursortasten angewhlt werden. Durch drcken d}er ESC- Taste knnen Sie diese Funktion wieder verlassen.MEN 2 - Lschen Zeile Wort Absatz Rest } Block TextZeile - Lscht die Zeile, in der sich der Cursor befindet.Wort - Lscht das Wort, auf dem sich der C}ursor befindet.Absatz - Lscht den Absatz in der sich der Cursor befindet ab der aktuellen Cursorposition.Rest -} Lscht den Textbuffer ab der aktuellen Cursorposition. Der Text links (vor) vom Cursor bleibt erhalten.Block - Si}e knnen einen Block anwhlen, der anschlieen gelscht werden soll.Text - Lscht den gesamten Textbuffer. Alle gemachten }Eingaben gehen ver- loren.MEN 3 - Block und Drucken Block def. Kopieren Druck 80Z. Speichern Lschen Dr}uck 40Z.Block def. - Dient zum definieren eines Textblockes. Der Anfang des Blockes wird mit der aktuellen Cur}sorposition gleichgesetzt. Das Ende des Blocks bestimmen Sie durch versetzen des Cursors mit den Cursor- } tasten. Die CONTROL-Taste braucht dabei nicht gedrckt zu werden. Markiert wird das Ende des Blockes durch} drcken der RETURN-Taste. Der Buffer fr diese Funktion ist auf 1024 Zeichen begrenzt.Speichern - Dient zum a}bspeichern des angewhlten Blockes.Kopieren - Der angewhlte Block wird an die aktuelle Cursor-Position einge- } fgt.Lschen - Lscht den angewhlten Block.Druck 80Z. - Druckt den gesamten Text im 80 Zeichen Format aus.Druck 40}Z. - Druckt den gesamten Text 40 Zeichen Format aus.MEN 4 - Utilities Suchen Weitersuch Ersetzen Marker set Key de}f. QuitSuchen - Dient zum schnellen auffinden bestimmter Textstellen. Optionen: Sie knnen bestimmen, ob} auf Gro- oder Kleinschreibung geachtet werden soll.Weitersuch - Falls die gesuchte Kombination ffter im Text} vorkommt, kann mit dieser Funktion weitergesucht werden.Ersetzen - Der Funktion Suchen verwand, nur mit dem }Unterschied, da die ge- fundenen Zeichenkombination durch eine neue ersetzt werden kann. Optionen:} Auch hier knnen Sie bestimmem ob auf Gro- und Klein- schreibung geachtet werden soll. Mit der zweiten Option }geben Sie an, ob jedesmal vor dem Ersetzen nachgefragt werden soll, ob es sich um die gesuchte Zeic}henfolge handelt, und ob diese ersetzt werden soll oder nicht.Marker set - Eine sehr hilfreiche Funktion um Tex}tstellen schnell anzuspringen. Sie haben die Mglichkeit bis zu 10 Marken im Text zu setzen. Das ge}schieht durch einfaches drcken der Tasten 1 bis 0. Setzen Sie den Cursor einfach an die Textstelle, die Sie mar}kieren wollen und rufen Sie die Funktion Marker setzen auf. Anschlieend drcken Sie eine der Zahle}n 1 bis 0. Um nun diese Textstelle wieder anzu- springen, drcken Sie einfach SHIFT/CONTROL und die entsprechend}e Zahl. Alle belegten Marken werden in einem Fenster unten links am Bildschirm angezeigt. ACHTUNG! }Durch einfgen von Text knnen die Marken verrutschen!Key def. - Ebenfalls eine sehr ntzliche Funktion, die }Ihnen sehr viel Tipp- arbeit er sparen kann. Sie knnen bis zu 15 Zeichen Text durch drcken nur ei}ner Taste aufrufen. Beim Aufruf dieser Funktion wird Ihnen ein Bildschirm mit den bereits belegten Tasten gezeig}t. Taste aufrufen. Beim Aufruf dieser Funktion wird Ihnen ein Bildschirm mit den bereits belegten Tasten gezeig5dxԩӹddө@X`dw߂{xr D 6S)/½~CW@o}mx %@Y(@J+15Çh 30 @@@ X S D>8>L0!It D337??n0|x 6o}@0EHh~OiLieee\`d.E. E.E.AE$PD.D.D. D.aĩ-H\蔮PiĪcDa΢S X;eh}ez"#rMp/NepoEe|dF%gEeolp2%-DsrRU)иW,2иbYlVnV@''(*VtVVtVVuVVtW@}dH^JW:0mHODyV >tU(@YuGx4D Qj$̔j4b$EܤܭaԬ$TgrXܯ$U괬k k}ҷ8r NR @Z&QeS%BJ[ zv@`oPe|kDeJ@tDb XT7LbzUoM%|Lo eenSerG-1}`U0&P@ }VA$T@=e| I|"  C*_(p ? ϭ0Le` !$'*-0369 ANxTTT y@@  C펎7X8r  i  ` 3i,}(($@ 0a $PP@!R[haLP,c3$.DX8b7 U H`l@>px„c ] !}&)]--- >9+%1Y 09BKZk| a@9 2QI?h"A H9a' Ô}G@ A$@<W|vleCTQLI t0q3l(i+PSH K7p4s/h,jj \@DHLPTX\`dR6®b6ƮL`Yc+C}¬a@0zlj1u)m)HHa^ Qk(L e x}Zހ(??>>>x}M}D5"} N3q!@V2HU)!ň1HIi)3%-c/!wy } 3(IRA,Kr#1@јXqoe3/ FArbpT8LjFV`Iy9Ѕ)2-!+;x`Y AxHeXM J:3 }6)0 BAZ5njc̔r%&)) DRR Q 9 ƜR0I , @2))@>IAE#LFA0 ERSr'  }CD' 5P&!Dw MrRq,G c)Фpd@ ?dow (T RR}0C Ki } &N$  PA0!q`Q@1 paԐS0 Q5SՌW@ `5֌[0 q5א_0 6،c}@ 6Sِg0 6ڌk@ 6یo0~q0 73 u@ 7t y0D,0P @0UP !@0”} P 1@0ÔP A@1ĔP Q@1UŔP a@1ƔP q@1ǔPB0@?`  }¤$DI"br@ q#4EVgpp y@19zD@?@;J\R @` 8`15Wy D $(,04}8=92L Y0J/<p%sj@_CݻwU3aA!CÃC‚B"`#ǀOy"B 0!/>8 `ʨdB0} G{<x w8 X/p`P@0 {"D̈D"/ardQ!1AQaq ДE3qDz@Fbr@HjpjlX} Jr)dh4AJPJ "hJaF c0B@: :JrȀj ʮ@dPLH I J K L MNOPT̍MP#J}@9Q`149Li 3MA*" bj 3!8Fq B\Ts%),d΄@ @l0$4DTdt%5EUeu @p@}: r fBl"jhdjVbbf!7`R`$$3F0 ,A { #+3;CKS[cks{?!I4jQ PT,10pЕ%}E0E$ PAXBA0t`09jApv" Ni h* t>s  /a`@4n.OF:|}c> ;C}$@W[{; t @h`WG9 E01|ak1;;;mmbbzP3 } 8p\2|`'(pr@@#@žhh3 `qT+;;mon )툀`" >D}Bq φ8B `eĠ ""$$&& #$& ☚-  0 ! `hpx P߄(@ #!!J }I L 35ɥ 0 #&!%ꉄ` +$D"$8@ L"@0 % @g`4BҀk Ѐ>PjR5WF}AapS qx(D``@ 3#7 xxpp EW+ 6hd``0`2loჃ},86#@ L#\@`@a ggE|B "1$og _rg E|PB}Ϟd//xL" ( g c z  g*+((  z}6 66`(`**+` ^,Ƃ `Ɓ Ƅ ƃL )0  ^ x }  ^ xЎЪ 槤 ` ƞƝ` ^ ^`Щ  ƈ`!}  ө"/X@L ƦL ` ` Щ  ƈ`] ' UUPUT$d8;UVMNNNNNNP:歹3>香#}e0 3$$$eYffk0ꦚfNNNNNO@MfUUS香e$}YfYfk>香e䤤dddk09 9ê>UUfTk༪U3%}U>:9:99ZfjNNNNNNNN0 3Ϫ 3>k$êU>Ui5:UU0 &}3 3>d$9驙i$$$驙iYi:9::;:;;22ΫYii;:;;8;88 99香'}eYYfkk󌰼$䤤di98;88;8;;>ꦚf9 9;8;;:;:?>馪驙iY䤤gYf0(} 3eddd:;::9:99ZfjNO@0 3ϪeYf9ꦙeUYfUU)}0T$$kU0UYfU 3U>U香eU$$d驙i Y:9::8;:9$$$d$$d*}:@ :;8$+},}ϙÙǘǏÙ-}Ǐǀ.}/}0}Ǐ1}2}(g8L(Hotline Demo, (c) 27.03.91 by Peter DellB$ 3}ԍ L(ЍL(L\(IJ) iZ ԍЍi ЍL(1 ԍ ԍ Խ ԍЍЍЭ9,L* 3xԎʚ4}өԩ+ԩԩԩЍЩЍЩЍ Ѝ Ѝ Щ!ЩЩ6,7,8,9,:,;,<,=,1񩠠/-5}-0`)_LF)(.č*ԭ > )K * *2 * E* )<, u* *<,L)JJ`L(6} *2 u*9,:, *(mmmm * *L`8m )2 *~ *` *, <,6,, <,77},), <,8, `1 *+ LG* *9,2 *:,`6,)6, *8,)6,6,7,8, *6,78},8, *`e`, L+(@ ԭ6,Э7,Э8,Щ:,L+;,;,L_+I )I--( (.9}L#+ ȱ;,LF+<,iiL#+-=,>,I>, )?,?,=,2>,18=,) ?,=,H ):}I9, 3L*pp0D@,ppppppppppA+       ;}          !"#$%&'()*+,-./<}0123456789:;< &=>#?@>AB&CD#EF&G1#4H=IJK=L >#MNO=IJP>QRST>U1&4"#$%&VWXY "#Z[\]^_`a=Lbcdefg=}h?@>ijklm nopqnorstqnuvswxnorstqnoyztqnor{   had the idea and >} jaco adapted it! dedicated by jl to the freaks?} of hotline hello freaks !! schaut mal kurz da oben hin ... 0 so na dann erst einmal he@}rzlich wilkommen zu einem neuen demo von mir ! mein name ist peter dell ... alias "jacomo leopardi" .... und ich habe dieseA}s demo im februar 1991 fuer "ppp" fertiggestellt.` es ist den leuten von "hotline" gewidmet,die die B}vorlage hierzu 1989 auf einem 64er programmiert haben. ich liebe die version,vor allem den "smooth criminal" sound von charleC}s deenen ... den hab ich 1000 mal gehoert! der sound fuer dieses demo stammt aus einer alten ausgabe von "ck" und weil er dD}eshalb nirgends mehr zu kriegen ist habe ich ihn umgeschrieben und eingebaut ... pdenn er ist der beste,den ich je auf einemE} xl gehoert habe! somit ein riesengrosses hallo an "spueli-soft",die ihn komponiert hat !! und dann auch hier noch ein aufruF}f ... wer musik auf dem xl schreiben kann oder gerne programmiert , der wende sich bitte an mich ... peter dell in deG}r klink 32 6601 heusweiler west-germany oder telefon (06806) 77895 Pdann zum abschlH}uss noch die greetings: gsp ... dr erwin ... cdam .... paul ... hotline ... red sector inc ... und alle,denen die sach hier gI}efaellt!0 mit start wird das demo neu gestartet,mit select geht es weiter .... jl in 91 J} ҈65758595/515` 4L31515;5`15/5|725 i<[45i\47K}35 ia45ib4745 i g46ih4 855 i̍m46in40535E855 C8T8U8V8W8TL}8<805/50/505`آ:5ʊ0y JX8L8:5^\8}X86565D8L8L8L8}H8ҩ65;5<8@8L8M}<8P8}H8ҽT8ҝ\8D86565L4\8L4;5:5:5`22222222N}222222Q(Q(Q(Q(g3g3[-[-{={=[-[-0Q(Q(Q((QQ(Q(QQQ3g333g3ggg3g3ggg[O}--[-[--[[-[--[-oo7o7o77o77o7ooofff``rr``rrffrrP}rr`````ffrrrrrf`````Ur%*%2Q}%!!*!9!%*%2%*%/%*2*!*%R}S}     T}(`PP_bdgiknpruwy{~U}~{ywurpnkigdb_][XVTQOMJHFDA?=;96420.,*(&$#!  !#$&(*,V}.02469;=?ADFHJMOQTVX[]QR'()*+,-./01234567899:;<=>>?@ABBCDDEFFGHHIIJJKKLLLMMMNNNNOOOOOOOOOOOOOOOOONNNNMMMLLLKKJJIIHHGFFEDDW}CBBA@?>>=<;:99876543210/.-,+*)('&&%$#"!   X}  !"#$%&&Y}Z}SX?[}|  x> >|| |>| |>?|\} |>??~???~?g?~?g??0???0]}???0?????????^}x||>||>~||>~> >|? x_}p?| ???`}??a}~~~~<?~~~>~~~>~|~~>b}~|~~>~|~~~~~~~@~~~~~~?3~~~~~3~~~c}~~a~~~~~a~~~~~a~~~~~~~~~@~~~~~d}~~~~~~>~~~|~~>~?~|~~>?~|~~>?~~~e}<~~~~~???X?mUUUUTf}UUUUTUUUU@UUUUUUUUUAUUUUUUUUUUU@UUUUUUUUTUUUTUUUTUUUUTUUUUTUUUU@UUUUUUUUUUAUUUUUUUUUUUTg}UUUUUUUUU@UUUUUUUTUUUUUUUUUTUUUU@UUUUUUUUUUUAUUUUUUUUUUUU@UUUUUUUUUUTUUUU@UUUTUUUUUUUUUTUq}bb&TOP-Magazinb;PD-SoftwarebbUDCSMEDIT COMbKEDBESCH TXTb>OHMYDOT COMb"VISDOM COMbDISKPLANBASbTWUERFEL BASb$,OPMON BASb PWIN LSTbYWINDEMO TURbnWINDEMO bsDPEEK I btGOTOXY I bvPEEK I bxPOKE I bzWINDOW I bMARGIN I bWIN0OP I bWIN0CL I bWIN0DEL I bUUU@UUUUUUUUUUUAUUUUUUUUUUUUPUUUUUUUUUUUUUUUPUUUUTUUUUU@UUUUXUUUU@UUUUUUUUUUUUAUUUUUUUUUUUUTUUUUUUUUUUUr}@UUUUTUUUUTUU@_X_U@UUUAUUUWUPUUWT_PUUh_U@U_s}UAUU@UTUU@_T_PUUh_U@WUAUU@UTUPt}UTWTUU_U@UUAUPWUUTUTWTUU_U@UUAUu}PWUUUWTUUWV_UAUUAUT_UAUU@_TUv}UWV_UAUUAUT_UAUPUT*UU@_Z_UAUUAUw}T_UAUUUT*UU@_Z_UAUUAUT_UAUUWT _PUx}Uj_UAUUAUT_UAUU_T _PUUj_UAUUUUUUUUUAUUUUUU_T_UUUy}UUUAUTWTUU_UAUUUUUUUUUAUUUUUUWT_UUUUUUAUTWTUU_UAUz}UUUUUUUUUAUUUUUUUT_UUUUUU_UAUTUUWV_UAUUUUUUUUUUAUUUUUUUT_UUUUUU_UAU{}TUUWV_UAUUUUUUUUUUAUUUUUUUT_UUUUUU_UAUT*UU@_Z_UAUUj|}UVUT_Uj_UAUT*UU@_Z_UAUU@UVUT_Uj_UAU}}T _PUUj_UBUUUUUUUVUT_Uj_UAUT _PUUj_UBUUUUUUT UV~}UT_Uj_UAUTWUUU_UB_UUUUUUPUVUT_Uj_UAU_UTWU}UU_UB_UUUUUU UVUT_Uj_UAUWUTUUWV_UBWUUUUUUPUTUT_}U@_UAUUUTUUWV_UBWUUTUTUT_U@_UAUUUT*UU_Z_}U@UUUUTUT_U@_UAUU_UUT*UU_Z_U@U_U@UTUT_U@_}UAUUWUUT _Uj_U@*UUPUTUT_U@_UAUUUUUT _Uj_U@*UW}TUTUT_U@_UAUVUYUTWU_U@ UU_UUTUT_U@_UAUV_U}iUTWU_U@ UUUUUUWUUTUT_U@_UAUVUUUTUV_U@UUUUUUUAU}TUT_U@_UAUVUVUTUV_U@UUUUUUUAUTUT_U@_UAUVUZUT}*UZ_U@*UUUUUUAUTUT_U@_UAUVjUT*UZ_U@ UUUUUAUTU}T_U@_UAUTUT _Uj_U@UUAUTUT_U@_UAUT*UT _Uj}_U@UUAUTUT_U@_UAUT UTWU_UAUUUUUUUUUUAUUUUUUUT_UUUU}UU_UAUTUTWU_UAUUUUUUUUUUAUUUUUUUT_UUUUUU_UAUTUTUV_UAU}UUUUUUUUUAUUUUUUUT_UUUUUU_UAUT*UTUV_UAUUUUUUUUUUAUUUUUUWT_UUUUUUAU}T UT*UZ_UAUUUUUUUUWUAUUUUUU_T_UUUUUUAUTUT*UZ_UAU}UAUT_UAUTUT _Uj_UAUUAUT_UAUTU}T _Uj_UAUUAUT_UAUTUTWU_UAUUU}T%WUUTUTWU_UAUUUT%WUUTUTU}V_UAUVUX)UVUTUTUV_UAUVUX)U}VUTUT*UZ_UAUUZUUh*UZUTUT*UZ_}UAUUZUUh*U_UZUTUT _Uj_UAUUUjUU UU}jUTUT UUjUUUUAUUUUUUUUUUUUUUUUUUUUUUUUV UUUUUUUUUUUUUUUTUUUUTUUUUUUAUUUUUU}UUUUUZUUUUUUUUUUUUZUUUUUUUUUUVUUUUTUUUUTUUUUUUAUUUUUUUUUUUUUUUUUUUUUUUjUUUUUUUUUUZUUUUT}UUUUTUVUUUUAUUUUUUUUUUjUUUUUUUUUUUVUUUUUUUUUUUUUTUUUUTUVUUUUAUUUUUUUUUZUU}UUUUUUUUUjUUUUUUUUZUUUUTUUUUT***}**  *} *}* *}`8HLAp_______________________________}_____________________________`^^^^^^^^^^}^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^}^^^^^^^^^^^^^^RAc80 ԍЩ2 ԍЩ4 ԍЩ6 ԍЩ8 ԍЩ: ԍЩ<} ԍЩ> ԍТн ԍЌԎ轀 ԍЌԽ<ө> ԍЎЩ< ԍЩ: ԍЩ8 ԍЩ6 ԍЩ4 ԍЩ2 ԍЩ}0 ԍЩ ԍЭ9 ԍԭ::ЎЩ ЍЩЭ9 :o ԍЌнмН߭9 P}PjJi@ ԍ}ЎЌЭ:)9)J ԍԎЩ$ ԭ9 ԍХ)?99 ԍЎЌЭ:: ԍЎЭ9 ԍ Ѝ ԍ ԍ ԍ ԍ ԍ ԩ ԍЍ} Э: ԍЭ9 ԍЭ9 ԍЩ ԍЭ9%9 J9)Ȍ989999L<,L:L<@99L<}989)9z/ ?DLG< ȱ9L< ȱ9L< ȱ9L< ȱ9L<ȱ9ߍ9iiL}G:A%,!( DISK-PLANER(((( ........VERZEICHNIS EINLESEN.##(!}­........SEKTORANZAHL: $$(í........AUSGABEGERAET: (ĭ........HANDEINGABE$(ŭ........AUSWERTEN ?!!}($(( ? ( A@ --------------------------@eA0&&@@!}D:*.*6-%@@@:,!@BA%6-%@G 68,-A:7@<@,,/8!}, @=6-&@G A67@<@,.=:,(Prg.# F@.@@!}K:;)@F@'"@:J,)"@:n,(' A5"@:N,)"@:n,(-+6-&@5 A!} A((67B:,%@,.7@<@, A(@ A@ -----------------------!}---@fAE(SEKTORANZAHL:  --------------------------@gA`(AUSGABEGE!}RAET:  -------------------------- @hA  A( NAME : 4A2!}B:, @(67B:,%@,. 2 A%67B:,%@,.%6-%@"( GROESSE: ' 68,-, ----!}----------------------1@iA 6) 6. 67A,.)67@,.;67B:,%@,.@&(>:A%,!}&(Ich ueberlege...E6-J-@O 6-T -Y8, 8,6-^ c! 6-8,68,-8!},!68,-h6-%8,m&&6.7$@&@<$@,rCC67$@&@<$@,.7$@&@<$@!},w&&67$@&@<$@,.|  6-'!P:',6-P:,%@ @@!}70@@70@@(@++(@SEKTORENANZAHL : ++(@!}DISKETTENANZAHL (min.): (@6-"A06-%@-@6@!}-@6@ 6.067%@P,.67@,.6-6--@6@!}%8,!A6-%8,67<,.16-%@ ")"' A  ")"' A!}  ")"' A  (@ DISKETTE :(@ -@7<,01AE!}66(@7$@&@<$@, 8,68,-67<,.0! &(@+##(@!} SEKTOREN BELEGT0$$(@& SEKTOREN FREI 50E:*0S:A:( --> TASTE? A@(@!}D(@I-@N8,!A S -X68,-8%@,]WW67$@&@<$@!},.7+%@,$@&@<+%@,$@,b g. 8,"* &%@.6-&@l 6-&!} A%v@{ A""@@K)@@!@6-&@2!}$D:DISKPLAN.BASA""@@K)@@!@6-&@2 67'))ABERIJEAEBDSSSWWWSEAEAEB@%}@ %};@ ,A=NAME SPIELER1;@ ,B=NAME S%}PIELER2;@,6.EINE:;@,ANTWORTSTRING ;@ , I=EINGABE NAME SPIELER1 %};@ , J=EINGABE NAME SPIELER2 9@,9@,EA=ERGEBNISS SPIELER 1EB=ERGEBNISS SPIELER2%};@,D=JA oder NEINc A d+++++++++++++++++++++i+ΠӠ+n+++++++++++++++++++%}++s +@x4=HINTERGRUND} O=KASSE1=SPIELER A2=SPIELER B 1=GOLD,7=BLAU,3=ROTORANGE,12=GRU%}EN0@@@0@@0@@@0@@@%}---------------------ZEICHNEN SPIELER A--------------------- @,@2@'/@2%}@'/@&@-@&@Ae@++@@S:,@0%}@'/@0@'/@(@-@(@Ae@++@@%}S:,@2@'/@2@ '/@&@  -@&@Ae@++%}@@S:--------------------"-ZEICHNEN SPIELER B-'--------------------, %} @1,A4@6'/A4@'/A$@;-A$@@Ae@E++@%}@S:JO,A(@T'/A(@'/A&@Y-A&@^A%}e@c++@@S:hm,A2@r'/A2@'/A0@w%}-A0@|Ae@++@@S:,A4@'/A4@ %}'/A$@ -A$@Ae@++@@S:$ %}++++++++++++++++++++++++++ +ΠҠ+ ++++++++++++++++++++++++++Beginn bei Kasse A%}nschliessend Spieler A&B---------------------ZEICHNEN DER KASSE---------------------!&-@%}+FARBE 0,7,1006-@5 @ A@:S3=(1,2,...,15)? @1 ADS3=(16,17,...,3%}0)I!!I>30 d.h. S3=(31,32,...,45)N6-@S6-&@0X##6-@&+@$&@,] Ab AU%}g6-@il6-&@q##6-@&+@$&@,v A{ AU6-@##6-@%}&+@$&@, A ---------------------ZEICHNEN SPIELER A---------------------%}-@FARBE 1,3,106-@ @ A` @1 A56-@I%}6-&@0##6-@&+@$&@, A Au6-@6-&@##6-@&+@%}$&@, A Au6-@4##6-@&+@$&@, A  -%}--------------------ZEICHNEN SPIELER B--------------------- %-@*FARBE 2,12,10/6-@%}4 @ A9 @1 AU>6-AID6-&@0H##6-@&+@$&@,M %} AR AW6-A\6-&@a##6-@&+@$&@,f Ak Ap6-A%}4s##6-@&+@$&@,v Az $+++++++++++++++++++++++%}+++++++++(>:A%,( Š((FEHLER VERSTANDEN?(ZURUECK MIT >RETURN<%}(>:A%,$++++++++++++++++++++%%6-P:H:@,$@,%@$$L+%}+++++++++++++++V+Π+`++++++++++++++++ej ,o'/&@'/&@&@t-&@%}yAe~++@@S:$+++++++++++++++++++++++++Ԡ͠%}+++++++++++++++++++++++++##( wuerfelt mit >SELECT<SELECT=5##( wuerfelt mit >O%}PTION<OPTION=3$+++++++++++++++++++++Ҡ+(++++++++++++++++++++2<(%} wuerfelt FP$x+++++++++++++++++++++Ҡ +++++++++++++++++++++( %}wuerfelt $##+++++++++++++++++++++++++++++##+ǠҠ+##+++++++++++++++++++++%}++++++++ 6-& 6-&! AU! AU6-&  6-&&}$**************Ġ**************+@%@B2y@0@@&}@0@@@0@@@4=HINTERGRUND,8=BLAU 1&2=GRAFIK,1=GOLD,2=ORANG&}E @ 3-@@3(@DER WUERFEL BAUT @+-@@+(@DEN TURMw&}-@@92@@@= Q-@@s2w w-@&}@92@@@= Q-@@s2w w-@&}@92@r@@= Q-@@s2w w-@@ &}92@`@@= Q-@As2w  w-@@92&}@@@= Q-@@s2w "w-@@92&}@@@= Q-@@s2w $w-@@92@r& }@@= Q-@@s2w &w-@@ 92@`@& }@= Q-@As2w *-@A 4**************9& }*Ġ*>**************CH +@M6-@R6-@0W6-@\ Aa(copyr& }igth by fl(1988)k%%(BEGINN DES SPIELS MIT >START<p%%(ΠӠӠԠԼu"F:B2y,@" A!e& } A0 ************** ** **************  + 5-@@5(>DER WUE&}RFEL BAUT DEN TURM< 8-@@8(IST EIN SPIEL FUER 2 PERSONEN. 4-@@4(DURCH WUERFELN ERHAELT M&}AN 8-@@8(DIE ERREICHTE ZAHL IN STEINEN, 7-@@7(WOMIT EIN >TURM< GEBAUT WIRD. 5-@&}@5(INSGESAMT SIND 45 STEINE IN 8-@@8(DER KASSE (TURM IN DER MITTE). 7-@@ 7(WE&}NN DIESE ALLE SIND,WIRD VON 6-@@6(NEUEM BEGONNEN.DERJENIGE,DER 7-@@7(NACH DEM 5.SPIEL D&}IE MEISSTEN 0-@@0(STEINE HAT IST SIEGER. 2-@@2(VIEL SPASS UND GLUECK!!! 1-@@&}1(BEGINN DES SPIELS MIT  #-@@ #(>RETURN<  *******************! *ŠҠ*&}& *******************+ - (>:A%,0 )-@@)(WIE HEISSEN SIE5 "-@@"(>:@,: &}-@@? 3-@@ 3(WIE HEISST DER 2. SPIELERD "-@@"(>:@,I -@@&}N 6-H:@,S 6-H:@,X  ! A1] 6.b 6.g A1l 6.q 6.v { --@&}@-(  IST SPIELER I .-@@!.( IST SPIELER II  .-@@#.(WEITER MIT&} >RETURN<  SP=SPIELH -@@**********************ͭ************&}**********S=ANZAHL DER STEINE%%1=SPIELER A,2=SPIELER B,3=KASSE'6-6-'6-@E&} A A A( DAS SPIEL BEGINNT( mit>RETURN<-@&}@# AB@(>:A%,1300=SPILER I WUERFELT A900=FEHLERMELDUNG "F&}:B2y,"@" AA  AASPIELER A WUERFELT1000=WUERFELN A 6-""1500=UEBERPRUE&}FUNG STEINZAHL A" 6-&' 6-%; (>1400=SPIELER II WUERFELT@ AD"F:B2y,"@&}" AApH AAdJSPIELER B WUERFELTO AT 6-Y A^ 6-&c 6-%h (k(PRES&}S >RETURN<mBILDSCHIRM LOESCHENr +w A| A6-6- & }*********************Š********************* +/-@@(+-@&&!}@/(',@@'/@6@6-@$%@-@(.SPIELE=ERGEBNISS&"}SP=NR.DES SPIELSA=SPIELER A 68,- 68,--@(8,-@0(8,--@@#&#})(PRESS >RETURN<- ************************************ +/-@&$}@(+-@&@/(',@@'/@6@ 6-6--@@&%}6-%8,6-%8,6-@$%@#-@(.SPIEL(-@(8,--@0(8&&},2 7',@@'/@6@<!-@@!(GESAMT:A-@@(F-@)@&'}(K -@@ (SIEGERP ! ARU-@@(W((PRESS >RETURN<X;#@@&(}K:0)@;@Z AS************************ +@1-@&)}@1(@NOCH EIN SPIEL1-@@1(@(JA oder NEIN)'A'A @&*} 4JA A3 ++@%@'-@@'(@En-@A&+}  + D:WUERFEL.BAS+@%@'-@@'(@En-@A$1"#K^RRXYAOOOOARR *-}  + MC-TEST*.}ER V1.19A'A@9A @Z (}@@(0AR@B-@*/}N6-Z6-(@;@,6-(6-46-@6-2?6-6-@$'6-*0}A436-A4?6-A4< #A`F%-A6Aw"!% P##(Z##(|*1} 6502 MC-Tester V1.1 |d##(| @ by PW 11.1991 |n##(x"F:B2y, @" A*2}P##(|Angeregt durch das TOP- |##(|Mag. 10.91 und ABBUC-Son-|##(|dermag. 10 wollte ich die|##(|zusaet*3}zlichen OP-Codes |##(|testen. Deshalb entstand |##(|dieses Programm. |##(*4}--@A% --@@##(|HINWEISE: Die gesamte |##(|Ein- und Ausgabe ist in |##(|B*5}ASIC geschrieben. Die |##(|MC-Routine liegt ab 1536.|##(|Es stehen 4 Bytes zum |##(|Testen zur Verfuegung*6}. |--@A% --@@##(|HINWEISE: Die MC-Codes |"##(|muessen eingege- |,##*7}(|ben werden. ENDE |6##(| |@##(|Viel Spass beim Testen! |J##(| *8} PW |T-@A" ^-@@h##(r#-@@"#-@*9}|='( + =AR A-@@( T (S*:}peicher 203:  2-@ @6T )!AUA A -@@T (Speicher 2*;}04:  2-@ @6T )!AUA  A@-@@T (Speicher 1600:  *<} 2-@ @6T )!AUA@ A`-@@T (Speicher 1601:  2-@ *=}@6T )!AUA` A-@@ T (X-Register :  2-@ @ *>}6T )!AUA A-@@T (Y-Register :  2-@ @6T *?})!AUA A -@@T (Akkumulator :  2-@ @6T )!*@}AUA '-@@'( & AP-@@0T (OP-Code 1:  2-@ *A}@6T )!AUAP: Ap-@@DT (OP-Code 2:  2-@ @*B}6T )!AUApN A-@@XT (OP-Code 3:  2-@ @6T *C})!AUAb A-@@lT (OP-Code 4:  2-@ @6T )!*D}AUAv3AcAd'Ae3Af 6-?:A6<<<<<<<,%-@@%( *E}8-@@8(X Y AKKU 203 204 1600 16018-@@8( A*F}-@@"(F:A,4-@@A(F:A,A-@@"(F:A,4-@ @A(F:A*G},A-@$@"(F:A,4-@)@A(F:A,J-@4@"(F:A,4-@@ J(*H}Ӻ NV.BDIZCL6-P:F:A,'A(,66-F:A,&$A(H-@@!L(:6-P:'@d,$6-&$@d*I}6-@@!:(:6-P:'@2,$6-&$@26-@@!:(:6-P:'@,$6-&$@6-@*J}@!:(:6-P:'@,$6-&$@6-@@!:(:6-P:'@,$6-&$@6-@ @!*K}:( P6-P:'@,$6-&$@6-@!@!:(L-@"@!P(?6-F:A,!6-F:A,06-F*L}:A,?6-F:A, >-@@"(( J:-@@">*0J*0jAP4>-@*M}@"((ӭ N:-@@">>4n)4NAHAR@ ApR@@*N}(}\!!104,104,104,133,203,104,104fCC133,204,104,104,141,64,6,104,104,141,65,6,104,104,168,104,104p!!170,104,104,2*O}34,234,234,234z##8,133,207,134,205,132,206,104133,208,96 D:OPMON.BAS6,104,104,168,104,104p!!170,104,104,2(U20000 DIM VER$(37),LEER$(37),P$(3),WIN$(11)20010 VER$(1)="":VER$(37)="":VER$(2)=VER$:P$="<":LEER$(1)=" ":LEER$(37)=" ":L.Q}EER$(2)=LEER$20020 P$="<":WIN$="D8:WIN .OVL"20030 REM ǭԠ20040 IF PEEK(12)+256*PEEK(13)=8320 THEN GOTO 20110.R}20050 ? "}"20060 ? "Dieses Programm benoetigt"20070 ? "TURBO-BASIC.":END 20080 ? "}"20090 ? "Dieses Programm benoetigt".S}20100 ? "eine RAM-DISK":END 20110 TRAP 2008020120 CLOSE #3:OPEN #3,6,0,"D8:*.*"20130 CLOSE #320140 REM GOTO PROGRAMMANFAN.T}G20150 REM έנ20160 PROC OPENW20170 WIN$(7,7)=STR$(WIN)20180 CLOSE #3:OPEN #3,8,0,WIN$20190 BPUT #3,DP.U}EEK(88),960:CLOSE #320200 WEITE=X1-X-220210 POSITION X,Y:? "";VER$(1,WEITE);""20220 FOR XXX=Y+1 TO Y1-120230 .V}POSITION X,XXX:? "|";LEER$(1,WEITE);"|"20240 NEXT XXX20250 POSITION X,Y1:? "";VER$(1,WEITE);""20260 ENDPROC 20270 R.W}EM ŭנ20280 PROC CLOSEW20290 WIN$(7,7)=STR$(WIN)20300 CLOSE #3:OPEN #3,4,0,WIN$20310 BGET #3,DPEEK(88).X},960:CLOSE #320320 ENDPROC C CLOSEW20290 WIN$(7,7)=STR$(WIN)20300 CLOSE #3:OPEN #3,4,0,WIN$20310 BGET #3,DPEEK(88),9: VERLEERPWINOPENWIWEITXXXYCLOSENUMBENUMBE%%%%%JM A?@2Z}@@ @ @" @" m@ @' 11;@7,;@7,;@,;@2[},o67@,.%67@7,.467@,.>6.<O67@,. `67@7,. o67@,. 6.2\}<6. D8:WIN .OVL(ǭԠ25+F:@,%AV$F:@,"A 5 A < (}F!!(Dieses Prog2]}ramm benoetigtP( TURBO-BASIC.Z (}d!!(Dieses Programm benoetigtn( eine RAM-DISKx @2@2^}2@@D8:*.*@ǠAR@C6-6-2_}'6-@36-@?6-CP5-@@#(WINDOW 5-@@M M@P6-@%6-2`}16-@0=6-@"I6-@MP AC6-@6-@'6-@636-@?6-@C2a}P AC6-@6-@'6-@)36-@!?6-@CP AC6-@6-@'62b}-@536-@?6-@CP AC6-@6-@'6-@(36-@ ?6-@CP A2c}"C6-@6-@'6-@436-@?6-@CP, A6C6-@6-@'6-@'2d}36-@?6-@CP@ AJC6-@6-@'6-@336-@?6-@CPT A^C2e}6-@6-@'6-@36-@"?6-@ CPh, A-@@ ,(r')AU2f}*@'' Ap|6-@ PM@P6-@PM@P6-@PM@P6-@P2g}M@P6-@PM@P6-@PM@P6-@PM@P6-@PM@P2h}6-@PM@P6-P"AU ALD8:*.OVL*-@@'AR2i}*8-@@(+-@@5M@P8$έנO67@<@,.=:,&+2j}@+@@0,!B@U:@,A `,@:6-&&@D - (7@2k}<,N-%@&@X - (|7@<,|b l - (7@<,vQ2l}ŭנO67@<@,.=:,+@+@@,!C@U:@,A `,2m}@Q D:WINDEMO.TUR,.=:,+@+@@,!C@U:@,A `,0$PROGRAM WINDEMO;VAR A,B,C,D,E,F,G:INTEGER; AS:CHAR;#I D1:PEEK.I#I D1:DPEEK.I#I D1:POKE.I#I D1:GOTOXY.I#I D1:MARGIN.6o}I#I D1:WIN0OP.I#I D1:WIN0CL.I#I D1:WIN0DEL.I#I D1:WINDOW.Ibegin A:=5; B:=10; C:=10; D:=30; E:=20; F:=PEEK(826p});G:=PEEK(83); WIN0OP(A); WINDOW(B,C,D,E); MARGIN(B+1,D-1); GOTOXY(B+1,C+1); writeln('Anfang'); writeln('des Fens6q}ters'); write('ENDE ?');readln; write('Loeschen (Y/N)');readln(AS); WIN0CL(A); if AS='Y' then WIN0DEL; MARGIN(F,G);6r} GOTOXY(B,E+1);end.');readln; write('Loeschen (Y/N)');readln(AS); WIN0CL(A); if AS='Y' then WIN0DEL; MARGIN(F,G);4FUNCTION DPEEK(ADR:INTEGER):INTEGER;VAR LOCATE:^INTEGER;begin assign(LOCATE,ADR); PEEK:=LOCATE^;end; MARGIN(F,G);8nPROCEDURE GOTOXY(HORIZ,VERT:INTEGER);begin#A LDY #3 LDA (SP),Y STA $54 LDY #5 LDA (SP),Y STA $55 INY LDA (S>u}P),Y STA $56#end;,VERT:INTEGER);begin#A LDY #3 LDA (SP),Y STA $54 LDY #5 LDA (SP),Y STA $55 INY LDA (S<FUNCTION PEEK(LOC:INTEGER):INTEGER;begin#A LDY #5 ;LOC LDA (SP),Y STA T INY LDA (SP),Y STA T+1 ; LDY #0 Bw} ;PEEK LDA (T),Y LDY #3 STA (SP),Y INY LDA #0 STA (SP),Y#end;TA T INY LDA (SP),Y STA T+1 ; LDY #0 @NPROCEDURE POKE(LOC,VAL:INTEGER);begin#A LDY #5 ;LOC LDA (SP),Y STA T INY LDA (SP),Y STA T+1 LDY #3 ;VALFy} LDA (SP),Y LDY #0 ;POKE STA (T),Y#end; ;LOC LDA (SP),Y STA T INY LDA (SP),Y STA T+1 LDY #3 ;VALD3PROCEDURE WINDOW(SPA1,ZEI1,SPA2,ZEI2:INTEGER); (*GOTOXY,POKE,PEEK must be insert*)VAR H,V,Z,Y,W1:INTEGER;begin W1:=PEEJ{}K(752); POKE(752,2); H:=SPA2-SPA1-1; V:=ZEI2-ZEI1-1; GOTOXY(SPA1,ZEI1); write(CHR(6)); for Z:=1 to H do write(CHRJ|}(13)); writeln(CHR(7)); for Z:=1 to V do begin GOTOXY(SPA1,ZEI1+Z); write(CHR(22)); for Y:=1 to H do write(CHJ}}R(32)); writeln(CHR(2)); end; GOTOXY(SPA1,ZEI2); write(CHR(7)); for Z:=1 to H do write(CHR(14)); writeln(CHR(6)J~}); POKE(752,W1);end;2)); end; GOTOXY(SPA1,ZEI2); write(CHR(7)); for Z:=1 to H do write(CHR(14)); writeln(CHR(6)HPROCEDURE MARGIN(LEFT,RIGHT:INTEGER);begin#A LDY #5 LDA (SP),Y STA 82 ;LMARGN LDY #3 LDA (SP),Y STA 83 N};RMARGN#end;N(LEFT,RIGHT:INTEGER);begin#A LDY #5 LDA (SP),Y STA 82 ;LMARGN LDY #3 LDA (SP),Y STA 83 LPROCEDURE WIN0OP(NUM:INTEGER);begin NUM:=NUM+65;#A TXA PHA LDX #$50 LDA #$0C ;CLOSE STA $0342,X JSR $E456 R} LDX #$50 LDA #>WINA STA $0344,X STA T LDA #WINM STA $0344,X STA T LDA #WINN STZ}A $0344,X LDA #