Inhaltsverzeichnis
Werbung
Plotter BASIC 2.0 für XY 4131
ERICH.SSS
Kurzbezeichnung
Umsetzung einer SVG-Grafik zur Ausgabe auf dem Kleinplotter XY 4131.
Voraussetzungen
-
Plotter BASIC 2.0 aktiv
-
Kleinplotter XY 4131 angeschlossen am M001 DIGITAL IN/OUT
Inhaltsbeschreibung
Auf
https://oldcrap.org/2020/03/15/robotron-kc87-plotting-svg-graphics/
Umsetzung einer SVG-Grafik zur Plotterausgabe am KC 87 beschrieben. Das
dort vorgestellte BASIC-Programm liest die Plotter-Daten aus dem RAM. In der
Umsetzung für den KC 85 wurden die Grafikdaten als DATA-Zeilen dem BASIC-
Programm ab der Zeile 1000 direkt eingefügt.
10 REM *******************************
20 REM * DDR Erich Honecker Drawing
30 REM *
40 REM *******************************
50 REM
60 SCREEN 0,1:GCLS
70 SCALE 2.9,2.9
80 RESTORE
90 START=1:OX=-2:OY=-2
100 READ X,Y
110 IF OX=X AND OY=Y THEN GOTO90
120 OX=X:OY=Y
130 IF X=-1 THEN GOTO180
140 A=Y:Y=X+100:X=A
150 IF START=1 THEN PSET(X,Y)
160 LINE-(X,Y):START=0
170 GOTO100
180 SIZE 30,45,PI/2,0
190 PSET(700,50),0
200 LABEL "* Robotron KC 87 * https://oldcrap.org *"
210 HOME
220 END
1000 DATA 245,0
1001 DATA 238,0
1002 DATA 239,1
1003 DATA ...
54
(c) 2020 oldcrap.org
wird die
*
*
Werbung
Inhaltsverzeichnis
