Atari DOS version detection
This simple routine lets you check which version of Atari DOS is active:
10 IF PEEK(1995)=170 THEN ?"DOS 2.0s"
20 IF PEEK(1995)=100 THEN ?"DOS 2.5"
30 IF PEEK(1995)=29 THEN ?"DOS 3.0"
Atari Mischfarben (Beispiel)
10 REM * * * ATARI MISCHFARBEN * * *
20 GRAPHICS 11
30 FOR X=0 TO 79 STEP 5
40 FOR Y=0 TO 191 STEP 12
50 FOR I=0 TO 9 STEP 2
60 COLOR X/ 5
70 PLOT X, Y+l : DRAWTO X+3, Y+l
80 COLOR Y/ 12
90 PLOT X, Y+l+l : DRAWTO X+3, Y+l+l
100 NEXT I
110 NEXT Y
120 GOTO 120
Atari Regenbogenfarben (Beispiel)
10 REM * * ATARI REGENBOGEN FARBEN * *
20 DIM C$ ( 24 )
30 SETCOLOR 2, 0, 0 : poke 752, 1 : ? " "
40 FOR I=l TO 24
50 READ D
60 C$ ( I, I ) =CHR$ ( D )
70 NEXT I
80 D=USR ( ADR ( C$ ) )
90 END
100 DATA 162, 0, 173, 11, 212, 201, 32, 208 , 249, 141
110 DATA 10, 212, 142, 24, 208, 232, 232, 208 , 246, 142
120 DATA 24, 208, 240, 232
Ausgabe von Bildschirm auf Drucker umleiten
Mit POKE 838,166 und POKE 839,238 geht alles was sonst auf dem Bildschirm erscheint jetzt auf den Drucker.
In den Speicherstellen 838/839 (Hex: $346/$347, Label: IOCB0-ICPUT) befindet sich der Zeiger (Vektor) auf die Put-Routine (Zeichenausgabe) des Bildschirmeditors (E: ). Die Pokes "verbiegen" diesen Zeiger auf die Put-Routine des Druckertreibers (P: ).
Dieser Trick funktioniert nur bei OS-ROM Versionen, bei denen die Routinen an den Standard-Adressen zu finden sind. Bei abgeänderten OS-ROM Versionen (Bibo-Mon, Q-MEG) kann es sein das dieser Trick nicht funktioniert.