@@@QAR  @ 1 Yii  Ο@ BSH B YC)- SHSHL\A=SHLYA dCLYA B VLB`HH)ph)JKhDEB VLB`EBHDILVLB`E BHDILVLB`DEB VLB`` @XHR  @ 1 Y0!   iiΟ@BMNEMARTBEFEHLFILEINFILEOUTADDRADDR2ADDR1KEADDRADDADDRBEFEHLHILFFLAAAAABSOLUABSOLUTABSO}LUTINDIREKTINDIREKTINDIREKFLAGFLAGBEFEHLEABFRAG@11111b  %}  @x BW BU@P@I@AhAhhBB}B@t TPROGRAMM ZUM AUSTAUSCHVON ADRESSEN IN ML-FILES}( (C) 11'90 VON PETER STRAIF27317 WENDLINGEN<TFTP #AZ"d'';,;,;$@,;@,n };@ ,;@ ,x;@,;@,T +0@@0@@ }T-@%%(-----------------------------%%(-Programm zum Austausch------%%(-von Adressen in } ML-Files----%%(-(c) 11'90 von Peter Straif.-%%(-----------------------------T<-@@++( }#Bitte geben Sie den Quellfile-Namenan (Dx:FNNAM.EXT) :"T, 6**("Bitte geben Sie den Zielfile-Namen@ }an (Dx:FNNAM.EXT) :JTT ^##(Bitte geben Sie die Adresseh (an, die getauscht werdenr%%(soll (Hexadezima}l $xxxx) oder|Dezimal xxxxx) :T ##(Bitte geben Sie die Adresse!!(an, die eingesetzt werden%%(}soll (Hexadezimal $xxxx) oderDezimal xxxxx) :T %%(Alle Eingaben richtig (J/N) ?)=>:,4j})>:,4J <<(4Soll jeder Austausch ueberprueft werden (J/N) ?)T7@<@,4$&6.7}@,0 6-\:,:@D 6-A:,NAXTb7@<@,4$l6.7@,v 6-\:,@ 6-A:,}AT #B-@"6.7@,67<,.>:\:,,"67<,.>:,"&&67}@%+&@,$@,.  T A  @@* @@4T}>6-@HER&"@ A&)@\&"@ A&)@f6-X:<>:,,pz}"@ AP)@ A)@A%AV$"EE(7@%+&@,$@<@}%+&@,$@, @:7<,,b>:,4J)>:,4j( Austauschen (J/N)?)>:,4j)}>:,4J6-P:'AV,6-&AV$A@6-P:'AV,6-&AV$$  ausgetauscht..}A8**@*@**@B6-@L@V6-@`*@j 6-t 6-~A}T@"@*@A"@*@ 6- 6-AAF' }'(*@*@2<F'P*@Zdn'x*@*@}TTO($[:, QO($[:,,X QO($[:,,Y Q}1=ABSOLUT2=ABSOLUT,X3=ABSOLUT,Y'49'$AD,1,LDA'$BD,2,LDA$'$B9,3,LDA.'$AE,1,LDX8'$B}E,2,LDXB'$B6,3,LDXL'$AC,1,LDYV'$BC,2,LDY`'$B4,3,LDYj'$8D,1,STAt'$9D,2,STA~'$99,3,STA'$8E,1,S}TX'$8C,1,STY'$6D,1,ADC'$7D,2,ADC'$79,3,ADC'$ED,1,SBC'$FD,2,SBC'$F9,3,SBC'$2D,1,AND'}$3D,2,AND'$39,3,AND'$OD,1,ORA($1D,2,ORA ($19,3,ORA($4D,1,EOR($5D,2,EOR(($59,3,EOR2($C }E,1,DEC<($DE,2,DECF($EE,1,INCP($FE,2,INCZ($CD,1,CMPd($DD,2,CMPn($D9,3,CMPx($EC,1,CPX($CC,1,C!}PY($2C,1,BIT($0E,1,ASL($1E,2,ASL($4E,1,LSR($5E,2,LSR($6E,1,ROR($7E,2,ROR($2E,1,ROL("}$3E,2,ROL($4C,1,JMP($20,1,JSRD2:ADRCHANG.TUR$5E,2,LSR($6E,1,ROR($7E,2,ROR($2E,1,ROL(BAnleitung zu "ADRCHANG.TUR"---------------------------(c) 1990 Peter StraifDas Programm tauscht eine angegebene,absolut$}e Adresse in einem Maschinen-programm gegen eine andere aus.Dabei hat man die Moeglichkeit, jedesauftreten einer Adresse m%}it dem zu-gehoerigen Assemblerbefehl angezeigt zubekommen, und wenn unerwuenscht, einenTausch auch zu verhindern.Sinnvol&}l ist ein solches Vorgehen z.B.bei Handler-Programmen, die auf festeAdressen (z.b. $d500) codiert sind, umsie an eigene Ha'}rdware-Entwicklungenanzupassen.----------------------------f festeAdressen (z.b. $d500) codiert sind, umsie an eigene Ha>G(?ASBILDDINDEBOTSCxB@2x@$ !!!!)}嬠!!(2<F% *}+%;A ,;A,PR'(GEBEN SIE DIE BASIC ZEILE EIN !*(<-@E( R@Z##-----+}------------------------d$$n6-U:@,x""6-F:@,}, 6-F:A,118@C:,-}@A@$ ө467@,.%67A,.467@,..}-@@(-@@(CONT-@$$AB/}@&AB@@f"8@,@6A0}@7-@@7( FERTIG ! (WEITER MIT )J)T` @D2:CREAZEIL.TUR@6AeAnleitung zu "CREAZEIL.TUR"---------------------------(c) 1988 Peter StraifDas Programm bietet die Moeglichkeit,in eine2}m Basic-Programm neue Basic-Zeilen zu erzeugen.Das Programm ist als Beispielausgelegt, wer es in seinen eigenenProgrammen3} verwenden will, muss einpaar Zeilen aendern, das duerfte aberkein Problem ein.Vom Prinzip arbeitet das Programm nachdem4} alten Schema "Zeile auf denBildschirm printen, unterhalb der Zeileein CONT plazieren, auf Forced-Read-Modus schalten, ein5} STOP ausfuehren,und fertig". Was mich an der Sacheimmer gestoert hat, ist, das dabei derBildschirm benutzt wird, und z.b.6} einProgramm, das gerade im Grahikmodusarbeitet, danach den Bildschirm wiederaufbauen muss.In meinem Programm wird der lo7}gischeBildschirm auf einen String gelegt, sodass das Betriebssystem alles in denStringspeicher printet.------------------8}-------------------- einen String gelegt, sodass das Betriebssystem alles in denStringspeicher printet.------------------L.c.INIPROGINISCREEPLAYEPROGRAMAZEILPMSIFILEOFFSETBITVVVVVV1V3V6V12V25XPOYPOSSCONSODS:}PMBASGRACTHPOSPCOLOSIZESDMCTDINDEPPLAYLEPLAYPLOZEILMASPEICINHALLOESCSLFERFLAANFIZEI;;}=?@@ @ @ <} =}!"#$%&'nC()B*+,-./C01F>}1G234E5678 ***** PLAYER-EDITOR ****** ***** (c) by P.S. *?}***** ***** 1987 ******8#F:A,F:A,%@ 8AF:A,* AF:A,&@ @}*+9@,;A ,,-@(68,-@#, #T-T2P7T<PFTPPZA}TdPnTx<@X@4'<AF:A,}'A'8A +B}TO +@<<;@,9AV,;@,;@,9@,6-@6-@'6-C}@36-@?6-@K6-@W6-@2c6-@do6-A({6-AV6-@6-A36-@D}6-A2'6-AD36-B2y!6-U:A`,!6-U:@,K6-AY6-A'6-B2H36-B2VE}?6-B2wK6-BBy$B68@,-A$-68@,-AB68@,-A6.6-B $$$BF}h'<QTO+%@@p+%@@k0@@70@@@G}Q0@@@k0@$6-F:@,$@@m @-B(@H}** PLAYER-EDITOR **Lm(@ (c) 1987 by P.S.@ g @,@@1/@I}@C/@@U/@@g/@@ARAU O*(" = PLAYERDATEN ABSPEICHERJ}N.O( = DIRECTORY VON DISK #1.*C"( = PLAYER LOESCHEN.C( = PROGRAMM BEENDEN.4Q T OK} ((6-+P:+'A H,%@P,,$A H 'AV #-%A H#  +%@+%L}@ +A%A0+%Ap +@&%@V+%A @@X M}QTOAdAUE @,@&F:,"P 6-F:,! @!6-%N}+"@,!!!6-&+"@,!!@!6-&+"@,! @!6-%+"@,!!@O}!6-&+"@,! A7!6-%+"@,P 6-F:,K@"@P"@."@2P5@AP}"@EPHAKAF:Ad,"@(GhFrQTO-@&6+&@,6-8%,-@Q}% B% -6@@6-8%,%8@,%%%8@,%%%8@R},%% QoTpOz 6-8,68,-Z8,QWT?T'#T(#O2#. 6-F:,+"@XS}.<#)#( Π : &()(F#,(FILENAME (D:FN.EXT) : ,@P# 4\U#0(#(AT}NFANGS-ZEILENNUMMER : 0@Z#-AUd#1(8,%6-&@16-@n# 8,U} 6-%@x# # @@#-@#(@=:, DATA #-@V}# % #(@=:8%,,,#A# #(@=:8%,,#6-%@# #2@6-W}&6-26-#((FERTIG !# MA#]## +@P#@$Q'T'O$' 6X}-F:,6-F:@,.'7 +@X%7@@8',#( ٠Πˠ : &()(,(B'HY} (( (TASTE)L' >Y4 ?V'2@(+@".@2P`'Q*T*O+*-AU&68Z},-*  +#-%A H# +Q.Ty(@$y(@$y([}@$y(@$y(@$y(@$y(@\}$y(@$ y(@$!y(@$"y(@]}$#y(@$$y(@$%y(@$&y(@$'y^}(@$(y(@$)y(@$*y(@$+y(@_}$,y(@$-y(@$.y(@$/y(@`}$0y(@$1y(@$2y(@$3y(@$4ya}(@$5y(@$6y(@$7y(@$8y(@b}$9y(@$:y(@$;y(@$y(@$?y(@$@y(@$d}Ay(@$By(@$Cy(@$Dy(@$Ey(@e}$Fy(@$Gy(@$Hy(@$Iy(@f}$Jy(@$Ky(@$Ly(@$My(@g}$Ny(@$Oy(@$Py(@$Qy(@$Ry(h}@$Sy(@$Ty(@$Uy(@$Vy(@i}$Wy(@$Xy(@$Yy(@$Zy(@j}$[y(@$\y(@$]y(@$^y(@$_y(k}@$`y(@$ay(@$by(@$cy(@l}$dy(@$ey(@$fy(@$gy(@m}$hy(@$iy(@$jy(@$ky(@$lyn}(@$my(@$ny(@$oy(@$py(@o}$qy(@$ry(@$sy(@$ty(@p}$uy(@$vy(@$wy(@$xy(@$yq}y(@$zy(@${y(@$|y(@$}y(@r}$~y(@$y(@$y(@$y(@s}$y(@$y(@$y(@$y(@$t}y(@$y(@$y(@$y(@$y(@u}$y(@$y(@$y(@$y(@v}$y(@$y(@$y(@$y(@w}$y(@$y(@$y(@$y(@$y(x}@$y(@$y(@$y(@$y(@y}$y(@$y(@$y(@$y(@z}$y(@$y(@$y(@$y(@$y{}(@$y(@$y(@$y(@$y(@|}$y(@$y(@$y(@$y(@}}$y(@$y(@$y(@$y(@$y~}(@$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@$}y(@$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@$y(}@$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@$y(}@$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@$y}(@$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@$}y(@$y(@$y(@$y(@$y(@}$y(@$y(@$y(@$y(@}$y(@$z(@$z(@$z(@$}z(@$z(@$z(@$z(@$z(@}$z(@$ z(@$ z(@$ z(@}$ z(@$ z(@$z(@$z(@}$z(@$z(@$z(@$z(@$z(}@$z(@$z(@$z(@$D2:PLAYE}RED.TUR$z(@$z(@$z(@$D2:PLAYEAnleitung zu "PLAYERED.TUR"---------------------------(c) 1987 Peter StraifDas Programm ist ein sehr, sehreinfacher Pla }yer-Editor, den ich vorein paar Jahren mal geschrieben habe.Die Bedienung erfolgt ueber den Joy-stick.Abgespeichert wir }d der Player alsData-Zeilen in einem List-Programm,das spaeter dann mit ENTER eingeladenwerden kann.Viel Spass mit dem P }rogramm.--------------------------------------amm,das spaeter dann mit ENTER eingeladenwerden kann.Viel Spass mit dem P 0|}-+ ,FILECATDDLFLAFLAGSZZWBBFCICIOMMVTYPBYTECFHFHFHBBSSTPMLAAOUTABCDD(}SSSCSS (}@(} !"#$%&'()*+@,(}-./012345 נ; +@(}"(;( Bitte warten ... A@ԛ(4 +AR@1@4(2 A ̛<(}AdAUFˠŠӛP((@@D:*.PICZ3@37@<@,0PIC(}A0d1-@@$7<,4 ''1 A n 6-&@x`"67%@<%@,.PIC/67<,..(}V67B:,%@,.7@<%@,` @@B:, @ @@-@B:,+@%(}@36-@6-@x'6-36-AY%%6-F:@,%F:@,$AV' 6-C:(},6-C:,6-C:,'6-C:,67@<@,.D:--%@ 7<,4.#'- A@ 367@(},.7<%@,36-%+&%@,ĠŠϠǛ @@16-6-Av(}'6.1#A255,128,201,199,26,0,1,14"K-@@$)@4%&@8">A'K A (}, )@(-@@5)@9 M-@Z)@c68,-g t)@(}Ҡӛ6N-@@$)@( 46-8N6-$AV%AU@8$6-?:<@<@<%<&,8(}"A`JH&6-?:<@<@<<@,HĠϭҠҠӛTX68@,-*68@(},-F:,>-@T68,-F:%%@,X ^Q8,"*8@,"*8@,"*8@(},"f68@,-@{68@,-68,-@6-@6-@y6-@h@r(}ŠǠϠΛ|I$6-?:A6<<&@<,IĠ͠ϠĠ͛(6-?:<<<Av(},6-P:8,'@,B6-@$++8,'@,&,\6-P:8@,'@,6-@$++8@,'@(},&,6-P:8@,'@,B6-@$++8@,'@,&,\6-P:8@,'@,6-@$++8@,'@(},&,;00@-0@;0@/%6-F:A`,%AV$F:Aa,/̭ԛ%6-F:(}%@,%6-F:%@,)-@@%%) )-AA%%) K6-F:%A(},%6-F:%A,9-@AG%K AY@4-%@%@-%@(}H -@@6@(%D2@@H -%@%A-%AH -(}AA6@(%D2@@H %%29@'(}@9@ &""ŠӠƠӠî0B6-R:,!6-T:,06-F:Ad,BAd(}AU:c?@)")F:Ad,AU)F:B7u,"AGQ@c@D[56-%@(}$+"@,&@$+"@,[6-$+ @,%@$+ ,NK%6-%+"@,&+"@,K6-$+ @(},%@$+ ,X\(66-%@$+"@,&@$+"@,\6-$+ @,%@$+ ,bL(&(}6-%+"@,&+"@,L6-$+ @,%@$+ ,l$F:B7u,"AG$6-?:C:,,vW16-%@$+"@(},&@$+"@,W6-$+ @,%@$+ ,G!6-%+"@,&+"@,G6-$+ @,%@$+(} ,W16-%@$+"AB,&@$+"AC,W6-$+ @,%@$+ ,G!6-%+"A5,&+"A(}4,G6-$+ @,%@$+ ,="@*(*( A0+6-AU=AdAU0"@**((} AP0AdAU="@D*(*( A+6-AU=AdAUA"@D*"@# Ap/(}6-AUAAdAU5"@D*"@# AP5AdAUH"@36A#@d$+F:A#(},",HAdAU+"A A`+AdAU00@0@0@(}"F:B2y,"@" A2F:B2y,"@"+, A 2ě )F:B2y,"@6.)(} @@ F:@, @ A` AY *AY AP4q-C(((}ȭŠנq((栠>^1((ϭҠ䠭(}Ҡ^((ɠԠĩ򠠠H--(%Cursor hoch/runter = Reg.0 HelligkeitR**("Cursor links/rechts(} = Reg. 0 Farbe\11((CTRL/Crsr hoch/runter = Reg.4 Helligkeitf,,($CTRL/Crsr links/rechts = Reg.4 Farbep//('Joystick (}hoch/runter = Reg.2 Helligkeitz++(#Joystick links/rechts = Reg.2 Farbe11((Jstk hoch/runter + Trigger = Reg.1 Hell.(}11((Jstk links/rechts +Trigger = Reg.1 Farbe++(#RETURN = Umschalten GR.8<---->GR.1511((TAB = Umschalten GR.15->GR.1(}3/1->GR.13/211((Control/S = Speichern (62-Sektor-Format) (SHIFT = Bild invertieren//('SPACE = Umschalten GR.8(}(15,13)<--->GR.9(START = Naechstes Bild( SELECT = Ende$$(OPTION = Neue Bilderdiskette((Druecke (}AdAU F:Ad,"AUA $ȠϠҮCAY#%@1%(}@CAY@4$%@@x.)-@@%%@) 8%@@xB)-A(}A%%@) L'6-6-'6-@V@$`ȠϠҮj2 -A(}A6@.%@2 t%@@y~2 -@@6@.%@2 %@(}@y6-@6-@@$ ȠϠҮԠƛ2 -@@6@(}.%@2 %@@w2 -AA6@.%2 %@6-@(}@$ȠҮĠƛ%6-F:%A,%6-F:%A,CAY#%@(}1%@CAY@4 2 -@@6@.%@2 %@@w6-@(}(@$2 ԛ<ss;@@,;@0,9@,;@d,;Av,;@,;A ,;@(},;@ ,9@,F #A P6-Z-@@@d"6-%n67,.>:,(.x 5(}Ab ( DATEN-FEHLER2A0Ap5104,165,203,72,165,204,72164,88,165,89,132,203,133204,162,30,(}160,0,177,203 73,255,145,203,200,208,247!!230,204,202,208,242,104,133204,104,133,203,96 #A6-(}<-@@("#6-%167<,.>:,8(.< 5A&D ( DATEN-FEHLER2AA@5$$104,(}104,104,170,104,104,157,663,104,157,69,3,104,157,683,104,157,73,3,104,157,723,76,86,228 #A6-(}<-@@V"#6-%167<,.>:,8(.< "5A ( DATEN-FEHLER2AA@5,%%1(}04,104,133,204,104,133,203,1046%%133,206,104,133,205,104,133,208@##104,133,207,160,0,166,208,240J$$14,177,203,145,20(}5,136,208,249T%%230,204,230,206,202,208,242,164^$$207,240,12,136,177,203,145,205h$$136,208,249,177,203,145,205,96r(} #A6-|4-A6A""!)6-%0(.4 5B`D ( DATEN-FEHLER2AA(}5==216,104,104,133,206,104,133,205,104,133,215,133,213,133>>207,104,133,214,208,2,169,80,133,212,104,133,218,104,133(}@@217,169,30,133,208,32,178,6,169,1,133,211,32,165,6,201,128@@176,4,162,0,134,211,41,127,240,8,133,209,169,0,133,210,(}240>>17,32,165,6,133,210,32,165,6,133,209,76,81,6,165,211,240>>3,32,165,6,164,213,165,216,145,203,198,207,208,5,198,2(}08==208,1,96,165,214,208,38,230,215,166,215,224,96,208,9,32>>178,6,160,40,132,213,208,34,224,192,208,17,230,205,208,2(}>>230,206,32,178,6,162,0,134,215,134,213,240,13,24,165,203??101,212,133,203,165,204,105,0,133,204,198,209,208,175,198(}@@210,16,171,76,37,6,160,0,177,217,133,216,230,217,208,2,230//218,96,165,205,133,203,165,206,133,204,96$ (}ě ( ( (& ( 1. Rueckkehr zum DOS.0**(" 2. Diskette booten (Kaltstart).:&&( 3. Programm wieder starten.(}D>)(! 4. Programm beenden. - Zurueck>( ins Basic.N ( ( ( Ihre Wahl ?XAdAUb&6-F:(}Ad,&"AUAl4"@146-?:F:@,%AV$F:@,,v"@06-?:B,"@&(} @@1"@$+.AdAU1 AŠΛQAY$6-F:A`,(}36-F:Aa,B6-F:@,Q6-F:@,/-@+68,-F:A%,/ &@A&@(}@f26-&A"6-P:'AV,26-&$AV+ %@+%@@@(}@26-&@"6-P:'AV,26-&$AV%A%AA`Aa |A(}Y@4$6-F:@,6@HAR@b0@|0@@2-(}@2(@ Bildname:  <-<(@ FILE-NAME(D:FNME.EXT):*'@'B:, (}@A!47@<@,0D:7@<@,0D)@:7@<@,, @I)@:7@<@,,!@V(})7@<@,0:A!>m-m(@ILegen Sie die Diskette ein und druecken Sie eine Taste! (} HAdAUR F:Ad,"AUA!0\ @@f,-@(}(A%8,, p&&6-?:<@<@<<Av,zg"@%*@F:A,;*@F:A,Q*@(}F:A ,g*@F:A,@xAdAU'-x(K (} AY7A#%@A7%@A(}A`Aa%A%A@@!AY@4!@,-(}@(A%8,, 9@'@9@ $ (}   株 (}D2:DIASHOW.BAS  株 (Anleitung zu "DIASHOW.BAS"--------------------------(c) 1987 Peter StraifDas Programm stellt, wie der Titel schon sagt,,} eine Dia-Show fuer Bilderdar.Die Bilder koennen sowohl im 62-Sektor-Format, im Micro-Illustrator/painter, als auch im Ata,}riArtist/Koalapad-Formatvorliegen (mit der Endung .PIC ).Das Programm erkennt automatisch, umwelches Format es sich handel,}t.Bilder, die im reinen 62-Sektor-Formatvorliegen, werden als Voreinstellung inGraphics 8 dargestellt, alle anderen inGra,}phics 15, mit den korrekten Farben.(Die Routine stammt aus einem aelterenANTIC-Magazine).Im Titelscreen werden die einzel,}nenManipuliermoeglichkeiten angezeigt.Eine moechte ich noch erklaeren.------ Mit Control-S kann das aktuelle Bildim 62-S,}ektor-Format gespeichert werden.Man kann das Programm also dazu nutzen,AtariArtist-Bilder umzuwandeln.- Mit Shift wird das,} Bild invertiert.- Mit Return schaltet man zwischenGraphics 8 und 15 hin- und her.- Mit der Space-Taste kann man aufGraph,}ics 9 schalten.- Mit Start wird das naechste Bildgeladen.-----Aufgrund des Alters des Programms moegeman mir die "wilde,}" Programmierung ver-zeihen.--------------------------------------grund des Alters des Programms moegeman mir die "wilde,F45"9INPOUTPNAMZEILNUFFFFLAENGFLAZEILASUCH4}  MLSTRING.BASDAS PROGRAMM WANDELT EINMASCHINENF5}ILE IN EIN(STRING-FELD UM, DAS IN2!!BASIC PROGRAMME EINGEBUNDEN<WERDEN KANN.F""----------------------------P5}(c) 1990 Peter StraifZ""----------------------------d11;@ ,;@ ,;@ ,;A ,n +x5}-@@EA(8GEBEN SIE DEN EINGABE-FILE-NAMEN AN (Dx:FNNAM.EXT) EEA(8GEBEN SIE DEN AUSGABE-FILE-NAME5}N AN (Dx:FNNAM.EXT) E@<(3GEBEN SIE DEN GEWUENSCHTEN STRING-NAMEN AN (xxxx$) @2.(%GEBEN SIE DIE ANFANGSZE5}ILENNUMMER AN 2 @@X)@)@3AU)AUU  DAS IST KEIN MAS5}CHINEN-FILEX @@7)@)@*)@7)@++6-+%AV$,&+5}%AV$,%@ ApC 6.=:,,67B:,%@,. REM LAENGE=C67B:,%@,.=:, @6-%@5} 6.=:, 67B:,%@,.667B:,%@,.=667B:,%@,.>:@4,-@@')@5}'67B:,%@,.>:," , 67B:,%@,.>:@4,6 @@6-%@J 6.=:, 67B:,%@5 },.TK67B:,%@,.(LEN(167B:,%@,.K67B:,%@,.)+1)=^ 67B:,%@,.>:@4,h Ap5 }r 67B:,%@,.>:@4,| @@@D2:MLSTRING.BAS4,h Ap4kAnleitung zu "MLSTRING.BAS"---------------------------(c) 1990 Peter StraifDas Programm wandelt ein Maschinen-programm 9 }in einen String um, derdann mit X=USR(ADR(xxx$)) aufgerufenwerden kann.Damit kann man es einfach in Basiceinbinden( mit E9 }NTER ).Im erzeugten LIST-File steht in derersten Zeile die Laenge des Strings,so dass er bequem dimensioniert werdenkann.9}Das ganze funktioniert natuerlich nurmit Programmen, die keine absolutenSprungadressen haben, da der Stringim Basic-Prog9}ramm an beliebiger Stelleliegen kann, die sich laufen aendertund nur beim USR-Befehl konstant ist.-----------------------9}---------------er Stelleliegen kann, die sich laufen aendertund nur beim USR-Befehl konstant ist.-----------------------8  M PRIN@@'@q@@@$>נӠEA}"("6@G2-@<"FB`%$@%P ZFd +@(AVAA}n'-AA#' x-@@-@0@P  A}AA2A A AAE-@d@yA M@" A}6 -@y@d6@JA^ M@r F64,0,0,0,0,0,0,0,165,0,0,3,15,63,12,95,A}83%%66,0,15,143,163,168,227,161,133!!67,0,0,192,192,192,240,0,6468,0,0,3,15,63,12,48,63""69,5,247,247,247,5A}5,23,55,15''70,16,223,223,223,220,212,212,192!!71,0,0,192,240,248,48,12,2872,5,7,0,3,0,0,0,0!!73,67,199,69,A}197,53,5,21,24$$74,240,241,193,243,92,80,20,8475,84,80,64,0,192,0,0,076,0,0,0,0,0,0,0,0$$77,26,26,100,100A},100,160,80,6478,24,21,90,21,6,21,5,179,0,0,0,0,0,0,128,080,1,1,1,2,2,10,5,5##81,16,160,160,128,128,128A},0,082,4,5,1,1,1,1,0,0##83,64,64,128,128,144,80,80,9684,6,4,60,20,24,80,96,085,0,0,0,0,0,0,0,086,A}0,0,0,0,0,0,0,087,96,80,60,20,20,5,5,0 򠲛1,0,0,0,0,12,15,3,123,0,1,5,4,4,4,20,197""4,0,128,16A}0,32,224,32,40,1635,0,0,0,0,48,240,192,486,3,3,0,1,6,218,42,216 7,3,39,95,159,159,155,27,8''8,192,248,25A}0,250,250,233,228,2249,10,6,2,1,0,0,0,0 ""10,19,23,75,75,251,59,240,38 ((11,200,232,161,161,239,237,116,164 ##A}12,96,160,128,128,0,0,192,192 $$13,46,45,190,189,189,61,62,253 ((14,181,116,124,124,188,124,124,12715,0,0,3,12,0,A}0,0,0$$16,253,241,242,241,81,81,82,81""17,191,79,79,79,134,70,70,7018,1,1,1,1,1,1,5,6 19,65,65,130,129,128A },0,0,020,129,65,65,129,1,0,0,0&&21,128,128,128,128,128,128,96,80$$22,192,192,0,128,160,171,88,27-1OA!} - (@  (-%@((@  '((-%@((@  )*+(-%@A"}((@  -. (-%@((@  01 )-%@)(@  2345Q D:SA#}HADOW.1@  -. (-%@((@  01 )-%@)(@  2345Q D:S@Anleitung zu "SHADOW.TBS"(c) Winfried PiegsdaEin kleines Demo, dass die Moeglich-keiten des XLs mit einem umdefinier-teE%}n Zeichensatz in GRAPHICS 12 zeigt.------------------------------------- Moeglich-keiten des XLs mit einem umdefinier-teDKZ[SZkPL1PL2PL3MI1YPLYPLYPLYMLLLLMXPLXPLXMYLMDPEKSXMAXMIYMAYMIMIM 6M'}O @A$AxA7 As @" @2 @% @@@@A(M(}AS@@A@RA@3@ +@(AM)}@&A A AA4 BByAhB2w@AY@b(AM*}#@-9A@'AA49A2&&;@",;@2,;@%,<;@,FM+}-@G//9A6Ah$AV%$AVAVH c #A0d-@@"n"67:,x KK0,0,28,34,65,65,65,128,128,128,136,136,128,128,128,65,65,65,34,28,0,0 #A-@@2M-}"67<,.>:, gg0,0,64,64,0,0,0,160,160,160,224,224,224,224,224,224,224,64,64,64,64,0,64,64,64,64,64,64,64,M.}64,0,0 #A0-@@%"67<,.>:, HH0,0,32,32,32,168,168,136,136,136,136,0,0,0,0,0,0,M/}0,0,0,0,80,80,0,0 #A-@@"67<,.>:, 0,0,2,2,2,2,2,2,2,2,0,0TX6-AM0}$6-@"Y'6-Ax6-@2'6-@Z'6-A76-@%'6-@\'6-As6-@'6M1}-@6-AP6-AST 9C:,Ah$AV%% 9C:,Ah$AV%% 9C:,Ah$M2}AV%% 9C:,Ah$AV%%T*AVA/((F:B`%@,"@A4""6@M3}A>7-@"3B`%$@%7 C A H1,85,69,84,85,84,17,85,68I3,84,69M4},84,85,65,85,81,85J!!4,85,86,90,106,98,106,94,98K%%5,81,148,165,36,165,164,133,149L!!6,90,85,84,101,105,97,89,85M"M5}"7,85,89,105,137,169,89,85,17N''8,170,170,170,130,130,170,170,170O''9,170,170,170,170,150,150,105,105P((10,105,105,M6}150,150,170,170,170,170Q16,0,8,42,34,34,34,42,8R17,0,8,8,8,8,8,8,8S18,0,42,2,2,42,32,32,42T19,0,42,2,2,42M7},2,2,42U20,0,34,34,34,42,2,2,2V21,0,42,32,32,42,2,2,42W22,0,42,32,32,42,34,34,42X23,0,42,2,2,2,8,8,8YM8}24,0,42,34,34,42,34,34,42Z25,0,42,34,34,42,2,2,42[26,0,0,16,16,0,16,16,0\37,0,63,48,48,63,48,48,63]39,0,M9}63,51,48,48,51,51,63^35,0,63,51,48,48,48,51,63_40,0,51,51,51,63,51,51,51`41,0,63,12,12,12,12,12,63a44,0,4M:}8,48,48,48,48,48,63b46,0,51,51,63,63,51,51,51c47,0,63,51,51,51,51,51,63d50,0,60,51,51,60,60,51,51e51,0,63M;},48,48,63,3,3,63f57,0,51,51,51,63,12,12,12-1T-@88(@' #!!#!!!!##!#!#!!#!#!##!#M<}!##!!#!#!##!#!88(@' ##!##!##!##!#!!#!#!#!!!#!#!##!!!!!!#!#88(@' !#!!#!##!#!#!#!#!#!#!##!#!##!#!#!!!##M=}! I-@@#I(@& -@@$)6-d:@7,%@M>})6-d:@",)$$'@P:'@,A`*$$'@P:'@,A`+55!@* @"*!@M?}* @A`. -(@$%8!-%@!(@&'B L&-@@&(@(((MM@}&-@@&(@()(N&-@@&(@(*(O&-@@&(@(((VI-@MA}@#I(@& : 012345 : 67 : 8900TB2HA&B2IA)B2PA(MB}B2RA4TK6-A&6-AS'6-A36-@R?6-AK6-@3E;6-%@MC}"@/B2y@;6-A@&@$6-R:,@ee6-%@$++"@)"MD}@)"@,* ,&@$++"@)"@)"@ ,*!,Jee6-%@$++"@)"@ )"@,* ,&ME}@$++"@)"@)"@,*!, 9C:,Ah$AV%% 9C:,Ah$AV%% 9C:,AhMF}$AV%% 9C:,Ah$AV%%9B2HB2I%+B2P%9B2R%F'KB2HMG}'B2I9B2PKB2R' A D:COBRA.49B2R%F'KB2HL\Anleitung zu "COBRA.TBS"------------------------(c) Winfried PiegsdaEbenfalls ein kleines Demo, aber zu-saetzlich unterQI} Verwendung von P/M-Grafik. Der Hubschrauber kann mit demJoystick auf dem Bildschirm bewegtwerden.-----------------------QJ}-------------n P/M-Grafik. Der Hubschrauber kann mit demJoystick auf dem Bildschirm bewegtwerden.-----------------------P@ALOMEVNTVNTVVTSTMTASTMCUSTARVNTVVTVLVCVCVCIDYL} dYM}+fn;@,;@,x*(*( Saved Basic File Informer:y/,($written by AEGAEIS Softscape 12/1989/((YN} Give File D: 6.D:67i,.g@f )g)g 6-U:A(,# )g)g#6-%AV$YO}%# )g)g#6-%AV$%# )g)g#6-%AV$%# )g)g#6-%AV$%# )g)gYP}#6-%AV$%# )g)g#6-%AV$%((Basic Pointers:((lomem: vntp..: (vntd.:YQ} stmtab: (starp: (!(Variable Table Length:!( 6-&"(vntl.:  Bytes(,)6(VYR}ariable Names:(@ 6-f6-f6-fJ -gT )g^ A(h(>:%@2,r@|AdAYS}h 6-%g(>:&@,@ 6-%g (( )A@ 6-%g ($AA ((YT}Variable Statistics:((Strings.......: &(Fields, Arrays: 0(Numerics......: (:!(Total.......YU}..: %%!(D)N-f+%%,$@X )gb l<v*)@)@*)@6-%AVYV}$(Line: Length: &i -g&i )g ="B'h (  D:BASINFO.TBS6-%AVXoAnleitung zu "BASINFO.TBS"(c) Winfried PiegsdaEin Programm, dass einige Informatio-nen von BASIC-Programmen, die mit dem]X}SAVE-Befehl abgespeichert wurden, an-zeigt.Z.B.: Werte der 7 Zeiger ab 128/129 Variablenanzahl, -typ, -namen ]Y}Nummer und Laenge jeder ZeileMit einem Tastendruck gibt das Pro-gramm weitere Informationen aus, bisREADY erscheint.----]Z}--------------------------------- einem Tastendruck gibt das Pro-gramm weitere Informationen aus, bisREADY erscheint.----\"AdLBALAlLCLDLDLpELELFLFLELFL&JLLLGLHLHLILaIL$IL@ILMhh8ȱȱȱL]AȱLxAe\}eiHH`hh+@LALBLHBLBLBLA BeiHH`LAȱȱ` Ae]} \B 1CLAȱȱȱ` B \B 1CLAȱȱ` /B B 1CLA0`- BIIe^}ii`0`- BIi`ȱ BLBLAȱȱȱ BLBLA HH`PDe_}EHI B V`PJK#DCEB V`P: P B V`' C C腕 C Cd C C e`} C C C B``朥i0 B``$0 &LC8啅喅&&(Ffƚ`ea}L)D ` ```߰`` %`))Ţ𲥢0``))eb}ŢLD0```) eeFf&LD D {D JE `ec} D C JE ``00!`IIiiLEIIii``E`IIed}ii`UVT E`UVT E`HH`HH"`ʼnLSFňee}LSF`mm mm 88888 ͭ`ef}iiii8 ͭ```hhȱȱȄLF eg}GȩLF GLFeiHH`HH`hh> BoHB(HIoDHE V #LF eq}bA.R.G.S.'92bADRCHANGTURb#ADRCHANGDOCb-----------b (CREAZEILTURb1CREAZEILDOCb-----------b^9PLAYEREDTURbPLAYEREDDOCb-----------bYDIASHOW BASb DIASHOW DOCb-----------b MLSTRINGBASb MLSTRINGDOCb-----------bSHADOW TBSb$SHADOW DOCb-----------b"&COBRA TBSbHCOBRA DOCb-----------b KBASINFO TBSbWBASINFO DOCb-----------bI[DIA256 COMb DIA256 DOCb-----------bMULTIP C bMULTIP CCCbMULTIP LNKbMULTIP COMbDEFINE C bDEFINE CCCbDEFINE LNKbDEFINE COMbPRIMZAHLC bPRIMZAHLCCCbPRIMZAHLLNKbPRIMZAHLCOMbCHARDEMOC bCHARDEMOCCCbCHARDEMOLNKbCHARDEMOCOMbCPROGRAMDOCb-----------b)ANIMATIOTURb'ANIMATIODOCb-----------b!,GRAPH TURbMGRAPH DOCb-----------b%UKOPIE BASbzKOPIE DOCb-----------#f~ANALYSISBAS#,ANALYSISDOCb-----------#YKNIFFEL TURjHISCORESDAT#lKNIFFEL DOCb-----------#BDMON COM#(DMON DOCGgHȭhHLF GgHLFȱȱȱȄoHɛġLFȱȱȄ G` LG-Ȅer}0:LGgHhH80KHLH {DmgHgHmhHhHīLG`gHIgHhHIhHgHigHhHihH`es} d'hhiiȱȱȱ met}m iiHH E````eu}`)II") JI ƲLIɟ沭II)@II)JI ƳLIɿ泭IIev}`#J`#J"J)0M J ɟ`Ʋ`$J%J"J)M!J@ ɿ`Ƴ`MMMMew}MM JMM 6KMMM 6KM8MiMM8MiMM)Mii IKMM KmMiΙMMex}M8MMMiiȑȭMȭM`M͑MMMMMM͐M*M͏M MMMMMMMM`Fey}fFfFf`M K K̔MmMii(iMM͕M K`MM`MM`M( KeXez}eYmMi`Fejf`M`M(*(`MM MMMM 6KMM)e{}MMȱMȱMȱMiiM|MMmMmM8)MMMM 6KiM L` KM8MMe|}MMM nMjnM 0MMM-M M̡MϥmMii(iMM͕MС`8M`nMMMMe}}`M/ ̣MM`-MMIM`-MMIM`M-MM%MIM`?e~}?FN *NFNJJJJ ҮFN) ݥ 懭) 6N` ԍ ԱJJJJ ҍ ԍ Ա) ݥ 懭)e}`ԍԍ`"ԩ@ԩ`I2) ADD(I1,48,I1) ADD(I2,48,I2) FILE(N1)=I1 FILE(N2)=I2ENDIFENDPROCPROC DETECTFILESe}LOCALBYTE[TEST,FEHLERW]BEGINI=0DRIVE=56VADR(TEST)POKE(559,0)W=CLOCK1REPEATUNTIL W<>CLOCK1CLOSE(1)REPEAT .DATe}EI OPEN(1,4,0,FILE) FEHLER=ERR CLOSE(1) IF I=99 FEHLER=255 ENDIFUNTIL FEHLER>127SUB(I,1,FILENUM)DRIVE=49I=0e}ENDPROCPROC CHDRIVEIN BYTE[ERFLAG]LOCALBYTE[TE]BEGINIF UEBERTRAG=0 UEBERTRAG=djj e}B V  A (S: JKB DE V B V A (K: e}JKB DE V䩏ЩѭoXYj8 j B V  A (S: e}JKB DE Voj8(jXYhH 0A B Vjie}i/ 0A8ȍpie}i‘iiȭiipiie}pii‘iiȭiipiie}oOOiiiiȭe}ȭiiiiiiiii(ii(iOe}Oiiiiȭȭiiie}iiiiii(ii(iL S8d0e}ii0iiBBiiiie}ȭȭiiiiiiiiAe}Aiiiiȭȭ[ce}sVtV \dVVԌԩ1j B V A (S: Je}KB DE V䭴XYƅ/UVT A Jojo Jungle's viewer for Ae} 256 colorsXY 0Ahjoƅ AʰD :*. a/e}ii Aɀ LW ` B V e} JKB DE VSSɀLZ BHIDE Ve} BHIDE VSЩѩ e} BHIDE VЩѩ BHIDE VSe} A B VdZZԌԭLqZLWZ bLiZe}LiZ bL`LZ /`"/MЭL[e} BHIDE V䭏L[L[L9[L1[ L6[L[LS[ bL[e}Lz[Lo[Lt[ /`L[0L[ L[0L[:L[80L[L[L[e}L[L\/ii A L\ A e}(D8: JKB DE VR V B Vd\\Ԍԩ /`/e}"ЭL_/ii A L] LZ]e}i0L]  A  A8핰i0i0 AD8:PIC.e}   JKB DE Ve} BHIDE V BHIDE V䩆Щѩe} BHIDE V䭅 AЩѩ e} BHIDE VSL_Β B V /`/"d__Ԍe}ԩЭL_ b /`ЭL_LZM A LWUVe}T80ް ASource:DްL}` UVT A:PIC256 A File: ARamdisk: L` Ae}C A L` A `ʰL%aL1ae}dLCa Lbai0߰߰La  A߰߰  Aభ8఍భ߰i0߰e}i0భ߰మ`8Щѩ/㰭La B V ` e} JKB DE VSⰩ B V䭃cLbⰭLb81`Le}b䰍Lb䰍ɊLbLb尭Lc AʰD :PIC256:*. LUc AʰD :*.e}LUc8L@c1LUc4LPcLUc8`MɀLćLc01Lce}01ȅLdLd ҍ ҍLddLbHHH ԭЩe}簍 ԍ ԍ ԍ ԍ ԍ ԍ ԍ ԭЭЍ ԭЭЍ ԭЭ簭`LJd ԩЩЩhhh@PH ԭЩdrAnleitung zu "DIA256.COM"Von Jochen ScharrlachDIA256.COM ist ein Bildbetrachterfuer Bilder mit 256 Farben (DigiPaint).Di}ie Bilder muessen auf Diskette (1bis 4) oder RAMDISK (D8:) im Extenderdurchnummeriert (von .1 bis max. .99)im normalen Veri}zeichnis oder im MyDOSSubdirectory 'PIC256' vorliegen. DieBefehle im Einzelnen : Zifferntasten : automatische Bildfolgemi}it der Betrachtungsdauer : Ziffer mal5.12 Sekunden (Ziffer <0> gilt als 10) : abschalten der automatischenBildfolgei} Ctrl - : Statuszeile ein/aus Ctrl - : Wechsel Rootdirectory /Subdirectory 'PIC256' Ctrl - : dieser Befehl i}laesst dasProgramm die Laufwerke automatischnacheinander durchforsten, sobaldsaemtliche Bilder eines Laufwerks /Verzeici}hnisses einmal gezeigt wurden : Wechsel zum naechstenLaufwerk / Verzeichnis