summaryrefslogtreecommitdiff
path: root/system/shard-x86-at/7/src/PATCH.ELA
diff options
context:
space:
mode:
Diffstat (limited to 'system/shard-x86-at/7/src/PATCH.ELA')
-rw-r--r--system/shard-x86-at/7/src/PATCH.ELA38
1 files changed, 19 insertions, 19 deletions
diff --git a/system/shard-x86-at/7/src/PATCH.ELA b/system/shard-x86-at/7/src/PATCH.ELA
index 539a674..c3f34f1 100644
--- a/system/shard-x86-at/7/src/PATCH.ELA
+++ b/system/shard-x86-at/7/src/PATCH.ELA
@@ -2,28 +2,28 @@
- Vortest/Speichertest
- Keyboard Repeatfrequenz
- Baudrates 19200/38400 werden angeboten
- - Refresh-Intervall „nderbar (bis zu 5% mehr Leistung)
+ - Refresh-Intervall änderbar (bis zu 5% mehr Leistung)
- control (-3,,,r) liefert im Highbyte das Modemstatusregister (RI etc.)
- control (-5,8,,r) geht in ruc-Bios-Graphikmodus (mit Textausgabe:
Text mit 'out', 'put' etc. schreiben, cursor (x, y) mit y:1..43,
- Codes ""4"", ""5"", Scroll l”schen jetzt vernnftig (Attribut von 7 auf
- 0 ge„ndert),
+ Codes ""4"", ""5"", Scroll löschen jetzt vernünftig (Attribut von 7 auf
+ 0 geändert),
Achtung: getcursor (x, y) im 'begin plot' einbauen.
cursor (x,y) im 'end plot' einbauen, wegen y<25 im Textmodus!)
- - Kanal 30 (Archiv 1) jetzt fr MF-Laufwerke (5.25" bzw. 3.5"), Default-
+ - Kanal 30 (Archiv 1) jetzt für MF-Laufwerke (5.25" bzw. 3.5"), Default-
Size ist 1.2MB (Achtung bei Formatieren von 3.5"-Floppys!)
- - Mit control (-10/-11,...) ("stop", "weiter") wird an den RS232-Kan„len
+ - Mit control (-10/-11,...) ("stop", "weiter") wird an den RS232-Kanälen
jetzt nicht nur RTS active/inactive gesetzt sondern auch DTR (Modem).
- An Kanal 32:
Mit control (-3, x, mcr*32+kanal, r) (mcr ist Modemcontrolregister Wert,
- x egal) k”nnen RTS, DTR explizit gesetzt werden.
+ x egal) können RTS, DTR explizit gesetzt werden.
- id (6) > 0 : SHard wurde gepatcht.
Michael Staubermann, Version 2: 09.10.87, Keyboardrepeat, Baudrates
Version 3: 04.11.87, Graphikcursor & Graphikmodi
Version 3.1: 20.11.87, >32MB Partitionen f. M+
Version 4: 04.12.87, TX-Interrupt restart
- Version 4.1: 10.01.88, Refresh-Intervall „nderbar
+ Version 4.1: 10.01.88, Refresh-Intervall änderbar
Version 5: 21.02.88, Kanal 30 1.2MB-Format (3.5")
Version 5.1: 22.02.88,
*)
@@ -61,7 +61,7 @@ INT OP & (TEXT CONST hex) :
THEN h := h OR (c-55)
ELIF c >= 48 AND c <= 57
THEN h := h OR (c-48)
- ELSE errorstop ("OP &: ungltiges Hexdigit ("+code(c)+")")
+ ELSE errorstop ("OP &: ungültiges Hexdigit ("+code(c)+")")
FI ;
PER ;
h
@@ -121,7 +121,7 @@ PROC poken (INT CONST shard adr, TEXT CONST str) :
THEN poke2 (adr, &subtext (str, i, i+3)) ;
i INCR 5 ;
adr INCR 2
- ELSE errorstop ("poken: Zuviele zusammenh„ngende Bytes")
+ ELSE errorstop ("poken: Zuviele zusammenhängende Bytes")
FI ;
PER ;
ENDPROC poken ;
@@ -175,7 +175,7 @@ PROC get partition :
putline ("Partionsanfang: " +
text ((partition start 1+1.0)/2.0, 6, 0) + " KB = Cylinder " +
text (int ((partition start 1+1.0)/real(secs)/real(heads)))) ;
- putline ("Partionsgr”sse: " + text (partition size/2.0, 6, 0) + " KB = " +
+ putline ("Partionsgrösse: " + text (partition size/2.0, 6, 0) + " KB = " +
text (int (partition size/real(secs)/real(heads))) + " Cylinder");
put ("Diese Partition ist") ;
IF NOT partition active
@@ -227,7 +227,7 @@ PROC write shard :
FOR i FROM 1 UPTO shard bloecke REP
IF modified (i)
THEN IF session <> old session
- THEN errorstop ("RERUN w„hrend patch")
+ THEN errorstop ("RERUN während patch")
FI ;
blockout (setup channel, block (i), partition start1+real(i-1)) ;
modified (i) := FALSE
@@ -267,10 +267,10 @@ PROC patch shard :
patch dtr inactive ;
patch mcr set routine ;
patch archive 1 format ;
- IF yes ("Žnderungen permanent machen")
+ IF yes ("Änderungen permanent machen")
THEN write shard ;
- putline ("Žnderungen durchgefhrt, System neu booten.") ;
- ELSE putline ("Keine Žnderungen durchgefhrt.") ;
+ putline ("Änderungen durchgeführt, System neu booten.") ;
+ ELSE putline ("Keine Änderungen durchgeführt.") ;
FI .
check if patch possible :
@@ -290,7 +290,7 @@ mode: &"0556" .
id 6: &"055C" .
patch baudrate :
- putline ("Baudrates 50, 75 entfernt, 19200, 38400 eingefgt.") ;
+ putline ("Baudrates 50, 75 entfernt, 19200, 38400 eingefügt.") ;
poke2 (&"07E8", 1047) ; (* 3: 110 *)
poke2 (&"07EA", 857) ; (* 4: 134.5 *)
poke2 (&"07EC", 768) ; (* 5: 150 *)
@@ -323,7 +323,7 @@ patch baudrate :
patch id and mode :
poke2 (id6, patch version) ; (* Update Patch Version *)
- IF yes ("Soll ein Vortest durchgefhrt werden")
+ IF yes ("Soll ein Vortest durchgeführt werden")
THEN IF yes ("Soll ein Speichertest durchgefuehrt werden")
THEN poke2 (mode, 0)
ELSE poke2 (mode, 256)
@@ -381,7 +381,7 @@ patch refresh:
patch cursor maxima:
(* Es werden nur die Maxima bei CURSOR(,) veraendert, CLEOL, CLEOP,SCROLL
etc. arbeiten weiter mit 24 Zeilen, 80 Spalten *)
- (* CURSOR y:0..43, x:0..89 EUMEL l„sst allerdings nur 0..79 zu *)
+ (* CURSOR y:0..43, x:0..89 EUMEL lässt allerdings nur 0..79 zu *)
poke (&"0EFF", 43) ;
poke (&"0F16", 89) .
@@ -398,7 +398,7 @@ patch dtr inactive :
patch mcr set routine :
(*
- 0812: 20 Bytes zur Verfgung
+ 0812: 20 Bytes zur Verfügung
MOV DX,(DI+i8250_base)
ADD DX,i8250_mcr
MOV AL,BH ; Highbyte 2. IOCONTROL Parameter
@@ -415,7 +415,7 @@ patch archive 1 format :
putline (" 1: 360K (Standard/Doublestep)") ;
putline (" 2: 720K (Standard/Singlestep)") ;
putline (" 3: 1.2MB (Multifunction)") ;
- putline ("ESC: Nichts ver„ndern") ;
+ putline ("ESC: Nichts verändern") ;
put ("Typ:") ;
TEXT VAR t ;
REP inchar (t) UNTIL t >= "0" AND t <= "3" OR t = ""27"" PER ;