NNNNNN&p O`  @`! #@%`')+-/1 3@5`79;=?AC@E`GIKMOQ S@U`WY[]_aO`  @`! #@%`')+-/1 3@5`79;=?AC@E`GIKMOQ S@U`WY[]_aBILDBUCH 2. 2.. BILDBUCHPRG 2tBILDBUCHTXT 2:LIES_1STTXT 2@TXT COL 2B}`X,o.. .N <//Bg?<JNAa oBNA n"| Sf$|N`"FIDDENN.2ۋD92 0GPECIAL۞N.1)+41 &IAFCOSKN.X*62]6wDIOSN.zF?V~EBIOSN.oX{#U2EINEAN.4{ ^ISSEMBLERN.J"pO`io"K>.^(}[*W"AiCES-vN.bŚ;{XO ÚŇ:ŴCDIN.̞ʦ̈́טxͯYqhTJ/CEMN.--uKؿO>'Nu PPLICATIONN-OLD yN TACKDEPTH NPN[URRENT^NFIDTHN ICTLIMITN0ASEfN LDNZPLNINN#DOX // oN$?DO跋gX +/+/ oN _ PN%EAVE _ `N#OFfXNuY _ PNFIND>"[ Sr~ GSE$HƇ։fJ4 fDQX&g'<`Bg'<`Bg'<`B'< Nu$C"R( fB NufRANCH yX0N#XNugBRANCH yX Jf0N#XNuERFORM [ PNNu0N LEARSTACK&yBNuP!5&SNuP@' Nu0N'LEARRSG W.yNУP!ڳ.[Nu>IO HH&Nu>I H&NuXTENDJkBNu' "&Nu* &Nu* &Nu* &Nu6* &Nu/ &Nu/ &Nu/ &Nu6/ &Nu+[RNu+gTNu+sVNu+XNu+ZNu+\Nu+^Nu+PNu+ Nu-SNu-kUNu-WNu-{YNu-[Nu-]Nu-_Nu-QNu- NuALSEOBNuRUE'Jn`<>Jf`g`m`n`=Go`>sf`=Ylt`<Jk JkrQ`JjRQDD`=n +gBNu&NuITHIN" oBNuo&NuXECUTE [NNuTOGGLE [ NuVEN+gRNuXITXNuEXITJgXNuOUNT SRBPNuOOPdNuMOVE "[ [JgSfNuMOVE> "[ [Jg  SfNuILL+ " [JgSfNuNCLOSE  SrR0g'0ggR`fR''Nu'R'Nu>CFA SX&Nu>PFA( S &Nu>LFAD S&Nu>NFA S]YJ jS&Nu>LFA~ Nu>CFA]Nu>NFAj SYJ jS&Nu>LFAYNu>PFA\NuICKx '3NuOLLp "3"K IX!!YnX'Nu Я'Nu'}'/Nu!Y /Я'Nu''/Nu!y /Я 'Nu''/NuR/Nu@'NuR@b/NuDROP%XNu2DROPtPNu _ NuUSHߺ"W [.//<NѣP@'Nu'Nu''/Nu'/Nu' '/ Nu3'/Nu''/Nu*S &Nu/g "H&NuMOD "HAH&Nu* &Nu/ "7ABSNuMOD "HA7ABSNu+! [RNu+! [XNu+! [ PNu! [ Nu-! [SNu-! [YNu-! [ PNu! [ Nu@f S&Nu!; [ NuP@ S P&NuP!V [ P NuP+ NuPICKv &NuP+ NuOVE "[ [JgnSf`  SfNuNSTR,(".&t"G*S$D fQ&'<` RRQBNu=., F"Gz f Q&`n&`&S'BNu,] yX #XNuONVERTX [4209v"|R0k*  o o_lHBBBԁԃ2HBJkR`67S'NuNIT'' ' NuUT"h$h 2 5@ 4NuET$h 5@ 4&NuINE1| $[!Z"!Z!R 1@, 1@* 1@( 1@&NuLINE1| $[!Z.!Z21Z$!Z!R 1@* 1@( 1@&NuHOW"h$hBj5|BQ NuIDEN Nu RANSFORM"hr\$["Q NuNDRAW$[ NuRAW$[ ["  Nu ECTANGLE1| $[1Z$!Z.!Z21Z6!Z8!Z\1|@p20 _"_Q00NuOLYGONР"[&.,SF*((1Y$!Y.!Y21Y6!Y8!Y?+?<NNX&NuHYSBASE?<NNT'NuOGBASE?<NNT'NuETREZ?<NNT7BcNu ETSCREEN ?//?<NNPXNu ETPALETTE/?<NN\NuETCOLOR9 ? ??<NN\7BcNuLOPRDt ?QB/?<NNH'NuLOPWRyt ?QB/?< NNH'NuLOPFMT ?// ??<NNPNuDISINT ??<NNXNuENABINT ??<NNXNuIACCESSV ??+?<NN\7@NuFFGIBIT ??<NNXNuNGIBIT ??<NNXNuBTIMER/ ? ? ??<NNPXNuOSOUND/?< NN\NuETPRT?+?<!NNX7@BSNuBDVBASE?<"NNT'NuBRATE ??+?<#NN\7@NuRTBLK/?<$NN\NuVBL?<%NNTNuUPEXECq/?<&NN\NuETMPB/BgNM\Nu ONINSTAT?+?<NMXH&NuONIN?+?<NMX&NuONOUT& ? ??<NM\NuWABS ? ? ?/?+?<NMP\H&NuETEXEC/?+?<NMP&NuICKCAL?<NMT'NuETBPB?+?<NMX&Nu ONOUTSTATa?+?<NMXH&NuEDIACH?+?< NMX7@BSNuRVMAP?< NMT'NuBSHIFT?+?< NMX7@BSNuERMBgNANuONIN?<NAT'NuONOUT ??<NAXNuUXIN?<NATB#BcNuUXOUT @??<NAXNuRTOUT?+?<NAXH&NuAWCONIOL?+?<NAX&NuCIWE?<NAT'Nu RINTLINE/?< NA\'NuEADLINE /?< NA\7BcNuONSTAT?< NATH'NuETDRV?+?<NAX7@BSNu RTOUTSTAT@?<NATH'Nu UXINSTAT?<NATH'Nu UXOUTSTAT?<NATH'Nu URRENTDISKz?<NAT7BcNuETDTA/?<NA\NuUPER+/?< NA\&NuETDATE?<*NAT7BcNuETDATEB ??<+NAXNuETTIMEq?<,NAT7BcNuETTIMEt ??<-NAXNuETDTAZ?</NAT'Nu ETVERSION?<0NAT7BcNu EEPPROCESS ?/?<1NANuETDFS ?/?<6NAPNuKDIR/?<9NA\H'NuMDIRO/?<:NA\H'NuHDIR /?<;NA\H'NuREATEf ?/?<NAXH&NuEAD//?+?<?NAPX&NuRITE//?+?<@NAPX&NuNLINK/?<ANA\H'NuSEEK ? ?/?<BNAPT'NuHMOD ? ?/?<CNAPTH'NuETDIR ?/?<GNAPH'NuALLOC/?<HNA\&NuFREE/?<INA\H'NuETBLOCK//Bg?<JNAPXH&NuXEC/// ??<KNANuFIRST ?/?<NNAPH'NuNEXT?<ONATH'NuENAME//Bg?<VNAPXH'NuSDTOF} ? ?/?<WNAPTNuDUPJg'NuOUNDS &ѫNuUPt'NuWAPܼ &'@NuROPXNuVER'+NuOTLH&NuROTRLH'@NuRI''NuIP9&NuNDER9L'@&'NuDUPp'+'+NuSWAPLHH NuDROP]PNuOVER'+ '+ NuROTL?HH0Nu&;CODE yn P\ NuONTRLNz NTINN6 NTOUTNR    TSINNALLOT TSOUT>N  ( xX LOBALN@LLOT t DDRINNdALLOT DDROUTNALLOT DIPBN,N>`ESPBNr,>HANDLEaNVDI/ps"<NBNuAES"< <NBNuT3.NuaT3,Nu #&/NT''<'< NN8a79>BcNu &'@NT'<'< N3N"a`a`79@Bc79BBcNua79DBc79FBcNua79HBc79JBcNuT3TT3RT3PT3NNu/Nx'' [T'<, &'@BN'+ SBP'+ [TTRRe oNXPB &'@ [TXNu'<L'@&' ѓ &N &'@ &BNUL'@&' [TRe oNXPXNu79`Bc79bBcNua79dBc79fBcNu'<`B'<L'@&' ѓ &, &'@N'<` NIT'<pNrNXIT'<`Z ILE-SELECTOR{##'<Nr79@BcNu NTNH#NuEAD-APa'<N RITE-APa'<(NEY'<NNUTTONSBN4'<lN/N'NuOUSE NTN,'<NrNAITR H@&#,'<NrESSAGE3#'<NrULTIPLE#'<,'< N'<(N/N'Nu2ORMULAR%'<pN3 ESERVE7BNT'<'<N<'<NrREE'<`6 ENTER-IS#'<N4LERT'< NF UBBER-BOXN4'<,NrNGNN'<>'+'<\N\'<` &'@'<N79BcNueLOSE-VIRTUAL-SCREENԠ'<NLEAR-WORKSTATION'<NPDATE-WORKSTATION'<"Nr ECTANGLEa'<RN '+ '+ N ѓ/ ѓ'N ARa'<zN OUNDED-RECTANGLE^a'<ʼN  ILLED-ROUNDED-RECTANGLEan'<NS-CLIP&aF'<'<&NO-CLIP֚B`INEӝB3f'<dN *ST'<N0H7BcN REAa3˴'<˲NARKa3'<NEXTN'< N,'<Ng ILL-CONTOURNN'<:N NR/BBBB'BB'<NRC˿a'<pN IEa'<̴N IRCLEBBNBB'<N'<N NRN LLIPTIC-PIEքa'<N  LLIPTIC-ARC-a'<LN LLIPSEYN '<xN  USTIFIED-TEXTNTNHBN '<ͨN,'<,'<079ͨBc'TT3ͨ &N'<͢N S-WRITING-MODEК'<N ET-COLORNTBN,'<FN S-LINE-COLOR'<zN S-LINE-TYPEΆ'<ΤNqS-LINE-PATTERN'<N S-LINE-WIDTH'BN'<Nl RE-LINE-ENDSNH'<,N S-MARK-TYPE'<\NS-MARK-HEIGHTα#N'<φN S-MARK-COLORϓ'<ϸN S-CHARACTER-HEIGHT%#N'<NkS-CELL-HEIGHTi'<N S-ANGLE'<DNS-FONTQ'<jN S-TEXT-COLOR'<ЎNjS-TEXT-EFFECTv'<иN'RE-TEXT-ALIGNMENTS8NH'<N S-FILL-TYPEP'<N S-FILL-INDEXz'<DN S-FILL-COLOR'<nNhS-FILL-PERIMETER'<јNpS-FILL-PATTERNѤ ST'<,30H7BcN'<Nm OPY-OPAQUE:aa*'<Ny##NT'+ '+ N ѓ/ ѓ''<NNʆOPY-TRANSPARENTa'<'<N'+'<\N\'<` &'@'<NOLOR-ISNH'<N/NX'Nu#INE-IS'<(NN79`BcNu$ARK-IS$'<\NNN%ILL-ISG'<׌NN&EXT-IS'<׶NNXNt EXT-WH-IS'<N,'<N79dBc79jBcNuuELL-IS'<.N79`Bc79dBc79hBcNus NPUT-MODE-IS2'<lNPEN-INNPEN-OUTؖNtt    ( xXESSAGE-BUFFERNALLOT EY-EVENT-BUFFERN6 VENT-FLAGNUTTONNLICKSNYNXNRP-ID'<NuHANDLE2NTATENSP$NONTEXT\N0000OFVOCSN#wNENCEN[OC-LINKNJISKNSN ORTHCASH NFIRST'<8NuIMIT y'<NuREVNȅ/BUF'<Nu/BLK'<NuSCRNCRUNLKN/L'<@NuTIBNTIBڜNPAN^NUTN ISK-ERRORNOLDR/W?9 "SAA??</?<JgSW?<NMH#NNuIB '9NuMITONR4NuPACE'< NܮCANCODEN HIFTSTATENASTKEYN NKEY'<NETKEYN$BSNuEYf'<ِ'<dN@##/#PPN####'Nu TERMINALSN$ H@&'<aNAITN$V  fNNV  fNuREAK?N$ + fBNNV  fNu H@&'<aNSC'<NܮNܮU4NuLSN '<EN 9&'9XDNuc'9N  o^0 y#&NuSN8fNu/WN^LOCKx. yb f&NuLm y:bg f &Y#bNu`Lm y:#b&X/g ''BN|'''<N| yb Nu2A4B6Cy%g3 333Nu3333NuECIMAL3 NuEXߟ3NuIN3NuLANK%< NRASEBN MPTY-BUFFERS y:"9LBNCSP#fNuATEST@ yn'NuESTRICT7 yn P  Nu EFINITIONS8#|nNuLSO'<|'<ڀ'<N 9ڱgR9ڱNuOSS 9ڱgS9ڱ'<ڀ'<|'<NNuNLYb3ڰNPC yn P NuRROR9NRYPEܔN JjB &ѫN L WBPNܮRe oNXPN TRAILING'BN  k gN2SRe oNXPNu."V Wp''T@@їN " W'pT@@їNuPACESjJjBBN NRe oNXPNuR/'JjDNNjNN 'NN G'JjDNNjNNN NݨNnNB[3][Noch Parameter auf dem Stack.|Definition noch nicht beendet?][weiter]CSP\ffNu'<'<N N[3][Parameter auf dem Stack|stimmen nicht berein.|Falsch geschachtelte Struktur?][weiter]PAIRS'g'<'<N NNu "&N  &'@(@N "& &'@ (<}N[3][Stack berfllt.][weiter][3][Zu wenig Zahlen auf dem Stack.][weiter]STACK 9Bl'<'<N NFo'<'<N NNu[3][M/ milungen.][weiter]/N'<'<xN N//N'N0= N=D@NpN<=N'+'+ JfN2Nh&&N:PNNuABSH'N&JfN^D@Nu'OMPILE yX"_0 #XNGITERAL(J9Wg yX0'< #XNuXPECTNUERY'9'<NB# Nu OLDEXPECTR/''JjBBN NN +f* +gNܮN'<NܮS`X` + fXNN2 + lXS`Nܮ S&Re oNXP [B# Nu[3][Weder ein Befehl|noch eine Zahl.][weiter]UMBER/9 SB' (-fR|`|#Nj gZ gL gF g8 g( g'<'<N N3`3 `3B`XJgD#NuD.Nx &ѫN W'NܮRe oNXPNORDJ۾g'9۾N`'9 9Г&'@N ѹ$k$[ yX&SBQ NuINDCFA Spr"HS@ Aam Azn AQAIPA/09ڰH'<|'ѫN W P 'gN`JgNuXXe oNXPB yn|g&gN`JgXNu y*|gng&gN`NuXNuNfirst adress, only NuNsecond adress, only NuNdn NuNan NuN(an) NuN(an)+ NuN-(an) NuNd(an) NuN d(a,x.w/l) NuN.w NuN.l NuNd(pc) NuN d(pc,x.w/l) NuN# NuNccr NuNsr NuNusp NuN bcc .s<-- ? N/ JgXXNuJgN`NpgN8pgNDpgNPpgN^pgNnp gN~p@gN <gN <gN <gN <gN <gN <gN < gN <@gNNIND N0JgX&RJfDNu[3][Ist eine restrict Definition.|Darf nur beim kompilieren|benutzt werden.][weiter] NTERPRETER'< NN0JfNNN2`J9Wf*PJg'<'<NN N [NN2`JgP [NN2`"yXPJ+g [ PNug2`#X`n2N"#X`^Jyg ygNN`NߊNuJy g y gNN`NߊNuJy"g y"gNN`NߊNu09HyHyNu09HyHyNu'<'<NhB9WNuPWNuAXNu'< 79Bc79BcN.B79Bc79BcN.N&NBU'Nߊ[3][Das Dictionary ist voll.][weiter] REATEHEAD 9Xm'<'<pN N'< NN0Jg8 '9XNtNschon mal im Dictionary. NX$|X*Rpv"4MgRCaQ*Ryo9- MRP"yn" $"Nu[3][Nur im Ausfhrungsmodus benutzen.][weiter]AJ9Wg'<'<N N 9Xm'<'<pN N'< NN0Jg8 '9XNtNschon mal im Dictionary. N$|X*Rpv"4MgRCaQ*Ryo9- MRP"yn#|" $&' '< #fPWNuaN'< N^ yX0Nu#XB9W [ NuIECURSIVE yn"yX PX2N"#XNuEFERiN yX0N #XNu09HHyNu09HHyNuREATEN yX0N #XNuARIABLEN yX0N B#XNu ARIABLES'< N [ f ;fNuJfUNup R@N` _(N:N yX0'< 0Nu#XNONSTANTN yX0'< 0Nu#XNOVEP.L,'<H#!!NZ |Hf"Ndn d(an) or d(an) dn!N yf Nl@`NZNߊNߊNOVEP.W,'<N#NZ |Hg"Ndn dn or -(an) -(an)!N*_NZ yf@U'N*_0Nr3N&09*_NpeOES>@ yX0N 0'#XNu*_33NZ3"pNNfJy g &'@NNzN*_#NZNNfN*_ yf:3NBpNNfJy g &'@NߊN#NZ0<NNfNߊNXN*_#NZNZNp NTERPRET9N OCABULARYN yXB #X''<N#XN#|NuEORTHN.ZO`2\L~<'3?KVJhPDSXS<TE7WEFMYZOLvZXkOQURV66BpORTH-STN@N3 BNu*_3" yf83N&NNf yfN`NXN#NZN@N,*_3N&pNNfNEPTH 9B'NuTACK 9NuSBf"NNDer Stack ist leer.Nu '9B'NN Я'Nn'< NNJgN2'< ї⑱k oNXPNu3*_3NZ3"N3NUITB۾B9WNNNJ9WfJ9gN8N ok. N` OLDERROR&yBNN3 N#۾۬#J۾gN Screen Nr. '9۾NBNN Line Nr. '9'<@N'NBN'9۾N &'@'<@N ѓ'<@N NB۾UN'<^`'9'9N N'<J۾f'<'<N NBR۾J9۝g'9N'9۾NB#NuOAD~'<۾N'<NB#۾NLOAD 4 9۾ѓN 6IST -N/93 N#۬N Screen Nr. NB'<'<N N Я'''<NN'9۬NNJgN2Re oNXPNB۬#NuNDEXN'<N3 R &'@N N Я''<NNB Я'NNJgN2Re oNXPNRIAD'VNN Я'N Re oNXPNuHRURNN 2 Я'N 6Re oNXPNuTHRURNN l Я'N jRe oNXPNu[3][Durch fence geschtzt.][weiter][3][Context und current mssen gleich sein.][weiter][3][Nur ein context Vokabular erlaubt.][weiter] ORGET-IT$ 9ڱg'<'< N N 9|ng'<'< N N/ l'<'< nN N yo P`#"y|o N@NP'''Y [BX'N "W Q m P`"Xe oNXP S&JfX#XNuORGETN NN [3][File kann nicht geschlossen werden.][weiter][3][File kann nicht beschrieben werden.][weiter][3][File kann nicht erzeugt werden.][weiter] AVE-SYSTEM'< NNx'< l& [B#X'<'<N3`3 9X# 9#BN/Jj'<'< |N N'9X'<NJj'<'< KN 'NJg'<'< N NuNPUT 0NN'9'<N"_ yX0Jg("[  lN distance ? N`"["BQ0#XN"_ yX0Jg"[  lN@`"["PN 3N& _0y yX0Jf Nlabel isn't setted N"[  lN distance ? NNODEiJ9Wg0NNNur beim ausfhren verwenden.NNBy$3NABNBBNNNߊN _''NuABS'< N [ f ;fNuJfUNup R@N`LEARX [BNuLRLABS'< N [ f ;fNuJfUNup R@N N [B`QUNb0N:1N:2N:3#N:47N:5KN:6_N:7sN:8N:9N:AN:BN:CN:CN:DN:DN:E'N:F;N:XG,#NZ yfNl yf@@`@`NZ yf@`@HNrOVE, y@f3NB0,'<gNu,'<fNu,'<oNu,'<lNu=,'<mNu=,'<nNuC,y'<eNuS,N'<dNu, '<jNuS,'<hNuC,~'<iNu,'<kNuF,(SNߊ'9XNuHEN,'9XNLSE,-'<`NߊN'9XNuEGIN,$'9XNuGAIN,'<`Nߊ'9X &'@NNTIL,"Nߊ'9X &'@NHILE,Nߊ'9X &'@NuEPEAT,NNO,'9XNuOOP,3N&09@Q'Nߊ'9X  lN distance ? NN(A,A.W)"'< '< N|(A,D.W)'< '< N|(A,A.L)3'<  &R'< N|(A,D.L)W'<  &R'< N| (PC,A.W)'< '< N (PC,D.W)'< '< N (PC,A.L)'<  &R'< N (PC,D.L)'<  &R'< NUBQ.B,>NQUBQ.W,NNQ@UBQ.L,dNQOVEM.W,N8HOVEM.L,N8HOVE.B,NOVE.W,N0OVE.L,N OR.B,NOR.W,N@OR.L,NMPM.B,& NMPM.W,@NHMPM.L,TNDDQ.B,VNPDDQ.W,|NP@DDQ.L,NPCHG,N@CLR,NSET,NTST,NDDX.B,NDDX.W,N@UBX.B,NUBX.W,.N@BCD,NDD.L,"NxЀDDA.L,"NDDI.L,"NDDX.L,NрND.L,#GNxNDI.L,#vNSL.L,#NdSR.L,#NdRA,$gN`SR,NaSR.S,/NaEQ,%NgNE,%NfLR.L,&7NBMP.L,&eNMPA.L,&|NMPI.L,&N ORI.L,(N SL.L,(NdSR.L,) NdOVEA.L,)N @ULU,NBCD,)NHEG.L,){NDEGX.L,)N@OT.L,)NFR.L,*NxRI.L,*?NOL.L,*NdOR.L,*NdOXL.L,+NdOXR.L,+ZNdTE,NzNsTS,NzNuBCD,hNUB.L,,NxUBA.L,,NUBI.L,- NUBX.L,BNWAP,QNH@ST.L,-aNJ0N 1N  2 N @3N `4/N 5AN 6SN 7!N 0N 1eN $2wN D3N dPN d4N 5N 6N 7N P-N A0) N A1)N (A2)-N HA3) 0N hSP)UN hA4)AN A5)}N A6)N A7) N RP)N A0)+N  A1)+N ,A2)+N LA3)+N lSP)+ N lA4)+ N A5)+ DN A7)+N RP)+ lN A6)+ XN (A0)N (A1) N 0(A2) N P(A3)!\N p(SP) N p(A4) N (A5)! N (A6)! N (A7)!4N (RP)!HN (A0)!N (A1)!N 5(A2)!N U(A3)"N u(SP)!N u(A4)!N (A5)!N (A6)"\N (RP)"$N (A7)!pN WN L"9N >(PC))NN ]N SP N @RN CRN DD.B,NxDD.W,"Nx@DDA.W,NDDI.B,#NDDI.W,iN@ND.B,NxND.W,#/Nx@NDI.B,N!NDI.W,#^N@SL, NSL.B,#NdSL.W,#Nd@SR,NSR.B,#NdSR.W,#Nd@RA.S,N`CC,ANdCC.S,$NdCS,$-NeCS.S,$ANeEQ.S,UNgGE,$SNlGE.S,${NlGT,$NnGT.S,$NnHI,$NbHI.S,$NbLE,$NoLE.S,$NoLS,$NcLS.S,%NcLT,%%NmLT.S,%9NmMI,%KNkMI.S,%_NkNE.S,gNfPL,%qNjPL.S,%NjVC,%NhVC.S,%NhVS,%NiVS.S,%NiHK,"NALR.B,NBLR.W,&!NB@MP.B,NMP.W,&MN@MPA.W,hNMPI.B,N MPI.W,&N @BRA,NJQBT,&NJPBCC,&NJTBCS,&NJUBEQ,&NJWBLE,' NJ_BLS,'NJSBLT,'0NJ]BGE,'BNJ\BGT,'TNJ^BHI,'fNJRBMI,'xNJ[BNE,'NJVBPL,'NJZBVC,'NJXBVS,'NJYIVS,'NORI.B,(?N! ORI.W,'N @XT.W,cNHXT.L,(+NHLLEGAL,NzJMP,NNSR,(iNNEA,4NASL,(NSL.B,(NdSL.W,(NdHSR,NSR.B,(NdSR.W,(NdHOVEA.W,N0@ULS,0NIVU,'NEG.B,pNDEG.W,)eND@EGX.B,N@EGX.W,)N@@OP,NzNqOT.B,FNFOT.W,)NF@R.B,NxR.W,)Nx@RI.B,N!RI.W,*'N@EA,NH@ESET,+oNzNpOL,*kNOL.B,*NdOL.W,*NdXOR,NOR.B,*NdOR.W,*NdXOXL,NOXL.B,*NdOXL.W,+ NdPOXR,NOXR.B,+2NdOXR.W,+FNdPTR,NzNwT,NPHI,+NRLS,+NSCC,+NTCS,+NUNE,+NVEQ,+NWVC,+NXVS,, NYPL,,NZMI,,3N[GE,,GN\LT,,[N]GT,,oN^LE,,N_UB.B,zNxUB.W,,Nx@UBA.W,NUBI.B,NUBI.W,,N@AS,NJRAPV,NzNvST.B,-#NJST.W,-KNJ@BORT/&yBNN\'<bN<'<?Nܮ'<cN<'<0NܮN'<vN ]AINBOXN[0][ Der | BILDBUCH | Bilder-Verwalter | ][ Whlen | Sammeln | Raus ] ALL-MAINBOX6N'<NNA'N6"NnR &'@'<NVN@V &'@'<NNu DJUST-PIC=-N7NA'<NN@NuO-DTANA'<NNA''<* &'@ [VN6"Nn &'@R'<NNuRIVE?@N'<A ѓN@R [VN7'<@NN7'<NN@RN7'<NBN6:NNu AVEPALETTEA'<BNCj Я''<Nb' Я' &N;2 ѓ [T Я' &'@NbXRe oNXPNuESTORE-PALETTE?GN;2NHNuEO-EXT@N.NEO NuIX-EXT>bN.PI? Nu EO-PALETTECN@XNHNu EGAS-PALETTEBsN@TNHNuOLKU.CN7'<.NX& ѓN6"NNuUNNUSBN6"NnNnNCRNnNPJfNDzNCN6"NnNnNCRNn '<NNJfNDNCNu RONTSCREEN@N4Nn''Nn''NnNXN4NnNNE(NG'<N7NN7Nn'<NPJfNENNNu HOSE-ONE@N'<N=N '<NFH*NENHT'<NFHR'<N7NNHTXN7Nn'<NPJfNGNuRAGEDNN7N7NN '<NPN7 SBPN6 JfNHN@'<N6:NNu ELECT-PICBNB~N@TNA'<NNHN^N7NA'<NN7BN'N4NN6JfNJHN4Nn'<N7NXN7NN5NN4NnN5NnR'< NN8NXN4Nn'<}N4NnNXN4NnNXN7TNN6 NN7XNN5$NNGNuO-PATHCN7.'< ѓNA'< NNuAILPROCHxN'<N;N XN NuAVE-ITHNAN7BN''N6JfNKZ'<N7NX'N5NnR'< NN8NX''<}N5>NnN'<}N\JfNKRNJNXNu AVE-COLLECTJN6 NnN7T [TN5$NnN7X [TN5NnN7 [TNCN'<N;dN N '<NPJfNLNJNu CREENSTARTK]N'N4N'< N5>NNuNIT-DTA04N7.N6Nu DI-START?*'<N:NuEWNAMECN7p'< '< N'< N7p [V'<BNM(N7.'< ѓ Я' ѓ SBP'NJfNMN2NMN7pR Я' ѓ [VRe oNXPNuFDB1ENALLOT FDB2M*NALLOT DITRAPLZ"< <sNBNuOPIE5N5NnN5NnN5NnN5NnN5NnN5NnBB'<NM4NMZNNn'<'<'<mN [TNT [TN\ [TN'< ѓ [TN'< ѓNN'< ѓNN& [T'<BNNNH Я' & ѓ [TRe oNXPNMNu O-SAVESCREEND9N5NnN5$NnNN5vNN5NnN5$NnN5vNnN N5dNN5dNnN5NnN'N5NN5Nn ѓN5NN5vNnN5NnN'N5NN5Nn ѓN5NNMNuASTERSClN5>NnNMZNN4NnNM4NBBBBBBN6LNn''<'<N6vNn'N6Nn'N6Nn''< '<NP Я' &NM4 ѓ [T Я' &NMZ ѓ [TRe oNXPNuLLSCANAN5NnBNQN6NnN5$NnNBNQ Я'N5$NnNNLN5$NnNN Я'NL'<N NRe oNXPRe oNXPN?PNuCANLN6NnN5$NnNN5NN6NnN5$NnNN5NNLNPN6NnN5$NnN'< NN8N7p'<N6NnN5$NnNUN6Nn &N5$NnNBBNN7pRN8N5Nn'< N ѓ'< NNNNuIEW-ITMvN5RNnN6 Nn ѓN4Nn'<}NN5RNnN@'<NNuKA-PIC6NLLNBN7BN"NuOVE-PICMPN'<N;N 'N '<NJfNS'<NPJfNS'<N6 [ ѐNS'nN N '<NPJfNWB'<N6:NNuNIT-ALLL?N^BN6:NNBNLNNNLhNDN^ND'9X'< ѓN5RNN'NN6NTNN6NNBNFX'<'<NXJ'<NFX&'<'<(NXJ'<NFXH'<'<(NXJXN6vNN6LNNONuIC-INDNN% Bitte Dateityp whlen (=Probebild)!NHN^N6:NnN6JfNXN NDN^NDNV~NVNu O-COLLECTIONVpNXvN6:NnN6JfNYNTNSH'N NNuAINSeNWRBN7NNB~NCN^N<'<NFZNHNZ'<NFZNYNZ'<NFZNYNZXN7Nn'<NPJfNZlNZNu b BILDBUCH (frher "PICKAPIC") erleichtert Ihnen die Arbeit mit Computer-Bildern. Dass ein Bild mehr sagen kann als 1000 Worte drfte sich nicht zuletzt unter den Besitzern von Computern mit grafischer Benutzerober- flche nach Macintosh-Vorbild herumgesprochen haben. Eigentlich htte es daher nahegelegen, bei der Arbeit mit Computerbildern von Anfang an ein System zu entwickeln, welches auf dem Desktop die Bilddateien verkleinert in Ikonenform darstellt. Zur Verwirklichung eines solchen Systems reicht meine Programmierkunst nicht aus, deshalb ist BILDBUCH nur ein erster Schritt in diese Richtung. Wer viel mit Zeichenprogrammen arbeitet kennt das Problem: hatten Sie damals, vor ein paar Wochen vieleicht, nicht einige Bilder aus der Zeitschrift digitalisiert? Unter welchem Dateinamen verbirgt sich das hbsche Mdchen mit den roten Haaren? Knnte es DAGMAR.PI1 oder MONIKA.NEO sein? Und was verbirgt sich im Ordner GRAFIK1, der sinnvollerweise angefllt ist mit so vielsagenden Namen wie BILD12.PI3, BILD13.PI3 usw? Sie brauchen BILDBUCH! Was tut BILDBUCH.PRG? Sie starten das Program, wobei Sie beachten sollten, dass es mit RAM-Disks und Accessories Probleme geben knnte, falls diese sich zu breit machen im Speicher. Sie haben zwei Optionen: Sammeln oder Whlen. Bei der Option SAMMELN laden Sie mit Hilfe der Datei-Auswahl-Box eine Bilddatei in den Speicher. Anhand dieser Prfdatei knnen Sie gegebenenfalls das Bild auf dem Monitor justieren, aber bei Degas- und Neochrom-Bildern erbrigt sich das. BILDBUCH erwartet Bilddateien von mindestens 32000 Byte, die den Normalbildschirm ausfllen. Unregelmssige Formate etwa vom Typ .IMG kann BILDBUCH noch nicht behandeln, ebenso wurde auf Untersttzung von Grossbildschirmen verzichtet. Als nchstes zhlt das Programm die Dateien, die die gleiche Endung wie die Prfdatei aufweisen und sich im gleichen Ordner befinden. Danach ldt das Programm mittels GEMDOS SFIRST und SNEXT diese Dateien nacheinander in den Speicher und verkleinert sie. Der Grad der Verkleinerung richtet sich nach der Anzahl der Bilder: Bei 1-4 Dateien fllt jedes Minibild ein Viertel des Bildschirms aus, handelt es sich um 5-9 Bilder so wird jedes auf ein Neuntel komprimiert. Die Maximalzahl ist 64, wobei ein Minibild im Monobildschirm auf 80 mal 50 Punkte verdichtet wird, in der geringen Auflsung entsprechend auf 40 mal 25 Punkte. Da auf eine Diskette kaum mehr als 20 Bilddateien passen, bleibt es Besitzern von Hartplatten vorbehalten zu testen wie sinnvoll im Enzelfall ein Verkleinern um den Faktor 6-8 ist. Der Verdichtungsprozess nimmt nur einige Sekunden pro Datei in Anspruch. Die dabei erzielten Minibilder sind je nach Motiv und Auflsung ber- raschend gut (Farbbilder!) oder noch identifizierbar (kleine Motive in Monocolor). Bei grsseren Flchen ist kaum ein Informationsverlusst zu bemerken, whrend dnne Linien beim Verkleinern naturgemss schlechter abschneiden. Am Ende wird die Sammlung als Ganzes vorgezeigt wonach das damit erzielte Kollektionsbild mit der Endung .COL abgespeichert werden kann oder nicht. Im Falle einer Sammlung von Degas-PI3-Bildern heisst die neue Datei PI3.COL, handelte es sich um NEO-Bilder NEO.COL. Die .COL-Datei wird in den gleichen Ordner gespeichert wie die behandelten Bilder. Beachten Sie dass auf der Diskette noch knapp 34000 Byte frei sein mssen, andernfalls bleibt die Datei unvollstndig. Neben der Bildinformation enthlt die .COL-Datei die Namen der Bilder. Die brauchen wir nmlich bei der anderen Option von BILDBUCH.prg: dem WHLEN. Whlen Sie Ihr Bild durch Mausklick! Haben Sie einmal einige Ordner gesammelt und die .COL-Dateien abgespeichert, knnen Sie von der Option WHLEN Gebrauch machen. Wieder mit Hilfe der Datei-Auswahl-Box, diesmal auf die Endung .COL beschrnkt, knnen sie Ihre Bild-Disketten und -Ordner sehr leicht sichten. Sie laden die entsprechende .COL-Datei und sehen die verkleinerten Bilder Ihrer Sammlung vor sich. Durch Mausklick laden Sie die Originale in den Speicher, eines nach dem anderen. Dabei wird die Farbpalette, falls vorhanden, automatisch justiert. Bald schon werden Sie Ihre "Monika" oder "Dagmar" nie mehr verlieren und BILDBUCH wird hoffentlich einen Ehrenplatz in der Diskettenbox erhalten. Probleme: Bei Schwarzweissbildern hoffentlich keine. Bei Farbbildern spielt natrlich die Farbpalette eine grosse Rolle. Handelt es sich um einen Ordner, der angefllt ist mit Bildern von sehr unterschiedlicher Palette, kann das Resultat bei manchen Minibildern recht unansehnlich sein. Schliesslich kann das Kollektionsbild nur mit einer Palette angezeigt werden. ber BILDBUCH.PRG Programmiersprache: Forth Wer das Prinzip von Laden und Speichern von Dateien kennt, sich mit Bildformaten auskennt und die VDI-Rasteroperationen beherrscht, kann leicht ein besseres Programm als BILDBUCH "hacken". Die Geschwindigkeit der Programmiersprache spielt keine grosse Rolle, da die GEMDOS-Operationen die meiste Zeit in Anspruch nehmen (read). Der Verkleinerungsalgorithmus ist dagegen zeitkritisch, und Forth schneidet hier gut ab, aber fr den Assembler-Programmierer sollte es mglich sein die hier gezeigte Leistung um den Faktor 10-50 zu unterbieten. Fr ein Forthprogramm ist BILDBUCH.prg recht klein, aber bei echten Compilern mssten 20 Kilobyte ausreichen. Wieder stellt sich die Frage: wozu? Espoo, den 20. November 1989 Liebe PD-Freunde! Dieses ist die Demo-version von PICK-A-PIC v. 1.0 Der Unterschied zur Arbeitsversion ist recht klein: Fr jeden Arbeitsvorgang mu das Programm neu gestartet werden. Wem das auf die Dauer zu lstig ist, hat drei Mglichkeiten: 1. Er/sie macht einen 20-DMark-Schein locker, den er mir im Briefumschlag nebst Absenderangabe und Verbesserungsvorschlgen schickt und erhlt postwendend die Arbeitsversion auf Markendiskette. 2. Er/sie programmiert sich eine eigene Version. 3. Er/sie hilft mir bei der Weiterentwicklung von Pickapic. Es fehlen noch GEM- IMG- und STAD- Formate sowie vedichtete Bilddateien vom ARC- und Tiny- Format. Wer sich damit auskennt, kann mir Beispiel- dateien nebst Anleitung, wie diese auf dem Bildschirm dargestellt werden, schicken und erhlt im Gegenzug die entsprechend erweiterte Version. Let's get together! Viel Nutzen mit PICKAPIC wnscht: Heinrich Pesch Tiistilnkuja 1 E 50 SF-02230 Espoo Finnland BILDBUCH.TXTLIES_1ST.TXTTdvTEdFDFED@fUDVddDEEr5GwT@GuDgdAteDDtVEWFFVvED@EEDtFtDddD#DdtgTEWDdgBuwdtDuTHή芊Ȍʌ*Ȥh 訊訂̨舎ȈFЈ芈Ȉ̊計Dd4defdtdWtUEFTdtDDGEG@W6VDFDrteDdDWdTFAtuDdEtVFFGFeVdDgdeED#D4TdDUTeeEDfFVVDȈ. ̎"FȈ. (Ǫ̃̄(h航ȈȊȎFDE#EgUuFvTdDu#EeDdfDeWEEGdDtV4Ddt Ep %Edp%2D2U2r4DDDDDDDAddEtTE 1DBD2D'BȊddȌab,b Ύ䎄$d@jJdddhȊ$@ b$dddrF6VEdrF2E1GGFTwdG4ttfEFAtdwd#D#T4F w#AFDFGdABdfTDDFE`@ETDfgaBv1fGDtDDFt" " " (( * "h@FĄ̑„b̎興DDDUEdDWDtdfttETDDu#EDDdtF7DVFfVVdDUEXfTGTtfuVdTDA#D@TdEGv""twA$weVDGFeF " " * ("  (̨ ȨFȊD(DHʬʌTDtUGFDVVVFFVdGCTTVttTGrd0hGDEDEF@dWfUDF1TA GDFEDr7DEddggGDDGTADGeDdTTV(  ("" (""(b $@"&nΎʈȨeDdEFEDfTAWfEDeDDtTDFTt4wGdDVdfEDG$#fdgDFTddeWT&dvFVtdFVdd'UwfVdDFEF#DDEDwFDV  ""((#"(" ΈʮL쌬ȌN̬ȈFWDUDFtFDEtDttDVDfVFwdWt4egFAbEvDFdtDWtftFuTEr0FEVADEuTGWftdUGEDDgtetGEDFWF@t ("  "((" "(ꨊ`ꨎȪ(莊dVUtTTdtteDtBFuDugdFdwUUBE7DGTddXWeGDD&HvwGEWFddgEtFtDTUUf#EEdUEgFCD2w0#dL( FȪΌd`FdTuEfw@%EaEf`DWDFFFDUtD#@DWF&dFDGEDEedaFfCDT'0@7dGd&VTD#gdDeGdEt5EGDEdEdŒ̆N`n&&LFȈʎȊjȊuAufdFFwdDDtdhGd&FDD4dtdDETr0EddEtTVTdxTfdeDTtG4DFTwEwA'"EW#"Ddr2E4@DDdʈhND6FDdh E#FdDBf@TDDFE`EvTdfFaEdFdDDTDu5GEV"XwtFtGVD&FTAWfDDctTGtDTTVeDFVFVDEwd#Dt莬L ̈討舨ʈF,GDrt0EEFFEDeDUDEdFDeFEuddDtGGdFTUddTtr4E#VwdEEDD&tTE'tvEtETVDEdTevEEEftE"GhF(ȊL,N芨Ȩ슊D$DV#UFDdtDEDWFUDBGfDGdDDTdVFVttd5DGRE4uFETFddAEfwDEWFTVGdDFUedDTFGdGtEDFRD1Dꌊ ȂȈȈȎ芈bT#fduUEETdbt21@EVDwEdEGwDBtDADEewd@WDFtGdGVGVFfdEBu1dDGttDDWtDadEADWDGTDFFwDȎȊbȈ興ȊF4TdDF4dTFTtVGFDdFtre0EFAtETvuTfeEuFdTDGEFEGGVFtUAfuDFBd5DVFtdTdTEDEEEUDFGV@D誂ꈌjȨɨ Gd#EddfUEDtthTCDfDuUdFVDGEtEDfDDdVAVTTGr#5#wFjF****ڠڠڠڠ::::****ڨڨڨڨffff7777||||<<<<oooo####0000,,,,ffffc1c1c1c1aaaaffff0000cccc####0000,,,,ffffaaaaaaaa````00000000~~~~````||||<<<<0000####0000,,,,ffffaaaa````0000####0000,,,,f0f0f0f0c1c1c1c1aaaaffff0`0`0`0`ccccf0f0f0f0c1c1c1c1||||<<<<0`0`0`0`cccc