download PDF (25MB)

PRJSKIfl 

Computerclub Deutschland e.V.-Postfach 2129-6242 Kronberg 2 Prisma Herstellung-Limburger Str. 15-6242 Kronberg 2 

Marz 1987 Nr.2 D 2856 E 

Das ist der neue NEC MultiSpeed Laptop 

PC, ein IBM-kompatibler Portable PC. 

Sein "Herzstuck" ist ein schneller V30- 

Prozessor, der mit 4,77 oder 9,54 MHz getaktet 

wird. Mit 640 KB RAM, zwei seitlich 

eingebauten 3,5" Diskettenlaufwerken 

mit 720 KB und eingebauten Schnittstel 

len (seriell + parallel) ist der NEC Partable 

ein komplett ausgestatteter PC. 

Clubnachrichten 

Micro-Computer Messe 1987 

HP QuietJet Drucker 

Serie 70 

ADVKEY 

CMDSIZE 

Buchbesprechung 

HP-IL Konfigurationsabfrage 

Fehlermeldungen 

MASSLIB 

Serie 40 

Dezimal-Prompt 

DBL1 Genaue Division 

Barcodes plotten 

XSPLINE 

Mantisse 

LIST41 (mit HP-71) 

Kalenderdruck 

Leukozyten 

Harmonische Analyse 

und Synthese

Entschuldigung 

Trotz groGer Anstrengung sind wir zu spat mit 

diesem Heft. Das liegt an einer Umstellung 

der internen Organisation. Das nachste Heft 

(PRISMA 3/87) wird dann wieder eine Dop 

pelnummer, die punktlich zur Micro-Compu 

ter erscheinen soil. 

Alf-Norman Tietze 

Messe 

CDD-Messestand auf der 

MICRO-COMPUTER '87 

in Frankfurt vom 19. bis 

23. Mai 1987 

Stand Nr.: 4.1 A 24 

Auch dieses Jahr wird der CCD wieder auf der 

Frankfurter MICRO-COMPUTER Messe mit 

einem eigenen Stand vertreten sein. Diese 

Gelegenheit werden wir nutzen, um unseren 

Club einem breiten Publikum darzustellen. 

AuBerdem werden auch wieder viele interes 

sante Rechnersysteme und Programme auf 

unserem Messestand zum Anschauen und 

Ausprobieren zur Verfugung stehen. 

Das reicht vom HP-18 uber HP Serien 40,70, 

80 bis zu den Personal Xomputem mit CP/M 

und MS-DOS - und naturlich auch viele Peripheriegerate. 

Jetzt sind deshalb Eure Anregungen, Ideen 

und Vorschlage gefragt, was wir auf dem 

Messestand alles bieten konnten oder soll 

ten. AuBerdem suchen wir auch interessierte 

Clubmitglieder, die auf unserem Messestand 

aktiv mitarbeiten. Selbstverstandlich mit einer 

entsprechenden Aufwandsentschadigung. 

Zuschriften, Ideen oder Zusagen bitte an: 


ImSechholdeMOO 

6000 Frankfurt/M. 80 

©069/393559 

Box:GE01:A.N.Tietze 

Wie immer dient der Messestand auch als 

"heiBer" Treffpunkt zum Erfahrungs- und In 

formationsaustausch, weil dort Anwender 

aus vielen Bereichen anzutreffen sein wer 

den. 

Als Nebenprogramm wird - wie in den letzten 

beiden Jahren auch -eine Vortragsveranstaltung 

angeboten. Dafur werden Vortragende 

gesucht, die ein kleines Referat (max. 1 Stun 

de) uber eine Rechneranwendung oder iiber 

eine bestimmte Hardware halten. Der Tag da 

fiir (ein Tag) ist noch nicht festgelegt. 

Mit der Hoffnung auf eine rege Teilnahme und 

somit auch auf einen guten Erfolg 


87.2.02 

CCD - Computerclub Deutschland e.V. / Prisma 


Wichtige Clubadressen: 

1. Vorsitzender 

PRISMA-Nachsendedienst 

Peter Kiefer (958) 

Rolimarktgasse 11 

7798 Pfullendori 

#07552/7234 

2.Vorsitzender 

Folosatz "PRISMA" 

Roll Hansmann (500) 

Limburger StraBe 15 

6242 Kronberg II 

Schatzmeister 

Mitgliederverwaltung 

Dieter Wolf (1734) 

PulzerstraBe 29 

6000 Frankfurt 90 

• 069/765912 

1. Beisitzer 

HP-41 ..Synthetik" 

Andreas Marktscheffel (I 

Nachligallenweg 8 

6246 Glashutten 

2. Beisitzer 

WillriedK6tz(1637) 

Im Aehlemaar 20 

5060 Bergisch Gladbach 

Programm-Bibliothek HP-41 

Klaus Tannenberger (3004) 

Ober-Ramstadter-Str. 5 

6107ReinheimS 

406162 84797 


Henry Schimmer (786) 

Homburger Landstr. 63 


Serie 70 Service 


Michael Hartmann (380) 

Wendelsgrund 13 

6690 St. Wendel 


Klaus Kaiser (1661) 

Mainzer Landstr. 561 

6230 Frankfurt am Main 8 

-3 069/397852 

CP/M-80 Service 

Werner Dworak (607) 

Allewind 51 

7900Ulm 

807304/3274 

MS-DOS Service 

Alex Wolf (1734jr.) 

PUtzerstraBe 29 


a 069/765912 

"Hardware 41" 

WinfriedMaschke(413) 

Ursulakloster 4 

5000 Koln 1 

510221/131297 

"Grabau GR7 Interface" 

Holger von Stilllried 

Alsterkrugchaussee 212 

2000 Hamburg 60 

9040 5116346 

"E-Technik" 

Werner Meschede (2670) 

SorpestraBe 4 

5788 Siedlingshausen 

"Geowissenschaften" 

Alf-Norman Tietze (1909) 

Thudichumstr. 14 


8069 7893995 

"Mathematik" 

Andreas Wolpers (349) 

SteinslraBe 15 

7500 Karlsruhe 

"Vermessungswesen" 

Uirich Kulle (2719) 

Schnuckentrift 14 

3000 Hannover 51 

S 0511 '6042728 

Ortsgruppe Berlin 

Jorg Warmuth (79) 

WartburgstraBe 17 

1000 Berlin 62 

Ortsgruppe Cuxhaven 

Dennis Fdh (2374) 

Drangstweg 1 

2190Cuxhaven 

804721 24129 

Ortsgruppe Hamburg 

Alfred Czaya (2225) 

An der Bahn 1 

2061 Sulleld 

9 040 433668 (Mo.-Do. abends) 

Horst Ziegler(1361) 

Schiislerweg 18 b 


9 040 7905672 

Ortsgruppe Hannover 

Rainer Maier (1708) 

TiergartenstraBe 56 

3000 Hannover 71 

9 0511 517702 

Ortsgruppe Karlsruhe 

Stefan Schwall (1695) 

RappenwdrtstraBe 42 

7500 Karlsruhe 21 

90721 576756 

Ortsgruppe Koln 

Frank Ortmann (1089) 

OkerstraBe 24 

5090 Leverkusen 1 

Ortsgruppe Rhein-Main 

Andreas Eschmann (2289) 

LahnstraBe 2 

6096 Raunheim 

9 06142'46642 

CCD-Beirat 

Werner Dworak (607) 

Allewind 51 

7900 Ulm 

@ 07304 / 3274 priv., 0731 / 392-2689 dienstl. 

Prof. Dr. Wolfgang Fritz (125) 

KronenstraBe 34 

7500 Karlsruhe 

Dr. Max Hahn (983) 

HumboldtstraBelO 

4044 Kaarst 1 

!® 02101 / 64580 priv., 0211 / 3112533 dienstl. 

Michael Hartmann (380) 

Wendelsgrund 13 

6690 St. Wendel 

Erich H. Klee (1170) 

Ruhrallee 8 

4300 Essen 1 

Uirich Schwaderlap (438) 

An den Berken 34 

5840 Schwerte 6 

Eduard Wulff (556) 

Schliiterstr. 62 


8 040/459765 

PHJSKlfl 

Impressum 

Titel: 

PRISMA 

Herausgeber: 

CCD-Computerclub Deutschland e.V. 

Sitz: 

Limburger Str. 15, 6242 Kronberg II 

Verantwortlicher Redakteur: 

Rolf Hansmann 

Redakteure: 

Hans Jurgen Hubner 

Martin Meyer 

Henry Schimmer 


Herstellung: 

Rolf Hansmann 

Manuskripte: 

Manuskripte werden gerne von der Redaktion angenom 

men. Honorare werden in der Regel nicht gezahlt. Die Zu 

stimmung des Verfassers zum Abdruck wird vorausgesetzt. 

Fur alle Veroffentlichungen wird weder durch den Verein 

noch durch seine Mitglieder eine irgendwie geartete Garan 

tie ubernommen. 

Anzeigenpreise: 

Es gilt unsere Anzeigenpreisliste 2 vom Juni 1982. 

Erscheinungsweise: 

PRISMA erscheint 9 bis 10 mai im Jahr. 

Auflage: 

3000 

Bezug: 

PRISMA wird alien Mitgliedern des CCD ohne Anforderung 

ubersandt. Ein Anspruch auf eine Mindestzahl von Ausga 

ben besteht nicht. Der Bezugspreis ist im Mitgliedsbeitrag 

enthalten. 

Urheberrecht: 

Alle Rechte, auch Ubersetzung, vorbehalten. Reproduktionen 

gleich welcher Art - auch ausschnittsweise - nur mit 

schriftlicher Genehmigung des CCD. Eine irgendwie 

geartete Gewahrleistung kann nicht ubernommen werden. 

Anschrift: 

Postfach 2129, 6242 Kronberg 2.


Wird der Taschencomputer durch den Per 

sonal Computer verdrangt? 

Mit dieser Ausarbeitung reagiere ich auf die 

Titelseite von PRISMA 7/85. Die Mitglieder 

wurden aufgefordert sich zu auBern, wie sich 

wohl der Strukturwandel des Computermarktes 

auf den CCD auswirkt. Da dieser Struktur 

wandel auf der fortschreitenden Verbreitung 

preisgiinstiger PC's beruht, mochte ich eine 

Lanze fur den Taschencomputer brechen und 

dies naher begrunden. 

1977, also lange vor dem allgemeinen Vordringen 

der PC's, habe ich als einer der Vie 

len fur die heutige Berufswelt typischen Spe 

zialisten nach ersten privaten Erfahrungen 

schon bald damit begonnen den HP 67 und 

spater den HP 41 bei meiner taglichen Arbeit 

zu verwenden. Mein Spezialgebiet waren 

Verpackungen aus Polystyrolschaumstoff 

(Styropor). Nach und nach entstand eine Pro 

grammsammlung, die mein und meiner nach 

sten Kollegen gesamtes Arbeitsgebiet umfaBt. 

Bei Programmen fur solche sehr spezielle Arbeitsgebiete 

geht es oft nicht allein darum, 

mathematische Ausdrucke in irgendeiner 

Form zu erfassen, sondern es mussen auch 

typische Arbeitsmethoden und Fragestellungen 

berucksichtigt werden. Uberdies mussen 

die Programme von Kollegen, z.B. auch von 

AuBendienstmitarbeitern, ohne langwierige 

Einweisung einfach und sicher benutzbar 

sein. Wie das gemeint ist, mochte ich am Bei 

spiel eines Programms zur Dimensionierung 

warmedammender Verpackungen verdeutlichen. 

Es gilt nach einer ersten Durchrechnung 

in einer Diskussion mit dem Interessen 

ten dessen urspriingliche Vorstellung mog 

lichst so zu korrigieren, daB eine fur beide Sei 

ten akzeptable Losung zustande kommt. Da 

zu sind meist eine Reihe von Berechnungen 

mit immer wieder geanderten EinfluBgroBen 

durchzufuhren. Ist schlieBlich ein Ergebnis 

gefunden, so ist oft noch von Interesse, wie 

sich die Verpackung wahrend de Versands 

verhalt, z.B. welcher zeitlicher Verlauf der 

Innentemperatur zu erwarten ist. 

Das Programm ist in drei Teile aufgeteilt. 

Teil 1 enthalt einen Eingabedialog zur Entgegenahme 

der ersten Vorstellungen eines Intersesenten 

und liefert ein vorlauufiges Er 

gebnis. 

Teil 2 erlaubt, unter Umstanden sogar wah 

rend einer telefonischen Diskussion mit dem 

Interessenten, die Anderung von ein oder 

mehreren der urspriinglich genannten Zahlenwerte 

und die sofortige Berechnung der 

Auswirkungen solcher Anderungen. 

Mit Teil 3 lassen sich die verschiedenen funktionalen 

Zusammenhange zwischen den 

wichtigsten EinfluBgroBen berechnen und, 

falls gewunscht, auch grafisch darstellen. 

Das Beispiel zeigt: 

a) Soweit auch PC-kompatible Software in al 

le Branchen vordringt - es wird wohl immer ei 

nen Bedarf an Software fiir sehr spezielle Arbeitsgebiete 

geben, die am besten vor Ort 

durch Sachbearbeiter eines solchen Gebietes 

erstellt wird. AuBenstehende Softwarespezialisten 

sind selten sofort zur Verfugung, 

auBerdem fehlt ihnen naturgemaB die erfor- 


derliche intime Sachkenntnis, die sich der 

Spezialist erst im Laufe der Zeit angeeignet 

hat. 

b) Wichtige Voraussetzung fiir eine problemnahe 

Programmierung ist eine einfache, von 

jedem Sachbearbeiter leicht zu lernende und 

einfach zu handhabende Programmierspra 

che. Die Sprache des HP 41 erfullt diese Vor 

aussetzung in hohem MaBe: fiir lineare Pro 

gramme braucht man bekanntlich nicht viel 

mehr als die Manipulationen, die vom Ta 

schenrechner her schon allgemein bekannt 

sind. Man kann solche einfachen, aber oft 

sehr niitzlichen Programme bei aufkommendem 

Rechenbedarf ahnlieh problemlos 

schreiben, wie man fruher den Rechenstab 

benutzte. 

c) Dank einer Vielfalt sehr leistungsfahiger 

Tastenfunktionen lassen sich auch recht ausgekliigelte 

Programme zusammenstellen. 

Doch sollte einer der Mitarbeiter eines Spezialistenteams 

dazu uber eingehendere Pro- 

grammiererfahrungen verfiigen. In dieser 

Hinsicht autark zu sein, ist besser als solche 

oft sehr spezielle Aufgaben, die manchmal 

auch nur kurzfristig, z.B. in Erprobungsphasen 

gebraucht werden, nach auBerhalb ge 

ben zu miissen. 

d) Ein nicht zu unterschatzender Vorteil ist, 

daB der Taschencomputer auch in Bespre- 

chungen innerhalb und auBerhalb eines Un 

ternehmens dabei sein.kann. Mit seiner Hilfe 

bleibt eine Verhandlung auch bei Fragen, die 

Berechnungen voraussetzen, auf das We 

sentliche konzentriert. 

Aus den genannten Grunden sollte bei der 

Weiterentwickiung des Taschencomputers 

nicht nur an Verbesserungen und Erweiterun 

gen der Funktionen gedacht werden; es ware 

mindestens ebenso wichtig, auch bei der Pro- 

grammierbarkeit noch groBere Benutzernahe 

anzustreben. 

Ahnlieh gut geeignet fiir die Anforderungen 

von Spezialgebieten ist auch der HP 71B. 

Trotz seiner geringen GroBe und seiner Mitgangigkeit 

ist er ein respektabler Computer. 

DaB er hauptsachlich BASIC spricht, setzt al 

lerdings eine eingehendere Lernphase vor 

aus. Das wird jedoch durch viele Programmierhilfen 

und leistungsfahige Funktionen 

weitgehend ausgeglichen. 

Wird der Taschenrechner durch den Personalcomputer 

verdrangt? 

Sehr nutzlich fur den genannten Verwendungsbereich 

ist es auch, daB alle gespei 

cherten Programme und Daten auch im ausgeschalteten 

Zustand erhalten bleiben. Das 

begiinstigt sofortige Betriebsbereitschaft 

nach Pausen oder Ortswechseln und erlaubt 

begonnene Programmierarbeiten uberall und 

jederzeit fortsetzen. 

Viele PC's sind dagegen hauptsachlich fiir die 

Verwendung konventioneller Software konzipiert; 

beim Programmieren tut man sich meist 

ziemlich schwer. Spezialprogramme mussen 

daher im allgemeinen von EDV-Spezialisten 

angefertigt werden, mit alien Nachteilen, die 

damit verbunden sind. 

Die weiterreichenden Fahigkeiten des PC 

zeigen die Grenzen des Taschencomputers: 

u.a. die Handhabung groBer Datenmengen, 

das Rechnen mit umfangreichen Gleichungssystemen 

und eine hohere Arbeitsgeschwindigkeit. 

Aus den bisherigen Ausfuhrungen folgt, daB 

Taschen- und Personalcomputer keine Konkurrenten 

sind. Sie haben vielmehr versehie 

dene, sich teilweise iiberlappende Anwendungsbereiche. 

Es ist daher falsch, den Ta 

schencomputer als ein uberholtes 'Spielzeug' 

abzuqualifizieren. Daswegen sollte auch der 

CCD weiterhin wesentliche Aktivitaten fur die 

se Gerate und die zugehorige Peripherie beibehalten. 

Wichtig sind mit Rucksicht auf die 

Vielen, die mit HP-Taschencomputern arbei 

ten, gut verstandlich abgefaBte Beschreibun 

gen von neuen, allgemein verwendbaren Programmtechniken 

und Programmen, sowie 

das Aufzeigen neuartiger Anwendungsmoglichkeiten. 

Solche neuen Ideen haben meiner 

Meinung nach sogar mit Blick auf die Praxis 

Vorrang vor Methoden fiir ausgefeilte Pro 

grammierung. Neue, fiir die Allgemeinheit 

niitzliche Themenbereiche ergeben sich 

auch durch die verschiedenen Peripheriegerate. 

So eignet sich z.B. das Digitalkassettenlaufwerk 

zum geordneten Speichern von Da 

ten, die routinemaBig aktualisiert und bei Be 

