Directory of image this file is from
This file as a plain text file
?<2C8H80(L(8BA)T/ ==!6 =/T0P/0<K< =!+A%:PC<A=+A82M" <=16%T/=!PCTPC=1P/=!= EZ=!+C%,2M$PG<B <6!=/A?T/P/ <4E2<K< =!+A%:2M0=A=1R<K <6%<KRA<K< =!<!PC<A<+A.2PPG<BPU=/BB<K< =!+A -2P=A=1RC<K< =!2PA=A=1RD<K=!P]<J=1RE<K=!P\<J< <!2PD=A=1RF?=AUS ?:BEGINN?=BIS ?=BEI ?<DANN?<ENDE?:FUEHRE?;FUEHR ?<FUER?;FALLS ?:GLEICH?;MACHE ?<MACH?;SONST ?9S LANGE ?4SCHRITTWEITE?9SCHRITT ?=VON ?<WENN?6WIEDERHOLE?7WIEDERHOL ?=DIM ?:DRUCKE?;DRUCK ?;DATEN ?>ED?7FUNKTION$ ?8FUNKTION?<LIES?:OEFFNE?8SCHREIBE?9SCHREIB ?7SCHLIESSE ?8SCHLIESS?=DIM ?8PRINT4:?8PRINT4:?<DATA?=END ?;INPUT ?<FILE?;PRINT ?;PRINT ?;CLOSE ?;C OSE ?W***FEHLER ZWISCHEN DEN SCHLUESSELWOERTERN ?XAAAFAAAIBCBFBBBJBBBDBBBBBBBFEBBBHTELUNG:K(K0)=?^ 6 0 ?^ 7 ?^ ?^ FDF9 ?^ ADA9 A ?^G G G G G ?^E EG B1B2 B B B4B B ?^E EG B1 B B B4B B ?^E EG B1B2 B B B4B B ?^E EGCGEGEG B1B2 B B B4B B ?^EGEGEGEGEG B1 B B B4B B ?^EGDLFBHHKNOIICJLLKQMM[AAB B4B B ?^BGCGBGBGCG ?%***FEHLE)=X-Y*INT(X/Y)?*PRINT"VERFEINERUNG ";"?+A BDE FG M SV W ?+AB DEF GM S VW ?----SYSTEMGRENZE:C1= ?.REM FILEV4:"LPT:"?0***FEHLER:MARKE ?1 MIT CODE C1= ?3 DE FLO S ?3D EF LOS ?5SYS:PCWS BA ?5REM CLOSE4 ?5IFEND3GOTO ?6PROGRAMM: ?6INPUT3:Z$?7KONTEXT: ?7FUNKTION$ ?7DIMZ$(72) ?8GEHENACH?8FUNKTION?8ANFANG:?9UND C2= ?9RESTORE ?9GEHNACH ?9FILE3: ?9CLOSE3 ?9ANFANG ?: L3=?: FEHLT?:RETURN?:K(K0)=?;:;,"& ?;(==FN ?;TEILT ?;PRINT ?;NICHT ?;GOSUB ? DEFFN ?<SYS:?<STOP?<STEP?<READ?<ODER?<NEXT?<INT(?<GOTO?<FNZ(?=.PC ?=.KO ?=)=0 ?=UND ?=MOD ?=L7= ?=FOR ?=END ?=DIV ?=C2= ?>==?>:=?>:?> ?>TO?>IF?>F=?>FN??= ??; ??: ??7 ??6 ??4 ??3 ??0 ??/ ??. ??, ??) ??( ??& ??$ ??" ??! ?? ?? ??] ??[ ??Z ??K ??J ??I ??H ??G ??F ??E ??D ??C ??B ??A ?? Q^29?^SM)29?4L29?8NK29?0KH%29?8 EX29?8) 921>83^(29>8"M29?^*S29?^(C29?^)]29?^*729?^*A29?^(U29?^+I29?^)K29?^( 29?^)/29?^&;29?^&W29?^ 129?^(929?^ M29?^ 29?^*%29?^&)29?^!B29?X%/29?X M29>8 [29>8 429?> 229??!29??!W29?? 629>8"29?,"K29??" 29??!Y29??![29>8-R29?5+*29?(-329?71+29- 29?60+29??/^29?<0929??/929?=1 29??1Q29??1K29??0;29??^C29>8]^29>81O29??1E29??1I29??0 29??0)29??0?29??,O29?+,C29?+-J29?3-B29?30Y29?>1!29??/N29?;/B29?;1G29??1A29??1M29??0]29?>0529??1%29??129??1 29??1]29??1[29??1Y29??0329??0129??0-29??0/29??1W29??1U29??1S29??0729??/<29\929>80%29?>1)29??.^29?9.E29?8.O?=0Q29?=/029?<0=29??/629?</R29?;29?=/F29?;,&29?..:29?:-Y29?5/!29[/29>8-?29?7.29?9--29?6- 29?5.(29?9/V29?;+729?*,029?0.629?:0N29?=%Y29?W,929?1.T29?9,[ 9?-0T29?=.>29?:.229?:0H29?=029?>&D29?\+[29?%ZR29 XW29)W629KWU29KV429KAPBPBXCPCTCXC\DPDRDTDVDXDZD\D^EPEQFQEUETFYEYE\E^YZXCW!S7L0??N ^ R R R!*W2C.VHN%>6>G1!2B"GHG?&2C.?D"9[ 2LJ=[^2AN<8H2I>X+Q2B"G(HW<B2B"GFHK<B(P2B"GHHW<B2C/"\"X"X"X"X"X!0!0PXRP&ND \ZKXVW3TIM1">2$PB/\PCTESTBA??N ^ R R R!*W2C.VHN%>6>G8P8P8Q8R8S2B"GHG?&2C.?D"9[ 2LJ=[^2AN<8H2I>X+Q2B"G(HW<B2B"GFHK<B(P2B"GHHW<B2C/A"]"X"X"X"X"X!0!0PX+C&K*!9&0GDP=1PWD%=!*&9&+AGB0IAPC=1QQTP]=!=OT0IBPDX+F)0ICPCXTPC=1P]=!= T]=!0IEPC=1P TP]=!=ODD+C<0IF=1P(]T]=!0IGPC=1P)TP]=!=ODD+CAO0IH=1P]ART]=!0IPPE<B=1P]<,=!0I PE<B=1HV=!0I0PE<B/E^0IAPC=1QSTPV=!=OT30IAPPDX3+FBH0IA PCWTW0IA0P4XW+D&$=!=ODC+FB10IDPPC=1QUTPV=!=ODC+F+AAW0IH=1QVT[=!0IHAPC=1P-TPV=!=!= .T/=!PC5T/=1PV=!<?TP/=1PVH0PC=1P3TPV=!=OCT/=1PV=!<?TP/=1PV=!= TV=!0IIPCVTV0IIPP6XV+D&$0II PV< T/QW/[T0=!PC=1P6TPV=!=OT/=1PV=!<?TP/=1PV=!= UXP0AXT!=!0II!PG<BPU=/!<K< =!0II%PCUTU0II0PC=1P6TPV=!=OTPC=1PV=!= ASAYT/=!PV< T0P/0[6TV=!+AA40IPPE<B<\*!+ 0ITPPWT/PDD/+DG/T$0ITU $=16&T/=!PC=1QSTP/=!=OT30IP&=1P0TPV=!=OD&+CF;0IT0 $=16&T/PW0TW=!0IUP3&DCT&*!/4PC<A$+A=!+CG\0PT=1P^D,=!+DMW+A $0PX=1+F".0P0=1P^ED=!+FH+0PA0PC=1Q[TPW=!=ODD+FHR0PA1PRTPK=1PW=!= TW=!+A"90PBPC=1Q\TPW=!=ODD+FMW0PBAPSTPL=1PW=!= TW=!+A"90PL PI=1Q]TPW=!=ODI+FJO0PL0PI=1Q^TPW=!=ODI+FIQ0PMPI=1Q TPW=!=ODI+FJ1+AMW0PPPP=1P TPW=!=ODCTPO=1PW=!= T/Q /T!=!0PPEPG<BPU=/!<K< =!0PPPPCUTU0PP PHTPC=1PW=!= T/PW=!<?TPO=1PW=!= T0P/0TW=!+AMW0PTPG<BPU=/A <K< =!0PTEPCUTU0PTP=1PW=!<?TPQ=1PW=!= T/Q!/TW=!+AMW0PX=1PW=!<?TPK=1PW=!= T/Q!/TW=!+AMW0P\EPC7T1=1PW=!<?TP1=1PW=!= T\=!0P\PPC=1Q"TP\=!=OT80P\ PDX8+CL&0P\0PC=1QTP\=!=OT80P]PDX8+FM 0P]PP7TPC=1PW=!= A$TW=!0P]UPCX8TPC=1P\=!= T/PW/AQT0=!PF8T1=1P\=!<?TP1=1P\=!= UXP0AXA%TW=!+AM 0P]0P7TPC=1PW=!= A&TW=!0P]5PCX8TPC=1P\=!= T/PW/.T0=!PF8T1=1P\=!<?TP1=1P\=!= UXP0AXA%TW=!+AM 0P$APC=1P4TPW=!=OT70P$BPDX7+CKD0P$DPG<BPU=/W<K< =!0P$E=1P,T^=!0P$P=1P%TW=!0P$ PCUTU*!9&0QP=1PWD%=!+F&K0QDPPC=1Q TPW=!=OT80QDQPDX8+FO&0QD PH8T1=1PW=!<?TP1=1PW=!= T/Q(/A)T0=!PEU=/UXP0AXT!=!0QD%PG<BPU=/!<K< =!0QD0PFU=/T/Q)/T!=!0QD5PG<BPCU=/!<K< =!0QEPEUTU0QEE=1P%TW=!0QEP<D0QHPPC=1Q*TPW=!=OT80QHQPDX8+FQ0QH PCX8TPC=1PW=!= T/Q(/A)T0=!PEU=/UXP0AXT!=!0QH%PG<BPU=/!<K< =!0QH0PFU=/T/Q)/T!=!0QH5PG<BPCU=/!<K< =!0QIPF8T1=1PW=!<?TP1=1PW=!= T/Q(/A)T0=!PGU=/UXP0AXT!=!0QIEPG<BPEU=/!<K< =!0QIPPFUTU0QIU=1P%TW=!0QI <D0QLPPC=1Q+TPW=!=OT80QLQPDX8+FS-0QL PCX8TPC=1PW=!= T/Q(PU=/!<K< =!0QL0PG8T1=1PW=!<?TAXT!=!0QL5PG<BPCU=/!<K< =!0QMPU=/A(WA)T/=!PEU=/T0P/0<K< =!PC=1Q,TPW=!=OT80QTQPDX8+FSK0QT PH8T1=1PW=!<?TP1=1PW=!= T/Q&/.T0=!PCX8TPC=1PW=!= UXP0AXA-TW=!+ASK0RDPPCVTV0RD P6XV+D&$0RD0PCWTW0REP4XW+D&$0REP=1PWA.T/=!PV< T0P/0^6 W7F=!0RE PV< T/QW/^6TW=!0RE0=1P1T^=!*!//0SP=1P D+=!*9&0SAPG<BPU=/A/<K< =!0SAP=1QDT =!0SA PCUTU*!9&0STPPCX^X PG<BPU=/A0<K< =!0SX%PCUTU*!9&< =!0SYPPCUTU0SY =1QET =!*!9&0 D PG<B ^6=/A)T/=!PU=/T0P/0<K< T0P/0<K< =!0 H0PU ^7C0 H1PCUTU*!9&0!0PU ^7D0!A+ND0!APPU ^7C0!AQPCUTU*! &0!D PG<BPU=/A)T/ ^=!6$=/T0P/0<K< =!0!D0PCUTU0!EPPG<B ^6=/A)T/=!PU=/T0P/0<K< =!*!<30"0PU ^7C*!9&0"HP+ND0"H0PG<BPU=/A)T/ ^=!6=/T0P/0<K< =!0"IPCUTU*!<300PC=1P4TPW=!=OT80APCX8+G&K0APPCX8TPC=1PW=!= ^7C=!0A =1Q3WT!=!0A0=1P%TW=!0BPDT]*!/40DP=1P!A4WT!=!0D =1P%TW=!*!9&0HP=1P!A5WT!=!0HU=1P%TW=!*!9&0LPPG<BPU=/!<K< =!0L PCUTU*!9&0P PG<BPU=/A6T/P/ ^4C<K< =!0P%PCUTU0P0=1P% ^7C=!*!<30$0PG<BPU=/A)T/=!PEU=/T0P/0<K< =!0$APCU ^7C0$APPEUTU0$A =1PW4 ^7C=!0$A0=1P%T =!*!9&0$DAPCT:0$DBPDT80$DCPC8=1P.TPW=!=OT80$DDPDX8+F\/0$DEPC:T:+A\W0$DGPU:CT:0$DHPCX: ^7D0$DPPC=1P.TPW=!=OT80$D PDX8+F^F0$D0PG<BPU=/A(T/P/ ^4CT0=!PCX8TPC=1PW=!= UXP0AXA)U7=!P:=/U8Q7A8<K< =!0$EPPCUTU0$E PC8T1=1PW=!<?TP1=1PW=!= TW=!+A\;0$FPG<BPU=/A(T/P/ ^4CWA)T0=!P:=/UXP0AX<K< =!0$HPEUTU0$HE=1P%TW=!*!9&0$LPPG<BPU=/A)T/ ^=!6=/T0P/0<K< =!0$L PCUTU0$L%PG<B ^6$=/A)T/=!PU=/T0P/0<K< =!0$L0PRT]*!/40$PPPG<B ^6=/A)T/=!PU=/T0P/0<K< =!0$P PG<B ^6$=/A)T/=!PU=/T0P/0<K< =!0$P%PCX^T^*!9&0%D0PG BPU=/A9<K< =!0%EPG<BPCU=/A:T/PW=!<?TPI=1PW=!= T0P/0<K< =!0%EPPG<BPEU=/A;<K< =!0%E PEU ^7D0%E0PFU ^7C0%FPGUTU0%FE=1P%TW=!*!9&0%HPPG<BPU=/A)T/ ^=!6$=/T0P/0<K< =!0%H PCUTU0%H0PG<B ^6=/A<T/=!PU=/T0P/0<K< =!0%IPG<BPU=/A=<K< =!0%IP2EPP;X +B&$2E PC T 2E!=1PW HQPKTPC=1PW=!= TW=!2JPC!T!2=!2JQPCUTU*!9&2LB=1PWD%=!+F)+D%?1T<2L P T2PDD2+D%H2T=2L0=1 =6$ <4%=!+C%C2L2 ==16$T/=!PCTPC=1P/=!= EZ=!+C$.2L4PG<B <6!=/A>T/ ==!6 =/T0P/0<K< =!+A%:2MPG<B <6!=/A)T/ ==!6 =/T0P/0<K< =!+A%:PC<A=+A82M" <=16%T/=!PCTPC=1P/=!= EZ=!+C%,2M$PG<B <6!=/A?T/P/ <4E2<K< =!+A%:2M0=A=1R<K <6%<KRA<K< =!<!PC<A<+A.RC<K< =!2PA=A=1RD<K=!P]<J=1RE<K<K=!P\<J=1RH<K=! ^6"<J< 2PDA=A=1<J< <!2PD =A=1RL<K=! ^6"<J=1RG<KPE<B<\2QAPG<B<\<!0BP=1PBTA=!0H=1PC D7=!0HA=1PD C7=!0HB=1PE E7=!0HC=1PF F7=!0HD=1PG G =!0HE=1PH H7=!0HF=1PF I7=!0HG=1PI J7=!0HH=1PJ K7=!0HI=1PK L7=!0HP=1PL M7=!0HQ=17=!0HT=1PP Q7=!0HU=1PQ R7=!=1PUTT=!0ZAPG<B=1P"<<=!0ZBPETUPC<CTW0ZH=A=1P$<K=!0ZP=A=1H]=!\Q=A=1H]=!0\ PC=1P TP]=!=ODD*,G0\0=1P(]T]=!0]PC=1P)TP]=!=ODD*,Z0]P=1P]*T]=!0] PE<B=1P]<,= 0 PYTZPCDZ*$,8ZTX0 !=1<1 X7A=!PC<AX*!, 0 0PPT[PCD[*$-N[TX0 1=1<1 X7B=!PC<AX*!,=0!0PCT\0!1PCT]0!2=1P+T =!0!3=1P,T^=!0!4PDT^0"BPC<CT 0"CPC<CT 0"DPC<CT!0"EPDT"0"FPDX*&.Z0"GPWT%PDD%*$.W%T$0"H=A=1 $6&<K< =!PC<A$*!.D=A< < 0$PPE<B=1HV=!0$ PE<B/W0$0=A=1PV<K< =!0APPDT&0AQ=1PV=!<?T 0ARPC=1P-TPV=!=OT(0ASPDX(*&/)0ATPCX(TPC=1PV=!= .T/=!PC(T)=1PV=!<?TP)=1PV=!= T0P/0TV=!0A PCX"*&8)0A0PC&T&0AAP X&*$.Z0AAPP&TP&=1PV=!= T =!0ADP=1P D1=!*&8)0AD =1P D2=!*&6H0AD0=1P D3=!*&//0AE=1P D =!*&4&0AEE=1P D4=!*&5,0AE0=1P D5=!*&3$0AHP=1P^D3=!*%1O0AHU=1P D+=!+D $0AH =1P D6=!*1O+AT"0ALE=1P D,=!*$3M0ALPPC=1P TP7=!=OT*0AL PDX**&2Q0AL0PC=1P TP8=!=OT+0AMP+T)P*D)*$2Q)TX0AMP X=16!T/=!P&=1P/TPV=!=OD&*&3/PC<AX*!160APPC=1P TP9=!=O,T*0APPPDX**&3U0AP PC=1P TP:=!=O,T+0AP0P+T-P*D-*$3M-TX0AQ X=16!T/=!P&=1P/TPV=!=OD&*&4FPC<AX*!220AQ =1P^D+=!*&7*0ATPPDXW+BE%0AUP=1PW TW=!*!//0AU0PCT\0AU5PC&T&*!9I0AXPPXTPX=1PA=!= =!<OT\0AX X=16!=!<?&T&*!9I0A\PXTPX=1PA=!= T^=!0A\P X=16!=!<?&T&0A\ P,XX=1PW<F4BTW=!*!/40A PP&=1P;TPV=!=OD&*&5L0A =1P^D<=!*%3[0A 0PJ ^4B+C"D0A 1PST\0A 2PC&T&*!9I0A!PMX]+F&K0A!PPGX]+F&K0A! PTX]+F&K0A!0=1PW4TW=!0A"PE&T&*!/40A$PMX]*&3[0A$PPGX]*&3[0A$ PTX]*&3[0A6<0BUP X&+F&K0B PC&=1P2TPV=!= T/PW/TW=!0BAPPC.T&*!/40BTP=1TP/=1PW=!= T/=!PC=1P/TP>=!=ODD=!*7;0BXP=1PW5TW=!*!//0BX0=1P D.=!*&3U0BY=1PW=!<?T/=1PW=!<?TP/=1PW=!= D2=!*3U0BYE=1P E=!*&3U0BYP=1PW5TW=!*!3U0CPPCT"0C PC&=1QATPV=!=OT.0C0PDX.*&.Z0CAPC.T&0CAEPDT"*!/40D$P ]=16 T/=!P\HEDCT/P\HETP/=1P/=!= TX=!0D$ =1PXEB=!+F&K0EP=1PXD%=!*&<-0E PCTPC=1PX=!= TY=!0E0=1PYD3=!PYEC=!*";U0EAP=1PYD+=!+FZU0EAQ=1PYD<=!+FZ50EA!=1PYEF=!+FGB0EA"=1PYEI=!+F\O<!0EHPPC^T^0EH P0X^+D D0EIP=1PYEJ=!+EU\0EIU=1PYEJ=!+FV>0EI =1PYEK=!+FYA0EI0=1PYEL=!+F["0EJ=1PYEM=!+FY%0EJPPMX]+FXA0ELPCX^T^0ELP=1PY=!=? ^7B+AZ50ETP\T]*!/40FPPCX^T^0FU C^T/PD /4B*&9&0F PC^T/PH /4B*&9&0F0PC^T/PI /4B*&9&0FDPDX^*&9&0FDBPDX^+E R0FDPPK ^4B+FXV0FD PL ^4B+F[F0FD0PM ^4B+FWN0FEPN ^4B+FYH0FHPCX\HKT/ ^6"/CT1PCX\HKT2 ^6"2CTP1=1PT=!= TZ=!0FL=1PZD+=!*&9&0FLA=1PZED=!+F&K0FLB=1PZEE=!+FU;0FLE=1PZEG=!+FWN0FLF=1PZEH=!+FXV0FLG=1PZEI=!+F[F0FLH=1PZEN=!+F^*0FLI=1PZEO=!+F Y0FL5=1PZEP=!+F!J0FL6PJ ^4" ^7B0FL7=1PZD<=!+FW"0FL8=1PZEF=!*&9&<!0G =1PWD%=!<H*-K?XHK>XI2I\H\H\H2A2J =HLI<(* ZV:A2J <B ;JV8A2I\H2A*N:A2J <B9G*(J8A2I+12J <I2IO:2A 9/8878;8?9CBRTSSVBASICAFBASICSFBASICFFBASICUFO7C 9H8J< /K2AK08F8DC K*[Y2AO.8[YK[ .8O.<K!K/> +*KY .S0+R2A: K0/K9!LA\H2A**?0>O7Y??:I:N>G;GB?81>CH(ZF ?\?9.S!*P ?\P2ISKO>C=K<2A>(O;K:> +K">(GKUZ2QO(Z29O([GJ (2QKG (S(* 2A9VJ ;8AJ 9O9 8SK 7JG?HGO ^OS ROS *;K6 5K6 4 3/22J 1GA/4K!>("K0 5K/ 4/5299F812G1+2)()%X" A;U?6??AK.C^K-[^*6><B<B<B<BP A2K"G?BC]>E>-19K?W?QM->"=8G8?0>G Note: Lines longer than 256 characters were wrapped