Best of German Only 1/romside_best_of_german_only_1.iso/doshelp/batorder/prnprog.bat

DOS Batch File | 1993-03-31 | 9KB | 433 lines

@ECHO OFF
REM Geschrieben 1992 von Markus Schnitzer, Zwiefalten.
REM Beispiel zur Steuerung eines Druckers mit dem Befehle SEND.
REM Der Drucker von LPT1 wird gesteuert.
REM Die Druckerbefehle finden Sie in Ihrem Druckerhandbuch!
REM Es werden folgende Befehle benötigt:
REM          -DRUCKER
REM          -CODE
REM          -SEND

CD BEFEHLE

ECHO Welchen Druckertyp besitzen Sie:
ECHO (I)BM Proprinter X24E
ECHO (E)pson LQ-850
ECHO (N)EC P6/P7
ECHO (S)tar
ECHO (P)anasonic KXP-1081
ECHO (H)P LaserJet
ECHO (Q)UIT

DRUCKER
IF NOT ERRORLEVEL 5 GOTO FEHLER1

CODE 1 105 101 110 115 112 104 113
IF ERRORLEVEL 8 GOTO ENDE
IF ERRORLEVEL 7 GOTO LASERJET
IF ERRORLEVEL 6 GOTO PANASONIC
IF ERRORLEVEL 5 GOTO STAR
IF ERRORLEVEL 4 GOTO NEC
IF ERRORLEVEL 3 GOTO EPSON

CLS
ECHO Steure einen IBM Proprinter X24E
ECHO Wahl der Schriftart:
ECHO   1. Roman
SEND 27 107 0 > LPT1
ECHO 1.Schrift: Roman > LPT1
ECHO   2. Sans Serif
SEND $1B $6B 1 > LPT1
ECHO 2.Schrift: Sans Serif > LPT1
ECHO   3. Courier
SEND 27 107 2 > LPT1
ECHO 3.Schrift: Courier > LPT1
ECHO   4. Prestige
SEND $1B 107 3 > LPT1
ECHO 4.Schrift: Prestige > LPT1
ECHO   5. Script
SEND 27 $6B 4 > LPT1
ECHO 5.Schrift: Script > LPT1
ECHO   6. Orator
SEND 27 107 5 > LPT1
ECHO 6.Schrift: Orator > LPT1
ECHO   7. Bold PS
SEND $1B $6B 6 > LPT1
ECHO 7.Schrift: Bold PS > LPT1
ECHO.
ECHO. > LPT1

ECHO Zeichen In COMPRESSED breite...
SEND 27 15 > LPT1
REM COMPRESSED einschalten.
ECHO Zeichen in COMPRESSED breite... > LPT1
SEND 18 > LPT1
REM COMPRESSED ausschalten.

ECHO oder Script in Fettdruck und doppelter Breite und Höhe...
ECHO. > LPT1
SEND 27 107 4 > LPT1
REM Script einschalten.
SEND 27 69 > LPT1
REM Fettdruck einschalten
SEND 27 91 64 4 0 0 0 34 2 > LPT1
REM Doppelte Breit und Höhe einschalten.
ECHO Script in Fettdruck und doppelter Breite und Höhe... > LPT1
SEND 27 70 > LPT1
REM Fettdruck ausschalten.
SEND 27 91 64 4 0 0 0 17 1 > LPT1
REM Doppelte Breit und Höhe ausschalten.

ECHO Bold PS mit Unter- und Überstrich...
SEND 27 107 6 > LPT1
REM Bold PS einschalten.
SEND 27 45 1 > LPT1
REM Unterstrich einschalten.
SEND 27 95 1 > LPT1
REM Überstrich einschalten.
ECHO Bold PS mit Unter- und Überstrich... > LPT1
SEND 27 45 0 > LPT1
REM Unterstrich ausschalten.
SEND 27 95 0 > LPT1
REM Überstrich ausschalten.

ECHO oder das Papier um 5 Zeilen nach oben schieben...
SEND $0A > LPT1
SEND $0A > LPT1
SEND $0A > LPT1
SEND $0A > LPT1
SEND $0A > LPT1

ECHO Den Drucker piepsen lassen...
SEND 7 > LPT1

SEND 27 107 2 > LPT1
REM Schrift auf Courier setzen.
GOTO ENDE