darf grafisch veranschaulicht oder weiterverarbeitet 

werden konnen. Weiterhin konnen 

Teile von Programmen, die die Computerkapazitat 

iiberschreiten, nacheinander -oder 

wiederholt programmgesteuert in den Com 

puter ubernommen werden. 

So gesehen gibt es zu den Taschencomputersystemen 

- in jiingster Zeit kommt noch der 

neue Business Consultant hinzu - eine Fiille 

von Stoff fur PRISMA. Da sich aber offen 

sichtlich viele Mitglieder des CCD bereits 

auch mit PC's beschaftigen, sollte man sich 

wohl dieser Realitat nicht verschlieBen. Es ist 

sicher gut, wenn in PRISMA auch andere all 

gemein interessierende Informatikthemen 

abgehandelt werden. Mich selbst interessie 

ren immer auch Grundlagen, z.B. Abhandlun 

gen uber neue Speichermedien und wie sie 

funktionieren oder uber Computersprachen 

etc. Der CCD verfugt hierfur in der Menge sei 

ner Mitglieder uber ein beachtliches Wissenspotential. 

Allerdings ist es sicher nicht jedermanns 

Sache, die muhevolle Arbeit des 

Schreibens auf sich zu nehmen. Vielleicht 

lassen sich praktikable Motivierungsmethoden 

finden? 

Dr. Ing. Walter Prankel 

Brunckstr. 21 

6710Frankenthal/Pfalz 

Projektgruppe GR7 

Eine neue Projektgruppe fiir Anwender des 

GRABAN GR7 Video-Controllers ist ins "Le 

ben gerufen" worden. Sinn und Zweck dieser 

Einrichtung ist es, als Anlaufstelle fur Verbesserungsvorschlage, 

Anregungen und auch 

zur "Fehleraufspuhrung" fiir dieses plotterkompatible 

IL-Videoiinterface zu dienen. Die 

Anschrift lautet: 

Holger von Stillfried 

(siehe Datenbank) 

.END. 

87.2.03

Clubborse 

Verkaufe: Grabau GR7 IL-Version f. 990,-DM. 

Manfred Hammer, Oranienstr. 42, 6200 Wiesbaden, 

©06121/375294 

Verkaufe HP-416 f. 220,-DM, Q-M-M f. 100,-DM, X-F-M f. 

100,-DM, T-M f. 100,-DM, M-M f. 100,-DM. 

»02521/7819ab 19.00. 

Verkaufe: HP 41 CV f. 320,-DM, HP41 CX f. 545,-, IL-Drive f. 

820,-DM, IL-Drucker f. 750,-DM, Kartenleser f. 380,-DM, 

Bar-Code-Leser f. 230,-DM, Akku-Einsatz - Ladegerat f. 

90,-DM, Plotter-Rom f. 130,-DM, Surveying Pac f. 80,-DM, 

Machine Design Pac f. 90,-DM, Advantage Rom f. 130,-DM, 

X-Function-Mod. f. 120,-DM, TIME-Mod. f. 100,-, Standart 

Mod. f. 28,-DM, Statistik f. 80,-DM, Math/Stat (org.HP) f. 

150,-DM, Finanz Pac. f. 80,-DM u.a.m. 

Bucher fiir HP 41: - Heidermann Verlag alle 50 % Neupreis, - 

Vieweg Verlag alle 50 % Neupreis 

©0711/5300807 ab 18.00 Oder 07121/320156, tagsuber 

©07151/142838, Frank Lehmann 

AECROM zu verkaufen fur 200,-DM. 

Martin Meyer, ©06196/23013 abends, ©06196/87-2051 

tagsuber 

Suche vier Interessenten fur das CCD-Modul fiir den HP-41: 

zusammen konnten wir eine Sammelbestellung machen. 

Pro CCD-Modul 224,-DM + Mwst. + Porto = 260,-DM. 

Klaus-Jochen Sympher, Essenweinstr. 35,7500 Karlsru 

he 1, S0721/617296 

Grabau GR7 fur 950,-DM zu verkaufen, auch Tausch gegen 

Pac Screen (V 1.1 A) plus 250,-DM Wertausgleich moglich. 

M. Hammer (2743), Oranienstr. 42, 6200 Wiesbaden, 

©06121/375294 

Verkaufe: HP 9114A Diskettenlaufwerk mit W&W Netzteil 

(fiir Dauerbetrieb) zusammen f. 950,-DM. 

Personal Computer ZENITH Z-148 College PC mit 640 kB 

RAM und 10 MB Festplatte, 12" Monitor berstein, DOS 3.1, 

GWBASIC, Original deutsche Handbiicher, kompl. f. 2750,- 

DM. 

E.H. Klee, S0201 /263045. 

Verkaufe Matrixdrucker CITOH Riteman F+ (Super): hori 

zontaler Papierweg (daher auch fiir Karten etc.), Schubtraktor, 

sehr kompaktes Design, 80/132 Zeichen, 105 eps, NLQ, 

Proportionalschrift, Hoch-/Tiefstellung etc.: komplett mit 2K 

und 8K Puffer-RAM, alten (EPSON FX80) und neuen (FX80 

und IBM/ATARI ST) EPROMs, 3 Farbbandern, neuem Ersatz-Druckkopf, 

Original-Manuals und -Verpackung. 

Noch ein Protosystem fur HP-41 zu verkaufen: Controller, 

Coder und EPROM-Box fur 300,-DM. 

Michael Gehret, Silcherstr. 15, D-8944 Gronenbach 

Verkaufe zum Mitnahmepreis: 

Osborne 1.1 mit Software 

Zenith Monitor 

HP-75 VISICALC 

HP-75 Communications pac 

HP-74 Textformater 

Magnetkarten fiir HP-75 

Dipl. Ing. E. Barchewitz,(228) ©08031 /92218 bon 8-18 Uhr 

Verkaufe: Magnetkartenleser HP 82104A, Barcodeleser HP 

32153A HP71, HP IL-82401A, Pac-Screen, Sanjo-Monitor f. 

(4112,-DM), zum Gebot, kompl. mit Dokumentation. 

Gunter Weber, 6333 Braunfels, Wiesenstr. 16, ©06472/ 

7795 

Verkaufe: 32 KByte Rambox von W&W inkl. DAVID-Assembler 

auf Cassette fiir nur noch 1000,-DM. HP 82162 A IL- 

Thermodrucker fur 750,-DM. 

A. Christochowitz, Uferstr. 12, 3016 Seelze 2, ©0511/ 

407335, So-Do ab 18.00 Uhr. 

Verkaufe: HP-71 B, Forth/Assebler Modul mit Handbuch, 

Software IDS Vol. I,II,111, Hardware IDS, IL IDS, Forth/Asse 

mbler-IMS, Assembler IDS. zusammen fur 2000,-DM und 

Thermodrucker HP-82143A mit 8 Rollen Thermopapier fur 

450,-DM. Tastenfeldschablonen fur HP-41, Stuck 2,-DM. 

Julius Graf, Ulmenliet 9, 2050 Hamburg 80, ©040/724 50 

53 

Verkaufe Forth/Assembler-Modul (82441 A) und Buch "Dis 

cover Forth" (engl.). 

Suche IL-Konverter oder GPIO-lnterface. 

Heiko Schmale, Bunde, ©05223/14957 

87.2.04 


Verkaufe HP-75 mit Text-Formatter Modul f. 950,-DM, 

ThinkJet (IL) Drucker f. 750,-DM. sowie Cassettenlaufwerk f. 

950,-DM jeweils komplett mit Handbuchern und samtlichem 

Zubehor. 

Stefan Schmidt (2437), Schillerstr. 24, 8972 Sonthofen, 

1808321/4794 

HP41-Zubehbr: CCD-Modul f. 250,-DM, Barcodeleser (HP 

82153 A) f. 230,-DM, HP IL-Modul (HP 82160 A) f.230,-DM, 

Structural-Analysis-Modul (HP 41-15021) f. 90,-DM, 3*40 

Orig. Magnetkarten mit Kartentasche f. 30,-DM komplett mit 

Handbuchern, Kurzanleitungen und Overlays, alles in sehr 

gutem Zustand. 

-Wolfgang Dittrich, Jodephinenstr.4, 4630 Bochum 1, 

©0234/590547 mogl. zw. 17.00 und 19.00 Uhr. 

Verkaufe: HP-IL GPIO-Converter 82166A (Zur Eingliede- 

rung externer, vielfaltiger Peripherie in die INTERFACE- 

LOOP.). Orig. verpackt. Neupreis etwa 600,-DM f. 250,- 

DM(VB) 

©06842) 2805, ab 18.00 Uhr. 

BerichtigungVerkaufe HP-41 (nicht HP-71) Dis.-Assembler-Listings. 

P.S.: Ortsgruppe Cuxhaven ist aufgelbst! 

Dennis Foh (2374),«04721/24129 

Verkaufe 2 PPC-Module mit Handbuchern, original verpackt, 

Preis VS. 

D.l. Weckmann, ©04742/658 

Verkaufe wegen Hobbyaufgabe: HP-41 CV + Magnetkarten 

leser + Matheu. Stat.-Modul, sowie PRISMA-Jahrg. 82-86 

und andere Literatur zusammen f. 750,-DM VB. 

A.Durholt, 80 50 Freising, ©08161-713788 (tagsuber) 

Verkaufe HP41CV mit Akku f. 300,-DM, Time-, XFunctions-, 

zwei XMemory-Module je f. 100,-DM, Kartenleser f. 225,-, 

Barcodeleser f. 200,-DM, IL-Drucker 82162A mit IL-Modul f. 

700,-DM. Bei Gesamtabnahme 1500,-DM. 

Claus Blank, ©07026/2668 ab 18.00 Uhr. 

Ich verkaufe 1 CCD-Modul (neuwertig) f. 300,-DM und 1 IL- 

Modul (noch nicht gebraucht) f. 150,-DM. 

