HI-EDDI — Druckerroutinen

Schon lange warten HI-EDDI-Besitzer auf eine Anpassung für ihren Drucker. Die in Ausgabe 1/85 abgedruckte Version ließ eine Superhardcopy nur für den Epson zu. Doch jetzt kommen auch Besitzer von Commodore-Drucker in den Genuß, HI-EDDI-Bilder ausgeben zu können.

Welcher 64’er Leser kennt ihn nicht—den HI-EDDI, das fantastische Zeichen- und Malprogramm aus Ausgabe 1/85. Jeder der einen Epson oder dazu kompatiblen Drucker besaß, kam sogar in den Genuß der ausgezeichneten Hardcopy-Funktion. Jetzt folgen Anpassungen für Drucker anderer Hersteller, diesmal für die Commodore-Drucker MPS 801/802/803 und kompatible. Für andere Drucker werden noch Lösungen gesucht.

Hi-EDDI für MPS 802 und kompatible

Ich begann nach Überwindung meiner Abneigung gegen stundenlanges Tastenklopfen HI-EDDI abzutippen. Nach den ersten Tests dieses fantastischen Zeichen- und Malprogramms, bereute ich es aber nicht mehr mich dieser Tortur unterzogen zu haben. Doch mußte ich als Besitzer eines MPS-802-Druckers feststellen, was ist HI-EDDI ohne Superhardcopy?

Die Antwort darauf veranlaßte mich dazu, die Anregung in der Funktionsbeschreibung aufzugreifen und eine Lösung für einen anderen Drucker zu suchen. Gesagt — getan, hier ist mein Lösungsvorschlag für den Commodore MPS-802 (Listing 1)

Die Druckerroutine hat dieselben Eigenschaften wie die in 1/85 veröffentlichte und von Hans Haberl geschriebene Routine für Epson-Drucker. Daher kann auf eine Funktionsbeschreibung verzichtet werden. Ich hoffe, daß der Ausdruck von HI-EDDI-Grafikbildern mit diesem Programm auf allen Versionen des Commodore 1526/MPS-802 Druckers funktioniert. Bei meiner Ausführung (REV 07C) konnte ich bis jetzt keine Fehler feststellen.

HI-EDDI für MPS 801/803 und kompatible

Eine Lösung für den Commodore MPS 801/803 schickte uns Florian Kulzer (Listing 2). Auch hier braucht am HI-EDDI selbst nichts verändert zu werden. Die Hardcopy wird, wie im 64’er 1/85 beschrieben, mit den Tasten »Commodore« und »P« gestartet.

Allerdings ist mit diesem Programm das Nebeneinanderdrucken zweier Bilder nicht möglich. Ausgegeben wird immer eine Hardcopy des aktuellen Bildschirms. Daher können die Fragen nach Nummer und Format der Hardcopy beliebig beantwortet werden.

HI-EDDI mit der Datasette

Die Anpassung von HI-EDDI an die Datasette war doch nicht ganz so einfach wie zuerst gedacht. Hier sind die notwendigen Informationen. Die folgenden Listingsverweise beziehen sich auf 64’er, Ausgabe 1/85.

1. Am Listing 3 (HI-EDDI) folgende Änderungen vornehmen: In Zeile 50, 110 und 640 LOAD" .. ",8,1 durch LOAD".. ",1 ersetzen.

   160	ON A+1 GOSUB 290,250,300,290,290,600,290,290,500, 510,300:GOTO150
   300	POKE8115,1:PRINT…
   330	PRINT C$:POKE 780,ASC(C$):H$=W$:W$=" "
   340	INPUT"{Cursor Down}FILENAME";W$:SYS 3331:W$=H$:H$=""
   350	RETURN

   Folgende Zeilen weglassen: 200-220, 400

2. Das so modifizierte Listing 3 als erstes auf die Programmkassette aufnehmen.
3. Folgende Befehle im Direktmodus eingeben:

   NEW

   POKE8192,0:POKE43,1:POKE44,32:NEW

4. Den DATA-Lader (Listing 2) laden und folgende Änderungen vornehmen:

   9	:
   10	:
   50	D=H(H)*16 + H(L):S=S+D:POKEI,D
   85	IF A<0 THEN95
   90	S=0:A=0:PRINT:NEXT
   95	POKE43,0:POKE44,13:POKE45,76:POKE46,31
   96	SAVE"HI-EXE",1,1:END

