NeoDskVp rO`  @`! #@o')-/1 3@5`79;=?A C@E`GIKM/S@U`WY[_a c@e`gkmoq s@owy{}/O` ` @ ` @ ` @ ` ǀ ɠ @ ` ׀ ٠ @` @`!Aa   !Aa!!#A%a')+-/1!3A5a79;?A!CAEaGIMOQ!SAUaWY[]_a!cAeagikmoq!sAuawy{}!Aa!Aa!Ao!Aa!Aaǁɡ!Aaׁ١!Aa!Aa " B b  !O`  @`! #@o')-/1 3@5`79;=?A C@E`GIKM/S@U`WY[_a c@e`gkmoq s@owy{}/O` ` @ ` @ ` @ ` ǀ ɠ @ ` ׀ ٠ @` @`!Aa   !Aa!!#A%a')+-/1!3A5a79;?A!CAEaGIMOQ!SAUaWY[]_a!cAeagikmoq!sAuawy{}!Aa!Aa!Ao!Aa!Aaǁɡ!Aaׁ١!Aa!Aa " B b  !ADDRHELP יAANITA AOSCHWAGER A<A325 ̙WLEES DITt K. A.. AADDRHELPACCٙAHANDBUCHTXTݙA%WICHTIG A+RADDRHELPPRGoRK,ADDRHELPDAT l1NZ`{?AONpaK.paK8paK6$m( r<Ё&-Ct$m(ԒrҭaJpaK*paK,aK4A퀊6<t)$m(ԒrҭaOpaKpaKaK A퀜v&<:<a2(a0$m(Вr8Ё/$m, aVh$"-AaM$m,R$m, ro`X,aXrA,aTLAaTAaT$m,BE~p maMz$m,(ح"mastr"mas$m, "Ё$m(Вr8Ё/ m$"-AaM&$m,R$m, r o -_HH/p Э^HHg -&<:<a.(&<:<a1a/n$m(ВrЁ/ -&<:<a-&<:<a0a/:$m(Вr&Ё/ m(*-a,.-aJ0 -&<:<a-&<:<a0a.$m(ВrЁ/p m$"-aH"`B`VaVAfN`$m@ r?fN($m@ rDf$mhP$m@ rHfN$m@ rPfN$m@ rC`QaQA@aM^A,aMp$m,$pЭ$m,g,z$m,("mam&aPvaXaN$m@l$m,R`pЭ$m,l pЭ$m,$ m,+Pa`Q4aQzaO쐭D"-̰l@+@pradt -aJz`QaQJA,aM$A0aMADaMAHaM E3paNL/EpaN>r"_taD+Apfp+@p$m,$$m4 aEt`p$m0$p$mH$$m0 Ufp $mH$$m0 Qfp$mH$p$mD$$mH aE*`D$m0*$m,("mak/pa9brAЁaN>"_a;$m0*$m,("mak$mDR$mD o]$m0R$m0 r o\RN.$$m,R$m, o6]a`OaP -r ҭoRax`OaOplSa``OaOAa`M>aMALaHA aI|A,aINAaIAaIp ~Aad p ~Aadpa=npa=xpa=v$m( @&-C|$m($"-a$m( @&-C^$m($B"-Aa1 m a]z m $m($Br!ҭa6 m a]Z m $m($B"-Aa6$m( @&-C$m($Brҭa0$m( @&-C^$m($B"-Aa0E|Bpa>n/x m 0HaNaA"_a,E|Bpa.8t[$m(Ԓ"-Aa62E|Bpa>&/x m 0HaaA"_a,JE|Bpa-tt$m(Ԓ"-Aa5E|Bpa=/x m 0HaaAl"_a,E|Bpa-$m($B"-Aa5N%2$mhQaY$m8$$m<$$m\$$m\ o <Э$m8]HH/ <Э$m8^HHg$m( rKЁ$m<]HH/$m( r_Ё$m<^HHg HxN#v$m( rdЁ$m<]HH/$m( rxЁ$m<^HHg HxN#v$m( r}Ё$m<]HH/$m( $m<^HHg HxN#v <,Э$m8]HH/ <TЭ$m8^HHg$m( rKЁ$m<]HH/$m( r_Ё$m<^HHg Hx N#v$m( rdЁ$m<]HH/$m( rxЁ$m<^HHg Hx N#v$m( r}Ё$m<]HH/$m( $m<^HHg HxN#vpЭ$m8]HH/ <Э$m8^HHg$m( $m<]HH/$m( $m<^HHgN'.$m( $m<]HH/$m( $m<^HHg$m,B$m,/N$$m( $m<]HH/$m( $m<^HHgp $m,$$m,/N$$m( $m<]HH/$m( $m<^HHg N*$mhP <Э$m8]HH/ <^Э$m8^HHg$m( $m<]HH/$m( $m<^HHgp$m,$$m,/N$$m( $m<]HH/$m( $m<^HHgp $m,$$m,/N$$m( $m<]HH/$m( $m<^HHg$mhPp$mhJgpRg`aa`;a< A,a7p$m, r l:$m,(p mAH$m,( m 0HJlT$m,( mBH`Bxp$m,ؒ mAHѐx$m,ؒ m 0Hr oxp $m,ؒ m!HE|Bpa8/x m 0Ha~a<,"_a&E|Bpa(ht[$m(Ԓ"-Aa0bE|Bpa8V/x m 0Ha6a;"_a&zE|Bpa( tt$m(Ԓ"-Aa0E|Bpa8/x m 0Haa;"_a&2E|Bpa'$m($B"-Aa/`:Ta:A,a5N%2$m, r l$m, x m!H`$m, rЁ+@N%2`: a:PAa6 -&<:<a/??x m 0H&<:<a8:&aa/ -&<:<ar/??x m 0H&<:<aL8:&aa/ m$m((*$m(,.a, -&<:<a /??x m 0H&<:<a8:&aLa6/p m$m($"a*z -&<:<a/?? -&<:<a8:&aa/ -&<:<ax/?? -&<:<aZ8:&aa/ m$m((*$m(,.a+ -&<:<a/?? -&<:<a8:&abaL/p m$m($"a)`8a8TAa4 m$m((*-a$m(,~ޭa+$m( @&-C^$m($Brҭa'0Epa5$m($Br ҭa-praJA퀮r#aAE}pa4$m($Br ҭa, m$m($rҭa(`7pajpalatA퀜vH@Ѓdh`^HCH@:">H@`H2g&HCH@:<HC>H@Ѓd(`HCH@:H@r` gDBgkDE`HDBDEaBDBNugDBa8DBNutNua 11!Nux`xa`a` 24&8:HoHoEBJAgJDfr:g,|HC҅H@:ۆ<HC>H@Ѓd`vHCH@:H@`fgDBgkDE` DBDEaDBNugDBaDBNutNuHoHoEBz:g|HC҅H@:ۆ҄ۆ<HC>H@ЃdHA@B@H@хk HAҁHAрSB BbNuJBj^tNuk(g.JBjDBAр[SBDBjNutNuAр[SBkNuJlNu0gH@rJBkB JkЀ[`DBЀ[`J.;gP:pr4<Nup`92xa2`Ba411!Nux`4 24&8:`& 24&8:`a&8:` &8:@ABJEoHnfNup`8tNugDEDBHngDBEBkQ*HEJDg?<>0rHGGdHGGdSWDуdi?<>0rHGGdHGGdSWDуdi ?<>0rHGGdHGGdSWDуd&2 H@kփAр[SBkփejRAd RdQRBJjDBNutNu?<,>CEdGH@0r`xJCgz?<0rÐdSWЃdi?<0rÐdSWЃdid?<0ÐdSWЃd&2 H@kփAр[SBkփejRAd RdQRBJjDBNutNu?<0riR?0i?`?<`"_KxMI5O:HQ <-H*,`N,sd d3 d# d# # d# # # # d ALH dAL H LH d AL`H L|0H>L|H>d~# # # # A`@ALH L|H>L|H>L|PH>L| H>L|H>L|H>L|H>L|`H>L|0H>L|H>QL|Nu$H$&"BA -KaXA"f B &nNuH>dd2d"d""d""""d LHC dLHLH C@d LHL|H| L|H|PCd~""""C`:LHL|H| L|H|PL|H|L|H|L|H|L|H|L|H|@L|H|pL|H|L|H|CQL|Nu`8a8A-Hhp apMa=@F?<NNTT@A0r p0Q`pdr ta0.F=@=@ACp,2QAp 2Qara2`p`lpeahp`(p?a a\aZaHz?< NA\?<LNAfCR2A0A82r22aB"<B0<NBLNurt=@:=A@=B2::(   F..26"8@"PQ1!P1P!0PP`0  q#p"A ӘQNu|^|  R^,T:Hz(` NCHz ?<&NN\Nu9gNuWNua8aa NuNuNupc?a0QNurdd6Ag,B(dB(dH Ac<antgBAp`tNuNu?<OA`d?<IA`Z0<H IavLt Ig Og Ug Ag Rg*afNup`aHp`/0atfHRa$>Er$Wgr STD:gr COM:g r LPT:f2FA$_0=@D~CA0< BhaB2"pNu$_AF Ge><QBAFpNuahgzp=` a\gzpaTaRFBd&8*L?a<aSF Be BgQRB`RAdR e <rRF&0xaCձfEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`HQ2.d Aeg>r C 5e&!R 0c 9c0`<R"_`VC0 Ef"_Nuaa/ CFr  g 00VJAgB @ nN @mHJ@j0.4DBUBk0QSAg Q.`S@k 0`0BAF "_Nu.WAkQA 0g`-@ _ahG` VNuag`af`ae `ac` acpNuadpNu/ a.$I> _a$4Ae4v` VfANuHP0(R@kBa $I _aIUd4Id4Id$Id `$$$$Q @JfNuNup `'@aSAfNuag`af`ae `ac` acpNuadpNuaSAkfJANuH HPhkJar $I _aZIUd4Id4Id$Id `$$$$Q @JgSL`QNup `&aAf` VNuag`af`ae `ac` acpNuadpNua4@m4v` Vf@NuH@-@|p`HAHBHCHDHEHFHG-HfAD-HH@-@H|p`rAD-@f-H `r6 @`&<x:<a\aJjNuvq` v `v `v@H|-C`0.bHNupNuHP"X2AF-H AerQBp|aR`rHpx`6H$X4 Y0CF @depdQBC B2et2QBpZAF-HA-HaA"HJf  _abA`QAF"HJfS  _a@AF`QLJ@Nuz`z `z8.^n\Dn\@Hp tr=ED`@n\n^n\n^A0000000000prt`Bp'rta n2rt6(SC0(S@apaB\papava0paRG=GYfx-IC=C=C$tBft=B=B(tFJ=BBBB*Do>Eo:@l6Al2DDk =DVBnDEk =EnBn@cVo Acno,_NuAH`/=@a _a b]Ak024E$ Bb5B5A6CC5CK5C:8AB0000DkxEkt00A<:d>:bSFSGFn\GnXDDk0BhDEk1EBh Fchh Gchh0hb"0hbpmrt-|P\H-|PpL`Nu-HNF$?<NNT-@XDbDEbEBb=ET=DV-|PBLBp n20(L=CJ?=B^C=C\=Cj@drAdnED??RGRF=GF=FHtGJ=BltBft=B`=BnGOpЇЇ b na 222-IfHVMF,_Nup ` NT np` ??/ a , > _a 4$FAFp_@[000][vx`* [g" ]g |g QSx` xQSrQ][vx`* [g" ]g |g QSx` xQStQ]BAF0-H,=@p4a2HNuE"ea L"ep`n&6NuE "e a *"d&&6NuE"e a "d66NuE"e a"d666NuE"e aе"d6Nuvn\n^~Ha P0 @xepw2AtE4*jDjHB t`0QTAtp =| D`a`QNuHg"cc/ 0)a _$PS@kH2QNu2(g$PRAA4DBH%$Y2Pg 1AHRAA%NuBhNupLADaHTBnBL*Hd"aZHd"aRHd"aJHd"aBHdF n Dg"`.2.JWAARA0.L n.g hfRAS@f=AB"aNug//ANu@k AB00HNuX@g .NuAD Nuz`zA6C|IdXC |2:H<0`$6HpA2`A.p` A>`A*p4. g=BNuao aШNupNuaJFoHPJhja?<?B?<BNAO _*kBg?/(?<BNAO Jk NuNafoazJBkAf`a|??/?<BNA.k \Hx?<BNAO [HHNux`x*0ao< 2fJjr` Nu~dGdEH<Nup`80@F@AJhg PLNu`LJg(HPBHh/??<@NAXLf ѨLNuJkp%`aJBja!| ??<>NAXOJkpNu0< aF`0< CF2p`0p a0`p CFp`aCF"p`Hza `Hz"J`B.@=|DNua.@FpAR@C` @H` @HHyWa(aD"H`HyW`HyW 24`@H` @HHyWaa "Hav`lHyW`HyW 24`B.@=|DNuB.@ab=GDgNup`Jg$_a: HN$_a: HN$_aBHN$_a؄BpHN$_aB0HN$_axBpHN$_alN$_ab؄N$_aXN$_aPN$_aF 0HN$_a:؄00HHN$_a,p0HN$_a 24N$_a:p 0HgpN"X I"_(*UGk*<(؆QNp`p`p` p`pJPg`$_a!HN$_a؄1HN$_aHN$_a 00N.@<.DAp$I"t Q k"RGef~`SG * g *fSG`<.DjZ\FkBJn`g Fgd Fg^HS&I.aQ`p???<NM\Qj&_NuHQ/?Hz?<&NN\` n2LLJFj|@c<JGj~Ac>02 h|N n2HHNu80a|DHz ?<&NN\Nu|AF"n2"iB(B(Nr ?HQaZ _/ ?aP0 _4gSB@c:Ad,J@gB@BmS@,. RB6Vg(R F"GQpNufJ@fRB`fS@kVft0HNuaTaJjtNuaFHPa pJk NuCg.BJ@g  g &g, $g %gNHNutNuRpt`2Rpt`Rptr ae OgX Xgn HgSRB ae Fb$0k  c_  c b退`tSHkaԦNuRB0 b b瀀`RB0 fрd`ap`ap`ap3c8Bc4Nu>.D<jRGg>VGg:TGjp`(HPa0CF$IpR@  f _aNHd2Hd2`"QNu`Z<.DHSGFaAEg f< &_Nua`ӄNu.dfaBc4=n`r>.D<jRGg:VGg&TGjp`<.DaAFa&JkNup#`x z fa2a` z f a"aAFa  f#c4JkzNu0:g0.D<jRGg*VGgTGjp`<.Da(` z faa` z f aaAF "g pR@0 ,g  g  fHp`:pR@0  g  g "fR@0 ,g  g  fHpRU@"_  f#c4$H _a`QNupR@0 ,g"  g  fa~ (fR~Nua ~ `a~NuaJkHQ ! gRf _NuXX~Nu0j4\@??<NMXJk .dgp Nu` <.DHSGFa "fAGg ."Fg( ,g2 gAEf< &_Nua g`Ra ,g g` ."Ff`=A|aA09RyH@@-HtBe2QB p#`2(gbc  P"H`Nu/0Ha2  _ PSAvjx E(Wf* ae zb Q @Nua"XLpAg Per 1"NuHyNNX @Nu&Hz ?<&NN\Nu|a"XLXB@etAg1B# NuBnp`pBnp`p=| p|=Fn@=@b=n`ra HHj=Ah~`:a JfBH@ RfF.f Kg" Mg sg tg Pg Hf~`xSGjtRGFcn>`jAF gp gj g grffnnpenbfJ.fj6pRGFc$SG` J.fjpRGFcRF` Ff`> `?~ap a0p a*0Nu|``CpE`bf`FgRGJGgSGSFFgCpE`Yf`Nua@Jf gH@ fa(@ fza0 b @ Ee0NuaVgNu4.rf?Hya4NM\Nu=|D`Lja zEfpadppa`AFEg0PaEfaFRE`ܾEfp a@a8?nnnp a2RF`<a \nnoS@f nhfSnl=Ah=FnNup` papq4.rf?HyaܚNM\Nu=|DHajLNu|A0"P2(@e2<EF`QHP=|DJ@g$abAF$HpR@ 0 f _a`QNup?ap a~2<|0`C&pHQ/Hy@NA NuC pa:NuHQ/Hy?NA Nu&g4 FgagJAga2< R@AdSf0Nu0ap Ce`&g4 FgaJBjagPAe CbRa R@Sf0Nu FgRag JBja젰AeaJAg RP0 pNu` Fg6aVgJAga @ea`RP Nup NHѨB?<?/?<BNAO JkLLNu&8aJBjaJAg Df*ڃkd0Nu DfրBH??/?<BNAO LJk!@NuHBHh Hx??<?NAO LJo ѨLNuk:fp`^k: g ѨNuBHPHQ/??<?NAO _JoѨfNuBHPHQS/??<@NAXLfѨNuJkp%`BrSRH0a=GDgLFa$-Ka`c.܆܆A|Skz&Y24A B@b6<IdIdId`Q  TF`HAPC̑ a0L <A A@eH@"Kp0aLA|`C̑ `Lp`pp`&nAt6<X0QNurSRH0a=GDgkLFa6 I-Ka"`c.܆܆BGPl `agRSj Ql Nu`HPG<.Dx agJBja鼰AeaJAgZRP0 ögR@Ae`U  fSC̗ &n _aER@Hd2Hd"Hd `""""Q\J@Nu _HzHP`pNup#fpNup`p`#Nu?/NT` pNuNHMAp f9kd n2!|nv ||9"XLv:g 4zg*Ag61 cg Jg ;e, ]b& Te` Db; g fg  bJg fg fg,HC#0j ` Hx Dg;0Lp{YBj@1BA gbШ dA gd BBdL@Nu wHHKMPPR g,g&y`pBypzXB@etAg1B# `\HCHSGPvg*1B f  f&< # XB@etAf&_`ACBgZ"HyNN#n.>"NN @A C#P B?< NA\#p/a?< NA\A=0N sNuA#r rr~P޸|a&:|a RGk0Gg`a0GVf3n<??< NMXACJf`Ar Hjr-D@Hd0H@H 0H@0CNuAF"H [1][fSEfNuaJf"_O:N"_O:HQ`2 9sg"9sgJ9f ga"ANp\B`G06#f&#-KNuk"c" C gT6f`Pv6"cgRCC(D#8`D@v`v??NMXJNuJ@k??<NM"UAf J@fH@Nuaj\0fpNu\@`a`]@><CF Ipa<0HNua`]@><CF Ipa Nu?|`?a0R@f|0aTHJFkHPa _Nupo`HSHP&I>g\SG??<NMXJk V _t&_Nu&_`aJANuag `af`apNuapNuC`C``C` C`CJhfRRRRRRRHP? @CFH~8:E#P&<2 `b$bYEf` RAf rЁЀ`$Ѐe "ЀeЁdpNJAkfgRer?DDЁaAa8$HX :CFE` YEjT"_$P"2trDDd0d d d` QjNu`DaDa DNu na^ K"ng42 $`gk2&Hg Af deђ$`ebѐXf&nNu AgebѐA``-Kx$ n&$n""Hg8" &Ak cѐ S`g"" k#&Acё2+SAI3 Q&f-I"&nNu-Kx$&ր n&$n""HgR" k&Ac b S` S`g4" k#&AcbrkX`ޑ2+SAI3 Q&f-I"&nNu$9sg6AC r2f`ef2f`#s``aP n2L6(n\n^HHHNua0 n20(n\HNua n20(n^HNua n20(HNua:ffNuarNua J[HHNu:nfa@ z^0NuJg6$:Pf,H?<"NNT&@p/&yra :,ga &Lr`r??Q@yHyNM\0Nu#yNu"H YJQfNuBQ YH瀀azLP|HPG|C6[[[C8[[[a68v6Cv6C[RCF8[[[a@6C[RCF8.L L-KA `$I\bfBjQNu$YbfBjQNu؄*؄؅CH`h؅X`$_  IaHR"H @`̘؄*؄؅AHNu؅X`$_ IaHR"H` n1d$HJf-HS Nup"`vHPa _a`QNua JH aL0Nua`4<H`@aL Z0De2SCkÐCo@c2`QNu$Ia Z0AcA`QS@ QNuHd0Hd0Hd` QNu$IaH Z0Ac4ASB Q`QNu  F1 EingabeF2 ndernF3 LschenF4 Voreinstell.F5 DateiF10 BeendenSuchbegriff :120Anrede :310Zeile 0:420Vorname:520Name :620Zeile 2:720Str. :820PLZ :94Ort :1020Land :1120Anrede :1430Anzahl der Lerrzeilen zwischen: Str. u. Ort Ort u. Land Land u. Anrede - + - + - + Pfad ndern 1st Word That's Write Speich. auf Befehl Autom. Speichern Speichern O.K. AOUDieses Programm darf frei kopiert werden.Alle regelmigen Benutzer werden jedochgebeten, sich gegen DM 20registrieren zu lassen, unter folgenderAnschrift: Andreas Jkel Sachsenring 16 3388 Bad Harzburg 1Wie blich, wird dies auch belohnt:Jeder registrierte Anwender erhlt eineaktualisierte Version und wird bei Er-weiterungen benachrichtigt.Der Quelltext (GFA 3.0) ist gegen Ein-sendung von zustzlich DM 30 zu erhalten.Programmversionen fr mehr als 75 An-schriften sind beim Autor erhltlich. AddressHelp Fehler Angemeldet:Autom. Speichern war abge-|schaltet. Vor BEENDEN erst|Daten speichern ?Ja|NeinV. 1/75ADDRHELPSehr geehrte Damen und Herren,ADDRHELP.DAT(Klick for Info)zufllig fllen ?????Die max. mgliche Zahl von|Datenstzen ist leider|erreicht (s.Info).Schade!EINGABEKeine Daten eingegeben !|RichtigEs wurde kein Datensatz|ausgewhlt!|Oh!NDERNVoreinstellungen Neuer Pfad:Bitte gewnschte Aktion |eingeben: Laden|Speich.|Abbruch|wurde nicht gefunden !|wird berschrieben !O.K.|AbbruchDie Daten wurden nicht ge-|speichert! Autom. Speichern|ist jetzt abgeschaltet.|nicht gefunden. Soll eine|neue Datei angelegt werden ?)X0    "24 (    $  (FJ$ "8"l 28:<*@<<@^$*$J,$HT ( ( ("<>p<>lHJ$\*x 8lh T\((@Hz$pf 8 $D& 4H x0H**$, AddressHelp Version 1/75 vom 1.7.1990 ********************************************************************** -Adressenverwaltung fr den tgl. Briefverkehr -lauffhig als PRG oder ACC -direkte bernahme einer Adresse in die Textverarbeitung aus dem ACC -Zusammenarbeit mit WORD PLUS oder THAT'S WRITE -Speicherung u. Ausgabe einer beliebigen Anrede fr jede Adresse -frei formulierbarer Suchbegriff unabhngig vom Namen -einfache Steuerung ber Maus oder vollstndig ber Tastatur ********************************************************************** Die vorliegende Version von AddressHelp ist zu nicht-kommerziellen Zwecken frei kopierbar, jedoch darf das Prg. nur unverndert und mit dieser Datei weitergegeben werden. Alle regelmigen User sind gebeten, den Programmieraufwand zu hono- rieren und sich gegen DM 20,-- als Anwender registrieren zu lassen. Postwendend gibt es dann eine Diskette mit der neuesten Version von AddressHelp und zuknftig eine Benachrichtigung bei Programmerweite- rungen. AdressHelp ist in GFA-Basic 3.0 geschrieben. Der dokumentierte Prg.-Code kann fr eigene Erweiterungen durch alle eingetragenen User gegen DM 30,-- angefordert werden. Die vorliegende Version kann gleichzeitig 75 Adressen im Speicher halten. Diese Beschrnkung wurde eingefhrt, um den Speicherbedarf des ACC nicht zu hoch werden zu lassen, drfte im priv. Bereich jedoch auch nicht so schnell erreicht werden. Bei Bedarf sind beim Autor selbstverstndlich Versionen mit grerem Speicher erhltlich. Die vorliegende Version ist auf einem 1040 mit altem ROM-TOS ohne Festplatte entwickelt wurden und luft dort ohne Problem. Fr Hinweise auf Fehler und Vorschlge fr Verbesserungen wre der Autor sehr dankbar. Andreas Jkel Sachsenring 16 3388 Bad Harzburg 1 ********************************************************************** Kurzdokumentation 1. Start: AddressHelp kann nach entspr. Umbenennung als ACC oder PRG ge- startet werden. Die Adressen und einige Voreinstellungen werden in einer Datei "ADDRHELP.DAT" abgelegt, die beim Start autom. geladen wird, wenn sie auf dem aktuellen Pfad zu finden ist. 2. Hauptmen: Nach Aufruf erscheint das Hauptmen, in dem auf der linken Seite die einzelnen Menpunkte per Maus oder ber die Funktionstasten aufgerufen werden knnen. Auf der rechten Seite befindet sich die Auswahlbox fr die Daten- stze. Eine Adresse kann durch Anklicken oder ber die Tastatur mit der entspr. Zahl von 0-9 angewhlt werden. Scrolling ist ber die Pfeilfelder mit der Maus oder ber die Cursortasten mglich. Wird eine Buchstabentaste gedrckt, wird in der Auswahlbox bis zu der ersten Adresse gescrollt, deren Suchbe- griff mit diesem Buchstaben beginnt. Diese Adresse erscheint dann an Position 0. 3. Die einzelnen Menfunktionen: 3.1 INFO: Ein Infotext... 3.2 EINGABE: Fr die alphabetische Ordnung und Anzeige in der Auswahlbox des Hauptmens ist der Suchbegriff ausschlaggebend. Dieser wird auto- matisch dem Nachnamen gleichgesetzt, wenn die Namens-Eingabe-Zeile mit "RETURN" verlassen wird und dort etwas eingegeben wurde. Der Suchbegriff kann jedoch beliebig verndert werden. Ist dies ge- schehen, so sollte die Namenszeile nur ber die Cursortasten und nicht ber "RETURN" verlassen werden, da sonst der Suchbegriff wieder dem Namen gleichgesetzt wird. Ist beim Verlassen des Ein- gabeformulars nach oben oder unten kein Suchbegriff eingegeben, wird dieser Datensatz ignoriert. "ESC" lscht eine Eingabezeile, die Zeilen 0 und 2 fr zustzliche Angaben werden bei der Ausgabe unterdrckt, wenn sie leer sind. 3.3 NDERN: Vor Aufruf dieser Funktion mu ein Datensatz ausgewhlt sein. 3.4 LSCHEN: s.o. 3.5 VOREINSTELLUNGEN: Hier kann die Anzahl der Leerzeilen in der Anschrift und vor der Anrede den pers. Bedrfnissen angepat werden. Der Pfad fr die Datei von ADDRHELP kann festgelegt und abgespei- chert werden. Es mu ebenfalls eingegeben werden, mit welcher Textverarbeitung zusammengearbeitet werden soll, da die bergabeart eine andere ist. Desweiteren kann entschieden werden, ob Eingaben u. nderungen permanent oder nur auf Anforderung ber DATEI gespeichert werden. Smtl. Voreinstellungen knnen in der Datei ADDRHELP.DAT gespei- chert werden und werden dann bei Programmstart autom. nachgeladen, wenn diese Datei sich auf dem aktuellen Pfad befindet. 3.6 DATEI: Die Datei "ADDRHELP.DAT" kann geladen oder neu gespeichert werden. Es wird empfohlen, bei vielen Eingaben oder nderungen im Men- punkt "VOREINSTELLUNGEN" das permanente Speichern abzuschalten und nach Beendigung der ges. Eingabe 1x die gesamte Datei zu spei- chern. 3.7 BEENDEN: Ist beim Beenden des Hauptmens eine Adresse ausgewhlt, wird diese an die Textverarbeitung bergeben und an der Cursorstelle eingefgt. Wird das ACC durch Mausklick in der entspr. Box beendet, kann es vorkommen, da die Textverarb. in den Modus "Block markieren" schaltet und ein weiterer Mausklick erforderlich wird, um weiter- arbeiten zu knnen. An der Beseitigung dieses Fehlers wird gear- beitet. Um unbeabsichtigtes Markieren zu verhindern, wird der Mauszeiger solange in die rechte untere Ecke gesetzt, ist also nicht sichtbar, bis die Maus bewegt wird. Dieser Fehler tritt nicht auf, wenn das ACC ber F10 verlassen wird, was deshalb zu empfehlen ist.wichtige information die Addresseneingabe ist nur auf 75 Addressen beschrnkt `{?AONpaK.paK8paK6$m( r<Ё&-Ct$m(ԒrҭaJpaK*paK,aK4A퀊6<t)$m(ԒrҭaOpaKpaKaK A퀜v&<:<a2(a0$m(Вr8Ё/$m, aVh$"-AaM$m,R$m, ro`X,aXrA,aTLAaTAaT$m,BE~p maMz$m,(ح"mastr"mas$m, "Ё$m(Вr8Ё/ m$"-AaM&$m,R$m, r o -_HH/p Э^HHg -&<:<a.(&<:<a1a/n$m(ВrЁ/ -&<:<a-&<:<a0a/:$m(Вr&Ё/ m(*-a,.-aJ0 -&<:<a-&<:<a0a.$m(ВrЁ/p m$"-aH"`B`VaVAfN`$m@ r?fN($m@ rDf$mhP$m@ rHfN$m@ rPfN$m@ rC`QaQA@aM^A,aMp$m,$pЭ$m,g,z$m,("mam&aPvaXaN$m@l$m,R`pЭ$m,l pЭ$m,$ m,+Pa`Q4aQzaO쐭D"-̰l@+@pradt -aJz`QaQJA,aM$A0aMADaMAHaM E3paNL/EpaN>r"_taD+Apfp+@p$m,$$m4 aEt`p$m0$p$mH$$m0 Ufp $mH$$m0 Qfp$mH$p$mD$$mH aE*`D$m0*$m,("mak/pa9brAЁaN>"_a;$m0*$m,("mak$mDR$mD o]$m0R$m0 r o\RN.$$m,R$m, o6]a`OaP -r ҭoRax`OaOplSa``OaOAa`M>aMALaHA aI|A,aINAaIAaIp ~Aad p ~Aadpa=npa=xpa=v$m( @&-C|$m($"-a$m( @&-C^$m($B"-Aa1 m a]z m $m($Br!ҭa6 m a]Z m $m($B"-Aa6$m( @&-C$m($Brҭa0$m( @&-C^$m($B"-Aa0E|Bpa>n/x m 0HaNaA"_a,E|Bpa.8t[$m(Ԓ"-Aa62E|Bpa>&/x m 0HaaA"_a,JE|Bpa-tt$m(Ԓ"-Aa5E|Bpa=/x m 0HaaAl"_a,E|Bpa-$m($B"-Aa5N%2$mhQaY$m8$$m<$$m\$$m\ o <Э$m8]HH/ <Э$m8^HHg$m( rKЁ$m<]HH/$m( r_Ё$m<^HHg HxN#v$m( rdЁ$m<]HH/$m( rxЁ$m<^HHg HxN#v$m( r}Ё$m<]HH/$m( $m<^HHg HxN#v <,Э$m8]HH/ <TЭ$m8^HHg$m( rKЁ$m<]HH/$m( r_Ё$m<^HHg Hx N#v$m( rdЁ$m<]HH/$m( rxЁ$m<^HHg Hx N#v$m( r}Ё$m<]HH/$m( $m<^HHg HxN#vpЭ$m8]HH/ <Э$m8^HHg$m( $m<]HH/$m( $m<^HHgN'.$m( $m<]HH/$m( $m<^HHg$m,B$m,/N$$m( $m<]HH/$m( $m<^HHgp $m,$$m,/N$$m( $m<]HH/$m( $m<^HHg N*$mhP <Э$m8]HH/ <^Э$m8^HHg$m( $m<]HH/$m( $m<^HHgp$m,$$m,/N$$m( $m<]HH/$m( $m<^HHgp $m,$$m,/N$$m( $m<]HH/$m( $m<^HHg$mhPp$mhJgpRg`aa`;a< A,a7p$m, r l:$m,(p mAH$m,( m 0HJlT$m,( mBH`Bxp$m,ؒ mAHѐx$m,ؒ m 0Hr oxp $m,ؒ m!HE|Bpa8/x m 0Ha~a<,"_a&E|Bpa(ht[$m(Ԓ"-Aa0bE|Bpa8V/x m 0Ha6a;"_a&zE|Bpa( tt$m(Ԓ"-Aa0E|Bpa8/x m 0Haa;"_a&2E|Bpa'$m($B"-Aa/`:Ta:A,a5N%2$m, r l$m, x m!H`$m, rЁ+@N%2`: a:PAa6 -&<:<a/??x m 0H&<:<a8:&aa/ -&<:<ar/??x m 0H&<:<aL8:&aa/ m$m((*$m(,.a, -&<:<a /??x m 0H&<:<a8:&aLa6/p m$m($"a*z -&<:<a/?? -&<:<a8:&aa/ -&<:<ax/?? -&<:<aZ8:&aa/ m$m((*$m(,.a+ -&<:<a/?? -&<:<a8:&abaL/p m$m($"a)`8a8TAa4 m$m((*-a$m(,~ޭa+$m( @&-C^$m($Brҭa'0Epa5$m($Br ҭa-praJA퀮r#aAE}pa4$m($Br ҭa, m$m($rҭa(`7pajpalatA퀜vH@Ѓdh`^HCH@:">H@`H2g&HCH@:<HC>H@Ѓd(`HCH@:H@r` gDBgkDE`HDBDEaBDBNugDBa8DBNutNua 11!Nux`xa`a` 24&8:HoHoEBJAgJDfr:g,|HC҅H@:ۆ<HC>H@Ѓd`vHCH@:H@`fgDBgkDE` DBDEaDBNugDBaDBNutNuHoHoEBz:g|HC҅H@:ۆ҄ۆ<HC>H@ЃdHA@B@H@хk HAҁHAрSB BbNuJBj^tNuk(g.JBjDBAр[SBDBjNutNuAр[SBkNuJlNu0gH@rJBkB JkЀ[`DBЀ[`J.;gP:pr4<Nup`92xa2`Ba411!Nux`4 24&8:`& 24&8:`a&8:` &8:@ABJEoHnfNup`8tNugDEDBHngDBEBkQ*HEJDg?<>0rHGGdHGGdSWDуdi?<>0rHGGdHGGdSWDуdi ?<>0rHGGdHGGdSWDуd&2 H@kփAр[SBkփejRAd RdQRBJjDBNutNu?<,>CEdGH@0r`xJCgz?<0rÐdSWЃdi?<0rÐdSWЃdid?<0ÐdSWЃd&2 H@kփAр[SBkփejRAd RdQRBJjDBNutNu?<0riR?0i?`?<`"_KxMI5O:HQ <-H*,`N,sd d3 d# d# # d# # # # d ALH dAL H LH d AL`H L|0H>L|H>d~# # # # A`@ALH L|H>L|H>L|PH>L| H>L|H>L|H>L|H>L|`H>L|0H>L|H>QL|Nu$H$&"BA -KaXA"f B &nNuH>dd2d"d""d""""d LHC dLHLH C@d LHL|H| L|H|PCd~""""C`:LHL|H| L|H|PL|H|L|H|L|H|L|H|L|H|@L|H|pL|H|L|H|CQL|Nu`8a8A-Hhp apMa=@F?<NNTT@A0r p0Q`pdr ta0.F=@=@ACp,2QAp 2Qara2`p`lpeahp`(p?a a\aZaHz?< NA\?<LNAfCR2A0A82r22aB"<B0<NBLNurt=@:=A@=B2::(   F..26"8@"PQ1!P1P!0PP`0  q#p"A ӘQNu|^|  R^,T:Hz(` NCHz ?<&NN\Nu9gNuWNua8aa NuNuNupc?a0QNurdd6Ag,B(dB(dH Ac<antgBAp`tNuNu?<OA`d?<IA`Z0<H IavLt Ig Og Ug Ag Rg*afNup`aHp`/0atfHRa$>Er$Wgr STD:gr COM:g r LPT:f2FA$_0=@D~CA0< BhaB2"pNu$_AF Ge><QBAFpNuahgzp=` a\gzpaTaRFBd&8*L?a<aSF Be BgQRB`RAdR e <rRF&0xaCձfEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`HQ2.d Aeg>r C 5e&!R 0c 9c0`<R"_`VC0 Ef"_Nuaa/ CFr  g 00VJAgB @ nN @mHJ@j0.4DBUBk0QSAg Q.`S@k 0`0BAF "_Nu.WAkQA 0g`-@ _ahG` VNuag`af`ae `ac` acpNuadpNu/ a.$I> _a$4Ae4v` VfANuHP0(R@kBa $I _aIUd4Id4Id$Id `$$$$Q @JfNuNup `'@aSAfNuag`af`ae `ac` acpNuadpNuaSAkfJANuH HPhkJar $I _aZIUd4Id4Id$Id `$$$$Q @JgSL`QNup `&aAf` VNuag`af`ae `ac` acpNuadpNua4@m4v` Vf@NuH@-@|p`HAHBHCHDHEHFHG-HfAD-HH@-@H|p`rAD-@f-H `r6 @`&<x:<a\aJjNuvq` v `v `v@H|-C`0.bHNupNuHP"X2AF-H AerQBp|aR`rHpx`6H$X4 Y0CF @depdQBC B2et2QBpZAF-HA-HaA"HJf  _abA`QAF"HJfS  _a@AF`QLJ@Nuz`z `z8.^n\Dn\@Hp tr=ED`@n\n^n\n^A0000000000prt`Bp'rta n2rt6(SC0(S@apaB\papava0paRG=GYfx-IC=C=C$tBft=B=B(tFJ=BBBB*Do>Eo:@l6Al2DDk =DVBnDEk =EnBn@cVo Acno,_NuAH`/=@a _a b]Ak024E$ Bb5B5A6CC5CK5C:8AB0000DkxEkt00A<:d>:bSFSGFn\GnXDDk0BhDEk1EBh Fchh Gchh0hb"0hbpmrt-|P\H-|PpL`Nu-HNF$?<NNT-@XDbDEbEBb=ET=DV-|PBLBp n20(L=CJ?=B^C=C\=Cj@drAdnED??RGRF=GF=FHtGJ=BltBft=B`=BnGOpЇЇ b na 222-IfHVMF,_Nup ` NT np` ??/ a , > _a 4$FAFp_@[000][vx`* [g" ]g |g QSx` xQSrQ][vx`* [g" ]g |g QSx` xQStQ]BAF0-H,=@p4a2HNuE"ea L"ep`n&6NuE "e a *"d&&6NuE"e a "d66NuE"e a"d666NuE"e aе"d6Nuvn\n^~Ha P0 @xepw2AtE4*jDjHB t`0QTAtp =| D`a`QNuHg"cc/ 0)a _$PS@kH2QNu2(g$PRAA4DBH%$Y2Pg 1AHRAA%NuBhNupLADaHTBnBL*Hd"aZHd"aRHd"aJHd"aBHdF n Dg"`.2.JWAARA0.L n.g hfRAS@f=AB"aNug//ANu@k AB00HNuX@g .NuAD Nuz`zA6C|IdXC |2:H<0`$6HpA2`A.p` A>`A*p4. g=BNuao aШNupNuaJFoHPJhja?<?B?<BNAO _*kBg?/(?<BNAO Jk NuNafoazJBkAf`a|??/?<BNA.k \Hx?<BNAO [HHNux`x*0ao< 2fJjr` Nu~dGdEH<Nup`80@F@AJhg PLNu`LJg(HPBHh/??<@NAXLf ѨLNuJkp%`aJBja!| ??<>NAXOJkpNu0< aF`0< CF2p`0p a0`p CFp`aCF"p`Hza `Hz"J`B.@=|DNua.@FpAR@C` @H` @HHyWa(aD"H`HyW`HyW 24`@H` @HHyWaa "Hav`lHyW`HyW 24`B.@=|DNuB.@ab=GDgNup`Jg$_a: HN$_a: HN$_aBHN$_a؄BpHN$_aB0HN$_axBpHN$_alN$_ab؄N$_aXN$_aPN$_aF 0HN$_a:؄00HHN$_a,p0HN$_a 24N$_a:p 0HgpN"X I"_(*UGk*<(؆QNp`p`p` p`pJPg`$_a!HN$_a؄1HN$_aHN$_a 00N.@<.DAp$I"t Q k"RGef~`SG * g *fSG`<.DjZ\FkBJn`g Fgd Fg^HS&I.aQ`p???<NM\Qj&_NuHQ/?Hz?<&NN\` n2LLJFj|@c<JGj~Ac>02 h|N n2HHNu80a|DHz ?<&NN\Nu|AF"n2"iB(B(Nr ?HQaZ _/ ?aP0 _4gSB@c:Ad,J@gB@BmS@,. RB6Vg(R F"GQpNufJ@fRB`fS@kVft0HNuaTaJjtNuaFHPa pJk NuCg.BJ@g  g &g, $g %gNHNutNuRpt`2Rpt`Rptr ae OgX Xgn HgSRB ae Fb$0k  c_  c b退`tSHkaԦNuRB0 b b瀀`RB0 fрd`ap`ap`ap3c8Bc4Nu>.D<jRGg>VGg:TGjp`(HPa0CF$IpR@  f _aNHd2Hd2`"QNu`Z<.DHSGFaAEg f< &_Nua`ӄNu.dfaBc4=n`r>.D<jRGg:VGg&TGjp`<.DaAFa&JkNup#`x z fa2a` z f a"aAFa  f#c4JkzNu0:g0.D<jRGg*VGgTGjp`<.Da(` z faa` z f aaAF "g pR@0 ,g  g  fHp`:pR@0  g  g "fR@0 ,g  g  fHpRU@"_  f#c4$H _a`QNupR@0 ,g"  g  fa~ (fR~Nua ~ `a~NuaJkHQ ! gRf _NuXX~Nu0j4\@??<NMXJk .dgp Nu` <.DHSGFa "fAGg ."Fg( ,g2 gAEf< &_Nua g`Ra ,g g` ."Ff`=A|aA09RyH@@-HtBe2QB p#`2(gbc  P"H`Nu/0Ha2  _ PSAvjx E(Wf* ae zb Q @Nua"XLpAg Per 1"NuHyNNX @Nu&Hz ?<&NN\Nu|a"XLXB@etAg1B# NuBnp`pBnp`p=| p|=Fn@=@b=n`ra HHj=Ah~`:a JfBH@ RfF.f Kg" Mg sg tg Pg Hf~`xSGjtRGFcn>`jAF gp gj g grffnnpenbfJ.fj6pRGFc$SG` J.fjpRGFcRF` Ff`> `?~ap a0p a*0Nu|``CpE`bf`FgRGJGgSGSFFgCpE`Yf`Nua@Jf gH@ fa(@ fza0 b @ Ee0NuaVgNu4.rf?Hya4NM\Nu=|D`Lja zEfpadppa`AFEg0PaEfaFRE`ܾEfp a@a8?nnnp a2RF`<a \nnoS@f nhfSnl=Ah=FnNup` papq4.rf?HyaܚNM\Nu=|DHajLNu|A0"P2(@e2<EF`QHP=|DJ@g$abAF$HpR@ 0 f _a`QNup?ap a~2<|0`C&pHQ/Hy@NA NuC pa:NuHQ/Hy?NA Nu&g4 FgagJAga2< R@AdSf0Nu0ap Ce`&g4 FgaJBjagPAe CbRa R@Sf0Nu FgRag JBja젰AeaJAg RP0 pNu` Fg6aVgJAga @ea`RP Nup NHѨB?<?/?<BNAO JkLLNu&8aJBjaJAg Df*ڃkd0Nu DfրBH??/?<BNAO LJk!@NuHBHh Hx??<?NAO LJo ѨLNuk:fp`^k: g ѨNuBHPHQ/??<?NAO _JoѨfNuBHPHQS/??<@NAXLfѨNuJkp%`BrSRH0a=GDgLFa$-Ka`c.܆܆A|Skz&Y24A B@b6<IdIdId`Q  TF`HAPC̑ a0L <A A@eH@"Kp0aLA|`C̑ `Lp`pp`&nAt6<X0QNurSRH0a=GDgkLFa6 I-Ka"`c.܆܆BGPl `agRSj Ql Nu`HPG<.Dx agJBja鼰AeaJAgZRP0 ögR@Ae`U  fSC̗ &n _aER@Hd2Hd"Hd `""""Q\J@Nu _HzHP`pNup#fpNup`p`#Nu?/NT` pNuNHMAp f9kd n2!|nv ||9"XLv:g 4zg*Ag61 cg Jg ;e, ]b& Te` Db; g fg  bJg fg fg,HC#0j ` Hx Dg;0Lp{YBj@1BA gbШ dA gd BBdL@Nu wHHKMPPR g,g&y`pBypzXB@etAg1B# `\HCHSGPvg*1B f  f&< # XB@etAf&_`ACBgZ"HyNN#n.>"NN @A C#P B?< NA\#p/a?< NA\A=0N sNuA#r rr~P޸|a&:|a RGk0Gg`a0GVf3n<??< NMXACJf`Ar Hjr-D@Hd0H@H 0H@0CNuAF"H [1][fSEfNuaJf"_O:N"_O:HQ`2 9sg"9sgJ9f ga"ANp\B`G06#f&#-KNuk"c" C gT6f`Pv6"cgRCC(D#8`D@v`v??NMXJNuJ@k??<NM"UAf J@fH@Nuaj\0fpNu\@`a`]@><CF Ipa<0HNua`]@><CF Ipa Nu?|`?a0R@f|0aTHJFkHPa _Nupo`HSHP&I>g\SG??<NMXJk V _t&_Nu&_`aJANuag `af`apNuapNuC`C``C` C`CJhfRRRRRRRHP? @CFH~8:E#P&<2 `b$bYEf` RAf rЁЀ`$Ѐe "ЀeЁdpNJAkfgRer?DDЁaAa8$HX :CFE` YEjT"_$P"2trDDd0d d d` QjNu`DaDa DNu na^ K"ng42 $`gk2&Hg Af deђ$`ebѐXf&nNu AgebѐA``-Kx$ n&$n""Hg8" &Ak cѐ S`g"" k#&Acё2+SAI3 Q&f-I"&nNu-Kx$&ր n&$n""HgR" k&Ac b S` S`g4" k#&AcbrkX`ޑ2+SAI3 Q&f-I"&nNu$9sg6AC r2f`ef2f`#s``aP n2L6(n\n^HHHNua0 n20(n\HNua n20(n^HNua n20(HNua:ffNuarNua J[HHNu:nfa@ z^0NuJg6$:Pf,H?<"NNT&@p/&yra :,ga &Lr`r??Q@yHyNM\0Nu#yNu"H YJQfNuBQ YH瀀azLP|HPG|C6[[[C8[[[a68v6Cv6C[RCF8[[[a@6C[RCF8.L L-KA `$I\bfBjQNu$YbfBjQNu؄*؄؅CH`h؅X`$_  IaHR"H @`̘؄*؄؅AHNu؅X`$_ IaHR"H` n1d$HJf-HS Nup"`vHPa _a`QNua JH aL0Nua`4<H`@aL Z0De2SCkÐCo@c2`QNu$Ia Z0AcA`QS@ QNuHd0Hd0Hd` QNu$IaH Z0Ac4ASB Q`QNu  F1 EingabeF2 ndernF3 LschenF4 Voreinstell.F5 DateiF10 BeendenSuchbegriff :120Anrede :310Zeile 0:420Vorname:520Name :620Zeile 2:720Str. :820PLZ :94Ort :1020Land :1120Anrede :1430Anzahl der Lerrzeilen zwischen: Str. u. Ort Ort u. Land Land u. Anrede - + - + - + Pfad ndern 1st Word That's Write Speich. auf Befehl Autom. Speichern Speichern O.K. AOUDieses Programm darf frei kopiert werden.Alle regelmigen Benutzer werden jedochgebeten, sich gegen DM 20registrieren zu lassen, unter folgenderAnschrift: Andreas Jkel Sachsenring 16 3388 Bad Harzburg 1Wie blich, wird dies auch belohnt:Jeder registrierte Anwender erhlt eineaktualisierte Version und wird bei Er-weiterungen benachrichtigt.Der Quelltext (GFA 3.0) ist gegen Ein-sendung von zustzlich DM 30 zu erhalten.Programmversionen fr mehr als 75 An-schriften sind beim Autor erhltlich. AddressHelp Fehler Angemeldet:Autom. Speichern war abge-|schaltet. Vor BEENDEN erst|Daten speichern ?Ja|NeinV. 1/75ADDRHELPSehr geehrte Damen und Herren,ADDRHELP.DAT(Klick for Info)zufllig fllen ?????Die max. mgliche Zahl von|Datenstzen ist leider|erreicht (s.Info).Schade!EINGABEKeine Daten eingegeben !|RichtigEs wurde kein Datensatz|ausgewhlt!|Oh!NDERNVoreinstellungen Neuer Pfad:Bitte gewnschte Aktion |eingeben: Laden|Speich.|Abbruch|wurde nicht gefunden !|wird berschrieben !O.K.|AbbruchDie Daten wurden nicht ge-|speichert! Autom. Speichern|ist jetzt abgeschaltet.|nicht gefunden. Soll eine|neue Datei angelegt werden ?)X0    "24 (    $  (FJ$ "8"l 28:<*@<<@^$*$J,$HT ( ( ("<>p<>lHJ$\*x 8lh T\((@Hz$pf 8 $D& 4H x0H**$,1 1 0 1 0 0 1 5 0 0 0 0 0 0 0 ADDRHELP.DAT Sehr geehrte Damen und Herren, Bakkersteeg 9a Sehr geehrte Damen und Herren, R v/d Kamp Sehr geehrte Damen und Herren, Stichting ST Stichting ST Bakkersteeg 9a 2311 RH LEIDEN Geachte heer v/d Kamp, en und Herren, en, . AO.. AFONT APANITA_P7TOSA5-ANITA_PSTOSAy>LIES_MICH A0-. AP.. AOFONT1 DATAQ0FONT2 DATA]0FONT3 DATAi0FONT4 DATAu0LIES___MICHAnFONT_EDTTOSAsB 8>~ff~>ff<~ffffff~<ff<~fffff~<ffffffffff~<fffffffff~>ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB 8~pp|>~|88fnl80vff8|ll88ppv888888 888888 `0880`ff<<<x<8888888888||<88||888||<8888888pp>>88888888>>p08||||88|l@`px< |~~~|~~~|~>88~~888888~~88xx88888||xx88888888||l|||~~~|8888888>~|88||8||~80p8888xx8888888888888888888888<<8888r<< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RLB~f~f>|~~f~ffff>~888888fffllllllll>`<|8~|xfl0fFfn8vf8l8pv8l8pv888<888<p88px< 8|~x888808888p 0 808~~~~~~`0 0`p8 8p|~``nff>~~fff~fff<<|88888|f<|flxpxlf``````~fv~~nff~fffff<|8ff<88888>@`0 p8xx||8l8|`0p8<>f>|~~``|fff|<```<||>fff>~~ff>|~~``|ffff8<8x888|p888888``flxlf8<x88888||fffffff>~~|f```>`<|~|~8888ffff>~fff<|8|llf<||~ 0~8p0088888888p pp88 88p` @44b~< 8 88~ 8 88~|x 80000008 0 0ll88ll~~0 ~~ 00```<~fffnvfff~<88~~<~ff 00~~~~  ff~< <<80 8pp8~~~~p88p<~ff f<~fff~~ffff|~ff~|ffff~|fff<<<<8|ll(~~<<~~|8888~~ 00``~~<<00000000<<888<< <<~~zv8|fff|fff~l``<88x̎8|p8||<~`p>p`~<|֒|f<88lll8\666666xx |00000x܌ <|Ɔf6<<~fffff~<~llllll8||88|>~x0~0002>ffffn|8~DlDl@|<``<|| |lv>|| 880000880000b~``|```~``|```&*2&*2  < >< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RL^DHH^DHHLLRLLLRLLNBLLNBLL^RRL^RR\\R\\\R\NPPNNPPN\RR\\RR\^\P^^\P^^\PP^\PPDD|D((ll0(|((|(llll||||||||B Bfl0fF8D(pv8l8pv008<<80 080008  8 8H00Hf<~ 8 0  0 ~~~~~~  `0 0` 8 88~B B<\"<$$$dDbbbr@8DƪD88TT8$FJJRR$X8DD8>HP>>@@>>@@> @@~@@ $HH~HH0 @@DDD(((8DD88DD8^RRRDDDDDDDDDDd$$ ((DDDD(((DD( @@ (l((((((((((l(((DDDD(( @ 8DD88DD8^RRR@  @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @@  x|8@  @ ` `00xx@   @~``|```~``|``` 8 88~f̈ ~<\6<$$$dfbbv~@8lƪl88|֒|8>fNJRv~~>>~~>>~~>>``~``>>hh~hh> 0 `@Dll(88|ƺ||ƚ|^RRRllllllllllff&66 8(lDƂDl(8(ll( `` 8l(((((  (((((l88(lDDl(8 0``0 |ƺ||ƚ|^RRR`00`8000``````````````````````````````````00080000000000000000000``00000000000000000000000000000000000|~<`0  0`p X08<  <8|| ||@`0  0`@~``|```~``|```&*2&*2  < >< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RL^DHH^DHHLLRLLLRLLNBLLNBLL^RRL^RR\\R\\\R\NPPNNPPN\RR\\RR\^\P^^\P^^\PP^\PPF*Nz00000 0`88<< @ 0`llll |0 ~~0888888||88||8D|8D|88||T8||T(DD((DD( @@ `` 8T<~ T8~<(D(8l8||~~~$$HH$llH<<B$$BBf<BB<>ff<\"<$D\6<,dbr@r~@8DD8|ƪ|8TT8|֒|$FJR$X$fnv$X8DDDDD8|lDDDDDDDD8DDDl|8||||||~||~>DHH>>tdt>>@@@>>p`p>>@@>~>``>~>@~@>>`~`>>D~H>>d~h> ~ ~D(l88DD88DD88DD88DD8^RRR^RRRDDDDD|DDDDd d (D8lD(l8(DD((ll( @@ `` (l(((8l(((  (((l((((l8(DD(8DD8``pp8DD88DD88DD88DD8^RRR^RRR~B  B~~b00b~ @@@@@00`````@@@@@@@@````````@@@@@ `````00 000000 @@ 00``00 000000 000000008|x|8xx0  0pp `Xp `Xp  x||  x ||@ `0    @0`̈̈pppppp0pppppppp0Ppppppppp ppppppppxppppppppxxpppppp0pp000p0p00P00pp0 0ppp0pxp0p00xx000@@@@@@@@@@ @ @@  @@PP pp pp pp pp PP @@ 8T  T8pp HH  P PXX@ h` pp  @@@@(H@ XHPp`HHx 0pHHHpPPPАhhhh@pب؈ppp(PPpp8P`8 8@@88@@88@@88H`8  @@PPPP pppp踨HHHHHHHHHHHPPP00 PPPPPP PP @@ PPPPPPP  PPPPPPP PPPP  @@ pppp踨@@ @@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @@  0 pxp@  @ ( `00xx@   @pppppp0pppppppp0Ppppppppp ppppppppxppppppppxxpppppp0pp000p0p00P00pp0 0ppp0pxp0p00xx000``````````0`0``00 `@PP800xx00000ppp pp pp pp PP @@ 8||@ 00 @||8p؈p Hؐ`00`pp؈XX@`0h` pp  @@(h` XHpppИHHxؘ00pXHXxPPP؈hhhx@pب؈ppp(pبpppxx 8xx88xx88xx88xx8 0 `@PPPpp pppp踨HHHHHHHHHHXx000 ppP؈Ppp PP `` pPPPPP 00 PPPPPp pPPp 0``0pppp踨` `8000``````````````````````````````````00080000000000000000000``00000000000000000000000000000000000`p`00`0000000000( X08< <8|| ||@`0 0`@((((((000 80 80000(8(88 808 80 8( 8(8 8 (((((0(0(8(((8((0(0(00(0(0  0(((00(((08 0 88 0 88 0 8 0 @@@@@````` @0```8``8 @0`PPPP p `0xx00`pp ppp pp pp pp pp pp pp PPPP@@@@8T8||  00 T8||8 PP pp HHHؐ0000H00HHx0xHXXXX`xp`0xp pp pp  @@ @@@(H@ (h` ```xpxpPHHpPXXxpPЈhh@hx@pب؈ppب؈ppppp(PP(pp0HHHHH0xxHHHHHHHH0HHHxx088xx xАxxxxxppppxxxxxxPxx @ @PP P pppppppp踨踨HHHHHHxHHHHHP0P0000 P p؈P p PPPP @@ `` PPPPP pPPP  00 PPPPP PPPp PP p؈p``pppppppppp踨踨@ @` ` @@@@@00`````@@@@@@@@````````@@@@@ `````00 000000 @@ 00``00 000000 000000000 pp0  `00` 00000( 88 0`Xp   x||  x ||@ `0   @0`ؐؐؐؐ 8>~ff~>ff<~ffffff~<ff<~fffff~<ffffffffff~<fffffffff~>ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB 8~pp|>~|88fnl80vff8|ll88ppv888888 888888 `0880`ff<<<x<8888888888||<88||888||<8888888pp>>88888888>>p08||||88|l@`px< |~~~|~~~|~>88~~888888~~88xx88888||xx88888888||l|||~~~|8888888>~|88||8||~80p8888xx8888888888888888888888<<8888r<< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RLB~f~f>|~~f~ffff>~888888fffllllllll>`<|8~|xfl0fFfn8vf8l8pv8l8pv888<888<p88px< 8|~x888808888p 0 808~~~~~~`0 0`p8 8p|~``nff>~~fff~fff<<|88888|f<|flxpxlf``````~fv~~nff~fffff<|8ff<88888>@`0 p8xx||8l8|`0p8<>f>|~~``|fff|<```<||>fff>~~ff>|~~``|ffff8<8x888|p888888``flxlf8<x88888||fffffff>~~|f```>`<|~|~8888ffff>~fff<|8|llf<||~ 0~8p0088888888p pp88 88p` @44b~< : Verschieben des Ausschnittes nach rechts < : Verschieben des Ausschnittes nach links s : Uebernahme eines Zeichens in einen internen Puffer e : Uebernahme eines Zeichens aus dem internen Puffer o : Uebernahme eines Zeichens (ober Haelfte) aus dem internen Puffer u : Uebernahme eines Zeichens (untere Haelfte) aus dem internen Puffer CONTROL-C : Abspeichern von FONTn.DAT und Beenden des Programms `A&#H.|HN@NV.yHBgNAJyPgNu3PHB?< NA\#RLNuJyPfNuByPH/9R?< NgNA\LNuH`?NMXL<NuH?<?<?<NM\?<f?<?<NM\LNuH?<?<?<NM\?<E?<?<NM\LNuH&HBg??<?<NM\`LNuN>ANhN 1e 4bNu Zeichensatz Nr. [1-4]:N"/p9H9# NVNuH?<"NNT @#h/<l/<`?<?<NN #h 9`#d`#dLNuJ9gNu/ oH@p eJHCr9CX۲9f B92L _Nu`J9g9۰9f<NuH@@Cr9 1X9fJ9gB93L<Nu?</<?<=NAPJ@k3 /</<0?9 ?<?NA Jkn?9 ?<>NAXJ@kZNu?</<?<NAXJ@kNNfont .datHJ@jp @lc0<l35>GCCpp| Irtvze N6z`N66R@QQ@RAQQP@QLNuH>95GCCpp| IrtvzN6R@QQ@RAQQP@QLNuHxN y"fN5095@N5` - W"Qr"&dDDD  @OD @@ 1)  A29IyAC@rXQCrXQNu1) ̄9'Ā!'=   8>~ff~>ff<~ffffff~<ff<~fffff~<ffffffffff~<fffffffff~>ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB 8~pp|>~|88fnl80vff8|ll88ppv888888 888888 `0880`ff<<<x<8888888888||<88||888||<8888888pp>>88888888>>p08||||88|l@`px< |~~~|~~~|~>88~~888888~~88xx88888||xx88888888||l|||~~~|8888888>~|88||8||~80p8888xx8888888888888888888888<<8888r<< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RLB~f~f>|~~f~ffff>~888888fffllllllll>`<|8~|xfl0fFfn8vf8l8pv8l8pv888<888<p88px< 8|~x888808888p 0 808~~~~~~`0 0`p8 8p|~``nff>~~fff~fff<<|88888|f<|flxpxlf``````~fv~~nff~fffff<|8ff<88888>@`0 p8xx||8l8|`0p8<>f>|~~``|fff|<```<||>fff>~~ff>|~~``|ffff8<8x888|p888888``flxlf8<x88888||fffffff>~~|f```>`<|~|~8888ffff>~fff<|8|llf<||~ 0~8p0088888888p pp88 88p` @44b~< 8 88~ 8 88~|x 80000008 0 0ll88ll~~0 ~~ 00```<~fffnvfff~<88~~<~ff 00~~~~  ff~< <<80 8pp8~~~~p88p<~ff f<~fff~~ffff|~ff~|ffff~|fff<<<<8|ll(~~<<~~|8888~~ 00``~~<<00000000<<888<< <<~~zv8|fff|fff~l``<88x̎8|p8||<~`p>p`~<|֒|f<88lll8\666666xx |00000x܌ <|Ɔf6<<~fffff~<~llllll8||88|>~x0~0002>ffffn|8~DlDl@|<``<|| |lv>|| 880000880000b~``|```~``|```&*2&*2  < >< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RL^DHH^DHHLLRLLLRLLNBLLNBLL^RRL^RR\\R\\\R\NPPNNPPN\RR\\RR\^\P^^\P^^\PP^\PPDD|D((ll0(|((|(llll||||||||B Bfl0fF8D(pv8l8pv008<<80 080008  8 8H00Hf<~ 8 0  0 ~~~~~~  `0 0` 8 88~B B<\"<$$$dDbbbr@8DƪD88TT8$FJJRR$X8DD8>HP>>@@>>@@> @@~@@ $HH~HH0 @@DDD(((8DD88DD8^RRRDDDDDDDDDDd$$ ((DDDD(((DD( @@ (l((((((((((l(((DDDD(( @ 8DD88DD8^RRR@  @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @@  x|8@  @ ` `00xx@   @~``|```~``|``` 8 88~f̈ ~<\6<$$$dfbbv~@8lƪl88|֒|8>fNJRv~~>>~~>>~~>>``~``>>hh~hh> 0 `@Dll(88|ƺ||ƚ|^RRRllllllllllff&66 8(lDƂDl(8(ll( `` 8l(((((  (((((l88(lDDl(8 0``0 |ƺ||ƚ|^RRR`00`8000``````````````````````````````````00080000000000000000000``00000000000000000000000000000000000|~<`0  0`p X08<  <8|| ||@`0  0`@~``|```~``|```&*2&*2  < >< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RL^DHH^DHHLLRLLLRLLNBLLNBLL^RRL^RR\\R\\\R\NPPNNPPN\RR\\RR\^\P^^\P^^\PP^\PPF*Nz00000 0`88<< @ 0`llll |0 ~~0888888||88||8D|8D|88||T8||T(DD((DD( @@ `` 8T<~ T8~<(D(8l8||~~~$$HH$llH<<B$$BBf<BB<>ff<\"<$D\6<,dbr@r~@8DD8|ƪ|8TT8|֒|$FJR$X$fnv$X8DDDDD8|lDDDDDDDD8DDDl|8||||||~||~>DHH>>tdt>>@@@>>p`p>>@@>~>``>~>@~@>>`~`>>D~H>>d~h> ~ ~D(l88DD88DD88DD88DD8^RRR^RRRDDDDD|DDDDd d (D8lD(l8(DD((ll( @@ `` (l(((8l(((  (((l((((l8(DD(8DD8``pp8DD88DD88DD88DD8^RRR^RRR~B  B~~b00b~ @@@@@00`````@@@@@@@@````````@@@@@ `````00 000000 @@ 00``00 000000 000000008|x|8xx0  0pp `Xp `Xp  x||  x ||@ `0    @0`̈̈pppppp0pppppppp0Ppppppppp ppppppppxppppppppxxpppppp0pp000p0p00P00pp0 0ppp0pxp0p00xx000@@@@@@@@@@ @ @@  @@PP pp pp pp pp PP @@ 8T  T8pp HH  P PXX@ h` pp  @@@@(H@ XHPp`HHx 0pHHHpPPPАhhhh@pب؈ppp(PPpp8P`8 8@@88@@88@@88H`8  @@PPPP pppp踨HHHHHHHHHHHPPP00 PPPPPP PP @@ PPPPPPP  PPPPPPP PPPP  @@ pppp踨@@ @@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @@  0 pxp@  @ ( `00xx@   @pppppp0pppppppp0Ppppppppp ppppppppxppppppppxxpppppp0pp000p0p00P00pp0 0ppp0pxp0p00xx000``````````0`0``00 `@PP800xx00000ppp pp pp pp PP @@ 8||@ 00 @||8p؈p Hؐ`00`pp؈XX@`0h` pp  @@(h` XHpppИHHxؘ00pXHXxPPP؈hhhx@pب؈ppp(pبpppxx 8xx88xx88xx88xx8 0 `@PPPpp pppp踨HHHHHHHHHHXx000 ppP؈Ppp PP `` pPPPPP 00 PPPPPp pPPp 0``0pppp踨` `8000``````````````````````````````````00080000000000000000000``00000000000000000000000000000000000`p`00`0000000000( X08< <8|| ||@`0 0`@((((((000 80 80000(8(88 808 80 8( 8(8 8 (((((0(0(8(((8((0(0(00(0(0  0(((00(((08 0 88 0 88 0 8 0 @@@@@````` @0```8``8 @0`PPPP p `0xx00`pp ppp pp pp pp pp pp pp PPPP@@@@8T8||  00 T8||8 PP pp HHHؐ0000H00HHx0xHXXXX`xp`0xp pp pp  @@ @@@(H@ (h` ```xpxpPHHpPXXxpPЈhh@hx@pب؈ppب؈ppppp(PP(pp0HHHHH0xxHHHHHHHH0HHHxx088xx xАxxxxxppppxxxxxxPxx @ @PP P pppppppp踨踨HHHHHHxHHHHHP0P0000 P p؈P p PPPP @@ `` PPPPP pPPP  00 PPPPP PPPp PP p؈p``pppppppppp踨踨@ @` ` @@@@@00`````@@@@@@@@````````@@@@@ `````00 000000 @@ 00``00 000000 000000000 pp0  `00` 00000( 88 0`Xp   x||  x ||@ `0   @0`ؐؐؐؐ 8>~ff~>ff<~ffffff~<ff<~fffff~<ffffffffff~<fffffffff~>ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB 8~pp|>~|88fnl80vff8|ll88ppv888888 888888 `0880`ff<<<x<8888888888||<88||888||<8888888pp>>88888888>>p08||||88|l@`px< |~~~|~~~|~>88~~888888~~88xx88888||xx88888888||l|||~~~|8888888>~|88||8||~80p8888xx8888888888888888888888<<8888r<< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RLB~f~f>|~~f~ffff>~888888fffllllllll>`<|8~|xfl0fFfn8vf8l8pv8l8pv888<888<p88px< 8|~x888808888p 0 808~~~~~~`0 0`p8 8p|~``nff>~~fff~fff<<|88888|f<|flxpxlf``````~fv~~nff~fffff<|8ff<88888>@`0 p8xx||8l8|`0p8<>f>|~~``|fff|<```<||>fff>~~ff>|~~``|ffff8<8x888|p888888``flxlf8<x88888||fffffff>~~|f```>`<|~|~8888ffff>~fff<|8|llf<||~ 0~8p0088888888p pp88 88p` @44b~<NAXNufont4.dat(//<?<NA\ NuAHJg .f`.___BTeNu"<C҂By˚N˜Jyvg #҂~NuS fB!#~NuN "<CdBy˚N˜JyvgN NzNuS g#^B9.'Nz#HV#LZ#P^"<$C/3˚N˜JyvkfNlNNּNuByv/Bg/<H?<NNAPJy˚fJk`B9.(Jk.(4dAH@@NTL`"94Bg/<8?<=NAPJkN3d/ /?9d?<?NA Jj3vA'H@@NTL?9d?<>NAX NuANT3v NuC҂"9~gNNuNּCd"9^g^NNɒNzJ9.'f2J9.(g<$9VHf$9ZLf$9^PgC/"<$NNu/Bg/<H?<NAX <NuANT X<NuA&C͂rd PQNu>>>>AUU>U>>U>>U>AIIIA@_>}Q"EQ"EQ"E_>}@$ >I IH IH IH EH CHA>"A H (8  >  ,c,c,c      ""'r'r'r'r'r?A2C4rl 0HQNuVRݯ[Y-.j.ۧ՗ommۚt )޷mw[&u7Uکg݊UJU|nV۲mե_mݻګo?Vw{?A{ڬӇfkK}!1{[!M13~Y>I-X@;O6Iɴ@Vuٜ"Xm];/I G} VP- =Po׬@HWx uVm8Hۡ} 5D>,-K"[&$+յ )@ /gjiBx@~H *!cBwA*ưAՅ?k ,<PCʖQCl @ 8B P P CGAo \@ Uh BhU9h( HHGU$ n.l /@X" 0HuZH@ z@7 knڿiUTĠX"@@H@@% !   !A@ A@@ @  H NNfN #҂~ByxAzr?BQNr9HA9I,ANNx gN29NAfN`A%Pr&BQ#-NL0Nu||~-3bKd#^SGC&B&c#C6&dGCI (B9."B9.#B9.(r A,$<0 "X"|v2"PQQA0 2< QA0o2<;BPQNɒNuH"9^RA"A$APdbJ0gSA0LyH⿞QHASAk!QpOBQLPP^<NuLANT<NuH * &yCtv"+RA A"A"+`N fYRdB c.J-f(J-f"J-fYY(g cxSDBQ(匚*|ef`"剓 dd'|d "+Q*EJgR bP&9^e " ^`4S"HBQHBJBgSBHB`BdJg  cg  cL0NuH 9^" ^L|H|0dLxL0NuH8Ad"HEvGCy9A B9?AyyrgrgrAbf*Hf & `g c`tJN ``J`F`B`>`:`6``~`z`|`x`x`t`l`p`d```AH2g9-`2SG &yCG kdd>9-2 &yCG`J+fN^<9-N؊<9-*y..-NuN"9C cN؊ANTNu3-3- GcJJ9fN؊NzNN CSy-&yCG~Nr>9-`RG2 &yCG k f>9- `J+fN^<9-N؊<9-*y..-NuN g  g  fS` gS e\3-2 &yCGN^Jy-k<9->9-N؊--Nuc4/ Nٲ*_N` g  bt  d  dfT``A7NT` M%g eJN3-2 &yCGN^Jy-kB<9->9-N؊--Nu g  g  f*HNu  dU`d/ N*_N`zA7NTNqGC#CKdN|~NNu2 &yCGN`" cN(ANT`NrJ9.gN(*y. CdGC|~#CNNu Mg g(  g  g  bT` NNNu M$<ddT g  g  g b  bU`Rd. g  g  g  bU` RNNNu&yCg^ezNNrJ9.fJ cN(ANT`b*kNN(#C|~NNu*y. CdGC`̗ Ccc*kN`GCKdN`/g  bT`  g  g g cS"Nugfbf&yCⰫe *@Nz GdJ/ N*_NNu CcexCdGC#C*@~NzNu*@N3ޢ3lNz3ޢN(`/ cRAJgD"HBg  c0 g2 c  ftgJg*C`Jf& Jg`T`*_Nu*_N *_ SN/ AJgb"HB%g  c gR c`U`g  c2 g c  ftg Jg*CS`Jf& Jg`T`*_Nu*_N*_ SN2C4J BctBPBBB@BBB0BBB BpBBB`BBQNu FpdV24B6JJBC2CrFvÑPQJBDBkv2 IBQPQNuH8 <rRGIp$&(*, A"A$A&A~H~HQLNuH8 K0<dLH0QLHL|/~NR.NuHKsMx0<d0LHQLHxL|/~NR.NuH FhbrIA24JBC9-B|N `~````` `"``4`````````,`B`>`T`X`n`j````````r4Bg@H x,:Fv{KOQJ9-j FF))L0NuPQJ9-j|NuA#T#XAT`A#d#hA\`hA``A#T#XAT`FA#d#hA\`,&<H $ B"B4BFBBzrxǑPQRBQJ9-jFL0NuA#T#XAT`A#d#hA\`xA`pA#T#XAT`VA#d#hA\`|~AxrBPQNNNpAxCr"PQA r!!!!!QCbrtvA(gQ"QAbCrtQXtQXQr$9-grApNL|NuZH$E (K+| rdg0A|0BAHA g0AHA0A N2Cr tJA tFPQQL$NuSeite xxxABr0IA,#(Nu/ y(@/00NRN _N| Nu/ y(@/00NRN _N| NuJ9.#ftH(I (R|-$HgPk NfN؊N" Fhd0`BBt@0 @#j.@0 @#j@0 @#SJ#By pBdfJg:< ` 03 N yXfN؊N" FhdxB@H@ fJg:Jy f< `0N yXfN؊N" Fhd,H@0N yfN؊N" Fhd`LASNuH(rBxz+|+>PGGd: + k"D$DI.B.. . grI.p dXRHN```2`4`6`b`~````````````` gJf(Jj8g2 -g AFe&4FA`4F3..x"H.. . RAFdJ9. gJ3. #.fS#.By. LNug b  g  g g A bT`Jk3..x4FRRA``Rg rI.`rI.`T`T`p+ @gT`| c<F T`xp c<T @b^:`XT`RT`LT`FT`@`<`83..`3..``3..S``B9. `@. `. `33f3J3 3"3ߚ$3&33f3J333ߚ3Nu33f3J3 3"3$ߚ3&Nu33f##3R 3ߚ 333f##3R3ߚ3NuN33f##3 R3 ߚ3NuNNrN(NuH N3-B9.By.+f.N J9."gBy. B9.S p+NB9-|+NߚFNk89-*9. E fRB(+AA0I (I-k7k$k#. bJNJ#.$k.3-3.p dDRHN`r`r`~``````` ` ` ` `$`~`~````j KC """fPNfABrt+ JA, p #(B+h Jg |h LqNuNJ y((e|R+ B+ `R+rI4JBp `N KC """ y(eB+h `R+rI4JBp `xcD9. g fr9.t9.Bgv69. 9-gS9.`S9.9. ?bg ,g .g ;g !ggrSC`(4y. DB Bd9-g BdSCkFH 8N.N"9-fy. jBy. `y. kQL0N.f3-3---Db3-3.-.#.N"RblJj6 9 .g, 9-.g"9. g<-Jy.f NN"N'y.J9.fh+?+ y((bP@ LqNu.f3-3---Dbb3-3.-.#.`B y(J(f|R+ B+ `Z|rI4JBp `>`vR-R`fr crR++0I (I`8 c<?++R` c<AR` c<AR`  c<  ++R`T`T`T```Jy.fvN.`Jy.fZN.`xSf3-3---Db3-3.-.#.RNu`2Jy.fNS.#.`` +?`+?+@`+`~P`/ N*_QN/3-2 &yCGxGNrJy-j`RG Gc<e@N C"9C c(ANT`SGRD Q(A7NT`>9-<9-3-3-N؊--Q`NrJ9f NdRG QP<9->9-(NuH>GC9.$N`&N(L|Nu k gNr bN(NB9~Np9.%B9e9gB9ApN`Tv+9 Cc CAp?N6`ApN k gfNeNH@ agNrJ+fN r+9.& IApNNr `ApNNL|NuJ $9-fPFNu\FJ9-gRFS9-j -Nu#t9HyjBy yoc 3o9HyjBy yoc 3oJyf*NdH ?<%NNTLNNNtNuNN29I CCg Ac Ab"<9Fj|> &yCGJ+f2N^<9-*y..- g:NN؊`2 +b N٬`N fNzJ9f,Jyf" e  g NNe#JyfNtNuJ9g 3~NNe#JyfNtByNuJ9g 3~N٬ fNzNe#JyfNtByNuRyg2 yg>Wy##pByNtNu##pNu##pNuNt`N#@NdNe*JyjByNt3pNT`J9f NN`Jyj> yg4Jyg,Syf"RyNtNNNt3pSfbNՊ#= Nd>Nd4SfNNNNdNeNNz`NNN"Nx$ HAA AbIN``$````````````` `<``8```B````J``Z``~`V````x```~`z`v`v``j`"`b`^`Z`V`R`N``F`B`>`:`````````F`p``` `4````D``````````` `(```````````R`N```J`d`j`` ` ` |` x` t` p` l` h` d` `` \` b` h` n` t``````````````` c ~bN|`` 3g fp` ?g fzp`/ NDgfJ9-g\<``P f<N`: fvF9."Nz`" f^F9.#Nz` @gV \gN fp`@ fp`2 g*p `$ f <N` [g {g fp` fp` ]g }g fp` fhp` f<N`Lgp`0<f$f.9- -N` fN`N`N>`0<ff9- @-N`0<ff9- -N`0<ftf~9- -N`Z0<f$f.9- -N`,g*N>` N`0<ff9- -N`0<ff9- -N`0<f~f9- -N`0<fPfZ2 &yCGv+NLN ghH@ ag| Kg2 Mf bNLRCNxfRCC`JgNLSCNxfC`NLNNNz`NLN`Crdg"0BAHA 0HA0` HA f `A?N62IA4<rgrPQNu0< ff2 &yCGv+NLN ghH@ agv Kg2 Mf bNLRCNxfRCC`JgNLSCNxfC`NLNN`vNLN`l<<N`^3-N2 &yCGN^<9-N؊<9-*y..-Nuff N`N`N`pNQ`f ND`Nܺ`f Nڌ`N܄`pN٬Q`ff N٬`xN `nNޤ`d|N`Xv gNAz29xR3xB d4  bJgT`  g  g gR``<N`J f N`<N`<N`<N`<N`<N`<N`r<N`d< N`V<N`HAz29x0S3xf$ g g eN`` eN|` e  g `N`2 &yCG"k"+f N`N*k b  g  g gR`Ne N``Z2 &yCG"k"+f N`N`/ ME҂"9~b$_`J gNeL MJ gRg,  b"J(fJ(f ` S`²c Jg`$_`NR`F9-`N`N `N `~/ $M`/ By$M&<d"b2Jg b$  c  g  g `U`Rg b  g  g gS f A` f A` f A` f A` f A` f A`t f A`b f A`P  f A`> f A`, f A` f A`AN NNNH@ ag Mg4 Kg@ Sf  bBBBNzJyf`By  bT`3&<d"b.Jg b  g  g  bU`l$_NNustylefontabstandxminxmaxrahmennowrapwrapfillfehlerhafter codeH8ANN ae zb_ Qg Eg Rg Wgv Pg Cg Lg0 Ig Og Fg\ DgH@ agD`ANN fN Nz`H@ af`>ANN gH@ af`G^AN$HSN gH@ agH@N.`εcr AHWN̐d`GAN$HSN gH@ agH@N.`εcr AHCE WLNNNuG AN$HSN gH@ agH@N.`εcr AHWN̐`GhAYN$HSN gH@ agH@N.`εcr AHCWNʨ`ZGAuN$HSN gH@ agbH@N.`εcr AHChWNx`.$.%.&vA?NN"Nx6$ HA f N` af` 0eV 9bN0  b"C.&trf 6`$fC.$t`C.%t`vA.$C.NA.%C:NA.&CFNA"`(rdg 0BAHA 0HA0Nu HA f `ANNN f Nּ`H@ af` g .g. _g& 0eh 9c_ AeT ZbL" g* A b< K .gb .g AbBNu .g" AcNucB"NuGAN$HSN g. g&Jg $KB`AN$HSN g>H@ agH@ fcB"`NeʵdB`NLNޤG$K?<NATA:BgHR?<GNAPJf\BAa$HSN gpH@ ag6H@ fcB"` 0e 9c. \g& -g :g Ae ZbdB`x 9:fXr9A bh??<NAXJkXJ9f\B9`( 9\f J9gBgHy?<NNAPHy?<;NA\JgAra̦`\*.*NLNuLXNuENTER> QUIT > EXIT > FILENAME.EXTREAD > FILENAME.EXTWRITE> FILENAME.EXTPRINT> PRINT> ANF: END: OFF: COMPRESS> INPUT BUFFER > FILENAME.EXTOUTPUT BUFFER> FILENAME.EXTLOESCHE TEXT > FIND> SUCH_STRING_____DIR > b ef<<Nu f <` f <` f <` f <` f <` f <` f <` f <`|<Nu y~B9h`*A҂B9h` y~`A҂h$g&ֈ ReArNTNuSBg  c9hQ#~Nu BeUB9h9h9h`g: b2  g*  g" g  bB)BB`B)dNug4 b,  g  g g  b T`B)dNNu3H #CF$MAJNNdNeNT`NNN"Nx$ H@ Hff N`N` Kff ND`Nܺ` Mff Nڌ`hN܄`^ Pff N٬`DN `: df.gFdJ"J" f N`*N` efHgdJ#CF"J" f N`N#FCNz` SfHgdJ#CF"J" f Nj`N#FCNz` Rf|N`V Gf<<N`@ JfpNQ`( NfpN٬Q` pb fcH@NR` ag`NLByNuMARK> B\ 0e 9b\ANNN 0e 9b]ANNN 0e 9b^ANNNH@ rf2pA\0g0 `NNNu afNNuH@ rg afPNNuH@ rg af^NNuSuche Seite > J-g Ne NNu MJ9-g$ J gNe MJ gR2 &yCGf"f g J+gN& g g gN(g(gN gt gl gb  gZ  gRg b(  bT` g  g  fS2 &yCGg`d|N٬Nutv2 &yCG k N"H SN`&  bT`gb eB(b$ J gNe MJ gRN<`< M gg0 b,  g$  g g  bU`Nu MJ fJ fJ gNe MJ gRNu<`<`<`<2 &yCGg k N"H S`$ S"HN`gfB(BBb`b  bT` g b(  g  g g  bU`Nu.'NH>By#XB9.#rIA,#(*y(Jgx`x*y(2jDA*u* N#ZN"Nx$ HAJg8 Ng Jg g Sg ge$ pc qf Fy#X` rgF gP f <`n f <`^ f <`N f <`> f <`. f <` f <` f<Jk e `& 0e 9bff|Jy#Xg MJf"HUSd `JfS` KfdS` MfR` Hf: Dn Dmg`pSD`JRD`D y(JgXH`0 PfF y(JDkmg"`.D(m `RD`SD`J(g x`` y( 0fB`2 1f `" 2f ` 3f` y(rt|Jgv\TSfJgv~\TSf`: y(R`jv y(fJf,2JDk0 0c^0`VDA`( (c@(`8( (c*(`"v`dS Mf< ` y((jrA(PcC~g(|0pcp0pdp0p\GSf(g0pcp0p\GSf`TL|NzNuH>G#N$y(~gpNRGR@c*NNRG*NNRGgpNJRGR@cL|NuAdC$""<|QNzN NNzN(Nh yfNNu  ANwenderfreundliches  Interaktives  Textverarbeitungsprogramm fr  Atari  AAA N N III TTTTT AAA A A NN N I T A A AAAAA N N N I T AAAAA A A N NN I T A A A A N N III T A A ein emanzipierter Loitzendorfer (B)Engl V1.13 (NEC_P7) 17.06.90NɲNvNNN#NNNt &  &    0   T$            h    $ F~ $F &       , * 4     . P   < T r 6f@d 0X,־&J:   f.  < 2 $ 4 BH         ^   6$     $   &:: 4        B,    4                     $                 B< "Pn,          $0  HL0       V  &( 0  Z p  6n  J̀HDN~  "<KBtԙQHASAkHA`JgA .HADv  b0`7Q?<?<?<NM\?<E?<?<NM\G*Bg??<?<NM\`?<?<NMX.WBgNAPruefsummenfehler T"XA r$<ѐg g`` @N`>XAAC$I=h&:N`7 <c#>.|>N"96NbN6NNHATN NNt Byte Speicherplatz fehlen ! N.y>BgNAJygNu3HB?< NA\#LNuJyfNuByH/9?< NgNA\LNuH?<?<?<NM\?<E?<?<NM\LNuH&HBg??<?<NM\`LNuH@??<?<NM\LNuH&8<:<@0 @9c^@N, QL?NuH`?- W"Qr"&dDDD  @OD @@ 1)  A29IyAC@rXQCrXQNu1) ̄9'Ā!'=   8>~ff~>ff<~ffffff~<ff<~fffff~<ffffffffff~<fffffffff~>ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB 8~pp|>~|88fnl80vff8|ll88ppv888888 888888 `0880`ff<<<x<8888888888||<88||888||<8888888pp>>88888888>>p08||||88|l@`px< |~~~|~~~|~>88~~888888~~88xx88888||xx88888888||l|||~~~|8888888>~|88||8||~80p8888xx8888888888888888888888<<8888r<< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RLB~f~f>|~~f~ffff>~888888fffllllllll>`<|8~|xfl0fFfn8vf8l8pv8l8pv888<888<p88px< 8|~x888808888p 0 808~~~~~~`0 0`p8 8p|~``nff>~~fff~fff<<|88888|f<|flxpxlf``````~fv~~nff~fffff<|8ff<88888>@`0 p8xx||8l8|`0p8<>f>|~~``|fff|<```<||>fff>~~ff>|~~``|ffff8<8x888|p888888``flxlf8<x88888||fffffff>~~|f```>`<|~|~8888ffff>~fff<|8|llf<||~ 0~8p0088888888p pp88 88p` @44b~< 8 88~ 8 88~|x 80000008 0 0ll88ll~~0 ~~ 00```<~fffnvfff~<88~~<~ff 00~~~~  ff~< <<80 8pp8~~~~p88p<~ff f<~fff~~ffff|~ff~|ffff~|fff<<<<8|ll(~~<<~~|8888~~ 00``~~<<00000000<<888<< <<~~zv8|fff|fff~l``<88x̎8|p8||<~`p>p`~<|֒|f<88lll8\666666xx |00000x܌ <|Ɔf6<<~fffff~<~llllll8||88|>~x0~0002>ffffn|8~DlDl@|<``<|| |lv>|| 880000880000b~``|```~``|```&*2&*2  < >< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RL^DHH^DHHLLRLLLRLLNBLLNBLL^RRL^RR\\R\\\R\NPPNNPPN\RR\\RR\^\P^^\P^^\PP^\PPDD|D((ll0(|((|(llll||||||||B Bfl0fF8D(pv8l8pv008<<80 080008  8 8H00Hf<~ 8 0  0 ~~~~~~  `0 0` 8 88~B B<\"<$$$dDbbbr@8DƪD88TT8$FJJRR$X8DD8>HP>>@@>>@@> @@~@@ $HH~HH0 @@DDD(((8DD88DD8^RRRDDDDDDDDDDd$$ ((DDDD(((DD( @@ (l((((((((((l(((DDDD(( @ 8DD88DD8^RRR@  @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @@  x|8@  @ ` `00xx@   @~``|```~``|``` 8 88~f̈ ~<\6<$$$dfbbv~@8lƪl88|֒|8>fNJRv~~>>~~>>~~>>``~``>>hh~hh> 0 `@Dll(88|ƺ||ƚ|^RRRllllllllllff&66 8(lDƂDl(8(ll( `` 8l(((((  (((((l88(lDDl(8 0``0 |ƺ||ƚ|^RRR`00`8000``````````````````````````````````00080000000000000000000``00000000000000000000000000000000000|~<`0  0`p X08<  <8|| ||@`0  0`@~``|```~``|```&*2&*2  < >< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RL^DHH^DHHLLRLLLRLLNBLLNBLL^RRL^RR\\R\\\R\NPPNNPPN\RR\\RR\^\P^^\P^^\PP^\PPF*Nz00000 0`88<< @ 0`llll |0 ~~0888888||88||8D|8D|88||T8||T(DD((DD( @@ `` 8T<~ T8~<(D(8l8||~~~$$HH$llH<<B$$BBf<BB<>ff<\"<$D\6<,dbr@r~@8DD8|ƪ|8TT8|֒|$FJR$X$fnv$X8DDDDD8|lDDDDDDDD8DDDl|8||||||~||~>DHH>>tdt>>@@@>>p`p>>@@>~>``>~>@~@>>`~`>>D~H>>d~h> ~ ~D(l88DD88DD88DD88DD8^RRR^RRRDDDDD|DDDDd d (D8lD(l8(DD((ll( @@ `` (l(((8l(((  (((l((((l8(DD(8DD8``pp8DD88DD88DD88DD8^RRR^RRR~B  B~~b00b~ @@@@@00`````@@@@@@@@````````@@@@@ `````00 000000 @@ 00``00 000000 000000008|x|8xx0  0pp `Xp `Xp  x||  x ||@ `0    @0`̈̈pppppp0pppppppp0Ppppppppp ppppppppxppppppppxxpppppp0pp000p0p00P00pp0 0ppp0pxp0p00xx000@@@@@@@@@@ @ @@  @@PP pp pp pp pp PP @@ 8T  T8pp HH  P PXX@ h` pp  @@@@(H@ XHPp`HHx 0pHHHpPPPАhhhh@pب؈ppp(PPpp8P`8 8@@88@@88@@88H`8  @@PPPP pppp踨HHHHHHHHHHHPPP00 PPPPPP PP @@ PPPPPPP  PPPPPPP PPPP  @@ pppp踨@@ @@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @@  0 pxp@  @ ( `00xx@   @pppppp0pppppppp0Ppppppppp ppppppppxppppppppxxpppppp0pp000p0p00P00pp0 0ppp0pxp0p00xx000``````````0`0``00 `@PP800xx00000ppp pp pp pp PP @@ 8||@ 00 @||8p؈p Hؐ`00`pp؈XX@`0h` pp  @@(h` XHpppИHHxؘ00pXHXxPPP؈hhhx@pب؈ppp(pبpppxx 8xx88xx88xx88xx8 0 `@PPPpp pppp踨HHHHHHHHHHXx000 ppP؈Ppp PP `` pPPPPP 00 PPPPPp pPPp 0``0pppp踨` `8000``````````````````````````````````00080000000000000000000``00000000000000000000000000000000000`p`00`0000000000( X08< <8|| ||@`0 0`@((((((000 80 80000(8(88 808 80 8( 8(8 8 (((((0(0(8(((8((0(0(00(0(0  0(((00(((08 0 88 0 88 0 8 0 @@@@@````` @0```8``8 @0`PPPP p `0xx00`pp ppp pp pp pp pp pp pp PPPP@@@@8T8||  00 T8||8 PP pp HHHؐ0000H00HHx0xHXXXX`xp`0xp pp pp  @@ @@@(H@ (h` ```xpxpPHHpPXXxpPЈhh@hx@pب؈ppب؈ppppp(PP(pp0HHHHH0xxHHHHHHHH0HHHxx088xx xАxxxxxppppxxxxxxPxx @ @PP P pppppppp踨踨HHHHHHxHHHHHP0P0000 P p؈P p PPPP @@ `` PPPPP pPPP  00 PPPPP PPPp PP p؈p``pppppppppp踨踨@ @` ` @@@@@00`````@@@@@@@@````````@@@@@ `````00 000000 @@ 00``00 000000 000000000 pp0  `00` 00000( 88 0`Xp   x||  x ||@ `0   @0`ؐؐؐؐ 8>~ff~>ff<~ffffff~<ff<~fffff~<ffffffffff~<fffffffff~>ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB 8~pp|>~|88fnl80vff8|ll88ppv888888 888888 `0880`ff<<<x<8888888888||<88||888||<8888888pp>>88888888>>p08||||88|l@`px< |~~~|~~~|~>88~~888888~~88xx88888||xx88888888||l|||~~~|8888888>~|88||8||~80p8888xx8888888888888888888888<<8888r<< ><<<< $> $>< <<< << <" <">>""""""">""">""<"<"<<"<"<  <"""<<"""<> < >> < >> < > < LRRLLRRLDDDDDDDD\LP^\LP^\LB\\LB\DT^DDT^D\\B\\\B\L\RLL\RLB~f~f>|~~f~ffff>~888888fffllllllll>`<|8~|xfl0fFfn8vf8l8pv8l8pv888<888<p88px< 8|~x888808888p 0 808~~~~~~`0 0`p8 8p|~``nff>~~fff~fff<<|88888|f<|flxpxlf``````~fv~~nff~fffff<|8ff<88888>@`0 p8xx||8l8|`0p8<>f>|~~``|fff|<```<||>fff>~~ff>|~~``|ffff8<8x888|p888888``flxlf8<x88888||fffffff>~~|f```>`<|~|~8888ffff>~fff<|8|llf<||~ 0~8p0088888888p pp88 88p` @44b~<NAXNufont4.dat(//<?<NA\ NuAHJg .f`.___BTeNu"<CBy˚N˜Jyvg #NuS fB!#NuN "<CBy˚N˜JyvgN N NuS g#B9?WNz#HV#LZ#P^"<$C@3˚N˜JyvkfNlNNּNuByv/Bg/<H?<NNAPJy˚fJk`B9?XJk?X4dAH@@NTL`"94Bg/<8?<=NAPJkN3d/ /?9d?<?NA Jj3vA'H@@NTL?9d?<>NAX NuANT3v NuC"9㮒gNNuNּC"9⎒g^NNɒNzJ9?Wf2J9?Xg<$9VHf$9ZLf$9^PgC@"<$NNu/Bg/<H?<NAX <NuANT X<NuA&C͂rd PQNu>>>>AUU>U>>U>>U>AIIIA@_>}Q"EQ"EQ"E_>}@$ >I IH IH IH EH CHA>"A H (8  >  ,c,c,c      ""'r'r'r'r'r?A2C4rl 0HQNuVRݯ[Y-.j.ۧ՗ommۚt )޷mw[&u7Uکg݊UJU|nV۲mե_mݻګo?Vw{?A{ڬӇfkK}!1{[!M13~Y>I-X@;O6Iɴ@Vuٜ"Xm];/I G} VP- =Po׬@HWx uVm8Hۡ} 5D>,-K"[&$+յ )@ /gjiBx@~H *!cBwA*ưAՅ?k ,<PCʖQCl @ 8B P P CGAo \@ Uh BhU9h( HHGU$ n.l /@X" 0HuZH@ z@7 knڿiUTĠX"@@H@@% !   !A@ A@@ @  H NNfN #ByAr?BQNr9HA9I,ANNx gN29NAfN`A6~r&BQ#>NL0Nu||~?3K#SGU&B&#U6&GU&I (B9?RB9?SB9?Xr A,$<AP"X"|v2"PQQAAP2< QAA2<;BPQNɒNuH"9RA"A$APbJ0gSA0LyH⿞QHASAk!QpOBQLPP<NuLANT<NuH * &yUtv"+RA A"A"+`N fYRdB c.J-f(J-f"J-fYY(g cxSDBQ(匚*|ef`"剓 d'| "+Q*EJgR bP&9⎳e " `4S"HBQHBJBgSBHB`BdJg  cg  cL0NuH 9" L|H|0dLxL0NuH8A"HEvGU.y9A B9?AyyrgrgrAbf*Hf & `g c`tJN ``J`F`B`>`:`6``~`z`|`x`x`t`l`p`d```AH2g t& ó"PQNuA>"Xr"PQNuN3?3?&yU k g2 Gb,N URy?&yU~N>9?`2SG &yUG kd>9?2 &yUG`J+fN<9?.N؊<9?*y?4?2?&NuN"9U &cN؊ANTNu3?3? GcJJ9 fN؊N NN USy?&yUG~N>9?`RG2 &yUG k f>9? `J+fN<9?.N؊<9?*y?4?2?&NuN g  g  fS` gS e\3?*2 &yUGNJy?*k<9?(>9?*N؊?,?&Nuc4/ Nٲ*_N` g  bt  d  dfT``A7NT` M%g eJN3?*2 &yUGNJy?*kB<9?(>9?*N؊?,?&Nu g  g  f*HNu  dU`d/ N*_N`zA7NTNqGU&#UKN|~N Nu2 &yUGN`" &cN^ANT`NJ9?JgN^*y?N U&dGU&|~#UN Nu Mg g(  g  g  bT` NNNu M$<┴dT g  g  g b  bU`Rd. g  g  g  bU` RNNNu&yUg^ezNNJ9?JfJ &cN^ANT`b*kNN^#U|~N Nu*y?N U&dGU&`̗ U&cc*kN`GU&KN`/g  bT`  g  g g cS"Nugfbf&yUe *@N GdJ/ N*_N Nu U&cexU&dGU&#U*@~N Nu*@N3ޢ3lN 3ޢN^`/ cRA'JgD"HBg  c0 g2 c  ftgJg*C`Jf& Jg`T`*_Nu*_N *_ SN/ A'Jgb"HB%g  c gR c`U`g  c2 g c  ftg Jg*CS`Jf& Jg`T`*_Nu*_N*_ SN2C4J BctBPBBB@BBB0BBB BpBBB`BBQNu FpdV24B6JJBC2CrFvÑPQJBDBkv2 IBQPQNuH8 <rRGIp$&(*, A"A$A&A~H~HQLNuH8 K0<dLH0QLHL|/~NR.NuHKsMx0<d0LHQLHxL|/~NR.NuH FhbrIA24JBC9?B|N `~````` `"``4`````````,`B`>`T`X`n`j````````r4Bg@H x,:Fv{KOQJ9?j FF))L0NuPQJ9?j|NuA#T#XAT`A#d#hA\`hA``A#T#XAT`FA#d#hA\`,&<H $ B"B4BFBBzrxǑPQRBQJ9?jFL0NuA#T#XAT`A#d#hA\`xA`pA#T#XAT`VA#d#hA\`sub_on Gv`,sub_off Gv`sup_on Gv`sup_off /a NuH0&H&aL NuSC/<NMXJ@g /<NMX`??<?<NM\QNu/AT <0N Nu  100 dict begin /codes [ 16#18 /section 16#19 /germandbls 16#1a /Adieresis 16#1b /adieresis 16#1c /Odieresis 16#1d /odieresis 16#1e /Udieresis 16#1f /udieresis] def /um {dup /newfont exch maxlength dict def {exch dup /FID ne {dup /Encoding eq {exch dup length array copy newfont 3 1 roll put} {exch newfont 3 1 roll put} ifelse } {pop pop} ifelse } forall codes aload pop codes length 2 idiv {newfont /Encoding get 3 1 roll put} repeat /dummy newfont definefont} def /f10nnn /Courier findfont um 12 scalefont def /f10bnn /Courier-Bold findfont um 12 scalefont def /f10nin /Courier-Oblique findfont um 12 scalefont def /f10bin /Courier-BoldOblique findfont um 12 scalefont def /f10nnk /Courier findfont um [12 0 0 8 0 0] makefont def /f10bnk /Courier-Bold findfont um [12 0 0 8 0 0] makefont def /f10nik /Courier-Oblique findfont um [12 0 0 8 0 0] makefont def /f10bik /Courier-BoldOblique findfont um [12 0 0 8 0 0] makefont def /f12nnn /Courier findfont um [10 0 0 12 0 0] makefont def /f12bnn /Courier-Bold findfont um [10 0 0 12 0 0] makefont def /f12nin /Courier-Oblique findfont um [10 0 0 12 0 0] makefont def /f12bin /Courier-BoldOblique findfont um [10 0 0 12 0 0] makefont def /f12nnk /Courier findfont um [10 0 0 8 0 0] makefont def /f12bnk /Courier-Bold findfont um [10 0 0 8 0 0] makefont def /f12nik /Courier-Oblique findfont um [10 0 0 8 0 0] makefont def /f12bik /Courier-BoldOblique findfont um [10 0 0 8 0 0] makefont def /g10nnn /Symbol findfont 12 scalefont def /g10nnk /Symbol findfont [12 0 0 8 0 0] makefont def FontDirectory /Anita known { /h10nnn /Anita findfont 12 scalefont def /h10nnk /Anita findfont [12 0 0 8 0 0] makefont def /h12nnn /Anita findfont [10 0 0 12 0 0] makefont def /h12nnk /Anita findfont [10 0 0 8 0 0] makefont def } {/h10nnn f10nnn def /h10nnk f10nnk def /h12nnn f12nnn def /h12nnk f12nnk def} ifelse /p {under { currentpoint 3 2 roll sh gsave currentpoint su newpath moveto su lineto stroke grestore} {sh} ifelse fnr 1 ne {/fnr 1 def setstyle} if} def /sh {fnr 1 eq {show} {fnr 3 eq {dup dup 0 get 128 add 0 exch put} if matrix currentmatrix exch italic {[1 0 .25 1 0 0] concat} if fnr 4 ne {gsave dup stringwidth pop dup eng {6} {7.2} ifelse dup 4 1 roll gt {div 1 scale} {sub 2 div 0 rmoveto} ifelse } if fett {gsave hoch tief or {.2 .2} {.3 .3} ifelse rmoveto dup show grestore} if show fnr 4 ne {grestore eng {6} {7.2} ifelse 0 rmoveto} if setmatrix } ifelse .5 setlinewidth} def /su {2 sub tief hoch not and {3 add} if hoch tief not and {5 sub} if} def /crlf {6 mul currentpoint exch pop exch sub 20 exch moveto} def /xpos {3.6 mul currentpoint 3 1 roll add exch moveto} def /ff {showpage 20 800 tief hoch not and {3 sub} if hoch tief not and {5 add} if moveto} def /font2 {/fnr 2 def setstyle} def /font3 {/fnr 3 def setstyle} def /font4 {/fnr 4 def setstyle} def /under_on {/under true def setstyle} def /under_off {/under false def setstyle} def /pc_10 {/eng false def setstyle} def /pc_12 {/eng true def setstyle} def /italic_on {/italic true def setstyle} def /italic_off {/italic false def setstyle} def /fett_on {/fett true def setstyle} def /fett_off {/fett false def setstyle} def /sub_on {tief not {/tief true def setstyle currentpoint hoch {5} {3} ifelse sub moveto} if} def /sub_off {tief {/tief false def setstyle currentpoint hoch {5} {3} ifelse add moveto}if} def /sup_on {hoch not {/hoch true def setstyle currentpoint tief {3} {5} ifelse add moveto}if} def /sup_off {hoch {/hoch false def setstyle currentpoint tief {3} {5} ifelse sub moveto}if} def /setstyle {fnr 1 eq {setstyle1} {fnr 4 eq {setstyle4} {setstyle23} ifelse} ifelse setfont} def /setstyle1 {eng {fett {italic {hoch tief or {f12bik} {f12bin} ifelse} {hoch tief or {f12bnk} {f12bnn} ifelse} ifelse} {italic {hoch tief or {f12nik} {f12nin} ifelse} {hoch tief or {f12nnk} {f12nnn} ifelse} ifelse} ifelse} {fett {italic {hoch tief or {f10bik} {f10bin} ifelse} {hoch tief or {f10bnk} {f10bnn} ifelse} ifelse} {italic {hoch tief or {f10nik} {f10nin} ifelse} {hoch tief or {f10nnk} {f10nnn} ifelse} ifelse} ifelse} ifelse } def /setstyle23 {hoch tief or {g10nnk} {g10nnn} ifelse} def /setstyle4 {eng {hoch tief or {h12nnk} {h12nnn} ifelse} {hoch tief or {h10nnk} {h10nnn} ifelse} ifelse} def .5 setlinewidth /under false def /eng false def /italic false def /fett false def /tief false def /hoch false def /fnr 1 def setstyle 20 800 moveto H>|~AxrBPQNLNNAxCr"PQCrtvA(gQ"QACApNL|NuH$E (K&+| rdg0A|0BAHA g0AHA0A N2Cr tJA tFPQQL$NuSeite xxxATr0IA,#(Nu/ y(@/00NRN _N Nu/ y(@/00NRN _N NuJ9?SftH(I (R|?$HgPk NfN؊NP Fhd0`B4B8t@0 @#0j.@0 @#4j@0 @#8SJ#0PGGd: + k"D$DI?>B?8?:?;grI??p dXRHN```2`4`6`b`~````````````` gJf(Jj8g2 -g AFe&4FA`4F3?>?@x"H?8?:?;RAFdJ9?;gJ3?<#?DfS#?DBy??@x4FRRA``Rg rI??`rI?>`T`T`p+ @gT`| c<F T`xp c<T @b^:`XT`RT`LT`FT`@`<`83?>?@`3?>?@``3?>?@S``B9?:`@?:`?:`3P3R3T3PV3X3ߚZ3\3N3N3N3NP3N3Nߚ3NNu3P3R3T3VP3X3Zߚ3\Nu3436#8#<3R@3ߚB3D3232#F#J32R32ߚ32NuN3436#8#<3@R3Bߚ3DNuNNN^NuH N03? B9?JBy?L+f.NBJ9?RgBy?`vR?R`fr crR++0I (I`8 c<?++R` c<AR` c<AR`  c<  ++R`T`T`T```Jy?LfvN ?L`Jy?LfZN ?M`xSf3?(3?*??,Db3?.3?0??2#?4RNu`2Jy?LfN S?J#?N`` +?`+?+@`+`~P `/ N*_Q N/3?*2 &yUGxGNJy?*j`RG Gc<e@N U"9U &c(ANT`ϨSGRD Q(A7NT`ψ>9?*<9?(3?"3?$N؊?,?&Q `NJ9 f NdRG QP <9?">9?$(NuH>GU&9?TN`&N^L|Nu k gN bN^N &yUGJ+f2N<9?.*y?4?2?& g:NN؊`2 +b N٬`N fN J9f,Jyf" e  g N Ne#JyfNtNuJ9g 3~NNe#JyfNtByNuJ9g 3~N٬ fN Ne#JyfNtByNuRyg2 yg>Wy##pByNtNu##pNu##pNuNt`N #@NdNe*JyjByNt3pN`J9 f NN`Jyj> yg4Jyg,Syf"RyNtNNNt3pSfbNՊ#= Nd>Nd4SfNNNNdNeNN `NNN"Nx$ HAA AbIN``$````````````` `<``8```B````J``Z``~`V````x```~`z`v`v``j`"`b`^`Z`V`R`N``F`B`>`:`````````F`p``` `4````D``````````` `(```````````R`N```J`d`j`` ` ` |` x` t` p` l` h` d` `` \` b` h` n` t``````````````` c ~bN-`` 3g fp` ?g fzp`/ NDgfJ9?g\<``P f<N.`: fvF9?RN `" f^F9?SN ` @gV \gN fp`@ fp`2 g*p `$ f <N.` [g {g fp` fp` ]g }g fp` fhp` f<N.`Lgp`0<f$f.9?& ?&N/D` fN/<`N/`N0l`0<ff9?& @?&N/D`0<ff9?& ?&N/D`0<ftf~9?& ?&N/D`Z0<f$f.9?& ?&N/D`,g*N0l` N/`0<ff9?& ?&N/D`0<ff9?& ?&N/D`0<f~f9?& ?&N/D`0<fPfZ2 &yUGv+NzN ghH@ ag| Kg2 Mf bNzRCNxfRCC`JgNzSCNxfC`NzN/NN `NzN`Crdg"0BAHA 0HA0` HA f `A?N62IA4<rgrPQNu0< ff2 &yUGv+NzN ghH@ agv Kg2 Mf bNzRCNxfRCC`JgNzSCNxfC`NzN/N`vNzN`l<<N`^3?N2 &yUGN<9?.N؊<9?*y?4?2?&Nuff N`N`N`pNQ`f ND`Nܺ`f Nڌ`N܄`pN٬Q`ff N٬`xN `nNޤ`d|N`Xv gNA29R3B d4  bJgT`  g  g gR``<N/`J f N`<N/`<N/`<N/`<N/`<N/`<N/`r<N/`d< N/`V<N/`HA290S3f$ g g eN-` eN-` e  g `N*$`2 &yUG"k"+f N)`N)*k b  g  g gR`Ne N``Z2 &yUG"k"+f N(`N(`/ ME"9㮲b$_`J gNeL MJ gRg,  b"J(fJ(f ` S`²c Jg`$_`N,`F9?`N `N`N`~/ $M`/ By$M&<"b2Jg b$  c  g  g `U`Rg b  g  g gS f A` f A` f A` f A` f A` f A`t f A `b f A `P  f A `> f A`, f A` f A `A N NNNH@ ag Mg4 Kg@ Sf  bBBBN Jyf`By  bT`3&<"b.Jg b  g  g  bU`l$_NNustylefontabstandxminxmaxrahmennowrapwrapfillfehlerhafter codeH8A&NN ae zb_ Qg Eg Rg Wgv Pg Cg Lg0 Ig Og Fg\ DgH@ agD`A'NN fN N `H@ af`>A'NN gH@ af`G' ^A' N$HSN gH@ agH@N$\`εcr AHWN̐d`G''A' N$HSN gH@ agH@N$\`εcr AHC'E';WLNNNuG';A'4N$HSN gH@ agH@N$\`εcr AHWN̐`G'A'N$HSN gH@ agH@N$\`εcr AHC'WNʨ`ZG'A'N$HSN gH@ agbH@N$\`εcr AHC'WNx`?T?U?VvA'H?NN"Nx6$ HA f N ` af` 0eV 9bN0  b"C?Vtrf 6`$fC?Tt`C?Ut`vA?TC'\N#A?UC'hN#A?VC'tN#A'P`(rdg 0BAHA 0HA0Nu HA f `A'|NN f Nּ`H@ af` g .g. _g& 0eh 9c_ AeT ZbL" g* A b< K .gb .g AbBNu .g" AcNucB"NuG'A'N$HSN g. g&Jg $KB`A'N$HSN g>H@ agH@ fcB"`N(@eʵ'dB`NLNޤG'$K?<NATA:BgHR?<GNAPJf\BA'a$HSN gpH@ ag6H@ fcB"` 0e 9c. \g& -g :g Ae Zb(=dB`x 9:'fXr9'A bh??<NAXJkXJ9'f\'B9'`( 9\'f J9'gBgHy&?<NNAPHy'?<;NA\JgArax`\*.*NLNuLXNuENTER> QUIT > EXIT > FILENAME.EXTREAD > FILENAME.EXTWRITE> FILENAME.EXTPRINT> PRINT> ANF: END: OFF: COMPRESS> INPUT BUFFER > FILENAME.EXTOUTPUT BUFFER> FILENAME.EXTLOESCHE TEXT > FIND> SUCH_STRING_____DIR > b ef<<Nu f <` f <` f <` f <` f <` f <` f <` f <`|<Nu yB9)`*AB9)` y`A)$g&ֈ ceArNTNuSBg  c9)Q#Nu BeUB9)9)9)`g: b2  g*  g" g  bB)BB`B)dNug4 b,  g  g g  b T`B)dNNu3H #U,t$MA,xNNdNeN`NNN"Nx$ H@ Hff N`N` Kff ND`Nܺ` Mff Nڌ`hN܄`^ Pff N٬`DN `: df.gFdJ"J" f N)`*N)` efHgdJ#U,t"J" f N(`N(#,tUN ` SfHgdJ#U,t"J" f N)`N)#,tUN ` Rf|N`V Gf<<N`@ JfpNQ`( NfpN٬Q` pb fcH@N,` ag`NLByNuMARK> B- 0e 9b-A-|NN 0e 9b-A-|NN 0e 9b-A-|NNH@ rf2pA-0g0 `NNNu afNNuH@ rg afPNNuH@ rg af^NNuSuche Seite > J-g Ne N Nu MJ9?g$ J gNe MJ gR2 &yUGf"f g J+gN & g g gN Ȱ(g(gN gt gl gb  gZ  gRg b(  bT` g  g  fS2 &yUGg `d|N٬Nutv2 &yUG k N06"H SN06`&  bT`gb eB(b$ J gNe MJ gRN <`< M gg0 b,  g$  g g  bU`Nu MJ fJ fJ gNe MJ gRNu<`<`<`<2 &yUGg k N06"H S`$ S"HN06`gfB(BBb`b  bT` g b(  g  g g  bU`Nu?WNH>By4B9?SrIA,#(*y(Jgx`x*y(2jDA*u* N4N"Nx$ HAJg8 Ng Jg g Sg ge$ pc qf Fy4` rgF gP f <`n f <`^ f <`N f <`> f <`. f <` f <` f<Jk e `& 0e 9bff|Jy4g MJf"HUSd `JfS` KfdS` MfR` Hf: Dn Dmg`pSD`JRD`D y(JgXH`0 PfF y(JDkmg"`.D(m `RD`SD`J(g x`` y( 0fB`2 1f `" 2f ` 3f` y(rt|Jgv\TSfJgv~\TSf`: y(R`jv y(fJf,2JDk0 0c^0`VDA`( (c@(`8( (c*(`"v`dS Mf< ` y((jrA(PcC~g(|0pcp0pdp0p\GSf(g0pcp0p\GSf`TL|N NuH>G4N$y(~gpNPRGR@c*NNRG*NNRGgpNRGR@cL|NuAC5P"<~QN N NN N^Nh yfNNu  ANwenderfreundliches  Interaktives  Textverarbeitungsprogramm fr  Atari  AAA N N III TTTTT AAA A A NN N I T A A AAAAA N N N I T AAAAA A A N NN I T A A A A N N III T A A ein emanzipierter Loitzendorfer (B)Engl V1.13 (POSTSCRIPT) 17.06.90NɲNvNNN4N"NNt &  &    0   T$            h    $ F~ $F &       , * 4     . P   < T r 6f@d 0X,־&J:    ^ v  BH         ^   6$     $   &:: 4        B,    4            &          $                 B< "Pn,          $0  HL0       V  &( 0  Z p  6n  J̀HDN~  "<OtԙQHASAkHA`JgA .HADv  b0`7Q?<?<?<NM\?<E?<?<NM\G*Bg??<?<NM\`?<?<NMX.WBgNAPruefsummenfehler T"XA r$<ѐg g`` @NANITA ist ein einfaches, dafuer aber schnelles Programm zur Eingabe von einfachen Texten mit Direktformatierung auf dem Bildschirm. ************************************************************************** KURZBESCHREIBUNG A-Z,a-z,0-9,!".. usw. normale darstellbare Zeichen Control F W N Auswahl von Fill Wrap oder Nowrap (wird als Steuerzeichen im Text gespeichert) Control/SHIFT Space nicht dehnbares Lehrzeichen (bei Fill) Control O Ein- bzw. Ausschalten der Kopf- und Fuss- zeilendarstellung (hat keinen Einfluss auf den abgespeicherten Text!); sinnvoll bei der Eingabe laengerer Textstuecke Control T Ein- bzw. Ausschalten des Fill-Modus auf dem Bildschirm (ohne Auswirkung auf den gespeicherten Text; ueberschreibt lokal ein Control F im Text; sinnvoll bei der Eingabe von laengeren Textstuecken und bei nachtraeglicher Trennung mittels Maus) Return neue Zeile Control Return neue Seite Delete loescht Zeichen Backspace Cursor links; evtl. loeschen Zeichen die letzten 256 mit DELETE und BACKSPACE geloeschten Zeichen werden gespeichert und koennen mit UNDO zeichenweise zurueckgeholt werden Undo Undo fuer DELETE und BACKSPACE Help Worttrennung Insert Cursor in Zeile ganz links Clr Home Cursor in Zeile ganz rechts Cursortasten Cursor in entsprechende Richtung Shift Cursor_oben Cursor an Anfang des Textes Shift Cursor_unten Cursor an Ende des Textes Shift Cursor_links Cursor auf vorhergehendes RETURN (Absatz) Shift Cursor_rechts Cursor auf naechstes RETURN (Absatz) Control Cursor_links suche Steuerzeichen links vom Cursor Control Cursor_rechts suche Steuerzeichen rechts vom Cursor (Cursor_links, Cursor_rechts, DELETE, UNDO) Control Cursor_oben suche naechsten Suchstring oberhalb Cursor Control Cursor_unten suche naechsten Suchstring unterhalb Cursor Funktionstasten: F1 Unterstreichen F2 10/12 Zeichen pro Zoll F3 Italic (nicht NEC_P2) F4 Fett F5 hochgestellte Schrift F6 tiefgestellrte Schrift F9 linker Rand ( (SHIFT)Cursor links/rechts; Return; UNDO) F10 rechter Rand ( (SHIFT)Cursor links/rechts; Return; UNDO) Shift F1 Zeilenabstand 1 Shift F2 Zeilenabstand 2 Shift F3 Zeilenabstand 3 Shift F4 Zeilenabstand 4 Shift F5 Zeilenabstand 5 Shift F6 Zeilenabstand 6 Shift F7 Zeilenabstand 7 Shift F8 Zeilenabstand 8 Shift F9 Zeilenabstand 9 Shift F10 Zeilenabstand 0 (d.h. dieselbe Zeile!) Alternate F1 Zeichensatz 1 (Standard-Zeichensatz) Alternate F2 Zeichensatz 2 (griech. Zeichen) Alternate F3 Zeichensatz 3 (math. und graph. Sonderzeichen) Alternate F4 Zeichensatz 4 (frei definierbarer Zeichensatz) Control F1 Kopf- / Fusszeilen Nr. 1 Control F2 Kopf- / Fusszeilen Nr. 2 Control F3 Kopf- / Fusszeilen Nr. 3 Control F4 Kopf- / Fusszeilen Nr. 4 Control F5 Kopf- / Fusszeilen Nr. 5 Control F6 Kopf- / Fusszeilen Nr. 6 Control F7 Kopf- / Fusszeilen Nr. 7 Control F8 Kopf- / Fusszeilen Nr. 8 Control F9 Kopf- / Fusszeilen Nr. 9 Control F10 Kopf- / Fusszeilen Nr. 10 Alternate Control F1 Eingabe: Kopf- / Fusszeilen Nr. 1 Alternate Control F2 Eingabe: Kopf- / Fusszeilen Nr. 2 Alternate Control F3 Eingabe: Kopf- / Fusszeilen Nr. 3 Alternate Control F4 Eingabe: Kopf- / Fusszeilen Nr. 4 Alternate Control F5 Eingabe: Kopf- / Fusszeilen Nr. 5 Alternate Control F6 Eingabe: Kopf- / Fusszeilen Nr. 6 Alternate Control F7 Eingabe: Kopf- / Fusszeilen Nr. 7 Alternate Control F8 Eingabe: Kopf- / Fusszeilen Nr. 8 Alternate Control F9 Eingabe: Kopf- / Fusszeilen Nr. 9 Alternate Control F10 Eingabe: Kopf- / Fusszeilen Nr. 10 Numerischer Tastenblock: 0-9 Suche entsprechende Seite (Abschluss mit ENTER) + ca. 20 Zeilen vorwaerts - ca. 20 Zeilen zurueck . Wechsel zwischen Insert- und Replace-Mode ) schreibe Inhalt der Zeile in internen Puffer Shift ) fuege Inhalt der Zeile an den Text im internen Puffer an / loesche Zeile und schreibe geloeschte Zeile in internen Puffer Shift / loesche Zeile und fuege geloeschte Zeile an den Text im internen Puffer an * fuege Inhalt des Internen Puffers in den Text ein ( Wechsel in den MARK-Modus Enter Wechsel in den ENTER-Modus ************************************************************************** MARK-Modus: folgende Eingaben sind moeglich: Tasten zur Cursorbewegung ) Uebernahme des Textes zwischen MARK-Position und augenblicklicher Cursorposition in den internen Puffer Shift ) Anfuegen des Textes zwischen MARK-Position und augenblicklicher Cursorposition an den Text im internen Puffer / Loeschen und Uebernahme des Textes zwischen MARK-Position und augenblicklicher Cursorposition in den internen Puffer Shift / Loeschen und Anfuegen des Textes zwischen MARK-Position und augenblicklicher Cursorposition an den Text im internen Puffer Delete loescht alle Steuerzeichen zwischen MARK-Position und augenblicklicher Cursorposition (z.B. Schriftarten, Rand) Shift Delete loescht alle Returns und FormFeeds zwischen MARK- Position und augenblicklicher Cursorposition Undo verlassen des MARK-Modus ************************************************************************** ENTER-Modus: folgende Kommandos sind mglich: Q Quit (Beenden des Programms) E Exit (Abspeichern der Daten und Programmende) D Directory (Eingabe des Arbeitsdirectorys) R Read (Lesen einer Datei) W Write (Schreiben einer Datei) I Input (Lesen einer Datei in den internen Puffer) O Output (Schreiben des internen Puffers in eine Datei) C Compress (Entfernung von Luecken und unnoetigen Steuer- zeichen im Text; wird bei WRITE autom. ausgefuehrt) L loeschen des Textpuffers P Print (Text drucken) F Finde Suchstring UNDO Verlassen des ENTER-Modus bzw. Untermodus ************************************************************************** Drucken von Text: Nach Eingabe des Kommandos P kann auf dem Ziffernblock die erste zu druckende Seite eingegeben werden. Durch SHIFT + Zahlen kann die letzte zu druckende Seite eingegben werden und durch die Eingabe einer Zahl auf der Haupttastatur kann ein Offset fuer den linken Rand eingegben werden. UNDO bricht Druckvorgang ab ************************************************************************** Eingabe von Kopf- / Fusszeilen: (Control+Alternate F1-F10) Normale Eingabe von Buchstaben und Zahlen durch die Haupttastatur Cursorbewegung durch Cursurtasten und RETURN Loeschen durch DELETE und BACKSPACE Beenden durch ENTER Sonderfunktion auf numerischem Tastenfeld: Max. dreistellige Zahl als Platzhalter fuer Seitennumerierung. Die eingegebene Zahl wird dabei als Offset zur internen Seitennummer addiert. Beachte Unterschied von z.B. 1 und 001) Linke SHIFT-Taste + Zahl (0-3) gibt Anzahl der Kopfzeilen an Rechte SHIFT-Taste + Zahl (0-3) gibt Anzahl der Fusszeilen an -/+ erniedrigt bzw. erhoeht die Zeilennumer der aktuellen Zeile Linke SHIFT-Taste -/+ erniedrigt bzw. erhoeht die Zeilennumer der ersten Textzeile Rechte SHIFT-Taste -/+ erniedrigt bzw. erhoeht die Zeilennumer der ersten Textzeile . wechsel zwischen Insert und Replace Hinweis: Beim Abspeichern einer Datei filename.ext werden die Kopf- und Fusszeilen in der Datei filename.___ abgespeichert und spaeter wieder automatisch von dort eingelesen. ************************************************************************** Maus: linke Maustaste setzen des Cursors an entsprechender Stelle verschieben des Textfensters falls Cursor ganz oben oder unten rechte Maustaste Worttrennung langsame Verschiebung des Textfensters falls Cursor ganz oben oder unten ************************************************************************** Maengelanzeigen: Das Programm enthaelt im Augenblick keine dynamische Speicherverwaltung. Die fest angelegeten Felder fuer die Text- und Loeschspeicher reichen fuer ca. 100 Seiten Text und einige Seiten geloeschten Text. Laengere Texte sollten, wenn moeglich, auf mehrere Dateien aufgeteilt werden, da aufgrund der Direktformatierung der gesamte Text formatiert werden muss um ans Ende des Textes zu kommen (auch wenn nichts geaendert wurde) und das bei einem umfangreichen Text eben entsprechend lange daueret. Ein Ausdruck des Textes ist im Augenblick nur auf den 18-Nadel-Druckern NEC P2/P3, den 24-Nadel-Druckern P5/P6/P7/P2neu/P3neu und dem Apple LaserWriter (PostScript) moeglich. Da die Zeichensaetze 2 und 3 fuer die NEC-Drucker noch nicht erstellt sind, erfolgt die graphische Ausgabe auf der Grundlage der Zeichen- definition fuer den Bildschirm (FONT2.DAT, FONT3.DAT), allerdings mit der dadurch bedingten schlechten Qualitaet, d.h. wer die Zeichensaetze 2-4 benoetigt muss fuer den endgueltigen Ausdruck den Laserdrucker verwenden. Wer den benutzerspezifischen Zeichensatz 4 verwenden will muss die Zeichendefinitionen fuer den Bildschirm (font4.dat) erzeugen (font4.dat wird, sofern im selben Directory vorhanden, beim Start von ANITA automatisch eingelesen) und vor dem Ausdrucken die entsprechende PostScript-Beschreibung des Zeichensatzes in den Laserdrucker laden und dort unter dem Namen "Anita" eintragen. Achten Sie darauf, dass bei Verwendung des Laserdruckers die Parameter der V24-Schnittstelle richtig eingestellt sind. ************************************************************************** Nach Ausgabe von (Fehler-)Meldungen in der untersten Zeile ist die ENTER-Taste zu druecken. ************************************************************************** Nach ca. 10 min ohne Eingabe wird der Bildschirm dunkel. Beliebige Taste druecken oder Maus bewegen. ************************************************************************** . A<.. ASCHWAGERDO-A=SCHWAGERDOCA>0SCHWAGERPASAKfSCHWAGERPRG$AZSCHWAGERPRT-AWSCHWAGERRSC0Af=SCHWAGERRSD4A                               5 75 Schwager - Dokumentation 18.09.90 60 0 0 1 0 1 0 0 1 1 ---------------------------- - - - Schwager - - - - Texteditor fr ATARI ST - - - - Dokumentation V17.09.90 - - - ---------------------------- "Nichts zu schreiben ist besser als viel Mittelmiges." Einleitung Dieser Texteditor richtet sich an denjenigen Benutzer, der Text erstellen will; ob er solchen abschreibt, produziert, darin whlt oder buchstabenweise optimiert. Fr ihn gibt es alle unbedingt notwendigen Zusatzfunktionen. Der Editor richtet sich nicht an denjenigen, der mehr bentigt als formatierten ASCII-Text. Er ist geeignet zum Erstellen inhaltsorientierter Texte, nicht zur Produktion reprsentativer Druckwerke. Der Autor hofft, mit seiner hiermit verwirklichten Idee von Textverarbeitung die Vorstellungen vieler Benutzer getroffen zu haben und wnscht allen Gleichgesinnten ein fruchtbares Arbeiten mit Schwager unter steter Beachtung des angefhrten Motivs. Matthias Berger im August 1990 Zur Urheberschaft Der Autor gibt Schwager einen Public-Domain-Status. Der Texteditor darf frei und kostenlos kopiert werden. Der Autor freut sich ber eventuelle Zuwendungen, aber vor allem auch ber Angabe von Fehlern und Verbesserungsvorschlgen seitens der Benutzer, sofern diese dazu beitragen, das Profil Schwagers noch besser auszuprgen. Addresse des Autors : Matthias Berger Im Wismat 31 8000 Mnchen 60 Zur Dokumentation Es wurde eine umfangreiche Hilfsfunktion mit allen wichtigen Angaben erstellt, die auf der HELP-Taste erreichbar ist und anhand derer der Benutzer seine Arbeitsweise mit Schwager selbstndig erarbeiten soll. Diese Dokumentation soll nur den Weg in die Philosophie der Bentzung Schwagers weisen, seine Fhigkeiten kurz fr den Einsteiger umreien. Programmumgebung Der Editor besteht aus den Dateien SCHWAGER. PRG, SCHWAGER. RSC und SCHWAGER. PRT. Alle Dateien mssen im gleichen Ordner eines beliebigen Datentrgers gespeichert sein. Der Editor darf unter TOS-Versionen unter 1. 4 nicht aus dem AUTO-Ordner heraus gestartet werden. Der Editor luft nur in der hchsten Auflosung. Eine AMC-GDOS-taugliche Version ist beim Autor anzufordern. Aus Geschwindigkeitsgrnden ist es anzuraten, Quick-ST im AUTO-Ordner installiert zu haben. Quick-ST (Public-Domain) ist erhltlich beim Autor oder in der ST-Computer-Sammlung. Es kann zur Speicherung der Texte beliebiger Dateiname verwendet werden. Zustzlich zum unter angegebenem Dateinamen abgespeicherten reinen ASCII-Text wird unter einem in der Extension leicht genderten Dateinamen eine Datei mit allen Zeilenattributen und Zusatzangaben angelegt. Daher Dateinamen mit Extension, deren letzter Buchstabe ein '-' ist, vermeiden. Zeilenorientierung Der Editor ist streng auf Zeilenorientierung programmiert, d. h. es wird zeilenweise geladen, gespeichert, gelscht, attributiert (Fett, Kursiv, Klein und Unterstrichen). Block ber f3/F3 kann ein Block definiert werden, auf den alle Funktionen des Titels Block in der Menleiste angewendet werden knnen. Dieser Block und seine Position ist im Gegensatz zu den Zeilenattributen nicht gespeicherter Bestandteil des Textes. Alle Zeilen des Blockes werden, sofern er definiert ist, hell dargestellt, nicht aber derart gedruckt. Der Block wird gelscht, indem eine logisch unmgliche Kombination von Blockanfang (f3) und Blockende (F3) angegeben wird, etwa Blockende eine Zeile vor Blockanfang angegeben wird. Randorientierung Die in der Zeile unter der Menleiste durch das Zeichen "|" angegebenen Rnder geben fr den Flietext, den Zeilenrcksprung und alle Formatierungen die Grenzen vor. Die Rnder knnen beliebig gesetzt werden, auch ber die Cursorposition 80, also den rechten Bildschirmrand hinaus, sofern die Cursorpoistion 90 nicht berschritten wird. Die Rnder sind gespeicherter Bestandteil eines Textes. Druckformat Es kann ber F8 ein Formular aufgerufen werden, das es ermglicht, die Maske der Druckausgabe anzugeben. Es knnen Kopf- und Fuzeilen, Seitenlnge und Spaltenzahl sowie Seitennummerierung angegeben werden. Fr die Position der Seitennummer gilt folgender Kode: 1. Buchstabe: "L": links; "R": rechts; "M": mitte; "B" wie bei Bchern abwechselnd links und rechts; 2. Buchstabe: "U": unten; "O": oben. Damit die Seitennummer gedruckt werden kann, mu Kopf- bzw. Fuzeile gesetzt werden. Die Maske ist gespeicherter Bestandteil des Textes, wird aber vollkommen unabhngig vom Flietext verwaltet; ein Umbruch des Textes entsprechend dieser Maske erfolgt erst beim Ausdruck. Die Bedienung Der Autor hat darauf geachtet, eine durchgehende, ansprechende und streng zweckmige Bedienerfhrung zu implementieren, die sich auf das unbedingt Bentigte beschrnkt. Die Funktionen des Editors wurden dergestalt auf Menleiste, Tastatur, Funktionstasten und Maus verteilt, wie es sich in lngerer Arbeit mit Textverarbeitungen fr den Autor als wnschenswert ergeben hat. Die Alertboxen Alle Alertboxen, auch die der Helpfunktion, haben gemeinsam eine Schliebox links oben (liches Zeichen). Dies ist Standardausgang, sofern kein weiterer Button, etwa JA oder ABBRUCH vorhanden sind. Diese Schliebox hat bei allen Boxen eine verNEINende, nicht aber abbrechende Funktion: Durch diese Schliebox wird keine Funktion abgebrochen (dafr existiert im Wahlfalle ABBRUCH), es wird aber auch nicht zugestimmt (dafr exisitert im Wahlfalle der Standardbutton JA). Bei f10-Text lschen etwa wird ein Lschen des Textes durch diese Schliebox verNEINt. Ansonsten entspricht die Bedienung dieser Alertboxen, auch die Editierung im Wahlfalle, blichen GEM-Vorgaben. Die Menleiste ber die Menleiste sind alle solche Funktionen erreichbar, die wegen ihrer Mchtigkeit nicht oft oder zumindest sehr bedacht verwendet werden, so da sich ihr umstndlicher Platz in der Menleiste als Schutzfunktion bewhrt. Dazu zhlen alle Lsch- und Dateioperationen. Die meisten dieser Funktionen aber sind fr den gebten Benutzer auch auf den Funktionstasten erreichbar, dies wird direkt in der Menleiste angegeben. Die nur bei exisitierendem Block sinnreichen Funktionen des Titels Block werden entsprechend freigegeben. Die Funktionstasten ber die Funktionstasten sind alle solche Funktionen erreichbar, deren Mchtigkeit den unbequemen Griff zur Funktionstaste rechtfertigt. Dies sind etwa Funktionen, die umfangreiche Arbeit des Editors starten, wie Formatierfunktionen oder Druckfunktion, aber auch die f3/F3-Kombination zur Blockdefinition. Die Maus ber die Maus sind einige wichtige Textbltterfunktionen erreichbar, so da es mglich ist, betrachtend-distantiert und bequem zurckgelehnt die vollbrachte Arbeit mit einigen Mausklicks in voller Breite und Lnge betrachten zu knnen. Die Tastatur ber die Tastatur sind alle weiteren, oft frequentierten Funktionen zu erreichen, wie die Zeilenlsch/einfge und Textbltterfunktionen. Die Funktion der Backspace/Delete/Insert-Tasten mit ihren CONTROL-Pedants richtet sich nach der Zeilenorientierung des Texteditors, d. h., meistens wirken die Funktionen nicht ber Zeilengrenzen hinaus. Die UNDO-Funktion ber die UNDO-Taste knnen jederzeit gelschte Zeilen wiedergeholt werden. Dabei bleibt jede gelscht Zeile solange im Schattenspeicher, bis durch weitere Texteingabe, durch Einfgen von Text von Datentrger oder Blockformatierung weiterer Zeilenbedarf auftritt (der Schattenspeicher dient als Speicherreserve, so da unbenutzter Speicher recycelt werden kann). Wurden grere Abschnitte gelscht, etwa bei Text oder Block lschen, so sind die Zeilen in umgekehrter Abfolge im Shattenspeicher. Abhile: Alle Zeilen durch wiederholtes UNDO-Drcken aus dem Speicher holen, erneut lschen, erneut aus dem Schattenspeicher holen. Die Texteingabe Text kann als Flietext eingegeben werden, wobei stets ein Einfgemodus aktiv ist. Es werden automatisch alle bentigten Zeilen an den Text angefgt. Innerhalb des Textes allerdings werden keine Zeilen eingefgt. Die ber F7-ASCII einfgen eingefgten Zeichen werden vollkommen wie auf normalen Wege eingegebene Zeichen behandelt. Die Textformatierung ber Blockfunktionen knnen alle wichtigen Textformatierungsarten erreicht werden. Die aktuellen Rnder finden Verwendung. Vor dem zweispaltigen Ausdruck ist es ratsam, die Zeilenbreite auf max. 40 Zeichen zu beschrnken und den Text zu formatieren. Druckeranpassung Der fr Schwager am Besten geeignete Drucker ist derjenige, der ber Zeichensatz 2 der IBM-kompatiblen Drucker verfgt. Dieser Zeichensatz entspricht bis auf hebrische Zeichen des ATARIs und die Grafikzeichen des Druckers dem ASCII-Zeichensatz - vor allem knnen ber die F7-ASCII einfgen- Funktion mathematische Sonderzeichen und fremdsprachige Umlaute verwendet werden. ber die ASCII-Datei SCHWAGER.PRT kann Schwager dennoch auf jeden beliebigen Drucker angepasst werden. SCHWAGER.PRT ist zeilenweise geordnet, das Format jeder Zeile lautet: XXX.xxx.xxx.xxx.xxx.xxx.... XXX: Der dreistellige ASCII-Code eines Zeichens, das beim Drucker auf einem anderen Code zu finden ist. xxx: ASCII-Code, der anstatt XXX an den Drucker zu sendenden Code angibt. Hier knnen beliebig viele Zeichen angegeben werden, so da bei ESC/P-kompatiblen Druckern etwa der landesspezifische Zeichensatz fr dieses Zeichen gendert werden kann. Fr die Angabe der ASCII-Codes zum Einschalten der Textattribute, wie Fett etc., gelten besondere XXX-Codes ab 256. 158.225.300 { } 256.027.071.300 { Fett ein } 257.027.072.300 { Fett aus } 258.027.045.049.300 { Unterstreichen ein } 259.027.033.000.300 { Unterstreichen aus } 260.fk027.083.001.300 { Klein an } 261.027.084.300 { Klein aus } 262.300 { Kursiv an } 263.300 { Kursiv aus } Programmhistorie Der Editor wurde erstellt vom 2.8 bis 10.8.1990. Die letzte Verbesserung fand am 17.9.1990 statt. Die Dokumentation wurde erstellt am 17.8.1990. Die Dokumentation wurde am 18.9.1990 aktualisiert. mkb90 PROGRAM Schwager_Text; { "Schwager"-Textverarbeitung , mkb 90 } { Version Schwager 1.2 } { 2.8. - 10.8.90 / 17.8 / 21.8 } { 8.9. / 17.9. } VAR memlow : BOOLEAN; { Modul 1 : Textspeicherung } { Definitionen } CONST max_nbr_of_decades = 5000; max_colls = 90; TYPE SYS_STRING = STRING[max_colls]; pointer_to_line = ^definition_of_line; definition_of_line = RECORD next : pointer_to_line; content : SYS_STRING; status : CHAR; nbr : INTEGER; END; VAR linepointer_end, shadow_lines : pointer_to_line; no_content : SYS_STRING; decade : ARRAY [0..max_nbr_of_decades] OF pointer_to_line; PROCEDURE init_module_1; VAR i : INTEGER; BEGIN NEW(linepointer_end); linepointer_end^.content:=''; linepointer_end^.next:=linepointer_end; linepointer_end^.nbr:=0; linepointer_end^.status:='.'; decade[0]:=linepointer_end; shadow_lines:=linepointer_end; no_content:=''; FOR i:=1 TO max_colls DO no_content:=no_content+' '; END; { Programmteil "shadow_lines"-Verwaltung } PROCEDURE init_shadow_lines; BEGIN shadow_lines:=linepointer_end; END; PROCEDURE line_to_shadow(line : pointer_to_line); BEGIN IF shadow_lines<>linepointer_end THEN BEGIN line^.next:=shadow_lines; shadow_lines:=line; END ELSE BEGIN shadow_lines:=line; line^.next:=linepointer_end; END; END; FUNCTION line_from_shadow : pointer_to_line; BEGIN line_from_shadow:=shadow_lines; shadow_lines:=shadow_lines^.next; END; PROCEDURE new_line (VAR line :pointer_to_line); BEGIN line:=line_from_shadow; IF line=linepointer_end THEN BEGIN NEW(line); IF memavail<1024 THEN memlow:=TRUE; END; END; { Programmteil Zeilenverwaltung - SCHNITTSTELLENPROZEDUREN } PROCEDURE search_line (nbr : INTEGER;VAR actual : pointer_to_line); VAR found : BOOLEAN; BEGIN found:=FALSE; actual:=decade[nbr DIV 10]; WHILE (actual<>linepointer_end) AND (found=FALSE) DO BEGIN IF actual^.nbr=nbr THEN found:=TRUE ELSE actual:=actual^.next; END; END; PROCEDURE search_line_incl_nearest (nbr : INTEGER;VAR previous,actual,next : pointer_to_line); VAR found : BOOLEAN; BEGIN found:=FALSE; actual:=decade[(nbr-1) DIV 10]; previous:=linepointer_end; WHILE (actual<>linepointer_end) AND (found=FALSE) DO BEGIN IF actual^.nbr=nbr THEN found:=TRUE ELSE BEGIN previous :=actual; actual :=actual^.next; END; END; IF actual<>linepointer_end THEN next:=actual^.next ELSE next:=linepointer_end; END; PROCEDURE actual_line_numbers(nbr : INTEGER;from : pointer_to_line); BEGIN WHILE from <> linepointer_end DO BEGIN from^.nbr:=nbr; IF (nbr MOD 10 = 0) OR (nbr=1) THEN decade[nbr DIV 10]:=from; from:=from^.next; nbr:=nbr+1; END; END; PROCEDURE insert_line (nbr : INTEGER;command_line : SYS_STRING; status : CHAR); VAR previous,actual,next,linepointer : pointer_to_line; BEGIN search_line_incl_nearest(nbr,previous,actual,next); new_line(linepointer); IF previous<>linepointer_end THEN previous^.next:=linepointer ELSE decade[0]:=linepointer; linepointer^.content :=no_content; linepointer^.content :=command_line; linepointer^.status :=status; linepointer^.nbr :=nbr; linepointer^.next :=actual; actual_line_numbers(nbr,linepointer); END; PROCEDURE delete_line (nbr:INTEGER); VAR previous,actual,next : pointer_to_line; BEGIN search_line_incl_nearest(nbr,previous,actual,next); IF actual<>linepointer_end THEN BEGIN line_to_shadow(actual); IF previous<>linepointer_end THEN previous^.next:=next ELSE decade[0]:=next; actual_line_numbers(nbr,next); END; END; { Modul 2 : ASCII-Dateiumgebung } { Vorwrtsdefinition zu Modul 4 : Textdarstellung } TYPE text_machine_type = RECORD lines, akt_line, top_of_screen_line, screen_lines, top_of_block, bottom_of_block, left_margin,right_margin, left_screen, akt_pos : INTEGER; top_of_screen, status_bar_pos, nbrs_pos : INTEGER; koor_clr_all, cursarr : ARRAY[0..4] OF INTEGER; curs_on : BOOLEAN; block_exists : BOOLEAN; linepointer : pointer_to_line; headline, footline : SYS_STRING; side_length : INTEGER; side_nbrs, nbrs_head,nbrs_foot, nbrs_left,nbrs_right,nbrs_mid, nbrs_book : BOOLEAN; first_side_nbr: INTEGER; colls : INTEGER; END; VAR text_machine : text_machine_type; { Programmteil Grundprozeduren } PROCEDURE assign_ascii(VAR e1 : INTEGER;VAR name : SYS_STRING; modus : INTEGER); CODEFILE('c:\pas\div\assign_ascii.cod'); PROCEDURE writeln_ascii(e1 : INTEGER;VAR inhalt : SYS_STRING); CODEFILE('c:\pas\div\writeln_ascii.cod'); PROCEDURE readln_ascii(e1 : INTEGER;VAR inhalt : SYS_STRING; VAR ioresult : INTEGER); CODEFILE('c:\pas\div\readln_ascii.cod'); PROCEDURE close_ascii (e1: INTEGER); CODEFILE('c:\pas\div\close_ascii.cod'); { Programmteil SCHNITTSTELLENPROZEDUREN } PROCEDURE write_in_box (title,text : SYS_STRING); FORWARD; VAR ADDR_Meldung,GEM_HandleA : INTEGER; FUNCTION write_in_jabox (title,text : SYS_STRING) : INTEGER; FORWARD; PROCEDURE make_box (title,text : SYS_STRING); FORWARD; CONST Jaexit = 5; (* TEXT in Baum JABOX *) PROCEDURE load_file (name : SYS_STRING; nbr : INTEGER); VAR iofile,i,nbr_old,e1,e2,e3,e4,e5,read : INTEGER; str1 : SYS_STRING; linepointer,last,next : pointer_to_line; exited : BOOLEAN; BEGIN nbr_old:=nbr; assign_ascii(iofile,name,0); IF iofile<0 THEN write_in_box('Einfgen','Datei nicht existent.') ELSE BEGIN e1:=form_center(ADDR_Meldung,e2,e3,e4,e5); search_line(nbr-1,last); search_line(nbr,next); exited:=FALSE; read:=0; REPEAT readln_ascii(iofile,str1,i); IF i>=0 THEN BEGIN read:=read+1; text_machine.lines:=text_machine.lines+1; new_line(linepointer); IF last<>linepointer_end THEN last^.next:=linepointer ELSE decade[0]:=linepointer; last:=linepointer; linepointer^.content:=str1; linepointer^.status:=CHR(0); linepointer^.nbr:=1; linepointer^.next:=next; STR(nbr:4,str1); V_GTEXT(GEM_HandleA,e2+98,e3+45,str1); nbr:=nbr+1; IF crawio(CHR($ff))<>0 THEN BEGIN e1:=GRAF_MOUSE(0,0); IF write_in_jabox('Einfgen unterbrochen','Weitermachen')<>jaexit THEN i:=-1 ELSE BEGIN make_box('Einfgen','Lese Z. '); STR(linepointer^.nbr:4,str1); V_GTEXT(GEM_HandleA,e2+98,e3+45,str1); END; e1:=GRAF_MOUSE(2,0); SHOWMOUSE(0); END; END; UNTIL (i<0) OR (memlow); IF memlow THEN BEGIN e1:=GRAF_MOUSE(0,0); write_in_box('Einfgen','Funktion abgebrochen.'); exited:=TRUE; END; linepointer:=decade[0]; actual_line_numbers(1,linepointer); close_ascii(iofile); str1:=COPY(name,1,LENGTH(name)-1)+'-'; IF str1<>name THEN BEGIN assign_ascii(iofile,str1,0); IF iofile>=0 THEN BEGIN search_line(nbr_old,linepointer); FOR e1:=1 TO read DO BEGIN readln_ascii(iofile,str1,i); linepointer^.status:=str1[1]; linepointer:=linepointer^.next; END; readln_ascii(iofile,str1,e1); IF (NOT exited) AND (e1>0) THEN BEGIN VAL(str1,text_machine.left_margin,e1); readln_ascii(iofile,str1,e1); VAL(str1,text_machine.right_margin,e1); readln_ascii(iofile,text_machine.headline,e1); readln_ascii(iofile,text_machine.footline,e1); readln_ascii(iofile,str1,e1); VAL(str1,text_machine.side_length,e1); readln_ascii(iofile,str1,e1); text_machine.side_nbrs:=str1='1'; readln_ascii(iofile,str1,e1); text_machine.nbrs_head:=str1='1'; readln_ascii(iofile,str1,e1); text_machine.nbrs_foot:=str1='1'; readln_ascii(iofile,str1,e1); text_machine.nbrs_left:=str1='1'; readln_ascii(iofile,str1,e1); text_machine.nbrs_right:=str1='1'; readln_ascii(iofile,str1,e1); text_machine.nbrs_mid:=str1='1'; readln_ascii(iofile,str1,e1); text_machine.nbrs_book:=str1='1'; readln_ascii(iofile,str1,e1); VAL(str1,text_machine.first_side_nbr,e1); readln_ascii(iofile,str1,e1); IF str1='2' THEN text_machine.colls:=2 ELSE text_machine.colls:=1; END; close_ascii(iofile); END; END; END; END; PROCEDURE save_file (name : SYS_STRING; nbr1,nbr2 : INTEGER); VAR iofile,i,e1,e2,e3,e4,e5 : INTEGER; linepointer : pointer_to_line; str1 : SYS_STRING; BEGIN str1:=COPY(name,1,LENGTH(name)-3)+'BAK'; assign_ascii(iofile,str1,0); IF iofile>0 THEN BEGIN close_ascii(iofile); i:=FDELETE(str1); i:=FDELETE(COPY(str1,1,LENGTH(str1)-1)+'-'); END; assign_ascii(iofile,name,0); IF iofile>0 THEN BEGIN close_ascii(iofile); i:=FRENAME(0,name,str1); i:=FRENAME(0,COPY(name,1,LENGTH(name)-1)+'-', COPY(str1,1,LENGTH(str1)-1)+'-'); END; assign_ascii(iofile,name,1); IF iofile<0 THEN write_in_box('Speichern','Datei nicht erzeugbar.') ELSE BEGIN e1:=form_center(ADDR_Meldung,e2,e3,e4,e5); search_line(nbr1,linepointer); WHILE (linepointer^.nbr<=nbr2) AND (linepointer<>linepointer_end) DO BEGIN str1:=linepointer^.content; writeln_ascii(iofile,str1); STR(linepointer^.nbr:4,str1); V_GTEXT(GEM_HandleA,e2+122,e3+45,str1); linepointer:=linepointer^.next; END; close_ascii(iofile); str1:=COPY(name,1,LENGTH(name)-1)+'-'; IF str1<>name THEN BEGIN assign_ascii(iofile,str1,1); IF iofile>=0 THEN BEGIN search_line(nbr1,linepointer); WHILE (linepointer^.nbr<=nbr2) AND (linepointer<>linepointer_end) DO BEGIN str1:=no_content; str1:=linepointer^.status; writeln_ascii(iofile,str1); linepointer:=linepointer^.next; END; STR(text_machine.left_margin,str1); writeln_ascii(iofile,str1); STR(text_machine.right_margin,str1); writeln_ascii(iofile,str1); writeln_ascii(iofile,text_machine.headline); writeln_ascii(iofile,text_machine.footline); STR(text_machine.side_length,str1); writeln_ascii(iofile,str1); IF text_machine.side_nbrs THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); IF text_machine.nbrs_head THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); IF text_machine.nbrs_foot THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); IF text_machine.nbrs_left THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); IF text_machine.nbrs_right THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); IF text_machine.nbrs_mid THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); IF text_machine.nbrs_book THEN str1:='1' ELSE str1:='0'; writeln_ascii(iofile,str1); STR(text_machine.first_side_nbr,str1); writeln_ascii(iofile,str1); STR(text_machine.colls,str1); writeln_ascii(iofile,str1); END; close_ascii(iofile); END; END; END; { Modul 3 : VDI-Terminal } (* Resource-Set indicies fuer Schwager *) CONST Menu = 0; (* Menuebaum *) Desk = 3; (* TITLE in Baum MENU *) Datei = 4; (* TITLE in Baum MENU *) Text = 5; (* TITLE in Baum MENU *) Info = 9; (* STRING in Baum MENU *) Laden = 18; (* STRING in Baum MENU *) Sichern = 19; (* STRING in Baum MENU *) Ende = 21; (* STRING in Baum MENU *) Fett = 24; (* STRING in Baum MENU *) Kursiv = 25; (* STRING in Baum MENU *) Unterstr = 26; (* STRING in Baum MENU *) Klein = 27; (* STRING in Baum MENU *) Norm = 28; (* STRING in Baum MENU *) Asceinfg = 30; (* STRING in Baum MENU *) Suchen = 32; (* STRING in Baum MENU *) Kopf = 34; (* STRING in Baum MENU *) Drucken = 35; (* STRING in Baum MENU *) Lsch = 37; (* STRING in Baum MENU *) Blocks = 40; (* STRING in Baum MENU *) Flatters = 41; (* STRING in Baum MENU *) Zentr = 42; (* STRING in Baum MENU *) Blkvers = 44; (* STRING in Baum MENU *) Blkkop = 45; (* STRING in Baum MENU *) Blksich = 47; (* STRING in Baum MENU *) Blkdrck = 49; (* STRING in Baum MENU *) Blkclr = 51; (* STRING in Baum MENU *) Infobox = 1; (* Formular/Dialog *) Infexit = 3; (* BOXCHAR in Baum INFOBOX *) Suchboxf = 2; (* Formular/Dialog *) Suchtxte = 3; (* FTEXT in Baum SUCHBOXF *) Erstxt = 4; (* FTEXT in Baum SUCHBOXF *) Suchexit = 7; (* BOXCHAR in Baum SUCHBOXF *) Suche = 8; (* TEXT in Baum SUCHBOXF *) Ers = 9; (* TEXT in Baum SUCHBOXF *) Asceinf = 3; (* Formular/Dialog *) Ascexit = 3; (* BOXCHAR in Baum ASCEINF *) Ascein = 6; (* FTEXT in Baum ASCEINF *) Helpbox = 4; (* Formular/Dialog *) Helpexit = 3; (* BOXCHAR in Baum HELPBOX *) Ftast = 8; (* TEXT in Baum HELPBOX *) Editier = 9; (* TEXT in Baum HELPBOX *) Blockf = 10; (* TEXT in Baum HELPBOX *) Mausf = 11; (* TEXT in Baum HELPBOX *) Speich = 12; (* TEXT in Baum HELPBOX *) Ftastbox = 5; (* Formular/Dialog *) Ftastex = 27; (* BOXCHAR in Baum FTASTBOX *) Editfbox = 6; (* Formular/Dialog *) Editexit = 11; (* BOXCHAR in Baum EDITFBOX *) Blockbox = 7; (* Formular/Dialog *) Blockex = 8; (* BOXCHAR in Baum BLOCKBOX *) Mausfbox = 8; (* Formular/Dialog *) Mausexit = 9; (* BOXCHAR in Baum MAUSFBOX *) Meldung = 9; (* Formular/Dialog *) Boxexit = 2; (* BOXCHAR in Baum MELDUNG *) Jabox = 10; (* Formular/Dialog *) Jaboxex = 2; (* BOXCHAR in Baum JABOX *) Jaabrbox = 11; (* Formular/Dialog *) Jaabrex = 2; (* BOXCHAR in Baum JAABRBOX *) Abbrexit = 5; (* TEXT in Baum JAABRBOX *) Abjaexit = 6; (* TEXT in Baum JAABRBOX *) Speichbx = 12; (* Formular/Dialog *) Speichex = 8; (* BOXCHAR in Baum SPEICHBX *) Zeilbox = 13; (* Formular/Dialog *) Zexit = 5; (* BOXCHAR in Baum ZEILBOX *) Zuebern = 7; (* TEXT in Baum ZEILBOX *) Zabbr = 10; (* TEXT in Baum ZEILBOX *) Kopfz = 11; (* FTEXT in Baum ZEILBOX *) Fussz = 12; (* FTEXT in Baum ZEILBOX *) Zeilenz = 14; (* FTEXT in Baum ZEILBOX *) Zspa = 15; (* FTEXT in Baum ZEILBOX *) Znumab = 16; (* FTEXT in Baum ZEILBOX *) Zort = 17; (* FTEXT in Baum ZEILBOX *) txt_height = 9; txt_height_small = 7; VAR GEM_Work : ARRAY [0..56] OF INTEGER; GEM_HandleB, ADDR_Menu, ADDR_Infobox, ADDR_Suchboxf, ADDR_Helpbox, ADDR_Asceinf, ADDR_Ftastbox, ADDR_Editfbox, ADDR_Blockbox, ADDR_Mausfbox, ADDR_Jabox, ADDR_Jaabrbox, ADDR_Speichbx, ADDR_Zeilbox : INTEGER; FUNCTION init_terminal : BOOLEAN; VAR e1,e2,e3,e4,e5 : INTEGER; erg : BOOLEAN; BEGIN e1:=CURSCONF(0,0); e1:=CURSCONF(3,0); FOR e1:=0 TO 9 DO GEM_Work[e1]:=1; GEM_Work[10]:=2; GEM_HandleA:=GRAF_HANDLE(e1,e2,e3,e4); V_OPNVWK(GEM_Work,GEM_HandleA,Gem_Work); e1:=VSF_INTERIOR(GEM_HandleA,0); e1:=VSF_STYLE(GEM_HandleA,15); FOR e1:=0 TO 9 DO GEM_Work[e1]:=1; GEM_Work[10]:=2; GEM_HandleB:=GRAF_HANDLE(e1,e2,e3,e4); V_OPNVWK(GEM_Work,GEM_HandleB,Gem_Work); e1:=VSF_INTERIOR(GEM_HandleB,0); e1:=VSF_STYLE(GEM_HandleB,15); e1:=VST_POINT(GEM_HandleB,txt_height,e1,e2,e3,e4); e1:=APPL_INIT; e1:=RSRC_LOAD('Schwager.rsc'); IF e1=0 THEN BEGIN e1:=FORM_ALERT(1,'[1][|Resourcefile nicht ladbar.][OK]'); e1:=CURSCONF(1,0); erg:=FALSE; END ELSE erg:=TRUE; IF erg THEN BEGIN e1:=RSRC_GADDR(0,Menu,ADDR_Menu); e1:=RSRC_GADDR(0,Infobox,ADDR_Infobox); e1:=RSRC_GADDR(0,Suchboxf,ADDR_suchboxf); e1:=RSRC_GADDR(0,Helpbox,ADDR_Helpbox); e1:=RSRC_GADDR(0,Asceinf,ADDR_Asceinf); e1:=RSRC_GADDR(0,Ftastbox,ADDR_Ftastbox); e1:=RSRC_GADDR(0,Editfbox,ADDR_Editfbox); e1:=RSRC_GADDR(0,Blockbox,ADDR_Blockbox); e1:=RSRC_GADDR(0,Mausfbox,ADDR_Mausfbox); e1:=RSRC_GADDR(0,Mausfbox,ADDR_Mausfbox); e1:=RSRC_GADDR(0,Meldung,ADDR_Meldung); e1:=RSRC_GADDR(0,Jabox,ADDR_Jabox); e1:=RSRC_GADDR(0,Jaabrbox,ADDR_Jaabrbox); e1:=RSRC_GADDR(0,Speichbx,ADDR_Speichbx); e1:=RSRC_GADDR(0,Zeilbox,ADDR_Zeilbox); e1:=MENU_BAR(ADDR_Menu,1); END; e1:=GRAF_MOUSE(0,0); init_terminal:=erg; END; PROCEDURE exit_terminal; VAR e1 : INTEGER; BEGIN HIDEMOUSE; e1:=GRAF_MOUSE(0,0); e1:=RSRC_FREE; V_CLSVWK(GEM_HandleA); V_CLSVWK(GEM_HandleB); e1:=APPL_EXIT; e1:=CURSCONF(1,0); END; PROCEDURE hide_cursor; FORWARD; PROCEDURE show_side; FORWARD; FUNCTION show_box(ADDR,exit : INTEGER) : INTEGER; VAR e1,e2,e3,e4,e5,e6 : INTEGER; BEGIN hide_cursor; e1:=form_center(ADDR,e2,e3,e4,e5); e1:=form_dial(0,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(1,0,0,0,0,e2,e3,e4,e5); e1:=objc_draw(ADDR,0,10,e2-5,e3-5,e4+10,e5+10); showmouse(0); e6:=form_do(ADDR,0); IF e6=exit THEN e1:=objc_change(ADDR,e6,0,e2,e3,e4,e5,0,1) ELSE e1:=objc_change(ADDR,e6,0,e2,e3,e4,e5,32,1); hidemouse; e1:=form_dial(2,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(3,0,0,0,0,e2,e3,e4,e5); GEM_Work[0]:=e2-2;GEM_Work[1]:=e3-2;GEM_Work[2]:=e2+e4+2; GEM_Work[3]:=e3+e5+2; VR_RECFL(GEM_HandleA,GEM_Work); show_side; show_box:=e6; END; PROCEDURE write_in_box; VAR e1,e2,e3,e4,e5,e6 : INTEGER; underline : SYS_STRING; BEGIN hide_cursor; e1:=form_center(ADDR_meldung,e2,e3,e4,e5); e1:=form_dial(0,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(1,0,0,0,0,e2,e3,e4,e5); e1:=objc_draw(ADDR_meldung,0,10,e2-5,e3-5,e4+10,e5+10); V_GTEXT(GEM_HandleA,e2+(30-LENGTH(title))*4,e3+13,title); V_GTEXT(GEM_HandleA,e2+33,e3+45,text); underline:=''; FOR e1:=1 TO LENGTH(text) DO underline:=underline+'-'; V_GTEXT(GEM_HandleA,e2+33,e3+61,underline); showmouse(0); e6:=form_do(ADDR_meldung,0); IF e6=boxexit THEN e1:=objc_change(ADDR_meldung,e6,0,e2,e3,e4,e5,0,1) ELSE e1:=objc_change(ADDR_meldung,e6,0,e2,e3,e4,e5,32,1); hidemouse; e1:=form_dial(2,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(3,0,0,0,0,e2,e3,e4,e5); GEM_Work[0]:=e2-2;GEM_Work[1]:=e3-2;GEM_Work[2]:=e2+e4+2; GEM_Work[3]:=e3+e5+2; VR_RECFL(GEM_HandleA,GEM_Work); show_side; END; FUNCTION write_in_jabox; VAR e1,e2,e3,e4,e5,e6 : INTEGER; underline : SYS_STRING; BEGIN hide_cursor; e1:=form_center(addr_jabox,e2,e3,e4,e5); e1:=form_dial(0,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(1,0,0,0,0,e2,e3,e4,e5); e1:=objc_draw(addr_jabox,0,10,e2-5,e3-5,e4+10,e5+10); V_GTEXT(GEM_HandleA,e2+(30-LENGTH(title))*4,e3+13,title); V_GTEXT(GEM_HandleA,e2+33,e3+45,text); underline:=''; FOR e1:=1 TO LENGTH(text) DO underline:=underline+'-'; V_GTEXT(GEM_HandleA,e2+33,e3+61,underline); showmouse(0); e6:=form_do(addr_jabox,0); IF e6=jaboxex THEN e1:=objc_change(ADDR_jabox,e6,0,e2,e3,e4,e5,0,1) ELSE e1:=objc_change(ADDR_jabox,e6,0,e2,e3,e4,e5,32,1); hidemouse; e1:=form_dial(2,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(3,0,0,0,0,e2,e3,e4,e5); GEM_Work[0]:=e2-2;GEM_Work[1]:=e3-2;GEM_Work[2]:=e2+e4+2; GEM_Work[3]:=e3+e5+2; VR_RECFL(GEM_HandleA,GEM_Work); show_side; write_in_jabox:=e6; END; FUNCTION write_in_jaabrbox (title,text : SYS_STRING) : INTEGER; VAR e1,e2,e3,e4,e5,e6 : INTEGER; underline : SYS_STRING; BEGIN hide_cursor; e1:=form_center(addr_jaabrbox,e2,e3,e4,e5); e1:=form_dial(0,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(1,0,0,0,0,e2,e3,e4,e5); e1:=objc_draw(addr_jaabrbox,0,10,e2-5,e3-5,e4+10,e5+10); V_GTEXT(GEM_HandleA,e2+(30-LENGTH(title))*4,e3+13,title); V_GTEXT(GEM_HandleA,e2+33,e3+45,text); underline:=''; FOR e1:=1 TO LENGTH(text) DO underline:=underline+'-'; V_GTEXT(GEM_HandleA,e2+33,e3+61,underline); showmouse(0); e6:=form_do(addr_jaabrbox,0); IF e6=jaabrex THEN e1:=objc_change(ADDR_jaabrbox,e6,0,e2,e3,e4,e5,0,1) ELSE e1:=objc_change(ADDR_jaabrbox,e6,0,e2,e3,e4,e5,32,1); hidemouse; e1:=form_dial(2,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(3,0,0,0,0,e2,e3,e4,e5); GEM_Work[0]:=e2-2;GEM_Work[1]:=e3-2;GEM_Work[2]:=e2+e4+2; GEM_Work[3]:=e3+e5+2; VR_RECFL(GEM_HandleA,GEM_Work); show_side; write_in_jaabrbox:=e6; END; PROCEDURE show_line_nbrs; FORWARD; PROCEDURE make_box; VAR e1,e2,e3,e4,e5,e6 : INTEGER; underline : SYS_STRING; BEGIN hide_cursor; show_line_nbrs; e1:=form_center(ADDR_meldung,e2,e3,e4,e5); e1:=form_dial(0,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(1,0,0,0,0,e2,e3,e4,e5); e1:=objc_draw(ADDR_meldung,0,10,e2-5,e3-5,e4+10,e5+10); V_GTEXT(GEM_HandleA,e2+(30-LENGTH(title))*4,e3+13,title); V_GTEXT(GEM_HandleA,e2+33,e3+45,text); underline:=''; FOR e1:=1 TO LENGTH(text) DO underline:=underline+'-'; V_GTEXT(GEM_HandleA,e2+33,e3+61,underline); showmouse(0); e1:=GRAF_MOUSE(2,0); END; PROCEDURE clear_box; VAR e1,e2,e3,e4,e5,e6 : INTEGER; BEGIN e1:=GRAF_MOUSE(0,0); hidemouse; e1:=form_center(ADDR_meldung,e2,e3,e4,e5); e1:=form_dial(2,0,0,0,0,e2,e3,e4,e5); e1:=form_dial(3,0,0,0,0,e2,e3,e4,e5); GEM_Work[0]:=e2-2;GEM_Work[1]:=e3-2;GEM_Work[2]:=e2+e4+2; GEM_Work[3]:=e3+e5+2; VR_RECFL(GEM_HandleA,GEM_Work); show_side; END; { Modul 4 : Textdarstellung } CONST step_step = 10; PROCEDURE do_lp; BEGIN search_line(text_machine.akt_line,text_machine.linepointer); END; PROCEDURE init_module_4; VAR e1 : INTEGER; BEGIN WITH text_machine DO BEGIN lines:=1; akt_line:=1; top_of_screen_line:=1; IF getrez<2 THEN BEGIN write_in_box('Fehler','Nur HIGHRES-Auflsung.'); HALT; END; screen_lines:=40; top_of_screen:=42; status_bar_pos:=32; nbrs_pos:=14; top_of_block:=0; bottom_of_block:=0; block_exists:=FALSE; left_margin:=5; akt_pos:=left_margin; right_margin:=75; left_screen:=1; curs_on:=FALSE; headline:=''; footline:=''; side_length:=65; side_nbrs:=FALSE; nbrs_head:=TRUE;nbrs_foot:=FALSE; nbrs_left:=FALSE;nbrs_right:=TRUE; nbrs_mid:=FALSE;nbrs_book:=FALSE; first_side_nbr:=1; colls:=1; do_lp; koor_clr_all[0]:=0;koor_clr_all[1]:=text_machine.status_bar_pos+1; koor_clr_all[2]:=639;koor_clr_all[3]:=399; VR_RECFL(GEM_HandleA,text_machine.koor_clr_all); END; END; { Programmteil Internals } PROCEDURE set_line_effects (linepointer : pointer_to_line;y : INTEGER); VAR eff,e1,e2,e3,e4 : INTEGER; BEGIN eff:=0; IF (linepointer^.nbr>=text_machine.top_of_block) AND (linepointer^.nbr<=text_machine.bottom_of_block) AND (text_machine.top_of_block<>0) AND (text_machine.bottom_of_block<>0) THEN eff:=2; IF ORD(linepointer^.status) AND 32<>0 THEN BEGIN V_GTEXT(GEM_HandleB,0,y,no_content); e1:=VST_POINT(GEM_HandleB,txt_height_small,e1,e2,e3,e4); eff:=eff+ORD(linepointer^.status)-32; END ELSE eff:=eff+ORD(linepointer^.status); IF eff>0 THEN e1:=VST_EFFECTS(GEM_HandleB,eff); END; PROCEDURE clear_line_effects(linepointer : pointer_to_line); VAR e1,e2,e3,e4 : INTEGER; BEGIN IF ORD(linepointer^.status) AND 32<>0 THEN e1:=VST_POINT(GEM_HandleB,txt_height,e1,e2,e3,e4); IF ((linepointer^.nbr>=text_machine.top_of_block) AND (linepointer^.nbr<=text_machine.bottom_of_block)) OR (ORD(linepointer^.status)<>0) THEN e1:=VST_EFFECTS(GEM_HandleB,0); END; { Programmteil INTERFACEPROZEDUREN } PROCEDURE show_line_nbrs; VAR str1,str2 : SYS_STRING; BEGIN str1:='Pos.: '; STR(text_machine.akt_pos,str2); str1:=str1+str2+' | Z.: '; STR(text_machine.akt_line,str2); str1:=str1+str2+'/'; STR(text_machine.lines,str2); str1:=str1+str2+' (S. '; STR((text_machine.akt_line-1) DIV (text_machine.side_length*text_machine.colls)+ text_machine.first_side_nbr,str2); str1:=str1+str2; IF text_machine.colls=2 THEN BEGIN IF (((text_machine.akt_line-1) DIV text_machine.side_length)+ text_machine.first_side_nbr) MOD 2<>0 THEN str1:=str1+', l.) ' ELSE str1:=str1+', r.) '; END ELSE str1:=str1+') '; IF (text_machine.akt_line-1) MOD (text_machine.side_length*text_machine.colls)=0 THEN WRITE(CHR(7)); V_GTEXT(GEM_HandleA,300,text_machine.nbrs_pos,str1); END; PROCEDURE show_cursor; VAR e1 : INTEGER; BEGIN e1:=VSWR_MODE(GEM_HandleB,3); WITH text_machine DO BEGIN IF curs_on THEN V_BAR(GEM_HandleB,cursarr); curs_on:=TRUE; cursarr[0]:=(akt_pos-left_screen)*8+1; cursarr[1]:=top_of_screen+(akt_line-top_of_screen_line)*txt_height-8+1; cursarr[2]:=(akt_pos-left_screen+1)*8-1; cursarr[3]:=top_of_screen+(akt_line-top_of_screen_line+1)*txt_height-8+1; V_BAR(GEM_HandleB,cursarr); END; e1:=VSWR_MODE(GEM_HandleB,0); END; PROCEDURE hide_cursor; VAR e1 : INTEGER; BEGIN e1:=VSWR_MODE(GEM_HandleB,3); WITH text_machine DO BEGIN IF curs_on THEN BEGIN curs_on:=FALSE; V_BAR(GEM_HandleB,cursarr); END; END; e1:=VSWR_MODE(GEM_HandleB,0); END; PROCEDURE show_status_bar; VAR i : INTEGER; str1 : SYS_STRING; BEGIN hide_cursor; str1:=''; FOR i:=text_machine.left_screen TO text_machine.left_screen+79 DO BEGIN IF (text_machine.left_margin=i) OR (text_machine.right_margin=i) THEN str1:=str1+'|' ELSE IF (i=1) THEN str1:=str1+'[' ELSE IF (i=max_colls) THEN str1:=str1+']' ELSE IF ilinepointer_end THEN BEGIN set_line_effects(linepointer,text_machine.top_of_screen+(i-1)* txt_height); IF text_machine.left_screen<=LENGTH(linepointer^.content) THEN str1:=COPY(linepointer^.content,text_machine.left_screen,80)+no_content ELSE str1:=no_content; str1:=COPY(str1,1,80); V_GTEXT(GEM_HandleB,0,text_machine.top_of_screen+(i-1)*txt_height, str1); clear_line_effects(linepointer); linepointer:=linepointer^.next; END ELSE V_GTEXT(GEM_HandleB,0,text_machine.top_of_screen+(i-1)*txt_height, no_content); END; show_cursor; END; PROCEDURE actual_screen_pos; BEGIN IF NOT((text_machine.akt_pos>=text_machine.left_screen) AND (text_machine.akt_pos<=text_machine.left_screen+79)) THEN BEGIN text_machine.left_screen:=text_machine.akt_pos-step_step; IF text_machine.left_screen<0 THEN text_machine.left_screen:=1; show_side; show_status_bar; END; END; PROCEDURE line_to_bottom; BEGIN IF text_machine.akt_line>=text_machine.lines THEN BEGIN insert_line(text_machine.akt_line+1,'',CHR(0)); text_machine.lines:=text_machine.lines+1; show_line_nbrs; END; text_machine.akt_line:=text_machine.akt_line+1; do_lp; IF text_machine.akt_line-text_machine.top_of_screen_line+1> text_machine.screen_lines THEN BEGIN text_machine.top_of_screen_line:= text_machine.top_of_screen_line+step_step; IF text_machine.top_of_screen_line>text_machine.lines THEN text_machine.top_of_screen_line:=text_machine.lines; show_side; END; END; PROCEDURE line_to_top; BEGIN IF text_machine.akt_line>1 THEN BEGIN text_machine.akt_line:=text_machine.akt_line-1; do_lp; IF text_machine.akt_line1 THEN BEGIN text_machine.akt_pos:=text_machine.akt_pos-1; IF text_machine.akt_postext_machine.left_screen+79 THEN BEGIN text_machine.left_screen:= text_machine.left_screen+step_step; IF text_machine.left_screen>max_colls THEN text_machine.left_screen:=max_colls; show_side; show_status_bar; END; END; END; { Modul 5 : Texteditierung } VAR separators : SET OF CHAR; PROCEDURE init_module_5; BEGIN separators:=[CHR(32),'.',',',';',':','!','?']; END; { Programmteil INTERFACEPROZEDUREN } PROCEDURE backspace(linepointer : pointer_to_line); VAR str1 : SYS_STRING; BEGIN IF text_machine.akt_pos>1 THEN BEGIN IF text_machine.akt_pos>2 THEN str1:=COPY(linepointer^.content,1,text_machine.akt_pos-2) ELSE str1:=''; IF LENGTH(linepointer^.content)>=text_machine.akt_pos THEN str1:=str1+COPY(linepointer^.content,text_machine.akt_pos, LENGTH(linepointer^.content)-text_machine.akt_pos+1); linepointer^.content:=str1; text_machine.akt_pos:=text_machine.akt_pos-1; END; END; PROCEDURE delete(linepointer : pointer_to_line); VAR str1 : SYS_STRING; BEGIN IF text_machine.akt_pos<=LENGTH(linepointer^.content) THEN BEGIN IF text_machine.akt_pos>1 THEN str1:=COPY(linepointer^.content,1,text_machine.akt_pos-1) ELSE str1:=''; IF LENGTH(linepointer^.content)>text_machine.akt_pos THEN str1:=str1+COPY(linepointer^.content,text_machine.akt_pos+1, LENGTH(linepointer^.content)-text_machine.akt_pos); linepointer^.content:=str1; END; END; PROCEDURE copy_to_next_line(linepointer : pointer_to_line); VAR str1,str2 : SYS_STRING; i : INTEGER; BEGIN IF LENGTH(linepointer^.content)>=text_machine.akt_pos THEN BEGIN str1:=COPY(linepointer^.content,text_machine.akt_pos, LENGTH(linepointer^.content)-text_machine.akt_pos+1); IF text_machine.akt_pos>1 THEN linepointer^.content:=COPY(linepointer^.content,1,text_machine.akt_pos-1) ELSE linepointer^.content:=''; str2:=''; FOR i:=1 TO text_machine.left_margin-1 DO str2:=str2+' '; IF text_machine.block_exists THEN BEGIN IF (linepointer^.nbr>=text_machine.top_of_block) AND (linepointer^.nbr<=text_machine.bottom_of_block) THEN text_machine.bottom_of_block:=text_machine.bottom_of_block+1 ELSE IF linepointer^.nbr1 THEN BEGIN search_line(linepointer^.nbr-1,linepointer); linepointer^.content:=linepointer^.content+str1; END ELSE BEGIN insert_line(1,str1,CHR(0)); END; END; PROCEDURE insert_coll(linepointer : pointer_to_line;coll : CHAR); VAR e1 : INTEGER; str1 : SYS_STRING; BEGIN IF (NOT (coll IN [CHR(10),CHR(12),CHR(13)])) THEN BEGIN IF (LENGTH(linepointer^.content)>=text_machine.akt_pos) THEN BEGIN IF text_machine.akt_pos>1 THEN str1:=COPY(linepointer^.content,1,text_machine.akt_pos-1) ELSE str1:=''; str1:=str1+coll; str1:=str1+COPY(linepointer^.content,text_machine.akt_pos, LENGTH(linepointer^.content)-text_machine.akt_pos+1); END ELSE BEGIN FOR e1:=LENGTH(linepointer^.content) TO text_machine.akt_pos-2 DO linepointer^.content:=linepointer^.content+' '; str1:=linepointer^.content+coll; END; linepointer^.content:=str1; IF text_machine.akt_postext_machine.right_margin) AND (coll IN separators) THEN BEGIN IF text_machine.akt_pos+11) AND (ORD(list_marker^.status)=1) THEN nbr_of_colls:=nbr_of_colls+1*what; nbr_of_colls:=nbr_of_colls+LENGTH(list_marker^.content)*what; END; END; VAR i,u,w,e1,e2,e3,e4,e5, standard_1,counter_1, missing : INTEGER; x,first_line : BOOLEAN; str1 : SYS_STRING; hlp : pointer_to_line; BEGIN init_module_6; i:=1; e1:=form_center(ADDR_Meldung,e2,e3,e4,e5); first_line:=TRUE; WITH format_machine DO BEGIN WHILE (top_of_list<>linepointer_end) OR (actual_line<>linepointer_end) DO BEGIN IF actual_line<>linepointer_end THEN BEGIN STR(actual_line^.nbr:4,str1); V_GTEXT(GEM_HandleA,e2+162,e3+45,str1); END; nbr_of_words[1]:=0; IF first_line THEN nbr_of_colls:=2 ELSE nbr_of_colls:=0; IF top_of_list=linepointer_end THEN BEGIN new_line(actual_of_list); actual_of_list^.content:=''; actual_of_list^.status:=CHR(0); top_of_list:=actual_of_list; END; IF actual_line<>linepointer_end THEN REPEAT IF actual_line^.content<>'' THEN BEGIN IF NOT(actual_line^.content[i] IN separators) THEN BEGIN IF LENGTH(actual_of_list^.content)=0 THEN BEGIN nbr_of_words[1]:=nbr_of_words[1]+1; actual_of_list^.status:=CHR(1); END; actual_of_list^.content:=actual_of_list^.content+ actual_line^.content[i]; nbr_of_colls:=nbr_of_colls+1; END ELSE BEGIN IF NOT(LENGTH(actual_of_list^.content)=0) THEN BEGIN new_list_object; END; IF NOT(actual_line^.content[i]=CHR(32)) THEN BEGIN actual_of_list^.content:=actual_line^.content[i]; actual_of_list^.status:=CHR(2); nbr_of_colls:=nbr_of_colls+1; new_list_object; END; END; i:=i+1; IF i>LENGTH(actual_line^.content) THEN BEGIN actual_line:=actual_line^.next; i:=1; IF actual_line=last_line^.next THEN actual_line:=linepointer_end; END END ELSE BEGIN actual_line:=actual_line^.next; i:=1; IF actual_line=last_line^.next THEN actual_line:=linepointer_end; END; UNTIL ((i=1) AND (nbr_of_colls+nbr_of_words[1]>=colls_needed)) OR (actual_line=linepointer_end) OR (memlow); IF memlow THEN BEGIN e1:=GRAF_MOUSE(0,0); write_in_box('Einfgen','Funktion abgebrochen.'); actual_line:=linepointer_end; END; IF LENGTH(top_of_list^.content)>0 THEN BEGIN list_marker:=top_of_list;x:=FALSE; IF first_line THEN nbr_of_colls:=2 ELSE nbr_of_colls:=0; nbr_of_words[1]:=0;nbr_of_words[2]:=0; prev_of_actual_list:=linepointer_end; WHILE (NOT x) AND (list_marker<>linepointer_end) DO BEGIN get_word_in_list(1); IF ((nbr_of_colls>=colls_needed)) OR ((list_marker^.next<>linepointer_end) AND (list_marker^.next^.status=CHR(2)) AND (nbr_of_colls=colls_needed-1)) THEN BEGIN x:=TRUE; get_word_in_list(-1); list_marker:=prev_of_actual_list; END ELSE BEGIN prev_of_actual_list:=list_marker; list_marker:=list_marker^.next; END; END; second_of_list:=top_of_list; IF first_line THEN str1:=' ' ELSE str1:=''; CASE option OF 1 : BEGIN w:=0;counter_1:=0; nbr_of_words[ORD(top_of_list^.status)]:= nbr_of_words[ORD(top_of_list^.status)]-1; missing:=colls_needed-nbr_of_colls; IF first_line THEN missing:=missing+1; IF nbr_of_words[1]>0 THEN standard_1:=missing DIV nbr_of_words[1] ELSE standard_1:=0; standard_1:=standard_1+1; IF nbr_of_words[1]>0 THEN missing:=missing MOD nbr_of_words[1] ELSE missing:=0; WHILE top_of_list<>list_marker^.next DO BEGIN w:=w+1; IF (w>1) THEN BEGIN IF (list_marker<>linepointer_end) THEN BEGIN IF top_of_list^.status=CHR(1) THEN BEGIN counter_1:=counter_1+1; FOR e1:=1 TO standard_1 DO str1:=str1+CHR(32); IF counter_1<=missing THEN str1:=str1+CHR(32); END; END ELSE BEGIN IF ORD(top_of_list^.status)=1 THEN str1:=str1+CHR(32); END END; str1:=str1+top_of_list^.content; top_of_list:=top_of_list^.next; END; END; 2 : BEGIN str1:=''; u:=0; IF (colls_needed-nbr_of_colls)/2<> INT((colls_needed-nbr_of_colls)/2) THEN BEGIN u:=(ROUND((nbr_of_words[1]+nbr_of_words[2])/2)+1); FOR w:=1 TO ((colls_needed-nbr_of_colls-1) DIV 2) DO str1:=str1+CHR(32); END ELSE FOR w:=1 TO ((colls_needed-nbr_of_colls) DIV 2) DO str1:=str1+CHR(32); w:=0; WHILE top_of_list<>list_marker^.next DO BEGIN w:=w+1; IF w=u THEN str1:=str1+CHR(32); IF (ORD(top_of_list^.status)=1) AND (w>1) THEN str1:=str1+CHR(32); str1:=str1+top_of_list^.content; top_of_list:=top_of_list^.next; END; END; 3 : BEGIN WHILE top_of_list<>list_marker^.next DO BEGIN IF (ORD(top_of_list^.status)=1) AND (str1<>'') THEN str1:=str1+CHR(32); str1:=str1+top_of_list^.content; top_of_list:=top_of_list^.next; END; END; END; IF top_of_list<>linepointer_end THEN BEGIN list_marker:=second_of_list; e1:=0; WHILE e1=0 DO IF list_marker^.next<>top_of_list THEN BEGIN list_marker:=list_marker^.next; line_to_shadow(second_of_list); second_of_list:=list_marker; END ELSE e1:=1; END; first_line:=FALSE; prev_of_actual_line^.content:=left_space+str1; prev_of_actual_line^.status:=CHR(0); prev_of_actual_line:=prev_of_actual_line^.next; IF (prev_of_actual_line^.nbr>text_machine.bottom_of_block) OR (prev_of_actual_line=linepointer_end) THEN BEGIN text_machine.bottom_of_block:=text_machine.bottom_of_block+1; text_machine.lines:=text_machine.lines+1; insert_line(text_machine.bottom_of_block,'',CHR(0)); search_line(text_machine.bottom_of_block,prev_of_actual_line); END; END ELSE IF actual_line=linepointer_end THEN top_of_list:=linepointer_end; END; w:=prev_of_actual_line^.nbr; FOR i:=w TO text_machine.bottom_of_block DO BEGIN delete_line(w); text_machine.bottom_of_block:=text_machine.bottom_of_block-1; text_machine.lines:=text_machine.lines-1; END; END; END; { Modul 7 : Druckeransteuerung } CONST default_file_name = 'Schwager.prt'; VAR printercode : ARRAY[0..270,1..6] OF INTEGER; PROCEDURE init_module_7; VAR str1,str2 : SYS_STRING; e1,e2,e3,iofile,ioresult : INTEGER; BEGIN e1:=SETPRT(6); FOR e1:=0 TO 255 DO BEGIN printercode[e1,1]:=e1; printercode[e1,2]:=300; END; str1:=default_file_name; assign_ascii(iofile,str1,0); IF iofile<1 THEN write_in_box('Fehler','SCHWAGER.PRT fehlerhaft.') ELSE BEGIN REPEAT readln_ascii(iofile,str1,ioresult); VAL(COPY(str1,1,3),e1,e3); e2:=0; IF e1>0 THEN REPEAT e2:=e2+1; str2:=COPY(str1,(e2)*4+1,3); VAL(str2,printercode[e1,e2],e3); UNTIL printercode[e1,e2]=300; UNTIL (ioresult<1) OR (e1=0); close_ascii(iofile); END; END; PROCEDURE writeln_line(text : SYS_STRING;status : CHAR;lf : BOOLEAN); PROCEDURE write_char(chara : INTEGER); VAR e2 : INTEGER; BEGIN e2:=1; REPEAT IF printercode[chara,e2]<300 THEN BEGIN write(lst,CHR(printercode[chara,e2])); e2:=e2+1; END; UNTIL printercode[chara,e2]=300; END; VAR e1 : INTEGER; none : BOOLEAN; BEGIN none:=true; FOR e1:=1 TO LENGTH(text) DO BEGIN IF (ORD(text[e1])<>32) AND (none) THEN BEGIN IF (ORD(status)) AND 1<>0 THEN write_char(256); IF (ORD(status)) AND 4<>0 THEN write_char(262); IF (ORD(status)) AND 8<>0 THEN write_char(258); IF (ORD(status)) AND 32<>0 THEN write_char(260); none:=false; END; write_char(ORD(text[e1])); END; IF (ORD(status)) AND 1<>0 THEN write_char(257); IF (ORD(status)) AND 4<>0 THEN write_char(263); IF (ORD(status)) AND 8<>0 THEN write_char(259); IF (ORD(status)) AND 32<>0 THEN write_char(261); IF lf THEN WRITE(LST,CHR(13),CHR(10)); END; { Modul 8 : Bedienerfhrung } VAR load_str1,load_str2,save_str1,save_str2,save_blk_str1, save_blk_str2 : SYS_STRING; PROCEDURE init_module_8; BEGIN load_str1:='\*.*'; load_str2:='mkb.txt'; save_blk_str1:='\*.*'; save_blk_str2:='mkb.txt'; END; PROCEDURE menue; VAR i,e1,e2,e3,e4,e5,e6,title,point,key,pos1 : INTEGER; str1,str2,str3 : SYS_STRING; linepointer,linepointer2,linepointer3 : pointer_to_line; c : CHAR; FUNCTION get_path(name : SYS_STRING) : SYS_STRING; VAR e1 : INTEGER; str1 : SYS_STRING; BEGIN e1:=LENGTH(name);str1:=NAME; REPEAT e1:=e1-1; str1:=COPY(name,1,e1); UNTIL (name[e1]='\'); get_path:=str1; END; PROCEDURE inable_block_commands; VAR e1 : INTEGER; BEGIN e1:=menu_ienable(ADDR_menu,blksich,0); e1:=menu_ienable(ADDR_menu,blkclr,0); e1:=menu_ienable(ADDR_menu,blkvers,0); e1:=menu_ienable(ADDR_menu,blkkop,0); e1:=menu_ienable(ADDR_menu,blocks,0); e1:=menu_ienable(ADDR_menu,flatters,0); e1:=menu_ienable(ADDR_menu,zentr,0); e1:=menu_ienable(ADDR_menu,blkdrck,0); text_machine.block_exists:=FALSE; END; PROCEDURE enable_block_commands; VAR e1 : INTEGER; BEGIN e1:=menu_ienable(ADDR_menu,blksich,1); e1:=menu_ienable(ADDR_menu,blkclr,1); e1:=menu_ienable(ADDR_menu,blkvers,1); e1:=menu_ienable(ADDR_menu,blkkop,1); e1:=menu_ienable(ADDR_menu,blocks,1); e1:=menu_ienable(ADDR_menu,flatters,1); e1:=menu_ienable(ADDR_menu,zentr,1); e1:=menu_ienable(ADDR_menu,blkdrck,1); text_machine.block_exists:=TRUE; END; PROCEDURE drucke (nbr1,nbr2,nbr3 : INTEGER); VAR e1,e2,e3,e4,e5,e6,nbr,side_nbr : INTEGER; linepointer,lp2 : pointer_to_line; line : SYS_STRING; PROCEDURE do_lines (what : BOOLEAN;line_nbr : INTEGER; VAR line : SYS_STRING); VAR e1,number : INTEGER; nbr : SYS_STRING; BEGIN line:=''; FOR e1:=1 TO text_machine.left_margin-1 DO line:=line+' '; IF what THEN line:=line+text_machine.headline ELSE line:=line+text_machine.footline; IF LENGTH(line)>text_machine.right_margin*text_machine.colls THEN line:=COPY(line,1,text_machine.right_margin); FOR e1:=LENGTH(line) TO 79 DO line:=line+' '; number:=side_nbr+text_machine.first_side_nbr; STR(number,nbr); IF ((what) AND (text_machine.nbrs_head)) OR ((NOT what) AND (text_machine.nbrs_foot)) THEN BEGIN FOR e1:=1 TO LENGTH(nbr) DO BEGIN IF (text_machine.nbrs_left) OR ((text_machine.nbrs_book) AND (number MOD 2=0)) THEN line[text_machine.left_margin+e1-1]:=nbr[e1]; IF (text_machine.nbrs_right) OR ((text_machine.nbrs_book) AND (number MOD 2<>0)) THEN line[text_machine.right_margin-LENGTH(nbr)+e1]:=nbr[e1]; IF (text_machine.nbrs_mid) THEN line[((text_machine.right_margin+text_machine.left_margin) DIV 2)- (LENGTH(nbr) DIV 2)+e1-1]:=nbr[e1]; END; END; IF what THEN line:=CHR(12)+line; END; BEGIN hide_cursor; IF (nbr3=1) THEN make_box('Block drucken','Drucke Z. ') ELSE make_box('Text drucken','Drucke Z. '); e1:=FORM_CENTER(ADDR_Meldung,e2,e3,e4,e5); side_nbr:=0; search_line(nbr1,linepointer); WHILE (linepointer^.nbr<=nbr2) AND (linepointer<>linepointer_end) DO BEGIN IF (text_machine.headline<>'') AND (((linepointer^.nbr-1) MOD text_machine.side_length=0))THEN BEGIN do_lines(TRUE,linepointer^.nbr,line); writeln_line(line,CHR(8),TRUE); line:=''; writeln_line(line,CHR(0),TRUE); END; nbr:=linepointer^.nbr; IF text_machine.colls=1 THEN writeln_line(linepointer^.content,linepointer^.status,TRUE) ELSE BEGIN line:=COPY(linepointer^.content,1,text_machine.right_margin); FOR e1:=LENGTH(line) TO text_machine.right_margin-1 DO line:=line+' '; writeln_line(line,linepointer^.status,FALSE); IF nbr+text_machine.side_length<=text_machine.lines THEN search_line(nbr+text_machine.side_length,lp2) ELSE lp2:=linepointer_end; IF lp2<>linepointer_end THEN writeln_line(lp2^.content,lp2^.status,TRUE) ELSE writeln_line('',CHR(0),TRUE); END; STR(linepointer^.nbr:4,str1); V_GTEXT(GEM_HandleA,e2+114,e3+45,str1); IF linepointer^.nbr MOD text_machine.side_length=0 THEN BEGIN IF text_machine.footline<>'' THEN BEGIN IF side_nbr=0 THEN line:='.' ELSE line:='<'; FOR e1:=1 TO 78 DO line:=line+CHR(32); IF side_nbr< (text_machine.lines DIV (text_machine.side_length*text_machine.colls)) THEN line:=line+'>' ELSE line:=line+'.'; writeln_line(line,CHR(8),TRUE); do_lines(FALSE,linepointer^.nbr-1,line); writeln_line(line,CHR(0),TRUE); END; side_nbr:=side_nbr+1; IF text_machine.colls=2 THEN IF linepointer^.nbr+text_machine.side_length<=text_machine.lines THEN search_line(linepointer^.nbr+text_machine.side_length,linepointer) ELSE linepointer:=linepointer_end; END; linepointer:=linepointer^.next; IF linepointer=linepointer_end THEN BEGIN IF text_machine.footline<>'' THEN BEGIN WHILE (nbr MOD text_machine.side_length<>0) DO BEGIN WRITELN(lst); nbr:=nbr+1; IF nbr MOD text_machine.side_length=0 THEN BEGIN IF side_nbr=0 THEN line:='.' ELSE line:='<'; FOR e1:=1 TO 78 DO line:=line+CHR(32); line:=line+'.'; writeln_line(line,CHR(8),TRUE); do_lines(FALSE,nbr,line); writeln_line(line,CHR(0),TRUE); END; END; END; END; IF crawio(CHR($ff))<>0 THEN BEGIN e1:=GRAF_MOUSE(0,0); IF write_in_jabox('Druck unterbrochen','Weitermachen')<>jaexit THEN BEGIN linepointer:=linepointer_end; SHOWMOUSE(0); END ELSE BEGIN IF (nbr3=1) THEN make_box('Block drucken','Drucke Z. ') ELSE make_box('Text drucken','Drucke Z. '); STR(linepointer^.nbr:4,str1); V_GTEXT(GEM_HandleA,e2+114,e3+45,str1); END; e1:=GRAF_MOUSE(2,0); END; END; clear_box; END; BEGIN e1:=GRAF_MKSTATE(e1,e2,e3,e4); title:=0; inable_block_commands; repeat point:=0; title:=0; key:=0; IF memlow THEN write_in_box('Speichermangel','Arbeit sichern !'); SHOWMOUSE(0); i:=evnt_multi(19,2,1,1,0,0,0,0,0,0,0,0,0,0,gem_work,0,e1,e2,e3,e4,e5,e6); IF i=1 THEN BEGIN CASE e5 OF 15104 : BEGIN point:=1; END; 15360 : BEGIN point:=2; END; 21760 : BEGIN IF text_machine.block_exists THEN point:=3 ELSE point:=52; END; 15616 : BEGIN point:=4; END; 22016 : BEGIN point:=5; END; 15872 : BEGIN IF text_machine.block_exists THEN point:=6 ELSE point:=52;; END; 16128 : BEGIN IF text_machine.block_exists THEN point:=7 ELSE point:=52; END; 22528 : BEGIN IF text_machine.block_exists THEN point:=8 ELSE point:=52; END; 16384 : BEGIN IF text_machine.block_exists THEN point:=9 ELSE point:=52; END; 22784 : BEGIN IF text_machine.block_exists THEN point:=10 ELSE point:=52; END; 16640 : BEGIN IF text_machine.block_exists THEN point:=11 ELSE point:=52;END; 23552 : BEGIN IF text_machine.block_exists THEN point:=50 ELSE point:=52;END; 16896 : BEGIN point:=12; END; 17152 : BEGIN point:=13; END; 17408 : BEGIN point:=14; END; 7181,29197 : BEGIN point:=15; END; 7178,29194 : BEGIN point:=16; END; 29440 : BEGIN point:=17; END; 20992 : BEGIN IF e4=4 THEN point:=18; IF e4=0 THEN point:=37; END; 21279 : BEGIN point:=19; END; 25088 : BEGIN point:=20; END; 18176 : BEGIN point:=21; END; 18231 : BEGIN point:=22; END; 19200 : BEGIN point:=24; END; 18432 : BEGIN IF e4=4 THEN point:= 45; IF e4=0 THEN point:=25; END; 19712 : BEGIN point:=26; END; 20480 : BEGIN IF e4=4 THEN point:= 46; IF e4=0 THEN point:=27; END; 22272 : BEGIN point:=40; END; 3849 : BEGIN IF e4=4 THEN BEGIN IF text_machine.akt_postext_machine.left_margin THEN BEGIN point:=29; pos1:=text_machine.akt_pos; END ELSE point:=52; END ELSE IF e4=0 THEN point:=38 ELSE IF e4 IN [1,2] THEN point:=39; END; 3592 : BEGIN point:=31; END; 21375 : BEGIN point:=32; END; 8454 : BEGIN point:=41; END; 9483 : BEGIN point:=42; END; 5653 : BEGIN point:=43; END; 7955 : BEGIN point:=44; END; 12558 : BEGIN point:=49; END; 24832 : BEGIN point:=47; END; 23040 : BEGIN point:=48; END; 23296 : BEGIN point:=51; END; END; IF (point=0) THEN IF e5-(e5 DIV 256)*256<>0 THEN BEGIN point:=30; key:=e5-(e5 DIV 256)*256; END; END; IF i=2 THEN BEGIN IF e2<32 THEN BEGIN pos1:=e1 DIV 8+text_machine.left_screen; point:=52; IF e6=1 THEN IF pos1text_machine.left_margin THEN point:=29; END ELSE BEGIN IF e1<3 THEN BEGIN IF e6=1 THEN point:=24; IF e6=2 THEN point:=39; END ELSE IF e1>635 THEN BEGIN IF e6=1 THEN point:=26; IF e6=2 THEN point:=38; END ELSE IF e2<36 THEN BEGIN IF e6=1 THEN point:=25; IF e6=2 THEN point:=45; END ELSE IF e2>395 THEN BEGIN IF e6=1 THEN point:=27; IF e6=2 THEN point:=46; END ELSE BEGIN text_machine.akt_pos:=(e1 DIV 8)+text_machine.left_screen; text_machine.akt_line:=(e2-text_machine.top_of_screen) DIV txt_height+text_machine.top_of_screen_line; IF text_machine.akt_line>text_machine.lines THEN text_machine.akt_line:=text_machine.lines; do_lp; hidemouse; show_status_bar; show_line_nbrs; showmouse(0); point:=52; END; END; END; IF i=16 THEN BEGIN title:=BMEM[ADDR(GEM_Work)+7]; CASE BMEM[ADDR(GEM_Work)+9] OF Info : point:=23; Laden : point:=1; Sichern : point:=2; Blksich : point:=3; Ende : point:=14; Blkclr : point:=6; Blkvers : point:=7; Blkkop : point:=8; Blkdrck : point:=50; Blocks : point:=9; Flatters : point:=10; Zentr : point:=11; Suchen : point:=12; Drucken : point:=13; Lsch : point:=40; Fett : point:=41; Kursiv : point:=42; Unterstr : point:=43; Klein : point:=44; Norm : point:=49; Asceinfg : point:=48; Kopf : point:=51; END; END; IF (point<>52) THEN HIDEMOUSE; CASE point OF 1 : BEGIN hide_cursor; e6:=write_in_jaabrbox('Einfgen','Text lschen ?'); IF e6=abjaexit THEN BEGIN IF text_machine.lines>1 THEN BEGIN search_line(2,linepointer); search_line(text_machine.lines,linepointer2); linepointer2^.next:=shadow_lines; shadow_lines:=linepointer; END; linepointer:=decade[0]; IF linepointer=linepointer_end THEN BEGIN new_line(linepointer); decade[0]:=linepointer; END; linepointer^.content:=''; linepointer^.next:=linepointer_end; linepointer^.nbr:=1; linepointer^.status:=CHR(0); text_machine.top_of_block:=0; text_machine.bottom_of_block:=0; inable_block_commands; text_machine.lines:=1; text_machine.akt_line:=1; text_machine.akt_pos:=text_machine.left_margin; text_machine.top_of_screen_line:=1; do_lp; actual_screen_pos; show_line_nbrs; show_side; END; IF e6<>abbrexit THEN BEGIN hide_cursor; showmouse(0); e1:=FSEL_INPUT(load_str1,load_str2,e2); hidemouse; VR_RECFL(GEM_HandleA,text_machine.koor_clr_all); show_side; hide_cursor; IF e2=1 THEN BEGIN make_box('Einfgen','Lade Z. '); text_machine.top_of_block:=0; text_machine.bottom_of_block:=0; inable_block_commands; load_file(get_path(load_str1)+load_str2, text_machine.akt_line); show_status_bar; do_lp; clear_box; END; END; show_side; END; 2 : BEGIN hide_cursor; showmouse(0); e1:=FSEL_INPUT(load_str1,load_str2,e2); hidemouse; VR_RECFL(GEM_HandleA,text_machine.koor_clr_all); showmouse(0); show_side; IF e2=1 THEN BEGIN make_box('Text speichern','Sichere Z. '); save_file(get_path(load_str1)+load_str2,1, text_machine.lines); clear_box; END; END; 03 : BEGIN hide_cursor; showmouse(0); e1:=FSEL_INPUT(save_blk_str1,save_blk_str2,e2); hidemouse; VR_RECFL(GEM_HandleA,text_machine.koor_clr_all); show_side; IF e2=1 THEN BEGIN make_box('Block speichern','Sichere Z. '); save_file(get_path(save_blk_str1)+save_blk_str2, text_machine.top_of_block,text_machine.bottom_of_block); clear_box; END; END; 4 : BEGIN text_machine.top_of_block:=text_machine.akt_line; IF (text_machine.top_of_block<>0) AND (text_machine.bottom_of_block<>0) THEN enable_block_commands; IF (text_machine.top_of_block>text_machine.bottom_of_block) AND (text_machine.bottom_of_block>0) THEN BEGIN inable_block_commands; text_machine.top_of_block:=0; text_machine.bottom_of_block:=0; END; show_side; END; 5 : BEGIN text_machine.bottom_of_block:=text_machine.akt_line; IF (text_machine.top_of_block<>0) AND (text_machine.bottom_of_block<>0) THEN enable_block_commands; IF (text_machine.top_of_block>text_machine.bottom_of_block) AND (text_machine.bottom_of_block>0) THEN BEGIN inable_block_commands; text_machine.top_of_block:=0; text_machine.bottom_of_block:=0; END; show_side; END; 6 : BEGIN e1:=write_in_jabox('Blockarbeit','Block lschen ?'); IF e1=jaexit THEN BEGIN e2:=text_machine.top_of_block; FOR e1:=text_machine.top_of_block TO text_machine.bottom_of_block DO BEGIN delete_line(e2); text_machine.lines:=text_machine.lines-1; END; text_machine.top_of_block:=0; text_machine.bottom_of_block:=0; inable_block_commands; IF e2>1 THEN text_machine.akt_line:=e2-1 ELSE BEGIN insert_line(1,'',CHR(0)); text_machine.lines:=1; text_machine.akt_line:=1; text_machine.top_of_screen_line:=1; text_machine.akt_pos:=text_machine.left_margin; END; do_lp; IF text_machine.akt_line>step_step THEN text_machine.top_of_screen_line:=text_machine.akt_line-step_step ELSE text_machine.top_of_screen_line:=text_machine.akt_line; show_side; END; END; 7 : BEGIN IF NOT((text_machine.akt_line>=text_machine.top_of_block) AND (text_machine.akt_line<=text_machine.bottom_of_block)) THEN BEGIN e4:=text_machine.bottom_of_block-text_machine.top_of_block; search_line(text_machine.top_of_block,linepointer); search_line(text_machine.top_of_block,linepointer3); search_line(text_machine.akt_line,linepointer2); FOR e1:=text_machine.top_of_block TO text_machine.bottom_of_block DO BEGIN insert_line(linepointer2^.nbr,linepointer^.content, linepointer^.status); linepointer:=linepointer^.next; END; FOR e1:=text_machine.top_of_block TO text_machine.bottom_of_block DO delete_line(linepointer3^.nbr); text_machine.top_of_block:=linepointer2^.nbr-1-e4; text_machine.bottom_of_block:=linepointer2^.nbr-1; do_lp; show_side; END; END; 8 : BEGIN IF NOT((text_machine.akt_line>=text_machine.top_of_block) AND (text_machine.akt_line<=text_machine.bottom_of_block)) THEN BEGIN e4:=text_machine.bottom_of_block-text_machine.top_of_block; search_line(text_machine.top_of_block,linepointer); search_line(text_machine.akt_line,linepointer2); FOR e1:=text_machine.top_of_block TO text_machine.bottom_of_block DO BEGIN insert_line(linepointer2^.nbr,linepointer^.content, linepointer^.status); text_machine.lines:=text_machine.lines+1; linepointer:=linepointer^.next; END; text_machine.top_of_block:=linepointer2^.nbr-e4-1; text_machine.bottom_of_block:=linepointer2^.nbr-1; do_lp; show_side; END; END; 9 : BEGIN hide_cursor; make_box('Format Blocksatz','Formatiere Z. : '); format(1); clear_box; text_machine.akt_line:=text_machine.top_of_block; text_machine.top_of_screen_line:=text_machine.akt_line-step_step; IF text_machine.top_of_screen_line<0 THEN text_machine.top_of_screen_line:=1; do_lp; show_side; END; 10 : BEGIN hide_cursor; make_box('Format Flattersatz','Formatiere Z. : '); format(3); clear_box; text_machine.akt_line:=text_machine.top_of_block; text_machine.top_of_screen_line:=text_machine.akt_line-step_step; IF text_machine.top_of_screen_line<0 THEN text_machine.top_of_screen_line:=1; do_lp; show_side; END; 11 : BEGIN hide_cursor; make_box('Format Zentriert','Formatiere Z. : '); format(2); clear_box; text_machine.akt_line:=text_machine.top_of_block; text_machine.top_of_screen_line:=text_machine.akt_line-step_step; IF text_machine.top_of_screen_line<0 THEN text_machine.top_of_screen_line:=1; do_lp; show_side; END; 12 : BEGIN e6:=show_box(addr_suchboxf,suchexit); IF e6<>suchexit THEN BEGIN e1:=WMEM[addr_suchboxf+suchtxte*24+12]*65536+ WMEM[addr_suchboxf+suchtxte*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str1:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>CHR(0) THEN str1:=str1+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str1)>23) OR (BMEM[e1+e2-1]=0); e1:=WMEM[addr_suchboxf+erstxt*24+12]*65536+ WMEM[addr_suchboxf+erstxt*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str2:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>CHR(0) THEN str2:=str2+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str2)>23) OR (BMEM[e1+e2-1]=0); e1:=0;e2:=0; WHILE (text_machine.akt_line<=text_machine.lines) AND (e1=0) AND ((str1<>str2) OR (e6=suche)) DO BEGIN e2:=POS(str1,text_machine.linepointer^.content); IF e2=0 THEN BEGIN text_machine.linepointer:=text_machine.linepointer^.next; text_machine.akt_line:=text_machine.akt_line+1; END ELSE BEGIN IF e6=suchexit THEN e1:=1; IF e6=suche THEN BEGIN text_machine.akt_pos:=e2; IF text_machine.akt_line>step_step THEN text_machine.top_of_screen_line:=text_machine.akt_line- step_step ELSE text_machine.top_of_screen_line:=1; e1:=1; END; IF e6=ers THEN BEGIN STR(text_machine.linepointer^.nbr,str3); e3:=write_in_jaabrbox('Suchen/Ersetzen', 'Wort in Z. '+str3+' ersetzen ?'); IF e3=Abjaexit THEN BEGIN text_machine.linepointer^.content:= COPY(text_machine.linepointer^.content,1,e2-1)+str2+ COPY(text_machine.linepointer^.content,e2+LENGTH(str1), LENGTH(text_machine.linepointer^.content)-e2+ LENGTH(str1)); END; IF NOT(e3 IN [abjaexit,abbrexit]) THEN text_machine.linepointer:=text_machine.linepointer^.next; IF e3=abbrexit THEN BEGIN text_machine.akt_pos:=e2; e1:=1; END ELSE BEGIN do_lp; text_machine.akt_pos:=1; show_side; END; END; END; END; END; IF text_machine.akt_line>text_machine.lines THEN text_machine.akt_line:=text_machine.lines; IF text_machine.akt_line>step_step THEN text_machine.top_of_screen_line:=text_machine.akt_line- step_step ELSE text_machine.top_of_screen_line:=1; do_lp; actual_screen_pos; show_side; END; 13 : BEGIN drucke(1,text_machine.lines,0); END; 14 : BEGIN e1:=write_in_jabox('Achtung','Schwager beenden ?'); IF e1<>jaexit THEN point:=0; END; 15 : BEGIN line_to_bottom; text_machine.akt_pos:=text_machine.left_margin; actual_screen_pos; END; 16 : BEGIN copy_to_next_line(text_machine.linepointer); do_lp; show_side; END; 17 : BEGIN copy_to_prev_line(text_machine.linepointer); do_lp; show_side; END; 18 : BEGIN IF text_machine.block_exists THEN BEGIN IF (text_machine.akt_line>=text_machine.top_of_block) AND (text_machine.akt_line<=text_machine.bottom_of_block) THEN text_machine.bottom_of_block:=text_machine.bottom_of_block+1 ELSE IF text_machine.akt_line1 THEN BEGIN IF text_machine.block_exists THEN BEGIN IF (text_machine.akt_line>=text_machine.top_of_block) AND (text_machine.akt_line<=text_machine.bottom_of_block) THEN BEGIN text_machine.bottom_of_block:=text_machine.bottom_of_block-1; IF text_machine.bottom_of_blocktext_machine.lines THEN text_machine.akt_line:=text_machine.lines; END ELSE BEGIN search_line(1,linepointer); linepointer^.content:=''; END; do_lp; show_side; END; 20 : BEGIN e2:=0; REPEAT e1:=show_box(addr_helpbox,helpexit); IF e1=helpexit THEN e2:=1 ELSE CASE e1 OF ftast : e1:=show_box(addr_ftastbox,ftastex); editier : e1:=show_box(addr_editfbox,editexit); blockf : e1:=show_box(addr_blockbox,blockex); mausf : e1:=show_box(addr_mausfbox,mausexit); speich : e1:=show_box(addr_speichbx,speichex); END; UNTIL e2=1; END; 21 : BEGIN text_machine.akt_line:=1; text_machine.top_of_screen_line:=1; text_machine.akt_pos:=1; do_lp; actual_screen_pos; show_side; END; 22 : BEGIN text_machine.akt_line:=text_machine.lines; IF text_machine.akt_line>step_step THEN text_machine.top_of_screen_line:=text_machine.akt_line-step_step ELSE text_machine.top_of_screen_line:=text_machine.akt_line; text_machine.akt_pos:=1; do_lp; actual_screen_pos; show_side; END; 23 : BEGIN e1:=show_box(addr_infobox,infexit); END; 24 : BEGIN coll_to_left; END; 25 : BEGIN line_to_top; END; 26 : BEGIN coll_to_right; END; 27 : BEGIN line_to_bottom; END; 28 : BEGIN text_machine.left_margin:=pos1; show_status_bar; END; 29 : BEGIN text_machine.right_margin:=pos1; show_status_bar; END; 30 : BEGIN IF key>0 THEN insert_coll(text_machine.linepointer,CHR(key)); write_line(text_machine.linepointer); END; 31 : BEGIN backspace(text_machine.linepointer); write_line(text_machine.linepointer); END; 32 : BEGIN delete(text_machine.linepointer); write_line(text_machine.linepointer); END; 37 : BEGIN insert_coll(text_machine.linepointer,CHR(32)); text_machine.akt_pos:=text_machine.akt_pos-1; write_line(text_machine.linepointer); END; 38 : BEGIN text_machine.akt_pos:=text_machine.akt_pos+step_step; IF text_machine.akt_pos>80 THEN BEGIN IF text_machine.akt_pos>max_colls THEN text_machine.akt_pos:=max_colls ELSE BEGIN text_machine.left_screen:=text_machine.left_screen+step_step; show_status_bar; show_side; END; END; END; 39 : BEGIN text_machine.akt_pos:=text_machine.akt_pos-step_step; IF text_machine.akt_pos1 THEN BEGIN search_line(2,linepointer); search_line(text_machine.lines,linepointer2); linepointer2^.next:=shadow_lines; shadow_lines:=linepointer; END; linepointer:=decade[0]; IF linepointer=linepointer_end THEN BEGIN new_line(linepointer); decade[0]:=linepointer; END; linepointer^.content:=''; linepointer^.next:=linepointer_end; linepointer^.nbr:=1; linepointer^.status:=CHR(0); text_machine.top_of_block:=0; text_machine.bottom_of_block:=0; inable_block_commands; text_machine.lines:=1; text_machine.akt_line:=1; text_machine.akt_pos:=text_machine.left_margin; text_machine.top_of_screen_line:=1; do_lp; actual_screen_pos; show_side; END; END; 41 : BEGIN IF ORD(text_machine.linepointer^.status) AND 1>0 THEN text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)-1) ELSE text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)+1); write_line(text_machine.linepointer); END; 42 : BEGIN IF ORD(text_machine.linepointer^.status) AND 4>0 THEN text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)-4) ELSE text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)+4); write_line(text_machine.linepointer); END; 43 : BEGIN IF ORD(text_machine.linepointer^.status) AND 8>0 THEN text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)-8) ELSE text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)+8); write_line(text_machine.linepointer); END; 44 : BEGIN IF ORD(text_machine.linepointer^.status) AND 32>0 THEN text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)-32) ELSE text_machine.linepointer^.status:= CHR(ORD(text_machine.linepointer^.status)+32); write_line(text_machine.linepointer); END; 45 : BEGIN IF text_machine.top_of_screen_line>text_machine.screen_lines THEN BEGIN text_machine.top_of_screen_line:=text_machine.top_of_screen_line- text_machine.screen_lines; text_machine.akt_line:=text_machine.akt_line- text_machine.screen_lines;; END ELSE BEGIN text_machine.top_of_screen_line:=1; text_machine.akt_line:=1; END; do_lp; show_side; END; 46 : BEGIN IF text_machine.top_of_screen_line<=text_machine.lines- text_machine.screen_lines THEN BEGIN text_machine.top_of_screen_line:=text_machine.top_of_screen_line+ text_machine.screen_lines; IF text_machine.akt_line<=text_machine.lines- text_machine.screen_lines THEN text_machine.akt_line:=text_machine.akt_line+ text_machine.screen_lines ELSE text_machine.akt_line:=text_machine.top_of_screen_line; END ELSE BEGIN text_machine.top_of_screen_line:=text_machine.lines; text_machine.akt_line:=text_machine.lines; END; do_lp; show_side; END; 47 : BEGIN IF shadow_lines<>linepointer_end THEN BEGIN IF text_machine.block_exists THEN BEGIN IF (text_machine.akt_line>=text_machine.top_of_block) AND (text_machine.akt_line<=text_machine.bottom_of_block) THEN text_machine.bottom_of_block:=text_machine.bottom_of_block+1 ELSE IF text_machine.akt_line=0) AND (e1<=254) THEN insert_coll(text_machine.linepointer,CHR(e1)); show_side; END; 49 : BEGIN text_machine.linepointer^.status:=CHR(0); write_line(text_machine.linepointer); END; 50 : BEGIN drucke(text_machine.top_of_block,text_machine.bottom_of_block,1); END; 51 : BEGIN e1:=WMEM[addr_zeilbox+kopfz*24+12]*65536+ WMEM[addr_zeilbox+kopfz*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str1:='';e2:=0; FOR e2:=1 TO 63 DO IF e2<=LENGTH(text_machine.headline) THEN BMEM[e1+e2-1]:=ORD(text_machine.headline[e2]) ELSE BMEM[e1+e2-1]:=ORD('_'); e1:=WMEM[addr_zeilbox+fussz*24+12]*65536+ WMEM[addr_zeilbox+fussz*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str1:='';e2:=0; FOR e2:=1 TO 63 DO IF e2<=LENGTH(text_machine.footline) THEN BMEM[e1+e2-1]:=ORD(text_machine.footline[e2]) ELSE BMEM[e1+e2-1]:=ORD('_'); STR(text_machine.side_length,str1); IF LENGTH(str1)=1 THEN str1:='0'+str1; e1:=WMEM[addr_zeilbox+zeilenz*24+12]*65536+ WMEM[addr_zeilbox+zeilenz*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; FOR e2:=1 TO 2 DO BMEM[e1+e2-1]:=ORD(str1[e2]); STR(text_machine.colls,str1); e1:=WMEM[addr_zeilbox+zspa*24+12]*65536+ WMEM[addr_zeilbox+zspa*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; BMEM[e1]:=ORD(str1[1]); STR(text_machine.first_side_nbr,str1); IF LENGTH(str1)=1 THEN str1:='0'+str1; e1:=WMEM[addr_zeilbox+znumab*24+12]*65536+ WMEM[addr_zeilbox+znumab*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; FOR e2:=1 TO 2 DO BMEM[e1+e2-1]:=ORD(str1[e2]); IF text_machine.nbrs_left THEN str1:='L' ELSE IF text_machine.nbrs_right THEN str1:='R' ELSE IF text_machine.nbrs_mid THEN str1:='M' ELSE IF text_machine.nbrs_book THEN str1:='B' ELSE str1:='_'; IF text_machine.nbrs_head THEN str1:=str1+'O' ELSE IF text_machine.nbrs_foot THEN str1:=str1+'U' ELSE str1:=str1+'_'; e1:=WMEM[addr_zeilbox+zort*24+12]*65536+ WMEM[addr_zeilbox+zort*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; FOR e2:=1 TO 2 DO BMEM[e1+e2-1]:=ORD(str1[e2]); e6:=show_box(addr_zeilbox,zexit); IF e6=zuebern THEN BEGIN e1:=WMEM[addr_zeilbox+kopfz*24+12]*65536+ WMEM[addr_zeilbox+kopfz*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str1:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>'_' THEN str1:=str1+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str1)>63) OR (BMEM[e1+e2-1]=ORD('_')); text_machine.headline:=str1; e1:=WMEM[addr_zeilbox+fussz*24+12]*65536+ WMEM[addr_zeilbox+fussz*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str2:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>'_' THEN str2:=str2+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str2)>63) OR (BMEM[e1+e2-1]=ORD('_')); text_machine.footline:=str2; e1:=WMEM[addr_zeilbox+zeilenz*24+12]*65536+ WMEM[addr_zeilbox+zeilenz*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str2:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>CHR(0) THEN str2:=str2+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str2)>1) OR (BMEM[e1+e2-1]=0); VAL(str2,text_machine.side_length,e1); e1:=WMEM[addr_zeilbox+zspa*24+12]*65536+ WMEM[addr_zeilbox+zspa*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str2:=CHR(BMEM[e1]); IF (str2='2') AND (text_machine.side_length MOD 2=0) THEN text_machine.colls:=2 ELSE text_machine.colls:=1; e1:=WMEM[addr_zeilbox+znumab*24+12]*65536+ WMEM[addr_zeilbox+znumab*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str2:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>CHR(0) THEN str2:=str2+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str2)>1) OR (BMEM[e1+e2-1]=0); VAL(str2,text_machine.first_side_nbr,e1); e1:=WMEM[addr_zeilbox+zort*24+12]*65536+ WMEM[addr_zeilbox+zort*24+14]; e1:=WMEM[e1]*65536+WMEM[e1+2]; str2:='';e2:=0; REPEAT e2:=e2+1; IF CHR(BMEM[e1+e2-1])<>CHR(0) THEN str2:=str2+CHR(BMEM[e1+e2-1]); UNTIL (LENGTH(str2)>1) OR (BMEM[e1+e2-1]=0); text_machine.nbrs_head:=FALSE;text_machine.nbrs_foot:=FALSE; CASE UPCASE(str2[2]) OF 'O' : text_machine.nbrs_head:=TRUE; 'U' : text_machine.nbrs_foot:=TRUE; END; text_machine.nbrs_left:=FALSE;text_machine.nbrs_right:=FALSE; text_machine.nbrs_mid:=FALSE;text_machine.nbrs_book:=FALSE; CASE UPCASE(str2[1]) OF 'L' : text_machine.nbrs_left:=TRUE; 'R' : text_machine.nbrs_right:=TRUE; 'M' : text_machine.nbrs_mid:=TRUE; 'B' : text_machine.nbrs_book:=TRUE; END; END; IF e6=zabbr THEN BEGIN text_machine.headline:=''; text_machine.footline:=''; text_machine.side_length:=65; text_machine.side_nbrs:=FALSE; text_machine.nbrs_head:=TRUE;text_machine.nbrs_foot:=FALSE; text_machine.nbrs_left:=FALSE;text_machine.nbrs_right:=TRUE; text_machine.nbrs_mid:=FALSE;text_machine.nbrs_book:=FALSE; text_machine.first_side_nbr:=1; text_machine.colls:=1; END; do_lp; actual_screen_pos; show_side; END; 52 : BEGIN WRITE(CHR(7)); END; END; show_cursor; show_line_nbrs; IF title<>0 THEN i:=menu_tnormal(addr_menu,title,1); until (point=14); END; { .... } VAR linepointer : pointer_to_line; i : INTEGER; x : CHAR; BEGIN memlow:=FALSE; init_module_1; init_shadow_lines; IF init_terminal THEN BEGIN insert_line(1,'',CHR(0)); init_module_4; show_status_bar; show_side; show_line_nbrs; init_module_5; init_module_7; init_module_8; menue; exit_terminal; END; END. `W,o&*n.. V/<V/Bg?<JNAO Jfp/Y=B K C V Y R W V FALTZ``h````,`````` ` `,` ` ` ` `` ```D``f````6`D`$` ````` ````````````````8`r``\`(`` '($&7D))?/9,97W//|NsO'O E'EXC  C A' kBBBkBkBkABBBk0AC C C C C C AC C C C C '@'I'h'h'h 'h'h?<NNT'@Р ?<?<NNX k'HB ЈЈЫ@'@'|zB?< NA\'@aHaAt'HA8'HBk.k~PNIHkHkHkHk ~QNI'@Ar p Qp HkHkHk@~NI +@R"+S@re0@ +DR"+S@@p+H7@| +?~NI~RNIOa` >H@?/<NM\LNuH`?<NATLNuH?/<NM\LNuH`/<NMXLNuH`/<`H`Bg?<`rtNuBQNuH@H@Ag"gT`pH@H@J@g7@H@LNuB@`Jkg 0+Bk` a\J@fa fpNu?Ha$0a0NuH`?< NATLNua"?<?<NNX /+?< NA\BgNAH7ApapYa H< a0< aLNuH@PA$HpSfB"JLNuHa/Bg/ ?<NAXJf"ap'@LNuH&PA/?<ANA\`$Ap$Bg?/?<BNAO fp'@NuHEfaPp.aDL?NuaHaJf&Hk/<??<@NAO f'@L'NuaHahJfHk/<??<?`4+`4+7BNuWNsJf99NuHB,C*J g"o / ??<Bg?<NNO LNu/ &z"R,&_9NsH瀀??<NAXLNuHz*?<?<NMP'|@aJf '|a NuBPNs~ kBppNuM|I| > \/??<NMPQNuaNCfa a?<ONATJka`aNu$NErg$ .gazSA`  g p aj|`p.`p aZQSf>aNuH.lJgr8a(aNza>EK&f R& Cf kA(HX$&g0`REaESc$f`aJgaaJgXL6t`a LJgNpL6tNuH.l8a\a4zCE""PسfJgaJabaRCn` aJgXL6taJfaNuapah,ICaIRNuH IBa e Ra>` g( g gpa$`pJgSSap apa`aLNuH@< dp g g g&`8papJap `papKap`rpapEaBkp `^<g4< g< g4< f0hXata,QNuAtg VQ|Nua,<:fa"04ehjFBkk|Nu< g `o NufR< gJf&< g<"f`a8dtJBa*ed4<"f`< fNuNuaar0  e<q<d |Nut<Dg&<Ag<Sf,aV<Rf"$<|Nu4<a< 0<djNu|Nuvt< g< -g ae` a 2gaeJBgƆAAgIda</g`Nut銳BaHeNu6+x g2aSDjNu!**** KatCe-ST Vers. 1.8 ****Inhalt:*.* Start bei: Diskfehler: !KatCe-ST wirklich beenden (J/N)? verbotener SysTrap in Falscher Zugriff auf Unbekannte Anweisung in Busfehler-Zugriff auf vor PC = Systemfrequenz RAM-Ende bei $FPU 68881 ab $Editortext ab $Assembler Code ab $Aktueller Pfad @E(ditor M(onitor A(ssembler P(ascal X(ecute R(unD(irectory S(etPath Q(uit>>>> Kein Code verfgbarWelches File starten: Pfadnamen eingeben: a`aa`HZ$I'|aBBk@aaC.'I'OHz`FJCaa*`zKein Code zum Modul vorhandena`BFkaada\"B$B|.fada@$BrA g Qa`0A0{ N`XNu"r>X4<W+kNsWk+7WHZ\+ft"kax&+aajAgj+fa\JgFa< f`4< f`&<f+fabJf&+xz2CgQ aVz+aLdga>a`6aJadae a8`.JBgIZJfJIzJeX`a<:fa(</g< fNuaa'CNurPNsaCa o`8aCy| U`C`C|aa oaCa o aazaj.k`aadH`aNuala Ba&rpatJfvNuaP| g$ ,fadaX ,fa2 Gf|t BraJf4Jf C~aHa8Nua"NS< g<,f$SNu +D*CTaap`agaSfNua*&&a +g> -g2 *g" /fJg2p=aap&aHC2a|p=a`j$`ԃ`B2+<0k<5j|<3fI@@BA40Cԉ'BNu@..Nu/ G%n0G0{~N `~ _Nub* l z 6 t@v x`@ 6ɿkŭ+pxIGɀS~*vu@H8C 28k De`2 Ddpr`"C DDAx Bg$&(NPDfLNuH<$O`rvzRj8*S1@ ,g5C 0k  SENuA "A$&aHp0* 0a L a .A !AJPgRjNu5|Bja j g j- Wfal j+ fa`ABBBjBj J*gBj jlaj`Rj a0`6* C.f$a J*gBj jla:Sj a` jE g je fVa j- Wfa j+ faBjJ*g6* 8* DD5Ca`6*J*gDCj J*g Jjg0* a"fF$*&*aH%@%A$<&<a JGg *"*>*HGBGOL 0؀dRE؃dRE68HDBE؂dRE؆dRE<8HD>؁k KVUGk:JCjRFd RdTG|@dOgd0H@HD0"2LNu`BB`H0$&aL NuH?:8HDHC8,HB264HBHF4H@<@gpFAgvF0FA@Br1` Ke b fCbERQgR@d RdRFdVR@J@k| l2AH@0"`BBLNu``Jg BaBNuH?$B*CHL0@2DHA2HE:@gFDg2BF@efe|fCctDEG40I2BDgb|gbHG>HG`JO>BEHE`>| gb |>BEHE`(MHE>B`BBG|`|0gb| HE>BoV4@@Fk:GӅd$SdRCdRRB f0H@HA02`JFjRCdRd`NUƗGJkSBNSk>g&HAJAf2BCBJk(SBj` HASBKj`| 2gkSBIjHABCgBB`0H@HA02` " L?Nu`"0< Jgj0< DkS@jH@HA0BA`BBNuH8BCAJjvHA|8< Ao| d$H@4JCgD`B `LNuH0$&HBB BoL B'bBJgSfJ@fJg"f P`Jj`BBL NuHa$&La`H0$& <Ba`H?@B*(ktglH@ @d><@O0<G` @H@H@gH>HGOG$& "ata.f.jD nLNuLNuH0V$<&B3X g*U$D֝*$%}$H0$<&<;)\a0aL NuH0$<Ԛ&Jo^H@B<0<@HH@ oR(*$<BaDEat$&aA"zap$& aadL|Nu`aC(: !Yb8N;)\H0aV$<r&<aXL NuH0a8$< &<`a&a4` <"<ڢ!cNuHJkFgL  n _C2pv2 2Q`$7_Bka&0+NBk7_a0+N*(&$7_Bk7_H<aL420TPZ2HPLHV l z D `  N<| ^, @ D P H T L j d t &P$tlB0p Hr (,0:>Bn (*:\&FC`J|NuB+Nu'kB+||BBBBBLBT'k(kHAV'HPNu'BԼ"@`"kԋ OX'H B'H'Hp _.IC'IN.kYNu?< NDNs?<"`?<*`?<.`?<`?<+`?</`C`C` C`C/ ?</?<NMP'@DNuC`C/ ?<,?<NMP'@@Nu?<NDJg?<NDNs8<(`8<,,_"a* a 鋆E"?NDNAv6lT`6Nu K %  ` X,nK/+D?</?<NMPONu/+@?<,?<NMPNu?<NDJgpNupNu",_?<NDN"@?<NDH2Nu?LNDHNu&"k*I|NL eRNO` g( g gpNO`pJgSSNOp NOpNO` Nu,_.fSWo ,p SgNO`CJgCaNTRUEFALSEp NOp NONugNOSfNup NONup`"Wa. їNu,_"k$~v R@gS&RG" /aLJf`,_"O*IJg2o SAp NOQarTN?<NDNu,_"/ l A NuvQ`ְlA NuHz /LNuHNupA?<5NDNuB,NuЫ,,nNu lH@A@FNuvU`pr+M f|LB+a`@|R+MICX"2BQFNu@|+MCXrg4gPR`S+M+NjS+NQPg6)kT IP""R`FNu/ &zR,JkLo^LHt+N+Mg4R+NJC\2'IPp0+.H@J@f i(kN kPP`B+NB+LAV'HPL&_9NsNs@| kP2@f2+T@gFpNuPkTFpNu@| @ kPPkTNs kPJPkpNupNu'H"k'IeSB2Q'HNu _vK`X k2SBf'HJNu/"kıe"H _d k Nu _ Nu @SfNu <;a&/ n6ҁ$҂҂e" 0eZ :dT` g JgS AvNuvNuRv 0e :e Ae am 7e dB鉂Sf`gD`Rrv p0m nҁSf  ` ae {d< Nu g g f<Nu<Nu<Nu "$<v~g~aҀ~$az~atJfNuv`N~`~`~` ~`~ `~ " $&aF fNupNu,_~a4//N,_//N,_~a$&`,_$&" ~/`V~`N~`F~`B~ `>~ `:~a~#`0~`0~`,~`(~`$~`~`~`~`~ `~!` ~$`~%`$&" aѮ*,JfNu` @H`Nu~ "aш`~`,_B"@T*OK:SfN*@ k8R6g&SC`Q"H~aBHGGf **BNuJ+fp'@Nuv`(",_$_^C*Q -g(d"M*U`f"/ `$ / *+B" "$N Ё'@X؍e dtp`/vK`a Nua Nuxz*k&-g؃ d**U` +Q"+e؀d*Nu @ Nu @'PNu,_ @p*OARd`SAfRRSf.MN,_  Or*T/"X*H W.e RJg"Sf _.HNal  Q.INa\ FQ`aN  Q`t`ta:SfHt f Qt`t`ta fQ O@ N*_,_"Or IA N,_ OA"JgO$pNaJO$gpN,_ @O"Or"QN,_&eFR$"apd RpvSf` p OXpNu,_2aN,_r *Opr*SfN,_"@r"SfN,_"o *Or"QO$NBTNu*_$"@* ~aΞv~/ "kaΐ$_veQN/ `*_~& g~`v $"@:" `|`BF,_$_"O @*Oa~a@f2HGSg <fRR` JFf~a($`H.MN/v`A4`A0`AZ`AR` A*`A&p,_$O*Oa"MaNp fLSd`Bpg<g<o e0f*Sfd"`$pggo e f Sfn@.MJgpNp,_$O*Oa"Mag gm I(JfSg `RSR`p.M(kN,_$O O*Ja`"MedaPgSfgSf$OBT(MI:Sf.L(kN*O(OBT,]$ nJg $MaSen0RSfBT(MI"O:Sf.L(kN,_ _Jgn nfgdR"OO*OgSf"H, (IRgSd"F/edRg"OSfO*OaN.M(kN/vV`Jg@$/ n:"oBn(&ր(d R@ I$IBR@gSf,_PN/ve`p,_*O&TN?<NDA& 1AY&CR vNt|.x UC*aBUB*aH*a\*aLRRSfCp?< NDRSaLC?< NDrp?< NDSfNrSEa,RQNuSEa RQNuSEaSQNuSEaSQNu"ቂ?<NDp*?< NDNu2 Laden Sie uns zum Essen ein ! Dann sagen wir,7 wie Kat-Ce wieder zum Leben erweckt wird. ,_&.a G?<7`,_.a G|?<6a2pNDJ@fN/0<f`,_aa.kp @"|?<6NDNu,_*OAg (nSf gR.MNBP`/v1`?<NDJf '@J+gJgp+Hvf`Nu +Nu _*O$kg SfB gR.M"kN4+rg?<NDSAjNuB*@-* fpap apa-*g:Jm,f *+m.@AC