(Heinz Golden, 4050 Monchengladbach 1, - 02161 

182581 

HP-41 Systemteile zu verkaufen: Drucker 82143A, Card 

Reader 82104A, Lesestift, Module: Mathe, Statistik, Finan 

cial, Standard, Home Management, Machine Design Pac, 

Advantage-ROM; Paperware: 8Solution Books, Festigkeitslehre 

u.v.a.m. 

©05373/6829 ab 17.00 Uhr. 

Verkaufe: IL-Drucker HP 82162 A f. 600,- inkl. 6 Rollen Pa 

pier; 8k-Modul f. HP 75 (neuwertig) f. 300,-DM. 

Volker Lang ©07138/8710 ab 18.00. 

Verkaufe: Magnetkartenleser HP 71 f. 320,-DM, 30 Magnet 

karten dazu f. 55,-DM, Barcodeleser HP41 f. 290,-DM. 

069/553520 

Verkaufe: 32 kByte RAM-Erweiterung (CMT) f. HP-71 B f. 

420,-DM neu und HP 82161 A Cassettenlaufwerk f. 800,-DM 

und HP 82162A Thermodrucker f. 650,-. 

Thomas Kern, ©02689/67250 

Verkaufe f. HP-41: IL-DEV Modul f. 120,-DM, Quad-Ram f. 

60,-DM, Synthetische Programmierung auf dem HP-41 f. 

10,-DM. The HP-IL System f. 20,-DM, Calculator Tips & Rou 

tines f. 20,-. 

©02931/14723 

Kartenleser f. HP-41 f. 300,-DM, TIME-Modul f. HP-41 f. 

150,-DM, Tl 99/ 4A mit Extended Basic und Spielen, Preis 

n.V. 

©02405/94203 oder 0241/33936 

Verkaufe wegen Systemwechsel folgende HP-IL-Komponenten: 

HP 75C + Text-Formatter + l:0 ROM + 30 Magnet 

karten + Deutsches + Engl. Handbuch + I/O Utilities + Gra 

phics; HP Digital Cassette Drive 82161A + 12 Kassetten + 2 

Akkus; HP ThinkJet + 2 Druckerpatronen. Preis pro KomponenteVB 

850,00 DM. 

Christoph Struder, Beethovenstr. 40, 5303 Bornheim- 

Merten, ©02227/6816 bis 22.00. 

HP 110 dt. mit Lotus 1-2-3, Termini, Memomaker, HPIink u.a. 

3900,-VB; fur Epson: HP IL-lnterfacekarte 380,-VB, HP IL-Comverter 

neu 380,-VB, HP 41 Advantage - ROM neu VB. 

Achim Bahr, Holzkirchener Str. 1,8029 ,Vget 

Verkaufe: Prisma 9/83, Key Notes 3/82, Standart-Sammlung, HP32 

E Bed.Handbuch, HP Allg. Handbuch gegen Gebot Viedeo/F 

82163 B (300,-), XF 82180 A (150,-), TIME 82182 A (150,-) Drucker 

82162 A (650,-) Kass. 82161 A (700,-), Netzteil 82066 (25,-) 

Suche: Defekte Akkus und Netzteile, Key Notes 1983 

Peter Winter, TEL: 089/883221 

Verkaufe: HP 82161A +10 HP-Kassetten 900,-DM, Module fur HP 

75: Textformatter 190,-, Visicalc 390,-, HP 75 Forth 390,-DM, Ver 

kauf wegen Systemwechsel. 

TEL: 06008/7235 ab 1800 Uhr. 

HP 110 (mit Memomaker, Lotus, Datacomm.) kompl. mit Handbu 

chern 2850,-DM ind. MwSt 

Jorg Gerhardt, TEL: 069«66 3999 

Veikaufe HP-71 Dis.-Assembler Listings (PPC), 55 Seiten, in stabilen 

RasSkordner, alle Seiten in Plastikfolien, fur30,-(Verrechnungs- 

scheck) 

Dennis Foh, Drangstweg 1,2190 Cuxhaven, TEL: 04721/24129 

nach Absprache (teiefonisch) 

Preis versteht sich zzgl. Porto 

An Weihnachten denken, teh verkaufe: Bucher, The Basic HP-71, 

35,-, Dienstprg. ffir den HP-41 (Vieweg), 10,-, HP-41 in der Praxis, 

20,-DM, Anwendeif-Bndbuch HP-11 (Vieweg), 20,-,Sprachinterface 

(fertig geb, s. PRISMA 84.9.31), 160,-, GAMES/STAND. Mod. (1 

Gehause), VB 90,-DM, Barcodel. HP 82153A, VB 220,-, Mem.Mod 

HP 82420A, VB 130,-, Netzteil HP 82066B, VB 25,-. 

TEL: 07131/484738 

Verkaufe fur HP 71B: ein univ. eben. Stabwei1

Quietjet Testbericht 

Ende November '86 stellte sich bei mir der Bedarf 

nach einem schnellen, leisen und moglichst universellen 

Drucker ein. Mir ware nach dem damaligen 

Wissensstand nur der Thinkjet mit Centronics- 

Schnittstelle ubriggeblieben, schon Wein und handlich 

ist er ja auch. Nur durch einen Zufall erfuhr ich 

von der bevorstehenden Auslieferung des QUIET 

JET bei einigen wenigen Handlem. Der QUIETJET 

ist die DIN A4 Ausfiihrung des QUIETJET PLUS, 

weitere Unterschiede habe ich bis jetzt nicht fest 

stellen konnen. Das rund 200 Seiten starke Hand 

buch ist auch mit QUIETJET SERIES betitelt, was 

dies untermauem wiirde. 

Der Drucker hat grab geschatzt das doppelte Volumen 

des Thinkjets, nicht ganz so tief wie dieser, da 

fiir 25% hoher und 25% breiter, rechts das oft vermiBte 

Handrad ffir den Papiervorschub. Links hin 

ten die Folientastatur mit einer Taste fiir ON UNE, 

eine fiir LF und FF, daneben eine Taste zur Um 

schaltung von drei Druckmodi, NLQ (Near Letter 

Quality), Draft (normaler Modus 80 Zeichen / Zeile) 

und Compressed (170 Zeichen / Zeile). Diese Ta 

ste habe ich beim Thinkjet otters schmerzlich vermiBt 

um z.B. fur Pascalcompilerausdiucke auf 

Compressed umschalten zu konnen, dort werden 

zusatzlich zum Text ja noch Zeilennummem und 

logische Tiefe mit ausgedruckt 

Die Papieizufuhr etfoigt uber einen frei verstellbaren 

Traktor, endlich kann man auch Etiketten drukken. 

Es gibt auch eine normale Gummiwalze, die 

bei Einzelblatteinzug (von oben!) durch einen Hebel 

an der linken Seite fest an das Blatt gedruckt 

wird, dadurch hat man eine sehr gute Fuhrung des 

Blattes. Die vordere Abdeckung ist so knapp konstruiert, 

das man das Blatt bei Endbspapier ohne 

deren Offnung abreiBen kann, sehr angenehm und 

sinnvoll. 

Offnen wir trotzdem die Frontabdeckung des Drukkens, 

so sehen wir den aus dem Thinkjet bekann 

ten Druckkopf, kurz gesagt, es ist derselbe. Rechts 

dahinter, etwas versenkt, sehen wir zwei DlP-Switches 

mit je 8 Schaltem; der eine von beiden ist fiir 

die serielle Schnittstelle (RS232 C) zustandig, der 

andere fiir die Defeaulteinstellungen von 

1. Carriage Return Definition (CR/LF oder nur CR) 

2. Zeichenabstand 10 cpi oder 12 cpi 

3. Perforationsskip an/aus 

4. Druckerkommandosatz: HP PCL (Printer Com 

mand Language) oder IBM 

5. Zeichensatz (13 Stiick). 

Schauen wir uns jetzt die Ruckseite unseres Drukkersan: 

Ganz rechts der Einschalter, einen Netzschalter 

gibt es leider nicht, das Netzteil ist mai wieder ex 

tern und steht im Wege herum, und ob man bei 

10W Leistung jedes Mai den Netzstecker zieht, 

daruber muB sich wohl jeder selbst War werden. 

Unks daneben finden wir die Netzteilbuchse, dann 

folgt eine 25 polige Sub-D Buchse (Standart) fur die 

serielle Schnittstelle (RS 232 C) und zum SchluB ei 

ne 36 polige Amphiendbuchse (Standart) fur die 

parallele Schnittstelle (Centronics). Ja, ihr habt rich 

tig gelesen, der QUIETJET hat wie auch der 

QUIETJET PLUS, sowohl eine serielle wie auch ei 

ne parallele Schnittstelle! Da es keine Moglichkeit 

der Umschaltung zwischen den beiden Schnittstel 

len gibt nehme ich an, daB man z.B. zwei Rechner 

ohne einen Umschalter gleichzeitig anschlieBen 

kann, ausprobiert habe ich es allerdings noch nicht 

Zum Namen "QUIET'JET ist noch anzumetken, 

daB man das QUIET (leise) nicht zu wortfch neh 

men darf, der Papiervorschub ist zwar im Gegen 

satz zum Thinkjet fast gerauschbs, der Druckkopftransport 

allerdings macht fur einen Tlntenstrahldrucker 

ein recht nervend sagendes Gerausch. 

So, Ende der Einleitung, kommen wir zu den tech 

nischen Details: 


Wie bereits erwahnt, besitzt der QUIETJET zwei 

versehiedene Druckerkommandomodi, 1. den HP- 

Mode, in dem die PCL gilt, und 2. den sogenannten 

Alternate Mode, in dem die IBM Escapesequenzen 

gelten; es werden damit also fast alle Rechner bzw. 

Softwarepakete unterstiitzt zB.: 

HP Vectra 

HP Serie 100 

HP Portable/Plus 

HP2392AundHP2394A 

HP 2393A und HP 2397A 

IBM PC/XT/AT und kompatible 

Applw lie, lie, II+, Macintosh 

(Atari xxxx, Commodore Amiga) 

Advance Write I,II,lil 

Apple works 

Framework II 

Lotus 1-2-3 

MS Word 

Microsoft Windows 

MultiMate 

Print Shop 

Symphony 

Volkswriter 

WordPerfect 

Wordstar (CPM/MS-DOS)Wordstar 2000 

Die aufgezahlten Rechner und Softwarepakete 

sind nicht vollzahlig, sie sollen nur Anhaltspunkte 

sein und sind im Handbuch mit gut 100 Seiten be 

schrieben (die Installation). 

Zu den beiden Betriebsmodi ist global nur zu sa 

gen, daB der HP Mode alle Features des Druckers 

nutzen kann, der Alternate Mode nur die Standartfeatures, 

die man von einem Drucker erwartet; da 

zu gleich mehr. 

Im folgenden werden die Features aufgelistet, da 

bei steht immer in welchem Mode sie zu gebrauchen 

sind (nichts= in beiden Modi moglich). Man 

kann aber auch z.B. einen anderen Zeichensatz 

wahlen und wieder zuriick in den Alternate Mode 

schalten, damit lassen sich im Alternate Mode Fea 

tures nutzen, die nicht in diesem vortianden sind, 

Vorraussetzung dafiir ist naturlich die Fahigkeit des 

Druckertreibers eines Textveratbeitungsprogramms 

mehrere Steuerzeichen pro Sonderzei 

chen zuzulassen, bei ganz alten Versionen ging 

das manchmal nicht 

(cpi= characters per inch, lpi= lines per inch) 

Die Features: 

Zeichendichte -> NORMAL= 10 oder 12 cpi, 

EXPANDED=5oder6cpi, 

COMPRESSED=21.3cpi, 

EXPANDED/COMPRESSE= 10.6 cpi. 

nur HP-Mode: Zeichendichte 5,6,10,10,6,12,21.3 

cpi 

Druckeimodus -> NLQ (Near Letter Quality) 

Draft Mode (=NORMAL) 

Fettdruck -> An/aus 

Unterstreichung -> An/aus 

Hoch/Tiefstellen -> Hochstellen, Tiefstellen, Normal. 

Wahl eines Zeichensatzes, nur HP-Mode: 

Default= DIP Switches Einstellung 

Roman 8 

ASCII 

Schwedisch 1 und 2 

IBM 8-US Oder EURO 

Franzosich 

Deutsch 

Britisch 

Spanisch 

Portugiesisch 

Norwegisch 

ISO IRV 

Italienisch 

Line Draw 

Schrifttyp, nur HP-Mode mit Zusatz ROM: 

Courier 

Gothik 

(So steht es im Handbuch, eine nahere Anfrage bei 

HP ergab allerdings, das dies eine miBverstandliche 

AuBerung darstellt, man kann fur groBere 

Sttickzahlen von HP spezielle ZeichensatzROMs 

anfertigen lassen, genaueres daruber wurde auch 

ich geme wissen). 

PerforationssWp -> An/aus 

Textlange, nur HP-Mode 

Zeilen pro Textfeld 

Seitenlange -> Zeilen pro Seite 

nur Alternate Mode: Inch pro Seite 

Zeilenabstand -> 6 Ipi 

8lpi 

nur Alternate Mode: 1 Zeile= 7 Rasterpunkte 

= xxx Rasterpunkte 

= n/288" (Advance) 

Druckkopfpositionierung -> Carriage Return 

Backspace 

Une Feed 

Form Feed 

nur HP-Mode: Half Une Feed 

Vertikale Punkt Reihe 

Absolute/relative vertikale Positionierung 

Horizontale Position 

Absolute/relative horizontale Positionierung 

Graphik -> Normale Dichte 96*96 Punkte/lnch 

Doppelte Dichte 192*96 PunWe/lnch 

nur HP-Mode: Vierfache Dichte 192*192 PunWe/ 

Inch 

Bidirektional/Unidirektional Druck -> An/Aus 

Zeilenumbruch -> An/Aus (nur HP-Mode) 

Display Function Mode -> An/Aus (nur HP-Mode) 

RESET 

Nur HP-Mode: Transparenter Datentransfer 

Selbsttest 

Automatisches Zeilenende 

Nach den vielen Daten mochte ich noch auf einzel 

ne Funktionen eingehen, die eventuell dem einen 

oder .anderen unbekannt sind. Jeder Druckmodus 

kann mit jedem gemischt werden, wie z.B. NLQ mit 

BOLD. Zum Near Letter Quality Modus ist im Prin 

zip zu sagen, daB man damit eine recht gute Korrespondenzqualitat 

erreichen kann. Die Auflosung im 

NLQ Mode ist 19*24 PunWe, sonst wind mit 19*12 

Punkten ein Zeichen dargestellt Was die Druckgeschwindigkeit 

betrifft, so dazu noch einige Daten: 

160 Zeichen/s in Draft mit 10 cpi 

192 Zeichen/s in Draft mit 12 cpi 

40 Zeichen/s in NLQ mit 10 cpi 

48 Zeichen/s in NLQ mit 12 cpi 

Der Druckkopf kann an jeden beliebigen Punkt auf 

dem Papier positioniert werden, man kann also 

auch ruckwarts! Dies ist fiir das Zeichnen von Diagrammen 

und Kurven auBerst vorteilhaft Die Gra- 

87.2.05

fik wird als Rastergrafik interpretiert, wie wir es beim 

Thinkjet gewohnt sind. AuBerdem ist diese Art der 

Grafikdarstellung heute uberall Standart. Der Un 

terschied zwischen Display Funktion Mode und 

transparentem Datentransfer liegt darin, daB man 

den Display Function Mode wieder ausschalten 

muB, im Befehl fiir den transparenten Datentrans 

fer ist die Anzahl der zu druckenden Zeichen ent 

halten, danach wird normal weiter gedruckt. Fiir 

diejenigen, die nicht wissen, was es mit dem Dis 

play Function Mode auf sich hat, sei gesagt, das in 

diesem Modus alle Steuerzeichen ausgedruckt 

werden anstatt als Kommando interpretiert zu wer 

den. Dies kann man verwenden, um Programmfehler 

aufeuspiiren, denn nur hier kann man die Escapesequenzen 

sehen. 

So, zu guter Lelzt noch ein delikates Feature: 

Der QUIETJET besitzt die Fahigkeit einzelne Zei 

chen seines Zeichensatzes durch Eigenkreationen 

zu ersetzen, ebenso ganze Zeichensatze zu iibernehmen. 

Da wahren wir allerdings wieder an ei 

nem Wehrmutstropfen angelangt im QUIETJET 

sind standartmaBig 2k RAM eingebaut, die, soweit 

nicht durch eigene Zeichen zur Halfte vetbraten, als 

Buffer benutzt werden. Man kann von HP einen 

RAM-Kit erwerben, der das RAM in 8k Schritten 

auf maximal 18k erweitert. Nur damit kann man ei 

nen kompletten 256-Zeichen NLQZeichensatz 

selbst kreieren, mit den 2k sind nur 4 Stiick moglich 

bzw. 9 Zeichen in Draft. Die kompletten 18k 

braucht man auch, wenn man einen ganzen Zei 

chensatz runteriaden will. Negativ anzumerken wa 

re an dieser Stelle noch, daB das Zeichensatz- 

ROM wie auch das zusatzliche FtAM evtl. von HP 

installiert werden muB, es gibt keine Steckmoglichkeit 

von auBen. 

So, ich hoffe damit alle Neugierigen befriedigt zu 

haben, ich personlich habe den Drucker z.B. iiber 

den HP-IL Konverter HP 82166A angeschlossen, 

das AnschluBschema fur das parallele Interface ist 

in dessen Handbuch ja beschrieben. Das GPIO-ln 

terface ist ebenfalls als Schnittstelle zwischen IL- 

Schleife und Drucker verwendbar, ebenso das se 

rielle Interface. Im Prinzip kann man den QUIET 

JET als gelungenen Nachfolger des THINKJET 

(mil paralleler/serieller Schnittstelle) bezeichnen, 

der Preis liegt etwa 10% hoher als beim THINK 

JET, was aber die Vielzahl niitzlicher Neuerungen 

mehr als wettmacht 

Martin Meyer (1000) 

Redaktion 

Nachsendedienst!!! 

Claudia Wilms/Peter Kiefer 

Rossmarktgasse 11 

7798 Pfullendorf 

Neue Kontonummer!!! 

Konto#: 33516006 

BLZ: 600 699 74 

Hohentenser Bank Pfullendorf 

Aktuelle Lagerbestande: 

1982 1.2.3/4.5/6.7.8.9.10/11.12 

1983 1.3.4.5.6.7.8.9.10 

1984 1.2.3.4.5.6.7.8 

1985 2.3.5.6.7.8!!!!!! 

1986 1.2.3.4.5.6.7 

87.2.06 


HANNOVER MESSE 

- Erfahrungsbericht - 

Im nachhinein ist es ja noch erstaunlich, daB 

ganze zwei HP28'er und ein HP18 einen Platz 

zwischen den HP Desktop Publishing, HP 

Design Centern und ahnlichem fanden. Das 

dadurch auch der Tarnung ausreichend geniige 

getan wurde, bewies sich prompt: 

Man lief glatt daran vorbei! 

Frage also: Schamt man sich der Taschen 

computer bei HP? 

Antwort: Wohl kaum! 

Und woran liegt es dann? 

Ich vermute, man/einer hat sich bei HP darauf 

zuriickbesonnen, daB das Geschaftsvolumen 

in dieser Sparte nicht geniigend am Gesamtgewinn 

beitragt und somit lieber Klein- und 

GroBunternehmen umwirbt! 

Nur-, lo lassen sich keine Zufallskunden 

(buyer by chance) (ich denke da an fruhere 

Kunden, die durch die STARKE Umlagerung 

des Taschencomputer-Standes auf eben die 

se aufmerksam wurden) und erst recht keine 

potentiellen Kunden (buyer by promotion) (je 

ne die noch ein paar (spez.) Fragen haben, 

weil die HP-Handler diese nicht beantworten 

konnten oder die entsprechende Gerateerweiterungen 

gar nicht erst hatten/haben!!!) 

gewinnen. 

Bei HP sollte man sich lieber darauf zuriickbesinnen, 

auch junge Kunden zu gewinnen 

UND zu halten; denn, wer einmal mit HP gear 

beitet hat, will auch spater mit HP-Rechnern 

arbeiten. Vielleicht kann der neueingestellte 

Supporter (siehe HP Bewerbungsanzeige in 

Prisma 1/87) da wieder einiges ins bessere 

Licht rucken... 

Der erste (noch oberflachliche) Eindruck des 

neuen HP28 war auch nur mittelmaBig: In der 

Tat sind 128k ROM ein beeindruckender 

Wert, doch die 1.5k RAM dagegen eine 

schlappe Leistung (HP erfindet den Kilobit- 

Chip neu). Bei der Taylorentwicklung kam be 

reits beim 5.Glied (xA5-Term) das k.o. durch 

'Insufficient Memory'. 

Wie soil der HP28 denn da erst die schwierigen 

Aufgaben losen, wo die einfacheren Auf 

gaben ja doch meist schnell im Kopf gelost 

werden (konnen)? 

Ist zu hoffen, daB diesbezuglich ein HP28-Erfahrungsbericht 

auch die Grenzen aufzeigt. 

Insgesamt machte HP auf der diesjahrigen 

Messe keinen iiberzeugenden Eindruck: 

Der Optimismus schien stark gedampft und 

ein paar Mitarbeiter sogar unmotiviert (z.B. 

stand einer bei einem abgesturzten (stand 

alone-) Rechner und erklarte nur, er sei schon 

wieder (wohl eher: noch immer) abgesturzt, 

anstatt das Gerat wieder zum Laufen zu brin 

gen). 

Auch von der bisherigen RISC Euphorie war 

nichts zu spuren. 

insgesamt leider nur Half Power. 

Heiko Schmale 

Steinmeisterstr. 8 

498 Btinde 

Hallo Freunde 

Ich mochte nicht versaumen, mich fur "Best of 

PRISMA" herzlich zu bedanken. Das Buch 

kann mithelfen, in ausgezeichneter Weise auf 

PRISMA und CCD aufmerksam zu machen 

und damit auch neue Mitglieder heranzufuhren. 

Es leistet aber auch Hilfestellung, indem 

es die interessantesten Programme - iiberarbeitet 

- zusammengefaBt vorstellt und zur Be 

schaftigung damit anregt. Es bedient also ein 

mal die Anwender, die die Programme ein 

fach iibemehmen und mit ihrem Zahlenmaterial 

laufen lassen, zum anderen regt es an, 

daruber nachzudenken, ob das eine oder an 

dere Programm nicht doch noch zu verbes 

sern ist oder gar noch Teilgebiete da sind, die 

bisher gar nicht beackert wurden. Beispiel: 

die Versicherungsmathematik. Oder die antilahme 

Anschriftenverwaltung groBer Bestande. 

Gelernt habe ich viel bisher. Angefangen da 

von, daB Magnetkarten von Euch nurzuriickgesandt 

werden, falls Ruckporto beiliegt. Dar 

auf konnte man ja auch im PRISMA aufmerk 

sam machen, und man miiBte nicht erst ein 

Buch drucken. Vielleicht konnte auch noch so 

viel in der Kasse sein, daB man den Autoren 

der Beitrage die Portokosten erlaBt (-.50 fur 

20 g Warensendung = ca. 90 Karten, und 

falls die Ecken abgeschnitten sind, noch ein 

paar mehr). 

Natiirlich gibt es hin und wieder trotz be 

stimmt peinlich genauer Durchsicht seitens 

der Herausgeber ein paar Unebenheiten; 

aber was soil's. Herzlichen Dank alien Betei 

ligten und ebensolchen Gltickwunsch fiir das 

Werk, das es bisher in dieser Form als Gemeinschaftsarbeit 

nicht gibt. 

Was ich nicht so schon finde, ist, daB immer 

wieder iiber das Thema "Programmklau" ge 

sprochen werden muB. Mit meinen Programmen, 

- die ich fiir mich erarbeitet habe - kann 

jeder machen, was er will, auch sie zu Geld 

machen. Ich habe aber Verstandnis dafur, 

wenn andere nicht so freiziigig denken. Man 

sollte dann zur Tat schreiten und den ewigen 

Kopierhaien auf die Finger klopfen. Schade 

aber ware es, wenn unsere Ideenschopfer ih 

re Produkte zuruckhielten und man nicht 

mehr an deren Kiirzung, Beschleunigung, 

Steigerung der Beniitzerbequemlichkeit usw. 

probieren konnte. 

Als ich Seite 67 las (Power-Letter) fiel mir 

eben ein Programm ein mit weniger Karten, 

dafur aber wahlweise positiv oder negativ, mit 

voller Ausnutzung der Papierbreite, mit alien 

127 Zeichen, Wiederholungsmoglichkeit des 

gleichen (24 Zeichen) Textes, mit Unterdriikkung 

eines unnotigen Zwischenraumes beim 

AnschluB an einen vorangegangenen Text 

und was man eigentlich 50 von einem Pro 

gramm erwartet. Z. B. keine 3 Zwischenraume 

zwischen den Zeichen, sondern nur einen. 

Happy programming! 

Dr. Hans Berghaus (1845) 

5000 Koln 80 

Stammheim, An der Joch 19

WStW SOFTWARE PRODUCTS 

fur den HP-41 

HP-41 CW TURBO 

HP-41 CY TURBO 

CCD-Modul Vers. IA 

CCD-Modul Vers. IB (fur HP-41 ab Bauj. 1985) 

Extended IL ROM 

AECROM 

Cv-PAK 

OILWELL1 Modul 

Hydraulics Pac 

HP-41 ASTRO ROM 

Surveyor's CO-OP 

Market Forecaster 

Auto Sales Modul 

PPC ROM 

ZENROM 

XQ2 Keyboard Modul 

TURBO-Umbau fur HP-41 und HP-71 

(Erhflhung der Rechnergeschwindigkeit) 

Modulein- bzw. zusammenbau 

auf die Umbauten gewahren wir 1 Jahr Garantie! 

32k RAMBOX im Kartenlesergehause 

(Speichererweiterungseinheit, Modulsimulator) 

RAMBOX II (64k Speichererweiterung) 

32k EPROMBOX im Kartenlesergehause 

(Festspeichererweiterung); ohne EPROMs 

Assembler-Handbuch (nur zur Verwendung mit der 

32k-Speichererweiterung; incl. Kassette od. Diskette) 

Quad Memory Modul fur HP-41 C 

CMT-200 Datenerfassungssystem 

CMT-300 Programmgesteuertes Digitalmultimeter 

CMT-EPROM-Module: 

4 kByte EPROM-Modul 



Brennkosten erstes Modul 

Brennkosten jedes weitere Modul 

HP-41 Custom ROMs (4k, 8k oder 16k) 

fur den HP-71 

W & W V R B F u n k t i o n s M o d u l D M 

P o c k e t S e c r e t a r y M o d u l D M 

Workbook71 Modul DM 

PRTLEX-File (mit Digitalcassette oder 3 1/2" Diskette) 

LEX-File zur Druckerunterstiitzung, fiir versehiedene 

Druckertypen erhaitlich DM 

DISP-LEX-File 

(mit Digitalcassette oder 3 1/2" Diskette) 

LEX-File zur Unterstutzung von Display-Einheiten 

( z . B . P a c k S c r e e n ) D M 

T e l e f o n v e r w a l t u n g s p r o g r a m m D M 

CMT-Spelcheterweltei-ungea im Modulschacht: 

CMT-71-32R; 32 kByte Speicherweiterungsmodul DM 

CMT-71-32KE; 32 kByte EPROM-Modul DM 

CMT-71-64K.E; 64 kByte EPROM-Modul DM 

Moduleinbau in den Rechner pro Modul DM 

CMT-71-Custom ROMs 32 kByte und 64 kByte 

HHP-Spekhererwelterungen lm Kartealeserschacllt: 

HHP-71 M/M 32k RAM 

( m i t L i t h i u m b a t t e r i e a u s g e s t a t t e t ) D M 


(mit Lithiumbatterie ausgestattet) 



HHP-71 M/M 32k EPROM-TrSger 

HHP-71 M/M 32k RAM/EPROM-Trager 

HHP-71 M/M 64k RAM/EPROM-Trager 

Brennkosten fur ein HP-71 Modul oder EPROM 

Brennkosten jedes weitere Modul oder EPROM 

Zenwand Barcodelesestift fiir den HP-71 

CMT-71 Wasserschutzgehause 

SERIALPLUS Gehause 

HP-71 LedergehSuse 

HP-71 Acrylstander 

fur den HP-75 

Assembler-Handbuch 

(mit Digitalcassette Oder 3 1/2" Diskette) 

CMT-EPROM-Modul 32k 

Brennkosten fiir ein HP-75 EPROM-Modul 

Preisliste 

Stand Marz 1987 

DM 1378,— 

DM 1499,— 

DM 249,— 

DM 399,— 

DM 319,— 

DM 319,— 

DM 729,— 

DM 589,- 

DM 269,— 

DM 349,- 

DM 779,— 

DM 759,- 

DM 559,— 

DM 259,— 

DM 309,— 

DM 319,- 

DM 136,80 

DM 91,20 

DM 595,- 

DM 949,— 

DM 398,— 

DM 79,80 

DM 198,— 

DM 659,— 

DM 929,— 

DM 342,-- 

DM 456,— 

DM 570,- 

DM 91,20 

DM 22,80 

859,- 

859,-- 

529,-- 

79,80 

79,80 

298,— 

545,- 

329,- 

449,— 

91,20 

545,— 

DM 879,— 

DM 1859,- 

DM 2228,— 

DM 259,— 

DM 819,- 

DM 1119,— 

DM 91,20 

DM 22,80 

DM 1179,— 

DM 499,— 

DM 1049,— 

DM 139,— 

DM 49,— 

DM 198,--* 

DM 619,— 

DM 159,— 

fur den HP-18C und HP-28C 

Holzstander 

HP-18C Alpha Overlay 

Serie 10 Zubehor 

Teakholz Tischstander 

Metallstander 

Holzstander 

Serie 10 Worksheets (50er Pack) 

Overlays (5er Pack) 

Lederhulle (braun, burgunder od. schwarz) 

HP-IL 

HP-11, RAM Disc 128k 

HP-IL RAM Disc 256k 

HP-IL RAM Disc 512k 

RS-232 Option ffir HP-IL RAM Disk 

Pac Screen Video-Interface (grafikfahig) 

GRABAU Video Interface (grafikfahig) 

Firmware HP-IL/RS232 Interface (wie HP 82164) 

Firmware HP-IL/RS232 Interface Accubetrieben 

Firmware Modem 300 Plus 

u-LOGGER W41 (Mess- und Steuerungssystem) 

IL-Karte fiir EPSON FX-80, FX-80+, FX-85 o.a. 

Netz-/Ladeteil fur Dikettenlaufwerk HP-9I14 

7IB-TALK Ubertragungsprogramm fiir PC 

Steinmetz & Brown Diskettenlaufwerk (einfach) 

Steinmetz & Brown Diskettenlaufwerk (doppel) 

HP-IL Cable Clips (6er Pack) 

Zubehor 

Zigarettenanziinder-Adapter 

Slander fiir HP-41,21,22,32,33,38 Acryl od. Holz 

Metallgestell fur HP-41 

Plastikhiillen fiir HP-41 (lOer Pack) 

UGLY Case fur HP41 

Weiche HP-41 Lederhulle 

Hartlederhiillen 

HP-41 (ohne Kartenleser) 

HP-41 (mit Kartenleser) 

HP Serie 10 Rechner 

HP-41 offene Ausfuhrung 

W&W 3 1/2" MF 2-DD Disketten fiir HP-9114 o.a. 

(lOer Pack) 

Leercassetten fiir HP-IL Laufwerk (5er Pack) 

HP-41 Overlays (schwarz oder beige, lOer Pack) 

HP-41 Staubschutz-Overlay 

HP-41 Automatikladegerat mit 8 Akkus 

Synthetic Quick Reference Guide 

Preise auf Anfrage 

WaW\ 

WStW SOFTWARE PRODUCTS 

DM 59,-- 

DM 8,99 

DM 159,— 

DM 29,— 

DM 42,— 

DM 39 — 

DM 19 — 

DM 69,— 

DM 919. 

DM 1308,— 

DM 2098,- 

DM 270,— 

DM 1540,— 

DM 1881,— 

DM 529,— 

DM 799,— 

DM 929,— 

DM 3716,40 

DM 560,— 

DM 158,— 

DM 189,— 

DM 1789,— 

DM 2489,— 

DM 8,90 

DM 79,-- 

DM 39,- 

DM 35,— 

DM 39,-- 

DM 69,-- 

DM 59,- 

DM 94,- 

DM 119,- 

DM 94,- 

DM 98,- 

DM 108,30 

DM 99,— 

DM 30,78 

DM 19,- 

DM 119,— 

DM 17,10* 

Preise incl. 14 (*7) % MwSt, zzgl. Porto und Verpackung 

Falls Ihr HP-Handler unsere Produkte nicht vorratig hat, richten 

Sie Ihre Bestellung bitte direkt an: 

W&W Software Products GmbH 

Odenthaler StraBe 214 

Postfach 

5060 Bergisch Gladbach 2 

Telefon 02202/85068 

Wir sind auch Hewlett-Packard Vertragshandler! Bei Bestellungen von 

HP-Produkten, deren Listenpreis gesamt DM 500,-- iibersteigt, ge 

wahren wir Ihnen 20% Rabatt auf den jeweils giiltigen Listenpreis! 

Lieferung nur gegen Vorkasse (hierbei entfallen Porto-, Verpackungsund 

Nachnahmegebuhren) oder Nachnahme. Es gelten ausschlieBlich 

unsere Liefer- und Zahlungsbedingungen. 

Bankverbindungen: Raiffeisenbank Odenthal eG (BLZ 370 695 77) Kto.-Nr.: 2104646010 

Deutsche Bank AG, Koln (BLZ 370 700 60) Kto.-Nr.J 1 357 508 

Postgiroamt Koln (BLZ 370 100 50) Kto.-Nr.: 469 897-504 

87.2.07

Neue Version vom 

ADVKEY 

Zunachst mochte ich alle aufruten, die alte 

Version des Lexfiles ADVKEY (siehe PRIS 

MA 5/86) durch die nun vorgestellte neue (um 

3 bytes kurzere) Version zu ersetzen, da sie 

sich in den folgenden Punkten unterscheiden: 

Die Beepmodus-Parameter werden nun vor 

gegeben (minimale Tonlange, mittlere Freq.), 

d.h. es wird nun kein (der fur zukiinftige HP- 

Software reservierte) Speicherplatz mehr be 

nutzt. 

Die Funktion KEYWAIT$ legt nun keine Kopie 

der zuletzt gedriickten Taste in m Tastenbuffer 

mehr ab. Die Window Einstellung wird 

nicht mehr zerstort (Bug in der alten Version). 

Diese neue Version ist daher auch fur den 

Eprom-Einsatz geeignet! 

Mit dem Statement CMDSIZE aus dem 

gleichnamigen Lexfile ist es moglich, den 

Kommandostack auf bis zu 16 Befehlsebenen 

zu erweitern. Das Argument von CMDSI 

ZE (jeder numerische Ausdruck ist zulassig) 

wird absolut und modulo 16 behandelt (0 

steht fur 16 Ebenen) (z.B. richtet CMDSIZE- 

16 16 Befehlsebenen ein). Alle Eintrage im 

Befehlsstack werden bei der Neudimensionierung 

geloscht. 

Fur alle diejenigen, die bis hierher gelesen 

haben, noch ein kleiner "Kniff": 

Ab der Adresse '2E350' (ROWDRU) liegen 

16 nibbles, die zum Aufbau der Anzeige be 

notigt werden. Hier kann gefahrlos herumgepoket 

werden (INIT 1 setzt den Urzustand 

wieder her). Besonders interessant ist POKE 

'2E357',77'! 

AD'JKEY L IDftSZ 136 Bytes 

000 

001 

002 

003 

004 

005 

00G 

007 

008 

009 

00A 

00B 

00C 

00D 

00E 

00F 

010 

87.2.08 

1444 

802E 

FE00 

F710 

0E10 

1434 

3610 

0045 

48D8 

B064 

F31C 

BD2D 

15C8 

G4F2 

0019 

A014 

08F1 

G5B4 

1053 

0251 

0000 

00FF 

4542 

8137 

1119 

ACA1 

F2AF 

19B1 

3A6F 

FC4B 

AF21 

3415 

4100 

0B31 

5495 

8171 

0100 

0860 

B454 

101F 

1098 

1351 

8F12 

2154 

4000 

8F04 

315D 

5478 

2381 

0334 

11BD 

0202 

1168 

0000 

0000 

9575 

F001 

F2C6 

1813 

7001 

7BDC 

DB10 

BE03 

31B0 

FD4D 

4948 

5C00 

700 

AF 

C2 

01 

39 

9C 

5C 

90 

20 

E8 

E3 

8B 

F3 

9F 

7B 

FF 

78 

3B 

CCD - Computerclub Deutschland e.V./Prisma 


LEX 'ADUKEY' 

10 152 

HSG 0 

POLL POLL 

ENTRY KEYUBI 

CHAR nr 

KEY 'KEYUAITS' 

TOKEN 1 

EN0TX1 

KEYUHI CODEX 

R0=C 

CD1EX 

R1=C 

UO GOSBUL I006C2 

GOC K20 

OR1 

BH 

C=R0 

D0=C 

GOULNG 1108 

120 GOSBUL #00721 

00»(S) JZF160 

!>0 U 

0ATQ=C il 

GOTO KID 

POLL LKZ> 81C 

?e=c b 

GOYES PKEY 

RTHSXI1 

PKEY C-D fl 

RH 

C=0 fl 

0=0 fi 

0=D-1 B 

P30 

P10 

0=CU 

D0=(2) 113 

A=DAT0 X 

ASRC 

?A=0 S 

GOYES P30 

DHT0=C fl 

R0=A 

SLEEP 

KEY* 

CKSREO 

KEYBUF 

nlTKY 

BP'C 

LC(2) 8C5 flRPTD 

GOSBUL J1364C SHAG? 

GONC P10 

D0=(5> S2F160 KEYBUF 

C=0 u 

KEYSCN 

KEVPTR 

RTNCC 

LC(5) «C5 flRPTD 

113601 SFLAGC 

C=R3 

D=C 

RTNSXM 

LEX 'CHOSIZE' 

10 ISO 

HSG 0 

POLL 0 

ENTRY CMD 

CHAR HD 

KEY 'CMDSIZE' 

TOKEN 5 

ENDTXT 

REL(5) DECriP 

REL PARSE 

CMO GOSBUL 80F18b EXPEXC 

A=0 S 

GOSBUL H1B223 FLTDH 

M-1 A 

ASRC 

DMS) I2F97G MAXCMO 

DATl=fl S 

DM1) 8F576 IOBFEN 

C'BflTl A 

DK 

LCHEX 8003000 

P* 5 

LOOP DRT1=C UP 

01=01* 6 

A=B-1 S 

GONC LOOP 

CD1EX 

DMS) 82F580 RHUBFR 

DBT1=C fl 

01=01* 5 

DATK fl 

D1=D1» 5 

DflTK fl 

GOULNG i08fi18 NXTS1M 

DECMP GOULNG 805193 FIX0C 

PARSE GOULNG 802B6E FIXP 

C M D S I Z E L I D # 5 B 1 0 8 B y t e s 

000 34D4 4435 94A5 5402 49 

001 802E 1041 5182 1168 A7 

002 7B00 0B55 0500 0000 94 

003 F710 0000 0000 0000 A7 

004 0420 00DD 34D4 4435 F2 

005 94A5 5450 1FFE G000 4D 

00G 0700 08F6 81F0 AC08 33 

007 F322 B1CC 8141 F679 IC 

008 F215 141E G75F 1471 F6 

009 3535 0003 0025 1551 C2 

00A 175A 4C55 F137 1F08 B9 

00B 5F21 4517 4145 1741 7D 

00C 458D 84A8 08D3 9450 35 

00D 8DE6 A20 

28 

Heikci 

Schmale 

Steinmeisterstr. 

8 

4980 Bunde

Buchbesprechung 

J.K.Hom:"HP-71 BASIC leichtgemacht". Deut 

sche Ausgabe von W. Stroinski, 164 Seiten; 

Heldermann Verlag, Berlin 1986, 

Preis 44,-DM 

"Aufgrund der mangelhaften Literatur fur den HP- 

71 steht dieses Buch, wo immer es auftaucht, im 

Mittelpunkt bei den HP-71 Anwendern" 

Dies waren die Anfangsworte der Buchkritik von 

Alf-Norman Tietze uber das Buch von G. Tatzl; 

PRISMA 85.6.14. So kann auch diese Bespre 

chung beginnen, um dann jedoch nicht in abwertender 

Kritik weiterzufuhren. 

Das Buch, das ich vorstellen mochte, erscheint mir 

als bestes Buch iiber den HP-71 uberhaupt. Dies 

gilt sowohl fur Deutschland als auch fiir die USA; 

Originaltitel dort: "HP-71 made easy". 

Doch zunachst einige Worte zum Autor Joseph 

K.Hom. 

Jeder, der sich intensiv mit Computern beschaftigt, 

kommt ohne die amerikanische Originalliteratur 

nicht aus. Das war besonders bei der Synthetik des 

HP-41 der Fall. Hier hat sich ein amerikanischer 

Club, der PPC, sehr hervorgetan. Mit der Grtindung 

eines weiteren Clubs, dem CHHU-CHRO 

NICLE, eine wahre Fundgrube dar. Bei der Bera 

tung und Bearbeitung besonders schwieriger Kapi 

tel hat sich J.Hom hervorgetan. Alle Erfahrungen 

fruchteten schlieBlich in einem Buch, dessen Lekture 

wirklich ein GenuB ist (gilt auch fur die deutsche 

Ausgabe). Der Adressat ist bei dieser Vorgeschichte 

naturlich der Anfanger und Fortgeschrtttene, 

dem Profi bietet es sicherlich zu wenig, da Maschi 

nensprache nicht berucksichtigt wird. Als besonde 

re Zielgruppe erscheinen mir jedoch die Umsteiger 

(Aufsteiger!) des HP-41 zu sein. Denn wer kennt 

nicht folgende Probleme: 

"Der HP-71, der Rechner!!!, dagegen kann doch 

ein HP-41 nicht bestehen, und erst der Preis..."; so 

etwas werden viele von ihren Handlem gehort ha 

ben. Uegt dann der Rechner erst im Schaufenster 

oder hat ihne gar der Freund, von dessen Pro 

grammen man uberhaupt nichts halt, ist es schon 

passiert. Ein HP-71 muB her. 

Steht der Rechner dann zu Hause, kann man es 

kaum erwarten alles auszuprobieren, ein ellenlanges 

Programm einzutippen, oder wie es sein sollte, 

erst mai 500 Seiten zu lesen. Und dann kommt die 

Uberraschung: "Wer einen HP-71 kauft, kann 

selbstverstandlich BASIC", so HP-Handbuch; Sie 

nicht? 

Macht nichts, wozu haben wir denn das gute Vertriebsnetz, 

unsere erfahrenen Handler. Also geht 

man mit seinem Notizbuch zum Handler (am be 

sten wahrend des Weihnachtsgeschaftes, nachher 

ist er sowieso verstimmt) und fragt um Rat. Falls es 

ein gewiefter Handler ist, kommt man in einigen Ta 

gen mit Fragen zum HP-110 zuruck, ansonsten 

gilt: "BASIC konnen doch schon Weinkinder, fra 

gen Sie doch mai den Sohn". 

Und genau in diese Lage sind 44,-DM fur ein Buch, 

dessen Autor sich des Pnoblemes bewuBt ist, nicht 

zu viel. Dem Ubersetzer W. Stroinski ist es dabei 

gelungen, den Witz und Charme des Buches zu er 

halten. 

In zehn Kapiteln werden die meisten Standardprobleme 

besprochen; enthalten ist zudem ein Ver 

zeichnis aller Befehle des HP-71 mit IL, MATHE 

und FORTH-Modul. Am besten gefallen hat mir 

das gleichzeitig wichtigste Kapitel, der Abschnitt 6: 

"Speichern im HP-71". Die Originalhandbucher 

sind, wenn es um SDATA, DATA oderTr£XT-Rles, 

nicht exakt genug. Wer versuchte nicht schon, die 

Scheckbetrage gemaB Handbuch zu verwalten 

und ertebte bBse Uberraschungen. (Wer einen HP- 

71 gekauft hat, braucht sowieso kein Geld mehrzu 

verwalten). J.Hom zeigt nun endlich, wie es richtig 


emacht wird und gibt Beispiele, die laut HP eigent 

lich nicht funktionieren. Zum Beispiel: 

CREATE DATA DEMO,5,4 

FOR 1=1 TO 30 

PRINT #1;l 

NEXTI 

Obwohl die GroBe auf 5 Eintragungen festgelegt 

ist, werden 30 Zahlen gespeichert! Wer das einmal 

verstanden hat, das Buch hilft einem dabei sehr, 

wird mil solchen Ries keine Probleme mehr haben. 

Gut auch das Kapitel uber den CALC-Modus, des 

halb so ausfuhrlich, weil der UPN-Versierte .ange 

sprochen wird und die Unterschiede verstandlich 

erklart werden. 

Das Kapitel iiber PEEK$ und POKE enthalt nur 

einige Adressen und wenige Beispiele, die fiir ein 

weiteres Studium anhand der IDS-Bande sicher 

ausreichen. Da "HP-71 BASIC leichtgemacht" kei 

ne Programmsammlung wie das Buch von G.Tatzl 

ist (Gott sei Dank), enthalt es nur wenige Program 

me, diese eher mit Demonstrationscharakter. Ent 

halten ist beispielsweise eine Telefonnummemverwaltung 

und der Ausdruck von "LEX-Rles nach 

Thomas Fange". 

Nicht gefallen hat mir Kapitel 10 uber die COPY- 

Anweisung, da ich diesen Befehl und dessen An 

wendung nie als schwierige empfunden habe. Eine 

Diskussion von Unterprogrammen ware mir lieber 

gewesen. 

Fehler konnte ich im Buch nicht entdecken, nur ein 

Versprechen wird nicht gehalten. Die angekundigten 

Stringmatrizen werden leider nicht behandelt. 

Die geweckte Hoffnung auf: 

A$(10,10)[5,6] 

bleibt also unerfullt. 

Einige Klarstellungen erscheinen mir auBerdem 

angebracht: Der Commandstack sollte nicht wie 

angegeben von 5 auf 16 Schritte sondern nur auf 

15 Schritte erweitert werden. Es kann sonst zu 

Fehlern bis hin zu MEMORY LOST fuhren. Der im 

Anhang erwahnte Antwortservice des Autors 

J.Hom bezieht sich naturlich nur auf in Englisch gestellte 

Fragen. 

Das Fazit iiber dieses Buch, das vom Heldeimann- 

Verlag, Nassauische Str. 26,1000 Berlin 31 im Direktvertrieb 

verkauft wird, kann daher lauten:"Steht 

dieses Buch, wo immer es auftaucht, im Mittelpunkt 

bei den HP-71 Anwendern". 

Jochen Haas (2874) 

Reuschenbergerstr. 14 

5090 Leverkusen 3 

llllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllll 

ANZEIGE DER IL-SCHLEIFENKONFIGURA- 

T10N 

Nachfolgende kurze Routine laBt die momentane 

Schleifenkonfiguration aufdem Bildschirm erschei 

nen. Wer kein Videointerface besitzt, mag die 

DISP-Befehle in PRINT umandem. 

Der Aufruf erfolgt mit CALL ILA. 

10 SUB ILA 

20 DISP CHR$(27);'EIL-Adressen' 

30 1=1+1 @ A$=DEUID$(I) @ A=DEUAID(I) 

40 IF A=-l THEN 90 

50 IF A=1G AND A$=" THEN A$=' HPSZlolrX 

60 IF A=32 AND A$=" THEN A$='HP82162A' 

70 IF A=48 AND A$=5' THEN A$='HP82163B' 

80 DISP I;A$ @ GOTO 30 

90 END SUB 

In meiner Version werden 3 Gerate ohne Einheitskennung 

abgefangen, jeder kann fur seine Konfi 

guration eine entsprechende Modifikation vomehmen. 

Manfred Hammer (2743) 

OranienstraBe 42 

6200 Wiesbaden 

®06121/375294 

CCD-Messestand auf der 

MICRO - COMPUTER '87 

vom 19.-23. Mai 1987 

llllllllllllllllllllllllllllllllllllll 

Fehlermeldungen Diskettenlaufwerk 

Beim Betrieb des Diskettenlaufwerks konnen Feh 

lermeldungen auftreten, die lapidar als HP IL ERR: 

im Display erscheinen. Wendet man jetzt ERRN 

an, so werden Fehlemummem ausgegeben, die 

im IL-Handbuch nicht ausgewiesen sind. Ich konn 

te folgende Zuordnungen lokalisieren: 

255021 Laufwerksakku zu schwach 

255029 Diskette schreibgeschutzt 


Oranienstr. 42 


®06121/375294 

87.2.09

HP-71 Utilities 

MASSLIB 

Massmemory Library 

Diese Bibliothek mit Unterprogrammen dient 

zur komfortableren Bedienung des HP82160 

Cassetten- bzw. HP9114 Diskettenlaufwerkes. 

Es konnen auf einfache Weise Datentra 

ger formatiert und kopiert werden. Das Volu 

me-Label kann gelesen oder geandert wer 

den und grundsatzliche Kopiervorgange wer 

den erleichert. Die einzelnen Unterprogram 

me werden nachfolgend mit Beispielen be 

schrieben. 

Zur "Erinnerung", welche Subroutines sich in 

dieser Bibliothek befinden, kann man sich mit 

RUN oder CALL MASSLIB eine Liste mit den 

entsprechenden Namen anzeigen lassen. 

INITVOL - Initialize Volume 

Mit diesem Unterprogramm wird die Initiali 

sierung bzw. Formatierung eines Datentra 

gers (Cassette/Diskette) im Dialog ausge 

fuhrt. Das Programm fragt alle dafur notwen 

digen Parameter ab, so daB man sich nicht 

mit dem selten benutzten Befehl "INITIALI 

ZE" befassen muB. AuBerdem priift das Pro 

gramm, ob der aus- gewahlte Datentrager 

schon formatiert ist und fragt dann zur Sicher 

heit noch einmal nach, ob auch wirklich for 

matiert werden soil. 

Ein bedeutsamer Aspekt - besonders dann, 

wenn man seine Datentrager nicht beschriftet 

hat (na so eine Unordnungl). 

Es wird das Bibliotheks-Unterprogramm IDV- 

L(A$) benotigt! 

Aufruf: CALL INITVOL 

Abfrage von: 1) Vol.-Name (Volume-Name, 

Datentragerkennung) ohne Vorgabetext. 

2) Dir.-Size (Directory-Size, Verzeichnisgro- 

Be) mit "128" als Vorgabewert. 