5. Programmkassette einlegen (nach Listing 3) und Listing 2 starten. Wenn keine Fehler mehr drin sind, erzeugt der Lader auf der Kassette das Maschinenprogramm HI-EXE.
6. HI-EDDI ist jetzt bereits lauffähig: Programmkassette zurückspulen, Computer kaltstarten, Listing 3 laden und starten. Das Maschinenprogramm wird nun geladen.
7. Die HI-EDDI-Befehle LOAD und SAVE funktionieren ebenfalls, somit kann auch schon das Menü erstellt werden. Die fertige Menütafel (mit Listing 4 verbunden) sollte an dritter Stelle auf die Programmkassette aufgenommen werden.
8. Hier die erforderlichen Änderungen am Listing 1: Zunächst wieder die POKEs wie unter c) eingeben und dann Listing 1 laden und folgende Änderungen vornehmen:

   720	FOR I = 3326 TO 3708
   730	READA:IF A<0THEN 730
   740	POKEI,A:NEXT
   750	POKE43,0:POKE44,13:POKE45,125:POKE46,14
   760	SAVE"HI-PRINT",1,1
   770	END

9. Programmkassette einlegen (an 4. Stelle) und Listing 1 starten. Auf der Kassette wird nun das Maschinenprogramm Hl-PRINT erzeugt.

Wenn nun im Programmlauf vor einem Druckvorgang diese Druckroutine geladen wurde, muß die Kassette zurückgespult werden, so daß das Maschinenprogramm HI-EXE nach Beendigung des Druckvorganges wieder geladen werden kann.

PROGRAMM : HI-PRINT _802  0D00 0F9C
-----------------------------------
0D00 : 85 5B A9 64 A2 04 A0 00   F7
0D08 : 20 08 0E A9 6A A2 04 A0   F2
0D10 : 06 20 08 0E A2 6A 20 C9   7C
0D18 : FF A9 14 20 D2 FF A2 64   75
0D20 : 20 C9 FF A9 8D 20 D2 FF   7F
0D28 : A9 69 A2 04 A0 05 20 08   72
0D30 : 0E A5 5B 0A 90 03 4C 86   88
0D38 : 0E A5 5B 29 07 A2 02 20   E3
0D40 : 13 0E A9 14 85 FB A5 5B   CD
0D48 : 29 C0 F0 10 A5 5B 4A 4A   02
0D50 : 4A 29 07 A2 00 20 13 0E   AE
0D58 : A9 00 85 FB A9 00 8D 3D   2D
0D60 : 03 20 2D 0E 20 66 0E F0   D0
0D68 : 29 A2 69 20 C9 FF A2 00   68
0D70 : BD 3E 03 20 D2 FF E8 E0   A4
0D78 : 08 D0 F5 A9 0D 20 D2 FF   B8
0D80 : A2 64 20 C9 FF 20 74 0E   84
0D88 : A9 FE 20 D2 FF A9 8D 20   D6
0D90 : D2 FF 18 A5 5E 69 08 85   79
0D98 : 5E 90 02 E6 5F 20 E1 FF   1A
0DA0 : F0 3F EE 3D 03 AD 3D 03   2C
0DA8 : C9 28 D0 B5 A5 5B 29 C0   CB
0DB0 : F0 18 A5 5E A6 5C 85 5C   FE
0DB8 : 86 5E A5 5F A6 5D 85 5D   E9
0DC0 : 86 5F A5 FB 49 28 85 FB   C2
0DC8 : D0 92 A2 64 20 C9 FF A9   BA
0DD0 : 0D 20 D2 FF EE 3C 03 AD   DA
0DD8 : 3C 03 C9 19 F0 03 4C 5C   3C
0DE0 : 0D A9 69 20 C3 FF A2 6A   BC
0DE8 : 20 C9 FF A9 24 20 D2 FF   B0
0DF0 : A2 64 20 C9 FF A9 8D 20   C9
0DF8 : D2 FF A9 6A 20 C3 FF 20   E2
0E00 : CC FF A9 64 20 C3 FF 60   A4
0E08 : 20 BA FF A9 00 20 BD FF   B2
0E10 : 4C C0 FF A0 06 D9 96 1F   98
0E18 : F0 03 88 D0 F8 A9 00 95   CE
0E20 : 5C 8D 3C 03 18 69 20 88   11
0E28 : 10 FB 95 5D 60 78 A9 34   20
0E30 : 85 01 A2 00 8A 9D 3E 03   73
0E38 : E8 E0 08 D0 F8 A9 80 85   96
0E40 : 60 A0 00 B1 5E A2 00 0A   36
0E48 : 90 0A 48 BD 3E 03 05 60   78
0E50 : 9D 3E 03 68 E8 E0 08 D0   32
0E58 : EE 46 60 C8 C0 08 D0 E3   F2
0E60 : A9 37 85 01 58 60 A2 00   39
0E68 : 8A DD 3E 03 D0 05 E8 E0   6B
0E70 : 08 D0 F6 60 18 A5 FB 6D   23
0E78 : 3D 03 AA F0 08 A9 20 20   8E
0E80 : D2 FF CA D0 FA 60 A5 5B   1E
0E88 : 29 07 A2 00 20 13 0E 85   BB
0E90 : 5F A9 00 85 5E 85 FB 85   82
0E98 : 59 85 5A A9 C0 95 FC 4A   C1
0EA0 : 4A E8 E0 04 D0 F7 A9 00   8A
0EA8 : 8D 3D 03 20 2D 0E A5 5A   27
0EB0 : F0 11 A2 00 BD 3E 03 0A   BF
0EB8 : 0A 0A 0A 9D 3E 03 E8 E0   5F
0EC0 : 08 D0 F1 20 62 0F 4C D6   2E
0EC8 : 0E A2 00 BD 4A 03 9D 46   9F
0ED0 : 03 E8 E0 04 D0 F5 20 8D   58
0ED8 : 0F F0 2F A2 69 20 C9 FF   3E
0EE0 : A2 00 BD 46 03 20 D2 FF   37
0EE8 : BD 46 03 20 D2 FF E8 E0   20
0EF0 : 04 D0 EF A9 0D 20 D2 FF   AA
0EF8 : A2 64 20 C9 FF 20 74 0E   FC
0F00 : A9 FE 20 D2 FF A9 8D 20   4E
0F08 : D2 FF 20 E1 FF D0 03 4C   49
0F10 : E1 0D EE 3D 03 A5 59 49   30
0F18 : 08 85 59 D0 AC 18 A5 5E   32
0F20 : 69 08 85 5E 90 02 E6 5F   2E
0F28 : AD 3D 03 C9 50 F0 03 4C   9F
0F30 : AB 0E A2 64 20 C9 FF A9   BB
0F38 : 0D 20 D2 FF A5 5A 49 19   8E
0F40 : 85 5A A5 5E A6 5C 85 5C   44
0F48 : 86 5E A5 5F A6 5D 85 5D   79
0F50 : 86 5F EE 3C 03 AD 3C 03   5E
0F58 : C9 32 F0 03 4C A6 0E 4C   A2
0F60 : E1 0D A9 00 AA A8 9D 46   25
0F68 : 03 E8 E0 08 D0 F8 AA B9   0B
0F70 : 3E 03 0A 90 0B 48 18 B9   8B
0F78 : 46 03 75 FC 99 46 03 68   E5
0F80 : E8 E0 04 D0 ED A2 00 C8   79
0F88 : C0 08 D0 E3 60 A2 00 8A   2D
0F90 : DD 46 03 D0 05 E8 E0 04   8E
0F98 : D0 F6 60 00               D0