>> RUN-Time Error, Taste drcken <<<~NF"<&$<~NF.<Nx.<Nxt .<NF.< 4x.< tx .< 4xмl/p _ .< 4xмj/p. _0.<`HtxpП/.< 4x _ .< 4x.<)x~!NF<e <Ќ~9NFp/pd"&kNR/ .<NFp @?~mNF<e <Ќ~9NF.<NF<e><NF.<NF<e><NF.NAXNuNu.<Nx.<%Nx.<1Nx.<Nx$< .<NF<e><NF.< 4xмj/p _0.< 4xмl/p _ .< 4x.< tx .< 4x/p/ <Ќre~@NF.< 4x?.<NF~ NI.< 4x/p"Ё.<)x <,<><NF/p"VHHgp/p/~NI.<|)x~!NFEinfgen unterbrochen~!NF WeitermacheneaN/p"VHHgp.<)x`~!NFEinfgenc~!NF Lese Z. ea.< 4xмl @ /p/ <Ќre~@NF.< 4x?.<NF~ NIp/p/~NI.<|)xp k0 .< 4x/p"]HH/.<04xH"Ag.<04xHgPp/p/~NI.<|)x~!NFEinfgen ~!NFFunktion abgebrochen.ap.<9x.<`HtxpП @ .<)xp/.< 4x/a0.< 4x/a <Ќ><NFp/ <Ќ><NF~jNF/p" ~lNFp-@?~mNF<e <Ќ~9NF <Ќ><NF <Ќ><NF~|NFg <Ќ/ <Ќ/p/a.< 4x/p"\HHg.< 4x/ <Ќ/a p/.<NF <Ќ/ <|Ќ~BNF.< 4x/ <Ќ/ <|Ќ/a <Ќ><NF <"Ќ/ <|Ќ~BNF.< 4x/ <NF <6Ќ/ <|Ќ~BNF.< 4x/ <Ќ/ <|Ќ/a6 <Ќ><NFp1@?~yNF.<:9x.< 4x/ <Ќ/ <|Ќ/a <Ќ><NFp1@?~yNF.<<9x.< 4x/ <Ќ/ <|Ќ/a <Ќ><NFp1@?~yNF.<>9x.< 4x/ <Ќ/ <|Ќ/a^ <Ќ><NFp1@?~yNF.<@9x.< 4x/ <Ќ/ <|Ќ/a <Ќ><NFp1@?~yNF.<NFp1@?~yNF.<NFp1@?~yNF. <Ќ><NF <NFp2@?~yNFgp.<NFp/ <Ќ><NF~jNF/p" ~lNF~!NFBAK~mNF<e <Ќ~9NF <NF,< A><NF.<NFp/ <Ќ><NF~jNF/p" ~lNFp-@?~mNF,< A><NF.<NF <Ќ><NF,< V><NF.<NFp/ <Ќ><NF~jNF/p" ~lNFp-@?~mNF <Ќ><NFp/ <Ќ><NF~jNF/p" ~lNFp-@?~mNF,< V><NF.<NF<e <Ќ~9NF.<NF~ NI.<^ 4x @ .<^)x`.<NFp/ <Ќ><NF~jNF/p" ~lNFp-@?~mNF<e <Ќ~9NF <Ќ><NF <Ќ><NF~|NFg <NF<e <Ќ~9NF.<^ 4xмj @p0@?<e <Ќ~9NF.04xHgp1@?<e <Ќ~9NF`p0@?<e <Ќ~9NF.<NF.<)xp/p/,<><NF.<)xp/p "&kDR/ .<)x.<Htx.< 4xП/p _ .<NF.<)xp.<9x`p.<9x.<04xHgp/p/ < Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p/ <Ќ/~kNI.<)xp/p / <Ќ/~kNI.<)xp/p / <Ќ/~kNI.<)xp/p / <Ќ/~kNI.<)xp/p / <Ќ/~kNI.<)xp/p / <Ќ/~kNI.<)x.< 4x/p/~rNI.<)xp/p/~NI.<)x.<04xH.<9x.<Nx.<04xHt.<NF.<)x.<Nxt.<NF~jNF" /p"><NF"Ё?.< 4x/p "Ё? <Ќ><NF~ NI.< 4x?.< 4x/p!"Ё?.< 4x/p-"Ё? <Ќ><NF~ NI~!NF<e <2Ќ~9NFp/ <Ќ><NF~jNF"&kNR/ .<)x <2Ќ><NFp-@?~mNF<e <2Ќ~9NF.<NF~jNF" /p"><NF"Ё?.<NF~ NI.< 4x?.<NF~ NI~!NF<e <Ќ~9NFp/ <NF~jNF"&kNR/ .<NFp-@?~mNF<e <Ќ~9NF.<NF~jNF" /p"><NF"Ё?.< 4x/p "Ё? <NF~ NI.< 4x?.< 4x/p!"Ё?.< 4x/p-"Ё? < Ќ><NF~ NI~!NF<e <Ќ~9NFp/ < Ќ><NF~jNF"&kNR/ .<)x <Ќ><NFp-@?~mNF<e <Ќ~9NF.<RxSfX.< 4x?.< 4x/p!"Ё?.< 4x/p="Ё? <Ќ><NF~ NIp k0 .< 4x/p/~mNI.<)x.< 4x/p"WHHgh.< 4x/.< 4x/p/.< 4x/.< 4x/.< 4x/.< 4x/p/p/~hNI.<)x`d.< 4x/.< 4x/p/.< 4x/.< 4x/.< 4x/.< 4x/p /p/~hNI.<)x p/p/p/p/p/.< 4x/.< 4x/.< 4x/.< 4x/~nNI.<)xp/p/p/p/p/.< 4x/.< 4x/.< 4x/.< 4x/~nNI.<)x.<HtxpП/.< 4x/p"  _ .<HtxpП/.< 4x/p"  _ .<HtxpП/.< 4x/.< 4x"Ё/p"Ё _ .<HtxpП/.< 4x/.< 4x"Ё/p"Ё _ .< 4x? <Ќ/~NIa.< 4x.<)x.<Nx.< 4x$<.<NF~jNF" /p"><NF"Ё?.< 4x/p "Ё? < Ќ><NF~ NI.< 4x?.< 4x/p!"Ё?.< 4x/p-"Ё? <Ќ><NF~ NI~!NF<e <4Ќ~9NFp/ <Ќ><NF~jNF"&kNR/ .<)x <4Ќ><NFp-@?~mNF<e <4Ќ~9NF.<NF/p"]HHg4~!NFFehlere~!NFNur HIGHRES-Auflsung.taǐ><NF.< 4xм /p( _ .< 4xм(/p* _ .< 4xм,/p _ .< 4xм0/p _ .< 4xм/p _ .< 4xм/p _ .< 4xм^/p _0.< 4xм/p _ .< 4xм$/.< 4xм @  _ .< 4xм/pK _ .< 4xм /p _ .< 4xм\/p _0.< 4xмd/~!NF<e><NF.< 4xм/~!NF<e><NF.< 4xм0/pA _ .< 4xм4/p _0.< 4xм6/p _0.< 4xм8/p _0.< 4xм:/p _0.< 4xм/p _0.< 4xм@/p _0.< 4xмB/p _ .< 4xмF/p _ a.< 4xм4/pП/p _ .< 4xм4/pП/.<2 4x/p"Ё _ .< 4xм4/pП/ < _ .< 4xм4/pП/ < _ .< 4x? <:Ќ/~NI.<Nxt.<Cx k2Q'HJNu.<Nxt$.<NF~ NI.< 4x?p? <Ќ/ <Ќ/ <Ќ/ <Ќ/~&NI.<)x.< 4x/.< 4xмj @p0"Ё/p " .<)x`2.< 4x/.< 4xмj @p0"Ё.<)x.< 4x/p"^HHg(.< 4x?.< 4x?~*NI.<)x.<Nxt.<NF <Ќ><NF~mNF~!NF | Z.: ~mNF<e <NF <Ќ><NF~mNFp/@?~mNF<e <NF <Ќ><NF~mNF~!NF (S. ~mNF<e <NF"~NF/.<NF <Ќ><NF~mNF<e <NF~!NF , l.) ~mNF<e <NF~!NF , r.) ~mNF<e <NF~!NF) ~mNF<e <NF"~NF /p"WHHgpNO.< 4x? <,?.<6 4x? <NF~ NI.<Nxti.<NF/p"Ё _ .< 4xмH/pП/.< 4xм( @ /.< 4xX @ /.< 4xм @ " /p "><NF"Ё/p" /p"Ё _ .< 4xмH/pП/.< 4xм$ @ /.< 4xм @ " /p"Ё/p"><NF/p"  _ .< 4xмH/pП/.< 4xм( @ /.< 4xX @ /.< 4xм @ " /p"Ё/p "><NF"Ё/p" /p"Ё _ .< 4x?.< 4xмH/~NI.< 4x?p?~NI.<)x.<Nxt.<NFp|@?~mNF<e <NFp[@?~mNF<e <NFp]@?~mNF<e <NFp.@?~mNF<e <NFp @?~mNF<e <NF~ NIa.<Nxt8.<NF"Ё/a.<^ 4xX><NF <Ќ><NF~mNF<e <Ќ~9NF <Ќ><NF.<& 4x/pP~lNF<e <Ќ~9NF~NFF@g^.< 4x?p?.<. 4x/.< 4x/.< 4x" /p "><NF"Ё? <Ќ><NF~ NI.<^ 4x/aa.<Nxt8.<NF"Ё/aB.<& 4x/.< 4xX><NF~jNF"_HHgL.< 4xX><NF.<& 4x/pP~lNF <Ќ><NF~mNF<e <NF<e <NFp/pP~lNF<e <NF"Ё? <NF~ NI.< 4x/a.< 4x @ .<)x`V.< 4x?p?.<. 4x/.< 4x/p" /p "><NF"Ё? <Ќ><NF~ NI..a.<Nxt.<NFp ><NFp.><NFp,><NFp;><NFp:><NFp!><NFp?><NF <*Ќ><NF.<Nxt.<"Cx k2Q'HJNu.<Nxtr.<NFp/.<* 4x/p" ~lNF<e <Ќ~9NF`~!NF<e <Ќ~9NF.< 4xX><NF~jNF/.<* 4x"\HHgv <Ќ><NF.< 4xX><NF.<* 4x/.< 4xX><NF~jNF/.<* 4x" /p"Ё~lNF~mNF<e <Ќ~9NF.< 4xX/ <Ќ><NF<e><NF.<* 4x/p" .<*)x.<Nxt8.Ax~NF$_ .<)x/ .<* 4x/.< 4xX><NF~jNF"_HHg@.<* 4x/p"^HHgD.< 4xX><NFp/.<* 4x/p" ~lNF<e <>Ќ~9NF`~!NF<e <>Ќ~9NF.< 4xX><NF~jNF/.<* 4x"^HHgv <>Ќ><NF.< 4xX><NF.<* 4x/p"Ё/.< 4xX><NF~jNF/.<* 4x" ~lNF~mNF<e <>Ќ~9NF.< 4xX/ <>Ќ><NF<e><NF.<Nxt8.<>Cx k2Q'HJNu.<Nx$<.<NF~jNF/.<* 4x"\HHg.<: 4xX><NF.<* 4x/.<: 4xX><NF~jNF/.<* 4x" /p"Ё~lNF<e <Ќ~9NF.<* 4x/p"^HHgL.<: 4xX/.<: 4xX><NFp/.<* 4x/p" ~lNF<e><NF` .<: 4xX/~!NF<e><NF~!NF<e <NFp @?~mNF<e <NF <Ќ><NF~mNF.<: 4xмj @p0?aF.< 4x/p"Ё.<)x.< 4x/p"Ё.< )x.<Nxtm.<NF~jNF"_HHgD.<^ 4xX><NFp/.<* 4x/p" ~lNF<e <Ќ~9NF`$.<^ 4xX><NF<e <Ќ~9NF.<^ 4xX/.<^ 4xX><NF.<* 4x/.<^ 4xX><NF~jNF/.<* 4x" /p"Ё~lNF<e><NF.<^ 4xмl @ /p"^HHgp.<^ 4xмl @ /p" / <^Ќ/a.<^ 4xX/.<^ 4xX><NF <Ќ><NF~mNF<e><NF`p/ <Ќ><NFp?a.<Nxt8.<NFp ><NFp ><NFp ><NF~vNFF@gD.< 4xX><NF~jNF/.<* 4x"\HHg&.<* 4x/p"^HHgD.< 4xX><NFp/.<* 4x/p" ~lNF<e <NF.<04x@?~mNF<e <NF.< 4xX><NF.<* 4x/.< 4xX><NF~jNF/.<* 4x" /p"Ё~lNF~mNF<e <NF~jNF/.<* 4x/p" "&kZR/ .<)x.< 4xX/.< 4xX><NFp @?~mNF<e><NF.<NF.<04x@?~mNF<e <NF<e><NF.<* 4x/pd"]HHg".<* 4x/p"Ё.<*)xav.<* 4x/.<" 4x"^HH/.<04x/ <*Ќ><NF~vNF"Agr.<* 4x/p"Ё/.< 4xX><NF~jNF"]HHg.< 4x/a`aaa.< 4x.<*)xa`:~!NFTextformatierung~!NF... ber "Druckformat" !la..<Nxt;.<NF.< 4x @ мj/p _0.< 4x @ /.< 4x _ .< 4xм /.< 4x @  _ .< 4xм/.< 4x _ .< 4x/.< 4xм/a.< 4xм/.< 4xм @  _ .< 4x/.< 4xм /a.< 4xм$/.<" 4x/.< 4x" /p"Ё _ .< 4xм8/~!NF<e><NFp/.< 4x/p" "&kbR/ .<)x.< 4xм8/.< 4xм8><NFp @?~mNF<e><NF.<NF.< 4xм @ /.< 4x _ .<Nxt.<NF"Ё _ .< 4xм( @ /p"^HH/.< 4xм @ мj @p0/p"WHH"AgH.< 4xм(/.< 4xм( @ /p/.< 4x"><NF"Ё _ .< 4xм(/.< 4xм( @ /.< 4xм @ X><NF~jNF/.< 4x"><NF"Ё _ .<Nxt.<NF~ NI.< 4xм0/pSП/p _ .<~04xHg.< 4xм(/p _ `.< 4xм(/p _ .< 4x @ /.< 4x"WHHg.< 4xм /a8.< 4xм @ X/~!NF<e><NF.< 4xм @ мj/p _0.< 4xм @ .< tx .< 4xм @ /.< 4x"VHHg.< 4xм @ X><NF~!NF~|NFg.< 4xм @ X/.< 4xП @p/ <*Ќ><NF~vNFF@gD.< 4xм @ X><NF~jNF/p"WHHgj.< 4xм0/pSП/.< 4xм0/pSП @ /p"Ё _ .< 4xм @ мj/p _0.< 4xм @ X/.< 4xм @ X><NF.< 4xм @ X/.< 4xП @p@?~mNF<e><NF.< 4xм(/.< 4xм( @ /p"Ё _ `".< 4xм @ X><NF~jNF/p"WHHF@ga<.< 4xм @ X/.< 4xП @p/p "WHHF@g.< 4xм @ X/.< 4xм @ X/.< 4xП @p@?<e><NF.< 4xм @ мj/p _0.< 4xм(/.< 4xм( @ /p"Ё _ aT.< 4x/p"Ё.<)x.< 4x/.< 4xм @ X><NF~jNF"^HHg.< 4xм/.< 4xм @  @  _ p.<)x.< 4xм @ /.< 4xм @  @ "WHHg".< 4xм/.< 4x _ `.< 4xм/.< 4xм @  @  _ p.<)x.< 4xм @ /.< 4xм @  @ "WHHg".< 4xм/.< 4x _ .< 4x/p"WHH/.< 4xм( @ /.< 4xм0/pSП @ "Ё/.< 4xм$ @ "\HH"A/.< 4xм @ /.< 4x"WHH"A/.<04xH"Ag.<04xHgdp/p/~NI.<)x~!NFEinfgen ~!NFFunktion abgebrochen.a.< 4xм/.< 4x _ .< 4x @ X><NF~jNF/p"^HHgN.< 4xм/.< 4x @  _ p.<9x.<~04xHg.< 4xм(/p _ `.< 4xм(/p _ .< 4xм0/pSП/p _ .< 4xм0/pSП/p _ .< 4xм/.< 4x _ .<04xHF@/.< 4xм @ /.< 4x"VHH"Agp/a`.< 4xм( @ /.< 4xм$ @ "\HH/.< 4xм @  @ /.< 4x"VHH/.< 4xм @  @ мj @p0/p"WHH"A/.< 4xм( @ /.< 4xм$ @ /p" "WHH"A"AgDp.<9xp/ad.< 4xм/.< 4xм @  _ `Z.< 4xм/.< 4xм @  _ .< 4xм/.< 4xм @  @  _ `2.< 4xм/.< 4x @  _ .<~04xHg~!NF n<e <Ќ~9NF`~!NF<e <Ќ~9NF.< 4x&rfXp.<)xp.<)x.< 4xм0/.< 4x @ мj @p0SП/.< 4xм0/.< 4x @ мj @p0SП @ /p"  _ .< 4xм$ @ /.< 4xм( @ " .<)x.<~04xHg.< 4x/p"Ё.<)x.< 4xм0/pSП @ /p"^HHg@.< 4x/.< 4xм0/pSП @ "~NF.<)x`p.<)x.< 4x/p"Ё.<)x.< 4xм0/pSП @ /p"^HHgB.< 4x/.< 4xм0/pSП @ "~NF .<)x`p.<)x.< 4x @ /.< 4xм @  @ "VHHg.< 4x/p"Ё.<)x.< 4x/p"^HHg.< 4xм @ /.< 4x"VHHg.< 4x @ мj @p0/p"WHHg.< 4x/p"Ё.<)xp/.< 4x"&kNR/ .<)x <Ќ><NFp @?~mNF<e <Ќ~9NF.<NFp @?~mNF<e <Ќ~9NF`X.< 4x @ мj @p0/p"WHHg, <Ќ><NFp @?~mNF<e <Ќ~9NF <Ќ><NF.< 4x @ X><NF~mNF<e <Ќ~9NF.< 4x @  @ .< tx ``ցrf~!NF<e <Ќ~9NFp.<)x.< 4xм$ @ /.< 4xм( @ " /p~"NF&( ~"NF><NF//.< 4xм$ @ /.< 4xм( @ " /p~"NF&( ~"NF><NF~hNF&(,*~{NFg.< 4xм0/pSП @ /.< 4xм0/pSП @ "Ё/p~"NF&( ~"NF><NF~+NF/p"Ё.<)xp/.< 4xм$ @ /.< 4xм( @ " /p" /p"~NF"&kNR/ .<)x <Ќ><NFp @?~mNF<e <Ќ~9NF.<NFp @?~mNF<e <Ќ~9NF.<NFp @?~mNF<e <Ќ~9NF.< 4x @ мj @p0/p"WHH/.< 4x/p"^HH"Ag, <Ќ><NFp @?~mNF<e <Ќ~9NF <Ќ><NF.< 4x @ X><NF~mNF<e <Ќ~9NF.< 4x @  @ .< tx ``ցrf.< 4x @ /.< 4xм @  @ "VHHg.< 4x @ мj @p0/p"WHH/ <Ќ><NF~!NF~|NF"Ag, <Ќ><NFp @?~mNF<e <Ќ~9NF <Ќ><NF.< 4x @ X><NF~mNF<e <Ќ~9NF.< 4x @  @ .< tx `.< 4x @ /.< 4x"VHHg.< 4xм/.< 4xм @  _ p.<)x.< 4x/p"WHHg.< 4xм @  @ /.< 4x @ "VHHg~.< 4xм/.< 4xм @  @  _ .< 4xм @ /.<NF <Ќ><NF~mNF<e><NF.< 4xм @ мj/p _0.< 4xм/.< 4xм @  @  _ .< 4xм @ мl @ /.< 4x"^HH/.< 4xм @ /.< 4x"WHH"Ag.< 4x/p"Ё.<)x.< 4x/p"Ё.<)x.< 4x/~!NFp?.<}:Nx.< 4x/.< 4xм/.<NF.<)xp/ <"&kR/ .<)x.<NFП/pSП/.< 4x _ .<NFП/pSП/ <, _ .Ќ~9NF <Ќ/ <>Ќ/p/.<}Nx.< 4x/p"]HHg:~!NFFehlere~!NFSCHWAGER.PRT fehlerhaft.l.<Nx`.< 4x/ <>Ќ/ <Ќ/.<}Nx <>Ќ><NFp/p~lNF <Ќ/ <Ќ~BNFp.<)x.< 4x/p"^HHg.< 4x/p"Ё.<)x <>Ќ><NF.< 4x/p"><NF/p"Ё/p~lNF<e <Ќ~9NF <Ќ><NF.<NFП/.< 4xSП/ <Ќ~BNF.<NFП/.< 4xSП @ / <,"WHHg .< 4x/p"]HH/.< 4x/p"WHH"AgR.< 4x/.<}Nx.<Nxts.<NFП/.<NFП/.<NFП/.<NF~jNF"&kjR/ .<>)x <^Ќ/.<> 4xП @p/p "VHH/.<<04xH"Ag.<\04x/p"/p"VHHg </a.<\04x/p"/p"VHHg </a.<\04x/p"/p"VHHg </aX.<\04x/p "/p"VHHg </a"p.<<9x <^Ќ/.<> 4xП @p/a.<>RxSfX.<\04x/p"/p"VHHg </a.<\04x/p"/p"VHHg </av.<\04x/p"/p"VHHg </a@.<\04x/p "/p"VHHg </a .Ќ~9NF~!NFmkb.txt<e <Ќ~9NF.<Nxt..<Ax~NF$_<e <Ќ~9NF/ <Ќ><NF~jNF.<)x <Ќ><NF<e <Ќ~9NF.< 4x/p" .<)x <Ќ><NFp/.< 4x~lNF<e <Ќ~9NF <Ќ/.< 4xП @p/p\"WHHg <Ќ><NF<e <Ќ~9NF.<Nx$_ <Ќ><NF/ $<.<Cx k2Q'HJNu.<Nxt .<Ax~NF.< 4x/p//p/~tNI.<)x.< 4x/p3/p/~tNI.<)x.< 4x/p,/p/~tNI.<)x.< 4x/p-/p/~tNI.<)x.< 4x/p(/p/~tNI.<)x.< 4x/p)/p/~tNI.<)x.< 4x/p*/p/~tNI.<)x.< 4x/p1/p/~tNI.<)xp.<NFp @?~mNF<e.<~Z 4x~9NF.<~NRxSfX.<~b04xHg:.<~Z 4x><NF <NF~mNF<e.<~Z 4x~9NF`6.<~Z 4x><NF <Ќ><NF~mNF<e.<~Z 4x~9NF.<~Z 4x><NF~jNF/.<" 4x/.<NF"^HHg6.<~Z 4x><NFp/.<" 4x~lNF<e.<~Z 4x~9NF.<~Z 4x><NF~jNF/pO"&kRR/ .<~N)x.<~Z 4x><NFp @?~mNF<e.<~Z 4x~9NF.<~NRxSfX.<~ 4x/.04xH"A"Ag6p/ <}Ќ><NF~jNF"&kR/ .<~N)x.<@04xH/.<NF~jNF" /.<~N 4x"ЁП/ <}Ќ/.<~N 4xП @p _.<NF~jNF/p"~NF" /.<~N 4x"Ё/p" П/ <}Ќ/.<~N 4xП @p _.<~NRxSfX.<~b04xHg0p /.<~Z 4x><NF~$NF~mNF<e.<~Z 4x~9NF.<Nxt?.<}Cx k2Q'HJNu$<.<~dAx~NF$_ .<~)x .<~)x .<)x/ a|.<~ 4x/p"WHHg6~!NF Block drucken~!NFDrucke Z. e.<NF~!NF~|NF/.<~ 4xмl @ /p" /.<6 4x"~NF /p"WHH"Agtp/.<~ 4xмl @ / <~dЌ/a <~dЌ><NFp?p/at~!NF<e <~dЌ~9NF <~dЌ><NFp?p/aD.<~ 4xмl @ .<~)x.<NF.<~ 4xмj @p0?p/a`.<~ 4xX><NFp/.<" 4x~lNF<e <~dЌ~9NF <~dЌ><NF~jNF/.<" 4x/p" "&kNR/ .<~)x <~dЌ><NFp @?~mNF<e <~dЌ~9NF.<~RxSfX <~dЌ><NF.<~ 4xмj @p0?p/a.<~ 4x/.<6 4x"Ё/.< 4x"_HHg6.<~ 4x/.<6 4x"Ё/ <~Ќ/.<NF.<~ 4xмj @p0?p/a"`~!NFp?p/a .<~ 4xмl @ /p/ <6Ќre~@NF.< 4x?.<~ 4x/pr"Ё?.<~ 4x/p-"Ё? <6Ќ><NF~ NI.<~ 4xмl @ /.<6 4x"~NF /p"WHHg <Ќ><NF~!NF~|NFg.<~ 4x/p"WHHgp.@?<e <~dЌ~9NF`p<@?<e <~dЌ~9NFp/pN"&kNR/ .<~)x <~dЌ><NFp @?~mNF<e <~dЌ~9NF.<~RxSfX.<~ 4x/.< 4x/.<6 4x/.<NF"~NF"]HHg0 <~dЌ><NFp>@?~mNF<e <~dЌ~9NF`, <~dЌ><NFp.@?~mNF<e <~dЌ~9NF <~dЌ><NFp?p/ap/.<~ 4xмl @ /p" / <~dЌ/a <~dЌ><NFp?p/a.<~ 4x/p"Ё.<~)x.<NF~!NF~|NFg.<~ 4x/.<6 4x"~NF /p"VHHg~NF~NF~NF.<~ 4x/p"Ё.<~)x.<~ 4x/.<6 4x"~NF /p"WHHg*.<~ 4x/p"WHHgp.@?<e <~dЌ~9NF`p<@?<e <~dЌ~9NFp/pN"&kNR/ .<~)x <~dЌ><NFp @?~mNF<e <~dЌ~9NF.<~RxSfX <~dЌ><NFp.@?~mNF<e <~dЌ~9NF <~dЌ><NFp?p/ap/.<~ 4x/ <~dЌ/a <~dЌ><NFp?p/a`N <,<><NF/p"VHHgp/p/~NI.<~)x~!NFDruck unterbrochenr~!NF Weitermachenr.<NF~ NIp/p/~NI.<~)x`a.<NxtP.<~dCx k2Q'HJNu$<t.<\Ax~NF <Ќ/ <Ќ/ <Ќ/ <Ќ/><NI.<)xp.<)xap.<)xp.<)xp.<)x.<04xHg6~!NFSpeichermangelc~!NFArbeit sichern !e.f2.ց"<Cfp .<)x` ց"<Dfp.<)x`ց"< g ց"<r fp.<)x`ց"< g ց"<r fp.<)x`ց"<sfp.<)x`ց"<RfV.< 4x/p"WHHgp.<)x.< 4x/p"WHHgp%.<)x`*ց"<Sfp.<)x` ց"<bfp.<)x`ց"<Gfp.<)x`ց"<G7fp.<)x`ց"<Kfp.<)x`ց"<HfV.< 4x/p"WHHgp-.<)x.< 4x/p"WHHgp.<)x`2ց"<Mfp.<)x`ց"<PfV.< 4x/p"WHHgp..<)x.< 4x/p"WHHgp.<)x`ց"<Wfp(.<)x`ց"< f^.< 4x/p"WHHgZ.<* 4x/.<" 4x"]HHg&p.<)x.<* 4x.<)x`p4.<)x`.< 4x/><NFp><NFp><NF~vNFgZ.<* 4x/.< 4x"^HHg&p.<)x.<* 4x.<)x`p4.<)x`d.< 4x/p"WHHgp&.<)x`8.< 4x/><NFp><NFp><NF~vNFgp'.<)x`*ց"<fp.<)x` ց"<Sfp .<)x`ց"<!fp).<)x`ց"<% fp*.<)x`ց"<fp+.<)x`ց"<fp,.<)x`vց"<1fp1.<)x`Xց"<afp/.<)x`:ց"<Zfp0.<)x`ց"<[fp3.<)x.< 4x/p"WHHg.< 4x/.< 4x/ <"~NF/ <"><NF" /p"VHHgRp.<)x.< 4x/.< 4x/ <"~NF/ <"><NF" .<)x.< 4x/p"WHHg.< 4x/p "]HHg.< 4x/p"~NF/.<& 4x"Ё.<)xp4.<)x.< 4x/p"WHHg2.< 4x/.<" 4x"]HHgp.<)x.< 4x/p"WHHg2.< 4x/.< 4x"^HHgp.<)x`.< 4x/p"]HHgV.< 4x/p"WHHgp.<)x.< 4x/p"WHHgp'.<)x`$.< 4x/ <{"^HHgV.< 4x/p"WHHgp.<)x.< 4x/p"WHHgp&.<)x`.< 4x/p$"]HHgV.< 4x/p"WHHgp.<)x.< 4x/p"WHHgp-.<)x`@.< 4x/ <"^HHgV.< 4x/p"WHHgp.<)x.< 4x/p"WHHgp..<)x`.< 4x/p"~NF/.<& 4x"Ё.<*)x.< 4x/.<. 4x" /p "~NF/.< 4x"Ё.< )x.< 4x/.< 4x"^HHg.< 4x.< )xa aap k0 p4.<)x.< 4x/p"WHHgp <Ќ/p"Ё @p.<)x <Ќ/p "Ё @p&r fp.<)x` ցrfp.<)x`ցrfp.<)x`ցr/fp.<)x`ցrfp.<)x`ցr3fp.<)x`ցr,fp.<)x`ցr-fp.<)x`jցr1fp2.<)x`Pցr(fp .<)x`6ցr)fp .<)x`ցr*fp .<)x`ցr fp .<)x`ցr#fp .<)x`ցr%fp(.<)x`ցrfp).<)x`ցrfp*.<)x`ցrfp+.<)x`fցrfp,.<)x`Lցrfp1.<)x`2ցrfp0.<)x`ցr"fp3.<)x.< 4x/p4"VHHg .< 4x&rfd.<NF.< 4x.<NI.<)x .< 4x? <:Ќ/~NI.<NFar <NF~mNF.< 4x/.<NI.<)x .< 4x? <:Ќ/~NIp k0 .<NFaT <NF~mNFp/.< 4x/.Ќ/ <Ќ/ <Ќ/><NI.<)x .< 4x? <:Ќ/~NI.Ќ><NFaN <Ќ><NF~mNF.< 4x/.< 4x/.ցrf~!NF Blockarbeit~!NFBlock lschen ?.<NF.<NF.<NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <6Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p"VHHgT <6Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <6Ќ~9NF <6Ќ><NF~jNF/p"^HH/.< 4x/.< 4x"Ё/p"  @p/p"WHH"Ag.< 4x/p/p"><NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p"VHHgT <Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <Ќ~9NF <Ќ><NF~jNF/p"^HH/.< 4x/.< 4x"Ё/p"  @p/p"WHH"Agp.<)xp.<)x.< 4x/.< 4x"_HH/.< 4x/p"WHH"A/ <6Ќ><NF <Ќ><NF~|NF/.< 4x/p"WHH"A"Agn <6Ќ><NF.<NF~kNF.<)x.< 4x/p"WHHg:.<NF~mNF~!NF ersetzen ?~mNF.<NFp/.< 4x/p" ~lNF <Ќ><NF~mNF.<NF.< 4x/ <6Ќ><NF~jNF"Ё/.<NF~jNF/.< 4x" / <6Ќ><NF~jNF"Ё~lNF~mNF<e><NF.< 4x/><NFp><NFp><NF~vNFF@g..< 4x/p" .<)x.< 4x/p" .<)x.< 4x/.<3Nx.< 4x/p" .<)x.< 4x/.< 4x"^HHg.< 4x.< )x`8p/ <NF.Nx.<)x`ցr f*.< 4x/p /.<NF.< 4x.<NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <6Ќ~9NFp/p"&kvR/ .<)x <6Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <6Ќ~9NF.<NF <Ќ/ <Ќ~BNF.< 4x/p"\HH/.< 4x/ <"_HH"Ag.<NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p /p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <6Ќ~9NFp.<)xp/p?"&kR/ .<)x.< 4x/ <NF~jNF"_HHgL.< 4x/.< 4x"Ё/p" / <NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p /p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <6Ќ~9NFp.<)xp/p?"&kR/ .<)x.< 4x/ <Ќ><NF~jNF"_HHgL.< 4x/.< 4x"Ё/p" / <Ќ/.< 4xП @p _`..< 4x/.< 4x"Ё/p" /p_ _.<NF~jNF/p"WHHg,p0/ <6Ќ><NF~$NF~mNF<e <6Ќ~9NF.< 4x/p/p"><NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)xp/p"&kjR/ .<)x.< 4x/.< 4x"Ё/p" / <6Ќ/.< 4xП @p _.<NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x.< 4x/ <6Ќ/pП @p _.<NF~jNF/p"WHHg,p0/ <6Ќ><NF~$NF~mNF<e <6Ќ~9NF.< 4x/p/p"><NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)xp/p"&kjR/ .<)x.< 4x/.< 4x"Ё/p" / <6Ќ/.< 4xП @p _.<NFpO@?~mNF<e <6Ќ~9NF`j.<>04xHg0 <6Ќ><NFpU@?~mNF<e <6Ќ~9NF`, <6Ќ><NFp_@?~mNF<e <6Ќ~9NF.< 4x/p/p"><NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)xp/p"&kjR/ .<)x.< 4x/.< 4x"Ё/p" / <6Ќ/.< 4xП @p _.<NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p /p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <6Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p_"VHHgT <6Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <6Ќ~9NF <6Ќ><NF~jNF/p?"^HH/.< 4x/.< 4x"Ё/p"  @p/p_"WHH"Ag <6Ќ><NF<e <NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p /p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p_"VHHgT <Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <Ќ~9NF <Ќ><NF~jNF/p?"^HH/.< 4x/.< 4x"Ё/p"  @p/p_"WHH"Ag <Ќ><NF<e <Ќ~9NF.< 4x/p/p"><NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p"VHHgT <Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <Ќ~9NF <Ќ><NF~jNF/p"^HH/.< 4x/.< 4x"Ё/p"  @p/p"WHH"Ag <Ќ><NF <6Ќ/ <Ќ~BNF.< 4x/p/p"><NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x.< 4x @p@?<e <Ќ~9NF <Ќ><NFp2@?~yNF/.<6 4x/p"~NF /p"WHH"Agp.<NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p"VHHgT <Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <Ќ~9NF <Ќ><NF~jNF/p"^HH/.< 4x/.< 4x"Ё/p"  @p/p"WHH"Ag <Ќ><NF <NF"Ё/p "Ё @p0/ <"><NF/.< 4x/p/p"><NF"Ё/p"Ё @p0"Ё.<)x.< 4x @p0/ <"><NF/.< 4x/p"Ё @p0"Ё.<)x~!NF<e <Ќ~9NFp.<)x.< 4x/p"Ё.<)x.< 4x/.< 4x"Ё/p"  @p/p"VHHgT <Ќ><NF.< 4x/.< 4x"Ё/p"  @p@?~mNF<e <Ќ~9NF <Ќ><NF~jNF/p"^HH/.< 4x/.< 4x"Ё/p"  @p/p"WHH"Agp.<<9xp.<>9x <Ќ/pП @p~*NF&rOfp.<<9x`ցrUfp.<>9xp.<@9xp.9xp.<@9xp.Nx.< 4x/p"VHHg,.< 4x/.< 4x/p/~uNI.<)x.< 4x/p"WHHg.<Nx$<.<\Cx k2Q'HJNup.<9x.Nx.<^Nxaaad.<&Nx.<Nx><NF:9xp.<<9xp.<>9xp.<@9xp.Nx.< 4x/p"VHHg,.< 4x/.< 4x/p/~uNI.<)x.< 4x/p"WHHg.<Nx$<.<\Cx k2Q'HJNup.<9x.Nx.<^Nxaaad.<&158.225.300 { } 256.027.071.300 { Fett ein } 257.027.072.300 { Fett aus } 258.027.045.049.300 { Unterstreichen ein } 259.027.033.000.300 { Unterstreichen aus } 260.027.083.001.300 { Klein an } 261.027.084.300 { Klein aus } 262.300 { Kursiv an } 263.300 { Kursiv aus } %F%F<<$=. =f Schwager Datei Text Block Schwager ...-------------------- Desk-Zubehr 1 Desk-Zubehr 2 Desk-Zubehr 3 Desk-Zubehr 4 Desk-Zubehr 5 Desk-Zubehr 6 Einfgen ... f1 Speichern ... f2----------------------- Beenden ... f10 Zeilendarstellung ... fett ^f ... kursiv ^k ... unterstrichen ^u ... klein ^s ... normal ^n-------------------------- ASCII einfgen ... F7-------------------------- Suchen/Ersetzen ... f8-------------------------- Druckformat ... F8 Drucken ... f9-------------------------- Lschen ... F4 Formatieren ... Blocksatz f6 ... Flattersatz F6 ... Zentriert f7------------------------ Verschieben f5 Kopieren F5------------------------ Speichern ... F2------------------------ Drucken F9------------------------ Lschen ... f4InfomkbSchwager--------------------------(2.- 10. Aug. 1990)Nichts zu schreiben ist besserdenn viel Mittelma.(Schwager-Text ist nullus)SuchtextSuchtextSuchtext________________________XXXXXXXXXXXXXXXXXXXXXXXXZieltextZieltextZieltext________________________XXXXXXXXXXXXXXXXXXXXXXXXSuchen/ErsetzenSuchenErsetzenASCII einfgen000___999ASCII-Code :-----------------HilfeInformation ber ...--------------------F-TastenEditierfunktionenBlockfunktionenMausfunktionenVerhalten bei Speichermangel---------------Funktionstastenf5 : Block verschiebenF5 : Block kopierenf6 : Format BlocksatzF6 : Format Flattersatzf7 : Format ZentriertF7 :f8 : Suchen/ErsetzenF8 :f9 : Text druckenF9 : Block druckenf10: ProgrammendeF10:f1 : Datei einfgenF1 :f2 : Text speichernF2 : Block speichernf3 : BlockanfangF3 : Blockendef4 : Block lschenF4 : Text lschenHilfe-----------------Editierfunktionen^return : Ab Cursor in nchste Z. verschieben^ : Bis Cursor in vorherige Z. verschieben^insert : Zeile einfgen^delete : Zeile lschen^ : Seite zurckundo : gelschte Zeile zurckholen^ : Seite weiterclr : zum AnfangCLR : zum Endetab : Tabulator rechtsTAB : Tabulator links^f : Zeile fett^f : Zeile unsterstrichen^k : Zeile kursiv^s : Zeile klein^n : Zeile normalTextarbeitBltternZeilendarstellungHilfeRnder^tab : linker Rand^TAB : rechter Rand---------------Blockfunktionenf3 : BlockanfangBlockarbeitBlock definieren (definierter Block grau unterlegt)F3 : Blockendef4 : ... lschenf5 : ... verschiebenF5 : ... kopierenBlock formatierenf6 : BlocksatzF6 : Flattersatzf7 : ZentriertF2 : Block speichernF9 : Block druckenSonstigesHilfe---------------MausfunktionenCursorposition (wenn Zeiger auf Editierfeld)HilfeRnder (wenn Zeiger auf Randzeile)Einfachklick : linker RandDoppelklick : rechter RandEinfachklick : neue Position des CursorsTextblttern (wenn Zeiger auf Rndern)Zeiger ganz linksEinfachklick : Cursor nach linksDoppelklick : Tab linksZeiger ganz rechtsEinfachklick : Cursor nach rechtsDoppelklick : Tab rechtsZeiger ganz obenDoppelklick : Seite zurckEinfachklick : Zeile zurckZeiger ganz untenEinfachklick : Zeile weiterDoppelklick : Seite weiterJaAbbruchJa----------------------------Verhalten bei SpeichermangelHilfe1. speicherintensive Funktionen meiden - Einlesen von Dateien - Formatieren - Einfgen von Zeilen2. Sofort aktuellen Text speichern3. Beenden des ProgrammesDruckformatLnge : bernahme; Seitennummern ab :, Ort :LschenKopfzeileKopfzeileKopfzeileKopfzeileKopfzeileKopfzeileKopfzeile_______________________________________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXFuzeileFuzeileFuzeileFuzeileFuzeileFuzeileFuzeileFuzeil_______________________________________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX; Spalten :00__xx0_x00__xxRO__xxxx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<xx8<<|<lL, |\ =>?TUVqrs "#$-. />?@DHLYZ [mnouvw $%&=>?STUklm#$%9:;PQRcdetuv../10IJKcdewxy&      6 7 8 J K L ] ^ _ q r s ~                  R S4 T c d e v w x             " #  $ * + < K L M N O P } ~-   #    )  9 :' ; M N O p q! r   "      / 0 1 C D E a b c         ' 012JKLop#q   ]@@@@]ij knqtvxz}PP $  .  5 ;&P  B Q f y &%0D]v ! ") #D $] %v '3 ()*+,-../E0^1u 2 3 &    "1"!< *  F  b ~    !J 1   5 &  1B!X ^z    $ 1$!f       "  >5 Z   &!t v     :  V r      6R n      1&7 +! !$2  N j   1+         .  J f       * F  b *!  ~  1* &       & B  ^  z           " %!  , > Z v!  1%         ! ! !:  !V !r !  ! ! ! ! ""6 "R "n   1!   1! 7 " 1!  "' "  % !  "" 1%# #2 #N #j  ##  #  E! 1E# # $:  $. $J8  $f1 $? $?$  $  $ %4( %*@%F*&+^,N-&.^0358f89n:;~IMENUDESKDATEITEXT INFOLADENSICHERNENDERNFETTRNKURSIVUNTERSTRKLEINTRNORMTRASCEINFG SUCHENG"KOPFNG#DRUCKEN%LSCHEN(BLOCKS)FLATTERS*ZENTRRS,BLKVERS-BLKKOP/BLKSICH1BLKDRCK3BLKCLRINFOBOXINFEXITSUCHBOXFSUCHTXTEERSTXTESUCHEXITSUCHEIT ERSEITASCEINFASCEXITASCEINHELPBOXHELPEXITFTASTIT EDITIER BLOCKF MAUSF SPEICHFTASTBOXFTASTEXEDITFBOX EDITEXITBLOCKBOXBLOCKEXMAUSFBOX MAUSEXIT MELDUNG BOXEXIT JABOXT JABOXEX JAEXIT JAABRBOX JAABREX ABBREXIT ABJAEXIT SPEICHBX SPEICHEX ZEILBOX ZEXITX ZUEBERN ZABBRN KOPFZN FUSSZN ZEILENZ ZSPANZ ZNUMAB ZORTB ******************************************************************** Deze diskette is samengesteld door de Stichting ST, Postbus 11129, 2301 EC Leiden. Onze bibliotheek van public domain programma's omvat op dit moment (lente 1991) al meer dan vijfhonderd disks. Daarop vindt u programma's op elk gebied, van tekstverwerker en database tot de leukste spelletjes, de fraaiste tekenprogramma's en de handigste utilities. Ook bevat onze bibliotheek een speciale afdeling voor public domain disks met Macintosh software, die te gebruiken zijn onder de ALADIN emulator. Deze MAC-PD serie bevat tot nu toe ongeveer vijfendertig disks. ******************************************************************** U vindt in het twee maandelijks tijdschrift "ST" (Onafhankelijk tijd- schrift van en voor gebruikers van Atari ST computers) een overzicht en een bespreking van de inhoud van de nieuwe public-domain diskettes. Dit tijdschrift bevat tevens een bestelkaart zodat U vlot over de software kunt beschikken. De Stichting ST geeft ook een speciale PD catalogus disk uit. Deze public domain disk is geproduceerd en gedistribueerd door: ************** Stichting ST afd. Software Bakkersteeg 9A 2311 RH LEIDEN ************** Ondanks onze controle komt het af en toe voor dat een diskje niet goed is gecopieerd.Mocht U dit overkomen, aarzel dan niet en stuur de defecte disk aan ons terug. U krijgt dan direct een vervangende disk toegestuurd. ************************************************************************ Teneinde het voor ons mogelijk te maken om productiefouten op te sporen en vervolgens in de toekomst te vermijden, zijn alle disks, geproduceerd door de Stichting ST, voorzien van een groen productienummer. ************************************************************************