download PDF (41MB) - Mike Schilli

Editorerweiterung fur den HP41CX
Trotz allerTrivialitat, hier meine Editorer
weiterung:
XEQ "EDFL" (Oder ASN "EDFL" 15,
LN),beim Prompt 'EDFL?' kann mit R/S
die aktuelle Datei verwendet werden, bzw.
die zu bearbeitende Datei eingegeben
werden. Damit befindet man sich im Editor
(wie mit ED). Nach Betatigen der ON-
Taste erscheint dann ein Eingabemenii
inder Form'R:D,I,M,S?'Oder'C:D,I,M,S
?'. Das erste Zeichen (R oder C) zeigt
den momentanen Modus an (Record oder
Character). Zu diesem Zeitpunkt sind
folgende Tasten giiltig:
01LBL "EDFL"
02 CF 00
03 "EDFL?"
04 XEQ 03
OS FC?C 23
06 CLA
07LBL 00
08 ED
09LBL 01
10 "R"
11 FS? 00
12 "C"
13 ": D,I,M,S ?"
14 AVIEW
15 GETKEY
16 CLD
17 CLA
18 XEQ IND X
19 CLA
20 GTO 00
21LBL 03
22 CF 23
23 AON
24 STOP
25 AOFF
26 RTN
27LBL 14
28 FS? 00
29 GTO 16
30 DELREC
31 RTN
32LBL 16
33 "DC CNT?"
31 PROMPT
35 DELCHR
36 RTN
37LBL 24
38 FS? 00
39 GTO 26
40 "IR TXT?"
41 XEQ 03
42 FC?C 23
43 RTN
44 INSREC
45 GETREC
46 GTO 24
47LBL 26
48 "IC CHRS?"
49 XEQ 03
50 INSCHR
51 RTN
52LBL 34
53 FC?C 00
54 SF 00
55 GTO 01
56LBL 53
57 RCLPT
58 "SEARCH TXT?'
59 XEQ 03
60 POSFL
61 RTN
62LBL 15
63 OFF
64 END
Computerclub Deutschland e.V.
-M schaltet zwischen R(ecord) und
C(haracter) Modus hin und her
-D loscht eine Zeile oder X-Zeichen (je
nach Modus)
-I fugt Zeilen oder Zeichen ein
-S SuchtZeichenkette(abder momen
tanen Position)
-E schaltet den Rechner aus (Exit)
Falls keine Taste gedruckt wird, kehrt
das Programm wieder in den Editor zu
riick. Durch dieses Programm kann das
Antwortverhalten bei langeren Dateien
verbessert werden.
Betriebsmodus (CF 00 Zeile, SF 00 Zeichen)
Prompt fur Dateiname
Abfrage Dateiname
falls R/S aktuelle Datei
Hauptschleife:
Editoraufruf
R(ecord) mode
bzw. C(haracter) mode
"(-:..." append!
Auswahl 'Delete, Insert, Mode, Search, Exit'
Abfrage, 0 falls kein Tastendruck
Abarbeiten der Routine I'C -> LBL 13)
-> Hauptschleife
Zeicheneingabe:
Alpha-Flag
Eingabe in Alpha Mode
Taste 'D'
falls Zeichenmode
weiter mit 16
losche Record
Zeichen loschen:
Abfrage Zeichenanzahl
losche X Zeichen
Taste 'I'
falls Zeichenmode
weiter mit 26
Einlesen einer Zeile
falls nur 'R/S'
Ende Zeileneingabe
Einfugen Zeile
Uberspringe neue Zeile
nachste Zeile
Zeicheneingabe:
lese Zeichen
Einfugen
Taste 'M'
invertiere Flag 00
Taste 'S'
momentane Position
Eingabe Suchstring
Positionieren
Taste 'E'
Rechner aus
Andreas Huemer
Postfach 115
A-5600 St.Johann / Pg
SERIE 40
UPLE ...
was war das denn gleich ???
In letzter Zeit tauchten viele Fra
gen zu einer sogenannten HP41-
Programmbibliothek auf, womit
oft Fragen zu der UPLE gemeint
waren, aber kurz einmal die Historie
dieser 4 Buchstaben:
UPLE ist die Abkurzung fiir
Users Program Library Europe,
was nichts anderes heiBt als Benutzer
Programmbibliothek Europa.
Diese Programmbibliothek, zur
Unterstutzung der programmierbaren
Taschenrechner HP67/97
und HP34 Ende der 70-er Jahre in
Genf gegriindet, wurde von Mitarbeitern
von Hewlett Packard organisiert
und gepflegt. Ab 1979 kam
dann ja der damals wie heute
noch revolutionise Taschencom
puter, oder von seiner GroBe her
betrachtet, Taschenrechner HP41
auf den Markt und stellte alles bis
dahin dagewesene schnell in den
Schatten. Es entstanden binnen
kiirzester Zeit unzahlige Losungen
fur alle Fachgebiete.
Um das Jahr 1984 herum kam bei
Hewlett Packard wohl die Erkenntnis
zum tragen, daB es billiger
sei, wenn sich lokale Clubs um
die Fragen und Sorgen der An
wender kummern, ebenso um die
Veroffentlichung der entstehenden
anwendungsspezifischen Losun
gen auf alien Gebieten der Wissenschaft.
Man beschloB die Auflosung
dieser Programmbiblio
thek und hatte wahrscheinlich alle
Programme mitsamt der Doku
mentation in den Genfer See gekippt,
wenn sich der CCD damals
nicht in einer Eilaktion dazu entschlossen
hatte das gesamte Ma
terial nach Frankfurt zu karren.
Zuerst nur zwischengelagert wur
de dann der gesamte Bestand an
HP41 Programmen komplett
durchforstet und in eine Datenbank
eingetragen, da wir festgestellt
hatten, daB man den zur Zeit
der Auflosung dieser Bibliothek
herausgegebenen Katalog eigent-
Fortsetzung auf Seite 48
PRISMA 6/89 37