3) Device (Geratekennung) mit ":TAPE(1)" 

als Vorgabetext. 

Sollte der Datentrager schon formatiert sein, 

so erfolgt die Abfrage: 

"lnit[volname] ?" 

[volname] steht hier fur die aktuelle Datentra 

gerkennung. Sollte dieser jedoch keine Kennung 

haben, wird die Bezeichnung "noname" 

verwendet. 

Als Antwort ist die Taste Y (=yes) oder N 

(=no)zu drucken. 

AnschlieBend erfolgt die Arbeitsmeldung: 

"Init [volname] on [device]" 

[volname] und [device] stehen dabei fiir die 

zuvor eingebenen Bezeichnungen. Nach abgeschlossener 

Initialisierung wird nochmal 

die Kennung, die Verzeichnis- groBe sowie 

das Initialisierungsdatum angezeigt. Diese 

Informationen werden vom Datentrager gele 

sen und gewahrleisten somit die Kontrolle, ob 

alles o.k. ist. 

Achtung: Fremdformattierte Datentrager 

(z.B. 

MS-DOS) werden ohne Warnung vom HP-71 

formattiert, da sie als unformattiert behandelt 

werden. 

87.2.10 


IDVOL (IDVL) - Identify Volume Label 

Mit diesem Unterprogramm laBt sich im Dia 

