diff options
| author | Lars-Dominik Braun <lars@6xq.net> | 2019-03-02 17:15:47 +0100 |
|---|---|---|
| committer | Lars-Dominik Braun <lars@6xq.net> | 2019-03-02 17:15:47 +0100 |
| commit | c316cd982303f30f29075f31bcd910f9be38bb25 (patch) | |
| tree | 12ba04bd0f2a94bd48583ee5f2ab269b6ba5c8b3 /system/terminal-codes | |
| parent | 50acf53648b6562853cb26aa4e7062a5ced66908 (diff) | |
| download | eumel-src-c316cd982303f30f29075f31bcd910f9be38bb25.tar.gz eumel-src-c316cd982303f30f29075f31bcd910f9be38bb25.tar.bz2 eumel-src-c316cd982303f30f29075f31bcd910f9be38bb25.zip | |
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.
Diffstat (limited to 'system/terminal-codes')
| -rw-r--r-- | system/terminal-codes/1.8.2/src/AT.ascii(SHard>=4.5) | 8 | ||||
| -rw-r--r-- | system/terminal-codes/1.8.2/src/GEN182.ELA | 2 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/GENGEN.ELA | 2 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/IBM.PC.AT | 28 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/M24 | 28 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/PC.KB2 | 28 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/PC.german | 28 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/SIEMENS.PC-D | 36 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/TAP5060.ELA | 18 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/VC404.german | 28 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/VC404.hrz | 14 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/basis108(deutsch) | 18 | ||||
| -rw-r--r-- | system/terminal-codes/unknown/src/ws580 | 28 |
13 files changed, 133 insertions, 133 deletions
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 <X| *) (* RUBOUT *)
-enter incode ( 12, ""168""); (* LCHEN *) (* RUBOUT *)
+enter incode ( 12, ""168""); (* LÖCHEN *) (* RUBOUT *)
enter incode ( 12, ""211""); (* RUBOUT *)
enter incode ( 12, ""253""); (* CE *) (* RUBOUT *)
enter incode ( 16, ""239""); (* HILFE *) (* MARK *)
@@ -65,24 +65,24 @@ cursor logic (1,1,csi,";","H"); (******************** Textzeichen *************************************)
enter incode ( 46, ""240""); (* +/- *) (* . *)
-enter incode (214, ""142""); (* *)
-enter incode (215, ""153""); (* *)
-enter incode (216, ""154""); (* *)
-enter incode (217, ""132""); (* *)
-enter incode (218, ""148""); (* *)
-enter incode (219, ""129""); (* *)
-enter incode (251, ""225""); (* *)
-enter incode (252, ""021""); (* *)
+enter incode (214, ""142""); (* Ä *)
+enter incode (215, ""153""); (* Ö *)
+enter incode (216, ""154""); (* Ü *)
+enter incode (217, ""132""); (* ä *)
+enter incode (218, ""148""); (* ö *)
+enter incode (219, ""129""); (* ü *)
+enter incode (251, ""225""); (* ß *)
+enter incode (252, ""021""); (* ⁿ *)
-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, "k" ); (* Trenn-k *)
enter outcode (221, ""205""); (* Trennstrich *)
enter outcode (222, ""206""); (* gesch. Nummernkreuz *)
enter outcode (223, ""176""); (* gesch. Blank *)
-enter outcode (251, ""225""); (* *)
-enter outcode (252, ""021""); (* *)
+enter outcode (251, ""225""); (* ß *)
+enter outcode (252, ""021""); (* ⁿ *)
diff --git a/system/terminal-codes/unknown/src/TAP5060.ELA b/system/terminal-codes/unknown/src/TAP5060.ELA index 791189e..a5a1d70 100644 --- a/system/terminal-codes/unknown/src/TAP5060.ELA +++ b/system/terminal-codes/unknown/src/TAP5060.ELA @@ -19,16 +19,16 @@ 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 ( 214, ""142"" ) ; (* *)
-enter incode ( 215, ""153"" ) ; (* *)
-enter incode ( 216, ""154"" ) ; (* *)
-enter incode ( 217, ""132"" ) ; (* *)
-enter incode ( 218, ""148"" ) ; (* *)
-enter incode ( 219, ""129"" ) ; (* *)
-enter incode ( 251, ""225"" ) ; (* *)
-enter incode ( 64, ""21"" ) ; (* *)
+enter incode ( 214, ""142"" ) ; (* Ä *)
+enter incode ( 215, ""153"" ) ; (* Ö *)
+enter incode ( 216, ""154"" ) ; (* Ü *)
+enter incode ( 217, ""132"" ) ; (* ä *)
+enter incode ( 218, ""148"" ) ; (* ö *)
+enter incode ( 219, ""129"" ) ; (* ü *)
+enter incode ( 251, ""225"" ) ; (* ß *)
+enter incode ( 64, ""21"" ) ; (* ⁿ *)
enter incode ( 96, ""36"" ) ; (* ` *)
enter incode ( 1, ""199"" ) ; (* hop *)
diff --git a/system/terminal-codes/unknown/src/VC404.german b/system/terminal-codes/unknown/src/VC404.german index 0c84d8e..4c00a44 100644 --- a/system/terminal-codes/unknown/src/VC404.german +++ b/system/terminal-codes/unknown/src/VC404.german @@ -43,13 +43,13 @@ cursor logic (32,""16"","",""); (******************** Textzeichen *************************************)
-enter incode (214, ""091""); (* *)
-enter incode (215, ""092""); (* *)
-enter incode (216, ""093""); (* *)
-enter incode (217, ""123""); (* *)
-enter incode (218, ""124""); (* *)
-enter incode (219, ""125""); (* *)
-enter incode (251, ""064""); (* *)
+enter incode (214, ""091""); (* Ä *)
+enter incode (215, ""092""); (* Ö *)
+enter incode (216, ""093""); (* Ü *)
+enter incode (217, ""123""); (* ä *)
+enter incode (218, ""124""); (* ö *)
+enter incode (219, ""125""); (* ü *)
+enter incode (251, ""064""); (* ß *)
FOR i FROM 127 UPTO 255 REP enter outcode (i, "?") PER;
FOR i FROM 129 UPTO 159 REP enter outcode (i, "E") PER; (* japanische *)
@@ -62,14 +62,14 @@ 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/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 - *)
|