From c316cd982303f30f29075f31bcd910f9be38bb25 Mon Sep 17 00:00:00 2001
From: Lars-Dominik Braun <lars@6xq.net>
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/net/1.7.5/src/basic net     | 10 +++++-----
 system/net/1.7.5/src/net inserter  |  4 ++--
 system/net/1.7.5/src/net manager-M | 12 ++++++------
 3 files changed, 13 insertions(+), 13 deletions(-)

(limited to 'system/net/1.7.5/src')

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;
diff --git a/system/net/1.7.5/src/net inserter b/system/net/1.7.5/src/net inserter
index 8cccedd..d8c0856 100644
--- a/system/net/1.7.5/src/net inserter	
+++ b/system/net/1.7.5/src/net inserter	
@@ -1,6 +1,6 @@
 
-{ Inserter f�r EUMEL - Netz - Software;                         04.12.83
-  ber�cksichtigt EUMEL - Versionen 1.7.3 und 1.7.5, sowie Multi / Single } 
+{ Inserter für EUMEL - Netz - Software;                         04.12.83
+  berücksichtigt EUMEL - Versionen 1.7.3 und 1.7.5, sowie Multi / Single } 
  
  
 INT VAR version :: id (0), cy :: 4;
diff --git a/system/net/1.7.5/src/net manager-M b/system/net/1.7.5/src/net manager-M
index 0383211..bf64a68 100644
--- a/system/net/1.7.5/src/net manager-M	
+++ b/system/net/1.7.5/src/net manager-M	
@@ -14,7 +14,7 @@ LET
     erase code = 14,
     report code = 99, 
 
-    (* Typen von Kommunikationsstr�men *)
+    (* Typen von Kommunikationsströmen *)
 
     send wait = 0,
     zustellung = 1,
@@ -140,7 +140,7 @@ netz info und steuerung:
     IF scode = list code THEN   list status 
   ELIF scode = erase code THEN strom beenden
   ELIF scode = freigabe code AND stask = father THEN freigabelevel 
-  ELSE forget (dr); ablehnen ("nicht m�glich") 
+  ELSE forget (dr); ablehnen ("nicht möglich") 
   FI. 
  
 freigabelevel: 
@@ -165,7 +165,7 @@ strom beenden:
     stask = father OR stask = vx.quelle OR stask = vx.ziel
   THEN
     loeschen
-  ELSE ablehnen ("Nur Empf�nger/Absender darf l�schen")
+  ELSE ablehnen ("Nur Empfänger/Absender darf löschen")
   FI
   FI. 
  
@@ -227,7 +227,7 @@ sendeeintrag: vx.rechnernummern DIV 256 = station(myself) .
 sendeinfo: 
   IF v.typ = call im wait THEN put (f,"erwartet Antwort von")
   ELIF v.typ = call in zustellung THEN put (f,"Ziel busy. Zielstation:") 
-  ELIF v.typ = call im abbruch THEN put (f,"wird gel�scht bei Antwort von") 
+  ELIF v.typ = call im abbruch THEN put (f,"wird gelöscht bei Antwort von") 
   ELSE put (f,"sendet an") 
   FI; 
   put (f,vx.rechnernummernMOD256); 
@@ -237,7 +237,7 @@ empfangsinfo:
   IF v.typ = zustellung THEN 
   put (f,"Sendung noch nicht zustellbar")
   ELSE
-  put (f,"empf�ngt von");
+  put (f,"empfängt von");
   put (f,vx.rechnernummernDIV256); 
   FI;
   put (f,". Empfaenger ist """+nam (vx.ziel)+""".").
@@ -290,7 +290,7 @@ PROC net io:
 END PROC net io; 
 
 put ("Netzkanalnummer:"); get (c);line;
-IF yes ("Ist der Netzkanal mit Flu�kontrolle verdrahtet") THEN
+IF yes ("Ist der Netzkanal mit Flußkontrolle verdrahtet") THEN
    quit max := 10
 ELSE
    quit max := 3
-- 
cgit v1.2.3