dk(PGames_DOOM6&DA_ .S*D"05z^! /" s@-^b>  85cf D/  \ D,S@c ,=.h _*>  ? ] ?e ,-f -2= Y\+/~@hZ,b/2Rx88.B#  #"! !"#" MhgATVYF>PU9BMG><GDB>GBB@E?C>DC>@B@>?BAOS00~}RUN "MENUEBOT.BOT"(C) BY dRAGON pOWER sOFTWARE IN 1989 [POSTFACH 252; 6430 BAD HERSFELD](C) BY dRAGON pOWER sOFTWARE IN 1989 [POSTFACH 252; 6430 BAD HERSFELD] @ ! Wettbewerb ! Um Eure Phantasie etwas anzu= spornen und die ganze Sache mit dem Wunschprogramm interessanter zu gestalten, veranstalte ich ab dieser SDP einen kleinen Wettbewerb! Ich suche Leute, die eine Spiel= idee zu Papier bringen. Dabei ist es v|llig unerheblich, ob man sich f}r ein Action-, Strategie- oder Adventure- Spiel stark macht. Bedingung ist eine Art Drehbuch mit Skizzen und genauen Handlungs- oder Ablauf= beschreibungen. Von gro~em Vorteil w{ren detaillierte Pl{ne wo die eigene Position sowie die des Gegners/ der Gegner ersichtlich sind. Auch Landschaftsbeschreibungen und -darstellungen sollten nicht fehlen. Bei anderen Gattungen von Spielen sollte man Spielfelder genauer erl{utern oder exakte Raumbeschreibungen mit Text (und vielleicht auch Grafik?) schriftlich und skizziert mit= liefern. So kann man also seiner Phantasie freien Lauf lassen, egal, ob man sich f}r ein Action, ein Abenteuer- oder Strategie Spiel entscheidet. Also, wer von Euch die beste Spielidee mir vorlegt, der kann sich eines von den Spielen aussuchen (siehe unten). Wenn einer aber eine SUPER Idee mir vorlegen sollte, der kann sich sogar zwei Programme aussuchen!!!! Zur Auswahl stehen folgende Programme: (Wriggle, DOOM, Danger !) Eure 'Drehb}cher' schickt bitte bis zum 01.04.1989 an: Alfred Kn|tig Wilh. Engelhardt Str. 40 6430 Bad Hersfeld (ak) ! Wettbewerb ! Um Eure Phantasie etwas anzu= spornen und die ganze Sache mit dem Wunschprogramm interessanter zu gestalten, veranstalte ich ab dieser SDP einen kleinen Wettbewerb! Ich suche Leute, die eine Spiel= idee zu Papier bringen. Dabei ist es v|llig unerheblich, ob man sich f}r ein Action-, Strategie- oder Adventure- Spiel stark macht. Bedingung ist eine Art Drehbuch mit Skizzen und genauen Handlungs- oder Ablauf= U$m$ : SIEGFRIEDS SOFTWARE$,: SDP 1/98$C: GHK & HWH 88/89$W("VIEH IST EIN"$}2 "vieLSEITIGES hARDCOPYPROGRAMM"$< "FUER EPSON-KOMPATIBLE DRUCKER"$F" MIT 1/216 ZOLL PAPIERVORSCHUB"%P"(VERSCHIEBBAR! ORIGINAL-ADRESSE IM PMODE4-BILD - VORSICHT!!!!)"%Z200,30000%5d"VIEH.BIN",30000%ln:"-> JETZT START MIT EXEC BZW. EXEC 30000"U`U$L$" : MAUSDEMO J.VOELKER 11/88$@: ABFRAGE DES JOYSTICK'S$`: OHNE ZITTERN UND AUSGABE$}(: VON EINEM FADENKREUZ.$2: $7: GRAFIK INITIALISIEREN$< 4: 4,1: 1$A: FELDER FUER PUT/GET$F KR(1): BL(1)%K: FKT.ZUM FEUERKNOPF ABFRAGEN%&P J(X)(((65280) X)0)%AU: FADENKREUZ ZEICHNEN%TZ(0,3)(6,3),%gd(3,0)(3,6),%i: FADENKREUZ IN KR EINLESEN%n(0,0)(6,6),KR,G%s: BILD LOESCHEN U. ANZEIGEN%x 1: 1,1%}: RAHMEN ZEICHNEN%(0,0)(254,191),,B&: STARTWERTE FUER FADENKREUZ&0XX128:YY96&L: STARTWERT FUER LINIE&c(XX,YY)(XX,YY),&: UNTERPROGRAMM FADENKREUZ& 2000&: LINIE ZU NEUER POSITION& (XX,YY),& 160&Ђ FADENKREUZ&: ALTEN BILDINHALT SICHERN'ڳ(XX3,YY3)(XX3,YY3),BL,G'8: FADENKREUZ AUSGEBEN'Z(XX3,YY3)(XX3,YY3),KR,'y: JOYST.U. FEUER EINLESEN'XN(0):YN(1):KN˾J(1)': "ENTZITTERN"'XNXN(XAXN)'YNYN(YAYN)': WENN KEINE AENDERUNG-2030( (XAXN) (YAYN) ( KN) 2030(>: ALTEN BILDINHALT AUSGEBEN(`(XX3,YY3)(XX3,YY3),BL,(: NEUE POSITION BERECHNEN( XXXN41:YYYN31 (%: ALTE WERTE=NEUE WERTE(*XAXN:YAYN(/: FEUERKNOPF GEDRUECKT ?(4 KN ) 9: SONST WIEDERHOLEN)> 2000)7 : 2000 IST EIN UNIVERSELLES)U : UNTERPROGRAMM, DAS DIE)u : KOMPLETTE VERWALTUNG VON) : JOYSTICK (MAUS) UND ) : FADENKREUZ UEBERNIMMT.) : DAS FADENKREUZ LOESCHT) : EINE VORHANDENE GRAFIK* : NICHT. ES WERDEN DIE*$ : VARIABLEN XX,YY,XA,YA*> : XN,YN,KN,KR(),BL()*[ : VERWENDET. DIESE VAR.*{ &: DUERFEN IM HAUPTPROGRAMM* 0: NICHT VERAENDERT WERDEN.* :: DAS UNTERPROGRAMM WIRD * D: BEENDET, SOBALD DER* N: FEUERKNOPF GEDRUECKT+ X: WIRD. XX UND YY ENTHALTEN+2 b: DANN DIE LETZTE POSITION+K l: DES FADENKREUZES.UX":dcheck VERS 4.4 / 01.08.885:ZUR SDP 6/87O:VERS 1.0 / 29.08.86q:(C) 1986 BY MICHAEL RADZIEJ:VERS 2.0 / 04.10.86:JETZT AUCH FUER 40TRACK DS:VERS 3.0 / 05.02.87:NUN ALLE FORMATE MOEGLICH:(C) DER ERWEITERUNG BY% : GUNNAR H.KRAUSE 1986/87? :VERS 4.0 / 21.04.88\ : 80TRACK SS MOEGLICHx : KOMPL. SEKTORENAN- : ZEIGE MEHRFACH BELEGTER: SEKTOREN, LOESCHEN UN-: NOETIGER EINTRAGSERWEI-: TERUNGEN:(C) BY ACHIM ZOELLER '89/99&HFFD7,0:0,1:1:3400:96:N$(170),B(2880),MB$(20):D,20,1,A$,B$:TA((B$,125)):ST((B$,126)):SAST18:AS9090(SATA40):DN$(B$,112,12):TA=TRACKANZ.,ST=SEK/TRACK,SA=SEITENADST1681:NDST2081:BYTE IN BAM F.ALTERNATIV U.NORMAL DIRBA$(0)(AS,255)(0):BA$(1)BA$(0):(BA$(0),AD,3)(0)(0)(252):(BA$(0),ND,3)(0)(0)(252):#DV,"DISK WIRD ";:SA1#DV," EINSEITIG ";:#DV,"ZWEISEITIG ";O#DV,"MIT ##"(13)"SPUREN UND ## SEKTOREN/SPUR GE-"(13)"NUTZT";TA;ST:(TA40TA80)#DV,"disk nicht im korr. dos-format"BA$(0)BA$(0)(255(BA$(0)),0):(BA$(0),240,12)DN$:DV #DV,"PROGRAMME MIT EINEM GRAD UEBER 4%:":UEBERPRUEFEN D.DIR AUF ERWEITERUNGEN@480,"FILEINFO#";:Z0:SE318:D,20,SE,A$,B$:A$A$(B$,125):T125025:N$(Z)(A$,T,1)(A$,T24,1):@489,Z;:ZZ1:T,SE:L$(2,128):@480,"UEBERPRUEFUNG FILE#:";:T0159:N$N$(T):154:TTT@499,T;:(A 1)1(A 128)029(A 32)0 (A 128)12828:FILE NICHT ERWEITERT6N$(TT)L$:TTB:N$N$(B):154:26DN$(TT)L$KTiT0159:N$(T)L$:34Z 2::"UNGENUETZTE ERWEITERUNGEN IM DIRGEFUNDEN, SOLL ICH DIESE":"LOESCHEN [J]";H$:H$"J"Z0:34 T0159:N$(T)L$T:34!SE(T10):ENTSE10:D,20,SE3,A$,B$:A$A$(B$,125):(A$,EN251,1)(((A$,EN251,1))128):D,20,SE3,(A$,128),(A$,129):T"TT0159:N$(TT)"":TT#:S318:D,20,S,A$,B$:A$A$(B$,127)$K125025:K=START DER EINTRAGUNG%AT((A$,K)):ATTRIBUT1&AT13745:ENDE ERREICHT^'AT 128 44:ENEN1:EINTRAG GUELTIG?((AT 1)44:EXTENSION (WIRD ANDERS ABGEARBEITET))PNPN1:N$(A$,K1,8)"."(A$,K9,3):N$(PN)N$:79:NAME,EINTRAG VERARBEITEN?*SBSBB:SNSNN:MM1:BLOECKE SUMMIEREN,EINTRAEGE SUMMIEREN,ANZ.FILES ERHOEHEN+B1H(N1)(B1)100:H4#DV," "N$;13);:#DV,": ### BL. ### %";B,H ::M0M01,K,S:NAECHSTER EINTRAG-:zur gesamtauswertung.#DV:#DV,(32,45)(10);:BMM0 Z100:Z(SNMM0)(SBMM0)100\/EN0"AUF DER DISKETTE SIND KEINE","DATEIEN GESPEICHERT":490#DV,"GESPEICHERT SIND"PN"PROGRAMME":#DV,"IN"EN"EINTRAEGEN. DISK WIRD ZU":#DV,"#### % AUSGENUETZT";8000SBEN9(TASA2):#DV,"(###### BYTES/EINTRAG)";(256SBEN)~1#DV,"DISK ENTHAELT";SB;"BLOECKE":#DV,"DAS SIND";SB256;"BYTES.":#DV,"FREI SIND ";(18TASA36SB)256;" BYTES"2H(TASA1836SB)256D:H0#DV,"IRGENDWIE SIND";H;"BYTES":#DV,"VON DER DISK VERSCHWUNDEN!":DV DV0:503#DV, "GESAMTGRAD: ### %";Z:#DV/4:BAM VERGLEICHEN5D,20,1,A$,B$:B1$(0)(A$(B$,52),AS)(0):B1$(0)B1$(0)(255(B1$(0)),0):(B1$(0),240,12)DN$:B20:D,20,2,A$,B$:B1$(1)(A$(B$,52),AS)(0)26152:(B30)(B40)(B1$(0)BA$(0)) <=GZ *?B@Ke (>C:@:+(>A64>)*(=95:0 -);4/9?0D+838<A+P+809?+>^(92776PL)62808SW(255101S&$B,90+M*&$A)<' 5,H*#B(" 8'S*$C)C#/+5)"F')*(2+$(#E'&+0!()+$A)B- ?+ ,(#D( $&@*)($E+"&/-1)$G*".+80%E)!# H"O *$$'$!) &5($&&!!(?'$'&'F(%J) %J ) (%( ) %% -(%$!!W (($$!$ ) 582,('&#"PQ%X.*% (" U6%|0,&V +$]4'*/42B03=*'&/'%266?3-7<4Ea5;C8U4C@/{:^F3?;-c [l72QD0QC<:6`O9Q_FHW,<hiq u' $K}[H:DMZQ6NTUOaH]~_OW_K]z`M^sPTB-A==75D@66*3RS(424QX,/24<W'313o;% $03o9*?"0n:*>#1l9-9(-h:+:.,b;.8-5V=.9.4S=09/4P<1921M<2;08E;5;36C76?18@5;<55>6:=57<55959766<588>8>665@8@:07  7B915  8B915 6F5548C7535G4735G4%15.L 055" PG"7JD/ 7G=7! 7L7)% KKC/$ KLH-# 8JH1# NJI1"LKI1( ; OF8#PNI9$ OPG7- NOF://LC I711; A =34K= @ =F4K? BUC4L?CX:=KDT\9;KJVZ8;J F[ZH$EG\ZC/FH_G;  H_aD$@ GJ[DU+Fi]<8BhvGDB,Eu[R.&IsEn#2 #;q_6'X}D B,'EtDiCEbF875Dd97   )c[G -7kb05%*~*    + L ~ % P/ 8B +#*       .5     0' 2 L 3 $bP 5 %9W% '           +   "%        G$        &Y  !    +9"_,`#<E&# > b+ & #=8MA &" a5 %#:X< &" NL ' $ =<IN%&A9DwL:<7>;\uY]] `^_ rUj| [E>[ X^ey9'_XoGSr2 #.             "=U N 78 L:0<M] : H " 285I1# 825J2":14H3 L3E2#<+ 2F4!E#@G%604B3$D#<D2261772281634747*261E463#92"95'1276-'5177-$548;)6<K?c;;J-? BEA)?L(T7nkrg-\f 20 &       "  ("Z9'    $         -          " <  ;E$#  0/51<%  ; #    "        8 h ?V<V@VC`? CCp >CL  NA  NA  O>  N>MA NO OO  MP  LP  LP  9 <L 9 7P  : 7<  ; 7 > QHe PJI 6Hc 8C N =D H9 MH=  bW 6`aKme7 h,Ys@{EDP_6H2\#HMIvf\~c 18           !!  B0   q   XF L.JMY 5 ;H8 5LG 4M1  4L4' 48 2(2 47F( 36F#/697+%5B9*"06@:+$4?:,"13@9,%/5?6/$24?61$3@50&23A40(1345-+2335/*1320/,313*0435 /3A9  +25@9 ,4C7 6C6  67P 05N)2 52P& 27K%0 26..1 47 71 7G8*/ 5H6(1 5H5+1 7E8&$2 5G8*2 6G5/3 6G513 6GA'4 7EF"!47EK 4 6II'3 7HN2 7HH%2 8JF%#1 9GG)%0 <DF+(0 :GD./. 8JD+7. 8KH25- <;G<2/8HF>?2 6H7HK 6H9LI$ 4E=HB: 23O8H:  6 9485  7 71?.   ' 39 .V-6 , @(BH@0DL?+BI0Jtx|`IES}uh[CLznRr6SyN1UX%9eAUr{.R55ag,.a. 'KT^LWNO3q# :_),7   ]5':440> 'h6  VSo?/4> 6f NxUgN ozd .T $x9LMg, J *.ZJ90=?NYS &-93:,kE]~3iR{mMd6gn x_:AcRF,\2C_RF4C<aEIC:$ 4Z5MC>gL0JC;uG0CE=p;=2AM`2?-2Za.=/,gX*=5'e E*<6' '#:,:5*Zh*%39cL+945kE)=/3t<)C(5s7*E&:I'9:42T=6<45N<8;55I=7=45I9:<4F3 ,B* F (F* +5 (H)'57 )I&(4 ,M8/--" ,B9 >  E D JQ MK>H@G@F9,6>=G<+.>DL9&+HP> :*M5 <G!4DP7G5OYhqKB]y <9         5>          =B  M '9A "5CI8,<(. ;"@7%; 298& &G4'3- "J5)-1!M('0,( #L)/-%$L*"..%"P)" //&!Q)$;) [(!;;' ;!7&; 6& Z(: 5%T-;(P/=$Q1*#R2+ Y/ )[01*>$\23<+VM69<P3GI4b&eL\MbII^J{PWNtTWT\jUUXmRUZnPU\mQYm\QZqe [k!bZ!o?=SMT@CjDOUCO%c                             !I  Bd>C,DYEa EVEHRFKOF[& < >Kb, L>MP; =ANP1;PQJ0%6QTA6'6SS=8,5SV9706UR?/0=UMC.0=WIH1,@WGI1/>WGG/3@UHF31@UGI/4BRJG.5DRII/4EQHI08EQGL.8FOGL18EPGN.:EOIL/:FOGP,=FNHM/@FMJK/BENFO/EDNGO/IDOFO1LDQAS0OCR@S2TAT=W/X?U9\,^=W9 ,*.7ZbY8! ;fcP0;fO6h1&;fc3 :eq0Z@o!yp]/+`r%!eo5EUTDW@eE>Z~vgJS|B6  ())  5  B       #UYiE9 !M[K>*L_A\'LYC^ JXC_HSAa8 L@c 6D@ v2BC x0=D@ =9,8 (+9EL  : . 7'  -8   0q 5Hq  4Ko . 7J` , FG^ -GDK, I@cE\* UD K-I\_-HZa. 2Z`+FYd KXNb\eb\M b^bdbcox_      ? 7  fee%B Ka' + JQ /9 *K .2 ,1 3 3F3 2F0 3 F2 3 F2 4 E1 14 E3 2 534 D3 45 4 4H5 + 7H2 . 5H3 , 744 @;I41LH6JEI8CLP6FKO7HLK 9EJI 7HJF 8HHO 8JFN 8JHO 7JGO 9JHN 9MDO ;KFO :LFOJKENJLDOK?P2M;PQS5QQS9SPH,?\9,/[{C[/ >"7&    1  .  '   & 2                             0            # , 3CW;JVWH:# BKR@C=I?G>E::A=6? ;999= ' % 82: ),-:# "L;, " 0695  A79062357.821/+//,5.3'1*.,2*:3/"/,/24$-1/#0**&905,$*."<-3 -+"1_01+.4T17'L4-/+!-80$(0-&0+&+*+%!,# !)41 /.21,//5+/01!/ 3+%052+@9 "(72"90'1/':2E.(33)/2,+5&75%>-01(/52;<5 &k G;{0B$/$NE-+$BG-FO87=82&B+)n85{5A!$I7           &.   J[% XFYA_AFS_CAApB@AW@?@@ >>?>&===8+;:.@'-90-8469 97$?977 :7969 %4"5;-2'37 ,3%658)1'472(1%48/1&47 33%4;43%6: 74&49<Z5$6;;Z7&5=9_8#8;7 9:#98?CH<.:EK:;2@GM]E Ms`W\`fWZrXWTq^Y[BxE ]BQp \+ <8%H[=7B9QYQS!)p=f;RE"=T-L1M  K2Q                                                             $          ( ]   =XS? 8?FNB;TDB@K2W? ,/UN!N!^9&O   *+,/01ΗfrOs ֆ ׆4 =i-2.3ƍ4瀌H&99U$ +$k4,1: 0,5:C$(27)::SC0:C$;"DNL.";C$;"DWF.";:CT(&H76)256(&H77):X14:X(X)X340::XX247$| MD$"SELECT"$C$;"DWN.";C$;"DNL.";:@9,"CHRGEN";C$;"DWF.";C$;"DNL.";$d@50,"MODE: ";:4500:C$;"DNL.":@100,"CHR$=";SC32%0C$;"DNH.":M1132:I32255:@(IM)2,(I);::C$;"DNH."%XFG0:BG5: FG,BG:C$;"DNH.":4500%A$: A$"" XFG:FGBG:BGX: FG,BG:@(SCM32)2,(SC32);: 2010%FG0:BG5: FG,BG:@(SCM32)2,(SC32);&A(A$): A8 SCSC1:A94SCSC32& SC0 SCSC224&A A9 SCSC1 : A10 SCSC32&Z SC223 SCSC224&@(SCM32)2,(SC32);:C$;"DNL.":@105,SC32:C$;"DNH."&ZZ0:X14:(X(X))XX ZZ1::&ZZ15,0:@(SCM32)2,(SC32);: 2015'*X("ASL",A$): X0 2010 : X 2060,2070,2080'= 4600: 3000'qC$;"DNL.":@56,"SAVE ";:(0,24)(200,95),,BF'@150,"";:"FILE NAME";F$:"(C)ASS OR (D)ISK";CD$' CD$"C" AA:M F$,CT,CT895,CT:OF&H2F27CT65536( CD$"D" F$".BIN",CT,CT896,CT::OF12071(6 CD$"C" CD$"D" 2070(I"OFFSET =";OF( "" 2076 : (0,24)(200,95),,BF:4500: 2010( C$;"DNL.":@56,"LOAD ";:(0,24)(200,95),,BF:@150,"";(!"FILENAME ";F$:"(C)ASS OR (D)ISK ";CD$)" CD$"C" AA:MF$)(# CD$"D" AA: F$".BIN")I$ CD$"C" CD$"D" 2080)s%(0,24)(200,95),,BF: 4500: 1000) (203,8)(227,88),,BF) COSC4:I03:CD(I)(CTCOI):) ևC$;"DNH.";:I03:J07:AT128J6452I* CD(I) 2(J) 0,5 : 5,0* @AT,(32);::*, MX0:MY0*t A$: A$"" XFG:FGBG:BGX: FG,BG:@180MY64MX," ";: 3100* ! CD(MX) 2(MY) 0,5 : 5,0* #@180MY64MX," ";+ &A(A$): A9 MXMX1 : A8 MXMX1 : A10 MYMY1 : A94 MYMY1+\ 0 MX0 MXMX4 : MX3 MXMX4 : MY0 MYMY8 : MY7 MYMY8+ : 0,5:X("EXCSQ",A$): X0 3100 : X 3150,3200,3250,3300,3350+ N I03:CD(I)0:: 0,5:(203,8)(227,88),,BF: 3100, CD(MX)CD(MX) 2(MY): 3100,) CD(MX)CD(MX) (2(MY)):3100,d I03:CTCOI,CD(I)::(203,8)(227,88),,BF: 2000, (203,8)(227,88),,BF: 2000,:: " Bitte geben sie dem Text einen Namen";TE$: TE$,H TE$;J-R I1 J-\ TE$;T$(I)-&f I-,p-7z 220-::" Bitte geben sie den Text-Namen ein";TE$: (TE$) 960- TE$;J- I1 J- (TE$) 960- TE$;T$(I)- I--ʁ 220. ԉ " Wollen Sie laden oder speichern (L/S)";F$.!ޅ F$"L" 900.7 F$"S" 830.B 220ER0(TASA40)TASA40#DV,"BAM IST OK":&HFFD6,0:{7#DV,"BAM defekt":4:B1$(0)BA$(0)(B1$(1)BA$(1))(TASA160)678 "AUSGABE DER UNTERSCHIEDE AUF DRUCKER? [J]: ";B$:B$"J"DV2:DV09F0TASA160:I1AS :(BA$(F),I,1)(B1$(F),I,1)65 <;A1((BA$(F),I,1)):A2((B1$(F),I,1)) G112:#DV,"nicht BELEGT":B1B11:64 ?112:#DV,"ZUVIEL BELEGT":B2B21 @J AI,F B#DV,(32,"-");:DV #DV!"CB1 #DV,"### SEKTOREN ZUWENIG BELEGT";B1!RDB20#DV,"### SEKTOREN ZUVIEL BELEGT";B2!}EB3 #DV,"### MEHRFACHBELEGUNGEN";B3!FB40#DV,"### FALSCHE EINTRAEGE";B4"GB1B3B40#DV,"DISKETTE WEITER BENUTZBAR":#DV,"DISKETTE nicht mehr benutzbar!""HB3 121"SI3: "SOLL ICH DIE FALSCHE BAM UEBERSCHREIBEN? [J]: ";A$"bJA$"J""KF0SATA160:D,20,F1,A$,B$:A$(BA$(F),128):SATA40(B$,1,52)(BA$(F),129)"LD,20,F1,A$,B$#MB3 "DISK BEDINGT WEITER BENUTZBAR!":"OK - DISK WIEDER BENUTZBAR!"#!N#aO:eintrag ab k verarbeiten,RUECKGABE: B=BLOECKE,N=EINTRAEGE#PJ015:1.ZU VERARBEITENDES BYTE#QC$(A$,K,25):ZU VERARBEITENDER TEIL#RB0:N0#SLJ0 243$TH((C$,L)):BL((C$,L2))256((C$,L1)):ANZ. U. START BLOECKE$nUBLHTAST #DV:#DV,"fehlerhafte eintragung bei ";N$:3:B4B41:89$VH0:BBH:NN1$W102:IN BAM EINTRAGEN$XI9BL BLH1:B(I9)PN:$Y$Z:ALLE EINTRAEGE ERLEDIGT,MIT FORTSETZUNG?% [(AT 32)0:NEIN%A\H((C$,1)):H=NUMMER D.EINTRAGS,1.EINTRAG=0%X]D,20,H103,D$,E$%m^D$D$(E$,127)%_H(H(H10)10)251:AT((D$,H)):C$(D$,H,25):J04:83:START D.EINTRAGS IN D$,ZUSATZEINTRAG VERARBEITEN%`&a@64," VERSION 3.4 LAEUFT NICHT MIT DOSPLUS":@128,(32,45)" dcheck DISK-ANALYSE VERS 3.4 01.08.88"," (C) V 1.0 BY MICHAEL RADZIEJ ERWEITERT VON GUNAR H. KRAUSE UND ACHIM ZOELLER",(32,45)'&b"AUSGABE DER ZERSPLITTERUNGSGRADEUND MEHRFACH BEL. SEKTOREN AUF DRUCKER (J)";A$:A$"J"DV2'bcLL(&H60A):" WELCHES LAUFWERK("LL")";:D:D0DLL'd@352,"PROGRAMME MIT EINEM GRAD UEBER 4%:"(100,32)(100,8)'e'f:in bam eintragen, BL=1.BLOCK,H=ANZ.(6gB2BL:H2H:HP(B28):((B2H2)8)HP HM(2(B28HP)1)(2(B28HPH2)1):108(yhHP8B2 HM2(B28HP)1:108:HPHP1:H2H2HP8B2:B2HP8(iH3(H28):HP179HPH3181F(HP180):IHPF180:(BA$(F),I1,H3)(H3,255)(BA$(F),I1,H3)(H3,0):107)jHM0:H4HP:HPH4 H4H31:108::HPH4)^kHPHPH3:H2H28H3:B2B28H3:H20HM(2H21):108:)lF(HP180):IHP1F180:HA((BA$(F),I)):((HA HM)255)255111:MASKE HM F.BYTE HP EINTRAGEN U.AUF MEHRFACHBEL. TESTEN*bmJ07:((2J)(HA HM))0112:#DV,"mehrfach BELEGT":#DV,"% % - % %";N$,N$(B(HP8J)):B3B31:3:115*inJ*o(BA$(F),I,1)(HA HM):*p:sektor-meldung ausgeben*qC(F180I1)8J:TR(C18SA):SECCTR18SA1*r#DV,"SEK ##/## ";TR,SU@!0kl@0@-mzl&zk&95>#O \LVV0&9 l0ڦ4 = D05 zl&؎9~B~B~B~BDm,4,4,4<~^n<<~Z~<$$I$UB<0<< pp X  X<<|\|0 Z&9 l!!4 = j ! D f0 f5 zl&؎ f9||8~f<# 90!?I# Z&0s-#~>#Xx ֪0&$?z#~&#| ? 7`<0ٌ9 p 0)``cx)~aO23͹10p?̙`0 0`?0 $B@I cZ&0s-9!5!6!70ZZIo&#~%T4 =$$%F0 Z&$0$5 z#~&ю$!%h<& %h0 %i%h 0&z& &m<& %h0%i%h 0&z& &m 8<ffff00|006`lvff*>>>~U&0 Z&9   'P&"O'I9'B''('P''X9'B'(9   |>XV>#2d 0&9|!)")4!5J&('! " A!5!6!7"!3]4Ć ƽ/|'Ľ/z'½(ooZ&'юooZ&'5J&'ю'''Ž(V(9>#(V(P J&  Z&9(TF(TFF(TFF(UFFx(Uy(T(U(U9>}{xvsqnid_ZUPKFA<72-(# !,!7'lj46")(56 01?Z&9># ZVV&9"O"Z)-&&:&)K'('<:'3&')!A"O'"P)н&K"&|)c ~)        !5'/).9z)'9 0Z&)y'2))9,2)9)y!?")""~">#O \L450&9!5'9!6'9!7'9o0J&9|!)|!)")4!O5J&('!OA("Z " ")y"O!5)****"P#+S!A)c"O'("#*" `' н"0" "( ~+{z*'9s*cc cc$ cc cc 93Hz*'9**''=9 +<*ǎ+B*Ў+K*ߎ+K*|**'9s*m9*~o+K*о*߽+<*߾*+<**ǽ+K*z*'94z!?" 8~0 焽+k9o09!)'9|!?+W .+W94 ~'59 |!)|!)('A)" !5)y")@8**+"!A,)н+S"P+ z*'9cc *9*''"9 +<++K+|**'9s*9+~+K+++<+z*'z,+'9" ,?,?,?9 0 Z&9 ,[ ,x40 5J&9`?x<;@§SO yP :e@ V+?( P@ --^'_'|2'9z-'9-z-$' ,Rm -9-W-''=---Q-=-$9!? O~" @ Lj-kxs-^iiiiii0Z&9,Rs-^9"O'!5'9!6'9!7'9~-2-^(ý(""Y-%9-9-9-01-9--0 1 ,S,Y9,S,Y9"$9|!)|!) O!!(' " A"!5"Z"O)".!A"P".ώ0&)н+S.." `' "O' ~."(0" " z*'9cc cc#cc&P*9z*'9cc cc$*9z.'9 cc cc#s.9" '9"0 " "|#'#.#9#9|!(")('4"0&5J&" " ކB lffffffffffffffffi0Z&؎ iiiiiiiiiiiiiiif0Z&ڎ0&J&"0& 4/ֽ(ý0 (5Z&"0ڿ!?~$R/40 5Z&9 p̈, 8p` /oo0 Z&9")y)'&&'&'B'('<'P'3+W *ǎ*Ў*ߎ* ,S ,Y ++9'"O|!)9"ŷ÷?ݽ?o& O~$RCOPYRIGHT BY ALFRED KNOETIG 1987C                                             ]9(C) BY ALFRED KNOETIG IN 1985/86B"Z,R%"O9U@!0kl@0@-mzl&zk&95>#O \LVV0&9 l0ڦ4 = D05 zl&؎9~B~B~B~BDm,4,4,4<~^n<<~Z~<$$I$UB<0<< pp X  X<<|\|0 Z&9 l!!4 = j ! D f0 f5 zl&؎ f9||8~f<# 90!?I# Z&0s-#~>#Xx ֪0&$?z#~&#| ? 7`<0ٌ9 p 0)``cx)~aO23͹10p?̙`0 0`?0 $B@I cZ&0s-9!5!6!70ZZIo&#~%T4 =$$%F0 Z&$0$5 z#~&ю$!%h<& %h0 %i%h 0&z& &m<& %h0%i%h 0&z& &m 8<ffff00|006`lvff*>>>~U&0 Z&9   'P&"O'I9'B''('P''X9'B'(9   |>XV>#2d 0&9|!)")4!5J&('! " A!5!6!7"!3]4Ć ƽ/|'Ľ/z'½(ooZ&'юooZ&'5J&'ю'''Ž(V(9>#(V(P J&  Z&9(TF(TFF(TFF(UFFx(Uy(T(U(U9>}{xvsqnid_ZUPKFA<72-(# !,!7'lj46")(56 01?Z&9># ZVV&9"O"Z)-&&:&)K'('<:'3&')!A"O'"P)н&K"&|)c ~)        !5'/).9z)'9 0Z&)y'2))9,2)9)y!?")""~">#O \L450&9!5'9!6'9!7'9o0J&9|!)|!)")4!O5J&('!OA("Z " ")y"O!5)****"P#+S!A)c"O'("#*" `' н"0" "( ~+{z*'9s*cc cc$ cc cc 93Hz*'9**''=9 +<*ǎ+B*Ў+K*ߎ+K*|**'9s*m9*~o+K*о*߽+<*߾*+<**ǽ+K*z*'94z!?" 8~0 焽+k9o09!)'9|!?+W .+W94 ~'59 |!)|!)('A)" !5)y")@8**+"!A,)н+S"P+ z*'9cc *9*''"9 +<++K+|**'9s*9+~+K+++<+z*'z,+'9" ,?,?,?9 0 Z&9 ,[ ,x40 5J&9`?x<;@§SO yP :e@ V+?( P@ --^'_'|2'9z-'9-z-$' ,Rm -9-W-''=---Q-=-$9!? O~" @ Lj-kxs-^iiiiii0Z&9,Rs-^9"O'!5'9!6'9!7'9~-2-^(ý(""Y-%9-9-9-01-9--0 1 ,S,Y9,S,Y9"$9|!)|!) O!!(' " A"!5"Z"O)".!A"P".ώ0&)н+S.." `' "O' ~."(0" " z*'9cc cc#cc&P*9z*'9cc cc$*9z.'9 cc cc#s.9" '9"0 " "|#'#.#9#9|!(")('4"0&5J&" " ކB lffffffffffffffffi0Z&؎ iiiiiiiiiiiiiiif0Z&ڎ0&J&"0& 4/ֽ(ý0 (5Z&"0ڿ!?~$R/40 5Z&9 p̈, 8p` /oo0 Z&9")y)'&&'&'B'('<'P'3+W *ǎ*Ў*ߎ* ,S ,Y ++9'"O|!)9"ŷ÷?ݽ?o& O~$RCOPYRIGHT BY ALFRED KNOETIG 1987C                                             ]9(C) BY ALFRED KNOETIG IN 1985/86B"Z,R%"O9EI GROESSE 1= / FCC /WERTE 0-69 / FCC 13 FCC / 2= / FCC / 0-59 / FCC 13 FCC / 3= / FCC / 0-59 / FCC 13ELL FCC 13 RAN ******9 FCC / 4= / FCC / 0-44 / FCC 13 FCC / 5= / FCC / 0-09 / FCC 13 FCC 13 FCC /ENDWERT =BILD / FCC /GANZ NACH RECHTS / FCC 13******9 FCC /WENN FERTIG ZUR / FCC /EINGABE DANN / FCC 13 FCC /ENTER / FCC 0 EING LEAY WERT,PC JSR $BA77 LBSR INKEY STA DZ,PC ANDA #$0F LDB #10 MUL 13******9Uxu...``QUINKY`IN`THE`CAVES`OF` ``BY`ALFRED`KNOETIG`IN`BAD`HEF``@OF THE INPUTLOOP+3. * * FROM $837D THE INTERPRETER- * * LOOP IS CALLED. *   PUT $4E21 ORG $4E21   LEAX BEFEHL,PCR LEAX -1,X STX $A6 JMP $837D BEFEHL FCC /RUN /,34,/DIRMENUE./9 FCC /BAS/,34,0  * FILE IS not NEEDED FROM * * AUTOBOT2.BAS ! MACHINECODE * * IS THERE STORED IN STRING * * MC$ ! * * WILLISOFT/07/12/88/08444/1252* A6 JMP $837D BEFEHL FCC /RUN /,34,/DIRMENUE./9 STB ,Y+******** LBSR INKEY STA DZ+1,PC ANDA #$0F STA ,Y+ BRA ZAHL********ZAHL LEAY SPEICH,PC LDA WERT,PC STA ,Y+ LDA WERT+1,PC STA ,Y+ LDA SPEICH,PC9 ADDA SPEICH+1,PC STA RAND+3,PC LBSR RI AUS CLRA CLRB RTS********WERT FCB 00,00********SPEICH FCB 00,00********RAND FCB $03,$1B,$6C,$00 ********RAN LEAU RAN,PC LEAX RAND,PCICH,PC9 LBRA TOUT********RI LDA DZ,PC JSR $800C LDA DZ+1,PC JSR $800C LEAX RI1-1,PC JSR $90E5 LBSR INKEY CMPA #$4A BEQ AUS CMPA #$4E LBEQ STELLE RTSPC9RI1 FCC 13 FCC /RICHTIG = J / FCC 13 FCC /FALSCH = N / FCC 0 DZ FCB 00,00********MINI1 LEAU MINI1,PC LBSR INIT ;DRUCKER- LBSR SCHIEB LBSR RANMLP1 BSR MIN1 RTSPC9 INCB BSR MIN1 INCB BSR MIN1 BSR VOR21  ADDB #22 CMPB #191 BLS MLP1  LBRA RESET ;PRG-ENDE ******************************** MIN1 BSR MAD1 BSR MZEIL1RTSPC9 BSR MZEI1 LBRA CR *********MAD1 PSHS A,B LDA #32 ;D=B*32 MUL ADDD <$BA ;+BILDANF. TFR D,Y PULS A,B,PC********MZEI1 PSHS A,B,X,Y LDX #32 MZLP1 LDB #$80 L1RTSPC9MBY1 PSHS X,Y CLRA LDX #8 MBI1 ASLA BITB ,Y BNE MWH1MBL1 ORA #1 MWH1 LEAY 96,Y ;JEDE 3.ZEILE LEAX -1,X BNE MBI1  PULS X,Y LBSR CHROUT LSRB BCC MBY1 9 LEAY 1,Y LEAX -1,X BNE MZLP1  PULS A,B,X,Y,PC********MZEIL1 LEAX MTZA1,PC LBRA TOUT********VOR21 LEAX TVOR21,PC LBRA TOUT********TVOR21 FCC 3,27,'J',21********MTZA1 FCC 5,27,'*',3,0,19********MINI2 LEAU MINI2,PC LBSR INIT ;DRUCKER- LBSR SCHIEB LBSR RANMLP2 BSR MIN2 INCB BSR MIN2 LBSR VOR22  ADDB #15 CMPB #191 BLS MLP2 1 FCC 5,27,'*',3,0,19 LBRA RESET ;PRG-ENDE ******************************** MIN2 BSR MAD2 BSR MZEIL2 BSR MZEI2 LBRA CR *********MAD2 PSHS A,B LDA #32 ;D=B*32 MUL ADDD <$BA ;+BILDANF.,3,0,19 TFR D,Y PULS A,B,PC********MZEI2 PSHS A,B,X,Y LDX #32 MZLP2 LDB #$80 MBY2 PSHS X,Y CLRA LDX #8 MBI2 ASLA BITB ,Y BNE MWH2MBL2 ORA #1 MWH2 LEAY 64,Y ;JEDE 2.ZEILE19 LEAX -1,X BNE MBI2  PULS X,Y LBSR CHROUT LSRB BCC MBY2  LEAY 1,Y LEAX -1,X BNE MZLP2  PULS A,B,X,Y,PC********MZEIL2 LEAX MTZA2,PC LBRA TOUT********19MTZA2 FCC 5,27,'*',1,0,1 ********************************MINI3 LEAU MINI3,PC LBSR INIT3 ;DRUCKER- LBSR SCHIEB LBSR RANMLP3 BSR MIN3 INCB BSR MIN3 INCB BSR MIN3OUT********19 BSR VOR18  ADDB #10 CMPB #191 BLS MLP3  LBRA RESET ;PRG-ENDE ******************************** MIN3 BSR MAD2 BSR MZEIL3 BSR MZEI3 LBRA CR *********MAD3 PSHS A,B*19 LDA #32 ;D=B*32 MUL ADDD <$BA ;+BILDANF. TFR D,Y PULS A,B,PC********MZEI3 PSHS A,B,X,Y LDX #32 MZLP3 LDB #$80 MBY3 PSHS X,Y CLRA LDX #4 MBI3 ASLA ASLA9 BITB ,Y BNE MWH3MBL3 ORA #1 MWH3 LEAY 96,Y ;JEDE 3.ZEILE LEAX -1,X BNE MBI3  PULS X,Y LBSR CHROUT LSRB BCC MBY3  LEAY 1,Y LEAX -1,X BNE MZLP3 LA9 PULS A,B,X,Y,PC********MZEIL3 LEAX MTZA3,PC LBRA TOUT********VOR18 LEAX TVOR18,PC LBRA TOUT******** INIT3 CLRB LEAX TINI3,PCR********TOUT3 PSHS A,B LDB ,X+ ;ANZ.ZEICH BNE MZLP3 LA9TLP3 LDA ,X+ ;ZEICHEN LBSR CHROUT DECB BNE TLP3 PULS A,B,PC********TINI3 FCC 4,27,'3',2,13********TVOR18 FCC 3,27,'J',18********MTZA3 FCC 5,27,'*',1,0,1 ********************************ZLP3 LA9UX":dcheck VERS 4.4 / 01.08.885:ZUR SDP 6/87O:VERS 1.0 / 29.08.86q:(C) 1986 BY MICHAEL RADZIEJ:VERS 2.0 / 04.10.86:JETZT AUCH FUER 40TRACK DS:VERS 3.0 / 05.02.87:NUN ALLE FORMATE MOEGLICH:(C) DER ERWEITERUNG BY% : GUNNAR H.KRAUSE 1986/87? :VERS 4.0 / 21.04.88\ : 80TRACK SS MOEGLICHx : KOMPL. SEKTORENAN- : ZEIGE MEHRFACH BELEGTER: SEKTOREN, LOESCHEN UN-: NOETIGER EINTRAGSERWEI-: TERUNGEN:(C) BY ACHIM ZOELLER '89/99&HFFD7,0:0,1:1:3400:96:N$(170),B(2880),MB$(20):D,20,1,A$,B$:TA((B$,125)):ST((B$,126)):SAST18:AS9090(SATA40):DN$(B$,112,12):TA=TRACKANZ.,ST=SEK/TRACK,SA=SEITENADST1681:NDST2081:BYTE IN BAM F.ALTERNATIV U.NORMAL DIRBA$(0)(AS,255)(0):BA$(1)BA$(0):(BA$(0),AD,3)(0)(0)(252):(BA$(0),ND,3)(0)(0)(252):#DV,"DISK WIRD ";:SA1#DV," EINSEITIG ";:#DV,"ZWEISEITIG ";O#DV,"MIT ##"(13)"SPUREN UND ## SEKTOREN/SPUR GE-"(13)"NUTZT";TA;ST:(TA40TA80)#DV,"disk nicht im korr. dos-format"BA$(0)BA$(0)(255(BA$(0)),0):(BA$(0),240,12)DN$:DV #DV,"PROGRAMME MIT EINEM GRAD UEBER 4%:":UEBERPRUEFEN D.DIR AUF ERWEITERUNGEN@480,"FILEINFO#";:Z0:SE318:D,20,SE,A$,B$:A$A$(B$,125):T125025:N$(Z)(A$,T,1)(A$,T24,1):@489,Z;:ZZ1:T,SE:L$(2,128):@480,"UEBERPRUEFUNG FILE#:";:T0159:N$N$(T):154:TTT@499,T;:(A 1)1(A 128)029(A 32)0 (A 128)12828:FILE NICHT ERWEITERT6N$(TT)L$:TTB:N$N$(B):154:26DN$(TT)L$KTiT0159:N$(T)L$:34Z 2::"UNGENUETZTE ERWEITERUNGEN IM DIRGEFUNDEN, SOLL ICH DIESE":"LOESCHEN [J]";H$:H$"J"Z0:34 T0159:N$(T)L$T:34!SE(T10):ENTSE10:D,20,SE3,A$,B$:A$A$(B$,125):(A$,EN251,1)(((A$,EN251,1))128):D,20,SE3,(A$,128),(A$,129):T"TT0159:N$(TT)"":TT#:S318:D,20,S,A$,B$:A$A$(B$,127)$K125025:K=START DER EINTRAGUNG%AT((A$,K)):ATTRIBUT1&AT13745:ENDE ERREICHT^'AT 128 44:ENEN1:EINTRAG GUELTIG?((AT 1)44:EXTENSION (WIRD ANDERS ABGEARBEITET))PNPN1:N$(A$,K1,8)"."(A$,K9,3):N$(PN)N$:79:NAME,EINTRAG VERARBEITEN?*SBSBB:SNSNN:MM1:BLOECKE SUMMIEREN,EINTRAEGE SUMMIEREN,ANZ.FILES ERHOEHEN+B1H(N1)(B1)100:H4#DV," "N$;13);:#DV,": ### BL. ### %";B,H ::M0M01,K,S:NAECHSTER EINTRAG-:zur gesamtauswertung.#DV:#DV,(32,45)(10);:BMM0 Z100:Z(SNMM0)(SBMM0)100\/EN0"AUF DER DISKETTE SIND KEINE","DATEIEN GESPEICHERT":490#DV,"GESPEICHERT SIND"PN"PROGRAMME":#DV,"IN"EN"EINTRAEGEN. DISK WIRD ZU":#DV,"#### % AUSGENUETZT";8000SBEN9(TASA2):#DV,"(###### BYTES/EINTRAG)";(256SBEN)~1#DV,"DISK ENTHAELT";SB;"BLOECKE":#DV,"DAS SIND";SB256;"BYTES.":#DV,"FREI SIND ";(18TASA36SB)256;" BYTES"2H(TASA1836SB)256D:H0#DV,"IRGENDWIE SIND";H;"BYTES":#DV,"VON DER DISK VERSCHWUNDEN!":DV DV0:503#DV, "GESAMTGRAD: ### %";Z:#DV/4:BAM VERGLEICHEN5D,20,1,A$,B$:B1$(0)(A$(B$,52),AS)(0):B1$(0)B1$(0)(255(B1$(0)),0):(B1$(0),240,12)DN$:B20:D,20,2,A$,B$:B1$(1)(A$(B$,52),AS)(0)26152:(B30)(B40)(B1$(0)BA$(0))ER0(TASA40)TASA40#DV,"BAM IST OK":&HFFD6,0:{7#DV,"BAM defekt":4:B1$(0)BA$(0)(B1$(1)BA$(1))(TASA160)678 "AUSGABE DER UNTERSCHIEDE AUF DRUCKER? [J]: ";B$:B$"J"DV2:DV09F0TASA160:I1AS :(BA$(F),I,1)UyO&H72,&H80:&H73,&H20:411,228:412,203:413,4:414,237:415,228:410,236 menue BY ALFRED KNOETIG (W) IN 1989 :Z$(128)@0,(11,128);"m";Z$;"e";Z$;"n";Z$;"u";Z$;"e";(12,128);N$(0)"1) doom":N$(1)"2) doom [backup]")(P(0)135: I1 2:P(I)P(I1)32:I82 100:I0`7@423,Z$"press"Z$"arrow"Z$"keys"Z$;y;T$: T$"" 59<100: T$(94) 100:II1: I0 I1> T$(10) 100:II1: I1 I0@ T$(13) I1 200,210 Z@P(I),N$(I);c 59Rd@135,"1) DOOM 2) DOOM [BACKUP]"Xnhȏ"DOOM.ALF"xҏ"DOOM.SIK" FL 8 NZNZ1:67& FL 128 29& FL 1 29& FL 2 PF1 : PF0'NA$(NZ)(NP$,2,8)"."(NP$,10,3)((PF1)112(PF0)32)" "'YP212:((NA$(NZ),P,1))32(NA$(NZ),P,1)" ": :'LSN((NP$,13,1))256((NP$,14,1)):SP((LSNSA)):SS(LSNSPSA)1' LW,SP,SS,C$,D$:P19:DI(P)((C$,P,1)):P( DI(1)&H55 DI(9)&HAA 23(C1$"DAT0":31(6 DI(2)1 C1$"BAS1":31(V DI(2)2 C1$"BIN2":26(v DI(2)3 C1$"BSE0" :22(XDI(3)256DI(4):5:XXDI(5)256DI(6):5:XDI(7)256DI(8):5(NA$(NZ)NA$(NZ)C1$:7)NZNZ1:@PP,(ZE);:PPPP1:PP509PP494:ZE60 ZE62:ZE60)VZZZZ1:ZZ10 ZZ0:SKSK1:SKSA NZNZ1:67)_12)NA$(NZ)NA$(NZ)(15,32)C1$:7:28) @480,"DIRSORT LAEUFT ";)!WTNZ:ZZ1)"M1:I1:JWT)#IJ 54)$KI:@494,"###";K;*%ZZ((JI)2)*&T$NA$(ZZ)*@'(NA$(I),12)(T$,12)41*h(NA$(ZZ)NA$(I):NA$(I)T$:T$NA$(ZZ)*)LJ:(NA$(J),12)(T$,12)46**NA$(ZZ)NA$(J):NA$(J)T$:T$NA$(ZZ)*+(NA$(I),12)(T$,12)46+,NA$(ZZ)NA$(I):NA$(I)T$:T$NA$(ZZ):46+ -NA$(L)NA$(K):NA$(K)ZZ$+V.LL1:@498,"###";L;:(NA$(L),12)(T$,12)46+e/ZZ$NA$(L)+o0KK1+1(NA$(K),12)(T$,12)48+2KL 45+3 LI JK 53+4L1(M)I:U1(M)L:IK:MM1:56+5L1(M)K:U1(M)J:JL:MM1:56, 6MM1:M164,7IL1(M):JU1(M),/8(JI)1036,;9I135,I:II1:SI,\;II1:IJ 54,p(T$,12)(NA$(K),12) NA$(K1)NA$(K):KK1:61,?NA$(K1)T$:59,@RZNZ:ROPO:NZ1:PO160- A7:NZNZ1:NZ11 NZRZ 65-BNZRZ:PORO-#CMM0-D@96,"filename ext anf ende exec typ";(32,"=");:MM1 :@480,"l=laden s=sortieren pfeile=file";:1505,61:1511,32:1513,61:1523,32:1530,61:1535,32. EPCPO1024: &H7E1F,(PC256): &H7E20,PC(PC256)256:&H7E23.0FPM185:PM287: 6:I(I$).>G I1078.LH I9184.ZI I9586.hJ I9481.vK I7688.L I8332.M70.NNYNY1:NYNZ NYNZ:PZ10:70.O &H7E23:POPO32:PO48069/PPO448:&H7E46:@PO,(NA$(NY),32);:69/"QNYNY1:NY1NY1:PZ10:70/CR &H7E23:POPO32:PO15969/pSPO160:&H7E63:@PO,(NA$(NY),32);:69/TPM1:PZ1:78/UPZPZ1:PZ10PM0:PZ0:70:78/VPM2:PZ1:81/WPZPZ1:PZ10 PM0:PZ0:70:810XN$(NA$(NY),12):FIL("&H"(NA$(NY),20,4))0bY LW1 N$"1:"N$ :LW2N$"2:"N$ :LW3N$"3:"N$ :N$"4:"N$0ZP(N$," "):P0 L$(N$,P1):R$(N$,(N$)P):N$L$R$:900[ FIL32700 @64,"VORSICHT ! MS-PROGRAMM GEHT IN DEN STACK-BEREICH":1\:"GELADEN WIRD:";N$1{](NA$(NY),1)"1" @96,"TIPPE run ZUM STARTEN.": (NA$(NY),1)"2" @96,"TIPPE exec ZUM STARTEN."1^ *CASSETENBUFFER=&H1DA1_ P&H1DA &H1DA(N$)1:P,((N$,(P&H1DA1),1))::P,2551`200,327671aN$""2bP&H1DA20cN(P):N255 N$N$((P)):PP1:9929d N$2?eU$U$%: ****************************$I: * JULIANISCHES DATUM *$m: * SDP 1/89 *$: * *$: * UMRECHNUNG KALENDERDATUM *$: * IN JULIANISCHES DATUM UND*$: * UMGEKEHRT. *%!: * C '89 BY AZ *%E: ****************************%z :" julianisches datum"," umrechnungen",,,% "BITTE DATUM IN DER FORM:"% "TT.MM.JJJJ EINGEBEN": A$:(A$)1011:"DIE ANZAHL DER DAZU ZAEHLENDEN TAGE BITTE:":N&0 T((A$,2)):M((A$,4,2)):J((A$,7))&> 19:30&pJDJDN:24 : NEUES KALENDERDATUM BERECHNEN& "NEUES K DATUM: ##/##/####";T;M;J&:,"BITTE TASTE";&""17&""18:&:KALENDERDATUM => JULIANISCH' M2 MM3 : MM9:JJ1'.C(J100):JAJ100C'dJD(146097C4)(1461JA4)((153M2)5)T'j':JULIANISCH => KALENDERDATUM'J((4JD1)146097):JD4JD1146097J'T(JD4):JD((4T3)1461):T4T31461JD:T((T4)4)(,M((5T3)153):T5T3153M:T((T5)5)(\J100JJD:M10M(M3):M(M9):JJ1(b(: BERECHNUNG TAGESNAMEN( DIENSTAG,MITTWOCH,DONNERSTAG,FREITAG,SAMSTAG,SONNTAG,MONTAG( TNJD(JD7)7(! W0 TN("A$:) #"DIESER TAG IST EIN "A$)2$"DAS JULIANISCHE DATUM IST:",JD)T%"UEBER J.DATUM ERRECHNET:":(B1$(F),I,1)65 <;A1((BA$(F),I,1)):A2((B1$(F),I,1)) G112:#DV,"nicht BELEGT":B1B11:64 ?112:#DV,"ZUVIEL BELEGT":B2B21 @J AI,F B#DV,(32,"-");:DV #DV!"CB1 #DV,"### SEKTOREN ZUWENIG BELEGT";B1!RDB20#DV,"### SEKTOREN ZUVIEL BELEGT";B2!}EB3 #DV,"### MEHRFACHBELEGUNGEN";B3!FB40#DV,"### FALSCHE EINTRAEGE";B4"GB1B3B40#DV,"DISKETTE WEITER BENUTZBAR":#DV,"DISKETTE nicht mehr benutzbar!""HB3 121"SI3: "SOLL ICH DIE FALSCHE BAM UEBERSCHREIBEN? [J]: ";A$"bJA$"J""KF0SATA160:D,20,F1,A$,B$:A$(BA$(F),128):SATA40(B$,1,52)(BA$(F),129)"LD,20,F1,A$,B$#MB3 "DISK BEDINGT WEITER BENUTZBAR!":"OK - DISK WIEDER BENUTZBAR!"#!N#aO:eintrag ab k verarbeiten,RUECKGABE: B=BLOECKE,N=EINTRAEGE#PJ015:1.ZU VERARBEITENDES BYTE#QC$(A$,K,25):ZU VERARBEITENDER TEIL#RB0:N0#SLJ0 243$TH((C$,L)):BL((C$,L2))256((C$,L1)):ANZ. U. START BLOECKE$nUBLHTAST #DV:#DV,"fehlerhafte eintragung bei ";N$:3:B4B41:89$VH0:BBH:NN1$W102:IN BAM EINTRAGEN$XI9BL BLH1:B(I9)PN:$Y$Z:ALLE EINTRAEGE ERLEDIGT,MIT FORTSETZUNG?% [(AT 32)0:NEIN%A\H((C$,1)):H=NUMMER D.EINTRAGS,1.EINTRAG=0%X]D,20,H103,D$,E$%m^D$D$(E$,127)%_H(H(H10)10)251:AT((D$,H)):C$(D$,H,25):J04:83:START D.EINTRAGS IN D$,ZUSATZEINTRAG VERARBEITEN%`&a@64," VERSION 3.4 LAEUFT NICHT MIT DOSPLUS":@128,(32,45)" dcheck DISK-ANALYSE VERS 3.4 01.08.88"," (C) V 1.0 BY MICHAEL RADZIEJ ERWEITERT VON GUNAR H. KRAUSE UND ACHIM ZOELLER",(32,45)'&b"AUSGABE DER ZERSPLITTERUNGSGRADEUND MEHRFACH BEL. SEKTOREN AUF DRUCKER (J)";A$:A$"J"DV2'bcLL(&H60A):" WELCHES LAUFWERK("LL")";:D:D0DLL'd@352,"PROGRAMME MIT EINEM GRAD UEBER 4%:"(100,32)(100,8)'e'f:in bam eintragen, BL=1.BLOCK,H=ANZ.(6gB2BL:H2H:HP(B28):((B2H2)8)HP HM(2(B28HP)1)(2(B28HPH2)1):108(yhHP8B2 HM2(B28HP)1:108:HPHP1:H2H2HP8B2:B2HP8(iH3(H28):HP179HPH3181F(HP180):IHPF180:(BA$(F),I1,H3)(H3,255)(BA$(F),I1,H3)(H3,0):107)jHM0:H4HP:HPH4 H4H31:108::HPH4)^kHPHPH3:H2H28H3:B2B28H3:H20HM(2H21):108:)lF(HP180):IHP1F180:HA((BA$(F),I)):((HA HM)255)255111:MASKE HM F.BYTE HP EINTRAGEN U.AUF MEHRFACHBEL. TESTEN*bmJ07:((2J)(HA HM))0112:#DV,"mehrfach BELEGT":#DV,"% % - % %";N$,N$(B(HP8J)):B3B31:3:115*inJ*o(BA$(F),I,1)(HA HM):*p:sektor-meldung ausgeben*qC(F180I1)8J:TR(C18SA):SECCTR18SA1*r#DV,"SEK ##/## ";TR,SEC;:+<s:NAMEN AUFNEHMEN,AZ=ANZAHL FILES "MEHRF.BELEGT",MB$=FILE+WtT0AZ:N$MB$(T)118+pu:MB$(AZ)N$:AZAZ1+|vT0AZ+wN$(B(HP8J))MB$(T)+xT:MB$(AZ)N$(B(HP8J)):AZAZ1:, y"ANZEIGE UND UEBERPRUEFUNG DER MEHRFACH BELEGTEN SEKTOREN (J/N)";H$,'zH$"N":H$"J"121,{DV0:"AUSGABE AUF bILDSCHIRM ODER dRUCKER";H$:H$"D"H$"d"DV2:H$"B"H$"b"123,|DU0AZ1:ZH0,}F$MB$(DU):F$(F$,8)(F$,10)->~SE318:D,20,SE,A$(0),A$(1):A$A$(0)(A$(1),126):J125025:H$(A$,J,25):(H$,2,11)F$ 129:EINTRAG GEFUNDEN-EJ-MSE-((H$)128)0127:EINTRAG UNGUELTIG, NEUE SUCHE-#DV," "(F$,8)"."(F$,3):LJ15-140-((H$)32)0#DV,(3,10):136:EINTRAG NICHT FORTGESETZT.kS((H$,1)):TS(S10)3:D,20,TS,B$(0),B$(1):B$B$(0)(B$(1),126):S(S(S10)10)251:H$(B$,S,25).LJ4:131:FORTSETZUNG GEFUNDEN, WEITER ZUR AUSGABE.#DV,(31,45).DU.#DV,(10)/x2:"SOLL DER SEKTOR LISTER-WRITER  > SCGSOFT13(MENUEBOTBOTBOOTBOT--game-----DOOMALFDPARTIBIN PARTIIBIN"PARTIIIBINlPARTSBINH$$$z--backup---DOOMSIKPARTISIK PARTIISIK"PARTIIISIKPARTSSIKiZUM UEBERPRUEFEN GELADEN WERDEN (J/N)";H$:H$"J""BITTE DIE DISK MIT >DISKDOC< IN EINLEGEN UND ENTER DRUECKEN";H$:"DISKUSE1"/~/JLJ 243:SEKTORENAUSGABE AB LJ/HL((H$,J))/HL0150:KEINE BLOECKE0FHH((H$,J2))256((H$,J1)):TR(HHST):SECHH(TRST):TR=SPUR,SEC=SEKTOR FUER 1.BLOCK D.GRUPPE0aT1HL:AUSGABE D.SEC0oSECSEC10SECST SEC1:TRTR10114:ZHZH1:ZH3149:ZH0:#DV:DV 1490I337345:I,255::""1480T:ENDE AUSGABE SEKTOREN1J1 13ER0:TASA80B1$(1)BA$(1)ER1191WA(N$):B((N$,1)):U`U$(֋$#:8:500,&H7000:5000:200$LJ14:(J340)223 J 7,6,4,5$UJ:$TSTS10(TS10):(TS10,0)(TS15,7),AA,:$TSTS10(TS240):(TS10,0)(TS15,7),AA,:$SSSS8(SS144):(0,SS8)(9,SS15),DD,:%SSSS8(SS8):(0,SS8)(9,SS15),DD,:%2(X,Y)(X9,Y7),VV,G:% AW˾AT(0):XX10: AW9 (X,Y)(X9,Y7),RR,: : (X,Y)(X9,Y7),VV,:% CR:(65,159)(5TS,8SS),:% CR:(185,159)(5TS,SS8),:%%A$:A$NA$ :30&(AY20:M$"GAME OVER":61010&ZXT1:YS1:100&.\XT:YD:100&F^XF(O):YE(O):100&X`XH:YG:100&fbXTS:YSS&d (P$)64 105,115,120,105,105,105,105,105,130,105,140,145,150,155,160,165,170,175,105,180,105,185&i&s(X,Y)(X9,Y7),BB,:'x(X,Y)(X29,Y15),CC,:'-(X,Y)(X9,Y15),II,:'I(X,Y)(X9,Y7),JJ,:'e(X,Y)(X9,Y7),KK,:'(X,Y)(X9,Y7),LL,:'(X,Y)(X9,Y7),MM,:'(X,Y)(X9,Y7),NN,:'(X,Y)(X9,Y7),OO,:'(X,Y)(X9,Y7),PP,:( (X,Y)(X9,Y7),QQ,:()(X,Y)(X9,Y7),RR,:(E(X,Y)(X9,Y7),TT,:(a(X,Y)(X9,Y7),VV,:(x:** START GAME **(ȷ3,1:2(MD0:PS0:B0:NP7:O0:PC0:K0:YYK:ZK:TS10:T1TS:SS8:S1SS),Ͱ1:(255,176)(0,191),,BF:4:(255,176)(0,176),:E5:A0:W0255:F(8)4:AAF:A255215)KҪ(A,176E),:E5(E0):W)v׀A17:E(A)16A:F(A)10((22)2):A)AO:O17:P$"B":94:O:OA:P$"K":Y0:X024010:100:X:(254,3,4):(254,4,4):Y81528:X0:100:Y*T끽5:6:X60:Y160:P$"I":100:X180:100:X120:Y152:P$"P":100:X110:Y160:P$"C":100:6090:1,0*XTS:YSS:AT(0)20NMNM1:MDMD1:735:P$"R":100*R():Q1*K1H10((15)7):255*Y110(H(16)):255*H(23)10+NMQ:S0:M1:G152:I(9)8+%2:PCPC1:705+@ PC4 B1625:PC0+OPC4PC0+]NP0750+jM0325+xS50365+"S100345+'IG S50:P$"J":96:P$"N":96:Z1010:P$"O":96:320,+,GG8:XH:YG:(X,Y)(X9,Y7),VV,G:AT(0)12 GS1 HT1 B1 M4$:655:B0:S100:340,S1XH:YG:AT(0)9 S100:M1$:340,p6G144P$"M":96:320,;(H,G8)(H9,G15),VV,:(H,G)(H9,G7),VV,G:(H,G)(H9,G7),MM,,@NP0750,ENM0245,J2:410,O260-NTXH:YG:(H,G)(H9,G7),RR,:8:(H,G8)(H9,G15),RR,:(H,G)(H9,G7),QQ,:615:320-YGG8:G8(H,G8)(H9,G15),VV,:M0:NPNP1:NMNM1:NP0750-^M0320-cXH10:YG8:9:XH:YG:8:(H,G)(H9,G7),QQ,:320.h(H,G8)(H9,G1),RR,:(H,G)(H9,G7),QQ,:615:320..mDG:TH:GG8.|rXH:YG:AT˾AT(0):AT12 GS1 HT1 B1 M4$:655:B0:S100:360.wAT9S100:M3$:360.|AT26680:320.AT19680:745/=G160XH:YG8:P$"R":100:YY8:(X,Y)(X9,Y7),UU,G:P$"L":100:M0:NMNM1:M7$:(X,Y)(X9,Y7),UU,:320/H10 H230 G144 HH10(2(3)):XT10:YD:9:(H,G)(H9,G7),VV,G:(H,G)(H9,G7),OO,:320/P$"O":96:P$"R":92:320/((340)223) K0 4800 ((340)251) B0 5750(((343)247) YY0 5400.0aCR3:15:M1$:XTS:YSS:AT˾AT(0): AT9 5250xAT33500:5250AT20505:5300520:5300(TS,SS)(TS9,SS7),RR,:735:5950NMNM1:MDMD1:7351S0 S50 (TS,SS)(TS9,SS7),RR,14(TS,SS)(TS9,SS7),LL,:M6$:1Q T0:DT:M5$:CR2:15:1_CR2:151(TS,SS)(TS9,SS7),RR,:1CR3:16:M1$:XTS:YSS:AT˾AT(0):AT95601!AT33500:5601&AT20505:5651+520:56520M1$:CU$|$&H72,&H80:&H73,&H20$.1:200,&H1800$H : loader (C) ALF '89$ (8):@224," WELCOME TO QUINKYS ADVENTURE"$"PARTS.BIN":&H7F82$(70,32567:"PARTI.BIN"$2"PARTII.BIN"%A"A>IA >qIzAA `@?w@@>A> >Qa~ f&iI2?@@?``00ccxxayEC}}=BB==p@= UT}=@@} TT|DD88DDD8DD8TT~ xxD}@@}(@A@|x|p8DD8$$$$|HTT$?D <@@|``|``|llL|dTL UT}9DD9=@@}%cgUU~~~~~BB~UU**>```>yE>Bx@bqIF"iI6h~'eE96yI6F{{Fll~y ~>qIzxAy@ `@?hcx@@ff>yA>y >Qa~if&iI2q?x@?x`80c|cxxayEC}}}D}}@}rPzz@z TT|DD88DDD8DD8TT~ xxD}@@}(@A@|x|p8DD8$$$$|HTT$?D <@@|``|``|llL|DdTL6AcA6DDND0HH0II2 &YI2*IIIUS!>II><@ hDA> @ |  B8DD8xx$$0HH48@8d&H(PH||hh| @>*Ac]I$$$ ~@~~~~~~R~~~h~~,1,1)(A)( DN,20,1,A$,B$( DN,0,3,MC$,(W$,128)( ***CREATE FILE PGRM.BOT, POINTING TO BOOTSEKTOR***)4U  ???8?????????????????????? C???????????????~G?G?????????ϏϏ??>????8p???? ?? @? p 8 ß!??9?p<`p3?0x 88A<|8A?O~?|??||8|??x??y#??? ?? > SCGSOFT13(MENUEBOTBOTBOOTBOT--game-----DOOMALFDPARTIBIN PARTIIBIN"PARTIIIBINlPARTSBINH$$$z--backup---DOOMSIKPARTISIK PARTIISIK"PARTIIISIKPARTSSIKi<B?A;B?>>@>A;B<?<?<2HC85DB8/FB73BB6/E>7-DB4+@E3'?5 4-9D758?64;<669<36976+C820;;1(A:1*>=/08?029842:725861/;62/;9147710;7219:18292468481;2<.:3;.<3=,>2=-?7+57933@574?7*::9.5>6/1@A1>4>991>D@$>?K"%EI+:??-@=589:5B1:3D47<>61JG% 1G )EH#?4H9,G1>,D4;?1?L"O*FSLK+BU7 EF7#;F.0;=683>?4.=4;/?18>32DI<9/Zc96'           &    ,klQ  PA?PPC(9[C>8QK6(]J6&EI5(>%=@:21U1#6 &-"34'.-"5%-%% 2%,%,4! "%: !"<8@!   ## $      8 6#4$5"6!!5$5+6 343!1Z 5 ^"<"8 9L54 A7"@6   "#F4"2-6 G% #"  %^* " >#OCZ4!6"  ..? @*9? (> .9  RW/4/fD=(>D5BNDFSEU.DD'f# :"=A=K[&>42tIAe<MJ%+)OlcxM-2B$5QN){5PH?'  + 1DI58'   K92 {#%  &349k;F%( $ " ,)  %UTN $BTl/E*@F)Y )s90, "apcMw# 5QV+0Npet0tISnBGiNXnW:c;oH(.vsa6= h=Wg#?P AJxv_GwQnME1H+8upiYBL.M:qOk#%$  1 ? 7 ( r  5uB X D_>iAb;gFf/rG"KF5%fykmzU{L  ' ;JE255;kMVGTKKHWMEAZP:GJi8FKF:DG@=A@:A8F9A6E6?5>#$4=6=#"5<6<%%4:8;("596<)$487:*$496;+%4969(*4878+*3779*+4869*-3787(/4779%14899B4994;7> G4>74@5R%4D4Q4C4M&8B1P%3E8H$2F7G*4G;C(4GD<(3 7E8'58C:(49D:%"48D9) 4FF8+48D:.38EE"69DE# 59FK67HI#F8FN E8GG$ D;GG#"FC=F)%DD=D+(D>CB-/B:GD+6D;HH/5EI?D:2D;FD>>5 7H:FG8 6H;HI? 5E;HB<26M7I8  52 94M4 8 53?0  <49 0R02D?ABJ=.DM>*BJ.Jtw}aEHP}tiWDLxqu7Q{J4[M1/]>`l%BUS6,t#U/(c+Z7<T9 XLT,L:`(-7  }5 945/ ? %g35 YRm@/4>  xT M /S(Jj3z \; r@(pS>   \7_f C/ YC-SAa6,<.g ]+X9 ] Xe2   L-29R[).}?vY)c.1Hw6]>)6UD#  #"! !!"" Mnh?TVWF>OT;@OC@;HAD;J?C=G=D;H?A=D??=D>>=C?=>A<@;C;??><?;@/J@:4DA9.H?91D?7/F<9*F?6)BC4'@1G,=?939>72=894;945:67*C64-=93'B83(@93-:<129660<542952.<44.<632862.<54/;7355822866448680959/96;-<4<.=9+96;05=768:8(:9:,6<8.2>B0@1@5;1>CB!?=K"%DJ*:??-?=589:5A194D36==60JF% 1G  'FG$>3I6.G0>,C4;?0?L!P)GTKM(CV3CG6#;D/0:>4:1??3/;5<,A09;44?I8<!XTE6'           :    jmP  NA>QOC'9[D>7PL5(\J6'EI5'>%=@:0<R<#6 $.+32(,/ 2'+&$"1$+&,1% $&7!!": 7"# # " #       98 6#4"4"65$4*5 141!1Y 5]";" % !9J3 46 >6   "!F3  9pn(P oĎ0m& '0m'%9P 4?LC0& 'o0&%9ހ ^ )4!O5J&('!OA("Z " ")y"O!5)****"P#+S!A)c"O'("#*" `'9н"0" "( ~+{z*'9s*cc cc$ cc cc 93Hz*'9**''=9 +<*ǎ+B*Ў+K*ߎ+K*|**'9s*m9*~o+K*о*߽+<*߾*+<**ǽ+K*z*'94z!?" 8~0 焽+k9o09!)'9|!?+W .+W94 ~'59 |!)|!)('A)" !5)y"),R**+"!A,)н+S"P+9z*'9cc *9*''"9 +<++K+|**'9s*9+~+K+++<+z*'z,+'9" ,?,?,?9 0 Z&9 ,[ ,x40 5J&9`?x<;@§SO yP :e@ V+?( P@ --^'_'|2'9z-'9-z-$' ,Rm -9-W-''=---Q-=-$9!? O~" @ Lj-kxs-^iiiiii0Z&9,Rs-^9"O'!5'9!6'9!7'9~-2-^(ý(""Y-%9-9-9-01-9--0 1 ,S,Y9,S,Y9"$9|!)|!) O!!(' " A"!5"Z"O)".!A"P".ώ0&)н+S.." `' "O' ~."(0" " z*'9cc cc#cc&P*9z*'9cc cc$*9z.'9 cc cc#s.9" '9"0 " "|#'#.#9#9|!(")('4"0&5J&" " ކB lffffffffffffffffi0Z&؎ iiiiiiiiiiiiiiif0Z&ڎ0&J&"0& 4/ֽ(ý0 (5Z&"0ڿ!?~$R/40 5Z&9 p̈,Uxu...``QUINKY`IN`THE`CAVES`OF` ``BY`ALFRED`KNOETIG`IN`BAD`HEF``@013<+,1/206./50;/9+-65-4-+69.265-8-89.-/:24/:;*)9)<,-*1*+<);//;::.4*:7,056<)55.)6,:7-)7:.,)2,.,01303:;3017;3<1).61*6565+229-*-,21.0*,;+;,25-)6),;)9.,90)993.+:2/5./):.14):,<9,/6902: 2,85,85,85,85,85,85, 93,85,93,85, 85,85,85,85,85,85,85,85, 117,85,117,85,127,85,127,85,117,85,117,85, 85,85,85,85,85,85,85,85,93,85,93,0>L:III - LASER> 2,102,85,102,85,166,149,170,149,170,149,170,149, 153,149,106,85,89,85,89,85,89,85, 106,85,102,85, 149,149,149,149,0>':KKK>(2,85,85,85,85,85,85,93,85,93,0?,:LLL - EXPLODE?K- 2,213,213,119,85,85,85,93,213, 221,85,85,85,119,85,213,213,0?_1:MMM - MISSILE?2 2,85,85,85,85,93,85,93,85,119,0?6:NNN - TYFG?72,85,85,85,85,221,213,221,213,255,213,255,213,221,213,213,0?;:OOO - PIRATE@1<2,85,85,213,213,221,213,255,213,255,213,221,213,221,213,213,213,0@I@:PPP - TOP OF PROJ@A2,85,85,85,85,89,85,89,85,89,85,106,85,106,85,102,0@E:QQQ - WITH POLYP@F 2,221,213,127,85,112,85,127,85,127,85,64,85,93,0@J:CAUGHT POLYPAK 2,85,85,93,85,77,85,124,85,124,85,64,85,93,0A)o:INSTRUCTIONSA8p2:60000AhuAY10:M$"COMPUTER AND@VIDEO GAMES":61010AzAY40:M$"PRESENT":61040AAY65:M$"PIRATES@ @AND@ @POLYPS":61010AAY125:M$"BY PAT NORRIS":61010B AY168:M$"CONVERTED BY@RON POTKIN":61010B)4:(10,57)(246,140),,BBN3,5:2:I14:I I4::1,0:BʅAU AU0:::@258," PRESS I FOR INSTRUCTIONS - ANY OTHER KEY TO PLAY"BA$:A$""6095:A$"I"CԠ:M$"PIRATES AND POLYPS":6900:M$"BY PAT NORRU$|$&H72,&H80:&H73,&H20$.1:200,&H1800$H : loader (C) ALF '89$ (8):@224," WELCOME TO QUINKYS ADVENTURE"$"PARTS.SIK":&H7F82$(70,32567:"PARTI.SIK"$2"PARTII.SIK"%";A$:::H:`ML&H7000Hh(CH$"0123456789ABCDEFGHIJKLMNP RSTUVWXY*"H2D$"EEEEEMEGEEMEEOEEOMGEEGGEGMEGMMGOEGOMMEEMEMMGEMGMMMEMMMOEEOEMOGMOOEOOM"IgL0JC;uG0CE=p;=2AM`2?-2Za.=/,gX*=5'e E*<6' '#:,:5*Zh*%39cL+945kE)=/3t<)C(5s7*E&:I'9:42T=6<45N<8;55I=7=45I9:<4F3 ,B* F (F* +5 (H)'57 )I&(4 ,M8/--" ,B9 >  E D JQ MK>H@G@F9,6>=G<+.>DL9&+HP> :*M5 <G!4DP7G5OYhqKB]y <9         5>          =B  M '9A "5CI8,<(. ;"@7%; 298& &G4'3- "J5)-1!M('0,( #L)/-%$L*"..%"P)" //&!Q)$;) [(!;;' ;!7&; 6& Z(: 5%T-;(P/=$Q1*#R2+ Y/ )[01*>$\23<+VM69<P3GI4b&eL\MbII^J{PWNtTWT\jUUXmRUZnPU\mQYm\QZqe [k!bZ!o?=SMT@CjDOUCO%c                             !I  Bd>C,DYEa EVEHRFKOF[& < >Kb, L>MP; =ANP1;PQJ0%6QTA6'6SS=8,5SV9706UR?/0=UMC.0=WIH1,@WGI1/>WGG/3@UHF31@UGI/4BRJG.5DRII/4EQHI08EQGL.8FOGL18EPGN.:EOIL/:FOGP,=FNHM/@FMJK/BENFO/EDNGO/IDOFO1LDQAS0OCR@S2TAT=W/X?U9\,^=W9 ,*.7ZbY8! ;fcP0;fO6h1&;fc3 :eq0Z@o!yp]/+`r%!eo5EUTDW@eE>Z~vgJS|B6  ())  5  B       #UYiE9 !M[K>*L_A\'LYC^ JXC_HSAa8 L@c 6D@ v2BC x0=D@ =9,8 (+9EL  : . 7'  -8   0q 5Hq  4Ko . 7J` , FG^ -GDK, I@cE\* UD K-I\_-HZa. 2Z`+FYd KXNb\eb\M b^bdbcox_      ? 7  fee%B Ka' + JQ /9 *K .2 ,1 3 3F3 2F0 3 F2 3 F2 4 E1 14 E3 2 534 D3 45 4 4H5 + 7H2 . 5H3 , 744 @;I41LH6JEI8CLP6FKO7HLK 9EJI 7HJF 8HHO 8JFN 8JHO 7JGO 9JHN 9MDO ;KFO :LFOJKENJLDOK?P2M;PQS5QQS9SPH,?\9,/[{C[/ >"7&    1  .  '   & 2                             0            # , 3CW;JVWH:# BKR@C=I?G>E::A=6? ;999= ' % 82: ),-:# "L;, " 0695  A79062357.821/+//,5.3'1*.,2*:3/"/,/24$-1/#0**&905,$*."<-3 -+"1_01+.4T17'L4-/+!-80$(0-&0+&+*+%!,# !)41 /.21,//5+/01!/ 3+%052+@9 "(72"90'1/':2E.(33)/2,+5&75%>-01(/52;<5 &k G;{0B$/$NE-+$BG-FO87=82&B+)n85{5A!$I7           &.   J[% XFYA_AFS_CAApB@AW@?@@ >>?>&===8+;:.@'-90-8469 97$?977 :7969 %4"5;-2'37 ,3%658)1'472(1%48/1&47 33%4;43%6: 74&49<Z5$6;;Z7&5=9_8#8;7 9:#98?CH<.:EK:;2@GM]E Ms`W\`fWZrXWTq^Y[BxE ]BQp \+ <8%H[=7B9QYQS!)p=f;RE"=T-L1M  K2Q                                                             $          ( ]   =XS? 8?FNB;TDB@K2W? ,/ <=GZ *?B@Ke (>C:@:+(>A64>)*(=95:0 -);4/9?0D+838<A+P+809?+>^(92776PL)62808SW(255101S&$B,90+M*&$A)<' 5,H*#B(" 8'S*$C)C#/+5)"F')*(2+$(#E'&+0!()+$A)B- ?+ ,(#D( $&@*)($E+"&/-1)$G*".+80%E)!# H"O *$$'$!) &5($&&!!(?'$'&'F(%J) %J ) (%( ) %% -(%$!!W (($$!$ ) 582,('&#"PQ%X.*% (" U6%|0,&V +$]4'*/42B03=*'&/'%266?3-7<4Ea5;C8U4C@/{:^F3?;-c [l72QD0QC<:6`O9Q_FHW,<hiq u' $K}[H:DMZQ6NTUOaH]~_OW_K]z`M^sPTB-A==75D@66*3RS(424QX,/24<W'313o;% $03o9*?"0n:*>#1l9-9(-h:+:.,b;.8-5V=.9.4S=09/4P<1921M<2;08E;5;36C76?18@5;<55>6:=57<55959766<588>8>665@8@:07  7B915  8B915 6F5548C7535G4735G4%15.L 055" PG"7JD/ 7G=7! 7L7)% KKC/$ KLH-# 8JH1# NJI1"LKI1( ; OF8#PNI9$ OPG7- NOF://LC I711; A =34K= @ =F4K? BUC4L?CX:=KDT\9;KJVZ8;J F[ZH$EG\ZC/FH_G;  H_aD$@ GJ[DU+Fi]<8BhvGDB,Eu[R.&IsEn#2 #;q_6'X}D B,'EtDiCEbF875Dd97   )c[G -7kb05%*~*    + L ~ % P/ 8B +#*       .5     0' 2 L 3 $bP 5 %9W% '           +   "%        G$        &Y  !    +9"_,`#<E&# > b+ & #=8MA &" a5 %#:X< &" NL ' $ =<IN%&A9DwL:<7>;\uY]] `^_ rUj| [E>[ X^ey9'_XoGSr2 #.             "=U N 78 L:0<M] : H " 285I1# 825J2":14H3 L3E2#<+ 2F4!E#@G%604B3$D#<D2261772281634747*261E463#92"95'1276-'5177-$548;)6<K?c;;J-? BEA)?L(T7nkrg-\f 20 &       "  ("Z9'    $         -          " <  ;E$#  0/51<%  ; #    "        8 h ?V<V@VC`? CCp >CL  NA  NA  O>  N>MA NO OO  MP  LP  LP  9 <L 9 7P  : 7<  ; 7 > QHe PJI 6Hc 8C N =D H9 MH=  bW 6`aKme7 h,Ys@{EDP_6H2\#HMIvf\~c 18           !!  B0   q   XF L.JMY 5 ;H8 5LG 4M1  4L4' 48 2(2 47F( 36F#/697+%5B9*"06@:+$4?:,"13@9,%/5?6/$24?61$3@50&23A40(1345-+2335/*1320/,313*0435 /3A9  +25@9 ,4C7 6C6  67P 05N)2 52P& 27K%0 26..1 47 71 7G8*/ 5H6(1 5H5+1 7E8&$2 5G8*2 6G5/3 6G513 6GA'4 7EF"!47EK 4 6II'3 7HN2 7HH%2 8JF%#1 9GG)%0 <DF+(0 :GD./. 8JD+7. 8KH25- <;G<2/8HF>?2 6H7HK 6H9LI$ 4E=HB: 23O8H:  6 9485  7 71?.   ' 39 .V-6 , @(BH@0DL?+BI0Jtx|`IES}uh[CLznRr6SyN1UX%9eAUr{.R55ag,.a. 'KT^LWNO3q# :_),7   ]5':440> 'h6  VSo?/4> 6f Nx6&DA_ .S*D"05z^! /" s@-^b>  85cf D/  \ D,S@c ,=.h _*>  ? ] ?e ,-f -2= Y\+/~@hZ,b/2Rx88.B#  #"! !"#" MhgATVYF>PU9BMG><GDB>GBB@E?C>DC>@B@>?BA<B?A;B?>>@>A;B<?<?<2HC85DB8/FB73BB6/E>7-DB4+@E3'?5 4-9D758?64;<669<36976+C820;;1(A:1*>=/08?029842:725861/;62/;9147710;7219:18292468481;2<.:3;.<3=,>2=-?7+57933@574?7*::9.5>6/1@A1>4>991>D@$>?K"%EI+:??-@=589:5B1:3D47<>61JG% 1G )EH#?4H9,G1>,D4;?1?L"O*FSLK+BU7 EF7#;F.0;=683>?4.=4;/?18>32DI<9/Zc96'           &    ,klQ  PA?PPC(9[C>8QK6(]J6&EI5(>%=@:21U1#6 &-"34'.-"5%-%% 2%,%,4! "%: !"<8@!   ## $      8 6#4$5"6!!5$5+6 343!1Z 5 ^"<"8 9L54 A7"@6   "#F4"2-6 G% #"  %^* " >#OCZ4!6"  ..? @*9? (> .9  RW/4/fD=(>D5BNDFSEU.DD'f# :"=A=K[&>42tIAe<MJ%+)OlcxM-2B$5QN){5PH?'  + 1DI58'   K92 {#%  &349k;F%( $ " ,)  %UTN $BTl/E*@F)Y )s90, "apcMw# 5QV+0Npet0tISnBGiNXnW:c;oH(.vsa6= h=Wg#?P AJxv_GwQnME1H+8upiYBL.M:qOk#%$  1 ? 7 ( r  5uB X D_>iAb;gFf/rG"KF5%fykmzU{L  ' ;JE255;kMVGTKKHWMEAZP:GJi8FKF:DG@=A@:A8F9A6E6?5>#$4=6=#"5<6<%%4:8;("596<)$487:*$496;+%4969(*4878+*3779*+4869*-3787(/4779%14899B4994;7> G4>74@5R%4D4Q4C4M&8B1P%3E8H$2F7G*4G;C(4GD<(3 7E8'58C:(49D:%"48D9) 4FF8+48D:.38EE"69DE# 59FK67HI#F8FN E8GG$ D;GG#"FC=F)%DD=D+(D>CB-/B:GD+6D;HH/5EI?D:2D;FD>>5 7H:FG8 6H;HI? 5E;HB<26M7I8  52 94M4 8 53?0  <49 0R02D?ABJ=.DM>*BJ.Jtw}aEHP}tiWDLxqu7Q{J4[M1/]>`l%BUS6,t#U/(c+Z7<T9 XLT,L:`(-7  }5 945/ ? %g35 YRm@/4>  xT M /S(Jj3z \; r@(pS>   \7_f C/ YC-SAa6,<.g ]+X9 ] Xe2   L-29R[).}?vY)c.1Hw6]>)6UD#  #"! !!"" Mnh?TVWF>OT;@OC@;HAD;J?C=G=D;H?A=D??=D>>=C?=>A<@;C;??><?;@/J@:4DA9.H?91D?7/F<9*F?6)BC4'@1G,=?939>72=894;945:67*C64-=93'B83(@93-:<129660<542952.<44.<632862.<54/;7355822866448680959/96;-<4<.=9+96;05=768:8(:9:,6<8.2>B0@1@5;1>CB!?=K"%DJ*:??-?=589:5A194D36==60JF% 1G  'FG$>3I6.G0>,C4;?0?L!P)GTKM(CV3CG6#;D/0:>4:1??3/;5<,A09;44?I8<!XTE6'           :    jmP  NA>QOC'9[D>7PL5(\J6'EI5'>%=@:0<R<#6 $.+32(,/ 2'+&$"1$+&,1% $&7!!": 7"# # " #       98 6#4"4"65$4*5 141!1Y 5]";" % !9J3 46 >6   "!F3  9pn(P oĎ0m& '0m'%9P 4?LC0& 'o0&%9ހ ^ U *UUUUUUUUUUUUUUUUUYUUUUUUUZWUUUYWUWUWUZޗw_uU]uY___Z_^WUU]UYZ~WWuU]uYZ^WUUUYZ_ޕUUUUUUUUUUUUUUUUUYUUUUUUUZު;UUUUUUUUUUUUUUUUUUUUUUUUUUUUUU_777777777777777777777777777777777777777777777777777777777777777777777777777UUUUUUUUUUUUUUUUUUUUUUUUUUUUUU_?U$r$ DEMO 3 1989 BY ALF$# :3$q"MUMCW.BIN":"ALMCW.BIN",26900:"SPMCW.BIN":"DEMO3MC.BIN":4500:&H4A22,Y)(X9,Y7),UU,G:P$"L":100:M0:NMNM1:M7$:(X,Y)(X9,Y7),UU,:320/H10 H230 G144 HH10(2(3)):XT10:YD:9:(H,G)(H9,G7),VV,G:(H,G)(H9,G7),OO,:320/P$"O":96:P$"R":92:320/((340)223) K0 4800((340)251) B0 57500((343)247) YY0 540060iCR3:15:M1$:XTS:YSS:AT˾AT(0): AT9 5250AT33500:5250AT20505:5300520:5300(TS,SS)(TS9,SS7),RR,:735:5950NMNM1:MDMD1:7351S0 S50 (TS,SS)(TS9,SS7),RR,1<(TS,SS)(TS9,SS7),LL,:M6$:1Y T0:DT:M5$:CR2:15:1gCR2:151(TS,SS)(TS9,SS7),RR,:1CR3:16:M1$:XTS:YSS:AT˾AT(0):AT95601!AT33500:5601&AT20505:5651+520:5652 0M1$:CR2:1625CR2:16:5352C? 1:(125,152)(5TS,SS8),:M1$2mDXTS:YSS:AT(0)9 M4$:585:6602IZ2020:2:(125,152)(5TS,SS8),:2N:2SNMNM1:MDMD12XP17:E(P)50 E(P)SS:F(P)TS:(TS,SS)(TS9,SS7),BB,::P:3'gP17:E(P)G F(P)H E(P)50::P:3Yq 2:(125,152)(5T1,S18),:P$"R":90:M3$3vT1T110(T1120)10(T1120):S1S18(S1144)3S1144 T1120 B0:NPNP1:PSPS1:3B1:P$"T":9041:(125,152)(5T1,S18),:Z2020:2:(125,152)(5T1,S18),:4DB1:P$"R":98:P$"T":98:615:S1SS:T1TS4sP17:E(P)S1 F(P)T1 E(P)50::P:4GG8:P$"R":96:GG8:P$"L":96:GG8:96:M5$:GG8:M4$:H60K14H180YY14K1 YY1 7605M0:NMNM1:Z2020:P$"R":96:GG8:96:GG8:5/OO1:O7O15>ƅE(O)505NP$"R":945qF(O)F(O)10:F(O)10F(O)2405P$"B":945߅SSG TSH NM0::5遽40:AY35:M$"PROJECTOR@DESTROYED":61010:765540:765640:AY35:M$"LASER@DESTROYED":610106]M2$:AY60:M$"POLYPS SAFE"(PS)"@""MISSILES@DESTROYED"(MD):610106AY100:M$"PRESS P FOR@ANOTHER GAME":610107% PS0M$"KEEP UP@THE PRACTICE":PS3 M$"BETTER LUCK@NEXT TIME" :PS6 M$"YOU NEED@MORE PRACTICE":PS6M$"VERY GOOD":M$"BRILLIANT PLAY"78AY130:610107] I120000:"P":AU1:AU07q*3,5:1,0:2007}Ё611007:GETS7:POKE65495,07:@260,"PLEASE WAIT ....."7AR$" "(8)(9)(10)(94)8PAA(6),BB(2),CC(12),DD(6),II(4),KK(2),LL(2),MM(2),NN(2),OO(2),PP(2),QQ(2),RR(2),TT(2),UU(2),E(7),F(7),VV(2)8:9=6=POLYP,19=5=PROJ,26=4=LASER,20=3=MISS/TY,33=2=WITH POLY,12=7=CAUGHT POLYP8 AT(O)8(X2,Y2)(X4,Y2)83,1:2:6000:3,19NA$"AA":20:5100:(0,0)(25,7),AA,G9+5100:(0,0)(9,7),BB,G9J5100:(0,0)(29,15),CC,G9h5100:(0,0)(9,23),DD,G95100:(0,0)(9,15),II,G95100:(0,0)(9,7),KK,G9ā5100:(0,0)(9,7),LL,G9Ɂ5100:(0,0)(9,7),MM,G9΁5100:(0,0)(9,7),NN,G:Ӂ5100:(0,0)(9,7),OO,G:4؁5100:(0,0)(9,7),PP,G:Q݁5100:(0,0)(9,7),QQ,G:ށ5100:(0,0)(9,7),TT,G:2:(0,0)(9,7),RR,G:M1$"V10L250O4AG":M2$"V10L250O3ABCABCABCABC":M3$"V30L150O1FA":M4$"V15L150O1FO3AB";yM5$"V31L255T255O3A":M6$"L200;O1V31BV28AV24GV20FV16DV10C#V5C":M7$"L200O1V31BV30FV29DV28GV27EV25CV23FV21CV19GV17BV15;L210O2D#V13C#V11F#V9DV7AV5BV3EV1G";;:I:J0:K0;F:F0;&H600KJ32,F;KK1:KI JJ1:K0;5105;:******; AAB 2,85,85,85,85,85,85, 93,85,93,85, 85,85,85,85,85,85,85,85, 117,85,117,85,127,85,127,85,117,85,117,85, 85,85,85,85,85,85,85,85,93,85,93,0>T:III - LASER> 2,102,85,102,85,166,149,170,149,170,149,170,149, 153,149,106,85,89,85,89,85,89,85, 106,85,102,85, 149,149,149,149,0>':KKK>(2,85,85,85,85,85,85,93,85,93,0?,:LLL - EXPLODE?S- 2,213,213,119,85,85,85,93,213, 221,85,85,85,119,85,213,213,0?g1:MMM - MISSILE?2 2,85,85,85,85,93,85,93,85,119,0?6:NNN - TYFG?72,85,85,85,85,221,213,221,213,255,213,255,213,221,213,213,0?;:OOO - PIRATE@9<2U` :1,1:(27);"DNH.":4,1$9 4097: W$(66):200$LX64:W64:WO1$[(@0,"ZE1";$- WO23H :200:HH23:W64:XW$2I110:A$:@X,"*";:A$"":I110:A$:@X," ";:A$"" :50$ UN0 T34 T124 : ,85,85,213,213,221,213,255,213,255,213,221,213,221,213,213,213,0@Q@:PPP - TOP OF PROJ@A2,85,85,85,85,89,85,89,85,89,85,106,85,106,85,102,0@E:QQQ - WITH POLYP@F 2,221,213,127,85,112,85,127,85,127,85,64,85,93,0@J:CAUGHT POLYPAK 2,85,85,93,85,77,85,124,85,124,85,64,85,93,0A1o:INSTRUCTIONSA@p2:60000ApuAY10:M$"COMPUTER AND@VIDEO GAMES":61010AzAY40:M$"PRESENT":61040AAY65:M$"PIRATES@ @AND@ @POLYPS":61010AAY125:M$"BY PAT NORRIS":61010BAY168:M$"CONVERTED BY@RON POTKIN":61010B14:(10,57)(246,140),,BBV3,5:2:I14:I I4::1,0:BʅAU AU0:::@258," PRESS I FOR INSTRUCTIONS - ANY OTHER KEY TO PLAY"BA$:A$""6095:A$"I"C$Ԡ:M$"PIRATES AND POLYPS":6900:M$"BY PAT NORRIS":6900:M$"INSTRUCTIONS":6900CVއ"OBJECTIVE":" *TOSTOP PIRATE VESSELS FROM"C" DESTROYING YOUR BASE AND":" STEALING THE SUN POLYPS. IF":" BOTH YOUR LASER BASES ARE":" HIT THEN THE GAME IS LOST."D*" *WHEN ALL THEN SUN POLYPS ARE":" COLLECTED OR STOLEN THE GAME FINISHES."Da" *SCORES ARE SHOWN AT THE END":" OF THE GAME."Dl6910E" *IN ORDER TO COLLECT A POLYPS":" OR DESTROY A PIRATE THE":" RADAR SCANNERS AT THE TOP AND":" LEFT SIDE OF THE SCREEN MUST":" BE LINED UP ON THE TARGETS."El" *TOP SCANNER - USE LEFT/RIGHT ARROWS":" *SIDE SCANNER - USE UP/DOWN ARROWS"E" *LEFT LASER - USE Z"," *RIGHT LASER - USE M":" *PROJECTOR - USE B"E$6910F{." *WHEN A PIRATE LANDS ON A":" POLYPS, IT IS CAPTURED AND":" THE PIRATE PROCEEDS TO THE":" TOP OF THE SCREEN. YOU WILL":" LOSE THE POLYPS IF IT REACHES":" THE TOP."F8" *THE POLYPS MAY BE SAVED BY":" DESTROYING THE PIRATE WITH":" LASER FIRE."F=6910GB" *A LASER IS NOT USEABLE WHEN HIT":" *WHEN THE PROJECTOR IS":" LOCKED ONTO A POLYPS, THE":" POLYPS WILL BE DRAWN INTO":" THE PROJECTOR.":" *LASER FIRE HAS NO EFFECT ON POLYPS."GL" *THE PROJECTOR HAS NO EFFECT ON PIRATES."GV:"PRESS ENTER TO START";A$GHL(M$):16L2);M$:H4:"PRESS ";A$:::HB`ML&H7000Hp(CH$"0123456789ABCDEFGHIJKLMNP RSTUVWXY*"H2D$"EEEEEMEGEEMEEOEEOMGEEGGEGMEGMMGOEGOMMEEMEMMGEMGMMMEMMMOEEOEMOGMOOEOOM"I";NA$2'v NA$"" 50002D{ (W$(WO))0 WOWO12S I1 WO2m NA$".DAT";W$(I):I2s2:" Datei / Text ist abgespeichert !!!":62 50002:2:(27);"DWN.";" * * * W A R N U N G * * *";(27);"DWF.":3+"Ihr alter Text wird gel"(124)"scht !!!!"3IƇCH$" 1) Zur_ck zum Men_"3bЇCH$" 2) Fortsetzen"3ڇ:CH$" Dr_cken Sie bitte die Tasten (1) und (2) !!!"3A$: A$"" 58603A(A$):AA483 A1 A2 58103 A 5000,589034} I1 WO: W$(I)"" :" T e x t ist im Speicher noch vorhanden!!! Erst den alten Text speichern!!!": 10: 500044*" Hauptdiskette einlegen!!!"4+ "" 593144"VERBES.BAS"4=:4>:200:@64,;4? WO22 59605(@ I1 WO: (W$(I))64 W$(I) : W$(I);5AAI:WWO64:XW: 405fH WO47 HH23: H46 HH465qJ@64,;5M IWO1 WO5O (W$(I))64 W$(I) : W$(I);5R5W (W$(WO))0 WOWO15\W192:XW: 406 p I2 WO: (W$(U$$ :1,1:(27);"DNH.":4,1$9 4097: W$(66):200$LX64:W64:WO1$[(@0,"ZE1";$- WO23H :200:HH23:W64:XW$2I110:A$:@X,"*";:A$"":I110:A$:@X," ";:A$"" :50$ UN0 T34 T124 : UN0 T64 T126%?? UN0 T94 T123 : UN0 T95 T125%A (T9 (T73 UN1)) UNUN1: UN1 220:50 : UN2 230:50 : 50%B UN1 TT64&Z T13 WO64 @X," ";:WOWO1:WW64:DWX:XXD:@0,"ZE";((WO),((WO))1);:45& i T12 5000&n (T8 (T72 UN1)) XX1: (W$(WO))0 W$(WO)(W$(WO),(W$(WO))1):@X1," ";:50 : XX1:50&xW$(WO)W$(WO)(T)&} (W$(WO))64 200,5&~ (W$(WO))64 W$(WO)(W$(WO),64):50'@X,(T);:XX1:50'nȇ(27)"ST1.":@0,".........1.........2.........3.........4.........5.........6....";:'܇@4,(27);"DWN.";"SO";(27);"DWF.";:'@4,".....";:UN0:':CH$(128)'@15,(27);"DWN.";"=== M E N ] ===";(27);"DWF.":('CH$" 1) Datei / Text L A D E N"(YCH$" 2) Datei / Text S P E I C H E R N"(sCH$" 3) F O R M A T"(CH$" 4) Datei / Text S C H R E I B E N"(CH$" 5) Datei / Text D R U C K E N"(CH$" 6) Datei / Text Verbessern").CH$" 7) Datei / Text Weiterschreiben")i::" Bitte geben Sie die Nummer des Men_s ein ==>";M) M1 M7 5000) M 5200,5700,5500,5810,5300,5900,5950)P:)Z:CH$" Bitte die gew_nschte Diskette einlegen !!!!"*+d:CH$" Wenn fertig, dann dr_cken Sie bitte eine Taste !"*3n 1*Dx ""5240*J}*" Bitte Dateinamen O H N E Ergenzung eigeben !!"*" N A M E : ";NA$* NA$"" 5000* NA$".DAT";W$(WO)* (NA$)1 WOWO1:5270+::" TEXT IST GELADEN !!":3+ 5000+%:+J:" Drucker anschalten !!!!":2+w:"Wenn fertig, dann dr_cke eine Taste"+ȅ""5320+͇" ]berschrift Fett drucken ?";:" 0 = NEIN / 1 = JA >";UB,·:" ]berschrift unterstreichen ?";:" 0=NEIN / 1=JA";UN,E҇:" W_nschen Sie Spaltendruck?";:" 0 = NEIN / 1 = JA > ";SD,ׅ SD1 :" Wie breit soll eine Spalte sein ?";: SB: SB40 SB0 5335,:" Wieviel CM zwischen den Zeilen sollen frei bleiben ? ----------->";: "(1.0 BIS 2.0) >";CM- CM1 CM2 5345-#MCM10-6 "" 5355-Q#2,(27);"A";(M);- UB1 UN0 #2,(&HE);W$(1);(&H14)- UB1 UN1 #2,(&HE);(27);"-";(1);W$(1);(27);"-";(0).  UB0 UN1 #2,(27);"-";(1);W$(1);(27);"-";(0).1 UB0 UN0 SB1 #2,W$(1).FJ SD1 6000.UT I1 WO.sY#2," ";W$(I):.^ 5000.{:.|:CH$" Wie breit soll eine Zeile sein ?":. " von 30 - 64 ===>";RR. RR30 RR64 5500/:" Ab welcher ZEILE ( 1 - 23) ? ";AO/< AO0 AO1 : AO23 5515/X:200:@RR1,(129);/w I1 AO:@I64,W$(I);:/@64,;/ IAO WO/ (W$(I))(RR2) 5685:I/ IWO 5680/ W$(I)"" I/ A(W$(I)) 1 10jWZWZ1: (W$(I),A,1)" " W$(I)(W$(I),(W$(I))WZ)" "(W$(I),WZ):WZWZ1: (W$(I))RR1 5670 0r A0{WZ00 (W$(I))RR 56300&5685:WZ0:I00@0,"Beliebige Taste dr_cken, f_r Men_";01 "" 568102 500015 (W$(I))64 W$(I);106 (W$(I))64 W$(I)16:1iD:CH$" Bitte eine Diskette einlegen !!!!": 61N:CH$" Wenn fertig, dann dr_cke eine Taste"1X "" 57201b:CH$" Gebe den D A T E I N A M E ohne E R G E N Z U N G ein !!":2l" N A M E ==>";NA$2'v NA$"" 50002D{ (W$(WO))0 WOWO12S I1 WO2m NA$".DAT";W$(I):I2s2:" Datei / Text ist abgespeichert !!!":62 50002:2:(27);"DWN.";" * * * W A R N U N G * * *";(27);"DWF.":3+"Ihr alter Text wird gel"(124)"scht !!!!"3IƇCH$" 1) Zur_ck zum Men_"3bЇCH$" 2) Fortsetzen"3ڇ:CH$" Dr_cken Sie bitte die Tasten (1) und (2) !!!"3A$: A$"" 58603A(A$):AA483 A1 A2 58103 A 5000,589034} I1 WO: W$(I)"" :" T e x t ist im Speicher noch vorhanden!!! Erst den alten Text speichern!!!": 10: 500044*" Hauptdiskette einlegen!!!"4+ "" 593144"VERBES.BAS"4=:4>:200:@64,;4? WO22 59605(@ I1 WO: (W$(I))64 W$(I) : W$(I);5AAI:WWO64:XW: 405fH WO47 HH23: H46 HH465qJ@64,;5M IWO1 WO5O (W$(I))64 W$(I) : W$(I);5R5W (W$(WO))0 WOWO15\W192:XW: 406 p I2 WO: (W$(I))SB ANI:60206zI61GA(WO2)(AN2):Z16V I2 AN1:#2," ";W$(I):6f IAN GA6#2," ";W$(I);(SB(W$(I))," ");" ";W$(GAZ):ZZ16 I6 5000U$$ :DIRMENUE.INFO$$4@32,"DIRMENUE.INFO"$(@96,"DIRMENUE ZEIGT DAS DIRECTORY UND KANN EIN PROGRAMM NACH WAHL STARTEN. DEN SCHWARZEN BLAKEN MIT DEN PFEIL-TASTEN STEUERN, MIT SHIFT-PFEIL GEHTS 10 VOR BZWZURUECK."%&2"MIT >L< WIRD DAS PROG. GELADEN MIT >S< WIRD SORTIERT."%j<"DIRMENUE.BAS HEISST AUF DIESER DISKETTE >AUTOBOT2.INF< !!!";%F""70 : :U`Uɋ X"achtung"::"DIES IST DIE ZWEITE(UND LETZTE) DISKETTE ZU SDP 1/89!"n0:1:3900,27000"(NUMMER 12 UND 13 GEHOEREN ZU SDP 1/89) RED."U$$"SCREEN1.BIN"$- DEMO 3 1989 BY ALF$6 :3$"MUMCW.BIN":"ALMCW.BIN",26900:"SPMCW.BIN":"DEMO3MC.BIN":4500:&H4A22U$Z$  4,1$ ::1,1$+4097: W$(64)$7 1000$N(X64:W1:WO1:ZE1$f2@1475,"Zeile:";WO;$~<@1488,"Spalte:";W;$F 700$PI110:$ZEN(W$(WO))$d (341)223 440: 50$n (338)191 860%x (342)223 510: 50%' (343)223 400: 50%B (339)247 170%c (344)223 350: 50%y@X,(128);:70%A$:A$""%@19,"I N S E R T";%A$:@X,(W$(WO),W,1);%ȅ A$"" I110::@X,(128);:I110:I:190&҅ A$(12) 280:670:50&.܅ A$(8) 580&C A$(9) 620&s A$(13) UNUN1: UN 650,660:170& A$(32) 170& 290& 190&(27)"ST1.":@0,".........1.........2.........3.........4.........5.........6....";:'T" (W$(WO))W @1503,"G E H T N I C H T";:200,10:@1503," ";:'q,T(A$): UN1 TT64'6 T95 T125 : T34 T124'@ T94 T123 : T64 T126'J(W$(WO),W,1)(T)'T@X,(W$(WO),W,1);(*^XX1:WW1: WEN EN64 WOWO1:ZEZE1:W1:XZE64(Zh WOGW ZEZE1:WOWO1:W1:XZE64: 50(r ZEAE X64:ZE1:ANWO: 1170:W1(| ZE64GX WOWO1:WW1:XX1())XX1:WW1: W1 WOWO1:ZEZE1: WO1 WOWO1:WW1:ZEZE1:XX1 : AL(ZE64)(W$(WO))1:XAL:W(W$(WO)))N W0 W1:X(ZE64)(W$(WO))) WOAE21 ZE21:AEAE21:ANAE20::280:1190:X(ZE64): 50))WOWO1:ZEZE1: WO1 WO1:ZE1:W(W$(WO)):X(ZE64)W1: 50*,… WOAE22 ZE22:AEAE22:ANAE21::280:1190:X(ZE64): 50*=E(W$(WO))*tօ WE WE:X(ZE64)E1: E0 W1:XX1: : * WE E0 XX64* WE E0 XX64:**WOWO1:ZEZE1: WOAE ANWO: 1170:X64:ZE1:W1: 50+ WOGW WOWO1:ZEZE1:50+#E(W$(WO))+Z WE WE:X(ZE64)E1: E0 W1:XX1: : +s& WE E0 XX64+0 WE E0 XX64:+:+DL$(W$(WO),W1)+NR$(W$(WO),W1,(W$(WO)))+XW$(WO)L$R$+b 670: 170,l (W$(WO))64 1,1: 170,DvL$(W$(WO),W1):R$(W$(WO),(W$(WO))W1),eW$(WO)L$" "R$:670:170,@4,(27);"DWN.";"SO";(27);"DWF.";:,@4,".....";:UN0:,@XW1,;, (W$(WO))64 W$(WO);:, (W$(WO))64 W$(WO) :-@X,(W$(WO),W,1);:-7Ơ:Z$" E N D E des verbesserns"-Ї:Z$" Bitte speichern Sie den verbesserten Text auf Diskette ab !"-ڇ:Z$" Wenn Sie fertig sind, dann dr_cken Sie bitte ein beliebige T A S T E !!!!":1- "" 740.!:"> Legen Sie Ihre 'Datendiskette' ein !!!".) 3.J:Z$" Dateiname --->";: N$.\ N$"" 770.k I1 GW. N$".DAT";W$(I).*.4.>:" TEXT ist gespeichert!".H:" R_ckkehr zum Hauptmen_ !!!": 100.I:" Haupdiskette einlegen!!"/ M "" 845/R"STARV2.BAS"/O\:Z$" Den Alten Text l";(124);"schen ???"/f:Z$" Bitte die Taste >N< f_r NEIN oder die Taste >Y< f_r JA"/pZ$" dr_cken."/zA$: A$"" 890/ A$"Y" 930/ A$"N" 710/ 89002:@0,Z$;" W E L C H E Datei wollen Sie l";(124);"schen????"080h@660,"Bitte den Namen der Datei eingeben!"0@724,"N a m e -->";: N$0N$N$".DAT"0N$0Ϝ0ԇ@788,"Die Datei >";N$;".DAT< ist gel";(124);"scht!";0 10: 7101Z$(128)1I@0,Z$" Laden Sie bitte den Text ein, der verbessert werden soll!!!"1Q 11Z$" Legen Sie bitte die Datendiskette ein !!!":21:Z$" Bitte dr_cken Sie eine Taste, wenn Sie fertig sind!"1 "" 10501$2 .@660,"Bitte Namen der Datei eingeben."2+8@724,"N A M E -->";: N$2>B N$"" 10002GLGW12^V N$".DAT";W$(GW)2j`GWGW12j (N$".DAT")0 11102tGWGW12~@788,"Text ist geladen !!":22GXGW64:AN1:AE02: 2802AEAE222@64,;3 IAN GW3"ą (W$(I))64 W$(I);3>΅ (W$(I))64 W$(I)3MӅ IAE 3S؋3YU  5 PO4 w1'1-3.J?2+%& ߧތ&1 1K.L0/'1 1?ooon01!!$&91_' '0-9.J\&9O]&9 0r=19RAINBOW WRITER LOADER MENU 1.) 16K 2.) 32K 3.) 64K ENTER 1,2 OR 3 --> CHAR. OFFSET? 0 ݈h&j hk_gW0*k0O~dgj0er0,r o1 v# X1ᦀZ&1#1 11 1 0^%0#'t08! !o-.4119DWN.Rainbow-Writer Vr 1.3DWF. Written by Dan Larson & Paul Penrose 1983 UN.Rainbow Connection SoftwareUF. ݲO   [9㮍~ o' .9m+9~2b4vm+:&j0 & &okmd'mj'_ŮT0N5UO0M0D& o=4R.&o.  0&.&9S'D'AU'CB'KP'OC'WH'kG'OA'?E'i ','N' W'mooooH' L'o45l45\/T' B'Ia @Y4s5MJ#o=o:V,M% =14#5m'ݖ&զ'Ɂ&YIFV1o1w1mo~{J,&kwd13mt' 17 1210X1/K11>1911>~$1=pu1bg17To1sHa1i:1*3N1R'@1H1x-1O1z 91ez1[445m'^1T'+&1%~ [DN$] Density: LowHigh [ST#] Top: [SB#] Bottom: [DW$] Double width: [U$ ] Underline: [B$ ] Sub: [P$ ] Super: OnOff Foreground: Background: RW SYNTAXLENGTHSWITCHRANGE () [A$ ] Alt. Color set: Start addr: $MISSING PMODE: N' F' G9o9 ہ0--9.)040-9.00O5 = 592b1;4.5'''''1! 1" 1# 1$ 1W2b5t~c]' &' `09 &!`։׉0 Z'-'&9M+`-` ?.@5''9( =1 &``큜&094m&5~_m+ 05'4Q5#~459m&|~w'J 9&1919_ %\ ]' 04J5:J9459DDDD909/J9.&5Z.&50K&~@'M~A!$m+݈A4~W䎐A4K4~4w܈&m' ݈_905w~m'0_4t05t904~|904~my'omoj 392bmI'~4no'~DLH0+m;+ 45'DT $צ~0""""""""""""o'+ l =܆=9ooDfZ&dZ&挲=9"@  =001Z&1m'1!Z&cm'H$%MGm|'l(% 2,Wo~lzowE4ܺ350j21l[d$1!+m'#G&ަ<'3 940(' Cħ5\]&3A9oom'w u ikD%Y XRlOhU,dF&hAmz' h,l) h%of=J= B=9 %0閶H0&9U0m' m' 9=ZO10&OČ'01  ㌴3B&>1"&_W9mV'G?0斶 /-D% 01?&"3/"94Dm&D% 0Z&594 5 ' '&', D{%0 0l0& ^ '  9 $v mf.-%& -SuoKrj@9DEDICATED TO JESUS!_>>$j+cg.Y&P"AA"**>p```>yE>Bx@bqIF"iI6h~'eE9]].~y ~yI6>yA"yA>yIAy >qIzxAy@ `@?hcx@@ff>yA>y >Qa~if&iI2q?x@?x`80c|cxxayECAA`AA TT|DD88DDD8DD8TT~ xxD}@@}(@A@|x|p8DD8$$$$|HTT$?D <@@|``|``|llL|DdTL6AcA6DDND0HH0II2 &YI2*IIIUS!>II><@ hDA> @ |  B8DD8xx$$0HH48@8d&H(PH||hh| @>*Ac]I$$$ 08 L2T< ,H$$x  ""DDJQQJDD* 0*  H|L |J11JJ1qq1JD**D$~$"IUUA"~?<~T||l|||D?~?D|||l||T@@@@ dHl UU