From c316cd982303f30f29075f31bcd910f9be38bb25 Mon Sep 17 00:00:00 2001 From: Lars-Dominik Braun Date: Sat, 2 Mar 2019 17:15:47 +0100 Subject: Convert charset to utf8 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Files imported in commit 98cab31fc3659e33aef260efca55bf9f1753164c were exported from EUMEL to DOS and used codepage 437/850(?). Convert files to UTF-8 where possible. Some files were left as-is. I’m not sure whether converting these would be correct. --- system/printer-9nadel/1986/src/module9 | 76 +++++++++++++++++----------------- 1 file changed, 38 insertions(+), 38 deletions(-) (limited to 'system/printer-9nadel/1986/src/module9') diff --git a/system/printer-9nadel/1986/src/module9 b/system/printer-9nadel/1986/src/module9 index e25cea6..2ab5304 100644 --- a/system/printer-9nadel/1986/src/module9 +++ b/system/printer-9nadel/1986/src/module9 @@ -1,7 +1,7 @@ (*************************************************************************) (* Stand : 01.10.88 *) -(* Module-Datei fr 9-Nadel-Drucker Version : 0.9 *) +(* Module-Datei für 9-Nadel-Drucker Version : 0.9 *) (* Autoren : mov/hjh *) (*************************************************************************) @@ -16,102 +16,102 @@ PACKET printer driver top margin, $hfx85$ std speed: -(* Treiber fr EPSON FX85/105, automatisch generiert *) +(* Treiber für EPSON FX85/105, automatisch generiert *) $hfx800$ std quality, std typeface: -(* Treiber fr EPSON FX800/1000, automatisch generiert *) +(* Treiber für EPSON FX800/1000, automatisch generiert *) BOOL VAR was tall font; $hmx$ std speed: -(* Treiber fr EPSON MX80/100, Typ III *) +(* Treiber für EPSON MX80/100, Typ III *) (* Treiber automatisch generiert *) BOOL VAR is condensed, is small; $hlx800$ std speed, std quality, std typeface: -(* Treiber fr EPSON LX800/1000, automatisch generiert *) +(* Treiber für EPSON LX800/1000, automatisch generiert *) BOOL VAR was tall font; $hgp$ std speed: -(* Treiber fr IBM-Grafikdrucker *) +(* Treiber für IBM-Grafikdrucker *) (* Treiber automatisch generiert *) $hpp$ std speed, std quality: -(* Treiber fr IBM-Proprinter *) +(* Treiber für IBM-Proprinter *) (* Treiber automatisch generiert *) $hml182i$ std speed, std quality: -(* Treiber fr OKI ML182/183 IBM-kompatibel *) +(* Treiber für OKI ML182/183 IBM-kompatibel *) (* Treiber automatisch generiert *) $hml192el$ paper feed, std speed: -(* Treiber fr OKI ML192/193 Elite *) +(* Treiber für OKI ML192/193 Elite *) (* Treiber automatisch generiert *) BOOL VAR prop font; $hml292el$ std quality, std typeface, paper feed: -(* Treiber fr OKI ML292/293 Elite *) +(* Treiber für OKI ML292/293 Elite *) (* Treiber automatisch generiert *) BOOL VAR was tall font; $hml294i$ std speed, paper feed, std quality: -(* Treiber fr OKI ML294 IBM-kompatibel *) +(* Treiber für OKI ML294 IBM-kompatibel *) (* Treiber automatisch generiert *) $hml320$ std speed: -(* Treiber fr OKI ML320 IBM/EPSON-kompatibel *) +(* Treiber für OKI ML320 IBM/EPSON-kompatibel *) (* Treiber automatisch generiert *) BOOL VAR prop font; $hlc10$ std quality, std typeface: -(* Treiber fr Star LC-10 oder LC-10 Colour *) +(* Treiber für Star LC-10 oder LC-10 Colour *) (* Treiber automatisch generiert *) BOOL VAR was tall font; $hdmp4000$ std speed: -(* Treiber fr Schneider DMP4000, automatisch generiert *) +(* Treiber für Schneider DMP4000, automatisch generiert *) $hnx15$ std speed: -(* Treiber fr Star NX-15, ND-10, ND-15, NR-10 und NR-15 *) +(* Treiber für Star NX-15, ND-10, ND-15, NR-10 und NR-15 *) (* Treiber automatisch generiert *) $hmt230$ paper feed, std speed: -(* Treiber fr Mannesmann-Tally MT 230 *) +(* Treiber für Mannesmann-Tally MT 230 *) (* Treiber automatisch generiert *) $hmt340$ paper feed, std speed: -(* Treiber fr Mannesmann-Tally MT 340 *) +(* Treiber für Mannesmann-Tally MT 340 *) (* Treiber automatisch generiert *) BOOL VAR prop font := FALSE; $h120d$ : -(* Treiber fr Citizen 120-D *) +(* Treiber für Citizen 120-D *) (* Treiber automatisch generiert *) $hc310$ paper feed, std speed: -(* Treiber fr C. Itoh C 310/315 CXP *) +(* Treiber für C. Itoh C 310/315 CXP *) (* Treiber automatisch generiert *) $hci3500$ std speed: -(* Treiber fr C. Itoh CI-3500 *) +(* Treiber für C. Itoh CI-3500 *) (* Treiber automatisch generiert *) $hdx2100$ paper feed, std speed: -(* Treiber fr Fujitsu DX 2100 *) +(* Treiber für Fujitsu DX 2100 *) (* Treiber automatisch generiert *) BOOL VAR prop font := FALSE ; @@ -152,7 +152,7 @@ PROC std speed (TEXT CONST speed) : IF speed = "fast" OR speed = "slow" THEN std speed name := speed - ELSE errorstop ("unzulssige Geschwindigkeit") + ELSE errorstop ("unzulässige Geschwindigkeit") FI END PROC std speed; @@ -165,7 +165,7 @@ PROC std quality (TEXT CONST quality) : IF quality = "nlq" OR quality = "draft" THEN std quality name := quality - ELSE errorstop ("unzulssige Qualittsbezeichnung") + ELSE errorstop ("unzulässige Qualitätsbezeichnung") FI END PROC std quality; @@ -178,7 +178,7 @@ PROC std typeface (TEXT CONST typeface) : IF typeface = "" OR typeface = "roman" OR typeface = "sansserif" THEN std typeface name := typeface - ELSE errorstop ("unzulssige Schriftart") + ELSE errorstop ("unzulässige Schriftart") FI END PROC std typeface; @@ -191,7 +191,7 @@ PROC std typeface (TEXT CONST typeface) : IF typeface = "" OR typeface = "courier" OR typeface = "sansserif" THEN std typeface name := typeface - ELSE errorstop ("unzulssige Schriftart") + ELSE errorstop ("unzulässige Schriftart") FI END PROC std typeface; @@ -205,7 +205,7 @@ PROC std typeface (TEXT CONST typeface) : IF typeface = "" OR typeface = "courier" OR typeface = "sansserif" OR typeface = "orator1" OR typeface = "orator2" THEN std typeface name := typeface - ELSE errorstop ("unzulssige Schriftart") + ELSE errorstop ("unzulässige Schriftart") FI END PROC std typeface; @@ -218,7 +218,7 @@ PROC paper feed (TEXT CONST feeder) : IF feeder = "sheet" OR feeder = "tractor" THEN feeder name := feeder - ELSE errorstop ("unzulssige Einzugsart") + ELSE errorstop ("unzulässige Einzugsart") FI END PROC paper feed; @@ -234,7 +234,7 @@ PROC paper feed (TEXT CONST feeder) : THEN feeder name := feeder ELIF feeder = "sheet" THEN feeder name := "schacht1" - ELSE errorstop ("unzulssige Einzugsart") + ELSE errorstop ("unzulässige Einzugsart") FI END PROC paper feed; @@ -301,14 +301,14 @@ $opendocmx$ $opendocgp$ param 2 := (param 2 DIV 36) * 36; out (""27"6"); (* Zeichensatz 2 *) - out (""18""27"F"27"H"27"W"0""27"T"27"-"0""); (* Modifikationen rcksetzen *) + out (""18""27"F"27"H"27"W"0""27"T"27"-"0""); (* Modifikationen rücksetzen *) out (""27"9"27"O"27"A"12""27"2"); out (""27"C" + code (param 2 DIV 36)). (* Formularlaenge *) $opendocpp$ param 2 := (param 2 DIV 36) * 36; out (""27"6"); (* Zeichensatz 2 *) - out (""18""27"F"27"W"0""27"T"27"-"0""); (* Modifikationen rcksetzen *) + out (""18""27"F"27"W"0""27"T"27"-"0""); (* Modifikationen rücksetzen *) out (""27"9"27"O"27"A"12""27"2"); out (""27"C" + code (param 2 DIV 36)); (* Formularlaenge *) IF pos (material, "nlq") <> 0 @@ -329,7 +329,7 @@ $opendocml182i$ THEN out (""27"I3") ELSE out (""27"I1") FI; - out (""27"N"0""); (* Kein Sprung ber Perf. *) + out (""27"N"0""); (* Kein Sprung über Perf. *) $opendocml192el$ param 2 := (param 2 DIV 36) * 36; @@ -369,7 +369,7 @@ $opendocml292el$ $opendocml294i$ param 2 := (param 2 DIV 36) * 36; out (""27"6"); (* Zeichensatz 2 *) - out (""18""27"F"27"W0"27"T"27"-0"27"%H"); (* Modifikationen rcksetzen *) + out (""18""27"F"27"W0"27"T"27"-0"27"%H"); (* Modifikationen rücksetzen *) out (""27"9"27"O"27"A"12""27"2"); out (""27"C" + code (param 2 DIV 36)); (* Formularlaenge *) IF pos (material, "nlq") <> 0 @@ -647,7 +647,7 @@ $cmdml292el$ THEN out (""27"r4") ELIF buffer = "orange" THEN out (""27"r5") - ELIF buffer = "grn" + ELIF buffer = "grün" THEN out (""27"r6") ELSE out (buffer) FI. @@ -670,7 +670,7 @@ $cmdml294i$ THEN out (""27"r4") ELIF buffer = "orange" THEN out (""27"r5") - ELIF buffer = "grn" + ELIF buffer = "grün" THEN out (""27"r6") ELSE out (buffer) FI. @@ -701,7 +701,7 @@ $cmdlc10$ THEN out (""27"r"4"") ELIF buffer = "orange" THEN out (""27"r"5"") - ELIF buffer = "grn" + ELIF buffer = "grün" THEN out (""27"r"6"") ELSE out (buffer) FI. @@ -724,7 +724,7 @@ $cmdmt230$ THEN out (""27"r"4"") ELIF buffer = "rot" THEN out (""27"r"5"") - ELIF buffer = "grn" + ELIF buffer = "grün" THEN out (""27"r"6"") ELSE out (buffer) FI. @@ -748,7 +748,7 @@ $cmdc310$ THEN out (""27"r"4"") ELIF buffer = "orange" THEN out (""27"r"5"") - ELIF buffer = "grn" + ELIF buffer = "grün" THEN out (""27"r"6"") ELSE out (buffer) FI. @@ -768,7 +768,7 @@ $cmddx2100$ THEN out (""27"r"4"") ELIF buffer = "orange" THEN out (""27"r"5"") - ELIF buffer = "grn" + ELIF buffer = "grün" THEN out (""27"r"6"") ELSE out (buffer) FI. -- cgit v1.2.3