log die Datentragerkennung, die VerzeichnisgroBe 

und das Initialisierungsdatum abfra 

gen. Es wird das Bibliotheks-Unterprogramm 

IDVL(A$) benotigt! 

a) Aufruf: CALL IDVOL 

Abfrage von: 

1) Device (Geratekennung) mit ":TAPE(1)" 

als Vorgabetext. 

AnschlieBend wird die Kennung, die VerzeichnisgroBe 

sowie das Initialisierungs- da 

tum angezeigt. 

b) Aufruf: CALL IDVL(A$) ohne Abfrage. 

In der ubergebenen Stringvariablen (hier A$) 

muB eine beliebige Geratekennung stehen - 

z.B. ":2", "TAPE", ":HP9114B" oder andere. 

Achtung! Es muB eine Variable iibergeben 

werden (also kein Text in Anfuhrungs- zei 

chen), weil ja ein anderer Inhalt zuruckgege 

ben wird. AuBerdem erfolgt bei diesem Unter 

programm auch keine Anzeige - das bleibt 

dem aufrufenden Programm uberlassen (z.B. 

IDVOL). 

Sollte die Cassette oder Diskette nicht oder 

fremd formattiert sein, so wird als Datentra 

gerkennung die Meldung"? undefined" (nicht 

definiert) zuruckgegeben. 

RENAMVOL - Rename Volume Label 

War es bisher nur moglich, durch eine erneute 

Initialisierung die Datentrager- kennung 

umzubenennen (und dabei gleichzeitig alle 

Daten zu loschen), so wird es mit diesem Un 

terprogramm zu einem "Kinderspiel". Die Da 

ten bleiben erhalten und die Kennung kann 

trotzdem verandert werden. 

Aufruf: CALL RENAMVOL(D$,V$) mit D$ als 

Device (Geratekennung) und V$ als neues 

Volume Label (Datentragerkennung) - z.B. 

CALL RENAMVOL(":TAPE","TEST"), was 

den Datentrager im ersten Laufwerk mit dem 

(neuen) Namen "TEST" bezeichnet. 

MCOPY - Medium Copy 

Mit Hilfe dieses Unterprogrammes lassen 

sich Cassetten oder Disketten sehreinfach 

duplizieren. Vorausetzung dafiir sind entwe 

der zwei Cassetten- oder zweiDiskettenlaufwerke. 

Die Kombination von einem Casset 

ten- und einem Disketten-laufwerk empfiehlt 

sich nicht, weil das bei der spateren Benut 

zung der Kopie zuseltsamen Storungen fuh 

ren kann. 

Bevor ein Datentrager kopiert wird erfolgt zur 

Sicherheit eine Kontrolle desZielmediums, ob 

dieses schon initialiser! ist (und somit mbglicherweisewichtige 

Daten enthalt). Wenn 

das der Fall ist, erscheint die Abfrage: 

"Copy to [volname] ?" 

[volname] steht hier fiir die ausgelesene Da 

tentragerkennung des Zielmediums.Die Fra 

ge ist mit Y (=yes) oder N (=no) zu beantwor 

ten. 

Ist es noch nicht initalisiert, so wird das vom 

Programm erledigt.Es wird das Bibliotheks- 

Unterprogramm IDVL(A$) benotigt! 

Aufruf: CALL MCOPY(S$,D$) mit S$ als 

Source-Device (Kennung des Quell-Laufwer- 

kes) und D$als Destination-Device (Kennung 

des Ziel-Laufwerkes)- z.B. CALL MCO- 

PY(":2",":3") oder CALL MCOPYfTAPE- 

(1)",":TAPE(2)". 

Wahrend des Kopiervorganges erscheint die 

Meldung "Medium-COPY ... " und nachAbschluB 

wird die Meldung "finished" ange 

hangt. 

BCOPY-Block Copy 

Mit Block-Copy ist es moglich, eine beliebige 

Anzahl aufeinanderfolgenderFiles zu kopie 

ren. Hierbei ist jedoch die Kenntnis der ent 

sprechenden Katalogeintrags-Nummern erfoderlich. 

Aufruf: CALL BCOPY(S$,D$,B,E) mit S$ als 

Source-Device (Quelle),D$ als Destination- 

Device (Ziel), B als Begin Catalogue No. und 

E alsEnd Catalogue No. Wird fur S$ oder D$ 

ein Null-String iibergeben, danninterpretiert 

das Programm daraus, daB der Device 

":MAIN" gemeint ist. 

Z.B. CALL BCOPY(":TAPE- 

(2)",":PORT(0.01)",12,23). In diesem Bei 

spiel werdenvom 2. Laufwerk in der Schleife 

die Files vom Katalogeintrag 12 biseinschlieBlich 

23 (also insgesamt 12 aufeinan 

derfolgende Files) in den HP-71 Port 0.01 ko 

piert. 

Es erfolgt die Abfrage "Block-COPY [source] 

to [dest] ?" mit [source] und[dest] als Quelle 

und Ziel entsprechend der iibergebenen Parameter.Die 

Frage ist mit Y (=yes) oder N 

(=no) zu beantworten). Das Programmprotokolliert 

die ubertragenen Files. 

LISTCOPY (LCOPY) - List Copy 

Mit diesem Unterprogramm lassen sich nun 

beliebige Files in beliebigerReihenfolge ko 

pieren. Die Abfrage der einzelnen Parameter 

geschieht auch hierim Dialog. Es wird das Bi 

bliotheks-Unterprogramm LCOPY(S$,D$,L$) 

benotigt. 

a) Aufruf: CALL LISTCOPY 

(Tip - LIST und COPY sind bereits auf der HP- 

71 Tastatur zu finden) 

Abfrage von: 

1) File-List (File-Liste, die einzelnen Namen 

durch Komma getrennt) ohneVorgabetext. 

2) Source (Geratekennung der Quelle) mit 

Vorgabe":TAPE(1)". 

3) Dest. (Geratekennung des Ziels) mit Vorgabe":TAPE(1)". 

Wird fiir Source ein Null-String eingegeben, 

so konnen die Files irgendwo imHP-71 in ei 

nem beliebigen Port stehen. Ein Null-String 

fur Destinationbedeutet, daB als Ziel der HP- 

71 mit ":MAIN" gemeint ist. 

Es folgt die Abfrage "List-COPY [source] to 

[dest] ?" mit [source] und [dest]entsprechend 

der eingegebenen Daten. Die Frage muB mit 

Y (=yes) oder N (=no)beantwortet werden. 

Das Programm protokolliert die ubertragenen 

Files. 

b) Aufruf: CALL LCOPY(S$,D$,L$) mit S$ = 

Source, D$ = Destination und L$ = File-List.

CLDIR - Clear Directory 

Mit diesem Unterprogramm ist es moglich, 

das Inhaltsverzeichnis eines Daten-tragers 

zu loschen, ohne ihn neu formattieren zu 

mussen. 

100 

110 

1Z0 

130 

140 

150 

150 

170 

180 

190 

Z00 

210 

2Z0 

2 30 

240 

7.50 

2G0 

270 

280 

200 

300 

310 

320 

330 

340 

350 

3B0 

370 

380 

330 

400 

410 

420 

430 

440 

450 

4B0 

470 

480 

430 

500 

510 

BASIC 3053 


Aufruf: CALL CLDIR 

Abfrage von: 

1) Device (Geratekennung) ohne Vorgabe 

text. 

> Subset MASSLIB 1.00 Massmemory Library for the HP-71 

(c) 1387 by M.RABE ii fl.-N.TIETZE / CCD e.V. 

requires: HPILROM 

DISP 

DISP 

DISP 

DISP 

DI SP 

'INITVOL; IDVOL' 

'RENfiMVOL(D$,V$)' 

'MCOPY

650 

660 

670 

680 

660 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 

800 

810 

8Z0 

830 

840 

830 

850 

8B0 

870 

880 

830 

900 

9 10 

9Z0 

930 

340 

950 

960 

CCD - Computerclub Deutschland e.V. /Prisma 

DISP USING 'ft,3D," [",10A,"3-->,";I,F$ 8 F$=F$&S$ 8 COPY F$ TO D$ 

DISP 8 NEXT I 

DISP 'Block-COPY finished' 8 END 

IF ERRN=57 OR ERRN=59 OR ERRN=Z550ZZ OR ERRN=Z5S030 THEN DISP ERRM$; 8 GOTO 

DISP 8 DISP ERRM$ 8 END 

I 

SUB LISTCOPY 

DIM L$I90I 8 LINPUT 

LINPUT '? Source: ', 

LINPUT '? Dest.: ', 

CALL LCOPY 

SUB LCOPY(S$,D$,L$) 8 L$=UPRC$( L$> 8 IF D$=" 

DISP 'ListCOPY ';S$,' to ';D$;' ?' 8 L$«=L$8j' 

ON POS('YN',UPRC!6(KEY$))H GOTO 780,800,790 

DISP 'List-COPY abortet' 8 END 

IF UPRC$(S$)=UPRC$(D$) THEN DISP 'Source/Dest. Conflict' 8 GOTO 730 

E=POS(L$,',',B+1 ) 8 IF NOT E THEN DISP 'List-COPY finished' 8 END 

F$=L$tB,E II 8 DISP USING '#,"[",10fl,"3-->"',F$ 8 COPY F$&S$ TO D$ 

B=EH 8 DISP 8 GOTO 810 

IF ERRN=57 OR ERRN=53 OR ERRN=Z550ZZ OR ERRN=255030 THEN DISP ERRMS; 

DISP ERRMS 8 END 

! 

'? File List: ';Li6 8 IF NOT LEN(L$) THEN END 

':TAPE(1)';S$ 8 S$=UPRC3 

':TAPE(1)';D$ 8 D$=UPRC$( D*) 

THEN D$=':MAIN' 

• 8 ON ERROR GOTO 840 

SUB CLDIR 8 INPUT '? Device: ',':TAPE(1)';D$ 8 D=DEVADDR 

C A L L I D V L ( D $ ) 8 I F D t l t j l - ' ? ' T H E N DISP D$ 8 END 

DISP 'Clear DIR on *; D$[ 1 ,POS< D$8j' ' ,' ')];' 

ON POS< 'YN',UPRC$(KEY$))+1 GOTO 900, 310,360 

DISP 'Clear Directory. 8 S«VfiL(D»[9,1U>/8 