PROGRAMM : HI-PRINT _801  0D00 0E22
-----------------------------------
0D00 : A9 7F A2 04 A0 00 20 BA   92
0D08 : FF 20 C0 FF A2 7F 86 67   56
0D10 : 20 C9 FF A9 FF 85 61 A9   4F
0D18 : 07 85 FD A9 1C 85 97 A9   36
0D20 : 00 8D 12 0E A9 28 8D 14   67
0D28 : 0E A2 04 BD B6 0D 20 D2   3A
0D30 : FF CA 10 F7 A9 00 85 63   0F
0D38 : 85 64 AD 12 0E 85 65 A9   93
0D40 : 00 85 FE A5 63 A6 64 A4   BD
0D48 : 65 20 BB 0D A0 00 B1 AC   78
0D50 : A6 FE 9D 16 0E E6 65 E8   1F
0D58 : 86 FE E4 FD D0 E5 A9 00   39
0D60 : A0 07 A6 FD 1E 16 0E 2A   0C
0D68 : CA 10 F9 25 61 09 80 20   FE
0D70 : D2 FF 88 10 ED A5 63 18   30
0D78 : 69 08 85 63 90 02 E6 64   31
0D80 : CE 14 0E D0 B5 A9 0D 20   13
0D88 : D2 FF AD 12 0E 18 69 07   5D
0D90 : 8D 12 0E C6 97 F0 03 4C   28
0D98 : 24 0D A9 04 C5 FD F0 0C   56
0DA0 : 85 FD A9 01 85 97 A9 0F   88
0DA8 : 85 61 D0 EB A9 0F 20 D2   C9
0DB0 : FF A9 7F 4C CC FF 50 00   FB
0DB8 : 10 1B 08 85 14 86 15 98   04
0DC0 : 4A 4A 4A AA BD F4 0D 85   DA
0DC8 : AD 8A 29 03 AA BD 0E 0E   52
0DD0 : 85 AC 98 29 07 18 65 AC   17
0DD8 : 85 AC A5 14 29 F8 85 63   D6
0DE0 : A9 20 05 AD 85 AD 18 A5   02
0DE8 : AC 65 63 85 AC A5 AD 65   4A
0DF0 : 15 85 AD 60 00 01 02 03   55
0DF8 : 05 06 07 08 0A 0B 0C 0D   07
0E00 : 0F 10 11 12 14 15 16 17   0E
0E08 : 19 1A 1B 1C 1E 1F 00 40   D4
0E10 : 80 C0 A1 00 11 00 00 00   6A
0E18 : 00 80 00 00 00 00 00 FF   58
0E20 : 00 FF                     81