@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREIE SEKT.  G) *Gȩ GȽG GȌ*jj >G}J,}Λ "d\DOS SYSRAMDISK COM /}B}}CDOS SYS} C C*(> C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSLADEN NUR MIT MEM.SAV MOEGLICH.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VJ8 B V  @  /DE `E:D1:DUP.SYSPROGRAMM-SPEICHERUNG FEHLERHAFT!DOS DENNOC&}H LADEN? >J/N B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISKETTEN BETRIEBSSYSTEM II VERS. COPYRIGHT 1985 ATARI CORP.A. DISK-INHALT I. FORMATIERENB. ZUM STECKMOD*}UL J. DISK KOPIEREN C. DATEI KOPIEREN K. BINAER SAVED. LOESCHE DATEI L. BINAER LOADE. NAMEN AENDERN M. START BEI ADR+}.F. DATEI SICHERN N. MEM.SAV ANLEGENG. DAT. FREIGEBEN O. DAT. KOPIERENH. DOS SCHREIBEN P. FORMATIEREN ӛL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }DOS 2.0s EINLEGEN -> Y, x -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!FALSCHE WAHLBITTE .}WAEHLEN, -> MENUE! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%INHALT [SUCHBEGRIFF,AUSGABEGER.]?[# 0 0 &|D3" 1L!KEINE DISKDATEIN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0JЛ 1 ;#L" ;#L! BL1->J ZUM LOESCHEN... LOESCHE DAT.NAME2}KOPIE-VON, AUF?DAS KANN ICH NICHT999+FREIE SEKT. KOPIERE---D1:DEMO.SRCOMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!KEINE 'WILD CARD6}S' IM ZIEL-DATEINAMEN 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!FORMATFEHLER!WELCHE DATEI LADEN? ) 0 ?}0#B 1L!SICHERN DAT.-NAME?) 0 0$B 1L!FREIGEBEN DAT.-NAME?DUP DISK-ORIGINAL,ZIEL STAT?PROGRAMM-SPEICHER BE@}NUTZEN? (J/N)ACHTUNG: MEM.SAV WIRD DANN INAKTIV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)BEIDE DISKETTEN EINLEGEN, Ԯ^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` ZU WENIG RAM! ORIGINAL EINLEGEN, ZIEL DISKETTE EINLEGEN, E}`  `8 rL1`-* 1P* 1 y0J`hhL!UEBERTRAGE DATEI:...?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Jj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DOS.SYS ALS ZIEL VERBOJ}TEN! 0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-DAT.NL}AME,START,ENDE(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`BITTE NUR 1 ZEICHEN ,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} ZU LANG! B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 139ɛ+,' 20*.. өr2 1``2EINGABE ZU LANGUNGUELTIGE HQ}EXADEZ. PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1D1 - D8 ANGEBEN*uR} XADEZ. PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1D1 - D8 ANGEBEN*u************************************ * ATMAS-II Demo: Farb-Scrolling PF85 * * Abbruch durch START-Taste ********************T}**************** COLPF2 EQU $D018 Farbregister WSYNC EQU $D40A Synchron. VCOUNT EQU $D40B Rasterzeile RTCLK EQU $14 VBI-UhrU} CONSOL EQU $D01F Fkt.-Tasten * * Programm liegt im USER-Bereich * (ab $A800) * ORG $A800 res. Platz LDA #8 Abfrage dV}er STA CONSOL START-Taste vorbereiten SCRCOL CLC LDA VCOUNT Bild-Zaehler ADC RTCLK plus Raster-Zeile STA WSYNC syncronisiW}eren STA COLPF2 in Farbregister LDA CONSOL Funktionstasten AND #1 START-Taste? BNE SCRCOL nein, weiter--> RTS X}2 in Farbregister LDA CONSOL Funktionstasten AND #1 START-Taste? BNE SCRCOL nein, weiter--> RTS ************************************ * Demo-Programm fuer ASC-Befehl/PF85 ************************************ * Zeigt die Ve Z}rwendung von ASC * zur Herstellung von Titelbildern * mit eigener Displaylist. Zu diesem * Zweck muss direkter Bildschirm- * [}code benutzt werden. Durch die * Verwendung der Trennzeichen * * % : Bildschirmcode * $ : Inverser Bildschirmcode * " : ATASC \}II-Code (f. CIO!) * / : Inverser ATASCII-Code * \ : ATASCII, letztes Byte invers * * kann der ASC-Befehl den jeweiligen * Erf ]}ordernissen angepasst werden ************************************ * SDLSTL EQU $230 Displaylist-Vektor * * Programm steht im ^} USER-Bereich * (ab $A800) * * Aufruf vom Editor: U * ORG $A800 LDA #DLIST Displaylist STA SDLSTL aktiv _}ieren LDA #DLIST/256 STA SDLSTL+1 RTS fertig! * * Abbruch mit ! * * * 'Handgestrickte' Displaylist * DLIST DFB 11 `}2,112,112,112,112,112 DFB $40+6 DFW SCREEN DFB 6,6,6 DFB 112,$40+2 DFW SCREEN DFB 2 DFB 112,$40+7 DFW SCREEN DFB 7,7 a},7,$41 DFW DLIST * * Bidschirminhalt mit ASC * SCREEN ASC $ DER ASC-BEFEHL $ ASC % erzeugt direkten % ASC % SCRE b}ENCODE % ASC $ in allen farben! $ c}farben! $ ********************************* * GRAFLIB.SRC * * Makro-Bibliothek * * GRAPHIK * * Fuer ATMAS-II * e} PETER FINZEL *********************************** * * IOCB-Struktur: * ICCOM EQU $342 ICSTA EQU $343 ICBALf} EQU $344 ICBAH EQU $345 ICBLL EQU $348 ICBLH EQU $349 ICAX1 EQU $34A ICAX2 EQU $34B CIOV EQU $E456 * CIO-Befehle COPEN EQg}U 3 CCLSE EQU 12 CGTXT EQU 5 CPTXT EQU 9 CGBIN EQU 7 CPBIN EQU 11 CDRAW EQU $11 * ATARI Graphik-Variable ATACHR Eh}QU $2FB ROWCRS EQU $54 CURSOR- COLCRS EQU $55 POSITION * * GRAPHICS-Befehl * * Aufruf: GRAPHICS * * 0 bisi} 15 (XLs) * 0 bis 11 (400/800) * GRAPHICS MACRO STUFE JMP GR1@ DEV@ ASC "S:" GR1@ LDX #$60 LDA #CCLSE ZUERST KANAL 6 STj}A ICCOM,X SCHLIESSEN JSR CIOV LDA #STUFE JETZT NEUE GRAPHIK STA ICAX2,X STUFE ANWAEHLEN AND #$F0 EOR #$10 ORA #$0C STAk} ICAX1,X LDA #COPEN STA ICCOM,X LDA #DEV@ STA ICBAL,X LDA #DEV@/256 STA ICBAH,X JSR CIOV MEND * * Auswahl der Zeichenl}farbe * * Aufruf: COLOR * * von 0 bis 255, je nach * Graphikmodus, muss eine * Konstante seinm}. * COLOR MACRO COL LDA #COL STA ATACHR MEND * * Positionierung des Cursors * * Aufruf: POSITION , * * , je n}nach Graphikmodus, beide * muessen Konstante sein * * POSITION MACRO X,Y LDA #X STA COLCRS LDA #X/256 STA COLCRS+1 LDA o}#Y STA ROWCRS MEND * Graphik-Punkte setzen * * Aufruf: PLOT , * * , je nach Graphikmodus, * muss sich um Konsp}tane * handeln * PLOT MACRO X,Y POSITION X,Y LDX #$60 KANAL 6 LDA #CPBIN STA ICCOM,X LDA #0 STA ICBLL,X STA Iq}CBLH,X LDA ATACHR JSR CIOV MEND * * Graphik-Linien ziehen * * Aufruf: DRAWTO , * * , je nach Graphikmodus * r} Konstante * DRAWTO MACRO X,Y POSITION X,Y LDX #$60 KANAL 6 LDA #CDRAW STA ICCOM,X LDA #CCLSE STA ICAX1,X LDA #s}0 STA ICAX2,X JSR CIOV MEND ************************************* * Demo-Programm f. Graphik-Bibliothek * * zeichnet Rautt}e in GRAPHICS 7 ************************************* * * befindet sich im reservierten * Speicherplatz fuer Objektcode * u}ORG $A800 GRAPHICS 7+16 COLOR 1 PLOT 79,0 DRAWTO 159,47 DRAWTO 79,95 DRAWTO 0,47 DRAWTO 79,0 ENDLOS JMP ENDLOS * * Av}bruch mit * 159,47 DRAWTO 79,95 DRAWTO 0,47 DRAWTO 79,0 ENDLOS JMP ENDLOS * * A6*********************************** * IOLIB.SRC * * MAKRO-BIBLIOTHEK * * Input/Output * * fuer ATMAx}S-II * * von PETER FINZEL *********************************** * IOCB-Konstante CIOV EQU $E456 ICCOM EQU $y}342 ICSTA EQU $343 ICBAL EQU $344 ICBAH EQU $345 ICBLL EQU $348 ICBLH EQU $349 ICAX1 EQU $34A ICAX2 EQU $34B * CIO-Befehle z}COPEN EQU 3 CCLSE EQU 12 CGTXT EQU 5 CPTXT EQU 9 CGBIN EQU 7 CPBIN EQU 11 EOL EQU $9B * * MAKRO ZUR BERECHNUG DER{} KANALNUMMER * (hat nur interne Verwendung, ist * Beispiel zur Verwendung von ver- * schachtelten Makroaufrufen) * KANNUM M|}ACRO KANAL LDA #KANAL IOCB-Offset ASL ;aus Kanalnr. ASL ;(mal 16) ASL ASL TAX ;ERGEBNIS IM X-REG MEND * * Name : O}}PEN * Zweck : oeffnen eines Files * Aufruf: * OPEN ,,, * Beispiel: OPEN 1,4,0,"D:TEST.OBJ" * OPEN ~}MACRO KANAL,AUX1,AUX2,FILENAME JMP OP1@ FNAM@ ASC FILENAME DFB EOL OP1@ KANNUM KANAL LDA #AUX1 STA ICAX1,X LDA #AUX2 ST}A ICAX2,X LDA #COPEN STA ICCOM,X LDA #FNAM@ STA ICBAL,X LDA #FNAM@/256 STA ICBAH,X JSR CIOV MEND * * Name : CLOSE }* Zweck : File schliessen * Aufruf : CLOSE * Beispiel: CLOSE 1 * CLOSE MACRO KANAL KANNUM KANAL LDA #CCLSE STA I}CCOM,X JSR CIOV MEND * * Name : PRINT * Zweck : Ausgabe eines mit 'ASC' * definierten Textes, muss * mit} EOL beendet werden * Aufruf : PRINT ,