DIM Z$[Z5GJ 8 Z$= 

8 FOR 1=1 TO 8 8 Z$= Z$&Z$ 8 NEXT I 

SEND MTA UNL LISTEN D DDL 4 DATA 0,Z DDL Z 

FOR 1=1 TO S 8 OUTPUT :D ; Z$ 8 NEXT I 

SEND DDL 8 UNL 

SEND LISTEN D DDL 7 UNL 8 PUT '#43' 8 END 


Thudichumstr. 14 


An alle Videointerfaceanwender 

Ich, Vermessungsingeneur, setze im Berufsalltag 

mehrere Videointeffaces in Verbindung mit dem 

HP 71 ein, z.B. HP 82163, PacScreen V1.1A, so 

wie Mountain (HP 92198) und ware erfreut uber 

einige Anregungen zur Gestaltung Bildschirmmasken. 

Sollte jemand schon Erfahrungen auf diesem 

Gebiet gesammelt haben, wiirde ich mich fiir Uberlassung 

brauchbarer Anregungen gem mit einer 

Kassette oder Diskette bedanken. 


Oranienstr. 42 


®06121/375294 

8 GOTO 

oiuiiinEiiiiiiiiiiiiiiiiiHiiiiiiiiiiinniiiiiiiiiiieiiiiiiiiniuifliuiBSUiiiiniiiiuvifiiiiiiiifiiiiiiiiitf^ 

87.2.12 

AUS UNSEREM ANGEBOT: 

fti HP-41 RAM STORAGE UNIT 32k 

HP-41 RAM STORAGE UNIT 64k 

A E C - R O M D M 2 9 9 . - 

H Y D R A U L I C R O M D M 3 1 9 . - 

E X T . I L - M O D U L D M 3 1 9 . - 

HP 

HP 

■7 1 9 6 k R A M 

Portable 

1 M B / 2 

E R A M C O S Y S T E M S - H P - N E C - TA N D O N - 

Preise zuziigl. Porto und Verpackung. 

ULRICH KUNZE COMPUTER SYSTEMS Postfach 300667 

Plus: 

MB RAM 

DM 579.- 

DM 899.- 

D M 2 6 9 9 . - 

TOSHIBA - ZENITH 

7000 Stuttgart 30 

Tel.: 0711/886159

ENDLICH DA: 


* Der neue HP-41 CY mit 64kRAM! 

* HP-41 RAMBOX II jetzt 64k! 

* HP-71 Speichererweiterungen von 

32k bis 160k! 

* HP-IL RAM Disc bis 512k! 

* Ihre Software auf Modul! 

* Neues Zubehor fiir HP-Rechner! 

* Hewlett-Packard- und andere 

Computergerate zu Sonderpreisen! 

Alles vom fuhrenden Importeur: 

tttt ■ K T \ T T \ W & W W&W b o t t wSoftware a r e JProducts F r o d u cGmbH t s b m b H T T T T S E T T T T 

pvsffv °%:^^o14 \wBw\ 

| w & w s o f t w a r e p r o d u c t s | 5 0 6 0 B e r g i s c h G l a d b a c h 2 [ w & w s o f t w a r e p r o d u c t s I 

Tel.: 02202/85068 

Fordern Sie unseren kostenlosen Prospekt an. Postkarte oder Anruf geniigt! Der Verkauf 

unserer Zusatzprodukte erfolgt auch iiber den HP-Fachhandel. Fragen Sie Ihren Handler 

nach unseren Produkten! 

87.2.13

Dezimal - Prompt 

9 Zeilen, 25 Bytes, Regs., SIZE 

HP 41C, CCD-ROM 

Vers. 2:7 Zeilen, 19 Bytes 

+ Bericht Matrix-Operationen 

ADVANTAGE-ROM / CCD-Modul 

Noch im alten Jahr mochte ich Euch mit folgenden 

Beitragen "belastigen": 

1. Im Prismaartikel 86.8.24 wurde der Ruf nach ei 

nem Dezimal:Prompt laut. "PMTO" ist das Ergeb 

nis meiner Uberiegungen. Erforderlich. HP 41, 

CCD-ROM. 

Als Unterprogramm wie die Befehle aus dem 

CCD-ROM (PMTH, PMTA,...) verwendet, macht 

es manches Prgm in der Bedienung angenehmer, 

weil nicht mehr R/S gedruckt werden muB. 

Die Anwendung ist ganz einfach: Den zum Prompt 

gewiinschten Text ins Alpha-Register und 

XEQTMTD" ausgefuhrt. Die Dex-Zahl wird im X- 

Register abgelegt, der ubrige Stack nach oben ver 

schoben, T geht verloren. Nachteilig ist naturlich, 

daB man nur INT-Zahlen eingeben kann, aber oft 

reicht das aus. 

Zu beachten ist, daB vor Aufruf des Unterprogrammes 

die WSIZE eingestellt werden muB, und zwar 

4 fur einstellige Dec-Zahlen, 8 bzw. CLX fur zweistellige, 

usw. Die beiden Versionen haben folgende 

Unterschiede: Vers. 1: Der Alpha-lnhalt bleibt wie 

beim "normalen" Prompt ertialten, allerdings darf 

die Aufforderung keine Ziffern enthalten, da sonst 

der ANUM-Befehl bei ihnen hangenbleibt. 

Vers. 2 kennt diese Einschrankung nicht, allerdings 

geht der Alpha-lnhalt verloren. 

Viel SpaB beim "prompten!" 

2. In Prisma 86.7.26 hatte ich nach der Kompatibili 

tat der Matrix-Funkrjonen von Advantage- und 

CCD-ROM gefragt. Da keine Reaktion erfolgte, ha 

be ich mich selbst an die Arbeit gemacht und siehe 

da: man kann beide Funktionsblocke auf die glei 

che Matrize anwenden! 

Einziger Unterschied, der auch aus den Handbu 

chern hervorgeht, ist die Namensgebung von Ma 

trizen im Hauptspeicher; beim CCD-Modul sind 

dreiziffrige Registernummem erforderlich, beim Ad 



vantage Pac reicht eine Ziffer fur z.B. "R8". Diese 

Einschrankung macht die kombinierte Verwen 

dung beider Module fur Matrizen im Hauptspeicher 

nicht so ratsam, aber im X-Memory geht's. Und es 

lohnt sich!! Nach meinen Messungen sind die 

CCD-Funktion im Durchschnitt 1,5 md so schnell 

wie die vergleichbaren aus dem Advantage-ROM. 

Das letztere bietet dafur Funktionen wie MDET und 

MINV, die man im CCD-ROM vergeblich sucht 

Die Verwendung beider Module bietet also ein Op 

timum an Geschwindigkeit und Funktionsauswahl. 

Version I- 

19:58 11.12 

ei*LBL "PMTB" 

62 PMTH 

83 "r " 

84 URCLH 

85 RDH 

86 ANUH 

8? CLfi- 

88 ABSP 

89 EHD 

25 BYTES 

19:59 11.12 

81+LBL "PHTB* 

82 PHTH 

83 CLfl 

84 RRCLH 

85 RUN 

86 h'NUM 

87 END 

Peter Faiwig (3073) 

Schwanenburgstr. 50 

4500 OsnabrGck 

iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiimiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii 

DBL1 

Genaue Division 

55 Zeilen, 100 Bytes, 15 Regs., SIZE 002 

HP41C 

Das obengenannte Programm DBL von Dennis 

Foh ermoglicht die beliebig genaue Divison zweier 

Zahlen. Ist dabei jedoch der Quotient ehe nichlperiodische, 

.also abbrechende Zahl, produziert das 

Programm nur noch Nullen, ohne diese Besonderheit 

zu erkennen. Ebenso ist die Druckerausgabe 

bei einem negativen Quotienten unbefriedigend. 

Aus diesem Grund habe ich das Programm DBL1 

geschrieben, das diese F.alle beruck^chtigt DBL1 

ist nur unwesentlich langer als das Original und 

kann durch Steichen der Zeilen 52-54 um 13 Bytes 

gekurzt werden. 

Schwachstellen von DBL1 sind, daB bei periodi 

schen Quotienten deren Periode nicht erkannt 

wird, und daB nach Abbruch des Programms noch 

ein PRBUF notig ist, um die nicht gedruckten aber 

87.2.14 

PLNG 

PLNG 

berechneten Nachkommastellen auszugeben. 

Ich bin dankbar fur Tips zur Losung dieser beiden 

Probleme. 

Happy dividing 

Beispiele: 

741741,8/-49152,6= 

-15. 8987592 

3 4 3 7 5 

BRICHT RB 

-58.8/28 8= 

- 2. 8 7 1 4 2 8 5 7 1 4 

2 8 5 7 1 4 2 8 D f t *T 

2 8 5 7 1 4 2 8 

cr -? 

J f 

61+LBL "BBLi 

82 "Bl?" 

83 PROMPT 

84 ENTERf 

85 ABS 

86 STO 88 

87 UB2?" 

88 PROMPT 

89 EHTERt 

18 abs 

ii STO 61 

12 XOY 

13 Rt 

14 CLfl 

15 flRCL X 

16 "K" 

17 flRCL Y 

18 'P" 

19 PRfl 

28 CLfl 

21 * V4 * 3)2 < 0 ? 

22 X

BP - Barcodes plotten 

85 Zeilen, 21 Regs., 142 Bytes, SIZE 004 

HP 41C, Plotter-ROM 

Das folgende Programm "BP" plottet mit Hilfe 

des Plotter-Moduls des HP41 und eines Standartplotter 

(7470A) Programmbarcodes aus. 

Zum Starten des Programms kommt der Na 

me des zu plottenden Programms in das AL 

PHA-Register, danach wird das Plottprogramm 

mit XEQ "BP" gestartet. 

Der Plotter 7470A plottet maximal 34 Barcodezeilen 

al 6 Bytes auf eine DIN-A4 Seite. Ist 

die Seite voll, so erscheint die Meldung "PI" 

im Display. Daraufhin ist nur der PAPER LO- 

AD/HOLD-Hebel zu bedienen um ein neues 

Blatt einzulegen. 

Danach R/S drucken. 

Wird wahrend des Plottens der Stiff leer, so 

halt man das Plottprogramm einfach an und 

fiillt den Stiff nach. Danach druckt man die 

EEX-Taste (dieser Taste ist nach dem Laden 

des Programms der Label "/" zuzuweisen) 

und es erscheint "R?". Hier ist die Reihennummer 

einzugeben, bei der das Programm 

unterbrochen wurde, R/S. 

Ist das zu codierende Programm fertig, so 

wird der Stiff abgelegt. Die letzte Barcodezei 

le erhalt keine Nummer. 

XSPLINE 

HP41C, MM, X-F/M, TIME, CCD-ROM, X-l/O, 

IL, DRIVE 

Zu dem obigen Programm hatte ich bereits 

einmal einen erganzenden Beitrag geliefert, 

weil ich der Meinung war, daB einige Berichtigungen 

unbedingt angebracht werden muB 

ten und Erweiterungen vorgenommen wer 

den konnten. Ich hatte dann aber meinen Bei 

trag zuruckgezogen, weil doch noch nicht al 

les optimal war. 

Mittlerweile habe ich aber die Uberarbeitung 

abschlieBen und die Funktion ausreichend te 

sten konnen. 

Was ich getan habe, ist folgendes: 

Die beiden Bugs sind erkannt und beseitigt, 

die verhindert haben, daB die Splines sich im 

Inneren des Bereichs, an den Stutzstellen, 

glatt, d.h. ohne Knick aneinanderschlieBen 

und die beim Lauf des Programms fur 3 Stutz 

stellen Rechenfehler einbrachten. 

Es ist weiterhin erkannt, daB mit MASS= 0 

nicht, wie von Wilfried beschrieben, keine 

Vorgabe einer Randableitung erfolgt, son 

dern daB der Spline nach deer einschrankenden 

Vorschrift errechnet wird, die 3. Ableitun 

gen an den Randern sollen bei den jeweils 

beiden auBeren Splines paarweise gleich 

sein. (Wen auch immer das besonders inter 

essieren mag). Bei 4 Stutzstellen gibt es also 

nur einen einzigen Wert der 3. Ableitung,d er 

fur den gesamten Verlauf gilt. 

Es muB auch erkannt werden, daB der einzige 

wirkliche, sogen. naturliche Spline mit 

MASS=2, A=B=/ errechnet wird. Alle ande 

ren Berechnungen erbringen Knicke an den 

Randern. Es gibt aber noch den sehr wichti 

gen (echten) periodischen Spline, der so defi 

niert ist, daB die Randwerte von y, y' und y" 

auf beiden Seiten identisch sind. 


ASTO 82 Fix 8 Cr W 

SF 27 PINIT , a25 

BCSI2E XEQ 82 E 

ASTO Y 

13+LBL 88 

BCP STO 83 BC X=8? 

GTO 84 E - CLA 

ARCL X 96 RCL 68 3 + 

MOVE LABEL 

29+LBL 83 

3 RCL 88 4 + STO 88 

MOVE 

36+LBL 81 

RCL 82 RCL 83 FS"? 49 

OFF FC?C 88 DSE 81 

GTO 88 

Deshalb habe ich unter MASS=4 (A und B bei 

der Eingabe unwichtig) die Errechnung eines 

solchen periodischen Splines sowohl fur 3, 

als auch fur mehr Stutzstellen mit hinzugenommen. 

Letzteres als Iterationsverfahren 

mit mehreren Programmdurchlaufen. 

Ich habe den Datenfile von 8N-1 auf7N-1 Re 

gister verkleinert. Dann habe ich dem Pro 

gramm hinzugefugt: 

Ein Info-Label, aus dem ersichtlich ist, wie die 

Tasten belegt sind und was die Routinen be 

wirken. 

Eine Routine zur Errechnung der 1., 2. Ablei 

tung und der Spline-Krummung fur vorgegebenes 

x. 

Eine Routine zur Errechnung der Nullstellen 

bzw. irgendwelcher Abszissen zu vorgegebe 

nen Ordinaten der Funktion sowie ihrer 1. und 

2. Ableitung. 

Eine Routine zur Erzeugung eines Plots mit 

Hilfe des Druckers mit automatischer Festle 

gung der MaBstabe. (gegebenenfalls eigene 

Anderung mit Hilfe der Register 00 und 01 fur 

y, sowie 08 und 09 fur x. 

Eine Erweiterung der Koeffizientenroutine, so 

daB alle Koeffizienten sofort nacheinander 

ausgegeben werden. 

Eine Routine zum AusschluB von Berechnun 

gen, bei denen die x-Werte auBerhalb des 

durch die Eingabe definierten Bereichs lie 

gen. Die XY-EDIT-Routine schaltet sich auto 

matisch in den Programmlauf ein, wenn die 

Monotonie der x-Werte gestort ist und ruft zur 

Korrektur auf - bereits bei dem vorangegangenen 

Wert beginnende! Dieses Routine wur 

de auch dahingehend verbessert, daB sie mit 

der EEX-Taste abgeschlossen werden kann 

(nach der Anzeige eine y-Wertes.) Die Wiederholungsroutine 

- geanderte Randbedingungen 

- wurde auf eine gesonderte Taste 

gelegt und bedarf keiner zusatzlichen MaB 

nahmen des Anwenders. 

SchlieBlich ist alles in einem Paket unterge 

bracht, weshalb sich umstandliche Manipula- 

44+LBL 84 

X=8? PEN "P!" PROMPT 

SF 88 

58+LBL 62 

98 LDIR 3 STO 88 1.5 

CSIZE CLfi ARCL 82 

MOVE tflSEL 34 STO 81 

FS' m GTO 81 RTN 

«6*LBL "/" 

XE8 82 Rfl 81 -R?" 

PROMPT STO U YSZl 

MOB X=8? LflSTX ST- 81 

4 * 5 - STO ae 

ISG 81 = m 63 .END, 

Reinhold Humpfner 

KrumerStr. 12 

8729Zeil/M. 

tionen mit dem Programmspeichererubrigen. 

1 Byte ist jetzt bei SIZE 018 noch frei. Im ubri 

gen ist das Programm lesbar aufgebaut. Man 

kann es unschwer Zeile fur Zeile, oder Block 

fiir Block analysieren. die Laufzeiten sind ertraglich, 

sie kommen mit etwa 15-20% an die 

ursprunglichen heran. 

PS: Ich habe auf die Belegung der Register M 

und N verzichtet und dafiir 00 und 01 herangezogen. 

Wer auch Register 0 austauschen 

mochte, kann dafiir Register 16 nehmen. 

LIST 316 

81+LBL "SPL" 

82+LBL "IN* 

"fl ST ART+SPLIHE" PRfl 

"a NE UE RANBHER" "FTE" 

PRA "B KO EFFIZIENTE" 

"FN" PRfl "C PL OT" 

PRA -B HE RTE: Y Y1 " 

-FY" 1/p" PRA 

■d XY EDIT" PRfl 

"E NU LLSTELLEN- PRA 

"I IN FO" PRA RTN 

23+LBL "PL" 

RCL 14 ENTERt ENTERt 

6 * E - SEEKPT 

XOY GETX STO 88 

STO 81 BSE Y 

37+LBL 85 

RBN GETX RCL 61 

XOY STO 81 RBN 

RCL 86 X>Y? XOY 

STO 66 RBN BSE Y 

X

581+LBL 82 

Rt SEEKPT ATOX CLA 

XTOA RDN ARCL 82 

"F=?" PROMPT SAVEX 

RDN SF 01 RTN 

515+LBL 00 

RDN RCL 10 LASTX - 

X*Y? GTO 18 CLB 

RCL 14 E - RCL 15 

SEEKPT GETX STO 08 

RDN + SEEKPT GETX 

STO 09 CLA 3 RCL 14 

X>Y? GTO 20 SF 02 

XEQ 11 2 / RCL 01 

RCL 02 + STO 00 / 

RCL 04 E + SEEKPT 

RDN XEQ IND 12 SAVEX 

GTO 22 

557+LBL 00 

SF 81 RTN 

560+LBL 01 

ST+ X RCL 87 RCL 86 - 

GTO 81 

566+LBL 84 

4 * CHS STO 86 

STO 87 -2 / RTN 

575+LBL 82 

RCL 86 RCL 61 * 

RCL 87 RCL 82 * + 4 

/ GTO 81 

586+LBL 83 

1.5 / RCL 82 Xt2 

RCL 87 * RCL 81 Xt2 

RCL 86 * - 6 / 

698+LBL 81 

RCL 86 / - RTN 

685+LBL 26 

2 - STO 88 

LIST 372 

689+LBL 11 

RCL 18 SEEKPT GETX 

GETX - LASTX GETX - 

XOY RCL 11 SEEKPT 

RBN GETX STO 01 / 

XOY GETX STO 82 / - 

3 * FS?C 82 RTN 

RCL 85 SEEKPT XOY 

SAVEX RCL 03 SEEKPT 

RCL 81 SAVEX RCL 84 

SEEKPT XOY RCL 02 

SAVEX + RCL 13 SEEKPT 

XOY ST+ X SflVEX E 

CCD - Computerclub Deutschland e.V. /Prisma 

ST+ 10 XEQ 25 BSE 88 

GTO 11 2 RCL 14 - 

ST+ 10 XEQ 25 

XEQ INB 12 SAVEX 

GTO 21 

666+LBL 04 

2 ST- 12 CLX STO 86 

STO 07 SF 84 

673+LBL 82 

SF 86 

675+LBL 83 

SF 83 XEQ 88 FS? 88 

CHS FC? 88 Xt2 2 / 

RCL 86 * + XOY 

SEEKPT RBN SAVEX 

RCL 11 3 - SEEKPT 

GETX RCL 15 E - 

SEEKPT RBN GETX STO J 

FC? 88 Xt2 2 / 

RCL 87 * - XOY 

SEEKPT XOY FS?C 88 

RTN SF 00 GTO 82 

717+LBL 00 


RCL 11 SEEKPT RBN 

GETX STO 01 FS?C 03 

RTN GETX ENTERt XO Z 

+ / * RCL 05 SEEKPT 

RBN SAVEX RCL 11 3 - 

STO 02 SEEKPT GETX 


RDN GETX RCL X GETX 

STO 1 + / * RCL 02 

SEEKPT RDN 

759+LBL 02 

SAVEX 3 STO 02 CLX 

FS? 00 GTO 03 

XEQ IND 02 SAVEX E 

ST+ 02 RCL 04 

771+LBL 83 

SEEKPT GETX RCL 81 

FC? 80 CHS + XOY 

SEEKPT XOY SAVEX 

RCL INB 02 3 - SEEKPT 

GETX RCL ] FC?C 00 

CHS + XOY SEEKPT 

XOY RTN 

795+LBL 81 

SF 80 XEQ 01 RCL 05 

SEEKPT RDN GETX XOY 

- RCL 05 XEQ 23 / - 

1.5 * CHS RCL 11 3 

- STO 02 SEEKPT RBN 

GETX + RCL 82 SEEKPT 

RDN SflVEX CLX SEEKPT 

GETX RCL 01 2 / - 

XOY SEEKPT XOY 

SAVEX RCL 83 3 - 

STO 82 SEEKPT GETX 

RCL 15 E - SEEKPT 

RDN GETX 2 / - 

RCL 02 SEEKPT RDN RTN 

853+LBL 21 

2 ST- 14 SIGN ST+ 83 

. SEEKPT GETX STO 02 

RCL 04 SEEKPT XOY 

GETX XOY / XOY 

SEEKPT RDN SAVEX 


RCL 02 / . SEEKPT 

RDN SAVEX RCL 13 E 

- STO 80 RCL 04 E 

ST- 03 - STO 01 

890+LBL 12 

E XEQ 25 ST+ 80 

ST+ 01 RCL 13 SEEKPT 

GETX RCL 83 SEEKPT 

RDN GETX RCL 01 

SEEKPT RDN GETX * - 

STO 02 RCL 05 SEEKPT 


RDN GETX RCL 00 

SEEKPT RDN GETX * - 

RCL 02 / RCL 13 



XOY SEEKPT RBN 

RCL 02 / SflVEX RCL 13 

RCL 14 E - X*Y? 

GTO 12 CHS XEQ 25 2 

ST+ 14 RCL 14 2 - 

STO 82 E - SEEKPT 

RCL 05 2 - GETX XOY 

SEEKPT E - XOY 

GTO 14 

964+LBL 13 

RBH XOY SEEKPT GETX 

XO Z SEEKPT XOY 

XO Z GETX ST* L 

XO L - 

LIST 348 

977+LBL 14 

SflVEX STO L RDN E 

ST- Z ST- Y DSE 02 

GTO 13 

986+LBL 22 

XEQ IND 12, SflVEX 

RCL 18 RCL 85 EHTERt 

GTO 15 

87.2.17

993+LBL 82 

994+LBL 84 

RCL 86 2 / RCL 84 


RCL 67 2 GTO 82 

1885+LBL 81 


GETX XOY - RCL 11 

SEEKPT RDN GETX 

STO 81 / RCL 66 - 

1.5 * FS? 88 RTN 


SAVEX GETX RCL 61 * 

2 / - RCL 81 / 

RCL 84 SF 05 

1838+LBL 23 


RCL 18 RCL 14 + 2 - 

SEEKPT FS?C 86 RCL 67 

GETX GETX XOY - 

RCL 15 E - SEEKPT 

RBN GETX FC?C 65 RTN 

STO 82 / RCL 87 - 

1.5 * CHS RCL 85 2 

- SEEKPT RBN GETX 

RCL 82 * 2 / - 

RCL 62 

1881+LBL 62 

/ RCL 65 E 

RBN RTN 

SEEKPT 

1889+LBL 83 



RDN GETX RCL 66 * 2 

/ - RCL 84 SEEKPT 

RDN SAVEX RCL 15 E 

- SEEKPT GETX RCL 87 

* 2 / GTO 63 

1118+LBL 80 


GETX FS?C 81 GTO 68 

STO 82 GETX - RCL 11 

SEEKPT RDN GETX * 

GETX / RCL 82 + 


SAVEX RCL 85 3 - 

SEEKPT GETX GETX XOY 

- RCL 15 2 - SEEKPT 

RDN GETX t GETX * 

1159+LBL 83 


RBN GETX + RTN 

1168+LBL 00 

RCL 61 * LASTX RCL 82 

- / SAVEX CHS RCL 02 

* RCL 01 / RCL 04 

SEEKPT RBN RTN 

87.2.18 


1185+LBL 15 

RDN XOY SEEKPT XOY 

GETX XOY SEEKPT XOY 

SAVEX RDN E ST+ Z + 

RCL 11 X*Y? GTO 15 

1282+LBL 24 


STO 88 ST+ X GETX 

ST- 68 + 3 ST/ 86 / 


GETX ST/ 88 STO 82 * 

CHS RCL 85 SEEKPT RBN 

GETX GETX XOY - 

RCL 82 / + RCL 83 


RCL 86 CHS RCL 13 

SEEKPT XOY SAVEX E 

XEQ 25 RCL 13 + 

RCL 14 X*Y? GTO 24 

RCL 13 CHS XEQ 25 

FC 84 GTO 17 

1254+LBL 88 

RCL 14 2 - 

GTO INB 12 

E FIX 5 

1261+LBL 81 

ST+ 12 + RCL 84 

SEEKPT + GETX RNB 

XOY SF 88 GTO 88 

1272+LBL 82 

ST- 12 RBN SEEKPT 

GETX 3 * XE8 61 

STO 81 RBN XEQ 81 2 

* RCL 15 E - SEEKPT 

RBN GETX * XOY 

LASTX Xt2 * + RCL 61 

+ RNB RCL 83 

1381+LBL 80 

SEEKPT RBN GETX RNB 

X=Y? GTO 17 + FS?C 08 

ST+ X 2 / STO 86 

STO 87 RCL 14 GTO 26 

1317+LBL 25 

ST+ 83 ST+ 84 ST+ 85 

ST+ 11 ST+ 13 ENB 

PLOT OF SPLINE 

X + 

Y

Mantisse 


HP41C 

Beim Aufraumen fiel mir wieder ein Zettel in 

die Hand, auf dem ich die Feststellung vermerkt 

hatte, daB nach Ausfuhrung der Funk 

tion Yf Xim Register Q die Mantisse der ZFahl 

in X zu finden ist. Das gilt auch, falls durch DA 

TA ERROR Oder OUT OF RANGE der Stack 

unverandert bleibt. Das nebenstehende Pro 

gramm niitzt nun diese Eigenschaft aus. Es 

hat nur 14 Bytes und iiberschreibt nur das T- 

Register. Um alle reellen Zahlen als Eingabe 

fur X verwenden zu konnen, muB man der 

Funktion YfX eine positive Basis iibergeben. 

Diese Forderung wird durch die 1 erfiillt, wel 

che auch die kiirzeste Rechenzeit mit sich 

bringt. Die Funktion YfX schreibt die Mantis 

se nach Q und die Zahl aus X nach LASTX. 

Hauptsachlich durch die Ausfuhrung der Ex 

ponentialfunktion bedingt betragt die Ausfiihrungszeit 

etwa 0,3s. 

LBL "MT" 

1 

XoY 

YfX 

XoQ 

END 

Karl Kolb 

Alte Weinsteige 17 

7000 Stuttgart 1 

llllllllllllllllllllllllllllllllllllll 


LIST41 

23 Zeilen, 627 Bytes, 

HP 71 

KAL: 40 

135 Zeilen, 334 Bytes, SIZE 002 

HP 41C, TIME, IL, ThinkJet 

LIST 11 BH5IC 627 05/02/85 18:06 

Alle HP-41-Besitzer, die auf den HP-71 mit 

ThinkJet-Drucker umgestiegen sind, wird der 

im Vergleich zum Thermodurcker erhohte Papierverbrauch 

des ThinkJet beim Listen von 

41er-Programmen stbren. Ich habe mir des 

halb die Routine LIST41 geschrieben, die es 

ermoglicht, uber IL das zu listende Programm 

vom 41 zunachst in den 71 als Textfile zu 

ubertragen und von dort aus formatiert auszu 

drucken. Wenn man das Editor- oder Forth- 

ROM hat, kann man mit dem Text-Editor das 

Programmfile noch erweitern (Zeile 120). 

Fiir alle anderen sei gesagt, dal3 FILESZR die 

Anzahl beschriebener Records zuriickgibt. 

Zur Not kann man die Zeilen beim Uberspielen 

mitzahlen und den Wert in Zeile 150 der 

Variablen L zuweisen. 

Man erhalt so letztendlich einen schonen 

dreispaltigen Ausruck. (siehe "KAL"). Man 

jKHLENDER f Or Horil 1985 

Mon » 1 a 15 22 79 

Die J 9 9 16 23 30 

Mit » 3 10 17 24 

Don » 4 11 18 25 

Pre » 5 1 i 9L 

19 26 

Sam » 6 13 20 27 

C .-, r. % 7 14 21 28 

K H L E N D E R f u r M a i 1 9 8 5 

Mon )\ 6 13 20 2 j 

