LBLLLL5L L&}lhd`,($ P6.6SFH $%A$% 0"$)$$H hLZ , `e$$%`  R@<1   *  .`y w vh  `"LAx*HH_A XxhAhx0 ɣxLY@xxL,GH`@1`  LCDCH hC DD CDL  9$%8Ct}C$$d%lt%ݬ!}0 $%%$% DDo `z l  2 ~} K >*)L *M  Lz(( LxLz(9)  F LM Lz( L}! 0j   >.B F =<C9:;  .  LxLz H)}L >L ) !JnJnJnJnL JJ '  ' )  .HH)!H h 7. } hy::hy;;  .Li> %L *`/A! H߰")+ݽ " _ $/ }/G@LxLzL H Lx  9  7E`?> ` > L 9) ꩧLz 9 }<=L<) L  ` H)L ݽ f 7L G/Ș ݽLzLx08` }"))8`0 7G$Șݽ(` 8(()$}$%)з`$GȘݽ`H)h<> H^j }i "0%"#hEEd,EiEȱEiE`h`hQEEd, ) E8EȱEE`@  8E > QEEH.}8 *h  `LzLzI $(I0G/IɛILxI  LxECȱE, CqECȊqE}C mI G.G dLisrotceS eerF 9H0 C ) *,=,?, Gh)H<, GȽ>G h>, GȄI:}; mGI` 莗 d   LDC8CD 0IGIDC` p.E} ~i~h 9=H*"" h0Ch h0!)C)д?>Ц} 908.`"%, M"$' HH`L 30"7)0+0,)?i} #,0 !,"   F Lz  LiE9.) ,0Ȯ" $JJJȐEʈE ʽ}Eȩ?E7EȩE, 0EȩE  Ο` ")d*J > N  } C?Cݭ% (    C LiL ,C 9)C9  LiB,   }  :;0 B,   LiLz0CML %ML < NݽLz}LxLzNLMLx.) ;7+ AO  0A`A.L((}Lz,.莖!tHdElF,: hC" ""+ S  Lz) ..})ʎ;;8.| Lz|GH`R   :@`}}$0^:;ȩ$. ȩ "* ??/ɛ   Ýн .`Lz> }.(`XDOS SYS $% $e% LLx=<.,")    8 I0} ` H`  45  )?i@3245, 4224 ܍Ӡ@ԠBX`F5*F5*4*4*Bx)}%`0 s  %0/h F ;G) GȽG % Lz `8H h}LЀ8`  &04.) GLrG)ݸG)ȱGȱG`Ld"!"𴩤Lz`989} " iLRiiLRE`E(  ".) dEE8EF "h( S( },0(`( dEFEi ( 0`Ƀ0.|.C/`C,"0)@D@ @ D!}@( "C8&C C8X`  "675      ,90 l  6 6LD,7,60 P` l"}01  LP P VH Ph`,70"56 076 $ P` nBDE J V,70 D0,6 P#} $ P l`DE60 P BJ V0iߝDEHIB V0K=8۝DEH$}I V3 ,50 V,0H Ph` H hll,0DHEhݝDE%}L8HIHIE VLM,50 YL$9#D:AUTORUN.SYSD:XDUP.SYSE: B V BLV&}` 8#,#0 A"!"LL CED$FCECEDFF@6I6 Ӣ@ԍ` '})`  \`h@)l    QG ɟ 9I/ɞ (}ʎ0H M #IL_99999}!"`ɛ`!"`RUN"D:MAGDISK0.BAS" *}!"`ɛ`!"`RUN"D:MAGDISK0.BAS"  !ql BRBRSTA@@@A6@A6 A,} B7-@32A@7  9@,B68@,-A(-68@,--}B68@,-A((3B7h@!6-A03B7cA026-@#A< APd"".}"6@#A""iF:B2y,"@:2\2@~2@/}2@ Bn)6-%@"@)6-@s)6-&@0}")6-A x96-A6B7b-B7gA`96-A6-8,6-B7g-B7f1}8,;B7`/B7d%@;6-B7aV -@@6@.A%<A`%2}R%@A`%V  A0,0,0,0,0,0,0,0,0,0,0,00,0,0,0,0,0,0,0,0,0,0,0L**162,81,81,81,81,81,91,83}1,81,81,81,81V++102,81,81,81,81,81,108,81,81,81,81,81`//121,81,81,81,81,81,121,91,136,102,144,108j55162,121,144,108,4}136,102,144,108,162,121,182,136t55162,121,144,108,136,102,144,108,162,121,182,136~55204,144,217,162,243,204,243,182,2175},162,204,21755162,121,144,108,136,102,144,108,162,121,182,13655162,121,144,108,136,102,144,108,162,121,182,136%%16}08,0,108,108,0,121,0,0,0,0,0,0%%136,0,136,136,0,144,0,0,0,0,0,0))162,0,162,0,162,0,144,0,144,0,144,0%%136,0,136,07},144,0,162,0,0,0,0,0%%108,0,108,108,0,121,0,0,0,0,0,0%%136,0,136,136,0,144,0,0,0,0,0,0))162,0,162,0,0,162,144,0,18}44,0,0,144%%136,0,136,144,0,162,0,0,0,0,0,0-1 +@@@1B7t@K0@@@9}e0@@0@@@0@@@s0@@@/-@@:}K(@ ]-@@s(@4-@@4(@ŠԠ;}3-@@3(@ŠŠ6-@6(@designed by t.beyerP-@@<},(@ coporight>-@@P(@19907-@#7(@SELECT LAEDT WEITER$0uu=} +@@1B7t@CAu(Fehler Nummer F:A, ist aufgetreten.:u.-@>}A .%D:MAGDISK1.BASD:MAGDISK0.BAS@A(r Nummer F:A, ist aufgetreten.:u.-@I/ & AKB7tA'@A9A@KA @}@%%*******************************%%* (C)1990 *%%* BY BLUE SOFTWARE *% A}%* BLUE SOFTWARE MAGAZIN 2 *%%* 2.SEITE *%%******************************* q+@%@ B}'A9A KA]Aq-@@A!-@@ C}<(@ BLUE SOFTWAREN-@@d(@presentsv-@@(@{-@@ D}   3-@@?A S-@@ W [ o-@@{AT-@@ E}  3-@A7 T-@@6@OAA 'A3AG-@ F}@K O 2 +;@,3'B7tA'@A7 ( (< MENUEK`( G} MENUEF(%-------------------------------------`( BITTE WAEHLEN SIE!PX(-(" A. ATARI BASIC DAS LERNPROGRAMM0(X( H}# B. WOMBEL DAS SPIEL DES MONAT'SZ"(( C. CREATE OF FONT"(d3(0(% D. HAPPY DEMOTIME DAS GRAPHICDEMO3(n I}@+(#BITTE NUR EINEN BUCHSTABEN UND DANN@(RETURN DRUECKEN!st'A'Ax 4A A J} 4B A  4C A0 4D A@ A(DANKE!"-@AP& 8+@ K}%@JA@\A @n-@@(@LOADINGY-@@.(@ atari L} basicB-@APF Y%D:ATARIBAS.BAS(DANKE!"-@AP& 8+@%@JA@\ M}A A%n-@@(@LOADINGR-@@)(@wombel=-@APA R% N}D:WOMBEL.BAS (DANKE!"-@AP& 8+@%@JAA\A An-@@( O}@LOADING \-@@1(@create of fontE-@API \%D:CREATEOF.BAS(DANKE! P}"-@AP& 8+@%@JA@\A @n-@@(@LOADING\-@}xxZAHAD R}  ***ATARI BASIC ******COPORIGHT 1989***$$***PRINTED BY BLUE SOFTWARE***(*****GESCS}HRIEBEN FUER ATARI 800 XL ***2(F+@%@P[0@@@70@@@Q0@@T}@[ @Z5-@5(@ atari basic d/(@/(@ **************** nU}/(@/(@ * PRINTED BY * x/(@/(@ *Š* /(@/(@ ****V}************ /(@/(@ ANNO 1989 /(@/(@ /(@/(W}@ **** -@AP -AP@  +((( *******************X}***********((( ** **((( ** ͠ŠΠՠ **((( ** Y} **((( ** 1.KONTROLLE DES SYSTEM'S **((( ** **((( ** 2.TONBEFEHL *Z}*((( ** **((( ** 3.KONTROLLE D.PROGRAMM'S **"((( ** **,([}(( ** 4.EIN-UND AUSGABEBEFEHLE **6((( ** **@((( ** 5.VERARBEITUNGSBEFEHLE **J((( \} ** **T((( ** 6.GRAPHIC-BEFEHLE **^((( ** **h((( ** 7]}.FUNKTIONEN **r((( ** **((( ******************************())(!ZAHL ^}DES MENUEPUNKTES UND !6-@6-@6-@6-@6-@6-@_}6-@ " A " A " A " A0 " A@ " AP`} " A` A+@%@[0@@@70@@@Q0@a}@@[ A 0-@0(@ 3(@3(@ ŠӠ b} 2(@2(@ ͧ &2(@2(@ 02(@2(@c} MOMENT BITTE :-@A  D-A @ N +P(Q( R(d} ---------S(T++(#BYE(B.) :GEHT AUS DEM BASIC IN DENU((( --------- SELF TEST MODUS UEBER.V-@A e}W(X))(!DOS :ZEIGT DAS DOS MENUE AN Y%%(--------- (NUR BEI DISKETTE).Z-@A [(\))(f}!CSAVE :SPEICHERT EIN PROGRAMM ] (--------- AUF KASSETTE. ^-@A _(`**("CLOAD :LAEDT EIg}N PROGRAMMM VON a (--------- KASSETTE EIN. b-@A c(d))(!SAVE :SPEICHERT EIN PROGRAMM eh} (--------- AUF DISKETTE. f-@A g(h&&(LOAD :LIEST EIN PROGRAMMM i$$(--------- VON DISi}KETTE EIN. j(k-@A  l +v({( ( ----------@A j}(''(LIST (L.):SCHREIBT DAS PROGRAMM**("--------- AUF DEN BILDSCHIRM ODER ))(! STELLT ES EINEM OUTPUk}T-((( GERAET ZUR VERFUEGUNG.-@A (((( ENTER(E.):LIEST DAS PROGRAMM IM %%(--l}------- TASTATURFORMAT EIN.-@A (((( NEW :LOESCHT DEN SPEICHER. ( ----------m}@A ())(!RUN :PROGRAMMSTART IN BASIC ((( --------- (LOESCHT DIE DIMENSIO-((( Nn}IERUNG VON VARIABLEN-((( FELDERN UND SETZT DIE &&( VARIABLEN AUF NULL.)-@A% o} +(( ( ---------(-@A **("CONT :FUEHRT EIN PROGRAMM p}MIT ++(#--------- DER NAECHSTEN NUMERISCHEN''( ZEILE WEITER NACHDEM ,,($ DIE BREAK TASTE GEDRUq}ECKT ))(! WURDE ODER DAS PROGRAMM((( BIS ZUM STOP ODER END %%( AUSGEFUEHRT WURDE. r}%-@A % A(+@%@[0@@@70@@@ Q0@s}@@[ A /-@/(@ 1(@1(@ TONBEFEHL t}!(@!(@ !(@!(@ $1(@1(@ Š .-@u}A 8(B( L( ---------V-@A `(j**("SOUND(SO.):STELLT EINEN DER v}4 TON-t''(---------- KANAELE EIN.DER TON ~++(# WIRD SOLANGE AUSGESTRALT''( BIS EIN NEUER SOUNw}D-++(# BEFEHL FUER DIESEN KANAL))(! ERFOLGT ODER EIN END-,**(" RUN-ODER NEWBEFEHL Ax}US-!!( ZUFUEHREN IST.))(! DIE KANAELE SIND UNAB-**(" HAENGIG VONEINANDER ZU --(y}% PROGRAMMIEREN UND KOENNEN **(" GLEICHZEITIG AKTIVIERT ( WERDEN.((( z} DEM BEFEHL MUESSEN 4 ((( WERTE FOLGEN(ZIFFERN,))(! NUMERISCHE ODER MATHE-))(! MAT{}ISCHE AUSDRUECKE )! (-@A%  +((2( <( ---------F(P-@|}A Z (BSP. :SOUND A,B,C,Dd&&(---------- A=TONKANAL NR.(0-3)n%%( B=TONHOEHE (0-255)x&&}}( C=VERZERRUNG (0-14)''( D=LAUTSTAERKE (0-15)-@A  A+@~}%@[0@@@70@@@Q0@@@[ A .-@.(}@ 0(@0(@ KONTROLLE 0(@0(@ ĠŠ 0(@}0(@ programms 0(@0(@ "0(@0(@ 堠} ,-@A @ +J(T( Š ^( ---------h(r-@A |}&&(GOTO (G.):DIE AUSFUEHRUNG DES ))(!--------- PROGRAMMS WIRD BEI DER ))(! GENANNTEN ZEILENNUMMER  (} WEITERGEFUEHRT-@A (&&(ON...GOTO:DIE AUSFUEHRUNG DES ))(!--------- PROGRAMMS W}IRD BEI DER ''( DURCH EINEN AUSDRUCK ++(# DEFINIERTEN ZEILE WEITER-( GEFUEHRT.}-@A (((( GOSUB :SPRINGT AUF EIN UNTER-**("--------- PROGRAMM MIT DEFINIERTER( } ZEILENNUMMER-@A  +(( Š ( ---------(-@A} ++(#RETURN :BEENDET EIN UNTERPROGRAMM --(%--------- UND SPRINGT AUF DAS NAECHS- ))(! TE DER GOSUB AN}WEISUNG $$( FOLGENDE STATMENT.**(" ԺWERTET DER AUS-))(! DRUCK EINE ZAHL AUS,D}IE--(% KLEINER ALS 1 ODER GROESSER**(" ALS DIE ZAHL DER ZEILEN-**(" NUMMERN AUS,SIND D}IE RE-((( SULTATE NICHT VORRAUS-( SEHBAR!( -@A " +$(}&( Š (( ---------*(,-@A .((( FOR (F.) :DEFINIERT DIE ANFANGS-0++(#--------- }UND ENDWERTE EINER INDEX-2++(# VARIABLEN SOWIE DEN WERT,4++(# DER DIESER JEDESMAL DAZU-6''( } GEZAEHLT WERDEN MUSS,8''( WENN EINE FOR...NEXT-:++(# SCHLEIFE AUSGEFUEHRT WIRD<))(! }DER HINZUGEZAEHLTE WERT>''( IST IMMER 1,AUSSER ER@((( WIRD DURCH EINEN STEP-B((( BEFEH}L ANDERWEITIG BE-D( STIMMT.F**(" EIN NEXT BEFEHL BEWIRKT,H,,($ DAS DIE STATMENTS ZWISC}HENJ**(" FOR UND NEXT WIEDERHOHLTL( WERDEN.N(P-@A Q +R(T}( Š V( ---------X-@A Z(\**("NEXT(N.) :BEENDET EINE FOR...NEXT-^((( --------- S}CHLEIFE.KONTROLLIERT,`**(" DAS DER INDEX-WERT NICHTb++(# GROESSER ALS DER END-WERTd++(# G}EWORDEN IST,ERHOEHT DEN f))(! INDEX-WERT UM DEN STEP-h**(" WERT UND FUEHRT DIE AUS-j))(! }FUEHRUNG DES PROGRAMMS l))(! BEIM STATMENT NACH DEM n( FOR WEITER.p**(" FALLS DER INDE}X-WERT DENr++(# STEP-WERT UEBERSCHREITET,t,,($ WIRD ZUM STATMENT NACH DEMv((( NEXT-BEFEH}L ZURUECKGE-x( GANGEN.z(-@A  +(( Š ( ---------}(-@A ((( POP :LOESCHT RETURN-BEFEHLE**("--------- IM ZUSAMMENHANG MIT DEM ((( } ZULETZT AUSGEFUEHRTEN ( GOSUB-BEFEHL.(-@A ((( IF...THEN:DAS STATMENT NA}CH THEN((( --------- WIRD DANN AUSGEFUEHRT,--(% WENN DIE BEDINGUNG ZWISCHEN''( IF UND THEN WAH}R IST.++(# SONST WIRD ZUR NAECHSTEN &&( ZEILE UEBERGEGANGEN.(-@A  }+(( Š ( ---------(-@A ''(TRAP(T.) :MIT EINEM TRAP-BEFEHL**}("--------- KOENNEN ANWEISUNGEN FUER++(# DEN FALL EINER FEHLERMEL-&&( DUNG GEGEBEN WERDEN.(}-@A ))(!STOP :STOPPT DAS PROGRAMM UND,,($--------- DRUECKT DIE ENTSPRECHENDE ##( } ZEILENNUMMER AUS.**(" SCHLIESST DIE DATEI UND ''( DIE TONKANAELE NICHT.++(# PROGR}AMM KANN ERNEUT MIT ''( CONT WIEDER BEGONNEN ( WERDEN.(-@A  +}(( Š ( ---------(-@A **("END :BEENDET DAS PROGRAMM UND))}(!--------- SCHLIESST ALLE OFFENEN ))(! DATEIEN UND TONKANAELE.((( DAS PROGRAMM KANN MIT ''(} CONT ODER RUN ERNEUT ##( GESTARTET WERDEN.(-@A  A) A} +@%@ [0@@@ 70@@@Q0@@@[ A0 '-}@'(@  .(@.(@  .(@.(@ EIN-UND AUSGABE- .(}@.(@ BEFEHLE  .(@.(@  .(@.(@ }  .(@.(@  .(@.(@ ***  -@A } + ( ( Š  ( --------- ( -@A  (έĠź ( ( G}ERAETENAMEN ( ------------ ( ''( =TASTATUR (NUR FUER EINGABE) ( ''( =DRUCKER (NUR FUER AUSGABE) }( ''( =KASSETTE (EIN- UND AUSGABE) ( ))(! =BILDSCHIRM (NUR FUER AUSGABE) ( ++(# =BILDSCHIRM - BEARBE}ITUNGSGERAET &&( TASTATUR KOMBINIERT MIT TV ( (EIN- UND AUSGABE) ( ,,($ =RS 232 HANDLER (ATARI INTER}FACE- %%( MODUL) (EIN- UND AUSGABE) -@A  + ( ( Š  ( --------- }-@A  ( ''( =DISKETTE (EIN- UND AUSGABE) ( $$( IJ=DISKETTENSTATION 2 (EIN- ( UN}D AUSGABE) ( -@A  +& (0 ( Š : ( ---------D (N -@A} m ))(! EINIGE PRAKTISCHE ERWEITERUNGEN:n ))(! --------------------------------o (p ''( =MIT DER FUNKTION } VER-q ##( SEHENES BASIC PROGRAMMr (s ''( =MIT DER FUNKTION VER-t ##( SEHENES BASIC-PROGRAMMu }(v %%( =ALLGEMEINE DATEN DATEIENw (x &&( =MASCHIENENSPRACHE-DATEIENy ( (OBJECT FILES)z ({ ( }=TEXT DATEIEN~ -@A  + ( ( Š  ( --------- -@A } $$(EIN- UND AUSGABEBEFEHLE(I/O) $$(---------------------------- ( **("OPEN (O.):BEREITET EIN GERAET FUER ,,(}$--------- DIE EIN- ODER AUSGABE VOR. ((( DIE IOCB-NUMMERN SIND  ))(! 1-7.VERWENDET FOLGENDE  (} CODES: !!(  !!(EINGABE 4 NUR EINLESEN ""(AUSGABE 8 NUR SCHREIBEN ++(#}UPDATE 12 EINLESEN UND SCHREIBEN ))(!APPEND 9 ZUSATZ ZUM DATEIENDE ,,($DIRECTORY 6 NUR INHALT DER DISKETTE }( ''(INPUT(I.):LIEST EINE ZEILE VON  ++(#--------- DATEN AUS DEM GERAET EIN. ))(! DIESE ZEILE MUSS DURCH } ,,($ EIN -ZEICHEN BEENDET ( WERDEN. -@A  + ( ( }Š  ( --------- ( -@A  ,,($PRINT (?):LAESST DATEN AUF DEM BILD- ++(#--------- SCHIRM }ODER EINEM ANDEREN **(" DURCH OPEN VORBEREITETEM $$( GERAET ERSCHEINEN. ( ))(!LPRINT :DRUCK}T OHNE OPEN-BEFEHL &&(--------- AUF DEM DRUCKER AUS. ( **("GET :HOHLT EIN EINZELNES BYTE ++(#--------- AUS} DEM BESTIMMTEN GERAET &&( UND SETZT ES IN DIE  **(" DEFINIERTE VARIABLE EIN. ( **("PUT }:SETZT DAS EINZELNE BYTE  ((( --------- AUS EINER NUMERISCHEN  ''( VARIABLE IN EIN DEFI- %%( NIE}RTES GERAET EIN. -@A  + ( ( Š  ( --------- ( -@A}  ))(!NOTE(NO.):WIRD BEI DISKETTEN VER- ,,($--------- WENDET ZUR BESTIMMUNG DES  **(" ORTES DES NAECHSTE}N EIN- ((( ZULESENDEN ODER EINZU- %%( SCHREIBENDEN BYTES. ( ((( POINT(P.):WIRD VERWENDET,UM }  **("--------- MITZUTEILEN,WO SICH DAS  ,,($ NAECHSTE EINZULESENDE ODER ''( AUSZUSCHREIBENDE }BYTE ( BEFINDET. ( **("STATUS :STELLT DEN STATUS EINES  ++(#--------- GERAETES FEST.DIE STATUS- }((( CODEI SIND DER TABELLE ))(! ZU ENT- ( NEHMEN. ( -@}A  A+@%@[0@@@70@@@Q0@@@}[ A@%-@%(@ -(@-(@ VERARBEITUNGS--(@-(@ } BEFEHLE -(@-(@ -(@-(@ moment bitte -(@-(@} **** -@A  +(( Š ( ---------(-@}A ++(#LET :WEIST DEN VARIABLEN WERTE( --------- ZU.(%%(POKE :SETZT GANZE ZAHLEN ,,(}$--------- ZWISCHEN 0 UND 255 IN EINE''( ZU BESTIMMENDE STELLE$$( DES SPEICHERS EIN.((( } PEEK WIRD ENTSPRECHEND))(! ZUM LESEN DER SPEICHER-##( STELLE VERWENDET.(!!(COM } :ENTSPRICHT .( ---------''(CLR :LOESCHT DIE DIMENSIO-**("--------- NIERUNG ALLER VARIABLEN-))(! } FELDER UND DATENKETTEN.(-@A  +(( Š ( ---------(}-@A ))(!DIM :RESERVIERT IM SPEICHER ((( --------- PLATZ FUER STRING-UND ,,($ N}UMERISCHE VARIABLENFELDER))(! JEDER ZWISCHENRAUM,DER &&( FUER EINE DATENKETTE++(# RES}ERVIERT WURDE,BRAUCHT ((( EIN BYTE;JEDES ELEMENT&&( IN EINEM NUMERISCHEN,,($ VARIABL}ENFELD SECHS BYTES.(''(DATA (D.):STELLT EINE LISTE DER++(#--------- DURCH DIE UNTEN ERWAEHNTE**(" }READ-FUNKTION ZU VERWEN-((( DENDEN ZAHLEN UND/ODER( STRINGS AUF.-@A  } +(( Š ( ---------(-@A ++(#READ :LIEST EINZELN DIE NAECHS-},,($--------- TE POSITION IN EINER DATA-**(" ANWEISUNG UND WEIST SIE %%( EINER VARIABLEN ZU.}(((( RESTORE :WEIST HIN AUF IN ''(--------- EINER DATA-ANWEISUNG.(&&(REM (R.) :ERLAUBT ANMERKUNGE}N.,,($--------- ALLES WAS HINTER STEHT**(" WIRD VOM BASIC NICHT BE-( ACHTET.("}-@A  A+@%@[0@@70@@@Q0@@}@[ AP$-@$(@ -(@-(@ GRAPHIC-BEFEHLE-(@-(@} +(@+(@ -(@-(@ bitte warten -(@}-(@ *** -@A  +(( Š ( ---------(-}@A ''(GRAPHICS :WAEHLT DEN -(---------- MODUS. **(" MODUS 16 ERGIEBT EINEN }))(! UNGETEILTEN BILDSCHIRM++(# (OHNE TEXTFENSTER);MODUS((( +32 LOESCHT DEN BILD-} ( SCHIRM NICHT.(++(#SETCOLOR :BESTIMMT DEN FARBTON UND))(!---------- DIE HELLIGKEIT DES GE-*}*(" WAEHLTEN FARBREGISTERS.**(" DIE REGISTERNUMMER IST **(" NICHT DIESELBE WIE BEIM} ( BEFEHL!-@A  +(( Š ( ----------@}A (((( COLOR(C.) :AUS DEM GRAPHIC-MODUS,,($---------- (3-11)WIRD EIN FARBREGIS-++(# TER FUER} DIE VERWENDUNG ++(# IM -BEFEHL GEWAEHLT.**(" DAS REGISTER ENTSPRICHT))(! HIER} NICHT DEMJENIGEN ( IN SETCOLOR.((-@A  +(( Š }( ---------(-@A ))(! GRAPHICS-MODUS UND BILDSCHIRM-))(! FORMATE } ))(!*********************************(++(# GR.-MO-| MODUS/ |SPALTEN|ANZAHL ++(# DUS | TYP | } |FARBEN ++(# _______________________________ ))(! 0 | TEXT | 40 | 1-1/2))(! 1 | TEXT |} 20 | 5 ))(! 2 | TEXT | 20 | 5 ))(! 3 |GRAPHICS| 40 | 4 ))(! 4 |GRAPHICS| }80 | 2 ))(! 5 |GRAPHICS| 80 | 4 ))(! 6 |GRAPHICS| 160 | 2 ))(! 7 |GRAPHICS| 16}0 | 4 ))(! 8 |GRAPHICS| 320 | 1-1/2))(! 9 |GRAPHICS| 80 | 1 ))(! 10 |GRAPHICS| 80 } | 9 ))(! 11 |GRAPHICS| 80 | 16 ))(! 12 |GRAPHICS| 40 | 5 ))(! 13 |GRAPHICS| 40 |} 5 ))(! 14 |GRAPHICS| 160 | 2 ))(! 15 |GRAPHICS| 160 | 4 -@A  +}(( Š ( ---------(-@A ((( PLOT(PL.):SETZT EINEN EINZELNEN ++(#-}-------- PUNKT ODER EIN ZEICHEN AN((( EINE BESTIMMTE STELLE %%( AUF DEM BILDSCHIRM.(-}@A ))(!POSITION :WAEHLT EINE BILDSCHIRM-**("--------- POSITION,ES WIRD JEDOCH &&( NICHT} AUFGEZEICHNET.,,($ DIES IST FUER DIE POSITIO-))(! NIERUNG DES TEXTES MIT ""( N}UETZLICH.(-@A  +(( Š ( ---------(-@A} ++(#LOCATE :FINDET DATEN,DIE AN EINER))(!--------- SPEZIFISCHEN STELLE AUF,,($ DEM BILDSCHIRM GESPE}ICHERT((( SIND.VERWENDET IN DEN &&( MODI 3-11 FARBWERTE.(-@A ++(#}DRAWTO :ZIEHT EINE LINIE ZWISCHEN**("--------- DER LETZTEN POSITION DES((( CURSORS UND DER SPEZI-++(#} FIZIERTEN X-Y KOORDINATE.((( DER CURSOR SPRINGT ZUR!!( ZIELKOORDINATE.(-@}A  +( ( Š  ( --------- ( -@A  %%( TABELLE} DER SETCOLOR %%( DEFAULT(FEHL)-FARBEN ++(# *********************************())(!SETCOLOR|FEHL- |H}ELLIG-|RICHTIGE ))(! FARBEN-|FARBEN| KEIT |FARBE ))(!REGISTER| CODE | | ++(#___________________}________________-@@ ++(# 0 | 2 | 8 |HELLORANGE -@@ ++(# 1 } | 12 | 10 |GRUEN -@@ ++(# 2 | 9 | 4 |BLAU -@@} ++(# 3 | 4 | 6 |LILA -@@ ++(# 4 | 0 | 0 |SCHWARZ -}@A   +!("( Š #( ---------$(%-@A &##( }ɭ ),,($*(+,,($ Farben |Werte|Farben |Werte ,,,($ --------}------------------------ -,,($ hellgrau | 0 |goldgelb | 1 .,,($ helloran.| 2 |pink | 3 /,,($ l}ila | 4 |flieder | 5 0,,($ hellblau | 6 |blaurot | 7 1,,($ himmelbl.| 8 |azurblau | 9 2},,($ tuerkis | 10 |grasgruen | 11 3,,($ gruen | 12 |gelbgruen | 13 4,,($ oliv | 14 |ocker | 15} P-@A o Ap+@%@r&-@&(@ s-(@-(@} FUNKTIONEN t-(@-(@ u-(@-(@ v-(@}-(@ w-(@-(@ **** x-@A z +}(},,($,,($ ,,($ } ,,($ ,,($ = ARITHMETISCHE FUNKTIONEN ,,($ } ,,($ = TRIGONOMETRISCHE FUNKT. ,,($ ,,($ = BESONDER}E FUNKTIONEN ,,($ ,,($ = STRING-FUNKTIONEN ,,($ } ,,($ = STEUERGERAETEFUNKTIONEN ,,($ ,,($ } = SPEZIELLE FUNKTIONSTASTEN ,,($ ,,($ =BEARBEITUNGSFUNKTIONEN },,($ ,,($''(MIT ZURUECK ZUM HAUPTMENUE ! }++(#DRUECKE JEWEILIGEN MENUEPUNKT+RET.!(6-@6-@6-@6-@6-@}6-@6-@6-@ " A " Aa " Ab " Ac } " Ad " Ae " Af " Ag A` +@(&&(  } Š -@A  +(( Š ( ---------(-@ }A ,,($ABS :GIEBT DEN ABSOLUTEN WERT EINER(----- ZAHL AN.(-@A ((( CL }OG :GIEBT DEN LOGORYTHMUS ZUR (----- BASIS 10 AN.(-@A ,,($EXP :GIEBT DEN WERT UM DEN  }SPEZIFI-**("----- ZIERTEN FAKTOR POTENZIERTEN ((( VON'e'.DIESE FUNKTION IST ((( REZIPROK ZOR FUNK}TION.(-@A ))(!INT :GIEBT DEN GANZZAHLIGEN WERT!!(----- EINES AUSDRUCKS AN.-@}A (**("LOG :GIEBT DEN NATUERLICHEN LOGA-&&(----- RYTHMUS EINES WERTES AN.++(# DIESE FUNKT. I}ST REZIPROK DER( FUNKT..-@A  +(( Š ( ---------}-@A (((( RND :GIEBT EINE ZUFALLSZAHL,DIE((( ----- GLEICH ODER GROESSER'0'UND**(" KLEINE}R ALS '1'IST (DER WERT##( HAT KEINEN EINFLUSS).-@@ (**("SGN :GIEBT EINE -1,FALLS DER }WERT**("----- NULL IST UND EINE 1,FALLS ER( POSITIV IST-@@ ())(!SQR :GIEBT DIE }POSITIVE QUADRAT-,,($----- WURZEL EINES POSITIVEN WERTES.(-@A  A`8 +@9}(:**(" Š ;-@A < +=(>( Š ?( ---------@}(A-@A B**("ATN :GIEBT DEN arc.TANGENS EINESC**("------ WERTES IM BOGENMASS ODER IMD( } WINKELMASS AN.E-@A (F''(COS :GIEBT DEN COSINUS EINES G(------ WERTES AN.H-@}A (I++(#RAD :ALLE TRIGONOMETRISCHEN FUNK-J))(!------ TIONEN WERDEN IM BOGENMASSK++(# VERARBEI}TET,SOFERN NICHT L!!( AUSZUFUEHREN IST .M-@A (N++(#DEG :ALLE TRIGONOMETRISCHEN FUNK}-O++(#------ TIONEN WERDEN IM WINKELMASS P( VERARBEITET.Q-@A (R++(#SIN :GIEBT DEN} SINUS EINES WERTESS( ------ AN.T%-@A % Ab2U''(TAN :GIEBT DEN TANGENS EINES V(----}-- WERTES AN.W%-@A % A`X +Y(Z( Š [( ---------\-@A} (] Ab) +@())(! Š %-@A %+(}( Š ( ----------@A (++(#ADR :GIEBT DIE DEZIMALE SPEICHER-((( ------ ADRE}SSE DES ANFANGS EINER""( STRINGVARIABLEN AN.-@A (++(#FRE :GIEBT DEN DEZIMALEN WERT  }DES%%(------ VERFUEGBAREN ͧ AN.-@A (&&(PEEK :GIEBT DEN INHALT EINER !!(------ SP!}EICHERSTELLE AN.-@A (((( USR :RUFT PROGRAMMIERSPRACHEN-((( ------ SUBROUTINEN VON AB"}.-@A  + A` +@(++(# Ǡ %-#}@A %+( Š ( ----------@A ())(! :GIEBT DEN ATASC$}II-WERT  ,,($--------- FUER DAS ERSTE ZEICHEN EI- ""( NES STRING'S AN. -@A ( ++(#%}Ҥ :GIEBT DAS DURCH DEN ANGE- **("--------- SPROCHENEN ATASCII-WERT %%( VERTRETENE ZEICHEN.**(" &} REZIPROKE FUNKT.VON ASC.-@A (''( :GIEBT DIE LAENGE DER ""(--------- STRINGVA'}RIABLEN.-@A (,,($Ҥ :GIEBT DEN STRING EINES AN-))(!--------- GESPROCHENEN WERTES AN.(}-@A (++(# :GIEBT DEN WERT EINER ZAHL,,($--------- N,DIE EINE BESTIMMTE KETTE( )} DARSTELLT.-@A c A`d +@e(f&&( g-@*}AP h +i(j( Š k( ---------l-@A (m++(#PADDLE :NENNT D+}IE POSITION EINES n++(#--------- PADDLES.DIE PADDLES SIND o**(" VON VORN NACH HINTEN VONp**(" 0-3 ,}NUMERIERT.DIE ERHAL-q**(" TENE ZAHL LIEGT JE NACH r++(# STELLUNG ZWISCHEN 1 (MIN)s ( UN-}D 228 (MAX).t-@A (u++(#PTRIG :GIEBT EINE 0(NULL)BEI GE-v''(--------- DRUECKTEM ODER EINE 1.}w++(# (EINS)BEI NICHT GEDRUECK-x( TEM PADDLE.y-@AP z +{(|( /} Š }( ---------~-@A (**("STICK :NENNT DIE POSITION EINES))(!--------- JOYSTICKS0}.DIE JOYSTICKS**(" HABEN DIE NUMMERN 0 UND/((( ODER 1 VON VORNE NACH ( HINTEN.1}-@A (++(#STRIG :GIEBT EINE 0(NULL)BEI GE-++(#--------- DRUECKTEM ODER EINE 1 BEI,,($ 2} NICHT GEDRUECKTEM JOYSTICK**(" DIE JOYSTICKS HABEN DIE ))(! NUMMER 0(NULL) UND/ODER( 3} 1.%-@A % Ae A` +@(&&( Š %-4}@A %+(( Š ( ----------@AP (((( (ESCAPE) IST IN 5}DER FUNKTION **("VOM JEWEILIGEN PROGRAMM ABHAENGIG.-@A (((( DIENT ZUM ABBRUCH SELBSGE-6}(SCHRIEBENER PROGRAMME.-@A ())(! UNTERBRICHT DEN PROGRAMMAB-++(#LAUF UND FUEHRT 7}ZUM ANFANG ZURUECK.-@A (**("ԭҭ BEWEGT DEN CURSOR ZUM %%(NAECHSTEN,VORHER FESTGELEG8}TEN(TABULATOR STOP.-@A (''( ԭҭ LOESCHT EINE (TABULATOR-STELLE.9}-@A (**(" MIT UNTERBRICHT DIE AUS-++(#GABE AUF DEM BILDSCHIRM,NOCHMALIGES((( DRUECKE:}N SETZT DIE AUSGABE FORT.-@AP  +(( Š ( ----------@A;} (((( MIT LAESST EINEN SUMMER( ERTOENEN.-@A ())(! MIT MARKIE<}RT DAS DATEN-##(ENDE (EOF)NACH DER EINGABE.-@AP + A`, +@-(.$$( =}Π/%-@AP %+0(1( Š 2( ---------3-@A (>}4))(! MIT FUEGT EINE LEER-5''(ZEILE OBERHALB DES CURSORS EIN.6-@A (7))(!?} MIT DIENT ZUM EIN-8(FUEGEN VON LEERZEICHEN.9-@A (:++(#Šˠ BEWEGT DEN C@}URSOR;))(!NACH LINKS UND LOESCHT VORHANDENE<(ZEICHEN.=-@A (>++(# UND ŠˠA} LOESCHT?((( DIE ZEILE,IN DER SICH DER CURSOR@( BEFINDET.A-@A (B&&( UND ŠB}ˠ C,,($LOESCHT DAS ZEICHEN UNTER DEM CURSORD((( DIE ZEICHEN RECHTS RUECKEN NACH.E(-@AP %+C}((F( Š G( ---------H(I-@A J((( MIT ODER MITK%%(D} LOESCHT DEN BILDSCHIRM.L-@A (M++(# UND BEWEGEN DENN,,($CURSOR IN DIE ANE}GEGEBENEN RICHTUNGENO''(OHNE DIE DARUNTER BEFINDLICHEN P(ZEICHEN ZU LOESCHEN.Q%-@AP % AgF} A`D:ATARIBAS.BASE DARUNTER BEFINDLICHEN P(ZEICHEN ZU LOESCHEN.Q%-@AP % Ag#!"R_f_PPXYCFVZXVKNXXYCXYXYSSSPITXYVAACCRLCDHIRAREPLRERRRVSPH}A I}J} !"#$%&'()*+,-.K}@/@0@123456789:""L}""| W O M B E L |""""㩠ǠҠ""M}""| ATARI 800XL + Joystick |"" B   Ap6-N}Š!6-F:B2R,!6-F:B2S,16-F:A,!6-F:A,12@(`"@)O}"@+A(AV76-@7C6-A6` A%F:A ,$A2`"@)"@+A(@7P}6-A5C6-A ` A%F:A ,$A<BB"@)"@)"@)"@)F:B2c,!A F H:Q},! APK! !6-&?P! AMi A ,@%,@A6-P:H:,$@,%@KAqW,R}@c,@i6-Pm@-@(>(@@P&F:@, P@@mF:@,"@PS}A UK !6-&@! A'9AA$KAaAdZ;2@B2x%6-1T}@w; @ _̠d!@nJ6-P:$@%@Q,(B2RJ2@@P@@U}x//!F:A,* F:A,%@A B2R @˯ΠԠȠ;6-P:H:,$@V},%@;6-P:H:,$@,%@$ 1!A5*@$$;6-P:H:,$@,&@;6-P:H:,$@W},&@(1%%%@2*A5($5%2@A!@@/@25,S 6-%6-%X}Ab#,E2@AU@@S-@"33F:B2R,"@)F:B2S,"@A % ' Y} ,2@ $)ӠȠӠ,e#6-+&@H,'@%?96-'@&@O6-$@%@Z}He6-$@%@1+"@71+"@dA p6'1%@'@2A@[A[}A'A1@27,C6-@ O6-@P[B2xJQ6-%@!-%@)6-&E2@\}@@QAOAF:B2c,"@"76-F:B%&@,A A TM  6-6-%@)]}6-%@91%@M"@2A0^r ,A%AB-@@6?@^2@^}A@b r2@h-A A-@7@rM @1%@)"@79_}1%@M"@7AGw)1%@"@7) AP|)1&@"@7) A` @`}ӠȠӠe#6-+&@H,'@&@96-'@&@O6-$@%@He6-$@%@a}+"@71+"@dA p1 A1&@1@2A[AAb}'A1@27,C6-@$O6-@[B2xZ6-%@*-&@6@26-&N2@c}@@ZAAF:B2c,"@"76-F:B%&@,A A W  6-6-&@)6-d}&@3 APC1&@W"@2A0r ,A%AB-@@6?@^2e}@A@b r2@-A A-@7@M @1&@)"@f}791&@M"@7AG)1%@"@7) AP)1&@"@7) A`g} @ΠȠΠ]6-+&@H,'@16-'@&@G6-$@%@H]6-$@%@q}B%XDOS SYSB)AUTORUN SYSB+MAGDISK0BASB?MAGDISK1BASBQATARIBASBASBGWOMBEL BASBKHAPPYDEMBASBN]CREATEOFBASB BLSOFTZEZEIB ZEICHEN2DATB PROGTESTBAS+"@71+"@dA p'1&@'@2A[AA'A1r}@27,C6-@(O6-@P[B2xZ6-%@*-&@6@26-&N2@@@s}ZA06-F:B2c,0"@)"@A M  6-6-&@)6-&@91&@M"t}@2A0&r ,A%AB-@@6?@^2@A@b r2@u}0-A A-@7@:M @1&@)"@791&@M"@7AGv}?)1%@"@7) ApD)1&@"@7) AN @SΠȠΠXU6w}-+&@H,'@)6-'@?6-$@%@HU6-$@%@]+"@71+"@dA pbx}'1%@'@2Al[AA'A1@27,C6-@2O6-@[B2xy}vY6-%@)-%@@16-&M2@@@YA{06-F:B2c,0"@)"z}@A M  6-6-%@)6-%@91%@M"@2A0r ,A%A{}B-@@6?@^2@A@b r2@-A A-@7@|}M @1%@)"@791%@M"@7AG)1%@"@7) Ap)1}}&@"@7) A @ΠԠȠƠ"@7A 4 -@@ 6@~}4-AA F:B2c,"@A ;2@@#,' + ;2@ @2}, @,1%@"@7"', AG,1&@"@7"', AG$,1&}@"@7"', AG,1%@"@7"', AG$,1%@"@7"', AG},1&@"@7"', AG $ ,1&@"@7"', AG,1%@"@7}"', AG-@(@$ŠԠ֠  T:, $*X2@%AF@}<-A6@ X2@@@/O 2@%6-&@+ =AA$OAa}Ad4 F:A ,%A)>C#6-+&@H,'@%@96-'@&@C A@?C#6-+&@H,'@}&@96-'@&@C A@@;6-+&@H,'@16-'@&@; A@A;6-+&@H,'@}16-'@%?P; A@H, 1@)AFA,$Rx-@06@H2@%@}@@&'@TB7`nP:H:,$@,%@'t,x \+2@!6-%@P+ Af( @2},%AFA($ΠԠMAF@%2@52@C6-%AM} A6-@6@6-@pA@UB%&@72@$@@; Q}B3%&@U .B%&@+AFA.$ŠΠcAaAe'B}Ai5-@c2@$@@@&'@E-@ )A$@- ;6-%}AE AQ @2,6-6-1AA6A2@G6-Q @Ǡ% }#B6-A(%6-A6C-B5B7R@+@?%@@C C-BV8BX@}+@?%@@C /-B`BW"!% /#B$%-BB"!% }.'6-AD6-$AV'#B8>-A6Ah"!% 46-?:A6,>#BB""6@$}L5-@"'%%$@+ 5 AΠ6-A(6-A6-AIA@}%%#BP%P:H:,$@,$@M-@")A$@;$AV%%M$AV%%  } #A@%$@G-@ "3B%$@%@H9"GB%K/B3%P:H:,$@},$@%@=BS%KB#%BC%%$@  $F0,0,0,0,0,0,0,0,6,0P0,0,0,0,8},0,0,0,0,17Z0,0,0,0,9,0,0,5,11,0d0,0,13,4,0,16,0,6,0,0n5,0,12,0,0,9,0,0,13,6x0,7,0,17,10,16,0,6,0,11}0,5,9,16,10,0,12,0,11,170,4,12,7,0,8,7,7,12,410,16,0,16,4,3,4,10,9,119,16,5,14,3,15,5,17,2,1310,3,9,}10,15,14,8,7,6,1414,8,14,8,8,6,15,2,3,172,6,15,5,9,17,2,5,11,1513,9,12,5,2,15,10,6,17,15 6,12,11,8,10,}11,13,17,12,4 11,7,9,17,10,16,15,6,17,11 17,5,9,16,10,17,12,7,11,1711,4,12,7,13,8,14,7,12,410,16,15,16,}4,3,4,10,9,11ΠΠ52@A8)25B2QM-AAp@;2@}@@MBByA2M'2@$@P@@9BByA6= M2@5-}@B2H%# 1-A5 /2@!6-&@/"A U +@ AP#6-@}/6-@56-A6-A K Ap U @ ŭŠAA8-@+B2H%/ }ABBAU@+AY1AR@CA AUAAgAA6yA}A(AVa%6-F:A`,%AV$F:Aa,9%@@M%@@a%@(@}11((''''''''''''''''''''''''''''''''''''''''11(>:A@, w o m b e l >:A@,11((''''''''''''''''''''''}''''''''''''''''''11(>:A@,(C)BY J/RG L/FFLER>:A@,11((''''''''''''''''''''''''''''''''''''''''11((}' '(-@((' %@. oC(7$@%@<$@%@,}..Level:..........._-@%$@%@o(8%@,38%@,8%@,3(-8%@,"K6-+}@8&B:=:8%@,,,,+@$%@,K(8%@, ',51((' '5 61}1(('''''''ȠΠϠš'''''''@KB2w@'A@9A@@KBByA6h1}-@2 1AY@br%%#AD%P:H:,$@,$@|_ "'2@@@C2@}@@_2@@@,-@@0T:," , ABH -ApA`6? },B7c8B7eDB7gH  AP$6-@96-@% AC16-@2=6-@G} ACS6-@2_6-@i ACu6-@96-@! ACW6-@!-@@K($% Press STA}RT to begin a new game! %WARR-@@R(!Press SELECT to choose 1st LEVEL >:A`,>:Aw,"}F:B2y,"@" AC.F:B2y,"@$AY. ACP ACa 6-6-6-+6-?v&$}?A6-@`&$@W6-@&$?%a AP$)6-%@"@)6-@!u-@6@}%(>:%Av,B-AP@P6@^2@@@b r2@u$&X-@-@7}%(>:,A2@@@Q2@U X$096,121,162:128,91,81D121,96,81N144,121,96}X108,91,72b182,144,121l121,162,193v128,91,81144,193,243121,144,182128,162,182\}̠Ԡ_0$6-+@P&F:@,,$A0B2RajA820-@6@>-@F0}f2@$@%@j fS -@#B2H%' 72@A+@SAA}pUA A"!A3AY@bU6-F:A`,%AV$F:Aa,zS%@@+%@ @}?%@@S%@#@.-@@.(@ w o m b e lxAVA'-@@}g(@ (c) 1986 by J>:@,RG L>:@,FFLERx6-P:,$A,-@@,(@LEVEL: },-@@,(@SCORE: ,-@@,(@bonus: G 2-@@G(}@ȠΠϠšq 6-6-@!6-@'6-/6-%=6-%@K6-%@Y6-%@}e"@q6-@"@ 6-@)6-&? ?0)6-?0)6-&@ @ )6}-@ )6-&?% @)6-@-6-@ AB# Ap - @ ĭՠs +}@AY+AA$=A @ OAA aAR@sA#@^-6-F:A`},%AV$F:Aa,&@JA`F:A`,&@^%@@oA#%@@f:%@}F:@,Q%@F:@,]AVo@@x-%@%@,F:,%A(0 BA@}TAARfAY@bxAaAdG-@%(@SCORE:1-@G(@LEVE}L:S-@@*(@TIME:50<-@@S(@LIVES:w A,@#A 5,}@@G/@@QA!c,@@w#AP%$A Ar,@@1/@@};A"M,@@WA i,@@{/@@A#,@Q Ar,@}%/@/Aq;,@G,@QA54 ""@'BBA1 Ae4$ "  }APu  ,O:, APu / APu̠ -18,12,16,12,16,6,12,6,-12 12,14,10,-3,12,8,1}2,-2,5,210,5,10,5,8,10,8,10,11,-5 !!3,5,7,7,7,7,4,15,4,15,3,-18 4,18,8,0,2,-1,3,1,8,-4,7,7!!7,-11,5,13,5,-1},11,-12,7,12(!!8,-17,5,17,11,-11,12,9,12,0237,-2,11,-11,8,-16,4,99K̠P-1,3,4,3,4,4,6,4,6,6,1,6Z}1,8,3,8,-2,12,5,12,5,10,9d 10,9,11,-14,12,14,10,17,10n!!-8,8,18,8,18,4,12,4,12,3,10x3,10,7,0,2,-7,9,10,9,-13 }12,11,12,-8,12,8,11,-4,9,47,-3,5,3,4,-7,3,9,3,-16,3 16,5,-12,5,12,7,0,37,-15,6-16,11,-4,10,99̠}-1,12,10,3,18,11,18,12,-4 12,7,12,-13,12,9,12,9,9,12 9,12,6,8,6,-6,3,9,3,-2,4,28,4,8,-15,4,17,4,17,7,0},2!!-4,3,5,3,-3,5,3,7,5,7,-5,11!!8,11,8,8,8,11,5,11,-13,5,14!!6,14,11,18,11,0,37,-17,4,-79,-2,8,99}̠!!-2,6,2,3,10,3,-4,5,5,5,-2,9"!!4,9,4,11,2,11,2,10,-8,10,10,10,-8,6,10,6,10,8,8,8,8,76 -9,12,-11,12,-13},12,-15,10@ 18,10,18,8,-15,4,17,4,17,6J 15,6,15,5,0,2,-1,8,7,8,7,5T10,5,-12,7,18,7,-17,12,18^!!12,-1,12,7,12,}0,37,-16,5,-9h7,-3,10,99w̠|!!-8,3,8,4,10,4,10,3,-14,3,14 5,18,5,18,3,-1,4,5,4,5,7,1!!7,1,5,-2,8},2,11,1,12,3,12,3!!12,7,8,-12,7,17,7,17,9,15,9!!15,11,18,11,-8,9,8,12,-10,9!!10,12,0,2,-1,3,3,3,-9,3,-11!!3,1}3,3,-15,3,15,4,-2,6,-4,6 -6,6,6,8,4,8,3,9,3,10,-9,9!!-7,11,-9,12,-11,12,18,12,-8!!5,-11,6,15,6,-17,5,17,6,-13}8,15,8,0,37,-16,4,-6,6,-9 11,99̠-1,4,5,4,5,9,7,9,7,6,12,6-18,3,15,3,15,4,-18,10,15 10,}-13,10,13,11,11,11,11,8!!9,8,9,11,3,11,3,6,1,6,-3,126,12,0,2,-16,12,-9,12,-910,-9,12,-2,12,-1,8,1,10-3,}8,3,10,-5,3,-11,4,11,5&10,6,-13,9,13,5,18,5,0,370-12,11,-10,4,-2,9,99?̠D -1,12,5,12,5,10,3,10,3,8,}8N 8,8,6,1,6,1,3,14,3,14,7,18X 11,18,12,-9,12,9,8,12,8,12b 4,-12,12,14,12,14,10,-16,4l!!18,4,18,6,0,2,-13,4,13},8,14v8,-10,4,7,4,7,5,4,5,-16,7 18,7,-5,7,7,7,-2,11,2,9,-79,8,9,-8,11,7,11,7,12,-16!!10,16,11,0,37,-2,4,-}6,9,-16 10,99̠ -8,4,16,4,16,12,7,12,3,8,7!!4,11,8,8,11,-2,12,2,4,-17,4 18,4,-17,12,18,12,-1,}8,0,2-5,3,9,3,-14,3,18,3,-18,7!!17,8,18,9,-13,8,15,8,-3,5,4!!5,4,6,-10,10,10,12,-14,5,14 6,10,6,-1,9,1,12,}-5,8,5,110,37,-2,4,-17,6,-17,10,99̠ !!-4,6,4,3,1,3,1,12,4,12,4,10!!-6,4,6,12,-9,4,9,9,-11,4,11 }11,12,12,14,12,14,4,-16,3*18,3,18,12,16,12,16,7,0,24!!-7,10,-10,11,-12,12,-5,8,-7>7,7,3,5,3,-13,4,13,7,12,7H}12,9,13,9,13,10,-17,7,-15R 10,15,12,-2,4,2,6,4,6,0,37\-2,11,-10,7,-17,11,99k̠p -3,6,3,4,8,4,8,9},6,11,5,11z!!3,9,-11,4,11,11,16,11,-14,3!!18,3,18,8,14,4,0,2,-16,7,178,-12,5,12,9,-13,10 -9,4,9,12,-4,6,7,6},-3,12,5 12,-1,3,1,8,-15,12,16,12,037,-7,7,-7,11,-18,11,99,0d A`,@@n;6-P:H:,$@,}%@;6-P:H:,$@,%@x 1@2Ae2 @d,@2/,@@2$X}Πba 6-6-AD A@%6-+6-76-@C6-@O6-@aAaAdly AP}AR+AS@1C@@UBByA6a6-ADm6-AiyAvy2@}@%A1A=AIA[BAhgByB2w@KB2x!}A8@-@9@ KB@$(#ŠҠ-#BBAU B2#P(>:A%},+ AU,A>AA"PAA7#%%6-F:A`,%AV$F:Aa,<#%@@}+%@ @=-@_(@wombel GAME wombelq-@)@(@OVER(F#G-@}@0(@ YOUR SCORE:G8@,!AP#=-@ @1(PLEASE ENTER YOUR NAME:=AVZ#S}%@@+%@ @?%@!@S%@"@_#i AQ,@#@)AR;,@$}@M/@5@WASi,@6@d#S-@@+(@>:A@,=-@@S(@}>:A@,i#i AU,@#@)AR;,@$@M/@5@WATi,@6@n#6}-@@6(Press RETURN for a new game!x#<6-@)@@K:<6. ............# 2@} )@#P"AU&-A6@B2@@@F P A@#"A&*!@;2}@@`@@I6-&@U-@l(@>:@2,67&@<&@,.. A#I#} @2)!@)!@?2@A @I A#P-@ (@>:,B2@A!@}@P6-%@#+!67&@<&@,.>:,+ A#3@"-@@38,A`#  }A#6-@6-A2-@6@F68%@,-8,Z68%@,-8,n68%@,-8,67%}@<%@,.7<,#>6-&@6-&@# ,68,-568,->68,-#.#67%@<%@,.7<,.6}7<,.# AT$W%@@+%@@=-@@W(@ PUSH BUTTON!^$6-@ @}6(High-Scorer Nr.8:8@,$T:,A$' ' @'ԭŠ';;91,96,91,121,144,121,}182,0,91,96,91,121,144,121,182,0$'9991,81,76,81,76,91,81,91,81,102,91,121,144,121,182,0.'9991,81,76,81,76,91,81,91,81,102},91,121,144,121,182,08'AAA#B3-BBG7"=A j'ҭԠt'2 #B!}-A6A%"+/ 2$~'XX169,2,141,26,2,173,4,208,201,0,208,108,173,5,208,201,0,208,101,166,0,165,1,232,134'}VV0,224,8,208,9,162,0,134,0,173,120,2,133,1,201,7,208,11,230,203,162,136,142,7,212'^^162,1,134,209,201,11,208,11,198,203,}162,128,142,7,212,162,2,134,209,201,14,208,8,198,204'^^198,204,162,3,134,209,201,13,208,8,230,204,230,204,162,4,134,209,16}9,0,162,0,164,205,153'XX0,132,153,0,140,153,0,133,153,0,141,232,200,224,19,208,238,76,123,6,76,169,6,162,0'aa164,204,18}9,192,153,153,0,132,189,212,153,153,0,140,189,232,153,153,0,133,189,252,153,153,0'``141,232,200,224,19,208,226,165,204,133},205,165,203,141,0,208,141,1,208,169,0,162,0,164,208']]153,0,134,153,0,142,232,200,224,17,208,244,162,0,164,207,189,16,154},153,0,134,153,0,142'bb232,200,224,17,208,241,165,207,133,208,165,206,141,2,208,238,196,2,206,30,153,173,30,153,201'[[1}64,208,24,169,169,141,30,153,174,31,153,189,132,153,141,0,210,232,224,48,208,2,162,0'142,31,153,32,32,153,962(}Ǡ<(;;12,30,22,30,30,12,12,28,24,24,50,54,55,31,1,1,0,0,0,0F(FF48,120,104,120,120,48,48,56,24,24,76,108,23}6,248,128,128,0,0,0,0P(<<0,0,32,96,0,128,128,194,102,38,12,8,8,0,36,108,0,0,0,0Z(770,0,4,6,0,1,1,67,102,100,48,16,16,0,36},54,0,0,0,0d(AA62,62,127,127,127,127,127,127,127,127,127,127,62,62,0,0,0,0n(880,8,8,24,28,62,63,123,219,223,255,255,226,1}26,60,0x(<<0,24,60,126,90,90,219,219,255,189,153,195,102,60,231,0(;;0,8,24,60,126,255,153,219,255,255,219,90,102,60,231,}0(<<0,24,60,126,219,153,255,195,102,60,24,60,102,195,129,0(>>0,231,165,165,231,231,24,24,60,102,219,189,219,102,126,0}(##7,0,62,127,127,127,127,127,62( 12,20,40,20,40,20,40,20,40( 15,0,102,0,60,102,102,60,0(60,0,0,85,170,85,170,0},0(63,20,40,21,42,21,42,0,0(59,0,0,21,42,21,42,20,40( 61,0,0,84,168,84,168,20,40(32,0,0,8,28,62,28,8,0( } 62,20,40,84,168,84,168,0,0(27,36,25,64,89,5,32,26,25)28,24,37,80,6,80,74,20,88)29,8,34,21,74,20,33,18,19)}30,4,64,34,8,64,18,0,36")""11,0,126,90,126,66,102,126,0,)""5,0,62,119,107,93,107,119,62^)2,0,56,124,95,111,38,60,0}h)-1)<<24,60,44,60,60,12,12,24,24,18,54,55,63,125,1,0,0,0,0,0)@@24,60,52,60,60,48,48,24,24,72,76,236,252,190,128,0,0},0,0,0)<<0,0,64,192,0,0,2,6,38,108,200,136,128,0,68,204,0,0,0,0)660,0,2,3,0,0,64,96,100,54,51,17,1,0,34,51,0,0,0,0)??}62,62,119,119,107,107,93,93,107,107,119,119,62,62,0,0,0,00*AA104,162,0,189,0,224,157,0,144,189,0,225,157,0,145,189,0,226:}*::157,0,146,189,0,227,157,0,147,232,224,255,208,227,96*ԭԠ*AAAV#B3-BB}B7"=A *2 #B!-BB`%"+/ 2$*NN72,138,72,152,72,120,174,10,152,189,0,152,201,0,24}0,99,189,21,152,141,21+NN208,189,11,152,201,1,208,6,254,0,152,76,126,152,222,0,152,254,41,152,189 +MM41,152,201,8,208,67},169,0,157,41,152,189,11,152,201,1,240,15,222,31,152+RR222,31,152,189,31,152,254,31,152,76,175,152,254,31,152,254,31,152,1}89,31,152 +NN222,31,152,168,185,172,158,201,0,240,20,189,11,152,201,1,240,8,169,1,157*+NN11,152,76,203,152,169,0,157,11,1}52,189,0,152,141,3,208,238,10,152,173,104+AA152,201,10,208,5,169,0,141,10,152,104,168,104,170,104,88,64\+++173,30,153,141},1,210,169,0,141,10,152f+XX169,0,141,255,2,173,120,2,201,15,208,1,96,206,22,153,173,22,153,201,0,208,26,169,4p+aa141,22,1}53,162,0,189,192,153,72,189,76,154,157,192,153,104,157,76,154,232,224,79,208,237,96.ӭĠ.\<;@ ,;A } ,9@,9@,9@,J-@XB2H%\ . +@#AY%@7@A6 }M(@>:A%,_B7h@$qB7aAdB7cA.oB7eAd'B7gAb9B7` }AKB7b@P]B7dA oB7fA/I+A%AVA7AU@IA }A"/a%6-F:A`,%AV$F:Aa,9%@ @M%@@a%@&@/K-@@ })(please wait for;-@$@K( W O M B E L&/L-@@L( (c) 1986 by J>:@,RG L>:@,}FFLER 0M-@I67$@%@<$@%@,. White WOMBELM 0R-@@068,-AU&}$A?68,-@N68,-@R  0. A B! B + A.$p0ǠŠ D:WOMBEL.}BASCH......White WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOM}BELWhite WOMBEL ATASARAQAPLWhite WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOMBELWhite WOM7\%r%AABACAJKJJ7OOZZXYXYCCINROVVNNDUPCSPATYNYFANPAKKZARGARGPZFA}XYBILDAKRPKRPXYXY } } !"#$%&'(@)@*+},-./0123456789:};<=>?%%COPORIGHT 1990 BY BLUE SOFTWAREALLE RECHTE VORBEHALTEN DIESES PROGRA}MM IST EINGE- TRAGENES WAHRENZEICHEN VONBLUE SOFTWARE +@%@-@A }-@}@)A;AMA YAkA}A0-@}@0(@ Š7-@@  3-@AP7  -@@6@2}ADAVA bAtAA0-@@0(}@ Š-@@  -@A }-@@)A;}AMA YAkA}A 0-@@0(@ } !7-@@  3-@AP7 " -@@6@2ADA}VA bAtAA$0-@@0(@ %-@ }@  (-@AP --@@+(@mOmE?-@AU[2@!}@@_ 2@._-@A@#A7A %@KA%@"}_A%@ 0-@@  2 3-@AP 4x -@@6@,A#}8A DAPA\Ap-@@t x 5-@AP <ZWEITES VORBIL$}DA+@%@Ck-@@)A;A GAYAkA%}D*-@@*(@éF-@@  G-@AP HH -@@&}6@,A@-@@D H PқR+@%@T#-@@#AV'}[-@@1(@ҠC-@@[(@ X|-@@  3-(}@AP7 T-@@6@`At-@@x | BEGINN DEMO ɛ;+@ %@)}/0@@;6-@: -@U6@4-@$:6-+!@6-@$*}&+6-%@ 6-%/#6-P:M:$+@$&,,,'@/@&&,%@&0/%@%:!/+}A&%@ ! D-@AP  ϛQ +@!-@A$%M/H:@,$@yH:,}@,$AQ -@AP HLISSAJOUS FIGURENRD +'0@A0@-}@D\( OMEGA1,2= f1 +@$@10@p-A`z 6-$.}6-G:,$AY 6-$&6-G:,$@!"!,A`A/A`%A% -@/}AP   A1 +@@10@6-@%" 6-660}--66-P:?P%M:$&$,, ,%&/%% ,%&/%&$ 6-6-  A.1}''90,60,125,80,160,60,195,80,230,608( THE 1984 OLYMPICSB-@AP V##̮ SPIRAL GRAPHICS 2}#2` +@AR@jQ0@70@@@Q0@@t( @3}6-A%6-@(~,%@p6-! A`( }ROTATION=!- Ap)(}HORIZONTAL VARI4}ATION=-+ A'(}VERTICAL VARIATION=+" (}R=(VX="(VY= 6-%-"#6-P:G:,5}$@p,- A0!!6-P:G:,$O:G:$,,$@p,!!6-P:E:,$O:E:$,,$@p, /%% B!!)6}@pA@X( }MORE? (Y/N)6@@K:C)@N"@:N,X A7}"@:Y, A -@AP ##ҸϮ GRAPHICS 8 DEMO #11 +@$'0@1@8}(k6-P:@$H:,,76-P:@$H:,,Q6-P:@$H:,,k6-P:@$H:,,2! ,/9}//!/<?6-%@6-%@5!A)!A? AF-@AP Z$$ҸϮ :} GRAPHICS 8 DEMO #2d1 +@$'0@1@nC-@A@+,?/AA;}&C xC-@A@+,A?/A &@C = !-@yA9-,@G9/<}AC= M @)-@GAC@5,@yI/A9A&M C-@yA9@+,=}AC?/A &@GC = !-AA-,@q9/A= M @)-@qA>}@5,AI/AA&M C-AA@+,A?/A &@qC = ?}!-A9Ay-,@9/A= M @)-@A@5,A9I/AyA&M @}C-A9A@+,A?/A &@C 3-APAp#,@//A3 A}-@AP FARBDEMO; +@!-@7A%$@; Q6-#-@B}16-%@5A,M/@yQ Q6-@#-@@16-&@5A,M/@yC}Q v6-6@,-@@2@:6-%@>R-@`,%n/@y%r v D}u6-@+-@1@E@96-&@=Q-@_,%m/@y%q u v6-6E}@,-@F@g@:6-%@>R-@`,%n/@y%r v u6-@+F}-@g@@96-&@=Q-@_,%m/@y%q u v6-6@,-@G}A@:6-%@>R-@`,%n/@y%r v u6-@+-AAEH}@96-&@=Q-@_,%m/@y%q u Q6-#-@16-I}%@5A,AEM/AQ Q6-@#-@@16-&@5A,AEM/AQ J}Q6-#-@@"16-%@5A,AEM/AQ Q6-@#-@"@)16-&@K}5A,AEM/AQ Q6-#-@0@716-%@5A,AEM/AQ Q6-@L}#-@7@D16-&@5A,AEM/AQ Q6-#-@E@R16-%@5M}A,AEM/AQ Q6-@#-@R@Y16-&@5A,AEM/AQ I6-#N}-@H16-%@=!@I6-@3,@yA&//@y&A3 -AO}U&@A#A%@7A%@KA%@_A%@sA %@P}A%@A%@ -@AP ZUFALLS STERN; +@$A@Q}1A ;@T"-A`@ ;6-AY%G:,$@@T6-@%E:,$@@c,R}/-,A3/E,AAK/],Ac/ -@AP S} қ; +@$A1A @;@""-A`@ },AY@AT}/AY%G:,$@0@%E:,$@0}/AY%G:&@0,$@@@%E:&@0,$@@ k//AY%G:,$@PU}@%E:,$@Pk/AY%G:%@P,$@p@%E:%@P,$@p -@AP  V}Ġϛ: +@ 6-(6-:AA-AV@5"6-%@W})!@56-@5"@6-&@) @56-E,@@@E/@@%G:,$@ X}@%E:,$@ -@AP "ĭϠΛ#A@$-@y%Y}G,/3,@y&AG/@yA&& ''6-6-A'6-@(-Z}@y)= ,/!6-%@/6-&@=6-&@* +-@AP @ě[}A(>:A%,B+@%@DoA'A @9AAKAAU]-@@\}o(@J-@A  T%D:MAGDISK1.BASD:HAPPYDEM.BASKAAU]-@@^P-&&FNEORCAXFRCLEARBCAUESCCLFDNCCCCC10CPC25C55C1C6C75CHBAC25CC1DC56C56CC1C1^}2ACONSOXYCC1CC1XCHACCSASAORIC2C12LIDLIAD@_}@@ `} !"#$%a}&'()*+,-./012345b}6789:;<=>?@ABCD "c}"CREATE-A-FONT by Vince ErcegPROGRAM WRITTEN: 8/2/83(2o Ao;@,;@,;@,;@%d},;@2,;@B,9,9,9,;,;,;,7n6.>:@0,!6.>:@),)6. 267,.;67,.L67@%e},. U67,.n6.ERDICSLFT-=+*UKQ:AFB6.>:@',+ A .-@2">67,.>:,B K%-@2f}"!67,.>:,% P' -#68&,-P:#%?P,' Z26-F:,&6-+%,$&A#2BBy_/B2wg}6-&/6-?:C:,<BsD<$,d1+ A8AU%1B7tn]AV6-$-6-?:C:,<&$<$,h}?AAHKA]AAHxQB2HAh'B2PAh9B2QAhEAQAi}}'AB2V'B2XKAR-%-@1/-%%C(>:$@2%,G K =j}B2Y!-&A&'+ =B2SA`36-F:,%F:,$%$%&@-&3S-%A%k}A%-3%@C%%ApS%%ApQ%%A2@ ! +6-%$5 A;6-Gl}@FQ A02 -(dit(everse'(ata2(nvert9 (lear( ave Font)( oad Font9( rom (Copym})K@@!-@/( o (Copy)K(>:AV, Scroll UPY(>:AW, Scroll DN=(>:AX, n} Scroll LeftY(>:AY, Scroll RT\ (ndo( olor change&(uit2@>-@Y(ntic 4/5 Ao}tari\$2 6-A!A2F:,"A F:,"A/-%@0%()-%@0%/( p} R:,"*T:,*F:,"A(T:,A  6-R:,F:, A06-%+!* ,&+!* ,336-%+",%+q}",%+",&+",&+",&+"@,  6-" !6-,  6-6 !6-@8 -%@0% (r}*-$. 8 AJF:,"@9@fTFK:)96-$+!@A* @,F(As}^--@7<,0>:,# - AhA A@APAAA APAAt}A0APApAA0A@A`AAPr^ A6-@&0-A`@@6<Bu}2SD-%H(P6-&^ A| *-A`B2S! '-*$(T:,A A v} A1 6-%$-#68,-F:%,' 1 A P6-%@1&F:,(2, 6 A p= Apw}A8!-/-@#%9(F:%,=  - ( PRESS JOYSTICK ;(BUTTON TO CONTINUE'1%%1-%x}%;(>:, --5 -%%(>:,!-%%-(>:%,1 5 T:,A3A8AUy} Ap) A3 AH -68,-F:%$, '-/-@%$%8&,D H  A p1-z}%@2#2' 1 A pH Ap((5(FILE (dev:filename.ext)9C A H {}-A#86-F:%,%%**F:%,. 8 ApU (>:AS, SAVE COMPLETE.-A2 < A|}pAK AU A&H Ap((5(FILE (dev:filename.ext)9C ApH+-A}}#0( )%% ( Ap52 (>:AS, LOAD COMPLETE.-A2 :& Ap A&~} A0Dj 6-6- Ap6(LOCATE CHARACTER TO COPYT(AND PRESS JOYSTICK BUTTON^ Ad6-j6-N4 -}%F:%$%, * Ap4 AX: --(%$%F:%$%,, 0 : Abl 6-6- Ap}2(LOCATE CHARACTER TO H(REPLACE AND PRESS\(JOYSTICK BUTTONf Al6-lF 6--$%$%F:%$,( 2 }Ap< AF AvS -68,-F:%$, (6-8,0->68&,-8,B K68,-S-K-6}%$%8,92A&$&@= A K A pN -68,-F:%$, (6-8,3-6A68,-8&,}E N68,-C-6-%%$%8,12$5 9 C A p) -68,-F:%$,)68,-8,$$} 8,!68,-8,&$ AB --&%$%8,024 8 B A pB -68,-F:%$,}&6-8,'/"P:,868,-B A 68,-P:,%D --&%$%8,22&6 : D A p}$ -%8, $ A PW Ap A@+(COLOR REGISTER/2(=(COLORAD(S( LUMINANCEW}?6-%A? A)!A) )!) )!A@C $%"AF:A,, Ap6 AC(A } A`Y Ap+(PRESS 'Y' TO EXIT PROGRAM0>K:E)Y"@A! Ap A}! A ;-@1-%F:BsD%&%P:',,1 ; A p6+@4B2w''3A86} 1%%6-*9 6-6-1%%%-%%9(>:%&$+",,4' -R:,"*T:, ' A>(T}:,A H -%%(>:,RV 6-R:,&6-%+!* ,&+!* ,V6-%+",%+",%+",&+",&+",&+"@,\ } 6-@1f!@16-p  6-z !6- -  A !6-& A }C++!* @,)+!@1* @e,96-&@2C A @!6* @26-% -%%(>:,$B} 2-%@1'-:%F:%+&,',> B  A> 2-%@(0%+&,'F:,4} > AG6-?:C:,:,@}-%@ $+",@"&+",J(>:,N e A`jN -%-@!,(>:AV,0 : ApD A}N At+ --@!$(>:AV,( +$~D6-A6-@Q,F:%,"A86-@D6-ApK}-%%A-'%1%%;%%K%%A2E  -&&7$+"@,%$+"A},; E AJJ104,104,133,204,104,133,205,104,69,204,133,213,104,69,205,133,212,96ii104,104,133,213,104,133,212,10}4,133,215,104,133,214,162,4,160,0,177,212,145,214,200,208,249,230,213230,215,202,208,240,96ALMOST DONE!!- }6-F:,%F:,$%A-%, - (>:AA,,AR#(>:AA,#%=-}@8-%(>:AA,+-9(>:AA,= ] -1(#'THE ULTIMATE CHARACTER SET EDITOR'4(7(](! Created 8/}2/83 by Vince Erceg]-@@"/(PRESS TO BEGIN=%@4Q%@!@P]BBw; #A0}!-A6AT%"+/ ;@4.6-?:A6,-@.( PLEASE WAITB-6BBw&BB}v.-:2$> B  2[ARA!AS';-ApA?"EI W-}@B[" 67,.>:, #$EE104,173,31,208,201,6,240,10,232,142,10,212,142,25,208,76,1,6,96]]0,0,0,48,50,3}7,51,51,0,179,180,161,178,180,0,52,47,0,35,40,33,46,39,37,0,36,41,51,48,44([[33,57,0,44,41,51,52,0,0,0,0,0,0,0,48,50,37,51},51,0,175,176,180,169,175,174,0,38,47,502bb0,36,41,51,43,0,36,41,50,37,35,52,47,50,57,0,0,165,88,133,203,165,89,133,204,16}0,0,166,0,240<jj13,185,34,6,145,203,200,192,38,208,246,76,148,6,185,73,6,145,203,200,192,38,208,246,169,155,141,26,2FEE}165,0,73,1,133,0,96,104,104,133,204,104,133,203,104,133,206,104ZRR133,205,166,206,160,0,169,0,145,203,136,208,251,230,204,}202,48,6,208,244,164n**205,208,240,198,204,160,0,145,203,96x- Ap A`-D:*.*?-@}!6.7,?7<,4 FREE SECTOA`+'"P:',-+%,'!(+ A@-+%,'( ;( (}'(PRESS ANY KEY TO CONTINUE1 Ap; A>( ( (END..PRESS ANY KEY* Ap4 A> A  }F:,  Ap AK6-6-@#6-%+6-%36-%;6-%C6-%K6-%3 6-%6}-%6-%#6-%+6-%36-%; 6-%6-%6-$'6-A36-A';6-%S6-AU6-%#6-}AY+6-%36-%?6-AVG6-%S6-B2y$D:CREATEOF.BAShhE̅hEͅ`ERDICSLFT-=+*UKQ:A   }  2,0,14,0,6<}-%S6-B2y$D:CREATEOF.BAShhE̅hEͅ`ERDICSLFT-=+*UKQ:A   &fffffff>`<|fl0fF68of;p88pf< p0 0 ~~`0 0`<"}f b`df~~00 xnlxp``cg~Dv~"}`8 Lx~000DffDffl|8BckDf8pp8?"}ww<~~~<x`x`~<~~<"}0~0 ~ <~~<<||``x<`x>|`x ~00Df|Dfx0Bk|lf<xDff|~ 8`<~~<"}~x|nf8x8ff`x ~00Df|Dfx0Bk|lf<xDff|~ 8`<~~< <<fffffww>`<~fl8wg8l8p808<p8w~8x 8&}p`8 <`|ww>~ 88<8 0~`0 8p<&}f xlfw~|~`|pp~`|ppp>``ww?ff~www~g>flx|~w```ppfv~ww&}|ff~pp~fffwwfffw>ff<>wwff<~ 8p@`0x|6&}c6>8pp8?&}ww<~~~<x`x`~<~~<&}0~0 ~ <~><?w?``|ww~<`pp>>ww?>>ff?~``|www8>>``l|~w8>&}|fwww|ff~pp>ff?|fppp>`>~~ffww?ffw>~nf<>wfff?|~ 8<~=&}~x|w8x< ff~pp>ff?|fppp>`>~~ffww?ffw>~nf<>wfff?|~ 8<~=$32000 REM *** PROGRAMM TESTER ***32005 REM 32010 DATA 34,96,215,208,207,198,203,230,200,230,208,208,198,6,255,238,3,208,6,2*}54,173,6,254,238,11,14432015 DATA 6,253,141,6,253,109,206,165,24,206,133,204,177,208,133,203,165,0,160,6,255,141,6,25432020*} DATA 141,6,253,141,0,169,207,133,104,104,204,133,104,205,133,104,104,203,133,1,16932025 CLR :DIM A$(120),B$(80):CLOSE #2:CL*}OSE #332030 H=65536:L=256:S=178932035 FOR X=71 TO 1 STEP -1:READ Y:B$(X,X)=CHR$(Y):NEXT X32040 OPEN #2,4,0,"E:":OPEN #3,5,*}0,"E:"32045 ? "}":POSITION 11,1:? "͠Ҡ"32050 TRAP 32045:POSITION 2,3:? "Gebe Programmzeile ein"32055 POSITIO*}N 1,4:? " ":INPUT #2;A$:IF A$="" THEN POSITION 2,4:LIST A:GOTO 3205532060 IF A$(1,1)="*" THEN A=VAL(A$(2,LEN(A$))):POSITION *}2,4:LIST A:GOTO 3205532065 POSITION 2,10:? "CONT"32070 A=VAL(A$):POSITION 1,3:? " ";32075 POKE 842,13:STOP 32080 POKE 842*},1232085 ? "}":POSITION 11,1:? "͠Ҡ":POSITION 2,15:LIST A32090 POSITION 2,16:INPUT #3;A$:IF A$="" THEN ? "ZEI*}LE ";A;" WURDE GELOESCHT":GOTO 3205032095 C=USR(ADR(B$),ADR(A$),LEN(A$)):C=PEEK(S)+L*PEEK(S+1)+H*PEEK(S+2)32100 D=INT(C/676*})32105 D=C-(D*676)32110 E=INT(D/26)32115 F=D-(E*26)+6532120 E=E+6532125 POSITION 0,16:? CHR$(E);CHR$(F)32130 POSITION 2*},13:? "Wenn CODE nicht stimmt dann Π und editiere obere Zeile.":GOTO 32050ON 0,16:? CHR$(E);CHR$(F)32130 POSITION 2(S@1(@happy demotimeE-@API \%D:HAPPYDEM.BASD:MAGDISK1.BASLOADING\-@ j