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. --- .../terminal-codes/1.8.2/src/AT.ascii(SHard>=4.5) | 8 ++--- system/terminal-codes/1.8.2/src/GEN182.ELA | 2 +- system/terminal-codes/unknown/src/GENGEN.ELA | 2 +- system/terminal-codes/unknown/src/IBM.PC.AT | 28 ++++++++--------- system/terminal-codes/unknown/src/M24 | 28 ++++++++--------- system/terminal-codes/unknown/src/PC.KB2 | 28 ++++++++--------- system/terminal-codes/unknown/src/PC.german | 28 ++++++++--------- system/terminal-codes/unknown/src/SIEMENS.PC-D | 36 +++++++++++----------- system/terminal-codes/unknown/src/TAP5060.ELA | 18 +++++------ system/terminal-codes/unknown/src/VC404.german | 28 ++++++++--------- system/terminal-codes/unknown/src/VC404.hrz | 14 ++++----- .../terminal-codes/unknown/src/basis108(deutsch) | 18 +++++------ system/terminal-codes/unknown/src/ws580 | 28 ++++++++--------- 13 files changed, 133 insertions(+), 133 deletions(-) (limited to 'system/terminal-codes') diff --git a/system/terminal-codes/1.8.2/src/AT.ascii(SHard>=4.5) b/system/terminal-codes/1.8.2/src/AT.ascii(SHard>=4.5) index ca9ba3d..1a3c167 100644 --- a/system/terminal-codes/1.8.2/src/AT.ascii(SHard>=4.5) +++ b/system/terminal-codes/1.8.2/src/AT.ascii(SHard>=4.5) @@ -49,7 +49,7 @@ enter incode ( 38, "/") ; (* / *) enter incode ( 42, "(") ; (* ( *) enter incode ( 40, ")") ; (* ) *) enter incode ( 41, "=") ; (* = *) -enter incode ( 45, "") ; (* <251> *) +enter incode ( 45, "ß") ; (* <251> *) enter incode ( 95, "?") ; (* ? *) enter incode ( 61, "'") ; (* ' *) enter incode ( 43, "`") ; (* ` *) @@ -61,11 +61,11 @@ enter incode ( 60, ";") ; (* ; *) enter incode ( 62, ":") ; (* : *) enter incode ( 47, "-") ; (* - *) enter incode ( 63, "_") ; (* _ *) -enter incode ( 59, "") ; (* <218> *) +enter incode ( 59, "ö") ; (* <218> *) enter incode ( 58, ""215"") ; (* <215> *) -enter incode ( 39, "") ; (* <217> *) +enter incode ( 39, "ä") ; (* <217> *) enter incode ( 34, ""214"") ; (* <214> *) -enter incode ( 91, "") ; (* <219> *) +enter incode ( 91, "ü") ; (* <219> *) enter incode ( 93, "+") ; (* + *) enter incode (123, ""216"") ; (* <216> *) enter incode (125, "*") ; (* * *) diff --git a/system/terminal-codes/1.8.2/src/GEN182.ELA b/system/terminal-codes/1.8.2/src/GEN182.ELA index 43c3acf..be9c208 100644 --- a/system/terminal-codes/1.8.2/src/GEN182.ELA +++ b/system/terminal-codes/1.8.2/src/GEN182.ELA @@ -198,7 +198,7 @@ TEXT PROC denoter (ROW 128 INT VAR y, INT CONST pos, ende) : WHILE i < 256 AND zugriff <> ende REP IF zugriff > 31 AND zugriff < 127 THEN zeile CAT code (zugriff) ELIF zugriff = 34 THEN zeile CAT """""" - ELIF zugriff = 251 THEN zeile CAT "" + ELIF zugriff = 251 THEN zeile CAT "ß" ELIF zugriff > 216 AND zugriff < 224 THEN zeile CAT code (zugriff) ELSE zeile CAT """" ; zeile CAT text (zugriff) ; diff --git a/system/terminal-codes/unknown/src/GENGEN.ELA b/system/terminal-codes/unknown/src/GENGEN.ELA index ca88fd7..2add75a 100644 --- a/system/terminal-codes/unknown/src/GENGEN.ELA +++ b/system/terminal-codes/unknown/src/GENGEN.ELA @@ -190,7 +190,7 @@ TEXT PROC denoter (ROW 64 INT VAR y, INT CONST pos, ende) : WHILE i < 128 AND zugriff <> ende REP IF zugriff > 31 AND zugriff < 127 THEN zeile CAT code (zugriff) ELIF zugriff = 34 THEN zeile CAT """""" - ELIF zugriff = 251 THEN zeile CAT "" + ELIF zugriff = 251 THEN zeile CAT "ß" ELIF zugriff > 216 AND zugriff < 224 THEN zeile CAT code (zugriff) ELSE zeile CAT """" ; zeile CAT text (zugriff) ; diff --git a/system/terminal-codes/unknown/src/IBM.PC.AT b/system/terminal-codes/unknown/src/IBM.PC.AT index 37bf015..7c7a80c 100644 --- a/system/terminal-codes/unknown/src/IBM.PC.AT +++ b/system/terminal-codes/unknown/src/IBM.PC.AT @@ -6,17 +6,17 @@ cursor logic (0, ""6"", "", ""); enter outcode ( 14, 0, ""14" "); (* end mark *) enter outcode ( 15, 0, ""15" "); (* begin mark *) -enter outcode (214, 142); (* *) -enter outcode (215, 153); (* *) -enter outcode (216, 154); (* *) -enter outcode (217, 132); (* *) -enter outcode (218, 148); (* *) -enter outcode (219, 129); (* *) +enter outcode (214, 142); (* Ä *) +enter outcode (215, 153); (* Ö *) +enter outcode (216, 154); (* Ü *) +enter outcode (217, 132); (* ä *) +enter outcode (218, 148); (* ö *) +enter outcode (219, 129); (* ü *) enter outcode (220, 0, ""15""107""14""); (* druck k *) enter outcode (221, 0, ""15""45""14""); (* druck - *) enter outcode (222, 0, ""15""35""14""); (* druck # *) enter outcode (223, 0, ""15""32""14""); (* druck *) -enter outcode (251, 225); (* *) +enter outcode (251, 225); (* ß *) enter incode ( 1, ""199""); (* HOP *) enter incode ( 2, ""205""); (* RECHTS *) @@ -54,10 +54,10 @@ enter incode ( 95, ""63""); (* _ *) enter incode ( 96, ""43""); (* ` *) enter incode (121, ""122""); (* y *) enter incode (122, ""121""); (* z *) -enter incode (214, ""34""); (* *) -enter incode (215, ""58""); (* *) -enter incode (216, ""123""); (* *) -enter incode (217, ""39""); (* *) -enter incode (218, ""59""); (* *) -enter incode (219, ""91""); (* *) -enter incode (251, ""45""); (* *) +enter incode (214, ""34""); (* Ä *) +enter incode (215, ""58""); (* Ö *) +enter incode (216, ""123""); (* Ü *) +enter incode (217, ""39""); (* ä *) +enter incode (218, ""59""); (* ö *) +enter incode (219, ""91""); (* ü *) +enter incode (251, ""45""); (* ß *) diff --git a/system/terminal-codes/unknown/src/M24 b/system/terminal-codes/unknown/src/M24 index bf8cae3..2588f03 100644 --- a/system/terminal-codes/unknown/src/M24 +++ b/system/terminal-codes/unknown/src/M24 @@ -6,17 +6,17 @@ cursor logic (0, ""6"", "", ""); enter outcode ( 14, 0, ""14" "); (* end mark *) enter outcode ( 15, 0, ""15" "); (* begin mark *) -enter outcode (214, 142); (* *) -enter outcode (215, 153); (* *) -enter outcode (216, 154); (* *) -enter outcode (217, 132); (* *) -enter outcode (218, 148); (* *) -enter outcode (219, 129); (* *) +enter outcode (214, 142); (* Ä *) +enter outcode (215, 153); (* Ö *) +enter outcode (216, 154); (* Ü *) +enter outcode (217, 132); (* ä *) +enter outcode (218, 148); (* ö *) +enter outcode (219, 129); (* ü *) enter outcode (220, 0, ""15""107""14""); (* druck k *) enter outcode (221, 0, ""15""45""14""); (* druck - *) enter outcode (222, 0, ""15""35""14""); (* druck # *) enter outcode (223, 0, ""15""32""14""); (* druck *) -enter outcode (251, 225); (* *) +enter outcode (251, 225); (* ß *) enter incode ( 4, ""4""); (* INFO *) enter incode ( 7, ""7""); (* SV *) @@ -54,10 +54,10 @@ enter incode ( 95, ""63""); (* _ *) enter incode ( 96, ""43""); (* ` *) enter incode (121, ""122""); (* y *) enter incode (122, ""121""); (* z *) -enter incode (214, ""34""); (* *) -enter incode (215, ""58""); (* *) -enter incode (216, ""123""); (* *) -enter incode (217, ""39""); (* *) -enter incode (218, ""59""); (* *) -enter incode (219, ""91""); (* *) -enter incode (251, ""45""); (* *) +enter incode (214, ""34""); (* Ä *) +enter incode (215, ""58""); (* Ö *) +enter incode (216, ""123""); (* Ü *) +enter incode (217, ""39""); (* ä *) +enter incode (218, ""59""); (* ö *) +enter incode (219, ""91""); (* ü *) +enter incode (251, ""45""); (* ß *) diff --git a/system/terminal-codes/unknown/src/PC.KB2 b/system/terminal-codes/unknown/src/PC.KB2 index 8b673a8..4917eb0 100644 --- a/system/terminal-codes/unknown/src/PC.KB2 +++ b/system/terminal-codes/unknown/src/PC.KB2 @@ -5,17 +5,17 @@ cursor logic (0, ""6"", "", ""); enter outcode ( 14, 0, ""14" "); {end mark} enter outcode ( 15, 0, ""15" "); {begin mark} -enter outcode (214, ""142""); {} -enter outcode (215, ""153""); {} -enter outcode (216, ""154""); {} -enter outcode (217, ""132""); {} -enter outcode (218, ""148""); {} -enter outcode (219, ""129""); {} +enter outcode (214, ""142""); {Ä} +enter outcode (215, ""153""); {Ö} +enter outcode (216, ""154""); {Ü} +enter outcode (217, ""132""); {ä} +enter outcode (218, ""148""); {ö} +enter outcode (219, ""129""); {ü} enter outcode (220, 0, ""15"k"14""); {trenn-k} enter outcode (221, 0, ""15"-"14""); {trenn-strich} enter outcode (222, 0, ""15"#"14""); {pseudo-fis} enter outcode (223, 0, ""15" "14""); {pseudo-blank} -enter outcode (251, ""225""); {} +enter outcode (251, ""225""); {ß} enter incode ( 1, ""199""); {hop} enter incode ( 2, ""205""); {rechts} @@ -70,10 +70,10 @@ enter incode ( 95, ""63""); {_} enter incode ( 96, ""126""); {\} enter incode (121, ""122""); {y} enter incode (122, ""121""); {z} -enter incode (214, ""42""); {} -enter incode (215, ""43""); {} -enter incode (216, ""96""); {} -enter incode (217, ""58""); {} -enter incode (218, ""59""); {} -enter incode (219, ""64""); {} -enter incode (251, ""45""); {} +enter incode (214, ""42""); {Ä} +enter incode (215, ""43""); {Ö} +enter incode (216, ""96""); {Ü} +enter incode (217, ""58""); {ä} +enter incode (218, ""59""); {ö} +enter incode (219, ""64""); {ü} +enter incode (251, ""45""); {ß} diff --git a/system/terminal-codes/unknown/src/PC.german b/system/terminal-codes/unknown/src/PC.german index 0634cb8..50a49fc 100644 --- a/system/terminal-codes/unknown/src/PC.german +++ b/system/terminal-codes/unknown/src/PC.german @@ -6,17 +6,17 @@ cursor logic (0, ""6"", "", ""); enter outcode ( 14, 0, ""14" "); (* end mark *) enter outcode ( 15, 0, ""15" "); (* begin mark *) -enter outcode (214, 142); (* *) -enter outcode (215, 153); (* *) -enter outcode (216, 154); (* *) -enter outcode (217, 132); (* *) -enter outcode (218, 148); (* *) -enter outcode (219, 129); (* *) +enter outcode (214, 142); (* Ä *) +enter outcode (215, 153); (* Ö *) +enter outcode (216, 154); (* Ü *) +enter outcode (217, 132); (* ä *) +enter outcode (218, 148); (* ö *) +enter outcode (219, 129); (* ü *) enter outcode (220, 0, ""15""107""14""); (* druck k *) enter outcode (221, 0, ""15""45""14""); (* druck - *) enter outcode (222, 0, ""15""35""14""); (* druck # *) enter outcode (223, 0, ""15""32""14""); (* druck *) -enter outcode (251, 225); (* *) +enter outcode (251, 225); (* ß *) enter incode ( 1, ""199""); (* HOP *) enter incode ( 2, ""205""); (* RECHTS *) @@ -54,10 +54,10 @@ enter incode ( 95, ""63""); (* _ *) enter incode ( 96, ""43""); (* ` *) enter incode (121, ""122""); (* y *) enter incode (122, ""121""); (* z *) -enter incode (214, ""34""); (* *) -enter incode (215, ""58""); (* *) -enter incode (216, ""123""); (* *) -enter incode (217, ""39""); (* *) -enter incode (218, ""59""); (* *) -enter incode (219, ""91""); (* *) -enter incode (251, ""45""); (* *) +enter incode (214, ""34""); (* Ä *) +enter incode (215, ""58""); (* Ö *) +enter incode (216, ""123""); (* Ü *) +enter incode (217, ""39""); (* ä *) +enter incode (218, ""59""); (* ö *) +enter incode (219, ""91""); (* ü *) +enter incode (251, ""45""); (* ß *) diff --git a/system/terminal-codes/unknown/src/SIEMENS.PC-D b/system/terminal-codes/unknown/src/SIEMENS.PC-D index 133b0b3..8308f72 100644 --- a/system/terminal-codes/unknown/src/SIEMENS.PC-D +++ b/system/terminal-codes/unknown/src/SIEMENS.PC-D @@ -23,10 +23,10 @@ enter incode ( 8, ""203""); (* LINKS *) enter incode ( 9, ""143""); (* BACKTAB *) (* TAB *) enter incode ( 10, ""208""); (* UNTEN *) enter incode ( 10, ""209""); (* UNTEN *) -enter incode ( 11, ""169""); (* EINFGEN *) (* RUBIN *) +enter incode ( 11, ""169""); (* EINFÜGEN *) (* RUBIN *) enter incode ( 11, ""210""); (* RUBIN *) enter incode ( 12, ""008""); (* BACK "); (* geschw. Klammer zu *) -enter outcode (214, 91); (* *) -enter outcode (215, 92); (* *) -enter outcode (216, 93); (* *) -enter outcode (217, 123); (* *) -enter outcode (218, 124); (* *) -enter outcode (219, 125); (* *) +enter outcode (214, 91); (* Ä *) +enter outcode (215, 92); (* Ö *) +enter outcode (216, 93); (* Ü *) +enter outcode (217, 123); (* ä *) +enter outcode (218, 124); (* ö *) +enter outcode (219, 125); (* ü *) enter outcode (220, "k"); (* Trenn-k *) enter outcode (221, "-"); (* Trenn-Strich *) enter outcode (222, "#"); (* gesch. Nummerkreuz *) enter outcode (223, "_"); (* gesch. Blank *) -enter outcode (251, 64); (* *) +enter outcode (251, 64); (* ß *) diff --git a/system/terminal-codes/unknown/src/VC404.hrz b/system/terminal-codes/unknown/src/VC404.hrz index 3f270c5..ede1743 100644 --- a/system/terminal-codes/unknown/src/VC404.hrz +++ b/system/terminal-codes/unknown/src/VC404.hrz @@ -53,15 +53,15 @@ enter outcode ( 93, ")"); (* ] *) enter outcode (123, "<"); (* geschw. Klammer auf *) enter outcode (124, "!"); (* | *) enter outcode (125, ">"); (* geschw. Klammer zu *) -enter outcode (214, 91); (* *) -enter outcode (215, 92); (* *) -enter outcode (216, 93); (* *) -enter outcode (217, 123); (* *) -enter outcode (218, 124); (* *) -enter outcode (219, 125); (* *) +enter outcode (214, 91); (* Ä *) +enter outcode (215, 92); (* Ö *) +enter outcode (216, 93); (* Ü *) +enter outcode (217, 123); (* ä *) +enter outcode (218, 124); (* ö *) +enter outcode (219, 125); (* ü *) enter outcode (220, "k"); (* Trenn-k *) enter outcode (221, "-"); (* Trenn-Strich *) enter outcode (222, "#"); (* gesch. Nummerkreuz *) enter outcode (223, "_"); (* gesch. Blank *) -enter outcode (251, 64); (* *) +enter outcode (251, 64); (* ß *) diff --git a/system/terminal-codes/unknown/src/basis108(deutsch) b/system/terminal-codes/unknown/src/basis108(deutsch) index 9213cbe..d2125a6 100644 --- a/system/terminal-codes/unknown/src/basis108(deutsch) +++ b/system/terminal-codes/unknown/src/basis108(deutsch) @@ -86,17 +86,17 @@ enter incode (123,""169"") ; (* CTRL F9 *) enter incode (124,""170"") ; (* CTRL F10 *) enter incode (125,""171"") ; (* CTRL F11 *) -enter incode (251, ""213"") ; (* SHIFT F5 = *) - (* SHIFT F6 = -Andere incodes schon Hardware- SHIFT F7 = -mig implementiert: SHIFT F8 = - SHIFT F9 = - SHIFT F10= - SHIFT F11= +enter incode (251, ""213"") ; (* SHIFT F5 = ß *) + (* SHIFT F6 = ä +Andere incodes schon Hardware- SHIFT F7 = ö +mäßig implementiert: SHIFT F8 = ü + SHIFT F9 = Ä + SHIFT F10= Ö + SHIFT F11= Ü SHIFT F12= Trenn-k ( k ) SHIFT F13= Trenn-Strich ( - ) - SHIFT F14= Geschtztes Fis ( # ) - SHIFT F15= Geschtztes Blank ( ) *) + SHIFT F14= Geschütztes Fis ( # ) + SHIFT F15= Geschütztes Blank ( ) *) PROC illegal (INT CONST from, to) : INT VAR i ; diff --git a/system/terminal-codes/unknown/src/ws580 b/system/terminal-codes/unknown/src/ws580 index 2a2c0dd..a2e341b 100644 --- a/system/terminal-codes/unknown/src/ws580 +++ b/system/terminal-codes/unknown/src/ws580 @@ -12,13 +12,13 @@ enter incode ( 12, ""8""); (* rubout *) enter incode ( 16, ""96""); (* mark *) enter incode ( 23, ""19""); (* weiter *) -enter incode ( 214, ""91""); (* *) -enter incode ( 215, ""92""); (* *) -enter incode ( 216, ""93""); (* *) -enter incode ( 217, ""123""); (* *) -enter incode ( 218, ""124""); (* *) -enter incode ( 219, ""125""); (* *) -enter incode ( 251, ""126""); (* *) +enter incode ( 214, ""91""); (* Ä *) +enter incode ( 215, ""92""); (* Ö *) +enter incode ( 216, ""93""); (* Ü *) +enter incode ( 217, ""123""); (* ä *) +enter incode ( 218, ""124""); (* ö *) +enter incode ( 219, ""125""); (* ü *) +enter incode ( 251, ""126""); (* ß *) enter outcode ( 1, 0, ""27"Y "); (* home *) enter outcode ( 2, 0, ""6""); (* rechts *) @@ -38,13 +38,13 @@ enter outcode (124, "!"); (* | *) enter outcode (125, ")"); (* *) enter outcode (126, "-"); (* ~ *) -enter outcode (214, ""91""); (* *) -enter outcode (215, ""92""); (* *) -enter outcode (216, ""93""); (* *) -enter outcode (217, ""123""); (* *) -enter outcode (218, ""124""); (* *) -enter outcode (219, ""125""); (* *) -enter outcode (251, ""126""); (* *) +enter outcode (214, ""91""); (* Ä *) +enter outcode (215, ""92""); (* Ü *) +enter outcode (216, ""93""); (* Ö *) +enter outcode (217, ""123""); (* ä *) +enter outcode (218, ""124""); (* ü *) +enter outcode (219, ""125""); (* ö *) +enter outcode (251, ""126""); (* ß *) enter outcode (220, "k"); (* trenn k *) enter outcode (221, "-"); (* trenn - *) -- cgit v1.2.3