Die » 7 14 21 28 

M11 » \ 8 15 '->'? 29 

Don \\ ^ 9 IB n y 30 

Pre ) 3 10 1 7 24 31 

Sam » 4 1 1 1 8 25 

Son 5 12 19 26 

sollte allerdings zuvor dafiir sorgen, daB alle KHLENDER fur Juni 1985 

nicht druckbaren Zeichen ausreichend ge 

kennzeichnet werden, was mit dem Editor 

kein Problem ist. 

Mon » 

Die » 

MH » 

3 10 

4 1 1 

5 1 2 

17 24 

18 25 

19 26 

Viel Spal3 mit dem Programmi! Don » 6 1 3 20 27 

Euer Oliver 

Pre » 

S a ro >> 1 

7 14 

8 15 

21 28 

22 29 

Son » i 9 16 23 30 

10 DESTROY ALL . DELAY 0 @ IF FILESZR. "HP41" )" @ GOTO 200 

210 PRINT USING "#,25A",L$ 

220 NEXT C i PRINT @ NEXT Z I IF M=60 THEN PRINT CHRS(12) 

230 P=P+1 @ GOTO 170 

GOTO 51 

87.2.19

Kalender—Druck 

v o n O l i v e r L o h k a m p 

CCD #2622 

08: 36 03.05 

01 LBL "KAL" 

02 "MM.JJJJ" 

03 PROMPT 

04 LBL "KALP" 

05 CLA 

06 Ala'IEW 

07 FIX 0 

08 SF 17 

09 CF 29 

10 DMY 

1 "#&k3S#&dD" # = 

12 PRA 

13 "KALENDER f#r 

14 OUTA 

15 XEQ IND X 

16 OUTA 

! 7 RCL X 

18 FRC 

19 E4 

20 * 

21 ACX 

9 7 "t&kest&d©" #= 

2^> ACA 

24 PRBUF 

25 CLX 

26 E2 

tZ i / 

28 E 

29 + 

30 ENTER" 

31 ENTER" 

32 ENTER" 

T"7 "?'*} 

w> O D tZ 

34 DATE+ 

W/fcJ FRC 

3B E 

37 + 

38 DDAYS 

39 STO 00 

40 GTO 13 

41 LBL 0! 

42 "Januar" 

#=20' 


43 RTN 

44 LBL 02 

45 "Februar" 

46 RTN 

47 LBL. 03 

48 " M t r z " f = 2 

49 RTN 

50 LBL 04 

51 "April" 

52 RTN 

53 LBL 05 

54 "Mai" 

55 RTN 

56 LBL 06 

57 "Juni" 

58 RTN 

59 LBL 07 

60 "Juli" 

61 RTN 

62 LBL 06 

63 "August!l 

64 RTN 

65 LBL 09 

BE "September 

67 RTN 

68 LBL 10 

69 "Oktober'1 

70 RTN 

7 1 LBL 1 1 

7-a "Nov ember" 

73 RTN 

74 LBL 12 

75 "Dezember" 

76 RTN 

