@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREIE SEKT.! G) *Gȩ GȽG GȌ*jj >G}BBILD BTITEL BABBUCC PICB RATEN PICB DIGIT TXTBWERBUNG} TXT C C*(> C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSBENUTZE MEM.SAV UM ZU LADEN!! D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSFEHLER-SAVE IN MEM.SAV AUF DISK TIPP Y FUE&}R DOS-START B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu }X* r5!'6! /&LR&  0@ *}*#8>#8>#8>,}L#5! 6! )?JJJ0m m )(!)?D)***L -} I   I  / I  O I L#%5!6!`5!6! 4!)J+$.})?D)J}!!L5!6!L# 4!   )  LH!)    /}LH!8  LH!  ) LH! 4!H 4!6!h5!L# 4!H 4!H5!6!h6!h5!L# 4! 4!' 4! 4!LH! 40}! 4!' 4! 4!LH! 4!" 4!" 4!"LH! 4! 4! 4! 4! 4!  LH! 4! 4! 4! 4! 4!  1} 4! 4! 4!LH!5!6!Lo - -/ -O  ( H h L#L! 4! 4!LH! 4! 4!LH2}! 4! 4!  4!! 4!" 4!# 4!$ 4!% 4!&LH!ҩҢ$$'% Q% $Ȍ$'% Q%@$Ȍ'%$ Q%`$Ȍ$3}'% Q%L$$ $ $ )?}ҹ}  `   L%   #  0`4}  `   0`     ` &0`L$ #  0` #  0`5} LW$` ` ` ` ` #   }``6} $$'%L% {%y%%z%L#6F$$$$$$5ED[7}#8>#8>#8>%&8}`Bdɲ$#%#o$ %B`  0@ #`l 9}777777777777777:}R(i'`'hi'`'i'`'i'`') 0@`/B}#C`C#AyA#E(D-A(C/C<E5C< KC(C(C-C-C/A(A/E5C(?}C(C-C-C/A(A/SjﻻUW <;ꪪS}*?<>fU~0*⪬ʪT}Uꮢ"ʀꪪj,ʪ_ꮮ""**U}#类0&,U~ꪪb*ꪮ+쪪V}Wꪪb"""/쪫_*ꢯW}>j쪨;"*:ꪪ>컫DꪪX};bDFd":Y}HDf"n𻻸DDHFfdꪪZ}n"ꪪn"𻻻DDDDfG&>*𻻋[}DfHHDf>fn& >ꪮ𻻻Jf DfL ?;b\}  f𻻻HfL DfL ffꪪnbDL]}Dfflnnn.>f"&jĄlDfFG fOnjfb ^}ꪪ&.tdlffDfgꪪbbn1"𸻻tfL Ħgtvfd~_}nff".  DG Ffl xF`dꪪy@nf"n `}DDDfdlfJfvwtn"n^DdfDlfFff_wa}wxWp"nёё_ꪪU]]𻻻HHD,fffFwwwWpn"nё ~YURb}tjdffG JfFwHSuTpnfꪦ&f1 ]R𻻻tDFdfdGFG FOCꪪIUUWwTpnc}&џSUUU𻻻LHDfDVfdFlgTtEWwWWpnfnSU]]𻻺d}GFfdDBfdflDꪪtUUUVuTp&jfQ]]ܻfg/Ffff, wuwwwUUUt|fjfe} љ ]UUUFL fffl ԥKwuWwwuuuD|ff.1 (Qꪽ]UduDffff}gePwWwwwuwwE\fꪪf.1љ/Q\f}DFffdHUKswwwwwwu\*j.=Q QUg}?Q\FoXL TFdfDUIXuww{wwwwwV\j". QU]U\FgT HfffeUo[UWth}GwwwwwwwU\ꪪ⪪". U]Q_FgDfVUVtUTuGwwwwwuWꮮ*"]]i}ݝ_DDFuDDEEE{uWuUutwwwwwwwuW""*"5UU[]U=]tDDF}DTDE_DLututwwwwwwuwj}"."UUY]=]UU]wwtDFoUGDDDF}WwUUwEwwwwwwwe"" UU]]k}wwtDFmwDDDDFuwwuwwWwwwwwwwWg*U]=U_݊wwHwvDODDDFHF]wuwwwTGww7wwwwWWl}!]U]ջwtuwtgDDGFHF]wwwwwUGw{wwww%U +QݕtWUEwvm}dtU|F+F~uwwwwwUwwwwwwWgUݭ՝]# )Uw{TS{UGwvGd`+F@)fWWwwwwwTwwwwwW]]U]U]ݪ* +n}!UTUUUTUw~zDL `+F@VoWwwwwwWwwwwuwwUU^Um]" ݝWwUY{7UUW>DD@ `FDfo}Wwwwwuwww{wwwwUU]]UU])Q]]UuUUUWuDWwFDDD@dD(EDffwwwwwwWGwwwwwWUU]ݭVUߑp}UuuwuwUYwDDdD@ dEDDFdDwww{wwwWwwwwQP)]wWUWwwuE_wDDDD&DDDDfdwwwwwwugwwq}wwwu]]UwwwgwwEWwDDDddDOD` DwgwwwwwuwwuUW]Q_ ]]Ur}uwwwwwWWWw|DDDfDdn@ DwwwwwwwUwwwTgU_" ]]wwwwwwwUWw|DDDdxdh`FwwwwwwwwwwDtDg]]s} ]wwwwwwuuWwDDHdDh d`FowwwwwwuWwwvFdUQ" ]]UWwwwwwwuTt}wDDD@*Fd DDFOwwwwwwwwwwwwUVt]U*]UYwwwwwwwXwwDD@*Dd$DDDDwwwwwwUwwgw^=u}+]]_wwWwwwwWWGwtDD`+DDDDFd}wwwwwUtTwewwD]-QU[Uwuwwwwww?wtDHddfv}Dp+d}wwXUUWWwwwww]]2+]}UUQUQWuwwwwwuuOw|DHVefDLDp+f}wwwTUUUUwwwE]0+=w}]UUUUUuwwwwwwwUKwwDHDDD` D@+dgTUTUyUWUwwwwuS  ?UUQUQ]}UwwwWwwww[wwDHdF` @*duUHEx}uUWTwwwu]S *=QUU]]]WwwuwuwwWWwHDJF` @(dwtTEUWUUwUwwwu] * 5Q]Uy}_wwswwwwwwwH` f` FDTDwxWGwDWwuwWwwwvUUU]wwwwwuwwuUwtD FDFfdDGuUwwuwwuuwwuz}] ]UwwwwwuwwuTww|D` FEdfDDGutwwtwwuwuwwwu](_Q]wwwww{}wWwuTww|DdDFdDDUwwUWwwwww7U[wwWUUwwwwwwwwwUwwDdDfFdDDwwwwwwwwww{Uww|}]QUU]wwwwwuwwwwwwHddDTDGwWywww{wwwwwuTWwwuVUWwwwwwuwwuWW}}dDDDUUWwwwwwwwwwuuGwwu]]U^UQwwwwwwUwwwwwtVfgwwwUWtw{wwwwwuHwU~}nUQ]wwwwwwWwuwu_wwwuUWwuww{wtwwwtwwTwwUUU_ՙ=wwwwwwwwwwwwwwwwuu[}wwwwwwtGwTwW]]UUU_ՙ=wwwwwwwwwwwwwwwwuu[; CIOBYTSCRTOIXMUSCTMSTARMUSPLMFLAG**@C@B1@*AyE@! }AE Ayf AyE Ab Ayu;@B, +@&-@@&(@(-@@ }((@abbuc2-@@2(@PRAESENTIERT... --@@B")67<,.>:,-  LL104 },104,104,10,10,10,10,170,104,104,157,66,3,104,157,69,3,104,157,68,3KK104,157,73,3,104,157,72,3,32,86,228,169,0,133,213,18 }9,67,3,133,212,96/ +@1/6-F:@,%AV$F:@,AYA@FGRUENA }SCHWARZ AAROT$A @rORANGE)M'@@D:BILDM6-?:C: },<@<@<<Av,.@/6-Ayf6-AyE06-Ab6-Ayu1EIN2 }AY@43A@GELB4-AE 5 +@7(-@@((@8 })-@@)(@moment9+-@@+(@BITTE...A--@@B")67<,.>:,- }FLL104,104,104,10,10,10,10,170,104,104,157,66,3,104,157,69,3,104,157,68,3KKK104,157,73,3,104,157,72,3,32,86,228,169,0, }133,213,189,67,3,133,212,96P/ +@/6-F:@,%AV$F:@,RAYUASCHWAR }ZVAAGRUENZASCWARZ_A ABLAU`@AUSa%%2 }dM'@@D:BILDM6-?:C:,<@<@<<Av,i@A }@0GELBA@6ROTAY@4;Ap,-@AV" A  }LLH,a,s,t, ,D,u, ,d,i,e, ,A,u,g,e,n, ,d,e,s, ,W,u,e,r,f,e,l,s, ,g,e,-, ,OO, , , ,z,a,e,h,l,t,?, ,E,s, ,w,a,r,e,n, ,z,u,s },a,m,m,e,n, ,,,, ,-, , ,KK,d,i,e,s,e, ,N,u,m,m,e,r, ,h,a,t, ,d,i,e,s,e, ,A,u,s,g,a,b,e, ,*,*,*,``, , , , , , , , , } , ,,,,,, ,,,, ,,,,,, ,,,,, , , ,,,,,,, ,,,,,ԛ"(, 6 AU@%%2A@ }@J-@@  T%%2^$ch F:B2y,@A }`j +l@m%%2nA6-?:,r%D:MEN*.*D:TI*.* }hDhIhH VսC`s@AAhhhhhh hhBhEhDhIhH VսC`B@AA4 } hhBhEhDhIhH VսC`B@AA4 :((t C_`*[* 7! 6"*00".} ;"-"." + +" *;} +" .,4 PU ;;*)" "T. *} *';PR8* * '  "RP*. ' }UQPU*; ; *&fdAUPSTU" .΁..*'8UDU}U *;*%&fUPU023(U"* **   &8UUU̅}UP ** %fUTU@U"30U**.& ;KTEUETUP** 8* &Bbf}@UEU@!UT* (*TUETPRB  *(( b`$@UTRJ** *(*(/(}(+ffgfofgnfnf`Ff + +fffffnofb}fBݟBfffffvf&fBBfff}fggff$DfBBffgffgfffdfBB}fffvfnfb"f 3 4fffnfgofbf*3}*4ffffgf&f**6*7ff}fffdf*9*:f fv~fff** }bb"b* ** *fADC3 4 f@UEEQ}U2ŁEP2 FUH?HUQEU(( *EQLQUQEP((f&BTUTU}& (PU@U&( *f@UU ?* * TU@U}** d`AUTU D ?* UTU } * PTEU*JRTDf$d&f`?** BTEUP* JBP  }?** R @Df&F&f&&f **JR*     }.* BD@DfdbJb`d f! *  6* JBDTUTQ * JBbd$**1* }TU***T@ ** " " * EB ** "; * :*`[]*}Z***T@ ** " " * EB ** "; * :*`[]* (Ɔ @O      ?}?#!! ??  C CC ??! ?C C @C@@@G}@@@@@@@@G@A@@@C@C}  ! @?C'_   @C/ 0 ?#??    }   L 6 6  7 7 M}        ? 0?   /?@} ?!  '?@ `C@@C@G@@A@@}A@GA@@@C@CC@@?@' !'   G /  '   O }??      ? $8 }      ' ?? /  !/??G7 ??!' !#'}??G# ~?CC@CCC |GA@GGA |@ |@G@}@GG@? ~?@C@?@CO@? ? !  !/ ??G  ?     ? ??G  }'          $! ? ??G  e VIDEO - DIGITIZERDa die zur Zeit auf dem Markt befind-lichen Videodigitizer fuer 8-Bit-Atariqualitativ seh}r zu wuenschen uebrig las-sen, haben wir ein neues System ent-wickelt, dass Digitalisieren nahezu inEchtzeit ermoeglicht.}Ausgewertet wird ein BAS-Signal. Somitsind Videorekorder und Kameras,Monitor-tuner und Fernsehgeraete mit AV-Buchseanschl}iessbar.Dargestellt wird das Bild in Grafikstufe24. Dies ist die hoechste Aufloesung,diemit dem Atari moeglich ist. Dadur}ch be-dingt werden reine SW-Bilder erzeugt.Eine Darstellung von Graustufen ist we-gen starker Qualitaetseinbussen nichtvo}rgesehen.Die Bilder sind im 62-Sektorformat ab-speicherbar und koennen mit bekanntenZeichenprogrammen wie z.B. Designmast}erverarbeitet und ausgedruckt werden.Videoeffekte mit Falschfarben sindmoeglich (GR.31).ZUR TECHNIK:Angeschlossen wird} der Digitizer an denModulport. das Videosignal wird digitalaufbereitet und ein komplettes Bild inEchtzeit in ein 8K-RAM e}ingelesen. DieBilddaten werden dann vom Rechner ausge-lesen und zur Darstellung gebracht.Kontrast und Helligkeit koennen g}etrenntgeregelt werden. ----------------Bei entsprechender Nachfrage wuerden wirdas Geraet incl.Software fuer Bi}t-Byterzu einem Preis von ca. 230 DM anbieten.Eine Demodiskette mit Bildern vomDigitizer kann gegen Einsendung eines 5DM-}Scheines angefordert werden.Demodiskette und Anfragen sind zu richten an: Friedhelm Giese Butterkamp }63 4408 Duelmenoder Klaus Langenkaemper Fr.-Ruin-Str. 62 4408 Duelmense Butterkamp g<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>SUCHE: ANLEITUNG FUER STARTEXTER. -------------------------------------THOMAS CZEG}LEY , BERGSTR. 7 8767 WOERTH -------------------------------------<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>BIETE: MALTAFEL MI}T MODUL 70,--DM 1050 MIT SPEEDY TDS 350,--DM 600XL MIT TURBO OS 80,--DM RESIDENT PLATINE } 50,--DM 2 JOYSTICKS (NEU) 25,--DM-------------------------------------RENE GOLLY IM DAU 115000 KOELN 1------}-------------------------------<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>SUCHE: DRINGEND!!!!! ANLEITUNGEN FUER 1. AUSTRO.}TEXT 2. AUSTRO.BAS 3. MINI OFFICE -------------------------------------JOCHEN CLASSEN TEL.: 0202/597415---}----------------------------------<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>HILFE: HABE VOICE MASTER VON ANIROG GEKAUFT. }LEIDER OHNE ANLEITUNG WER KANN MIR DAMIT AUSHELFEN? SCHALTUNG KONSTRUIEREN 20 DM------------------------------}-------SIEGFRIED HORTMANNS LESSINGSTR. 74048 GREVENBROICH 1-------------------------------------<<<<<<<<<<<<<<<<<<<>>>>>>}>>>>>>>>>>>>SUCHE: ACTION!-MODUL MIT HANDBUCH UND FOLGENDE COMPUTE! BUECHER: MAPPING THE ATARI, INSIDE } ATARI DOS. ULTIMA I,II, III (ORIGINALE)-------------------------------------H.J. MATTHEUS WALLENSTEINSTR. }11C7000 STUTTGART 40-------------------------------------<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>SUCHE: SILENT SERVICE } DESK TOP PRG., DASS DESIGN- MASTER BILDER, PRINT SHOP USW. VERARBEITEN KANN. TEXTAUSGABE IM 80 ZEI}CHEN MODUS PP.-------------------------------------ROLF SCHNEIDER HOERBACHSTRSTR. 625912 HILCHENBACH 4 TEL.: 02733/5530--}-----------------------------------<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>SUCHE: LEERE CARTRIDGE-GEHAEUSE ODER PREISWE}RTE GEBRAUCHTE MODULE-------------------------------------JOACHIM BOSSERHOFF ZUR BECKHOVE 264300 ESSEN 13, TEL.: 0201/5918}52-------------------------------------<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>BIETE: REPLAY (FREEZER) 40,--DM A}TLANTIS (GRAFIKADV.) 25,--DM ABENTEUER IM WELTRAUM 15,--DM CROMWELL HOUSE 15,--DM DAP DISKANAL}YS(SPEEDY) 15,--DM DISKMASTER(SPEEDY+HAPP)20,--DM MEMOBOX(DATENVERWALT) 15,--DM 6 KASSETTEN (GOLF,COLLA}PSE, ACTION BIKER, ONE MAN DRIOD, SPACE GUNNER,COLLAPS) 30,--DM-------------------------------------THE}O PRINZ TAUBENSTR. 19 B 4130 MOERS 1. TEL. 02841/504104-------------------------------------<<<<<<<<<<<<<<<<<<<<>>>>>>}>>>>>>>>>>>BIETE: AKKUSTIKKOPPLER DATAPHON 21D MIT NETZTEIL/STAENDER UND AUS- TAUSCHMUSCHELN + SOFTWARE } VB 200 DM-------------------------------------HANS PETER MUELLER DIERMEIER 5 KOELN1NIEDERICHSTR. 21 TEL. 0221/131951---}-----------------------------------------------HANS PETER MUELLER DIERMEIER 5 KOELN1NIEDERICHSTR. 21 TEL. 0221/131951---$Kyan Pascal Kursus 1. Teilvon Martin KrischikProgrammiersprachen Teilen sich in drei Gruppen auf:1. Low Level Language } Maschinenorientierte Sprachen Assembler (*) Macro Assembler (*)2. High Level Problemorientierte Sprachen Fortr }an Lisp (*) C (*) Pascal (*) Fortran 77 Logo (*) C++ UCSD Pascal (*) Flowmatic Pilot }(*) Pearl Turbo Pascal Algol Forth (*) Basic (*) BCPL Algol 68 Forth 79 (*) APL Modula 2 PL }/1 Forth 83 (*) Comal ADA3. Very High Level Anwendungsorientierte Sprachen ADA Lisp Prolog SmaltalkW }ie man sieht ist die Liste der HLSprachen die laengste und auch diewichtigste. Der Atari XE steht mitseinen 10 (*) (mit AC }TION! 11) nicht gerade schlecht dar. Und all dieseSprachen haben eins gemeinsam - siesind Rechnerunabhaengig. D.h. Program }melassen sich ohne grossen Aufwandvon einem Rechner zum anderen portieren(uebertragen). Sie sind auchleichter zu lernen a }ls LL Sprachen.Zwei Sprachen heben sich hier jedoch hervor. Sie sind naemlich extra dafuer geschrieben worden, um eine HL }L zu lernen: Basic und Pascal. BasicKurse gibt es bereits zu hauf, so das ich der Meinung bin, dass es Zeit wird fuer ein }e wirklich interessante Sprache:PASCALZuerst die technischen Daten:1. Pascal ist eine Compiler Sprache. Seit dem Turb }o Basic Compiler duerfte wohl jeder den Unterschied zwischen Compiler (Uebersetzer) und Interpreter (Interpretierer) kennen }.2. Pascal ist 100% strukturiert. Zum Vergleich: Assembler 0%, Macro Assembler 2%, Basic 10%, Turbo Basic 25%, Action 50 }%, C 90%. Diese Wertemoegen den einen oder anderen ueberraschen, aber warum das so istwerden wir noch lernen.Zum Kurs: }Im Kurs wird Kyan Pascal benutzt, da dieses beim Uebersetzten und in derAusfuehrung sehr schnell ist, und demISO Standart }entspricht. Ich werdeim Kurs die von mir entwickeltenLibraries (kleine Unterprogramme)verwenden, die es vom ABBUC gibt. Ic }hwerde (wenn der Kurs lange genugdauert) 4 der 6 Demoprogramme auf derLibrary Disk besprechen:1. Restore Ein kleiner }Spezial Disk Monitor:2. Qudromania: Ein einfaches Spiel3. Print: Ein Programm um Pascal Programmtexte sauber auszu }drucken.4. Dungeon Der grosse Bruder von Restore.Wie weit ich komme haengt nicht zuletztvon der Reaktion des Publikums }ab, fuer den ich diesen Kurs schreibe.Also schreibt mir ob es euchgefaellt oder auch nicht:Martin KrischikBuelser Str. }224390 GladbeckAber eins vorweg: Als Informatik-Student im 6. Semester stehe ich ueberder Raubkopier Szene.Nun zum Kur }s:1. Kapitel Die globale Struktur. Ihr erinnert euch, Pascal ist alseinzige Sprache 100% strukturiert.Und das heisst: } Alles, wirklich alles,ist bis ins kleinstevorgeschrieben und reglementiert. Aberkeine Angst, wenn man sich darangewoehnt } hat, werden diese Regeln einennicht einschraenken, sondern siestehen einem als maechtigeProgramierwerkzeuge zur Verfuegun }g.Jedes Pascal Programm beginnt mit demWort "program",natuerlich kannman auch "PROGRAM", "Program", oder"PrOgRaM" schrei }ben, Gross undKleinbuchstaben werden naemlich nichtunterschieden. Danach folgt derName des Programms sowie einigeDateinam }en fuer die sich aber keinPascal interessiert. Fertig sieht dasGanze dann so aus. program restore(input,output);"(input },output)" bedeutet, dass unserProgramm Eingaben ueber StandartInput (Bildschirmeditor) und Ausgabenueber Standart Output ( }auchBildschirmeditor) macht. Aber das stehtnur aus Tradition da, denn derCompiler (Uebersetzer) intersiert sichdafuer nic }ht die Bohne. Dagegenextrem wichtig ist das ";". Das stehtnach jeder sogenanten Anweisung.Als Basic Umsteiger wird man die }seskleine Zeichen zu hauf vergessen,aber das gibt sich mit der Zeit.Als naechstes folgt die LabelDeclaration. Da unser Pr }ogramm kein "goto" benoetigt verschiebe ich diesen Teilbis ich eins brauche.Jetzt kommen die Konstanten. Diebrauche ic }h aber auch nicht. Nun dannmuss ich ein paar Beispiele erfinden:const pi =3.1416926; (* Fliesskomma Konstante Ke }isskonstante*)A ='A'; (* Zeichen Konstante Buchstabe'A' *)rot =52; (* Ganzzahl Konstante Bildschirmfarbe!} Rot *)color4=712; (* Ganzzahl Konstante Farbregister 4 *)Wie man sieht, kann man (muss abernicht) jedem We!}rt den man im Programmbenoetigt einen Namen geben. Z.B.wuerde Poke(color4,rot) dieHintergrundfarbe auf auf rot setzen und!}keiner muss erst nachrechnen was52 fuer eine Farbe ist. Uebrigens(* und *) sind die sogenanntenKomentarklammern, alles was!} in ihnensteht ist Kommentar und wird nichtuebersetzt.Nun kommt der interesanteste Teil ueberden ich leider nur sehr wen!}igschreiben kann. Wie sieht dieser Teilin unserem Programm aus:type#i speedy.tBischen mickerig fuer den interes-sante!}sten Teil. Nun, die zweite Zeilegehoert gar nicht zum Programm. Siesagt dem Compiler (Uebersetzer)"Oeffne die Datei 'SPEED!}Y.T', nimmihren Inhalt und tue so als wuerde erhier stehen!". Das ist sehr platz-sparend auf der Diskette (man braucht gl!}eiche Programmteile nur einmal aufDisk speichern) und ist wesentlichuebersichtlicher als wuerde folgendeswirklich dort ste!}hen:type sectyp =packed array [1..256] ofchar;siotyp =packed array [1..550] of char;track =packed array [1..4608] of c! }har;Hmm, das sagt euch nichts. Das Besteist wenn ich das zusammen mit demnaechsten Teil bespreche.In Pascal muss man al! }le (wirklich alle)Variablen vor ihrer Benutzungdeklarieren (Anmelden). !!!?! Ja, dashabe ich auch gedacht als ich dieszum! } ersten mal hoerte. Doch jetzt weissich, dass was man da deklarieren(anmelden) kann ist der absolute Hit,wenigstens im Ver! }gleich zu Basic.Doch fangen wir klein an:var sector2:sectyp;err :integer;i :integer;wahl :char;Wir haben hier 4 V! }ariablen:'err' und 'i' sind "integer" d.h. ganzeZahlen von -32768 bis 32767'wahl' ist "char" ein einzelnesZeichen. Danebe!}n gibt es noch zweiweitere einfache typen "real" ist einenormale Zahl mit 14 Stellen wiewir sie von Basic gewoehnt sind un!}d"boolean", die nur true und false (wahr und falsch) werden kann. Aber wasist mit 'sector2'. "sectyp" istnaemlich ein sel!}bstgemachter Datentyp.In der oben genanntenTypendeklaration steht auch wie dieserselbsdefinierte Datentypaussieht. Schrei!}ben wir also:sector2: packed array [1..256] of char;und uebersetzen ins Deutsche:sector2: gepacketes Feld [1..256] aus!}Zeichen;Ahh, jetzt haben wir es, einZeichenfeld etwa wie "DIMSECTOR2$(256)".Aber in Pascal koennen Felder nichtnur, wie!} in Basic, mit 1(Zeichenketten) oder 0 (Zahlenfelder) anfangen. Sie koennen auch mit-128 anfangen und mit 127 aufhoeren [!}-128..127], ja es koennen auch mitdem Zeichen 'A' anfangen und mit demZeichen 'Z' aufhoeren ['A'..'Z'].Jeder Unterbereichs!}- oder Aufzaehltypist erlaubt. Solche Gags schafftnicht einmal mehr C (Der erste Grundfuer die nur 90% von C). Das warnun!} die erste von 6 Moeglichkeiteneigene Datentypen zu erstellen. Hiernur ein Ueberblick mit Beispielen:1. Simple Type - Ei!}nfache Typen, Grundtypen:var Wahr_Falsch :boolean; (* (true,false) *)Zeichen :char; (* chr(0)..chr(2!}55) *)Ganze_Zahl :integer; (*-32768..32767*)Gebrochene_Zahl:real;boolean, char und integer sindgleichzeitig auch Aufza!}ehl- undUnterbereichstypen2. count Type - Aufzaehltyp:type Fahrzeuge =(Auto, Anhaenger, Wohnwagen,Wohnmobil,LKW,Bu!}s);Grund_Farben=(rot,gruen,blau);3. Subrange - Unterbereichstypen (von Aufzaehltypen):type plus_minus_hundert=-100.!}.100;grossbuchstaben ='A'..'Z';Klasse3 =Auto..Wohnmobil;4. Array - Felder Matrizenvar Vector_pmh:array [plus_minus_!}hundert] of integer;Farbe :array [Grundfarben] of integer;Martix_2D :packed array [0..10,0..10] of real;Matrix_3D :pac!}ked array [0..10,0..10,0..10] of real5. Set - Mengen (ja Mengenlehre kann Pascal auch)var Garage:set of Fahrzeug!}e;Fahren:set of Klasse36. record - Verbundvariablentype adresse=packed recordname:packed array [1..20] of Grossbuc!}hstaben;str :packed array [1..20] of char;plz :1000..9999;ort :packed array [1..20] of char;end;7. file - Dateien! }var basic_aehnlich :text;Adress_datenbank:packed file of adresse;Zahlen :file of integer;Ich hoere jetzt lieber mit!!} denDatentypen auf bevor ich ins schwaermengerate. Alle Datentypen werden in denDemoprogrammen benutzt und auchbeschriebe!"}n.Das war der erste Teil der Deklaration(Anmedung). Es folgt jetzt dieDeklaration der Prozeduren undFunktionen:functio!#}n testdisk:boolean;var x:packed array [1..8] of char;i:integer;begin...end;procedure druckstat(n:integer);var i:in!$}teger;begin...end;Es handelt sich um Unterprogramme(unter Basic GOSUB oder EXEC unterTurbo Basic). Sie werden wie u!%}nterTurbo Basic mit ihrem Namenaufgerufen. Wie man sieht (ich hoffeihr habt es gesehen) haben sieeigene Variablen - die, !&}das istwichtig, nur Ihnen gehoeren und vonanderen Proceduren nicht benutzt werdenkoennen. (Man kann auch eigeneDatentypen!'} und Konstanten, ja sogarprivate proceduren (alsoUnterprogramme) definieren (und daskann C auch nicht). Das ist nochnicht!(} alles; an Prozeduren undFunktionen kann man aktuelle Werteuebergeben und Funktionen koennen sogarein Ergebnis zurueckgebe!)}n.Natuerlich muessen wir auch das genaudeklarieren. Das geschieht hinterdem Procedur- oder Function Namen. Inden Klammern!*} steht was derProcedure oder Function uebergebenwird, bei Functionen steht hinter dem':' (ausserhalb der Klammer) was sie!+}zurueckgibt.function consol:integer;procedure openkey;function getkey:charfunction upper(ch:char):char;function poke(a!,}dr,wert:integer);procedure setcolor(reg,color,lum:integer);function readsector(drive,sector:integer;var buffer:sectyp):i!-}nteger;function writessector(drive,sector:integervar buffer:sectyp):integer;function testdisk:boolean;procedure drucksta!.}t(n:integer);Wo kommen die den alle her? Natuerlichaus der ganzen Latte von "#i ..."(include) Befehlen (Include istueber!/}all im Programm erlaubt). DieseUnterprogramme sind von mir in Assembergeschrieben. Man kann sie jedochbenutzen als waeren !0}sie in Pascalgeschrieben. Versuchen wirherauszukriegen was die einzelnenRoutinen machen:"consol" fragt die Consol Tasten!1}(Start, Select, Option) ab und gibt dasErgebnis an unser Programm zurueck. Eswirkt wie ein PEEK($D01F) inTurbo Basic."o!2}penkey" oeffnet einen Datenkanal zuTastatur wirkt also wie ein"Open #1,4,0,"K:"."getkey" gehoert zu "openkey" und holtei!3}n Zeichen von der Tastatur. DerBefehl wahl:=getkey entspricht demBasicbefehlenget #1,wahl:wahl$=chr$(wahl)"upper" ist ei!4}n besonderer Gag. Erwandelt einen Buchstaben in einenpositiven Grossbuchstaben um.wahl:=upper(wahl);entspricht also in !5}Basic:if asc(wahl$)>=128 then wahl$=chr$(asc(wahl$)-128)if asc(wahl$)>=96 thenwahl$=chr$(asc(wahl$)-32 )Alles Klar? Di!6}e Bedeutung Poke undSetcolor werdet ihr auch ohne meineHilfe erraten. Versucht nun die"Kopfzeile" der Proceduren plot und!7}peek zu declarieren:procedure plot(_,_:_______);function peek(___:_______):_______;Kommen wir nun zu Readsector undWr!8}itesector. Nehmt euch die Zeit undschaut sie euch genau an:function readsector(drive,sector:integer;var buffer:sectyp):!9}integer;function writessector(drive,sector:integervar buffer:sectyp):integer;Wer aufmerksamm gelesen hat wird sicheri!:}nnern, dass wir einen kleinenDiskmonitor schreiben wollten. Dafuermuss man Sectoren von Disk lesenund schreiben koennen. U!;}nd eben diesmachen diese Functionen. Sie lesenbzw. schreiben den Sektor "sector" vomLaufwerk "drive" in dieStringvariabe !<}"buffer", zurueck gebensie eine Fehlernummer. Zur Uebungversucht doch einmal den sector 2 vomLaufwerk 1 nach "sector2" zu!=}lesen:err:=readsector(_,_,_______);und nach sector 10 auf Laufwerk 2 zuschreiben:___:=___________(_,_,_______);Wie i!>}hr seht ist das sehr vieleinfacher als unter Basic oderAssembler.Dadurch wird die Entwicklungszeit einesProgrammes stark !?}herabgesetzt.Voraussetzung sind umfangreicheLibraries, in denen moeglicht vielvorbereitet ist.Welche ";", ":" und "," wa!@}s bedeutetlernen wir in der naechten Folge(wenn Ihr es nicht schon erraten habt),dort werden wir anhand von denletzten be!A}iden Proceduren undFunctionen lernen wie man eigeneUnterprogramme in Pascal definiert.So ganz zum Schluss kommt daseigen!B}tliche Programmbegin...end.Der "." ist kein Eingabefehler. JedesPascal Programm hoert mit "end."auf.So jetzt no!C}ch mal alles zusammen zumeinpraegen:programm restore(input,output)label ...;const ...;type ...;var ...;function !D}...;procedure ...;begin...end.Die feineren Sachen, naemlich alles wa zwischen begin und end stehterfahrt ihr !E}im zweiten Teil des Kurses.Ich will aber nicht von euch scheidenohne euch ein paar Buecher zuempfehlen:Happy Computer So!F}nderheft 05/86ProgramiersprachenBehandelt nicht nur Pascal sondern auchC und Forth. Dafuer, dass 3Programierkurse in ein!G}em Sonderheft,das ausserdem viele interesanteHintergrundinformationen bietetzusammengefasst sind ist es recht gut.Aber ei!H}n richtiges Pascal Buch kann esnicht ersetzen.KorbmacherDas Trainingsbuch zu PascalUCSD und Pascal 64Data Becker, Dues!I}seldorf 1984ISBN 3 - 89011 - 017 - 7DM 39.00 (Als ich es gekauft habe)Keine Angst vor der "64". Von 256Seiten sind nur 2!J}2 Seitenausschliesslich fuer den C=64, dierestlichen 234 Seiten sindRechnerunabhaengig und leichtverstaendlich geschriebe!K}n.C.A.R. Hoera, N. WirthAn Axiomatic Definition of thePrgramming Language PASCALN. WirthAlgorithmen und Datenstruktu!L}renTeubner 1975Diese beiden duerfen in keinerLiteratur Liste ueber Pascal fehlen,aber wer nicht gerade Informatikstudi!M}ert sollte die Finger davonlassen.Ach ja, der Compy Shop plant auch einenPascal Kurs, leider habe ichnoch nichts davon !N}gelesen, wenn ich waszu Gesicht bekommen habe, werdeich mich darueber aeussernMartin KrischikIch danke Karl Heinz Arend!O} alsgeduldigen Lector und willigenProbeschueler.eich mich darueber aeussernMartin KrischikIch danke Karl Heinz Arend 4--------------------------------------VORDERSEITE VORDERSEITE VORDERSEITE--------------------------------------DOS.SYSABB-Q}UC FARBDOS 2.5. Aus Platzgruenden wurde auf das DUP.SYSverzichtet.----------------------AUTORUN.SYS/TITEL/BILDvon Erwin -R}KehrerDas Siegertitelbild. Wird beim bootenautomatisch geladen-----------EINZEIL.BASvon Marlies Henke-------------------S}--LESER.BAS/QUATRO.FNTAusgabeprg. fuer alle folgenden Textemit geaendertem Zeichensatz>>INFO.TXT Neues vom -T}ABBUC>>DIGIT.TXT Bericht ueber Videodigitalisierer>>WERBUNG.TXT Kostenlose Kleinanzeigen>>MESSE.TXT Bericht ueber Ce-U}Bit 88>>PASCAL.TXT 1.Teil Pascalkurs>>PROGRAM.TXT Programmbeschreibungen-----------------------------RATEN.BAS/RATEN.-V}PIC/ABBUC.PICvon Klaus Peter KoenigPreisraetsel. Bitte Loesungszahl untenrechts an ABBUC schicken.-----------PARKETT.BAS-W}aus ATARI EXPLORER 4/88Graphicdemo nach H.C. Escher. "Das ge-ordnete Chaos. Alle ST Besitzer koennendas Prg. mit wenigen -}Messe - Bericht - CeBit'887.Maerz 1988 - 9.00 Uhr Morgens:Der Ansturm auf den Haupteingang beginntMan draengelt sich in d%Y}ie Eingangshalle,um sich dann in eine der Schlangen zustellen, die immer laenger werden. Aberwas soll ich lange Reden. Jed%Z}er, der schon einmal eine Messe besucht hat,kennt dieses "RITUAL" und bereitet sicheben geistig und zeitlich darauf vor.%[}Die Eingangshalle endlich hinter sichgelassen, steht man wieder im Freien.Waehrend man etwas frische Luft aufnimmtkoennte %\}eine Ueberlegung in welcherReihenfolge man die 13 Hallen bewaeltigteine gar nicht so schlechte Idee sein.Aber als eingefle%]}ischter und ueberzeug-ter ATARIANER, (der sich zudem vorheretwas informiert hat) geht man gleich inHalle 7.Der etwa 150-2%^}00 Quadratmeter grosseStand, war nicht zu uebersehen. Das esfuer die ST-Serie genuegend zu sehen gabkann sich jeder der Fa%_}chzeitschriftenliesst, selbst denken. Da der "ST"auch meinen Weihnachtsgabentisch zierte,liess sich meine Begeisterung an %`}meinenglaenzenden Augen feststellen.Sattgesehen an den vielen ST-Staenden,macht man sich auf die "Suche" nacheinem "klein%a}en XL/XE -Stand", der ja aufder CeBit'87 noch vorhanden war. Zusehen war nichts dergleichen. Aber dawar ja noch der Atari-%b}Info-Tresen, woman ja zur Not fragen kann. Auf die Fra-ge: Ob es etwas von der XL/XE-Serie zuzu sehen gibt ?, war die Antw%c}ort:Natuerlich ! Gehen Sie links um denStand, dann koennen sie's gar nichtverfehlen.Und richtig ! Da war sie, die etwa 60%d}*90cm grosse Glasscheibe, hinter der dasneue "ATARI XE VIDEO GAME SYSTEM" zu sehen war. Etaws begeistert vom Designdes ne%e}uen Systems, macht man sich wie-der auf den Weg zum Info-Tresen (womitich nicht der einzige war).Meine Frage, etwas Infoma%f}terial zumneuen und alten XL/XE-System zu bekommen, machte dem Standpersonal sichtlichSchwierigkeiten. Ein Faltblatt des n%g}euenSystems bekam ich dann auch. Es ist aber bemerkenswert, dass wenigstens fuerdie 'ST's genug Reklame vorhanden war.Ueb%q}b%DOS SYSb)AUTORUN SYSb>BBILD bTITEL bABBUCC PICb RATEN PICb DIGIT TXTbWERBUNG TXTbrPASCAL TXTb.XMESSE TXTbOINFO TXTb!PPROGRAM TXTb QUATRO FNTb EINZEIL BASb%MENUE BASb3LESER BASbNPARKETT BASbePYTHAGO BASb|SOUND BASbRAETSEL BASb ACSFCOPYOBJbSPEEDY OBJbSPLIT BASDUP SYSrigens waerend der ganzen Messe,kreiste ein Sportflugzeug mit einem"ATARI - HOMECOMPUTERS"-Banner, den ganzen Tag ueber da%r}s Messegelaende.Das uebrige Messegeschehen, halte ichnun in kurzen Stichpunkten fest, ob-wohl ich am Ende noch einmal auf%s} Atarikurz eingehen muss.Die Messe wird im allgemeinen, von Tele-kommunikation, CAD/CAM, ISDN und natuer-lich Desktop Pub%t}lishing (DTP) gepraegt.Die Auswahl der anbietenden Firmen ist so gross, dass man nicht weiss, wo manzuerst hinsehen soll. %u}Wobei man ganz allgemein davon ausgehen kann, dass alleFirmen das gleiche anbieten.Die Unterschiede sind wohl nur dieComp%v}uter mit der man die einzelnenProgramme oder Hardwaremoeglichkeitenanwenden will, abgesehen vom Preis, denman als "Kleinan%w}wender" in einem nor-malen Familienhaushalt lieber nichterfragen sollte. Preisunterschiedezwischen den Herstellern, die je%x} nachAbnahme fuenfstellig sein koennen, sindauf einer Messe wie diese voellig normal.Telekommunikation, orientiert sichue%y}berwiegend an speziell dafuer ent-wickelte Computer und an das zunehmendgroesser werdende Kabelnetz derDeutschen Bundespos%z}t. Das Firmen wie:TN, Philips, IBM und wie die grossenHersteller und Entwickler alle heissenan erster Stelle stehen, brauc%{}ht wohlnicht naeher erlaeutert zu werden.Diese Anwendungsmoeglichkeiten naeherzu erlaeutern, wuerde an dieser Stellezu we%|}it fueren. Fuer uns 8-Biter sindThemen wie Multisync Monitore oder Laserdrucker wesentlich interessanter.Multisync Monitor%}}e geben dem Anwenderein superscharfes Bild, man solltedabei aber seinen Computer im Auge be-halten, falls man evt. eine sp%~}ezielleElektronik braucht um den Multisync andem eigenen Computer zu betreiben. Nunzu den Laserdruckern. Hier eine Em-pfe%}hlung zu geben ist nicht einfach,denn abgesehen von Preisunterschieden,ist der Ausdruck bei allen Geraeten aufden ersten B%}lick gleich. Aber letztend-lich entscheidet die softwaremaessige Ansteuerung, die z.Z. in den wenigstenProgrammen vorhande%}n ist. Im grossenund ganzen, kann man aber sagen, dieTendenz der Laserdrucker ist steigendund der Preis wird auch schon ni%}edriger. Nun aber noch einmal zu Atari.In den Heften von der Fa.Markt undTechnik, konnte man lesen: Der Chef-entwickler %}von Atari signiert die ersteAusgabe eines neuen Heftes. AmDonnerstag (17.3.88) fragte ich beiAtari und am Markt und Techni%}k Stand,ob es dabei bleibt, dass Shiraz Shivjiam Samstag und Sonntag je eine Stundezum Signieren da ist. Es wurde mir be-%}staetigt. Am Samstag wollte ich ohne-hin zur Messe, aber die Tatsache demVater der STs zu begegnen, gab demganzen etwas me%}hr Anreiz. Den Be-sucheransturm vom Samstag will ichgar nich weiter ansprechen. Also - alserstes in die Halle 7, wo ich da%}nnhoeren musste: Shiraz Shivji war amFreitag nur kurz da und ist gleichwieder zurueckgeflogen !Es waere ja auch zu schoen%} gewesen,schliesslich wollte ich auch Disketten-huellen signieren lassen, um sie demABBUC zur Verlosung zur Verfuegung zu%}stellen. Aber man sollte sich nicht aufWorte Verlassen.Uebrigens ! Erhoehte Preise fuer Ver-pflegung, muss man umgehen, in%}dem mansich etwas mitbringt.Als Beispiel: Eine Tasse Kaffee kostete2.40 DM, wobei der Inhalt bei mir zu-hause, nicht einm%}al die halbe Tassefuellen wuerde.Der Eintritt ?Erwachsene 24.- DMSchueler 12.- DMZum guten Schluss moechte ich aber d%}ieStaende von der Fa.NEC und der Fa. HITACHI loben, wo die Angestellten"JEDEM" Interssenten, sehr viel Freund-lichkeit un%}d viel,viel Zeit zur Ver-fuegung stellte und dies nicht ab-haengig von Vertragserwartungen machte.Noch ein Gruss an alle %}Bit Byter undder durch Computer leidenden Familie. Frank Braun Hannoverrtragserwartungen machte.Noch ein Gruss an alle $KHallo Bit ByterWir hoffen, Ihr seid nicht aberglaeu-bisch und schaut in das Magazin, auchwenn es die Nummer 13 traegt. Au)}f jedenFall wuenschen wir Euch viel Spassdamit.Aktuelles aus dem Club:Viel hat sich nicht ereignet, seit demSondermaga)}zin # 3. Aber hier die Neuig-keiten in Stichpunkten:-Mitgliederzahl bleibt konstant. -Beitragssaeumigen geht es an den Kra)}gen Die ersten gerichtlichen Mahnverfahren laufen.-Beitragserhoehung nicht in Aussicht.-Aufnahmegebuehr abgelehnt. Ein an)}derer Club aus dem norddeutschen Raum nimmt 20 DM Aufnahmegebuehr und 8 DM Monats- beitrag!-Leistungen des ABBUC verbesse)}rt---------------------------------------REPARATURSERVICEAb sofort koennen Bit Byter (und nurdie!) ihre Geraete im clube)}igenen Reparaturservice instandsetzen lassen. Wir haben dazu fast 750 DM investieren muessen. Aus den USA wurden spezielle)} Programme, Messdisketten und ein Ueber-pruefungscomputer angeschafft.Den Ablauf haben wir uns wie folgt vor-gestellt. Ih)}r schickt einen Brief mitfrankiertem und adressiertem Rueckum-schlag an die unten aufgefuehrten An-schriften. Darin schild)}ert ihr bitteausfuehrlich die Fehler. Beispiel:Floppy beim Einschalten o.k. LED leuch-tet auf. Aber keine Reaktion auf Rec)}h-nerkommando. Innerhalb einiger Tagewird Euch geantwortet. Darin wird mitge-teilt ob eine Reparatur selbst vorgenom-men )}werden kann, oder ob das Geraet ein-geschickt werden soll. Das Einschickensollte per Paket erfolgen, da in demPorto automa)}tisch eine Versicherung ent-halten ist. Die Reparatur wird von BitBytern durchgefuehrt, die KEINE (!) Profis sind und die )}Arbeit uebernommenhaben, weil wir ein Club zum Mitmachensind. Bei der Reparatur wird auf jedenFall 5 DM Anteil fuer Testge)}raetanschaf-fung erhoben. Ansonsten sind Material-und Ersatzteilkosten zu zahlen. Wobeidie Ersatzteile, soweit moeglich,au)}s al-ten Geraeten entnommen werden. Reuck- sendung der Geraete erfolgt nach dem Be-gleichen der Rechnung.Um den Verwaltu)}ngsaufwand zu vereinfa-chen, sind die Kosten immer mit dem Reparaturservice abzurechnen und nicht auf das Clubkonto zu ueb)}erweisen!Hier die Anschriften: RECHNER (400,800,600XL,800XL,800XE 130XE)JOOST KUEPFRIELINGSHAUSWEG 174600 DORTMUNDF)}LOPPY (810,1050)THORSTEN SCHULZErlentiefenstr. 914709 Bergkamen---------------------------------------BAUPLANAENDERUNGE)}NFolgende Bauplaene sind aus der Liste zustreichen: B006, B007, B008, B009, B156B201, B202, B252, B300, B452 Sie werdenwe)}gen der geringen Nachfrage nicht mehrgefuehrt. Folgende Bauplaene sind neu aufgenommen:B152 10S. Druckerpuffer D,La,Li,S)}pB252 5S. Minimodem D,La,SpB554 1S. 16 Kanaloutputbox Sp.---------------------------------------MAILBOXUeber die CO-Bo)}xen gibt es noch nichtsNeues zu berichten. Die ABBUC Box hatbisher 3000 Anrufe zu verzeichnen.Hier noch einmal die Daten:)}02366-39623 8/N/1 Taeglich von 19.00hbis 07.00h Sa./So. von 15.00h---------------------------------------KONTAKTE:Ich suc)}he noch Bit Byter die mit ATARI 8 Bit Freaks in der DDR Briefkontakte aufnehmen wollen. Bitte bei mir melden.Ich schicke E)}uch dann die Kontaktadressezu. Bisher wurden leider Kontaktaufnah-men durch die Clubzentrale nicht ausder DDR bestaetigt. )}Entweder wird diePost abgefangen oder die Leute wollensich nicht bedanken (was wir eigentlichnicht glauben). Weiterhin hab)}e ich eineKontaktanschrift aus Kanada zu vergeben.Wer zuerst kommt, mahlt zuerst!---------------------------------------T)}ermine Termine Termine Termine-->10. 7. bis 14. 8. Urlaubszeit! weder Clubzentrale noch PD-Service sind besetzt. Wir )}sammeln Entspannungsbits! Die Mailbox ist jedoch dann ganztaegig in Betrieb-->2.9. bis 4.9. Atari Messe in Duessel)}dorf. Ob der ABBUC eingeladen wird, steht noch nicht fest.-->19.11. 1988 Jahreshauptversammlung ABBUC in Herten. Es i)}st wieder eine Computerschau geplant!---------------------------------------DRUCKERFRAGEN:Wir suchen dringend einen Bit)} Byter,derdie Druckerfragen uebernimmt, daRoland Roll das Handtuch geworfen hat.Bitte bei mir melden!--------------------)}-------------------SOFTWARE:MINI OFFICE IIAb sofort ist bei Matthias fuer 5 DMeine Diskette mit einer deutschen An-leitu)}ng (Anlehnung an das Original) fuerdas Prg. erhaeltlich. Der Ausdruck er-folgt mit dem Textverarbeitungsteil desPrg. und e)}rgibt 24 Seiten.Neuerungen:Folgende Prg. sind in neuer Versionbzw. neu auf dem Markt:-----------------------------------)}----NAME HERSTELLER VERSION---------------------------------------Action OSS 3.06B/G)}raph Electr.Arts 1.1.1Bank Street Broderbund 1.0WriterBasic XE OSS 1.2BlazingPadd)}les Baudville 04412ComputerEyes DigitalVers. 1.3Desktop Per- Virtusonics 1.1formance StudioDraper Pas)}cal Draper Soft 2.0First XLent XLent Soft 2.1WordprozessorFlashBack ICD 1.1Guitar Wizzar)}d Baudville 11602Kyan Pascal Kyan Soft 2.02MYDOS Supra 4.3PaperClip with Electr.Art)}s 2.0SpellpackPrint Shop Broderbund 1.0PS Companion Broderbund 1.0Sparta DOS ICD 3.)}5AConstr. SetTypeSetter130XE XLent 1.4TypeSetter48K XLent 1.3--------------------------------------)}-Quelle: Atari Explorer 4/88---------------------------------------WETTBEWERBE:Programm des Magazins # 12 wurde:Digitals)}ound knapp vor dem Reiskornprg.und dem Menue. Unter den Einsendern wur-den Stefan Hoehl und Guenter Laue ausge-lost. Ihnen)} geht ein Originalprg. zu.Wir halten den Wettbewerb mit der Wahldes besten Programmes auch auf diesemMagazin weiter aufrec)}ht. Also beteiligtEuch wieder mit einer Postkarte an derAbstimmung.Das Siegertitelbild stammt in dieserAusgabe von Erwin )}Kehrer. Den 2. Platzbelegte Rob van der Haar, auf dem 3.Platz landete Gehard Paul.Raetselprg.Das Prg. stammt von Hans Pe)}ter Koenig.Er bekommt eine Originalsoftware dazu.Die Loesung des Raetsels koennt Ihrzusammen mit der Programmwahl aufeine)}r Postkarte vermerken. Auch fuerMagazin # 14 wird ein Titelbild undein Raetselprg. gesucht.-------------------------------)}--------TIPS UND TRICKS:Um bei den Spatra-Dos Versionen 3.2und 2.6 die Uhr in der Statuszeile auf50 Hz zu aendern muss ma)}n mit einemMonitorprg. die Kombination: 3C 00 0E10 03 4B suchen und den Wert 3C in 32aendern.----------------------------)}-----------IN LETZTER MINUTEGerade erreicht mich ein Brief aus denU.S.A. Unser dortiges Mitglied HorstDewitz teilt mit, d)}ass das A-Dos vor-laeufig nicht erscheinen wird. Es stehtzur Zeit so: Bill Willkinson hat dasADos fuer ATARI unter Vertrag)} entwickeltEr arbeitet jedoch fuer die Firma OSS.Diese Firma wurde von der Firma ICD aufgekauft. Da nun das A-DOS vieles m)}itdem Sparta DOS gleich hatte, wurde ATARIvon ICD wegen Verstoss gegen die Copy-rightbestimmungen verklagt. Sparta DOSist)} also in den USA das einzige DOS,dass den zweiseitigen Drive XF 551handhaben kann. Nun koennten wir (ABBUC)versuchen, wenn)} genuegend Interesse vonEurer Seite besteht, das Sparta-DOSConstruction Set in "SITELICENCE" zubekommen. Das heisst, gegen)} eine nochfestzulegende Gebuehr wuerde der ABBUCversuchen, bei der Firma ICD die Geneh-migung zu bekommen,das Construction)} Setweiterzugeben. Es hat ein 200 Seitenstarkes Handbuch. Ohne Handbuch solleine Nutzung fast unmoeglich sein. DasSet kos)}tet in den USA ca. 30 bis 40 $.Um diese Lizensanfrage zu starten,muessten wir aber vorher wissen, wer vonEuch da mitmachen)} will. Also schreibtuns eine Karte mit dem entsprechendenVermerk. Sobald die Anzahl feststeht,werden wir uns mit ICD in Ve)}rbindungsetzten, den Preis erfragen und dannEuch den entgueltigen Preis mitteilen.Erst dann muessten wir eine rechtsver-b)}indliche Bestellung haben. ---------------------------------------NEWSROOM auch fuer AtariAb sofort ist in den USA das bek)}annteCommodore Prg. auch fuer unsere 8-BitRechner lieferbar. Bezugsquelle:Springboard SoftwareP.O.Box 141079Minneapolis )}MN 55414-6079Preise: The Newsroom 39.95$Newsroom + 1 Clip Art 49.90$Newsroom + 2 Clip Art 59.85$Newsroom + 3 Clip Art 69)}.80$Porto 5 $Clip Art 1=600 Bilder zu versch. ThemenClip Art 2=800 Bilder zu Handel/GewerbeCLIP ART 3=600 Bilder yu Sport)}/Freizeit--------------------------------------PD-BIBLIOTHEKNEUHEITEN # NEUHEITEN # NEUHEITEN #AB SOFORT LIEFERBAR!!!!!!)}!!!!!!SONDERSPIELE DISK #14 DAS BOERSENSPIELSONDERSPIELE DISK #15SIMULATIONSSPIELE (engl. Sprache) 1.The Felton Project )}2. Nine Treasuresof Christal ClusterGRAFIK DISK #19 FADER 9 HerrlicheBilder-DemoDRUCKER DISK #11 DER ZEITUNGSREDAKTEUR)}(Nur fuer 130 XE oder erweiterten 800XL, Anleitung auf der Rueckseite)Dieses Programm besteht aus mehrerenEinzelprogrammen)}, die auch alleinegenutzt werden koennen. -Print ShopBilder Converter (Umsetzung auf 62Sektoren) -Photo Converter(Ausschn)}itte aus Bilder) -Redakteur(Eine Zeitung erstellen)-Ausdruckprogramm fuer Redakteur-Malkasten mit Hardcopyprogramm fast e)}in Desk Top Publishing Prg.!DRUCKER DISK #12 ETIKETTEN UTILITIESEin Labelprogramm mit GrafikausdruckDRUCKER DISK #13 PRI)}NT SHOP UTILITIES IIEin Print Shop Bilder Converter(Umsetzung auf 62 Sektoren) Auch schonab 600XL mit ErweiterungDRUCKER )}DISK #14 HYPER-PRINTER PrinterUtilities fuer Drucker und PlotterBestellungen wie immer an:ABBUC-SERVICE Mathias Koester)}Windhegge 2 4408 Duelmen Tel.:02594/1645ACHTUNG!!!! ACHTUNG!!!!! ACHTUNG!!!!PROGRAMMBERICHTIGUNGDRUCKER DISK # USA 1 MA)}GIC LATERN I.Im Programm LATERN.BAS FEHLER IN ZEILE2310 Bitte in Zeile 2310 den CHR$-Wert14 umwandeln in 24.ANWENDUNG DI)}SK # 16 TERMINKALENDER Beieinem Schaltjahr muss in der Datazeile1030 der zweite DATA-Wert eine 2 sein. (}Aenderungen (sieheREM-Zeilen auch auf dem ST laufen lassen.8-Bit Usern wird Turbo Basic dazu em-pfohlen, da das Prg. sonst-} sehr langsamist.----------PYTAGO.BASvon ??? (bitte bei mir melden,Anschrift verlorengegangen)Berechnet Seitenl-}aengen nach Pythagoras---------SOUND.BASvon Roser StoffersGute Umsetzung eines bekannten Liedes------------ACSFCOPY.OBJ-}von Andre CichowskiCopierprg. fuer Disk/Cassette oder um-gekehrt. Aber auch Disk/Disk und Kasset-te/Kassette ist moeglich-}. Prg. brauchtaber unbedingt(!) eine Ramdisk. Es istsomit nicht durch die Filegroesse be-grenzt.----------SPEEDY.OBJvon-} Dirk MatuszczakUtilityprg. fuer die Speedy 1050 Er-weiterung vom Compy Shop---------SPLIT.BASTeilt Textfiles in mehrere-} kleine Files---------------------------------------RUECKSEITE RUECKSEITE RUECKSEITE RUECK---------------------------------}-------DOS.SYSEs handelt sich hierbei um das DOSII+/D Vers. 6.1 von Stefan Dorndorf---------MENUE.BASAuswahlmenue zur A-}usgabe der Programme-------------------HAUS.BAS und HAKOS1KLAUS WITTKOWSKIEin Programm zur Berechnung von Miet-nebenkost-}en. Mit Druckerroutine. Nichtnur fuer Hausbesitzer. Auch Mieter koen-nen hier ihre Nebenkosten nachrechnen.In der Datei HA-}KOS1 sind Beispieldatenfuer eine Demo eingegeben.---------COVER.BASvon Christian GnaedigDas Prg. druckt auf einem DIN A4-} Blatteine Diskettentasche im Umriss mit demDisketteninhalt aus. Tasche braucht nurnoch ausgeschnitten und zusammengeklebt-}werden.----------BITVER.BASvon Burkhard WagnerPrg. demonstriert an zwei Beispielendie bitweise Verschiebung.-----------}-ENTFERN.BASvon Hans Peter Koenigzeigt Entfernungen einzelner Staedte inder BRD an. Bitte Joystick benutzen.-------------}-----------------------EINZEIL.TUR (mit Turbobasic laden!)von Stefan Landgraf---------MAGIC.BASGraphic P/M Demo von eine-}r US-Clubdisk---------------------------MIDMACE.OBJ (Vom DOS laden!)von Ken MillerEin Spiel nach Pack-Man-Art. Von einer-}US-Clubdisk. Bitte Joystick benutzen.------------------------------------EINZEIL2.TUR (mit Turbobasic laden!)von Gerhard P-}aul-----------TAPETEN.BASvon John van Uden (Neuseeland)Berechnet nach Eingabe von gefordertenWerten,die Anzahl benoetigt-}er Tapeten-rollen. Mit Druckroutine.-----------CELEDIT.TURvon Frank NeissEs koennen in Graphic 7 einzelne Zellengezeich-}net und dann in Graphic 8 umko-piert werden.----------FEUERW.BASSound/Graphicdemo von einer US-Clubdisk------------MIND-}EX47.DATInhalte der ABBUC Magazine 4 bis 7. Da-zu bitte das Prg. Easyfind aus Magazin#12 benutzen.------------------------}-----AUSDRUCK.OBJ (Vom DOS laden!)vonPrg. ist in ACTION! geschrieben und wur-de modifiziert. Druckt bei graphicfaehi-gen-} Druckern alle Sonderzeichen. DrucktTextfiles oder gelistete Basicfiles.Basicbefehle werden einzeln(einer proZeile) ausgeg-}eben. Nur bei Sonderzeichenspringt der Drucker in den Graphicmodus.----------- BIGFOOT.BASaus ANTIC 1/88Graphicdemo, die-} mit Scrolling und ver-aenderter Displaylist arbeitet.--------------------------------------s ANTIC 1/88Graphicdemo, die,`BCf v NNNNNN1N12N15N25FASEDEBLOCMEBFILNUFNMDR@@@@@Y}A(AUAU @  A AUA%@VBP@m@@A"Y}@@( @@ #"# A`+ AP%&+Y}67<,0 (,(File nicht gefunden.6 A (6-A:7:,6-P:$'%@,"(&(Z   'Y}' AdA 6.'!'6.''!'/6.9'!'A6.n; 6.6-%;P:'+@:,&Av,%?P,Y}!'A x ' 6-& A  6.>:%Av,2 6.U('( File ist  BLOECKE lang.U(Y} & )& @:,&)!@:,&AP -68,- > (>:,6-&@H"-Y}&:68,-P:+',%?,> 8 -&"68&,-8&,%8,& 868&,-&8&,$-8&, 6.6Z}7,.67,. A@%67B:,%,. $'67B:,%,.$2( ("( ERROR - F:A,,Z} B/2U&;,;,;,;%,9@,66-P:I:,',$MI:,& AU6-&F ;,6.=:,-Z}B:,,6-@:7<,,46-%B67<,.>:,F +A"1+(#ԯԠŠҠ.(1('%%( Z}<<<<<<vvvffff~`~~fn8vf>6>|of888<88<x< ~f~ff~~f~~<8<~~~~pp<8pp8?2}ww<~~~<x`x`~<~~<2 }0~0 ~ <~~<~~f~``~ff~|```|~ff~~f~`~>~ff~~``~fff<>``lxln<c2 }kc~ffff~fff~~ff~``~ff~||```~`~~~ffff~fff~<ckwf~~ffff~~~p~<~~<2 }8x8ff~``~ff~||```~`~~~ffff~fff~<ckwf~~ffff~~~p~<~~<0@@DA {-@ @+/-@y3E,@9Q/AU 6 }i-Am q { @ D:EINZEIL.BAS+/-@y3E,@9Q/AU 4=0OPDISLDRTNCD@ !@@ AV:} BD @ @@@"@A8@B +(6-@2Q A:} Q;@,;Ah,;Ah,;@,;@,;@,<? 6.=:,-@B:,;67<,.>:@:7<,,%@:},? F9 6.@9@@D1:*.*P! A!-@@dZ$@$67B:,:}%@,.d n Ax&6-F:A,&@&A + A )AR@;@@:}MAAh_A @DqA@A@pA@u%6-F:A`,%AV$F:A:}a,9%@@qM%@@a%@@u%@@E%@(@e.%@)F:A:}`,E%@0F:Aa,TA'AA$9AEAT6-?:A,SAV:}%6-$AV%A`/#A C-@cG"O%S J-@"(abbuc ev4-@!J:}( ATARI BIT BYTER>-@@>($ USER CLUB E. V.  >-@@>($:} i-@@@($ i($  :}1 1(% -@@(3 6. $67Ah<Ah,. 367@,.:}'6-@6-@'6-@-@@d=&6.7$@&@<$@,=6.7@<@,.:}.7@<@,4 DOS SYSA"4SYSA,4 A@4FNTAJ4ASMA:}T4TXTAh4PICAr%%7@<@,4DMA|''7@<@,4MENUA):}7@<@,0 ') A 6--@@7<,4 AP67<,.7<,6-%@:} $$7@<@,4 A67<,..6-%@-@@67<,.7<,6-:}%@ !"@((!6-@2 6.=:, @ 6. 267@,.=:,9-@@567: }<,.>:@:7<,,%A(,9 6.7<%@,&9-@@567<,.>:@:7<,,%A(,9 0(:!}:6-%@D86-%@6-%@+!@.'8 AN X:-@@:(Gebe Filenummer:"} zum Laden ein,Y1-@@ 1(dann druecke : b Al## @)!&@Av 6.:#}D1://67@,.7$@&@<$@,t 6.-@@57<,4 )7<,4.M67<%@,.:$}.DM1[6-%@g6-@j't Ap 5 A@@5@@; +A:%}) A ;AR@vAP@*ARF:@,?ASF:@,QAVAcAW:&}@v6-?:C:hLV,,&6-F:Ad,&"AUA)AdAU)"@bA@"@7:'}A0@A)6-%@67<,.=:,) ApYA%@!+7( LOADING :(}V7@<@,4DOS.SYSY.R-@@E7<%@,4.BIN)7<%@,4.OBJH'R A :)} A% 6-F:A, A6-?:A6@B7t$HWW162,16,32,173,6,134,207,104,104,157,69,3,104,15:+}7,68,3,169,4,157,74,3,169,3,157,66RRR3,32,86,228,16,3,76,166,6,169,203,157,68,3,169,0,157,69,3,169,2,157,72,3,169\XX0,1:,}57,73,3,169,7,157,66,3,32,86,228,16,6,192,136,240,92,208,96,169,255,197,203,208fXX4,197,204,240,210,169,205,157,68,3,169,0:-},157,69,3,32,86,228,16,2,48,69,165,207,240p\\14,165,203,141,224,2,165,204,141,225,2,169,0,133,207,165,203,157,68,3,165,204:.},157,69,3zXX165,205,56,229,203,157,72,3,165,206,229,204,157,73,3,254,72,3,208,3,254,73,3,32,86[[228,16,137,192,3,240,1:/}33,76,166,6,32,173,6,108,224,2,152,133,212,169,0,133,213,169,12ff157,66,3,32,86,228,96,104,162,4,160,0,177,203,145,205,20:0}0,208,249,230,204,230,206,202,208,240,96KK0,0,0,0,0,0,0,192,48,12,12,12,12,12,12,12,255,255,192,48,15,0,255,255PP255,:1}255,0,0,255,0,255,255,12,12,204,60,252,0,0,192,255,255,192,48,15,0,0,022255,255,0,0,255,0,0,0,12,12,204,60,252,0,0,0:2} D:MENU*.* DIGIT TXT 0DOS.SYS DIGIT.TXT ,15,0,0,022255,255,0,0,255,0,0,0,12,12,204,60,252,0,0,08=*+{ ABLNCNDFPOKE8CIO<K(@B6AU %< BI U >4}+@1A @CA@iUAY3%6-F:A`,%AV$F:Aa,36-&>5}@27@d#%@@d7%@@d(E%@@f.%@F:@,E%@F:@>6},2G-@@Q@-%C%%@@G <_%@R@eF%@S++'AV,&>7}P:'AV,,$AV_%@TP:'AV,FG0A`++'AV,&P:'AV,,$AVGAaP:'AV,P A>8} 0Z&&;@u,;@@,;@,d.@.@@K:n9AR@'@@>9}-(}0(3(6(9(x((( ((( WELCHEN TEXT MOECHTEN SIE ((( LESE>:}N? ((( ((( = INFO ((( = KLEINANZEIG>;}EN ((( = CEBIT 88 ((( = DIGITISER ((( = PASCAL KURS TEIL><} I ((( = PROGRAMMERKLAERUNG ((( =MENUE ((( >=}AY@4)@<"@:1, 6. D1:INFO.TXT2@< A`?"@:2,#6.D1:WER>>}BUNG.TXT5@? A`="@:3,!6. D1:MESSE.TXT3@= A`="@:4,!6. D1:DIGI>?}T.TXT3@= A`<"@:5, 6. D1:PAS*.TXT2@< A`="@:6,!6. D1:PROG*.TX>@}T3@= A`"@:M, A A6- B A`.@.@>A}@K:"pAR@((0(} 3(^(& Ausgabe auf ildschirm oder ruckerpA>B}Y@4,)@6"@:D,A@@"@:B,APJ ATV@@9@@>C}P:V@@^ B A@h@r(@ |6-%@>D}q"@f A$(@/(@:(@E(@P(@[(@g6-q A A>E}`:F:Ad,"@3*AdAU0(}: A`4F:Ad,"@(*AdAU4 A A>F}#@@# A B AC@+@@=AR@C(>G}}@-(6-%@%"@!6-% A  Ap A:>H}F:Ad,"@3*AdAU0(}: Ap4F:Ad,"@(*AdAU4 A& A00A>I}R@(}:U-@@3(ҠG-@AK U ApD ANG+F:>J}Ad,"@3)F:Ad,"@(=AdAUG AX Ab>-@@";(!堽򠯠>K}à>$;@`,@@67@<@`,.%hhhhEhDhhBhIhHA VA`,,@@>L} D:QUAT*.FNT AVF:A,&@E:6-?:C:,<@M}@@(}+% D:MENUE.BAS D:LESER.BAShhhhEhDhhB,$AV<@<A$,E@$+<I[\, PWIHEXDPRIMNVERTNROTVERTSXCENTYCENTRTHETXOLYOLXNYNNWVERTNWOFFSEXY@pAABO}A@fe@ XWD@@A @ @ @ @ @ @BP}fH @ APP6-@p "#'6-6-BQ}'6-( "29<@,<6-6-F-@P*-@@"&68<,-*BR} QKKԠ堸 FOR J=1 TO 2:READ VERTS(I,J):NEXT JZ+O:8<@,,!+6-O:8<@,,d+BS}O:8<@,,!+6-O:8<@,,n s6-%@6-%@xŠқ-&@6BT}-$@$'-@/6-8<@,%6-8<@,/ AP !6- !6-#"@BU} AQ# A  AQ    6-@$6-@$ԠҠΠś 6-%%%+'BV}@,!A-&@6-$@$'-@"/6-8<@,%6-8<@,/ APBW},#"@ AQ# A 6 AQ @   A@46-@$&@(9<@,46-BX}ŠŠȠӛ 6-%%+'@,!Ap6-6-%@,,Š٠ԠBY}ΠΛ-@&@%6-8<@,%6-8<@,E$68@$&@<@,-E68@BZ}$&@<@,-96-8%@<@,&96-8%@<@,&5"+6-6@$N:,$'@B[}5 A$6-D:',.!6-%L APV.6-'@.6-$+6@,#+%@,`6-@$&B\} APj968@$<@,-%968@$<@,-%t ~+-@@'68<,-8<,+ ++B]}ŠŠԠΠΛ-&@6-$@$'-@/6-8<@,%6-8B^}<@,/ AP#"@ AQ# A  AQ     6-%%%+'@,A`"B_}"ˠҠŠś A~ś6-E:,$%G:,$6-E:,$&G:,$$B`}Λ*+@%@'AA*$JJҠԠŠŠΠ FULLW2:CLEARW 2:COLOR 1,0,1:Ba}RETURNҠ͠ԛ @,%%%$SSҠԠŠŠΠ XSTRT=XCENTR+XF+XNW:YSTRTBb}=YCENTR+YNW:RETURN @/%%%$RRҠԠŠŠΠ LINEF XSTRT,YSTRT,XCENTR+XF+XNW,YCENTR+Bc}YNW 88Ҡ XSTRT=XCENTR+XF+XNW:YSTRT=YCENTR+YNW:RETURNf p 319,192qҠԽ 303,166u 3,3zBd}-9,-5,-9,5,0,10X(-@A% (%D:MEN*.* D:PARKETT.BAS9,192qҠԽ 303,166u 3,3z@NX ABCKEXAp1A3A3@@@@2@ BERECHNUNG VON SINFf}US ALPHA? (}A-A @(?AR@ 1-@1(BERECHNUNG PHYTHAGORAS 1Fg}-@@1(-----------------------)-@@)(BERECHNUNG VON:'-@@'( HypotenuseFh}*-@@*( Einer Kathete!-@@!( Info"-@@"( Menue2;@.Fi}@@K:;)@3"@:1,A4"@:2,A5"@:3,A 6"@:4,%Fj}D:MEN*.*F&&9A,9A,9A,d A##BERECHNUNG VON DER HYPOTENUSE (}  (BITTE IHRFk}E ANGABEN IN CM ( ( ((WERT 1.KATHETE((WERT 2. KATHETE6-M:$%$, (}<-@Fl}@<(IHRE HYPOTENUSE IST  CM LANG +-@@+(----- TASTE -----)@ @ 11Fm}9A,9A,9A,9A,! (}"2-@@2(BERECHNUNG EINER KATHETE#=-@@=Fn}(#BITTE GEBEN SIE IHRE WERTE IN CM AN$1-@@-(WERT EINER KATHETE1%2-@@.(WERT DER HYPFo}OTENUSE2&6-M:$&$,' (}(b-@@:(IHRE 2. KATHETE IST CM LANGL-@@b(-----Fp} TASTE -----))@* @ Info (}-@@(INFO-@@(----?Fq}-@@?(%Im rechtwinkeligen Dreieck bezeichnet@-@@@(&man die Seiten, die den rechten WinkelFr}@-@@@(&einschliessen, als KATHETEN .Die Seite>-@@>($,die den rechten Winkel gegenueber -Fs}6-@@6(liegt, nennt man HYPOTENUSE.=-@@=(#Errichtet man ueber der HYPOTNENUSE>-@Ft}@>($und den beiden Katheten die Quadrate<-@@<(",so gilt fuer die Quadratflaechen 2-@Fu}@2(der Satz des PHYTAGORAS.+-@@+(----- TASTE -----;@.@@K:Fv};)@i (}-@@9(Lehrsatz des Phytagoras :K-@@i(------------------------->-@Fw}@>($Beim rechtwinkeligen Dreieck ist die<-@@<("Flaeche des Hypotenusenquarates so:-@Fx}@:( gross wie die Flaechensumme der +-@@ +(Kathetenquadrate.:-@@:( Sind im rFy}echtwinkeligen Dreieck ?-@@?(%zwei Seiten gegeben, so kann man mit =-@@=(#dem Satz des Fz}Phytagoras die dritte 1-@@1(Seite berechnet werden.+-@@+(----- TASTE -----)@F{} @D:PY*.*@1(Seite berechnet werden.+-@@+(----- TASTE -----)@D"%&~ RANABABZHL@@?0@AF@@ @ PJ}}AY ;@,6.((36-@6-@'6-?036-@d96-%@"@J~} )6-@-"96-@n47<,042@@:7<,,@@x""6@A6-@J}2@@-@@ %%2@]-@'2@J}@;6-&$+!,Q2@Y6-&] %F:B2y,"@%%D:MEN*.* A -J}@6?P<2@c@X2@AF@t2@A@2@ACJ}@ %D:MEN*.*14,0,0,0,0,0,0,0,014,0,0,0,0,0,0,0,014,0,0,0,0,0,0,0,0 14,0,121,91,96,91J},81,72,68128,60,0,60,68,60,0,60,6863,60,0,60,68,60,53,68,60146,72,0,0,0,0,0,0,0 14,0,121,91,96,91,81,7J}2,68$128,60,0,60,68,60,0,60,68.63,60,0,60,68,72,68,81,728146,91,0,0,0,0,0,0,0B 14,0,121,91,96,91,81,72,68J}L128,60,0,60,68,60,0,60,68V63,60,0,60,68,60,53,68,60`146,72,0,0,0,0,0,0,0j 14,0,121,91,96,91,81,72,68tJ}128,60,0,60,68,60,0,60,68~63,60,0,60,68,72,68,81,72146,91,0,0,0,0,0,0,014,0,0,60,0,53,0,47,0146,45,0,0J},0,0,0,0,0146,0,0,47,45,40,0,45,063,47,0,0,0,0,0,0,063,0,0,53,47,45,0,47,0128,53,0,0,0,0,0,0,06J}3,0,0,60,53,47,0,60,0146,72,0,0,0,0,0,0,014,0,0,60,0,53,0,47,0146,45,0,0,0,0,0,0,0146,0,0,47,45,40,0,J}45,063,47,0,0,0,0,0,0,0 63,0,0,53,47,45,0,47,0128,53,0,0,0,0,0,0,063,0,0,60,53,47,0,60,0(146,45,0J},0,0,0,0,0,02 14,0,121,91,96,91,81,72,68<128,60,0,60,68,60,0,60,68F63,60,0,60,68,60,53,68,60P146,72,0,0,0,J}0,0,0,0Z 14,0,121,91,96,91,81,72,68d128,60,0,60,68,60,0,60,68n63,60,0,60,68,72,68,81,72x146,91,0,0,0,0,0,0J},0 14,0,121,91,96,91,81,72,68128,60,0,60,68,60,0,60,6863,60,0,60,68,60,53,68,60146,72,0,0,0,0,0,0,0J} 14,0,121,91,96,91,81,72,68128,60,0,60,68,60,0,60,6863,60,0,60,68,72,68,81,72##146,91,0,0,0,0,0,45,45,146,-J}1 D:SOUND.BAS((P8,60,0,60,68,60,0,60,6863,60,0,60,68,72,68,81,72##146,91,0,0,0,0,0,45,45,146,-H%()c s MAINMODENAMEFILEMCMOVEPMPMDLDHDLDHDPDPBc@@@N} FJ B1 Bg A @T A(@T@dBd8Bg K +'0@N}9-@KAR@ ( R A E T S E Lh( (h(Z Von dem graphischen Zahlenraetsel haN}etten wir gerne die untere rechte Zahl gewusst.RR(J Bitte die Loesung an die Clubzentrale schicken. Absender nicht vergN}essen.KK(C Aufloesung und Gewinner werden im Magazin # 14 bekanntgegeben.&(&( BITTE EINE TASTE DRUECKEN24N}F:Ad,AU*AdAU4 A3 @P""----------------------------""- ATARI BIT BYTER USER CLUN}B-""- -""- LADEPROGRAMM FUER -""- WETTBEWERB ZAHLENRATEN -""---------------N}-------------$AA`.;@2,;A0,8**6. hhhhhhhԑ`B #ALee162N},16,169,0,157,72,3,169,0,157,73,3,32,86,228,192,0,48,9,238,31,4,208,3,238,32,4,96,104,104,96V%-A$AT"!N}% `ww67@,.dhBDE   D     jN}ww67A,.d!  XY X!  FD))   tww67N}A,.d ]GPee`/ee(e~-67AN},.eee`M67AW<AW,.>:@4,m67A"<A",.>:Ai,67A#<A#,.>:@N},C#67A(<A(,.>:Ai,C67A)<A),.>:A), +@$AY%%6-F:A`,%AVN}$F:Aa,))6-F:%@,%AV$F:%@,%@@xM-@-%@%@1 N}M%@%@@x1-@A-%@%@1 7@7@@ D:RAN}TEN.PIC6-?:C:,,""""| ATARI/KOALA Bild-Lader |""| fuer komprimierte Bilder |N}""| 1985 |""| (c) by |""| Uwe Meier | ""N}%%6-F:@,%AV$F:@,!6-F:A`,!6-F:Aa,( AF:A,&@d2 +@$N}4%%6-F:A`,%AV$F:Aa,5))6-F:%@,%AV$F:%@,<!6-F:A`,!6-F:Aa,F%%6-F:@N},%AV$F:@,P-@9Z//6-?:C:,<%$A<%$A<A,d 8@8@N}@ D:ABBUCC.PIC6-?:C:,,A`Aa-@AP IF:Ad,AUN}*AdAU<AA`I%D:MEN*.*A`Aa-@A% IF:Ad,N}AU*AdAU<AA`I%D:MEN*.* A0D:RAE*.*hhhhhhhԑ`hBN}DE   D     !  P䩁N} X! "FD))     !  P䩁LLUUYLX(Y BDEHILVBDEHILVH VhJKBDELV VJK!BR}DELVS:` B VK)I JB֝DUELV B V`UT`` V V0 Vjө U XUR} VGY `U V*Y `U VdY `U  VY `U  VY `U  VY `U VY `R}U V?LWLWLCX:LXLVD1:FILENAME.EXTD8:BUFFER.ACS XUč VY `U VY `U V酂R}V ~UV  UV U WLVD1:FILENAME.EXT XU VY `U VY `U VuR}W ~UV UuW  U WLVBHIDdE VH H BIDdE VHɀ`D8:MEM.SAVR} XU4 VY `U V߅Y `U V3X ~U3X0 ULVD1:*.* XU VYR} `U V…Y `U VX ~U:XX0 Uf0 ~U0 `ULX0 VͅY `U VLV}éR}ҭŭ٠[A] LADEN[B] SPEICHERN[C] LOESCHEN[D] DIRECTORYR} VON:?NACH:?VON (1-4)?ŠŠ>Dn:FILENAME.EXT+-F:*8 LCLDL(DLKELV}DL'ELELELELELDLDLDLCDoELw`Lt`˅X̅YL@NDL3D_DL3DpDL3DɪL5D Y "F CLC1V}M1M1K Diͅ© F FD FLCLC Di?ͅé F FV}D FLC`` DiͅDEⅿ F FD FLC Di΅ȩ F FD FLC Di΅ɩB F FDV} FLC Di΅ʩj F FD FLC Diͅũ F FD FLC DiͅƩ2 F FD FLC DiV}ǩZ F FD FLC1DE>F͍   Y΍ K Y "FLCeX`X`eY`PҩҢV}` F FD FLC1DE>F͍   Y΍ K Y "FLCeX`X`eY`PҩҢTҠӠ,K:6NN(FGebe Namen des Files ein, welches in Teile zerlegt werden soll.Z}@@ A ((堾 !(46( š@ AJB:, ApT$7<,4D:6.7,$ Ap^##Z}7<,0:*7<,0:Aph 7<,4:6. Ar 6.D1:67,.|6-A:7<,,J(!(Lege Disk mit Z} inJ( Laufwerk  und druecke  )A( @ (0( (0(!Z}렣 .)@. @I)!@RA@ 6.67<,.>:,(>:,I(/(Lege ZieldisZ}k in Laufwerk &@HI( und druecke )@Ap2( ( AP#*6.2Z}-1'(Lese  - 8&, BLOECKE1 A "(Loesche Nullen 5 "7B:,,4$67B:,,.+(Z}5 A " (P-B:,7<,4./67%@,.ZZC67%@,.=:,F'P AP* 67B:,%,.Z}.ZZ*67B:,%,.=:,&99( Schreibe  - P:+B:,',%?, SECTOREN0 AP$: (Z}6. D8(((ǡ fuer Ende.6-8 AN"  B"Xn("( hat wenigeZ}r als 1020K($BYTES. Das Programm teilt nur Files,n(die mehr als 1020 BYTES haben.b Al2((( ist zu lZ}ang zum Teilen2 A 0,1,2,3,4,15,128,155,255,1D:SPLITT BYTES haben.b Al2((( ist zu lXI138,72166,206,189,24,6,141,10212,141,23,208,189,0,6 141,24,208,230,206,104,170 104,64 D:BOX.BASX--------------------------------us ANTIC 1/88Graphicdemo die mit Scrolling und ver-aenderter Displaylist arbeitet.------,"D:MENUE.BAS D:LESER.BAS,$AV<@<A$,E@$+@@(}+% </