:EPSON
CLS
ECHO Steure einen Epson LQ-850
ECHO Wahl der Schriftart:
ECHO   1. Roman
SEND 27 107 0 > LPT1
ECHO 1.Schrift: Roman > LPT1
ECHO   2. Sans Serif
SEND $1B $6B 1 > LPT1
ECHO 2.Schrift: Sans Serif > LPT1
ECHO   3. Courier
SEND 27 107 2 > LPT1
ECHO 3.Schrift: Courier > LPT1
ECHO   4. Prestige
SEND $1B 107 3 > LPT1
ECHO 4.Schrift: Prestige > LPT1
ECHO   5. Script
SEND 27 $6B 4 > LPT1
ECHO 5.Schrift: Script > LPT1
ECHO   6. Orator
SEND 27 107 5 > LPT1
ECHO 6.Schrift: Orator > LPT1
ECHO   7. Bold PS
SEND $1B $6B 6 > LPT1
ECHO 7.Schrift: Bold PS > LPT1
ECHO.
ECHO. > LPT1

ECHO Zeichen In COMPRESSED breite...
SEND 27 15 > LPT1
REM COMPRESSED einschalten.
ECHO Zeichen in COMPRESSED breite... > LPT1
SEND 18 > LPT1
REM COMPRESSED ausschalten.

ECHO oder Script in Fettdruck und doppelter Breite und Höhe...
ECHO. > LPT1
SEND 27 107 4 > LPT1
REM Script einschalten.
SEND 27 69 > LPT1
REM Fettdruck einschalten
SEND 27 87 1 > LPT1
REM Doppelte Breite einschalten.
SEND 27 119 1 > LPT1
REM Doppelte Höhe einschalten
ECHO Script in Fettdruck und doppelter Breite und Hoehe... > LPT1
SEND 27 70 > LPT1
REM Fettdruck ausschalten.
SEND 27 87 0 > LPT1
REM Doppelte Breite ausschalten.
SEND 27 119 0 > LPT1
REM Doppelte Höhe ausschalten

ECHO Bold PS mit Unterstrich...
SEND 27 107 6 > LPT1
REM Bold PS einschalten.
SEND 27 45 1 > LPT1
REM Unterstrich einschalten.
ECHO Bold PS mit Unterstrich... > LPT1
SEND 27 45 0 > LPT1
REM Unterstrich ausschalten.

ECHO Auf Kursivschrift umschalten...
SEND 27 52 > LPT1
REM Kursivschrift einschalten.
ECHO Druck in Kursivschrift... > LPT1
SENd 27 53 > LPT1
REM Kursivschrift ausschalten.

ECHO oder das Papier um 5 Zeilen nach oben schieben...
SEND $0A > LPT1
SEND $0A > LPT1
SEND $0A > LPT1
SEND $0A > LPT1
SEND $0A > LPT1

ECHO Den Drucker piepsen lassen...
SEND 7 > LPT1

SEND 27 107 2 > LPT1
REM Schrift auf Courier setzen.
GOTO ENDE


:NEC
CLS
ECHO Steure einen NEC P6/P7
ECHO Druck mit/in

ECHO  -Schmalschrift
SEND 27 33 4 > LPT1
REM Schmalschrift setzen.
ECHO  -Schmalschrift > LPT1

ECHO  -Schatten
SEND 27 33 8 > LPT1
REM Schatten setzen.
ECHO  -Schatten > LPT1

ECHO  -Fettschrift
SEND 27 33 16 > LPT1
REM Fettschrift setzen.
ECHO  -Fettschrift > LPT1

ECHO  -Breitschrift
SEND 27 33 32 > LPT1
REM Breitschrift setzen.
ECHO  -Breitschrift > LPT1

ECHO  -Kursiv
SEND 27 33 64 > LPT1
REM Kursivschrift setzen.
ECHO  -Kursiv > LPT1

ECHO  -Unterstrich
SEND 27 33 128 > LPT1
REM Unterstrichen setzen.
ECHO  -Unterstrichen > LPT1

SEND 27 33 0 > LPT1
REM Einstellung löschen.
ECHO.
ECHO. > LPT1

ECHO Ausrichtung:
ECHO   -linksbündig
SEND 27 97 0 > LPT1
ECHO Linksbündig > LPT1

