Convert charset to utf8HEADmaster

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.

1 files changed, 5 insertions, 5 deletions

diff --git a/system/net/1.7.5/src/basic net b/system/net/1.7.5/src/basic net
index 41c8402..88b41e5 100644
--- a/system/net/1.7.5/src/basic net
+++ b/system/net/1.7.5/src/basic net
@@ -48,7 +48,7 @@ LET
     neue ack laenge = 10, 

     ack laenge = 8,

 

-    (* Typen von Kommunikationsstr”men *)

+    (* Typen von Kommunikationsströmen *)

 

     send wait = 0,

     zustellung = 1,

@@ -328,7 +328,7 @@ PROC sendereport (TEXT CONST txt):
 END PROC sendereport;

 

 PROC empfangsreport  (TEXT CONST txt):

-  report (text (strom)+":"+txt+". Empf„nger: """

+  report (text (strom)+":"+txt+". Empfänger: """

           +nam (vx.ziel)+""". Quelle "+text (vx.rechnernummernDIV256));

 END PROC empfangsreport  ;

 

@@ -420,7 +420,7 @@ END PROC sendung starten;
 PROC sendung starten (TASK CONST quelle, ziel, INT CONST ziel station,code):

   IF ziel station = own 

   THEN

-    report ("Irrl„ufer: Sendung an eigene Station. Absender:"""+

+    report ("Irrläufer: Sendung an eigene Station. Absender:"""+

             nam (quelle)+""".");

     vx.strom := 0;

     forget (vdr)

@@ -465,10 +465,10 @@ PROC alten call loeschen (TASK CONST quelle):
     strom := alter call (tasknr (quelle));

     IF in ausfuehrungsphase

     THEN

-      sendereport ("Call-L”schung vorgemerkt");

+      sendereport ("Call-Löschung vorgemerkt");

       loeschung vormerken

     ELSE

-      report ("Call gel”scht."""+nam(quelle)+""". Strom "+text(strom));

+      report ("Call gelöscht."""+nam(quelle)+""". Strom "+text(strom));

       loesche verbindung (strom)

     FI;

     strom := lstrom;