t { 

78 

LBL 13 

o 

79 R " 

80 DOW 

81 X#0? 

82 GTO 03 

83 CLX 

84 7 

85 

86 

LBL 03 

- 

87 STO 01 

88 "Mon" 

89 XEQ 01 

90 "Die 

91 

92 

XEQ 01 

"Mit " 

93 XEQ 01 

94 "Dor " 

95 

96 

XEQ 01 

"Pre 1 

97 

98 

XEQ 01 

"Sap " 

99 

100 

XEQ 01 

"Sor " 

101 XEQ 01 

102 ADU 

103 RTN 

1 04 LBL 01 

" #=253 

105 "} 11 

106 OUJf 

107 CLn 

108 6 

109 RCL 01 

1 1.0 

1 i i 

LBL 00 

1 1 2 RCL 00 

1 13 Xr 

1 18 STO 01 

1 19 CLX 

120 Ei 

121 X>Yr 

1 2 2 " } ' 

1 23 ARCL . Y 

124 STO 02 

I _ ZJ LBL. 01 

126 

" > ,! 

17 7 LBL 02 

128 CLX 

129 7 

130 -f 

131 DSE Y 

1 "X'J GTO 00 

1 33 PRA 

134 ISG 01 

135 END 

134 bytes 

Programm fiir HP-41 mit TIME-Modul/HP-41 CX und Thinjet-Drucker 

Klinische Laboratorien 

LEUKO 

Leukozyten Differenzierung 


HP 41C, CLINICAL LAB X 

Dieses leistungsfahige Programm erlaubt, 

die ublichen 10 Leukozytenformen in der Mikroskop. 

Diagnostik, nach beliebiger Count- 

Vorgabe oder iiblich 100 Counts, in zugewie- 

87.2.20 

senen Speichern aufzuaddieren. Erreichen 

der Count-Vorgabe wird akutstisch signalisiert, 

mit automat. Ausdruck (Ohne Drucker 

erfolgt Anzeige) der einzelnen Counts, mit / 

ohne %-Anteil nach Wahl. 

Bei der mikroskopischen Diagnostik iiber 

nimmt das Programm die Aufaddierung der 

diagnostizierten Leukozuytenformen. Im 

USER-MODUS ist den Tasten A-J je eine 

Leukozytenform zugeordnet. Bei Erreichen 

der vorgegeben Counts (Akkustisch. Signal) 

erfolgt automatisch der Ausdruck (Anzeige) 

der einzelnen Leukozyten-Counts, mit / ohne 

prozentualem Anteil nach Wahl. Wenn zuvor 

O. Lohkamp (2622) 

Alte Bahnhofstr. 180a 

Postfach 700142 

4630 Bochum 7 

ein anderes Programm aus CLINICAL LAB 

XROM lief, so wird die Patientennummer au 

tomatisch ubernommen. 

Wie in CLINICAL LAB X Programmen, ist ein 

Reprint uber f E moglich. Als Printermodus 

empfehle ich Modus: MAN. 

* Die Erstellung eines beschrifteten Overlays 

ist sinnvoll. siehe Seite 8. 

Rechnerspezifisch ist pro Sekunde hoch 

stens ein Zahlvorgang moglich. 

Den Tasten A bis J, sowie a u. e diirfen keine 

Funktionen oder Programmen im USER-Mo 

dus zugeordnet sein. (ASN-Funktion)

Daten- Tasten 

eingabe 

CCD - Computerclub Deutschland e.V / Prisma 

Resultat Kommentare Tastenbelegung 

XEQ"LEUKO" PTNTi=? R/S bei Ubernahme aus CLIN LAB 

n n n n n n n R / S C O U N T S = ? 

k e i n e R / S % ? o h n e E i n g a b e a u t o m a t . 1 0 0 C o u n t s 

n n n R / S % ? P r o z e n t u a l e A n t e i l e b e r e c h n e n ? 

Y R / S 1 0 0 o . n n n T O N E 9 s i g n a l i s i e r t B e r e i t s c h a f t 

N R / S 1 0 O o . n n n T O N E 9 s i g n a l i s i e r t B e r e i t s c h a f t 

A bis J 1 Addieren im zugeordneten Speicher 

BEEP BEEP Counts-Vorgabe erreicht 

DRUCKEN PTNT* =nnnnnnnnnn 

LEUKODIFRNZ 

COUNTS=100o.nnn 

Ohne %-Berechnung erfolgt der MYELOBLAST=nn 

Aus- druckohne Blockbildung nn,n% wahlweise 

PRMYELOCYT=nn 

nn,n% wahlweise 

N MYELOCT= nn 


JUVENIL=nn 


NSTABKRN=nn 

nn.n% wahlweise 

NSEGMENT=nn 


BASOPHNnn 

nn,n% 

EOSINOPHL=nn 


LYMPHOCYT=nn 


MONOCT=nn 


BEEP Signal= Ausgabe Ende 

Funktion Taste Funktion Taste 

Myeloblast A Eosinophil H 

Promyelocyt 

N Myelocyt 

NJuvenil 

B 

C 

D 

Lymphohocyt 

Monocyt 

Reprint 

I 

J 

fE 

N Stabkern E Neuer Fall fA 

N Segment F 

Basophil G 

Kt-Pt")t 

mi PMH^t MM MM 

czi ca ess c&k ica 

r a r T T l " E a r T ^ f 

r~4 g ?~H trd 

Datenspeicher 

f E 

fA 

R E P R I N T 

PTNTj*=? 

Neuer Ausdruck nach Belieben 

Neuer Fall 

00 

01 

02 

03 

PTNT... 

Myeloblast 

Prmyelocyt 

N Myelocyt 

04 N Juvenil 

05 N Stabkern 

06 N Segment 

07 Basophil 

1 

2 

3 

Speicherzuordnung 

Programm eintasten/einlesen 

Starten 

XEQ SIZE 015 

XEQ Leuko PTNT£ = ? 

08 

09 

10 

11 

12 

Eosinophil 

Lymphocyt 

Monocyt 

Zahler 

LEUKO 

4 

5 

Ubernahme oder Eingabe 

keine Eingabe = automat. 100 

R/S 

R/S 

COUNTS=? 

%? 

13 

14 

DIFRNZ 

Counts 

6 

7 

8 

Eingabe Counts=/=100 

Prozentberechnung JA 

Prozentberechnung NEIN 

nnn R/S 

Y R / S 

N R / S 

%? 

10Oo.nnn 

10Oo.nnn 

9 Myeloblast A 1 

Promyelocyt B 1 

Neutrophiler Myelocyt C 1 

NeutrophilerJugendlicher D 1 

Neutrophiler Stabkemiger E 1 

Neutrophiler Segmentkerniger F 1 

Basophiler Granulocyt H 1 

Lymphocyt I 1 

Monocyt J 1 

Bei Erreichen der Count-Vorgabe erfolgt BEEP BEEP Ausdruck 

Bei Ausdruck Ende erfolgt BEEP STOP 

9a Ohne Druckerzur Fortfuhrung d.An - zeige R/S 

10 Erneuter Ausdruck erwunscht fE Ausdruck 

11 Neuer Fall fA PTNT*=? 

87.2.21

hULBL "LEIJKO" 

82+LBL 3 

S3 RCL 86 

84 CLRG 

85 "LEUKO " 

86 SSTG 12 

87 "DIFRHT" 

88 ASTO 13 

89 XROH "*" 

18 FIX 8 

11 SF 18 

1? "COUNTS" 

13 XROH w 

14 FC? 22 

15 188 

16 STO 1 

1? STO 14 

18 "?" 

19 flSTO Y 

28 "'/," 

21 XROM "*W 

22 FS?C 16 

23 SF 81 

24 TOHE 9 

25 RCL 14 

26 STOF 

27+LBL fl 

29 GTO 81 

38+LBL B 

32 GTO 61 

33+LBL C 

34 3 

35 GTO 81 

-36+LBL B 

37 4 

38 GTO 81 

39+LBL £ 

48 5 

41 GTO 81 

42+LBL F 

43 6 

44 GTO 81 

45+LBL G 

46 7 

47 GTO 61 

48+LBL H 

49 8 

58 GTO 81 

51+LBL I 

52 9 

53 GTO 81 

54+LBL J 

55 18 

56+LBL 61 

C ~ i 

■Ji I 

58 ST+ INP Y 

59 DSE 11 

68 STOP 

61 BEEP 

62 BEEP 

63+LBL e 

87.2.22 

M XROH "*FR" 

65 CF 29 

66 "COUNTS" 

f? PCL x 

68 XROM pp 

69 flDV 

78 "STICKFORHS" 

71 RCL 6! 

72 XROH "*9" 

73 FS? 81 

74 XEQ 82 

75 "SEGHEHTED" 

76 RCL 82 

77 XROH "*9" 

78 FS? 61 

79 XEQ 82 

88 "LtHPHOCYTS" 

81 RCL 83 

82 XROH "*9" 

83 FS? 81 

84 XEQ 82 

85 "EOSINOPHILS- 

86 RCL 84 

87 XROH "*9" 

88 FS? 81 

89 XEQ 82 

98 "BASOPHILS" 

91 RCL 85 

92 XROH "*9" 

93 FS" 61 

94 XEQ 82 

95 "HOHOCYTS" 

96 RCL 86 

97 XROH "*9" 

98 FS? 81 

99 XEQ 82 

188 "HYELOBLfiSTS" 

181 RCL 67 

162 XROH "*9= 

183 FS? 61 

184 XEQ 82 

185 "PR0HYEL0CT8" 

186 RCL 68 

187 XROH "*9" 

188 FS? 81 

189 XEQ 82 

118 "HYELOCYTS" 

111 RCL 69 

112 XROH "*9" 

113 FS? 81 

114 XEQ 62 

115 "HETfiHYELOCT" 

lib RCL 16 

117 XROH "*9" 

18 BEEF 

119 FC? 81 

128 STOP 

121+LBL 82 

122 RCL H 

123 XOY 

124 FIX 1 

125 SCH 

126 2 


127 18+X 

128 + 

129 CLfi 

138 9RCL X 

131 "\-%" 

Ingolf Seelemann 

Sudring 123 

4250 Bottrop 

132 RVIEH 

133 FIX 8 

134 flDV 

135 =EHD. 

HP-41 FORTH-ROMder 

Stand der Dinge II 

In Prisma 85.5.48 berichtete ich iiber ein geplantes 

8k-MCode-FORTH-Modul und bat gleichzeitig die 

Interessenten um entsprechende Kontaktaufnahme. 

Nun, das Interesse hielt sich in Grenzen, 23 Zu 

schriften trudelten bislang bei mir ein. Bis auf vereinzelte 

Ausnahmen haben alle Interesse .am Einschubmodul 

- EPROMS sind nicht gefragt. 

Um es vorweg zu sagen, Einschubmodule gibt es 

nicht - noch nicht. Der Autor (es ist tatsachlich ein 

Einzeltater) hat leider kein MLDL mehr, um die letz 

ten Bugs zu erwischen. Mindestens 5 dieser netten 

kleinen Tierchen tummeln sich noch im Code. Der 

Rest aber lauft und muBte nun getestet werden. 

Deshalb bitte ich MLDL-Besitzer, die Zeit und Lust 

haben beim Testen zu helfen, um Kontaktaufnahme. 

Das Modul liegt als Cassettenfile fiir das IL- 

Laufwerk vor. 

Udo Keller 

Kamekestr.1 

5000 Koln 1 

HP 41 Notizen 

Bugs im Navigation Modul B1 

Wahrend der Feiertage lief ich in folgenden 

schwerwiegenden Fehler des Moduls: Berechnet 

man mit Hilfe von SIGHT erkennt dann hieran, dafi 

es sich um den Mond handelt und subtrahiert von 

der berechneten Hohe des Mondes PA und die 

Augmentation. So weit, so gut. Wird die Mond- 

Routine jedoch von einem .anderen Programm auf 

gerufen, z.B. BODY, wird das Rag 07 nicht ge- 

I6scht,denn das tut nur SIGHT. Rechnet man dann 

irgendwann spater mit SIGHT z.B. einen Fixstem, 

wird auch von seiner Hohe die Mondparallaxe sub 

trahiert! Es fehlt in Body am Anfang ein CF 07, oder 

ein Hinweis in der Bedienungsanltg. Wem sind 

sonst noch Fehler aufgefallen? 

32 RAM-Box von W&W 

Die Box wird normalerweise so geliefert, daB das 

zugehorige Operating System auf der XROM Nr. 

14 steht. Dies ist jedoch gleichzeitig die Nummer 

des Navigation Moduls, so daB also beide nicht 

gleichzeitig vortranden sein durfen. Man kann je 

doch auf Wunsch die Rambox so konfiguriert ertialten, 

daB das Operating System Nr. 30 erhalt. Ange 

ben! Ein erheblicher Nachteil der Rambox ist es, 

daB man irgendwo in der Box stehende Program 

me nicht editieren kann. Es kann immer nur das je 

weils letzte Programm geschrieben/gelesen/geloscht 

werden, was man manuell tun muB, da die 

Copy-Funktion nicht programmierbar ist Ist jemanden 

hierzu etwas eingefallen? Wer hat einen Edi 

tor? Ein Sortierprogramm? 

Private 

Wie kann man als private geschutzte Module trotz 

dem ansehen? 

Bezuglich eines Beitrages von mir: Ich habe eine 

ganze Reihe von Navigationsprogrammen fur 

mich geschrieben. Wer hat Interesse??? 

Dr. Helmut Knopp 

KariPfitzerStr.29 

7032 Sindelfingen 

Harmonische Analyse 

und Synthese 

520 Zeilen, 1088 Bytes, 156 Regs., SIZE 

2N+11 

HP41CV, X-F/M, Drucker 

Heute mochte ich Euch ein 41er-Programm 

zur Harmonischen Analyse und Synthese 

vorlegen. 

Sicherlich gibt es zu diesem Thema bereits ei 

ne ganze Menge von Programmen; ich habe 

mir viele davon angesehen, aber solche, die 

vielseitig und benutzerfreundlich sind und die 

auch Nichtexperten ansprechen und ihnen 

Vergniigen bereiten, habe ich noch nicht ge 

troffen. 

Um was geht es? Von periodisch sich wiederholenden 

Vorgangen besitzt man eine Abbil 

dung oder eine Wertetafel, und man mochte 

gerne wissen, welche Schwingungsfrequenzen 

am Zustandekommen des Schwingungsbildes 

beteiligt sind (Analyse). Oder man 

weiB, welche Frequenzen an einer Schwingung 

zusammenwirken, und man mochte das 

Schwingungsbild erhalten (Synthese). Um 

das jeweilige Ergebnis anschaulich zu ma 

chen, mag man ein entsprechendes Schaubild 

wtinschen (z.B. Balkendiagramm). Und 

nicht zuletzt: man mochte auch Zwischenwerte 

berechnen konnen, wobei sich oft dadurch 

Probleme ergeben konnen, daB die Schwingungsforscher 

als Abszissen-Einheit gerne 

2tt nehmen, wahrend der Einsteiger damit 

nur wenig anfangen kann. Das gesamte Aufgabengebiet 

ist eng mit dem Namen FOU 

RIER verbunden, der die Formeln zur Bestim 

mung der Koeffizienten angegeben hat, so 

wie man sie in jeder Formelsammlung wiederfindet. 

Unser Programm verlangt, daB man zu einer 

geraden Anzahl (2N) aquidistanter MeBpunkte 

die entsprechenden Y-Werte kennt. Mit"A" 

(alle globalen Labels bestehen aus einer 

Buchstabentaste, der sie auch zugeordnet 

sind, und einem Space!) startet man das Pro 

gramm, richtet die Arbeits- und Wertespeicher 

ein und legt einen Datenfile an. Mit "A" 

kann man den File spater wieder zuriickrufen 

und damit wieterrechnen. Mit "B" gibt man die 

Y-Werte ein. Das Programm erganzt sie so, 

daB alle Werte positiv werden, der Minimalwert 

= 0 ist. Mit "b" (ohne Unterbrechung) 

schlieBt sich die Ausrechnung an. Fiir das 

spatere Balkendiagramm wird ein Maximalwert 

der Y, aber auch der Koeffizienten |a| 

bzw. |b| errechnet. Deswegen sollte man 

nachtraglich nur auf dem vorgezeichneten 

Eingabeweg Werte einspreichern. Nach der 

Ausrechnung ist der Datenfile mit den Werten 

der Koeffizienten geladen. Mit "c" kann man

LEUKO (Seelemann) 

Benotigte Programmregister: 51 

Z e i l e l ( 1 - 4 ) C C D - B a r c o d e s 

Z e i l e 2 ( 5 - 7 ) C C D - B a r c o d e s 

IIIIIIIIIIIIIIIIIIIII 

Zeile 3 (7-12) 


Zeile 4 (12-16) 

illlllflllllll 

CCD-Barcodes 

1 

CCD-Barcodes 

Z e i l e 5 ( 1 7 - 2 3 ) C C D - B a r c o d e s 




II! IIII I iiiii I II Iiiiii III Iiiii! 


Z e i l e l O ( 5 5 - 6 4 ) C C D - B a r c o d e s 

Z e i l e U ( 6 4 - 6 8 ) C C D - B a r c o d e s 

Z e i l e 1 2 ( 6 9 - 7 1 ) C C D - B a r c o d e s 

llllllllll MIIIIIII Illll llll'll:!' 



I! Z e i l e 1 5 ( 8 0 - 8 2 ) C C D - B a r c o d e s 

mn Z e i l e 1 6 ( 8 3 - 8 5 ) C C D - B a r c o d e s 


Illlllllllllllllllllllllll 



■III' 

Z e i l e 2 0 ( 9 6 - 1 0 0 ) C C D - B a r c o d e s 

Zeile 21 (100-104) CCD-Barcodes 

iiiiii ii in ii ii 11 ii lui iiiii ii 


Z e i l e 2 3 ( 1 0 5 - 11 0 ) C C D - B a r c o d e s 

i i i 11 i i nulum i i i i 

Z e i l e 2 4 11 0 - 11 4 ) C C D - B a r c o d e s 


llllll I llllillllllil Illll hit II 

Z e i l e 2 6 ( 11 6 - 1 2 5 ) C C D - B a r c o d e s 


llllllll 

Z e i l e 2 8 ( 1 3 5 ) C C D - B a r c o d e s 

MT-Mantisse (Kolb) 



Zeile 2 (6) CCD-Barcodes 


lllllllllll 

BP-Barcode Plotten (Hiimpfner) 



Zeile 2 (5-11) 

lllllllllllllllll 

Zeile 3 (12-20) 

Zeile 4 (21-29) 

lllllllllll 

Zeile 5 (30-40) 

Zeile 6 (41-48) 

ll! I!I ll .III 

Zeile 7 (48-56) 

l 

Zeile 8 (56-63) 

CCD-Barcodes 


CCD-Barcodes 

I llllll ll 

CCD-Barcodes 

llllllll III III 

CCD-Barcodes 


CCD-Barcodes 


CCD-Barcodes 

I llllll 

CCD-Barcodes 


lllilll llll llll llllll llll 

Z e i l e l O ( 6 9 - 7 8 ) C C D - B a r c o d e s 

Z e i l e U ( 7 9 - 8 6 ) C C D - B a r c o d e s 

DBL1-Doppelt Genaue Division (Hannig) 



Zeile 2 (4-13) 


Zeile 3 (14-19) 

CCD-Barcodes 


CCD-Barcodes 



lllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllll 



llllll lllilll lllllllllll llllllll 


PMTDV1 Prompt Decimal (Farwig) 



Zeile 2 (3-9) 

Illll 

Zeile 3 (9) 

CCD-Barcodes 

lUllllllllllllllllllli 

CCD-Barcodes 

PMTDV2 Prompt Decimal (Farwig) 




87.2.25

NMR-Spektroskopie (Praas) 



Zeile 2 (5-12) 

IIX I 

Zeile 3 (12) 


Zeile 4 (12-15) 

CCD-Barcodes 


CCD-Barcodes 

i milium 

CCD-Barcodes 



.IllmIII

ZeileU 

llllllllll 

Zeile12 

Zeile13 

Zeile14 

Zeile15 

lllllllllll 

Zeile16 

Zeile17 

Zeile18 

Zeile19 

Zeile 20 

Zeile 21 

Zeile 22 

Zeile 23 

l Zeile 24 

Zeile 25 

llllllll 

Zeile 26 

lllllllllll 

Zeile 27 

Zeile 28 

Zeile29 

Zeile 30 

Zeile 31 

( 1 8 - 2 0 ) C C D - B a r c o d e s 

( 2 0 - 2 2 ) C C D - B a r c o d e s 

ir 

( 2 2 ) C C D - B a r c o d e s 

( 2 3 - 2 4 ) C C D - B a r c o ' d e s ' 

I 

( 2 4 - 2 6 ) C C D - B a r c o d e s 

( 3 2 - 3 7 ) C C D - B a r c o d e s 

I 

( 3 8 - 4 4 ) C C D - B a r c o d e s 

( 4 5 - 5 6 ) C C D - B a r c o d e s 

( 5 7 - 6 3 ) C C D - B a r c o d e s 

II IIIIIIIIIIIIIIIIIIIII 

( 6 3 - 7 0 ) C C D - B a r c o d e s 

( 7 6 - 8 1 ) C C D - B a r c o d e s 


( 8 2 - 8 5 ) C C D - B a r c o d e s 

( 8 6 - 9 4 ) C C D - B a r c o d e s 

lllllllllll 

( 9 5 - 1 0 2 ) C C D - B a r c o d e s 

llllllll llllll III 

( 1 0 2 - 1 0 9 ) C C D - B a r c o d e s 

( 11 7 - 1 2 3 ) C C D - B a r c o d e s 

XX,,,,,! 

( 1 2 4 - 1 3 2 ) C C D - B a r c o d e s 

III 

( 1 3 2 - 1 3 9 ) C C D - B a r c o d e s 

Zeile 32 ( 1 3 9 - 1 4 6 ) C C D - B a r c o d e s 




I l 

( 1 6 0 - 1 6 8 ) C C D - B a r c o d e s 

Z e i l e 3 7 ( 1 7 7 - 1 8 1 ) C C D - B a r c o d e s 

mi 





Ill 



1 






ilir Z e i l e 4 7 ( 2 4 9 - 2 5 5 ) C C D - B a r c o d e s 




llllll III II Illll III I Illll II lllllllllll llllllll MIIIIIMII llllllh III 






llllllll llll Illll 11IIII III 111 






lllllllll IIIIIIIII llllll III 



llllllll Illll llll llllllll 



I 



ir 



Il Z e i l e 6 9 ( 3 9 4 - 4 0 2 ) C C D - B a r c o d e s 

Z e i l e 7 0 ( 4 0 2 - 4 11 ) C C D - B a r c o d e s 


i i i i i 1 i i mm i in mi mili mui 


Zeile 74 (434-441) CCD-Barcodes_ 



1 

87.2.27

download PDF (25MB)

Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.

Template löschen?

Als Template speichern?