ECHO   -zentriert
SEND 27 97 1 > LPT1
ECHO Zentriert > LPT1

ECHO   -rechtsbündig
SEND 27 97 2 > LPT1
ECHO Rechtsbündig > LPT1

REM Voreinstellungen.
SEND 27 107 2 > LPT1
SEND 27 97 0 > LPT1
GOTO ENDE


:STAR
CLS
ECHO Steure einen STAR-Drucker
ECHO Druck mit/in:

ECHO  -Unterstreichung
SEND 27 45 1 > LPT1
REM Unterstreichung einschalten
ECHO  -Unterstreichung > LPT1
SEND 27 45 0 > LPT1
REM Unterstreichung ausschalten

ECHO  -Pica Schrift
SEND 27 66 1 > LPT1
ECHO Pica Schrift > LPT1

ECHO  -Elite Schrift
SEND 27 66 2 > LPT1
ECHO Elite Schrift > LPT1

ECHO  -Komprimierte Schrift
SEND 27 66 3 > LPT1
ECHO Komprimierte Schrift > LPT1

ECHO  -Kursiv Schrift
SEND 27 53 > LPT1
REM Standardschrift setzen.
SEND 27 52 > LPT1
REM Kursivschrift setzen.
ECHO Kursiv Schrift > LPT1

ECHO  -Breitschrift
SEND 27 53 > LPT1
REM Standardschrift setzen.
SEND 27 14 > LPT1
REM Breitschrift setzen.
ECHO Breitschrift > LPT1

ECHO  -Piepston
SEND 7 > LPT1

SEND 27 53 > LPT1
REM Standardschrift setzen.
GOTO ENDE


:PANASONIC
CLS
ECHO Steure einen Panasonic KXP-1081
ECHO Druck mit/in
ECHO  -Unterstreichung
SEND 27 45 1 > LPT1
REM Unterstreichung einschalten.
ECHO Unterstrichen > LPT1
SEND 27 45 0 > LPT1
REM Unterstreichung ausschalten.

ECHO  -Kursiv
SEND 27 52 > LPT1
REM Kursivschrift einschalten.
ECHO Kursivschrift > LPT1
SEND 27 54 > LPT1
REM Kursivschrift ausschalten.

ECHO  -Breitschrift
SEND 27 14 > LPT1
ECHO Breitschrift > LPT1

ECHO  -Pica-Korrespondenzschrift
SEND 27 110 > LPT1
REM Picakorrespondenzschrift einschalten.
ECHO Pica-Korrespondenzschrift Schrift > LPT1

ECHO  -Elite-Korrespondenzschrift
SEND 27 111 > LPT1
REM Elitskorrespondenzschrift einschalten.
ECHO Elite-Korrespondenzschrift > LPT1

ECHO  -Korrespondenzschrift
SEND 27 120 49 > LPT1
REM Korrespondenzschrift einschalten.
ECHO Korrespondenzschrift > LPT1
SEND 27 120 48 > LPT1
REM Korrespondenzschrift ausschalten.

ECHO  -Proportionalschrift
SEND 27 112 49 > LPT1
REM Proportionalschrift einschalten.
ECHO Proportionalschrift > LPT1
SEND 27 112 48 > LPT1
REM Proportionalschrift ausschalten.

ECHO  -Paralellanschlag
SEND 27 69 > LPT1
REM Parallelanschlag einschalten.
ECHO Parallelanschlag > LPT1
SEND 27 70 > LPT1
REM Parallelanschlag ausschalten.

ECHO  -Doppeldruck
SEND 27 71 > LPT1
REM Doppeldruck einschalten.
ECHO Doppeldruck > LPT1
SEND 27 72 > LPT1
REM Doppeldruck ausschalten.

ECHO  -Komprimierte Schrift
SEND 27 15 > LPT1
ECHO Komprimierte Schrift > LPT1
GOTO ENDE


:LASERJET
CLS
ECHO Steure einen HP LaserJet
ECHO Drucken in/mit:
ECHO  -Helv
SEND 27 40 115 52 84 > LPT1
ECHO Helv > LPT1

ECHO  -TMS-ROMAN
SEND 27 40 115 53 84 > LPT1
ECHO TMS-ROMAN > LPT1

ECHO  -Gothic
SEND 27 40 11