aS#nf8ÄlÄ|ig3Sp8 miMs msmrnm bx, ?J:'\ Nr’6/e6: DM 6.50, sfr 6.50, ÖS 50,Ht 5900, hfl T.SO i¥» mm wM LV *■: ;vj Wmw'^W^ Igr« mm PSS ?: 'V r patÄ »#ip F(>-V;V--,V*^ ^ KIIMi ia .^_ ^PUBLr|<ATlOM Sie erhalten Ihren »peeker« bei Ihrem Zeitschriftenhändler am Bahnhof ^ bei allen Apple-Händlern * und natürlich beim Verlag. Denn der sicherste Weg, keine Ausgabe des »peeker« zu versäumen, ist noch immer das Abonnement zum Jahresvor¬ zugspreis. Dabei sparen Sie bares Geld. Beachten Sie in diesem Zusammenhang unsere Anzeige auf Seite 9, oder rufen Sie uns an: Telefon 0 62 21/489-281 (Peeker-Leser- service). HÜthiS Dr. Alfred Hüthig Verlag, Im Weiher 10, 6900 Heidelberg PUBLIKATION BTX *51851# EdiroRiAl Kyan-Pascal Version 2.01 A Während der Drucklegung dieser Peeker-Ausgabe ist Kyan-Pascal in der Version 2.01 A eingetroffen, wel¬ che die in diesem Heft beschriebe¬ nen Compiler-Fehler behebt. Die Än¬ derungen berühren nur die Dateien PC, LIB und STDLIB.S, die zusätz¬ lich auf die Kyan-Club-Disk #A auf¬ genommen wurden, die verschiede¬ ne Übungsprogramme sowie unsere FID-Library enthält (Preis DM 20,-; siehe Club-Rundschreiben #2 vom 15.5.86). Wenn Sie die Club-Disk #A nicht kaufen wollen, können Sie die geänderten 2.01A-Dateien kostenlos anfordern, falls Sie ein Diskettendu- piikat der Disk 1, Seite 2 und eine Photokopie unserer Originalrech¬ nung zur Version 2.0 als Kaufbeleg einschicken. Die neuen Dateien wer¬ den dann auf Ihr Duplikat überspielt. Kyan-Besteller, die ab 1.6.86 belie¬ fert werden, erhalten automatisch die neue Version. Das Adipositas-Syndrom Im Vorfeld der Einführung des Apple-IE Nachfolgers, der Mitte September das Licht der Welt erblicken soll, möchte ich einem Problem nachgehen, das mir seit geraumer Zeit Sorge bereitet, nämlich dem paradoxen Trend in Richtung mehr Speicherkapazität und mehr Prozessorleistung bei weniger Mi¬ kro-Leistung. Zunächst zur Speicherkapazität: 128K wä¬ ren für einen 16-Bit-Mikrocomputer wohl et¬ was zu mager. Folglich werden Maschinen mit 512K und mehr angeboten. Doch hat man damit genügend freien Speicher? Keineswegs! Denn die Programme der Software-Häuser entwickeln sich immer mehr zu aufgedunsenen Speicherfressern, Das alte Visicalc beanspruchte für sich nicht viel mehr als 16K. Der Rest des Speichers stand für das Betriebssystem und die Tabel¬ lendaten zur Verfügung. Programme wie Lo¬ tus 1-2-3 usw, nehmen regelmäßig 200K bis 400K in Beschlag, so daß unter Abzug des Betriebssystems kaum noch Platz für die eigentlichen Daten bleibt. Beispielswei¬ se belegt Framework II, „die Offenbarung für PC-Anwendungen“ (so „Computer Per¬ sönlich“, 12/86, S. 115), für das reine Pro¬ gramm 380K, Für mich ist dies keine Offen¬ barung, sondern eher eine Apokalypse. Ähnliches erleben wir beim Atari; Beim 512K-BASIC meldet der Fre-Befehl ca. 30K, also weniger als beim 48K-Applesoft. Mit dieser Fettsucht, die man als „Micro- Adipositas“ bezeichnen könnte, geht eine Behäbigkeit in der Programmausführung einher, die bei größeren Datenmassen schlechthin zur Farce wird. Wenn man beim Wordstar 3.4 auf dem IBM-PC-XT 1000 A’s eingibt und diese dann über „CtrI-QA“ in 1000 B’s verwandeln will, so muß man exakt 309 Sekunden warten, also länger als beim alten Wordstar 3.0 unter CP/M mit 6MHz- Z80, Zum Vergleich ist der Fastwriter mit Accelerator in 0,125 Sekunden fertig und damit knapp 3000mal schneller als der Wordstar 3.4. Trotzdem gilt der Wordstar 3,4 noch als „schnell“ im Vergleich zum Wordstar 2000, bei dem man sich bis zu 15 Minuten gedulden muß, bis ein Block verschoben worden ist. Und der Sprung zum Ende eines sehr lan¬ gen Textes dauert beim Wordstar 2000 4-5 Minuten gegenüber „nur" ca. 40-50 Se¬ kunden beim Wordstar 3.4. Nun könnte man mit Recht einwenden, daß diese Geschwindigkeitstests praxisfremd sind, denn welcher Anwender ersetzt schon 1000 A’s durch 1000 B’s. Tatsächlich sind die A’s selbst unwichtig, doch was passiert, wenn nicht nach A’s, sondern nach Adres¬ sen gesucht werden soll? Zu diesem Zweck habe ich-ebenfalls auf einem IBM-PC-XT- eine dBase-Testdatei mit 3000 Datensätzen mit einem 15stelligen Zufallsstring-Feld (Typ C) erzeugt und im Anschluß daran auf der Festplatte unter dBase III indiziert, was eine schiere Ewigkeit dauerte. Doch es kam noch schlimmer: Der LIST-Befehl, etwa LIST FOR FELD = „Z" - benötigte jetzt re¬ gelmäßig über 3 Minuten, gleichviel ob dBase III einen Record findet oder nicht. Zurück zur praktischen Anwendung: Hier umfaßt ein Datensatz üblicherweise mehr als 1 Feld, und die Felder selbst sind meist mehr als 15 Zeichen lang. Außerdem benö¬ tigt man in der Regel mehr als eine Indexda¬ tei. Zudem könnte man bei einer lOM-Fest- platte auf die Idee kommen, eine Adreßdatei mit 10.000 Datensätzen anzulegen. Dann steigen jedoch die Verarbeitungszeiten von dBase III exponentiell an. Wartezeiten von weit mehr als einer Minute für das Einfügen von einer einzigen Adresse werden nun¬ mehr zur Regel, und den LIST-FOR-Befehl kann man nur noch vor Geschäftsschluß eingeben: Am nächsten Morgen kommt man dann gerade rechtzeitig zur Anzeige der gefundenen Adressen ins Büro. Woher kommt es nun, daß Wordstar 3.0, dBase III, Easy usw. gigantisch aufgedun¬ sen und zugleich haarsträubend langsam sind? Liegt es am IBM-PC oder am MS- DOS? Mitnichten! Es liegt einzig und allein daran, daß diese Programme in höheren Programmiersprachen erstellt worden sind. So wurden etwa dBase III und Wordstar 3.0 in C geschrieben, und Easy - das neueste „fat-and-slow“-Produkt aus dem Hause Mi¬ croPro - sogar in Modula 2. Nichts gegen C und Modula 2, aber der von höheren Spra¬ chen erzeugte Objektcode stellt nun einmal keinen Ersatz für kompakte und schnelle Programme dar, die direkt in Assembler ge¬ schrieben wurden. Und wenn dann noch von MicroPro behauptet wird, daß in den Wordstar 2000 fünfzig Mannjahre gesteckt wurden (s. „Computer-Magazin“, 4/86, S. 44), dann muß man sich angesichts des dürftigen Resultats fragen, welche Amateu¬ re hier am Werk gewesen sind, denn selbst aus einer Compilersprache kann man eini¬ ges herausholen, wenn man intelligente Al¬ gorithmen zur Anwendung bringt. Ich wünsche mir für Sie, liebe Leser, daß sich die Software-Häuser beim Apple-Il- Nachfolger diesem unerquicklichen Trend nicht anschließen. i Ulrich Stiehl Impressum Peeker 3. Jahrgang 1986 ISSN 0176-9200 HiMMa PUBUKATON © für den gesamten Inhalt einschließlich der Programme Dn Alfred Hüthig Verlag, Heidelberg 1986 Verleger und Herausgeber: Dipk-Kfm. Holger Hüthig Geschäftsführung Zeitschriften: Heinz Melcher Chefredakteur: Ulrich Stiehl (us) Telefonnummern; Zentrale: 06221/489-1 Redaktion: 06221/489-3 52 Anzeigen: 06221/489-2 06 Abonnement: 06221/489-283 Software: 06221/489-231 Bücher: 06221/489-353 (Bestellungen bitte nur schriftlich) Abonnement: Der Abonnent kann seine Bestellung innerhalb von 7 Tagen schriftlich durch Mitteilung an den Dr. Alfred Hüthig Verlag GmbH, Postfach 102869, 6900 Heidelberg 1, widerrufen. Zur Fristwahrung genügt die rechtzeitige Absendung des Wider¬ rufs (Datum des Poststempels). Das Abonnement verlängert sich zu den jeweils gültigen Bedingungen um ein Jahr, wenn es nicht zwei Monate vor Jahresende schriftlich gekündigt wird. Die Abonnementsgelder werden jährlich im voraus in Rechnung gestellt, wobei bei Teilnahme am Lastschriftabbu¬ chungsverfahren über die Postscheckämter und Bankinstitute eine vierteljährliche Abbuchung möglich ist. Nichterscheinen infolge höherer Gewalt berechtigt nicht zu Ansprüchen gegen den Verlag. Grafik PLOT 3.E Ein neuer Funktionsplotter für den Apple lle/c mit Doubie-Hires-Grafik von Hans-Martin Eng 6 ProDOS EDIT Übungen zum Disk-Editor 24 Megaboard- und AFDC-Massenspeicher Mit ProDOS-Backup-Programmen für die MDB-Festpiatte und das Erphi-Subsystem von Uirich Stiehl 30 UCSD SUPERDUMP für Apple Pascal 1.1 und 1.2 Grafik-Ausdruck für Epson-FX80 und imagewriter I von Jürgen Geiß 40 Kyan Kyan-Pascal 2.0 Tips und Tricks von Uirich Stiehl 47 CP/M Adreßverwaltung mit dBase II Listing des überarbeiteten Quelltextes von Ing. (grad.) Ernst Fischer 52 Produkte Erfahrungs- und Testberichte DTACK-68000-Board Ein Erfahrungsbericht von Wolfgang Trier 58 Plusworks Appieworks auf dem Apple 11+ Ein Erfahrungsbericht von Herwig Cuypers 60 Z-RAM für den Apple llc Ein Erfahrungsbericht von Ulrich Tönnies 62 Sidekick Macintosh-Büro-Manager 66 Z80+ Card getestet von Hans-Martin Eng 67 Leserbriefe Jörg Bliesener beantwortet CP/M- und Wordstar-Leserbriefe 68 Kurzberichte Analytisches Inhaltsverzeichnis der Peeker-Sammeldisketten #1 bis #18 64 Anschrift: Dr. Alfred Hüthig Verlag GmbH Im Weiher 10, Postfach 10 28 69 6900 Heidelberg Telefon (06221) 489-1 Telex 4-61727 hued d. Telefax (06221) 489279 BTX * 51851 # Vertrieb: Erscheinungsweise: 12 Hefte jährlich, Erscheinungstag jeweils 1 Woche vor Monatsbeginn, Jahresabonnement Inland DM 72,-, einschl. MwSt und Versand kosten. Jahresabonnement Ausland DM 72- plus DM 18,- Versandkosten. Einzeiheft DM 6,50 Vertrieb Handel: MZV - Moderner Zeitschriften Vertrieb GmbH Breslauer Str. 5, Postfach 1123, 8057 Eching b. München, Tel. 089 /31 90 0613, Telex 0 522 656 Vertriebsleitung: Walter Menzel, Tel. (06221) 489280 Bankverbindungen: Zahlungen: an den Dr. Alfred Hüthig Verlag GmbH, D-6900 Heidelberg 1: Postgiro¬ konten: BRD: Ludwigshafen 4799-673, BLZ 54510067; Österreich: Wien 7555888; Schweiz: Basel 40-24417; Niederlande: Den Haag 1 45728; Italien: Mailand 59689208; Belgien: Brüssel 10841261; Dänemark: Kopenhagen 6034969; Nonwegen: Oslo 1994243; Schweden: Stockholm 547776-5 Bankkonten: Landeszentralbank Heidel¬ berg 67207341; BLZ 67200000; Deutsche Bank Heidelberg 0265041; BLZ 672 70003; Bezirkssparkasse Heidelberg 20451, BLZ 67250020. Herstellung: Produktionsleitung; Gunter Sokollek Gestaltung: Rainer Schmitt Titelbild: Werner Hable Satz und Druck: Heidelberger Verlagsanstalt Printed in Germany „Peeker" ist eine unabhängige Zeitschrift. Sie ist nicht verbunden mit der Firma Apple Computer, Inc. oder der Apple Computer GmbH. APPLE, das Apple-Zeichen und MAC sind Warenzeichen der Firma Apple Computer, Inc, und MACINTOSH ist ein Warenzeichen, in Lizenz vergeben von der Firma Mclntosh Laboratory an die Firma Apple Computer, Inc. ' .*0^ 6®^ lö^^ -'?t> V- .f#-" .->'t^ , v^ 6 Peeker 6/86 3. Kurze technische Erläuterungen 3.1. zum Applesoft-Programm 3.2. zu den Assemblerroutinen 4. Anweisungen zum Ausdrucken der Grafiken mit SUPERDUMP 5. Erläuterungen zur Anpassung von PLOT.3,E an individuelle Gerätekonfigura¬ tionen 1. Minimalkonfiguration und Installation Als Minimalkonfiguration benötigen Sie entweder einen Apple Ile mit erweiterter 80-Zeichenkarte oder einen Apple llc. Als Option können Sie mit einem grafikfähigen Matrixdrucker, für den Sie SUPERDUMP angepaßt haben, die von PLOT.3.E erstell¬ ten Grafiken ausdrucken. Lesen Sie dazu bitte Abschnitt 4 und 5. PLOT.3.E ist auf die Benutzung unter DOS 3.3 (oder einem verwandten Betriebssystem) zugeschnit¬ ten, ist jedoch auch unter ProDOS lauf¬ fähig. Zur Installation von PLOT,3.E unter DOS 3.3 gehen Sie bitte wie folgt vor: 1. Booten Sie DOS 3.3 (oder besser Di- versI-DOS) 2. Geben Sie ein: NEW 10 NEW POKE 40514,20. 3. Legen Sie nun eine Leerdiskette ein und initialisieren Sie sie mit INITPLOT.3.PRO. Wenn diese Diskette gebootet wird, erwar¬ tet DOS 3.3 einen EXEC-File als HELLO- Programm. 4. Löschen Sie den File wieder mit DELETE PLOT.3.PRO. 5. Transferieren Sie nun mit FID oder ei¬ nem anderen File-Kopierprogramm fol¬ gende Files auf die Leerdiskette. PLOT.3.PRO PLOT,3.E PLOT.BX PLOT.HELP.1 PLOT.HELP.2 PLOT.HELP.3 PLOT.HELP.4 PLOT.HELP.5 Diese Files (und noch mehr) befinden sich auf der Sammeldiskette. Ich würde Ihnen nicht empfehlen, all diese Files selbst ein¬ zutippen, es sei denn, Sie können die Arbeit auf mehrere Freunde verteilen. Wollen Sie es dennoch wagen, so beach¬ ten Sie bitte die Flinweise vor den Listings. Fiaben Sie dies ailes bewerksteiligt, läuft PLOT.3.E automatisch an, wenn Sie die Diskette booten. I. qRAfik 2. Bedienungsanleitung Diese Anleitung ist wenig sinnvoll, wenn Sie die Beispiele nicht selbst ausprobie¬ ren. Setzen Sie sich also an Ihren Rechner und werfen Sie PLOT.3.E an, am besten durch Booten einer Diskette, die wie oben beschrieben initialisiert wurde. Ansonsten mit EXEC PLOT.3.PRO. Nach kurzer Zeit erscheint auf dem Bild¬ schirm ein kurzes Startmenü. Der Rechner wartet nun auf einen Tastendruck. Danach erscheint auf Ihrem Monitor die Frage „Wünschen Sie eine Kurzeinführung? Be¬ tätigen Sie bitte ’J’ oder ’N’.“ Eine ähnli¬ che Frage wird PLOT.3.E beim Eintritt in jeden größeren Programmteil stellen. Fra¬ gen, die Sie mit „J“ oder „N“ beantworten müssen, erkennen sie durch ein ange¬ hängtes ,.<J/N>“. Tippen Sie nun auf J, so werden die Erläuterungen zum betref¬ fenden Programmteii von der Diskette auf dem Bildschirm ausgegeben. Da die Be¬ dienungsanleitung, die Sie jetzt gerade le¬ sen, wesentlich ausführlicher ist, können Sie auf N tippen und somit auf die Erläute¬ rungen verzichten. Danach erscheint auf dem Bildschirm die Frage; „Funktionseingabe: Wünschen Sie Erläuterungen? <J/N>“. Wählen Sie! Später werden Sie aufgefordert, die Funk¬ tion einzugeben, deren grafische Darstel¬ lung Sie wünschen. Als erstes Beispiel tippen Sie bitte SIN(X) ein, gefolgt von einem Druck auf die Return-Taste. Fiaben Sie dabei keinen Fehler gemacht, er¬ scheint die Frage „Ist das richtig? <J/ N>“. Tippen Sie auf A/, so können Sie Ihre Eingabe korrigieren. Ist Ihnen jedoch ein gravierender Fehler unterlaufen (z.B. eine nicht geschlossene Klammer), ertönt ein Piepston und PLOT.3.E fordert Sie auf, den Fehler zu korrigieren. Als nächstes fragt PLOT.3.E, ob Sie Erläu¬ terungen zur Eingabe der Darstellungs¬ grenzen abrufen wollen. Ist das erledigt, geben Sie bitte nacheinander, erst für die X-, dann für die Y-Achse, deren Anfangs¬ und Endwert ein. in unserem Beispiel wählen wir 0, 6.28, -1.1, und -hl.1. Tippen Sie das genauso ein, gefolgt von einem Return. Unterläuft Ihnen bei der Eingabe ein Syntax-Fehler, erfolgt eine Fehlermel¬ dung, und Sie werden gebeten, die Einga¬ be zu wiederholen. Ist die Eingabe erfolg¬ reich abgeschlossen, werden auf der un¬ teren Flälfte des Bildschirms die festgeleg¬ ten Darstellungsgrenzen gezeigt. Ist alles nach Wunsch eingegeben, tippen Sie bitte auf J, tippen Sie jedoch auf N, können Sie die Eingabe wiederholen. (Wählen Sie vor¬ erst die Option der vollständigen Neuein¬ gabe. Die zweite Option führe ich Ihnen später vor.) ProDOS-Editor 1.0 Applesoft-Editor unter ProDOS-Betriebssystem von U. Stiehl 1984, Diskette und Manual, DM 98,- ISBN 3-7785-1024-X Mit diesem neuen Editor - übrigens der bislang einzige deutsche Pro¬ DOS-Editor - wird dem Applesoft- Programmierer ein Werkzeug zur ef¬ fektiven Programmierung unter dem Betriebssystem ProDOS gegeben, denn die früheren Editoren sind alle¬ samt unter ProDOS nicht mehr lauf¬ fähig. Unter anderem sind folgende Fea¬ tures implementiert worden: - Zeilenorientierter Editor mit jedem er¬ denklichen Redigierkomfort (Insert, Delete, Tab, Restore, freie Cursorbe¬ wegung in allen vier Richtungen. Einga¬ be von CtrI-Buchstaben in Applesoft- Zeilen usw.) - Renumber (Zeilen-Umnumerierung) - Xreference (sortierte Variablenliste) - Suchen von Tokens, Strings und Varia¬ blen - dezimale und hexadezimale Umrech¬ nungen - Ausführung von Monitorbefehlen aus dem Editor heraus - Listen des Applesoft-Programms in speicherinterner Form als Hex-Dump - Suchen von Hex-Folgen, Adressen oder Speicherstellen im gesamten RAM-Bereich einschließlich der Language-Card - frei definierbare Tastatur-Macrobefehle Der Applesoft-Editor liegt in einem von ProDOS geschützten Bereich und läßt sich per Tastendruck vor¬ übergehend abschalten und ebenso einfach wieder aktivieren. Gerätevoraussetzung: Apple ll-i-, Ile oder llc, 40 Zeichen/Zeile Hinweis: Der Applesoft-Editor für DOS 3.3 befindet sich auf Sammel¬ disk # 16 für Fortsetzungsbezieher. Siehe Peeker 4/86, S. 13. Hüthig Software Service, Postfach 10 28 69, D-6900 Heidelberg Peeker 6/86 7 Auf dem Bildschirm müßte nun folgende Zusammenfassung erscheinen: „Funktion: Y=SIN(X) Parameter: Es werden keine Parameter verwendet. Darstellungsgrenzen: X: 0 .. 6.28, Y: -1.1 .. 1.1" Wieder folgt die Frage, ob alles richtig ist. Wenn Sie nun auf .7 tippen, wird der Bild¬ schirm gelöscht, ein Achsenkreuz ge¬ zeichnet und eine Sinuslinie langsam von links nach rechts durchgezogen. Das dau¬ ert insgesamt etwa 80 Sekunden. Tippen Sie während des Zeichnens auf die Leer¬ taste, sehen Sie statt der Grafik Text. In diesem Text sind Ihre Eingabedaten auf¬ geführt. Tippen Sie nochmals auf die Leer¬ taste, erscheint wieder die Grafik. Ist die Sinuslinie bis zum rechten Bild¬ schirmrand durchgezogen, ertönt ein Piepston. Sie sollte nun so aussehen, wie Bild 1. Drücken Sie nun auf irgendeine Taste, so tritt PLOT.3.E ins Hauptmenü ein. Von dort aus können Sie alle zentralen Funktionen von PLOT.3.E aufrufen. Die¬ ses Hauptmenü erscheint auch, wenn Sie während eines Zeichenvorgangs auf Ctrl- C gedrückt haben. Ich möchte Ihnen nun kurz die einzelnen Funktionen des Hauptmenüs vorführen. Tippen Sie auf 1\ Richtig, Sie können die Darstellungsgrenzen erneut eingeben. Beantworten Sie also die Frage „Ist das richtig?“ mit N\ Geben Sie folgende Werte ein: X: -3.14, 3.14 und Y: 0, 0. Ergebnis: Anfangs- und Endwert für die X-Achse werden korrekt übernommen. Für die Y- Achse jedoch erscheinen die Werte -F/- 2.1496.... Tippen Sie bitte auf J. Die Grafik wird gelöscht und ein neues Achsenkreuz gezeichnet. Danach erscheint wieder das Hauptmenü. Drücken Sie auf die Leertaste, damit Sie sich das Achsenkreuz genauer ansehen können. Sie werden feststellen, daß nun die Markierungen auf der X-Achse unter¬ einander den gleichen Abstand haben wie die auf der Y-Achse. Das heißt, daß X- und Y-Achse auf den gleichen Maßstab abbil¬ den. Probieren Sie es aus. Tippen Sie auf 6, dann wird die Funktion neu gezeichnet. Richtig, in den Nullstellen hat die Sinusli¬ nie nun die Steigung -F/-1, wie wir es in der Schule gelernt haben. Fassen wir zusammen. Wenn Sie für eine Achse korrekte Anfangs- und Endwerte eingeben, für die andere Achse beide Ma¬ le 0, dann wird der Maßstab dieser Achse gleich dem der anderen. Die Darstellungs¬ grenzen dieser Achse sind gleich weit vom Ursprung entfernt. Probieren wir’s gleich nochmals aus. Ge¬ ben Sie nun für X: -hl, -h6.28 ein, für Y wieder beide Male 0. Was ist nun passiert? Die Darstellungsgrenzen sind unverändert geblieben. Begründung: Da für die X-Ach- se Anfangs- und Endwert größer als 0 sind, könnte die Y-Achse nicht gezeichnet werden (da diese durch den Nullpunkt der X-Achse geht). Darum korrigiert PLOT.3.E notfalls Ihre Eingaben so, daß alle Achsen gerade noch gezeichnet werden können. In unserem Beispiel wird daher der An¬ fangswert für X auf 0 festgesetzt. Tippen Sie nun nochmals auf N für nicht richtig. Wir wollen jetzt die zweite Möglich¬ keit für die Festlegung der Darstellungs¬ grenzen kennenlernen. Tippen Sie also gleich nochmal auf N. Offensichtlich tritt PLOT.3.E in einen neuen Programmteil ein, denn es bietet Ihnen wieder Erläute¬ rungen an. Was können Sie nun in diesem Programmteil tun? a) Sie können die X- und die Y-Achse getrennt stauchen oder strecken. Dazu fragt Sie der Rechner für jede Achse, ob Sie sie manipulieren möchten. Tippen Sie auf J, bittet er sie, das Verhältnis der alten Darstellungsgrenzen zu den neuen einzu¬ geben. Es seien die alten Grenzen -2 und -F4. Geben Sie als Verhältnis alte Grenzen: 2, neue Grenzen: 3 ein, werden die Grenzen auf -3 und -f 6 festgelegt. Verstanden? Geben Sie die Zahlen getrennt ein, jeweils von Return abgeschlossen. b) Nachdem Sie gefragt worden sind, ob Sie die Achsen strecken oder stauchen wollen, dies eventuell auch getan haben, können Sie nun den Nullpunkt auf jeder Achse verschieben. Dies geschieht, in¬ dem Sie wieder ein Zahlenverhältnis ein¬ geben, und zwar das des positiven zum negativen Halbast der betreffenden Ach¬ se. Seien also die Grenzen wieder -2 und -f 4. Geben Sie als Verhältnis 1:0 an, wer¬ den die neuen Darstellungsgrenzen auf 0 und -F6 festgelegt. Würden Sie als Ver¬ hältnis 1:1 eingeben, wären die neuen Grenzen -3 und -F3. In unserem konkreten Fall strecken Sie bitte die Y-Achse um den Faktor 2, das heißt, Verhältnis alt:neu = 2:1. Dann wol¬ len wir noch für die X-Achse das Verhältnis der positiven und negativen Halbachse auf 1:1 festlegen. Flotten Sie die Funktion mit Option 6 des Hauptmenüs. Das Ergebnis müßte aussehen wie Bild 2. Nun wollen wir eine neue Funktion einge¬ ben: Wählen Sie dazu im Hauptmenü Op¬ tion 3. Geben Sie als Funktion SQR(R^R- Xi^X) ein. Dies ist eine Halbkreisfunktion mit dem Kreisradlus R. Dieses R stellt einen sogenannten Scharparameter dar (Sc/7a/parameter deshalb, weil so statt ei¬ ner Funktion eine Funktionenschar darge¬ stellt wird.) Ist die Eingabe abgeschlossen, bittet Sie PLOT.3.E gleich, R mit einem Wert zu belegen. Geben Sie 5 ein. Als nächstes müssen wir die Darstellungs¬ grenzen neu eingeben. Geben Sie bitte zuerst für X: -5 und -h5 ein, für Y: 0 und 0. Verschieben Sie dann gleich den Null¬ punkt auf der Y-Achse an den unteren Bildschirmrand (Verhältnis positive : nega¬ tive Halbachse = 1:0). Lassen Sie diese Funktion plotten. Es kommt dann tatsäch¬ lich ein Halbkreis heraus. Wählen Sie jetzt Option 2 des Hauptme¬ nüs. Geben Sie als neuen Wert für R nun 4 ein und lassen Sie die Funktion wieder piotten. Der Halbkreis beginnt erst bei X=-4 und endet bei X=-F4. Der Grund dafür ist, daß an Stellen, an denen der Betrag von X größer als 4 ist, das Argu¬ ment der Wurzel kleiner als 0 wird. Solche Funktionswerte sind jedoch (zumindest Im Körper der reellen Zahlen) nicht definiert. Normalerweise würde Applesoft das Pro¬ gramm anhalten und eine Fehlermeldung ausgeben. Diese fängt PLOT.3.E jedoch Intern ab, so daß Sie sich nicht allzusehr um den Definitionsbereich der Funktion kümmern müssen. Rufen Sie bitte nochmals die Funktions¬ eingabe auf. Ändern Sie innerhalb der Klammern R\nT um. Nach erfolgter Einga¬ be fragt PLOT.3.E, ob Sie T als Variable einer Schleife mit fester Schrittweite ver¬ wenden wollen. Tippen Sie auf J. Danach geben Sie als Anfangswert für T 5, als Endwert 1 und als Schrittweite -1 ein. Lö¬ schen Sie mit Option 4 den Bildschirm und lassen Sie mit Option 6 die Funktion wie¬ der zeichnen. Sie können feststellen, daß, nachdem ein Halbkreis fertig gezeichnet worden ist, nicht mehr der Piepston ertönt, sondern ein neuer Halbkreis weiter Innen gezeichnet wird, bis zum Schluß der Halb¬ kreis mit Radius 1 fertig ist. Dann erst erfolgt der Piepston. Sie sehen fünf kon¬ zentrische Halbkreise auf dem Bildschirm, wie in Bild 3. Rufen Sie nun Option 5 des Hauptmenüs auf. Sie sehen die Datenilste, die norma¬ lerweise während des Zeichnens auf dem Textbildschirm steht, komplett mit allen Parameterwerten, inklusive einem, der noch gar nicht aktuell ist. Nun müssen Sie nur noch die Optionen 7 und 0 des Hauptmenüs kennenlernen. 0 erlaubt Ihnen den sanften Ausstieg aus PLOT.3.E. Brutal geht’s auch mit Ctrl-Re- set. Option 7 ruft ein neues Menü auf, nämlich das Disk-Menü. Wie der Name andeutet, können von dort aus Disketten¬ operationen ausgeführt werden. Das wären: 8 Peeker 6/86 Apple II Raster ( Stanton Das Buch führt in die Eigen- schäften der hochauflösenden Apple-Grafik ein und präsen¬ tiert eine Reihe schneller As¬ sembler-Routinen, mit denen Sie viele Effekte bekannter Ar- cade-Spiele selbst program¬ mieren können. 299 Seiten, komplett mit Disk 3-89058-008-4 DM49. Wenn Sie Ihren Apple II oder llplus selbst reparieren, Inter¬ faces entwerfen oder einfach nur besser über das Innenle¬ ben Ihres Computers Bescheid wissen wollen: Informationen, Schaltpläne und Diagramme, Theorie und praktische Tips. 215 Seiten, DIN A4 3-89058-012-2 DM64,- Apple II Assembler Programmierung Wagner ^ Das Assembler-Lehrbuch für BASIC-Kenner! Eine stufenweise Einführung in die Befehle und Strukturen der 6502-Assemblersprache, mit vielen Beispielen von der ein¬ fachen Tonerzeugung bis zum Diskettenzugriff. 277 Seiten, komplett mit Disk 3-89058-005-X DM49, Ampersand Verlag Teltower Damm 168 D-1000 Berlin 37 (030) 815 80 69 j etzt gratis! Für den gleichen Inhalt sollen Sie nicht zweimal zahlen müssenl Die Begleitdiskette ist ab sofort im Preis des Buches enthalten! NEU! MERLIN PRO Info anfordern! AS ^ sr Preissenkung! Ein Simulationsprogramm, das Sie in das Innere des 6502- Mikroprozessors führt. Sie sehen auf dem Bildschirm, wie die einzelnen Instruktionen in Zeitlupe ausgeführt werden, wie sich Register und Flags ver¬ ändern. Ein ideales Hilfsmittel zum Erlernen der Assembler¬ programmierung, danach ein wertvolles Werkzeug beim Te¬ sten Ihrer eigenen Program¬ me. Komplett mit einem 6502 Editor/Assembler und einem Lehrbuch zur Maschinenpro¬ grammierung (deutsch, 150 Seiten). 3-89058-019-X DM58,- Ein professioneller Macro- Assembler für Apple Ile und llc. Jetzt neu: • Relocating Linker zum auto¬ matischen Linken unabhängi¬ ger, verschiebbarer Module • 6502,65C02 und 65802 •DOS3.3und ProDOS dtsch. Handb., benötigt 128K 3-89058-026-2 DM298.- Weiterhin lieferbar: MERLIN wie MERLIN PRO, aber ohne Linker, 65802 und ProDOS. läuft auf jedem Apple II mit mind.64K! mit deutschem Handbuch 3-89058-024-6 DM198,- Worth/Lechner sind die Auto¬ ren von "Beneath Apple DOS", der Bibel aller DOS 3.3-Benut- zer. In Ihrem neuen Buch ha¬ ben sie sich ProDOS vorge¬ nommen: Arbeitsweise, MLI, BASIC.SYSTEM. Das Standard¬ werk für jeden ProDOS-User. 270 Seiten, komlett mit Disk 3-89058-038-6 DM46,- Apple Pascal Trickkiste DeGroat NEU! Utilities, Informationen, Tips und Tricks: P-Code-Decodierer, File-Kon- verter (von DOS nach Pascal und zurück), Disk-Zapper, Gra¬ fik-Routinen, Textfbrmatierer, verbesserte Ein-/Ausgabe-Pro- zeduren u.a.m. 248 Seiten, komplett mit Disk 3-89058-032-7 DM 48. Eine komplette Beschreibung der Schaltungen, RAM, ROM, I/O, Video, etc.. Unverzichtbar für den Entwickler und Techni¬ ker, interessant für jeden App¬ le Ile-Besitzer, der sich über die Funktionsweise seines Computers informieren will. Ca. 350 Seiten, DIN A4 3-89058-040-8 DM78,- Programme, mit denen Siedle Grafikmöglichkeiten des Apple voll ausschöpfen. DESIGNER: Entwurf eigener Zeichensätze. GREDfT: komplexer Grafikedi¬ tor. PRINTFOTO; Grafikdump auf den Drucker. Viele fertige Prozeduren zum Einbauen. 280 Seiten, komplett mit Disk 3-89058-011-4 DM49,- Applesoft Trickkiste Goiding INPUT-ANYTHING. PRINT USING, schnelle Garbage Col¬ lection und viele andere nütz¬ liche Utilities, dazu detaillierte Informationen über die Arbeits¬ weise des BASIO Interpreters, Einsprungadressen, System¬ variablen. 304 Seiten, komplett mit Disk 3-89058-035-1 DM44, Rückaaberecht! Wenn Ihnen ein Titel wider Erwarten nicht gefällt, dann senden Sie ihn innerhalb von 10 Tagen zurück und bekommen den Kaufpreis erstattet! Gilt für Bücher und Software! Name: Anschrift: O V-scheck Liegt bei (Spesenfreie Lieferung) O per Nachnahme (zzgi. DM 3, - Versandspesen) Anz Titel oder ISBN-Nummer Preis Peeker 6/86 9 Bild 1 Bild 2 1. Zeigt den CATALOG des aktiven Dis¬ kettenlaufwerks an. 2. Lädt eine Grafik vom aktiven Laufwerk in den Speicher. 3. Schreibt die im Speicher befindliche Grafik in zwei Binärfiles auf der aktiven Diskette. 4. Wählt das aktive Laufwerk aus. 5. Ermöglicht Ihnen jeden gewünschten PLOT.HELP.-File nochmals zu lesen. 6. Startet, abhängig von der von Ihnen verwendeten Version, entweder das Pro¬ gramm SUPERDUMP aus Peeker, Heft 6/ 85 (von Sammeldisk #5) oder druckt die Grafik direkt aus. Lesen Sie bitte hierzu Abschnitt 5. 0. Bringt Sie schließlich wieder sicher ins Hauptmenü zurück. Probieren wir zuerst 3 aus. PLOT.3.E bittet Sie, einen File-Sammelnamen einzuge¬ ben. KREISE wäre keine schlechte Idee. Kurze Zeit später erscheint wieder das Disk-Menü. Der CATALOG (Option 1) ent¬ hält nun zwei Binärfiles mehr, der eine heißt KREISE.A, der andere KREISE.M, beide sind je 34 Sektoren lang. Löschen Sie nun die Grafik und wählen Sie Disk-Menü-Option 2. Geben Sie als Sammelnamen wieder KREISE ein. Nach kurzer Zeit ist das alte Bild wieder zu sehen. Option 4 zeigt zuerst die Slot-Drive-Kom- bination des aktiven Laufwerks an. Tippen Sie nun zuerst auf eine der Tasten 1 bis 7, je nachdem, unter welcher Slotnummer das gewünschte Laufwerk zu finden ist. Dann tippen Sie bitte noch auf 1 oder 2, je nachdem, welches Laufwerk Sie letztend¬ lich wünschen. Achtung! PLOT.3.E prüft nicht nach, ob unter der aktuellen Slot- Drive-Kombination auch ein Laufwerk zu finden ist. Der entstehende I/O-Error ist jedoch nicht weiter tragisch. Tippen Sie nun Im Disk-Menü auf 0, dann gleich nochmals, und Sie sind fertig. Sie haben alle Funktionen von PLOT.3.E ken¬ nengelernt. 3. Technische Erläuterungen 3.1. zum Applesoft-Programm Das Applesoft-Programm ist mit einigen Ampersand-Befehlen (&) angereichert: Zuerst die Grafik-Befehle; & HPLOT x1,y1 (TO x2,y2) - ist syntak¬ tisch wie der Applesoft-Befehl HPLOT aufgebaut, bietet auch die gleichen Mög¬ lichkeiten. Er arbeitet nur in doppelt hoch¬ auflösender Grafik. & HGR - Schaltet Double-Hires-Grafik ein und löscht den Bildschirm. 10 Peeker 6/86 ^ qRAFik & HGR2 - Schaltet Double-Hires-Grafik ein, ohne den Biidschirm zu löschen. & TEXT - Schaltet von der Doubie-Hires- Grafik auf 40-Zeichen-Textdarstellung zu¬ rück. Nun die restlichen &-Befehle: & POS (x,y) ist ein Text-Befehl für die 80- Zeichendarstellung und positioniert den Cursor in Spalte x, Zeile y. & FN, F$- liest eine BASIC-Funktion von der Tastatur ein und übergibt diese einmal als FN Y(X) an das Flauptprogramm, ande¬ rerseits als String an die Stringvariable F$. Die grundlegende Arbeitsweise des Pro¬ gramms werde ich diesmal nicht erörtern, da diese Algorithmen im wesentlichen un¬ verändert geblieben sind. Lediglich ihre Formulierung in Applesoft und vor allem die Reihenfolge im Programmtext haben sich geändert. So gibt es nun einen einheitlichen Aufbau. Die Zeilen 1010 bis 4900 enthalten Sub¬ routinen, dann schließt sich das Disk-Me¬ nü an, gefolgt vom Programmkern mit In¬ itialisierungsteil ab Zeile 6000 und Haupt¬ menü ab Zeile 6460. Zum Schluß folgt noch der Programmteil, der aufgerufen wird, wenn PLOT.3.E versehentlich direkt durch RUN PLOT.3.E gestartet wurde, oh¬ ne den Pointer in der Zero-Page $0067 heraufzusetzen. Eingehendere Erläuterungen unterlasse ich, da das Programm sich recht gut selbst dokumentiert und sich außerdem seit PLOT.2.0 die Algorithmen nicht grundle¬ gend geändert haben. 3.2. Zum Assemblerprogramm Sie haben sicherlich bemerkt, daß das As¬ semblerprogramm nur auszugsweise ab¬ gedruckt ist. Es umfaßt im Original nämlich 940 Zeilen, zum Abdrucken etwas zuviel. Daher bringen wir nur den Hexdump des Programms komplett, außerdem noch ei¬ nen Auszug aus dem Assemblerlisting. Das komplette Listing ist auf der Sammel¬ diskette zu finden. Genauer eingehen möchte ich daher auch nur auf den Algorithmus, der hinter dem veröffentlichten Auszug steckt. Es geht um den Algorithmus, mit dem man Linien zwischen zwei Punkten zieht. Dazu möch¬ te ich etwas weiter ausholen: 3.2.1, Der normale Treppen¬ algorithmus Stellen Sie sich einen Maschendraht vor, dazu ein Stück Bindfaden und spannen Sie in Gedanken den Bindfaden zwischen zwei Kreuzungspunkten. Frage: Wie oft trifft der Bindfaden genau einen Kreu¬ zungspunkt? Im Allgemeinfall wird das nicht allzuoft passieren. Dieses Problem besteht auch, wenn Sie unter Rastergrafik zwei Punkte durch eine Gerade verbinden wollen. Man behilft sich heutzutage da¬ Yb.:i ± Y a .i h-AX = 11-H Xa Xb Bild 4 durch, daß man die Gerade durch eine Art Treppenlinie annähert. Das geht recht schnell und ist einfach in Maschinenspra¬ che zu formulieren. Auch das Applesoft- ROM geht so vor. Die Geraden sehen dann, vergrößert abgebildet, so aus, wie es das Bild 5 darstellt. 3.2.2. Heuristische Herleitung des Algorithmus Betrachten Sie bitte Bild 4. Von den bei¬ den eingezeichneten Geraden interessiert uns momentan nur die untere, d.h. Gerade gi. Sie geht vom Anfangspunkt Ai mit den Koordinaten (xa.i, yA.i) zum Endpunkt Bi (%i. ye.i)' Hervorgehoben sind außerdem die Punkte Pi und Qi. Sie werden durch den Treppenalgorithmus gefunden. Das zentrale Problem ist, ein Kriterium zu finden, das etwas darüber aussagt, ob ein Punkt oberhalb oder unterhalb der zu zeichnenden Gerade liegt. Betrachten wir nun die Punkte Pi, Qi und Bi. Bi liegt naturgemäß genau auf gi. Be¬ zeichnen wir mit nx (P) die Anzahl der Schritte in x-Richtung bis zum Punkt P, analog ny (P). Dann führen wir noch Ax und Ay als die Differenz der Koordinaten von Anfangs- und Endpunkt. Somit gilt: (1) lÄ . ^ nx(B) AX ( 2 ) nv(P) ^ nx(P) AX (3) nv(Q) ^ ^ nx(Q) AX Es ist nicht einzusehen, warum wir nicht verallgemeinern dürfen, d.h. Gleichung (1) ist nur erfüllt, wenn der Punkt auf der Geraden liegt, und die Ungleichungen (2) und (3) gelten, wenn der Punkt unterhalb bzw. oberhalb der Geraden liegt. Dies könnte schon das gesuchte Kriterium dar¬ stellen, erweist sich jedoch als rechne¬ risch zu aufwendig. Darum formen wir die drei Beziehungen elementar um zu: (1a) Cx (P) AY - ny (P) Ax = 0 Peeker 6/86 (2a) Px (P) AY - ny (P) Ax > 0 (3a) Px (P) AY - Py (P) Ax < 0 11 Das sieht schon viel besser aus: Nennen wir den Term auf der linken Seite einmal D. Wenn man von diesem D bei jedem Zeichenschritt in y-Richtung die Differenz der x-Komponenten von Anfangs- und Endpunkt subtrahiert, bei jedem Schritt in x-Richtung jedoch die der y-Komponenten dazuaddiert, so ist D dann und nur dann gleich null, wenn der gerade gezeichnete Punkt auf der Geraden liegt. D ist kleiner als null, wenn der Punkt unterhalb, größer als null, wenn der Punkt oberhalb der Ge¬ raden liegt. Ich formuliere den Algo¬ rithmus; Führe beim Zeichnen zusätzlich eine Sal¬ dovariable D. Setze D beim Beginn jede Gerade auf 0. Subtrahiere von D bei jedem Schritt in y-Richtung den Betrag von Ax, addiere zu D bei jedem Schritt in x-Rich- tung den Betrag von Ay. Ist nun D größer als null, gehe beim nächsten Schritt in y- Richtung, ist D kleiner als null, gehe in x- Richtung. Wiederhole dies bis zum End¬ punkt. Das ist im wesentlichen der Trep¬ penalgorithmus, mit dem bespielsweise Applesoft arbeitet. Hier betrachten wir nur Geraden einer speziellen Orientierung. Die o.g. Beziehungen sind jedoch auch auf allgemeine Geraden anwendbar. Man betrachtet die Geraden, als seien sie wie die Geraden in Bild 4 orientiert, und führt unabhängig davon die echten Bildschirm¬ koordinaten. Bild 6 3.2.3. Nachteile des Treppen¬ algorithmus Der oben vorgestellte Algorithmus mag angehen, wenn man beispielsweise über die Auflösung eines Hardwareplotters ver¬ fügt. Meiner Meinung nach versagt er spätestens dann, wenn man die einzelnen Pixel deutlich voneinander unterscheiden kann, wie das auch bei der Double-Hires- Grafik noch der Fall ist. Sehen Sie sich speziell unter diesem Gesichtspunkt die Geraden in Bild 5 an. Es ist eigentlich nicht einsichtig, warum die mittlere Gerade nicht durch im 45-Grad-Winkel versetzte Pixel dargestellt werden kann. Auf dieser Idee aufbauend, erweiterte ich den Trep¬ penalgorithmus ein wenig. 3.2.4. Der modifizierte Treppen¬ algorithmus Betrachten Sie Bild 6! Die Geraden sind identisch mit denen in Bild 5, nur anders approximiert. Hier wird nun, abhängig von der Geradensteigung, statt einem Schritt in x-(y-)Richtung ein Schritt im 45-Grad- Winkel gezeichnet. Ist die Steigung größer als 45 Grad, wird der Schritt in x-Richtung ersetzt, sonst der Schritt in y-Richtung. 12 Peeker 6/86 Checkmate Technology ™ Speichererweiterungen mit Zukunft _ für Apple Ile un d Apple IIc Multiram Leistungsmerkmale: • 16bit CPU Port • 65C816 Coprozessor, der den Multiram Speicher linear addressieren kann (sofort lieferbar) • inclusive Apple Works Memory Expander (endlich genug Speicherplatz für Appleworks) • inkl. Ramdisk Software für DOS und ProDos • Ramdisk für Pascal und CP/M optional speziell beim Apple Ile: • auf einer Karte bis max. 1MB erweiterbar mit Huckepackkarte auf 1,7 MB erweiterbar • kommt in Auxiliary Slot (3) • ersetzt erweiterte 80 Zeichen Karte • RGB Farboption lieferbar speziell beim Apple IIc: • bis 512k erweiterbar • ohne externes Laufwerk echt portabel panda>#Ft Dr.-Ing. Eden Kataloganforderung und Bestellung: Tel.: 030/31 04 23 ■ Telex 185859 Uhlandstraße 195 • D-1000 Berlin 12 Bkyan FÄSGÄL Pascal Compiler für Apple II (+,e,c) • erzeugt 6502 Assembler-Code • benötigt keine Z-80 Karte • läuft unter Prodos • integrierter Assembler • inclusive Editor (full screen) • mehrfach in Peeker getestet • neu: Kix eine Uni™ ähnliche Betriebssystem Umgebung Kennenlernaktion bis 30. Juni: Kyan 2.0 inkl. KIX: DM 198,- nach Ablauf der Kennenlernaktion: Kyan 2.0 alleine DM 198,00 Kyan 2.0 inkl. Kix: DM 278,00 Unix ist ein eingetragenes Warenzeichen der Bell Laboratories panda>#Ft Dr.-Ing. Eden Kataloganforderung und Bestellung: Tel.: 030/31 04 23 • Telex 185 859 Uhlandstraße 195 • D-1000 Berlin 12 Druckerinterfaces für Apple ll+/e/ printtr c/lll loterfaces auf dem neuesten Stand der Technik. Kompatibei mit allen gängigen Druckern wie: APPLE, EPSON, STAR, NEC, OKIDATA usw. Passende Treiber¬ software wird über Dip-Switch ausgewählt GiSPPlCf ^ Grafikfähiges Druckerinterface r Iprinttrinteriflce das Reice Wünsche mehr offen läßt. Über 2 Dutzend Kommandos ermöglichen die volle Kontrolle über alle Möglichkeiten Ihres Druckers. Jetzt auch mit Ile Features: Double Hires Grafics und 80 Zeichen Dump mittels Druckerpuffer nachrüstbar über Bufferboard. Qiappler + ten 16 K Druckpuffer, der auf 32 oder 64 K aufrüstbar ist. Besitzt alle Vorzüge des Grappier +, hat aber zusätzlich einen integrier- Serielles Druckerinterface speziell für den Apple Image- writer. OTum Seriell-nach-Parallel-Wandlerfür den IIc im Kabel integriert. RAPPLER C wie Hotlink, jedoch zusätzlich Imagewriter Emulation und Grafik Software-Diskette. panda>#Ft Dr.-Ing. Eden Kataloganforderung und Bestellung: Tel.: 030/31 04 23 • Telex 185859 Uhlandstraße 195 • D-1000 Berlin 12 Sie haben einen Apple .. wir haben die Software ... und die Hardware . *Fordem Sie unseren Gratiskatalog an! ALLES FÜR DEN APPLE 11+, Ile, IIc UND MACINTOSH Dr.-Ing. Eden^ Uhlandstraße 195 • D-1000 Berlin 12 Tel.: 030/31 0423 • Telex 185859 Peeker 6/86 13 Das läßt sich durch einen einmaligen Ver¬ gleich von Ax mit Ay erledigen. Ist Ay größer als Ax, so ist die Geradensteigung größer als 45 Grad. 3.2.5. Implementierung in Assembler Die Zeilen 517 bis 753 des Assemblerli- stings sind abgedruckt. Der Einstieg in die Routine zum Geradenzeichen liegt in LINE. Zuerst werden die Differenzen der Anfangs- und Endkoordinaten berechnet, anschließend wird, falls nötig, durch Zwei¬ erkomplementierung der Absolutbetrag der Differenz gebildet. Ist die Differenz negativ, so wird gleichzeitig durch negati¬ ves XADD bzw. YADD die negative Lauf¬ richtung festgelegt. Sind die Differenzen bestimmt und die Laufrichtungen festgelegt, wird überprüft, ob eine Koordinatendifferenz identisch null ist. In diesem Fall wird die Gerade in XLINE bzw. YLINE getrennt weiterbear¬ beitet. Nun werden die Differenzen verglichen. Ist DX größer als DY, wird in der Variablen FLAG Bit 7 gesetzt. Die Saldovariable wird auf 0 gesetzt, ein Schrittzähler wird initiali¬ siert. Dann erfolgt in NOTREADY der Ein¬ stieg in die Zeichenschleife. Anschließend wird entschieden, ob der nächste Schritt in X- oder y-Richtung gehen soll. In XSTEP und YSTEP wird nun wie beschrieben die Saldovariable D aktualisiert, dann werden die nötigen Manipulationen am Grafikspei¬ cher vorgenommen, auf die ich hier nicht weiter eingehen möchte; sie sind in Peeker, 2/84 beispielsweise hinreichend beschrieben. Sind die Manipulationen vor¬ genommen, wird nachgeprüft, ob ein Dop¬ pelschritt fällig ist. In diesem Fall wird nicht gezeichnet, sondern erst der zweite Schritt abgewartet. Ist schließlich der Schrittzähler bei null angelangt, ist die Ge¬ rade fertig approximiert. 4. PLOT.3.E und SUPERDUMP Läuft SUPERDUMP, das für Epson-FX80 bzw. Imagewriter I vorgesehen ist, auf Ih¬ rem Drucker? Wenn ja, haben Sie ausge¬ sorgt. Ändern Sie die im Listing unter SU¬ PER DUMP. PATCH angegebenen Pro¬ gram mzeilen im SUPERDUMP. EPSON bzw. SUPERDUMP.IMAGEWRITER. Be¬ sitzen Sie die Sammeldiskette #5 (mit Aufsatz in Heft 6/85), haben Sie es noch einfacher. Laden Sie das Applesoft-Pro- gramm und geben Sie EXEC SUPER¬ DUMP.PATCH ein. Speichern Sie das ge- patchte Programm unter neuem Namen ab, fertig. Zur Bedienung von SUPER¬ DUMP lesen Sie bitte Peeker 6/85. PLOT.3.E ist in der Standardversion darauf eingerichtet, mit dem modifizierten SU¬ PERDUMP zusammenzuarbeiten. Die PLOT.3.E Grafikfiles können vom SUPER¬ DUMP gelesen werden, PLOT.3.E kann direkt SUPERDUMP aufrufen, das modifi¬ zierte SUPERDUMP ruft wieder PLOT.3.E auf. Benutzen Sie eine RAM-Disk, gibt es beim Laden der Programme fast keine Zeitverzögerungen. Anm.d.Red.: Es sei hier noch einmal dar¬ auf hingewiesen, daß das Applesoft-Pro- gramm SUPERDUMP einschließlich der Variablen genau vor der Hires-Seite 1 en¬ det. Wenn Sie also SUPERDUMP auch nur geringfügig ändern oder erweitern wollen, so entfernen Sie zunächst mit dem Ap- plesoft-MACROEDITOR (Sammeldisk #16) über das &K-Kommando alle REMs, womit SUPERDUMP erheblich kürzer wird und damit keine Speicherkonflikte auftre- ten können. 5. Anpassung von PLOT.3.E an andere Gerätekonfigurationen Unter PLOT.PATCH finden Sie die Modifi¬ kationen, die Sie machen müssen, um auf einem EPSON FX-80/85 mit Grafikinterfa¬ ce direkt die Grafiken auszudrucken. Sie sparen sich dann den Umweg über SU¬ PERDUMP und erhalten außerdem ein ausführliches Protokoll mit Funktion, Dar¬ stellungsgrenzen und Parameterwerten. Inzwischen scheint sich ProDOS als neu¬ es Standardbetriebssystem durchzuset¬ zen. Unverträglichkeiten mit PLOT.3.E be¬ stehen zwar keine, doch sind Änderungen speziell im Disk-Menü angebracht. Es müßte derart modifiziert werden, daß statt der Slot-Drive-Kombination ein PREFIX einzugeben ist. Sollte Interesse daran be¬ stehen, bin ich gerne bereit, einen PATCH-File in einer der nächsten Peeker- Ausgaben zu veröffentlichen, der dies be¬ werkstelligt. 6. Kurzhinweise 1. Zweck: Erstellung grafischer Darstellungen von Funktionen einer reellen Veränderlichen in doppelt hochauflösender Grafik 2. Konfiguration: Apple Ile mit 64K-Karte oder llc; DOS 3.3; Drucker optional, SUPERDUMP empfeh¬ lenswert 3. Test: EXEC PLOT.3.PRO 4. Sammeldisk: PLOT.3.PRO PLOT.3.E PLOT.BX T.PLOT.BX PLOT.HELP.1 PLOT.HELP.2 PLOT.HELP.3 PLOT.HELP.4 PLOT.HELP.5 PLOT.PATCH SUPERDUMP.PATCH Hinweise für „Eintipper“ PLOT.3.E läßt sich wie üblich eingeben. Schwieriger ist es dagegen, die einzelnen „PLOT.HELP.“-Files einzugeben. Da Ap¬ plesoft Kommata im INPUT-Befehl nicht zuläßt, muß jede Zeile mit einem Gänse¬ füßchen (“ = CHR$(34)) beginnen! Die Zeilen sollten nicht länger als 79 Zeichen sein! Besitzen Sie keinen Texteditor, müs¬ sen Sie die einzelnen Zeilen als DATA- Statements in ein BASIC-Programm ein¬ geben, das dann später diese als Strings mit vorangestelltem “ in den Textfile über¬ trägt. Sind Sie damit fertig, dürfen Sie „zur Erholung“ den Hexdump der Assem¬ blerroutinen eintippen. 7. Literaturhinweise -PLOT.2.0, Peeker 5/85, S. 17ff -SUPERDUMP von D. Geiß, Peeker 6/85, S. 22ff -Apple DOS 3.3 von U. Stiehl, S. 41-43 -Mikrocomputer-Grafik von R. E. Myers 8. PLOT-Hilfemenüs Wichtig: Vergessen Sie nicht, am Ende jedes Flelpfiles die Marke .EOF anzuhängen. Sonst findet PLOT.3.E nicht das Ende des Files, und das Programm kann mit einer Fehlermeldung abgebrochen werden! PLOT.HELP.1 PLOT.3.E - Ein Funktionsplotprogramm Dieses Programm nennt sich PLOT.3.E. Es stellt Funktionen einer reeilen Veränderiichen auf dem Biidschirm der Apple-Computer-Typen //e und //c grafisch dar. Da dabei die sogenannte doppelt hochauflösen¬ de Grafik dieser Rechner verwendet wird, müs¬ sen Sie zusätzlich im Apple //e eine erweiterte 80-Zeichenkarte installieren. Der Apple //c be¬ nötigt keine zusätzliche Hardware. Um eine be¬ friedigende Auflösung zu erreichen, ist jedoch ein Monochrom-Monitor empfehlenswert. Ist ihr Computer zusätzlich an einen grafikfähi¬ gen Drucker angeschlossen, können Sie mit dem Programm SUPERDUMP (Peeker 6/85, Sammeldiskette #5) Ihre Grafiken ausdrucken. Beachten Sie jedoch bitte zusätzlich den zu PLOT.3.E gehörigen Artikel, Abschnitt ’PLOT .3.E und SUPERDUMP’. Die Funktion wird in einem Achsenkreuz ge¬ zeichnet, die Achsen werden mit Skalenmarkie- 14 Peeker 6/86 rungen versehen. Auf dem längeren Ast jeder Achse werden mindestens zwei, maximal 19 Markierungen angebracht. Den Abbildungs¬ maßstab können Sie relativ frei festlegen. Dies geschieht, indem Sie die von Ihnen gewünsch¬ ten Darstellungsgrenzen eingeben. Bei deren Eingabe müssen Sie lediglich darauf achten, daß die 0 im Darstellungsintervall jeder Achse vorkommt. Sonst könnte kein Achsenkreuz ge¬ zeichnet werden. Natürlich müssen Sie auch die zu zeichnende Funktion eingeben. Diese muß als korrekte Ap- plesoft-BASIC-Funktion eingegeben werden. Sollten Sie sich darin nicht auskennen, rufen Sie bitte im Programmteil ’Funktionseingabe’ die dazu bereitgehaltenen Informationen ab. Punkte, an denen die Funktion nicht definiert ist (z.B. Polstellen), werden intern abgefangen, das Zeichnen wird solange unterbrochen, bis die Funktion wieder reelle Werte annimmt (die im Darstellungsintervall liegen). Zusätzlich zur unabhängigen Variablen X kön¬ nen Sie in der Funktion die Parameter R,S und T verwenden. Sie können die Funktion mehrmals mit verschiedenen Parameterwerten zeichnen lassen. So können Sie ganze Funktionenscha¬ ren darstellen lassen. T nimmt unter den Para¬ metern eine Sonderstellung ein Wenn T mit einer festen Schrittweite zu- oder abnehmen soll, können Sie sich die ständige Neueingabe sparen und statt dessen nur Anfangs-, Endwert und Schrittweite festlegen. Die Funktionsschar wird dann automatisch gezeichnet. Wenn Sie die Eulersche Zahl e oder die Kreis¬ zahl pi in der Funktion benötigen, brauchen Sie diese nicht im ganzen einzutippen. Im Pro¬ gramm sind die Variablen PI und E vordefiniert. Den dekadischen Logarithmus können Sie als FN LG(X) aufrufen. Während des Zeichenvorgangs können Sie durch Betätigen der Leertaste auf Textdarstel¬ lung umschalten. Dort finden Sie alle Ihre Ein¬ gaben nochmals aufgeführt. Nochmaliges Betä¬ tigen der Leertaste läßt die Grafik wieder er¬ scheinen. Stellen Sie beim Zeichnen fest, daß die Grafik nicht so wird, wie Sie es sich vorstell¬ ten, können Sie durch gleichzeitiges Betätigen der 'Ctrl'- und der ’C’-Taste den Zeichenvor¬ gang abbrechen. Das Programm springt dann ins Hauptmenü, das sonst erst erreicht wird, wenn die Grafik fertig gezeichnet ist. Von diesem Programmteii aus können Sie alle Funktionen von PLOT.3.E aufrufen (Neueinga¬ be von Funktion, Parametern und Darstellungs¬ grenzen, Löschen des Bildschirms, Darstellung aller eingegebenen Daten, von neuem zeichnen und auf die Diskettenlaufwerke zugreifen). .EOF PLOT.HELP.2 PLOT.3.E - Eingabe der Darstellungsgrenzen Bei der Eingabe der Darstellungsgrenzen haben Sie die Wahl; Entweder Sie geben die Darstellungsintervalie beider Funktionen explizit ein. Das ist sicher der einfachste Weg, hat jedoch auch seine Nachtei- ie. Oder Sie geben die Darstellungsgrenzen für eine Achse ein, für die andere Anfangs- und Endwert 0. Dann wird in x- und y-Richtung mit dem gleichen Maßstab abgebildet, ^ qRAFik Gegen die erste Mögiichkeit spricht, daß die Abbildungsmaßstäbe der beiden Achsen abso¬ lut nichts miteinander zu tun haben. Nur wenn X- und Y-Achse auf denselben Maßstab abbll- den, erkennt man solche Feinheiten, wie etwa, daß die Sinusfunktion in den Nullstellen die Steigung -l-l oder -1 hat. Gegen die zweite Möglichkeit spricht jedoch, daß dann die beiden nicht eingegebenen Grenzen symmetrisch zum Ursprung festgelegt werden. Das kann gut ge¬ hen, das Ergebnis ist jedoch oft nicht allzu be¬ friedigend. An dieser Stelle noch einmal die Bitte: Sorgen Sie dafür, daß in jedem Darstellungsintervall die 0 liegt oder zumindest als Grenze eingegeben wird. Da sonst kein Achsenkreuz gezeichnet werden könnte, setzt das Programm für diesen Fall die betragsmäßig kleinere Grenze auf 0! Die Eingabeprozedur selbst läuft wie folgt ab: Zuerst werden Sie gebeten, den Anfangswert für die X-Achse anzugeben. Tun Sie dies, be¬ achten Sie dabei jedoch die amerikanische No¬ tation (’.’ statt Dezimalkomma). Dann schließen Sie bitte die Eingabe mit der ’Return’-Taste ab. Genauso geht es mit dem Endwert der X-Achse und dann mit Anfangs- und Endwert der Y- Achse weiter. Anschließend werden Ihre Einga¬ ben analysiert. Dabei werden eventuell ver¬ tauschte Anfangs- und Endwerte ausgetauscht, dann wird geprüft, ob der Anfangswert jeder Achse kleiner oder gleich 0 und ob der Endwert jeder Achse größer oder gleich 0 ist. Ist dies nicht der Fall, wird der falsche Wert auf 0 ge¬ setzt. Anschließend wird überprüft, ob für eine Achse Anfangs- und Endwert 0 eingegeben wurden. Ist dies der Fall, so werden die Darstel¬ lungsgrenzen derart festgelegt, daß X- und Y- Achse den gleichen Maßstab besitzen. Haben Sie die Darstellungsgrenzen schon ein¬ mal eingegeben, sind jedoch mit dem Ergebnis nicht ganz zufrieden, so haben Sie wiederum die Wahl; Sie können entweder die Darstellungsgrenzen komplett neu eingeben oder die Achsen direkt manipulieren. Näheres zur letzten Möglichkeit entnehmen Sie bitte den getrennt dazu abrufba¬ ren Informationen. .EOF PLOT.HELP.3 PLOT.3.E - Achsenmanipulation Sie haben folgende Möglichkeiten der direkten Achsenmanipulation: 1 - Achsen strecken oder stauchen 2 - Manipulation des Verhältnisses der positiven zur negativen Halbachse Zu 1; Nehmen wir einmal an, die Grafik sei schon ganz ansprechend, nur Sie wünschen eine höhere Aufspreizung der Grafik in y-Rich¬ tung. Sagen wir. Sie wollen um einen Faktor 2 spreizen. Dann haben Sie entweder die Mög¬ lichkeit, die bisherigen Darstellungsgrenzen für die y-Achse im Kopf durch 2 zu dividieren und neu einzutippen. Das muß aber nicht sein. Ebenso können Sie, nachdem Sie diese Erläu¬ terungen gelesen haben, auf die Frage 'Y-Ach¬ se strecken?’ mit ’J’ antworten. Dann müssen Sie nur den Streckfaktor angeben, und zwar nicht als unhandlichen Dezimalbruch, sondern fast als echten Bruch. Wenn Sie nun auf die Frage 'Verhältnis alte ...’ ’zu neuen Grenzen’ 2 und 1 eingeben, werden Sie anschließend an¬ genehm überrascht feststellen, daß das Pro¬ gramm Ihnen das Kopfrechnen abgenommen hat. Das ist der ganze Trick. Wie wertvoll diese Option ist, werden Sie feststellen, wenn Sie einmal versuchen, zwei siebenstellige Zahlen im Verhältnis 17 zu 13 zu teilen. Viel Vergnü¬ gen... Zu 2: Nun stellen Sie sich vor. Sie lassen eine Funktion in einem symmetrischen Achsenkreuz zeichnen. Sie stellen aber beim Zeichnen fest, daß das untere Viertel des Bildschirms nicht genutzt wird. Nützlich wäre es da, wenn man einfach dem Computer sagen könnte: ’Hör ’mal, der Maßstab war ja ganz gut. schiebe doch beim nächsten mal die X-Achse einfach um ein Vier¬ tel oder so nach unten.’ Genau das können Sie bei PLOT.3.E auch. Dies geschieht, indem Sie angeben, in welchem Verhältnis der positive und der negative Teilast einer Achse zueinan¬ der stehen sollen. Bei unserem Beispiel wäre das ein Verhältnis von 2:1. Eingegeben wird das ganze wie oben bei der Streckung der Achsen. Das hörte sich jetzt alles komplizierter an, als es in Wirklichkeit ist. Probieren Sie es am besten mal aus. Wenn es nicht klappt, gehen Sie die Beispiele Schritt für Schritt durch, die im zu diesem Programm gehörenden Artikel aufge¬ führt sind. Wie gesagt, so kompliziert ist’s nicht. .EOF PLOT.HELP.4 PLOT.3.E - Funktionseingabe Computer sind in mancher Hinsicht ziemliche Dummköpfe, gepaart mit dem Hang zu einer gewissen Dickschädeligkeit. Darum geben Sie es auf, dem Computer eine Funktion ’f(x) = sin x’ vorzusetzen. Ein wahrer Apple moniert da stur einen ’? SYNTAX ERROR*. (Den nun fol¬ genden Abschnitt können Besitzer eines Apple //c oder Apple //e mit neuen ROMs über¬ springen) Zuallererst drücken Sie die 'Caps Lock’-Taste (unten links auf der Tastatur) so, daß sie einra¬ stet. Applesoft-BASIC akzeptiert in arithmeti¬ schen Ausdrücken einzig und allein Großbuch¬ staben. In BASIC gibt es folgende Verknüpfungszei¬ chen: -h : Addition oder positives Vorzeichen - : Subtraktion oder negatives Vorzeichen ^ : Multiplikation / ; Division Applesoft-BASIC verlangt, daß alle Multiplika¬ tionen ausgeschrieben werden. Ein Ausdruck wie ’3(X-T)’ ist für Sie das Einfachste auf der Welt, für den Computer schlicht und ergreifend ein Syntax-Fehler. Ebenso gilt ein Divisionszei¬ chen nur für den nächsten Wert, im Gegensatz zum Bruchstrich. Wollen Sie längere Brüche ausdrücken, müssen Sie Zähler und Nenner einklammern. Im Zweifelsfalle verwenden Sie lieber ein Klammernpaar mehr. Es gibt folgende eingebauten Funktionen: SIN (X) : Sinus von X, Argument im Bogenmaß COS (X) : Cosinus von X, Argument im Bo¬ genmaß TAN (X) : Tangens von X, Argument im Bo¬ genmaß Peeker 6/86 15 ATN (X) : Arcustangens von X, Ergebnis im Bogenmaß SQR (X) : Quadratwurzel aus X X t R : von X wird die R-te Potenz gebildet X t (1 /R) : aus X wird die R-te Wurzel gezogen EXP (X) : Exponentialfunktion zur Basis e LOG (X) : natürlicher Logarithmus (Basis e) INT (X) : (Gauß-Klammer) liefert größte ganze Zahl, die kleiner als X ist ABS (X) : Absolutbetrag von X SGN (X) : Signumfunktion. Liefert 0 für X=0, fürX>0, -1 fürX<0 So nun sollen Sie noch sehen, wie eine 'legale’ Funktion aussieht: Das Programm gibt Ihnen ’Y= ’ vor. Nun müssen Sie nur noch nach den obenstehenden Regeln eine Funktion zusam¬ menbasteln. Das sieht dann so aus: Y= SIN(X)*COS(X) Y= -(X-1)/(Xt2-X + 3) Y= T/X (übrigens, T ist so ein mysteriöser Scharparameter) Y= INT(X) (Treppenfunktion) Y= X- INT(X) (Sägezahnfunktion) Y= LOG(X)/LOG(R) (liefert Logarithmus zur Basis R) Andere Beispiele finden Sie im zu diesem Pro¬ gramm gehörenden Artikel. .EOF PLOT.HELP.5 PLOT.3.E - Diskmenü Sie können vom Disk-Menü aus folgende Dis¬ kettenoperationen ausführen: 1. Das Inhaltsverzeichnis der Diskette abrufen. 2. Grafikfiles auf Diskette abspeichern und von Diskette laden. 3. Erläuterungen zum Programm abrufen. Das tun Sie gerade. 4. Das aktive Laufwerk auswählen. 5. Je nach Version können Sie Superdump aufrufen oder direkt die Grafik auf einem grafik¬ fähigen Matrixdrucker ausdrucken lassen. ad 2. Eine Grafik wird auf Diskette in zwei getrennten Binärfiles abgespeichert. Dabei wer¬ den zu den von Ihnen eingebenen Filenamen die Suffixe ’.M’ und ’.A’ hinzugefügt. Wenn Sie diese Files wieder einiesen wollen, so lassen Sie bitte die Suffixe weg. Diese Option wurde vor allem deshalb einge¬ richtet, damit Sie Grafiken, die mit PLOT.3.E erstellt wurden, mit dem Programm Superdump (in Peeker 6/85 und auf Sammeldisk #5) auf einem Matrixdrucker ausdrucken können, ad 4. Mit dieser Option können Sie jede Slot/ Drivekombination auswählen, die sinnvoll ist, Logischerweise ist Slot 0 ausgeschlossen. Sinn dieser Option ist es, Grafikfiles auf einer schnel¬ len RAM-Disk abzuspeichern, dann Superdump zu laden und die Grafik wieder in den Speicher zurückzuholen. So kommen Sie ohne nennens¬ werten Zeitverlust zu Ihren Grafik-Ausdrucken. Sind Sie im Besitz eines Druckerinterfaces mit Double-Flires-Software, so ändern Sie bitte PLOT.3.E wie in Peeker 6/86 beschrieben ab. Dann erstellt PLOT.3.E direkt einen Ausdruck der Grafik, zusätzlich jedoch werden die Funk¬ tion, der Darstellungsbereich und alle verwen¬ deten Parameter ausgedruckt. .EOF PLOT.BX (Hexdump) BSAVE PLOT.BX, A$0B00, L$054D $0B00 48 A9 65 80 F6 03 A9 0C $0B08 80 F7 03 68 60 A5 B8 48 $0B10 A5 B9 48 A9 59 20 5C DB $0B18 A2 BO 20 2E 05 20 6C D5 $0B20 A0 00 84 B8 A9 09 85 B9 $0B28 B9 07 0C F0 05 91 B8 C8 $0B30 00 F6 B9 F6 01 91 B8 F0 $0B38 03 C8 00 F6 A0 00 8C B9 $0B40 0B 84 FF A9 0A 80 BA 0B $0B48 B9 FO 01 F0 38 30 09 20 $0B50 BF 0B 20 B8 0B C8 00 F0 $0B58 48 A9 20 20 B8 0B 38 68 $0B60 E9 C2 90 15 AA BD DD 0B $0B68 AA BD E9 Dl 10 01 18 29 $0B70 7F 20 B8 0B E8 B0 F2 90 $0B78 DC A2 FD A9 3F 20 B8 0B $0B80 E8 00 FA F0 00 20 Bl 00 $0B88 20 13 E3 68 85 B9 68 85 $0B90 B8 20 Bl 00 20 BE DE 20 $0B98 E3 OF 24 11 10 15 A0 00 $0BA0 AD B9 0B 91 83 C8 A9 00 $0BA8 91 83 C8 A9 0A 91 83 20 $0BB0 A9 0C 60 A2 A3 4C 12 D4 $0BB8 80 00 0A EE B9 0B 60 08 $0BC0 A2 02 DD 07 0B F0 05 CA $0BC8 10 F8 28 60 48 BD DA 0B $0BD0 05 FF 85 FF 68 28 60 52 $0BD8 53 54 01 02 04 00 02 06 $0BE0 0A 0C 0F 13 14 15 16 17 $0BE8 18 IB 10 lE IF 20 23 26 $0BF0 29 2C 2F 34 37 3A 30 40 $0BF8 43 46 49 4C 4F 52 56 59 $0C00 50 60 63 67 6C 72 76 B8 $0C08 C2 59 28 58 29 00 00 68 $0C10 A8 68 A6 DF 9A 48 98 48 $0C18 60 20 Bl 00 20 BB DE 20 $0C20 F8 E6 E0 50 B0 50 8E 7B $0C28 05 20 B7 00 20 BE DE 20 $0C30 F8 E6 E0 18 B0 40 8A 20 $0C38 5B FB 20 A9 0C 20 95 D9 $0C40 60 4C 00 0B 20 3F 0E 20 $0C48 A9 0C 20 95 09 60 20 3F $0C50 0E 20 IC 0E 20 A9 0C 20 $0C58 95 09 60 20 52 0E 20 A9 $0C60 0C 20 95 09 60 20 9F 0C $0C68 C9 93 F0 47 C9 91 F0 DE $0C70 C9 90 F0 00 C9 89 F0 E3 $0C78 C9 09 F0 90 C9 C2 F0 CI $0C80 4C C9 DE 4C 99 El 20 46 $0C88 E7 E0 C0 B0 F6 A4 51 A5 $0C90 50 C0 02 90 06 00 EC C9 $0C98 30 B0 E8 60 00 00 00 8D $0CA0 9C 0C 8E 9D 0C 8C 9E 0C $0CA8 60 AD 9C 0C AC 9E 0C AE $0CB0 90 0C 60 20 Bl 00 C9 CI $0CB8 F0 00 20 86 0C 20 62 0E $0CC0 20 B7 00 C9 CI 00 E2 20 $0CC8 Bl 00 20 86 0C 8E DE 0C $0CD0 80 DC 0C 8C DD 0C 20 00 $0CD8 00 4C C0 0C 00 00 00 60 $0CE0 A9 00 E5 04 AA A9 00 E5 $0CE8 05 85 lE F0 F2 A9 FF 85 $0CF0 01 85 FF 4C 81 00 A9 00 $0CF8 E5 07 AA A9 FF 85 lE A9 $0D00 01 85 Dl 85 FF 00 EC 38 $0008 B0 06 38 B0 E9 38 AD DE $0010 0C E5 E2 85 D7 B0 00 38 $0018 A9 00 E5 07 85 07 A9 FF $0020 85 E6 30 04 A9 01 85 E6 $0028 38 AD DC 0C E5 E0 85 D4 $0030 AO DD 0C E5 El 85 05 B0 $0038 15 38 A9 00 E5 D4 85 04 $0040 A9 00 E5 05 85 D5 A9 FF $0048 85 E4 85 E5 30 08 A9 00 $0050 85 E5 A9 01 85 E4 A5 07 $0058 F0 AD A5 D4 00 04 A5 05 $0060 F0 A8 38 A5 05 00 04 A5 $0068 04 C5 D7 6A 85 FF 38 A9 $0070 00 85 00 85 Dl E5 D7 38 $0078 E5 04 AA A9 FF E5 05 85 $0080 lE A5 Dl 30 5A 00 08 A5 $0088 00 00 04 24 FF 10 50 18 $0090 A5 E2 65 E6 85 E2 A8 B9 $0098 96 0E 85 CE B9 56 0F 85 $0OA0 CF 38 A5 00 E5 04 85 00 $0OA8 A5 Dl E5 05 85 Dl E8 00 $0OB0 04 E6 lE F0 04 24 FF 30 $0DB8: 26 A5 E3 4A 90 05 AC 54 $0DC0: C0 B0 03 AC 55 C0 A8 Bl $0DC8: CE 05 30 91 CE 24 lE 30 $0000: B0 8D 54 C0 AD DD 0C 85 $0DD8: El AD DC 0C 85 E0 60 18 $0DE0: A5 D2 65 E4 30 0C C9 07 $0DE8; 00 10 E6 E3 A9 00 85 02 $0DF0; F0 0A C6 E3 A9 06 85 02 $0DF8: 00 02 85 02 A4 02 B9 16 $0E00: 10 85 30 E8 00 04 E6 lE $0E08: F0 AF A5 00 18 65 D7 85 $0E10: 00 90 02 E6 Dl 24 FF 30 $0E18: A0 4C 8F 00 A9 00 A8 85 $0E20: CE A9 20 85 CF AD 55 C0 $0E28: A9 00 91 CE AD 54 C0 A9 $0E30: 00 91 CE C8 00 EF E6 CF $0E38: A5 CF C9 40 90 E7 60 AD $0E40: 52 C0 AD 57 C0 AD 50 C0 $0E48: 80 01 C0 80 00 C0 AD 5E $0E50: C0 60 AD 56 C0 AD 51 C0 $0E58: AD 54 C0 80 00 C0 8D 0C $0E60: C0 60 85 E0 84 El 86 E2 $0E68: BD 96 0E 85 CE BD 56 0F $0E70: 85 CF A5 E0 20 10 10 A6 $0E78: 02 BD 16 10 85 30 A5 E3 $0E80: 4A 90 05 AC 54 C0 B0 03 $0E88: AC 55 C0 A8 Bl CE 05 30 $0E90: 91 CE 8D 54 C0 60 00 00 $0E98: 00 00 00 00 00 00 80 80 $0EA0: 80 80 80 80 80 80 00 00 $0EA8: 00 00 00 00 00 00 80 80 $0EB0: 80 80 80 80 80 80 00 00 $0EB8: 00 00 00 00 00 00 80 80 $0EC0: 80 80 80 80 80 80 00 00 $0EC8; 00 00 00 00 00 00 80 80 $0ED0; 80 80 80 80 80 80 28 28 $0ED8: 28 28 28 28 28 28 A8 A8 $0EE0; A8 A8 A8 A8 A8 A8 28 28 $0EE8: 28 28 28 28 28 28 A8 A8 $0EF0: A8 A8 A8 A8 A8 A8 28 28 $0EF8: 28 28 28 28 28 28 A8 A8 $0F00; A8 A8 A8 A8 A8 A8 28 28 $0F08: 28 28 28 28 28 28 A8 A8 $0F10: A8 A8 A8 A8 A8 A8 50 50 $0F18: 50 50 50 50 50 50 D0 00 $0F20: 00 00 00 00 00 00 50 50 $0F28: 50 50 50 50 50 50 00 00 $0F30: 00 00 00 00 00 00 50 50 $0F38: 50 50 50 50 50 50 D0 00 $0F40: 00 00 00 00 00 D0 50 50 $0F48: 50 50 50 50 50 50 D0 00 $0F50: 00 00 00 D0 00 00 20 24 $0F58: 28 2C 30 34 38 3C 20 24 $0F60: 28 2C 30 34 38 3C 21 25 $0F68: 29 2D 31 35 39 30 21 25 $0F70: 29 2D 31 35 39 30 22 26 $0F78: 2A 2E 32 36 3A 3E 22 26 $0FS0: 2A 2E 32 36 3A 3E 23 27 $0F88: 2B 2F 33 37 3B 3F 23 27 $0F90: 2B 2F 33 37 3B 3F 20 24 $0F98: 28 2C 30 34 38 3C 20 24 $0FA0: 28 2C 30 34 38 3C 21 25 $0FA8: 29 2D 31 35 39 3D 21 25 $0FB0: 29 20 31 35 39 30 22 26 $0FB8: 2A 2E 32 36 3A 3E 22 26 $0FC0: 2A 2E 32 36 3A 3E 23 27 $0FC8: 2B 2F 33 37 3B 3F 23 27 $0FD0: 2B 2F 33 37 3B 3F 20 24 $0FD8: 28 2C 30 34 38 3C 20 24 $0FE0: 28 2C 30 34 38 3C 21 25 $0FE8: 29 20 31 35 39 30 21 25 $0FF0: 29 2D 31 35 39 30 22 26 $0FF8: 2A 2E 32 36 3A 3E 22 26 $1000: 2A 2E 32 36 3A 3E 23 27 $1008: 2B 2F 33 37 3B 3F 23 27 $1010: 2B 2F 33 37 3B 3F 01 02 $1018: 04 08 10 20 40 85 D2 84 $1020: 03 A9 00 85 E3 A0 06 38 $1028: A5 02 F9 3F 10 AA A5 03 $1030: F9 46 10 90 04 85 03 86 $1038: 02 26 E3 88 10 E9 60 07 $1040; 0E IC 38 70 E0 C0 00 00 $1048; 00 00 00 00 01 16 Peeker 6/86 ^ quApik PL0T.3.E (Applesoft-Programm) 1910 HOME : PRINT "Bitte Darstellungsgrenzen eingeben! Wünschen Sie Erläuterungen? <J/N>"; 1920 GOSUB 3400: IF A$ = "N" THEN PRINT ; VTAB 17: GOTO 1000 GOTO 6000: REM Subroutinen folgen 1950 1010 REM Subroutine Zeichnen 1930 ID$ = "2": GOSUB 5510 1020 IF F$ = "" OR XL = YH AND YL = XH THEN RETURN 1940 HOME : PRINT "Bitte Grenzen eingeben 1" 1030 X0 = 0;ST = 1 / MX: REM Initialisierung 1950 CY% = 6:CX% = 0: & POS {CX%,CY%): CALL CL%: INPUT 1040 IF RIGHT$ (P$,I) = "K" THEN FOR T = T0 TO TI STEP "Minimum für X: ";XL TS; REM Starte T-Schleife 1960 CX% = 40: & POS (CX%,CY%)-. CALL CL%: INPUT "Maximum 1050 GOSUB 3300:XA = XL: REM Generiere Liste in Textseite für X: ";XH 1060 X = XA; IF X > XH THEN 1160: REM Start x-Schleife 1970 CY% = 9:CX% = 0: & POS (CX%.CY%): CALL CL%\ INPUT 1070 IF PEEK (KE%) > 127 THEN GOSUB 1500: REM "Minimum für Y: ";YL umschalten? 1980 CX% = 40: & POS (CX%.CY%)\ CALL CL%: INPUT "Maximum 1080 IF PEEK (PG%) THEN & POS (14,20): PRINT X;: CALL für Y: ":YH CL%: REM PRINT, wenn Textseite aktiv 1990 IF XL > XH THEN X = XL:XL = XH:XH = X 1090 IF NOT X0 THEN X0 = FN XS(X):Y0 = FN YS( FN Y{X)): 2000 IF YL > YH THEN X = YL:YL = YH:YH = X GOTO 1160: REM Ausgangspunkt 2010 IF YL > 0 THEN YL = 0 1100 XI = FN XS(X):Y1 - FN YS( FN Y(X)): REM Endpunkt 2020 IF YH < 0 THEN YH = 0 1110 IF Y1 < 0 THEN Y1 = 0: REM gegen 'illegal Quantlty' 2030 IF XL > 0 THEN XL = 0 1120 IF YI > 191 THEN Y1 = 191 2040 IF XH < 0 THEN XH = 0 1130 IF Yl = 191 AND Y0 = 191 OR NOT (Yl OR Y0) THEN X0 = 2050 IF YL = YH AND XL = XH THEN PRINT CHR$ 0; GOTO 1160: REM => Pol (7);"Eingabefehler! Bitte wiederholen!": GOTO 1950 1140 IF NOT Yl AND Y0 = 191 OR Yl = 191 AND NOT Y0 THEN 2060 IF YL = YH THEN GOSUB 2420 X0 = 0: GOTO 1090: REM Keine Verbindung zwischen 2070 IF XL = XH THEN GOSUB 2400 Polen 2080 VTAB 13: PRINT "Die Darstellungsgrenzen wurden wie 1150 & HPLOT X0,Y0 TO X1,Y1:X0 = X1:Y0 = Yl: REM folgt festgelegt: " Zeichnen / neuer Ausgangspunkt 2090 & POS (0,16): PRINT "Kleinstes X: ":XL;: CALL CL% 1160 IF X < XH THEN X = X + ST; GOTO 1070 2100 & POS (40,16); PRINT "Größtes X: ";XH 1170 1=1+ 1:P(0,I) = R:P(1,I) = S:P(2,I) = T; REM 2110 & POS (0,18): PRINT "Kleinstes Y: ";YL;: CALL CL% Parameterliste 2120 & POS (40,18): PRINT "Größtes Y: ";YHj: CALL CL% 1180 IF RIGHT$ (P$,l) = "K" THEN X0 = 0; NEXT T: REM s, 2130 PRINT : VTAB 22: PRINT "Ist das richtig? <J/N>";: 1030 CALL CL% 1190 PRINT CHR$ (7): GET A$: RETURN 2140 GOSUB 3400: IF A$ = "J" THEN PRINT : GOTO 2350 1200 : 2150 I = 0:X0 = I:Y0 = I:XI = I:Y1 = I:MX = I;MY = I:BX = 1290 REM Fehlerbehandlung I:BY = I: REM clr Hilfsvar. 1300 LN = PEEK (218) + 256 * PEEK (219):ER = PEEK 2160 PRINT : VTAB 22: PRINT "Wollen Sie die (222): CALL 3087 Darstellungsgrenzen komplett neu eingeben? <J/N> "j : 1310 IF ER = 133 OR ER = 69 OR ER = 53 THEN XA = ST + X;X0 GOSUB 3400: IF A$ = "J" THEN PRINT : VTAB I: PRINT = 0: GOTO 1060 "Dann bitte Eingabe wiederholen!": GOTO 1950 1320 REM Illegal Quantity, Overflow, Division by Zero 2170 HOME : PRINT "Kleinere Manipulationen an den Achsen. 1330 IF ER = 255 THEN 6460: REM Hauptmenü Wollen Sie Erläuterungen? <J/N>";: GOSUB 3400: PRINT 1340 IF ER = 254 THEN PRINT : PRINT CHR$ (7)"Bitte Zahl 2180 IF A$ = "J" THEN ID$ = "3": GOSUB 5510 eingeben!": & POS (CX%,CY%}: RESUME : REM 2190 HOME : PRINT : VTAB 3: PRINT " x-Aohse strecken? fehlerhafte Eingabe <J/N> "j: GOSUB 3400: IF A$ = "J" THEN GOSUB 1700 1350 IF ER = 6 AND LN = 6060 THEN TEXT : PRINT CHR$ 2200 PRINT : VTAB 5: PRINT " y-Achse strecken? <J/N> ";: (21): HOME : PRINT CHR$ (7)"Achtung! File PLOT.BX GOSUB 3400: IF A$ = "J" THEN GOSUB 1750 fehlt!": PRINT "PLOT.3.E abgebrochen!" CHR$ (7): END 2210 PRINT : VTAB 8: PRINT "Nun bitte das Verhältnis 1360 IF ER > 0 AND ER < 16 THEN TEXT : PRINT CHR$ (21): positiver/negativer Achsenabschnitt:": PRINT : PRINT " HOME : PRINT CHR$ (7)"DOS-Fehler #";ER;" in Zeile Für X-Achse? <J/N> ";: GOSUB 3400: IF A$ = "J" THEN ";LN: END GOSUB 1800 1370 TEXT : PRINT CHR$ (21): VTAB 20: PRINT CHR$ 2220 PRINT ; VTAB 12: PRINT " Für y-Achse? <J/N> ";: GOSUB (7)"Fehler Code # ";ER;" in Zeile "jLN: END 3400: IF A$ = "J" THEN GOSUB 1850 1400 : 2230 IF (XI OR X0) AND NOT (XI AND X0) OR (YI OR Y0) AND 1490 REM Grafik/Text umschalten NOT (Yl AND Y0) THEN PRINT : PRINT "Nie mit 0 1500 POKE - 16368,0: REM lösche Keyboardstrobe strecken oder stauchen!" CHR$ (7): GOTO 2190 1510 IF NOT PEEK (PG%) THEN POKE - 16303,0; POKE 2240 VTAB 20: PRINT "Alles o,k,? <J/N> ";: GOSUB 3400: IF PG%.1: RETURN : REM Textseite A$ = "N" THEN PRINT : VTAB 2: PRINT "Bitte 1520 POKE - 16304,0: POKE PG%,0: RETURN : REM Grafikseite wiederholen!";: CALL CL%: GOTO 2190 1530 : 2250 IF X0 AND XI THEN XL = XL / X0 * XI:XH = XH / X0 * XI 1690 REM X-Achse strecken/stauchen 2260 IF Y0 AND Yl THEN YL = YL / Y0 * Yl:YH = YH / Y0 * Yl 1700 CY% = 2:CX% = 1: & POS (CX%,CY%): INPUT "Verhältnis 2270 IF MX OR BX THEN X0 = XH - XL:X1 = MX + BX:XH = MX / alte Achse ";X0 XI * X0:XL = - BX / XI + X0 1710 CX% = 40: & POS (CX%,CY%): INPUT "zu neue Achse 2280 IF MY OR BY THEN Y0 = YH - YL:Y1 = MY + BY:YH = MY / ";X1 Yl * Y0:YL = - BY / Yl * Y0 1720 RETURN 2290 HOME : GOTO 2080 1730 : 2330 : 1740 REM Y-Achse strecken/stauchen 2340 REM Umrechnung Bildschirm 1750 CY% = 4:CX% = 1: & POS (CX%,CY%)\ INPUT "Verhältnis 2350 MX = 559 / (XH - XL):BX = - MX * XL alte Achse ";Y0 2360 MY = - 191 / (YH - YL):BY = - MY * YH 1760 CX% = 40: & POS (CX%,CY%): INPUT "zu neue Achse 2370 DEF FN XS(X) = INT (MX X + BX + .5): DEF FN , "; Yl YS(X) = INT (MY * X + BY + ,5) 1770 RETURN 2380 RETURN 1780 : 2390 REM X-Achse an y-Achse anpassen 1790 REM Neue Aufteilung X-Achse 2400 FA = 279 / 191:XL = FA * (YL - YH) / 2:XH = FA # (YH 1800 CY% = 9:CX% = 1: & POS (CX%,CY%): INPUT "Anteil für - YL) / 2: RETURN positiven ";MX 2410 REM y-Achse an x-Achse anpassen 1810 CX% =40: & POS (CX%,CY%): INPUT "für negativen 2420 FA = 279 / 191:YL = (XL - XH) / (2 # FA):YH = (XH - Achsenabschnitt ";BX XL) / [2 * FA): RETURN 1820 RETURN 2430 : 1830 : 2440 REM für Skalierung 1840 REM Y-Achse neu teilen 2450 X0 = INT ( FN LG(X)): IF X0 < FN LG(X) THEN X0 = X0 1850 CY% = 11:CX% = 1: & POS (CX%,CY%): INPUT "Anteil für + 1 positiven ";MY 2460 ST = X0 - I; IF FN LG(X) - X0 < FN LG(2) - 1 THEN 1860 CX% = 40: & POS (CX%,CY%): INPUT "für negativen ST = ST - 1 Achsenabschnitt ";BY 2470 X0 = EXP ( LOG (10) + X0);ST = EXP ( LOG (10) ^ 1870 RETURN ST): RETURN 1880 : 2480 : 1890 REM Darstellungsgrenzen 2580 REM Eingabe Parameter 1900 IF XL OR XH OR YL OR YH THEN HOME : GOTO 2080: REM 2590 REM Eingabe von T alte Werte zeigen 2600 IF RIGHT$ (P$,I) = "K" THEN 2670 Peeker 6/86 17 Sonderangebot für Peeker-Leser ■ Sonderangebot für Pee Festplattenkomplettlösung für jedermann Mit der Firma Frank & Britting GmbH, die auf Festplatten spezialisiert ist, konnten wir ein extrem günstiges Sonderangebot aushandeln, das eine Festplattenkomplett¬ lösung selbst für Apple-Besitzer mit klei¬ nerem Geldbeutel erschwinglich macht. Sie können unter zwei Varianten wählen: Luxus-Lösung: 20-Megabyte-Festplatte MDB20 (MDB = Mobile Datenbox) + Me- gaboard-Controller + Handbuch + 3 Kon¬ figurationsdisketten -f- Anschlußkabel + DB-Meister-Dateiverwaltungsprogramm + Handbuch + 2 Programmdisketten zum Gesamtpreis von nur DM 3199,- inkl. MwSt. Standard-Lösung: 10-Megabyte-Fest- platte MDB10 -i- Megaboard-Controller -i- Handbuch -H 3 Konfigurationsdisketten -h Anschlußkabel -h DB-Meister-Dateiver- waltungsprogramm Handbuch + 2 Pro¬ grammdisketten zum Gesamtpreis von nur DM 2799,- inkl. MwSt. (jeweils 6 Monate Garantie.) Wozu eine Festplatte? Für eine Festplatte sprechen zwei Argu¬ mente, nämlich erstens der bedeutend größere Datenspeicher und zweitens die sehr hohe Zugriffszeit. • 80- und 160-Spur-Laufwerke haben zwar einen größeren Datenspeicher als die normalen 35-Spur-Laufwerke, doch ist die Zugriffszeit hier wie dort bescheiden. • RAM-Karten haben zwar eine hohe Zu¬ griffszeit, doch ist der Datenspeicher flüchtig: Strom aus - Daten weg! Für unsere Festplatten-Standard-Lösung (MDB10) gilt demgegenüber: - Die Nettospeicherkapazität beträgt hier ca. 9.650K = ca. 9.880.000 Zeichen = ca. 15 Disketten mit 160 Spuren = ca. 69 Disketten mit 35 Spuren. - Die Datenübertragungsrate beträgt auf unterster Ebene ca. 44K/s = ca. 45.000 Zeichen/s. Zum Vergleich beläuft sich die Übertragungsrate bei normalen Disketten¬ laufwerken auf ca. 7,5K/s und bei RAM- Karten auf ca. 44K/S, d.h. RAM-Karten sind also keineswegs schneller, sondern meist sogar langsamer als die MDB-Fest- platte. Sie erhalten deshalb mit unserer Festplat¬ tenlösung einen großen externen Massen¬ speicher bei sehr hoher Datenübertra¬ gungsrate zu einem äußerst niedrigen Preis. Unkomplizierte Installation Die eigentliche Festplatte, also die „Mobi¬ le Datenbox“ MDB, ist ein kleines rechtek- kiges Kästchen mit der Länge einer Hand¬ fläche. Das eine Ende des Flachbandka¬ bels wird in die MDB, das andere Ende in den Megaboard-Controller gesteckt, der wie eine normale Erweiterungskarte aus¬ sieht und in jeden Slot von 1-7 paßt. Die MDB hat ein eigenes Netzteil. Deshalb brauchen Sie jetzt nur noch die MDB und danach den Apple einzuschalten, und fer¬ tig ist die Installation. Im Gegensatz zur Megacore-Festplatte, die wegen des Ap- ple-Netzteil-Wechsels von Apple-Händ¬ lern eingebaut werden sollte, ist die Instal¬ lation der MDB von jedermann problemlos zu bewerkstelligen. Problemlose Konfigurierung Danach booten Sie die mitgelieferte Sy¬ stemdiskette DOS-CONFIG von einem 35-Spur-Laufwerk, tippen „I“ für Initiali¬ sieren, geben die Festplattenparameter ein (bei MDB10: 4 Köpfe, 306 Zylinder, Präkompensation ab dem 256. Zylinder und Schneller Zugriff Ja), und nach zwei weiteren Kontrollbestätigungen beginnt die Initialisierung. Dies dauert ca. 14 Minu¬ ten für die MDB10, und nunmehr kann die Festplatte mit den Betriebssystemen be¬ schrieben werden. Als Betriebssysteme können Sie im ein¬ zelnen verwenden: - DOS 3.3, - Diversi-DOS 2C und 4C, -Apple-Pascal 1.1 und 1.2, -ProDOS 1.0.1, 1.0.2, 1.1.1, - CP/M 2.2 56K (z.Zt nur diese CP/M- Version). Die Konfigurierung, d.h. die Speicherver¬ teilung auf die verschiedenen Betriebssy¬ steme, sollte mit Bedacht überlegt wer¬ den. NIcht-benötigte Betriebssysteme können Sie natürlich weglassen. Nehmen wir an, Sie brauchen zunächst nur DOS 3.3. Wie wird nun konfiguriert? Sie booten nach der obigen Initialisierung die Festplatte mit PR#7 und wählen aus dem automatisch erscheinenden Bild¬ schirm-Menü „C“ für „Configuration“. Dann Tippen Sie „D“ für DOS 3.3, danach „V“ für Volumes, danach z.B. „10“ für 10 Volumes = 2 x 10 x 140 = 2800K (1 Volume entspricht einem 35-Spur-Dop- pellaufwerk). Nun können Sie nach zwei weiteren Kontrollbestätigungen die neue Konfiguration auf die Diskette schreiben, was nur wenige Sekunden dauert. So ein¬ fach ist das! Später können Sie dann, so¬ bald Sie mit der Festplatte besser vertraut sind, bei Bedarf die Konfigurationen für ProDOS, Apple-Pascal und CP/M nach¬ holen. Wie spricht man die MDB an? Sie werden sich nun vielleicht fragen, wie Sie die Festplatte ansprechen müssen und ob Sie neue DOS-Befehle lernen müssen. Mitnichten! Booten Sie einfach die Fest¬ platte mit PR#7 - übrigens heißt es immer PR#7, auch wenn Sie die Megaboard- Karte z.B. in Slot 4 gesteckt haben - und danach z.B. INIT HELLO, S7, V3, Dl Damit wird das Volumein „Drive 1, Slot 7“ formatiert. Nun können Sie mit CATALOG RUN usw. auf dieses Voiume wie üblich zugreifen. 18 Peeker 6/86 er-Leser Jl Sonderangebot für Peeker-Leser Wie schnell ist die MDB? Die Datenübertragungsrate beträgt bei der MDB physikalisch 5 MBits/s. Dies ist ein theoretischer und niemals erreichbarer Wert. Auf Spur-Sektor- bzw. Blockebene beträgt die praktisch erzielbare Übertra¬ gungsrate ca. 44K/S bis 47,5K/s, je nach Betriebssystem. Einige anschauliche Bei¬ spiele; Auf Sektorebene läßt sich ein 140K-DOS-Volume mit dem Programm MDB.KOPY in 6,2s auf ein anderes 140K- Volume überspielen. Auf Dateiebene läßt sich eine 1-Megabyte-ProDOS-Datei mit dem Programm PROFID in 122s duplizie¬ ren. Dies sind umgerechnet 17.000 Bytes/ s für Lesen bzw. Schreiben. Was läuft mit der MDB? Sie können normale Disk-Il-Laufwerke und beispielsweise Erphi-160-Spur-Lauf- werke im Mischbetrieb einsetzen. Die zu¬ sätzliche Verwendung von RAM-Karten ist bei der MDB überflüssig, da mit diesen in der Regel keine höheren Übertragungsra¬ ten erzielt werden können. Die Accelerator Ile funktioniert einwandfrei In Verbindung mit dem Megaboard-Control Isr {Slot-7- Schalter auf 1MHz einstellen). Die Spee- demon funktioniert jedoch wegen des Cache-Speichers leider nicht. DB-Meister Speziell für die zukünftigen MDB-Besitzer wurde das Adreß- und Schemabriefpro¬ gramm DB-Meister, das in der normalen Diskettenversion DM 290,- kostet, zum Festplattenbetrieb umgeschrieben. Tech¬ nische Daten: - Datensatzlänge bis zu 230 Zeichen, auf¬ teilbar in bis zu 25 Felder; maximal 1000 Datensätze pro Volume - 2 variable Indexfelder und 1 zusätzliches, konstantes Suchfeld. - Maskengenerator-Modul für die freie Definition von Bildschirmeingabe- und Ausdruck-Masken. - Dateipfiege-Modul zum Neueingeben, Ändern, Löschen, Ansehen, Bildschirm- Ausdruck usw. - Sortier- und Filter-Module zum Sortieren und Untersortieren nach Indexfeldern und zum selektiven oder kumulierenden Filtern nach beliebigen Feldern. - Druck-Modul zum Ausdrucken von Selbstklebe-Etiketten, tabellarischen Li¬ sten und Schemabriefen mit automati¬ schem Einschub von Adressen und Anre¬ den sowie weiteren Feideinschüben im Briefkörper; Einzelblatt und Endlospapier verwendbar; Druckertreiber für Typenrad¬ drucker mit anderer Typenradbelegung können eingebunden werden. - Brief-Modul zum Schreiben der Sche¬ mabriefe; bei Bedarf separat verwendbar. - Schnelles Backup-Programm (nur 10 Minuten für 2,5 Megabytes bzw. 18 DB- Meister-Dateien). - Diverse Spezial-Module zur Indexfeld- Umdefinierung, zur Sortierung nach Kun¬ dennummern usw. Alle Programm-Module laufen auf einem Apple Ile oder ll-i- mit MDB (Ausnahme: Das Brief-Modul funktioniert nur auf dem Ile mit 80-Zeichenkarte, doch können be¬ liebige Fremdtexte eingelesen werden.). Wie wird besteiit? Sie senden Ihre Bestellung an den Hüthig- Software-Service. Sie erhalten dann von der Firma Frank & Britting eine Voraus¬ rechnung, nach deren Überweisung Ihnen von dort die MDB 10 bzw. MDB20, der Megaboard-Controller, das Handbuch und die Konfigurierungsdisketten mit 6 Mona¬ ten Garantie geliefert werden. Gleichzeitig erhalten Sie vom Hüthig-Software-Service das DB-Meister-Programm (2 Disketten und Handbuch) in der für die MDB bereits Das DB-Meister-Programm eignet sich für normale Adreßverwaltung sowie für Dateien aller Art mit vielen, aber kleinen Datensätzen (max. 230 Zeichen). Das Pro¬ gramm ist nicht für das Schreiben von Rechnungen o.ä. gedacht. Die Verarbeitungsgeschwindigkeit des „DB-Meisters“ ist bei der MDB extrem schneil. Einige Sekundenangaben, bezo¬ gen auf eine Datei mit 500 Datensätzen zu je 220 Zeichen: - Modul-Wechsel: 1s - Suche nach Indexfelder: 0,3s -Suche nach Nicht-Indexfeldern: 17s - Filtern und Untersortieren: 25s - Bildschirm-„Drucken“: 38s Noch ein etwas anschaulicheres Beispiel: Wenn Suchfelder neu vergeben werden sollen, muß die alte Indexdatei (ca. 50 Sektoren) und die ganze Hauptdatei (ca. 450 Sektoren) eingelesen werden und dann nach dem automatischen Heraussu¬ chen der neuen Suchwörter die neue In¬ dexdatei abgespeichert werden. Dieser normalerweise zeitraubende Prozeß dau¬ ertauf der MDB nur 14s. angepaßten Version. Nach einer geringfü¬ gigen Änderung im Hello-Programm kön¬ nen Sie diese Neuversion des DB-Mei¬ sters übrigens auch zusätzlich auf norma¬ len 35-Spur-Laufwerken einsetzen. Zur Bestellung können Sie eine der im Peeker eingehefteten Bestellkarten ver¬ wenden. Stichwort: 1 x MDBIO-Sonderangebot für DM 2799,- oder 1 X MDB20-Sonderangebot für DM 3199,- Hüthia PUBLIKATION SOFTWARE SERVICE Im Weiher 10 • 6900 Heidelberg 1 Peeker 6/86 19 2610 CY% = 3:CX% = 0: & POS {CX%,CY%): INPUT "Bitte T eingeben: ";T 2620 VTAB 4: PRINT SPC( 14);"T = ";T: CALL CL% 2630 PRINT ; PRINT TAB( 20)j"Richtig? <J/N> 2640 GOSUB 3400: IF A$ = "N" THEN 2610 2650 RETURN 2660 REM T in Schleife 2670 CY% = 2:CX% = 0: & POS (CX%.CY%): INPUT "Bitte Startwert: ";T0:CX%=40: & POS (CX%.CY%)\ INPUT "und Endwert für T eingeben: ";T1 2680 CX% = 0:CY% = 4: & POS {CX%,CY%): INPUT "Nun bitte die Schrittweite eingeben: ";TS 2690 IF TS = 0 THEN VTAB 7: PRINT CHR$ (7);"Nie Schrittweite 0!": GOTO 2680 2700 IF TS < 0 THEN 2730 2710 IF TI < T0 THEN T = TI:TI = T0:T0 = T 2720 GOTO 2740 2730 IF T0 < TI THEN T = T0:T0 = TI:TI = T 2740 LI = 1:L2 = 7: GOSUB 3450: VTAB 2 2750 PRINT "T läuft von; ";T0 2760 PRINT " bis; ";TI 2770 PRINT " mit Schrittweite; ";TS 2780 PRINT : PRINT TAB( 10);"Ist das richtig? <J/N> GOSUB 3400: IF A$ = "N" THEN LI = 2:L2 = 6: GOSUB 3450: GOTO 2670 2790 RETURN 2800 : 2810 REM Eingabe von S 2820 CX% = 0:CY% = 8: & POS (CX%,CY%): INPUT "Bitte S eingeben: ";S 2830 VTAB 9: PRINT SPC( 15);"S = ";S: CALL CL% 2840 VTAB 11: PRINT TAB( 20);"Richtig? <J/N> ";: GOSUB 3400: IF A$ = "N" THEN 2820 2850 RETURN 2860 : 2870 REM Eingabe von R 2880 CX% = 0:CY% = 14: & POS (CX%,CY%): INPUT "Bitte R eingeben: ";R 2890 VTAB 15: PRINT SPC( 15);"R = ";R: CALL CL% 2900 VTAB 17: PRINT TAB( 20);"Richtig? <J/N> : GOSUB 3400: IF A$ = "N" THEN 2880 2910 RETURN 2920 ; 2940 REM Für Parameterliste 2950 FOR J = 1 TO I: & POS ( FN P1(J),CY% + FN P2(J)): PRINT P(K,I - J + 1): NEXT ; RETURN 2960 : 2990 REM für Parametertabelle 3000 N$ = "nicht verwendet" 3010 ON VAL (P$) GOTO 3030,3040,3060,3050,3070,3080,3090 3020 S$ = N$:T$ = N$:R$ = = N$: RETURN 3030 R$ = STR$ (R) S$ = N$;T$ = N$: RETURN 3040 S$ = STR$ (S) R$ == N$;T$ = N$: RETURN 3050 T$ = STR$ (T) R$ = N$:S$ = N$: RETURN 3060 R$ = STR$ (R) S$ = STR$ (S):T$ = N$: RETURN 3070 R$ = STR$ (R) T$ = STR$ (T):S$ = N$: RETURN 3080 S$ = STR$ (S) T$ = STR$ (T):R$ = N$: RETURN 3090 R$ = STR$ (R) S$ = STR$ (S):T$= STR$ (T): RETURN 3100 3140 3150 3160 3170 3180 3190 3200 3210 3220 3230 3240 3250 3260 3290 3300 3310 REM alle Parameter eingeben IF P$ = "0" THEN 3180 HOME : PRINT TAB( 10);"Parametereingabe" ON VAL (P$) GOSUB 3190,3200,3220,3210,3230,3240,3250 HOME : RETURN GOSUB 2880 GOSUB 2820 GOSUB 2600 GOSUB 2820 GOSUB 2600 GOSUB 2600 GOSUB 2600 RETURN RETURN RETURN GOSUB 2880 GOSUB 2880 GOSUB 2820 GOSUB 2820 RETURN RETURN RETURN GOSUB 2880: RETURN REM Kurzzusammenfassung HOME : PRINT "Die Funktion lautet:": PRINT F$ VTAB 4: PRINT "Darstellungsgrenzen:": & POS (9,4): PRINT "Kleinstes X: ";XL;: & POS (40,4): PRINT "Größtes X: ";XH 3320 & POS (9,5): PRINT "Kleinstes Y: ":YL;: & POS (40,5): PRINT "Größtes Y: ";YH 3330 VTAB 7: PRINT "Parameter: ": GOSUB 3000 3340 4 POS (0,7): PRINT "R:"R$: IF I > 0 AND R$ < > N$ THEN CY% = 7:K = 0: GOSUB 2950 3350 & POS (0,11): PRINT "S:"S$: IF I > 0 AND S$ < > N$ THEN CY% = 11:K = 1: GOSUB 2950 3360 & POS (0,15): PRINT "T:"T$: IF I > 0 AND T$ < > N$ THEN CY% = 15:K = 2: GOSUB 2950 3370 VTAB 21; PRINT "Abszisse X = ": RETURN 3380 : 3390 REM Teste ob ja oder nein 3400 GET A$: IF A$ < > CHR$ (3) AND A$ < > "J" AND A$ < > "j" AND A$ < > "N" AND A$ < > "n" THEN 3400 — 3410 IF A$ > "Z" THEN A$ = CHR$ ( ASC (A$) - 32) 3420 IF A$ < > CHR$ (3) THEN RETURN 3430 POP : GOTO 6460 3440 REM lösche zwischen LI und L2 Bildschirm 3450 FOR L = LI - 1 TO L2 - 1: & POS (0,L): CALL CL%: NEXT ; RETURN 3460 : 3480 REM Zeichne Achsen 3490 REM und skaliere 3500 IF XL = YH AND YL = XH THEN RETURN 3510 & HGR : & HPLOT 0,0 TO 559,0 TO 559,191 TO 0.191 TO 0,0: REM generiere Rahmen 3520 & HPLOT FN XS(0).0 TO FN XS(0).191: & HPLOT 0, FN YS(0) TO 559, FN YS{0):K =0: IF YL = 0 THEN K = - 2 3530 IF YH = 0 THEN K = 2 3540 X = XH: IF ABS (XL) > XH THEN X = ABS (XL) 3550 GOSUB 2450: FOR X = ST TO X0 STEP ST 3560 IF X < XH THEN & HPLOT FN XS(X), FN YS(0) + K - 2 TO FN XS(X), FN YS(0) + K + 2 3570 IF - X > XL THEN & HPLOT FN XS( -X), FN YS(0) + K - 2 TO FN XS( - X), FN YS(0) + K + 2 3580 NEXT ;K = 0; IF XL = 0 THEN K = 2 3590 IF XH = 0 THEN K = - 2 3600 X = YH: IF ABS (YL) > X THEN X = ABS (YL): GOSUB 2450 3610 GOSUB 2450: FOR X = ST TO X0 STEP ST 3620 IF X < YH THEN & HPLOT FN XS(0) + K - 2, FN YS(X) TO FN XS(0) + K + 2, FN YS(X) 3630 IF - X > YL THEN & HPLOT FN XS(0) + K - 2, FN YS( - X) TO FN XS(0) + K + 2, FN YS( - X) 3640 NEXT : RETURN 3650 : 3690 REM Funktionseingabe 3700 1=0: HOME : PRINT "Funktionseingabe: Wünschen Sie Erläuterungen? <J/N>";: GOSUB 3400 3710 IF A$ = "J" THEN ID$ = "4": GOSUB 5510 3720 HOME : PRINT "Bitte geben Sie die darzustellende Funktion ein!": ONERR GOTO 3900 3730 LI = 10:L2 = 15: GOSUB 3450; & POS (0,9): PRINT F$: VTAB 10 3740 & FN ,F$:F$ = "y=" + F$:P$ = STR$ ( PEEK (255)) 3750 R = 1.4:S = 2.1:T = 3-31: REM Zufallswerte Parameter 3760 I = 0:Y = FN Y{1.1084): REM Syntax-Test 3770 R = 0;T = 0:S = 0: IF P$ < "4" THEN 3810 3780 VTAB 13: PRINT "Es wurde der Parameter T verwendet." 3790 PRINT "Soll T ln einer Schleife mit fester Schrittweite durchlaufen werden? <J/N>"; 3800 GOSUB 3400: IF A$ = "J" THEN P$ = P$ + "K" 3810 & POS (0,9); CALL CL%: PRINT F$;: CALL CL%: & POS (0,21): PRINT "Ist das richtig? <J/N> ";: CALL CL% 3820 GOSUB 3400: IF A$ = "N" THEN PRINT "Bitte korrigieren!": GOTO 3730 3830 ONERR GOTO 1300: REM wieder zurück auf normale ONERR-Routine 3840 RETURN 3880 : 3890 REM Spezial ONERR-Routine 3900 ER = PEEK (222): CALL 3087: IF ER < > 16 THEN 3770 3910 VTAB 17; PRINT CHR$ (7)"Fehler bei der Funktionseingabel Bitte auf korrekte Syntax achten! Nochmal!" 3920 GOTO 3730 3930 : 3940 REM SUPERDUMP STARTEN 3950 PRINT : POKE 104,8; PRINT CHR$ (4)"RUN SUPERDUMP.EPSON" 3960 : 4980 REM 4990 REM Disk-Menü 5000 POKE PG%,1: TEXT : HOME : PRINT "Disk-Menü; (Betätigen Sie 0 ... 6, Leertaste zeigt Grafik!)"; ONERR GOTO 5700 5010 VTAB 5; PRINT " 1 — Inhaltsverzeichnis der Diskette" 5020 PRINT : PRINT " 2 - Grafik von Disk laden" 5030 PRINT : PRINT " 3 - Grafik auf Disk speichern" 5040 PRINT : PRINT " 4 - aktives Laufwerk auswählen" 5050 PRINT : PRINT " 5 - Erläuterungen abrufen" 5060 PRINT : PRINT " 6 - Superdump" 5070 VTAB 20: PRINT " 0 - Zurück ins Hauptmenü" 5080 GET A$: IF A$ = " " THEN GOSUB 1510: GOTO 5080 5090 IF A$ < "0" OR A$ > "6" THEN 5080 • 5100 ON VAL (A$) GOTO 5140,5170,5220,5380,5270,3950 5110 ONERR GOTO 1300 5120 GOTO 6460: REM zurück ins Hauptmenü 5130 REM CATALOG 5140 PRINT : HOME ; PRINT D$"CATALOG,D"DR$",S"SL$ 5150 PRINT " Bitte beliebige Taste betätigen GET A$: GOTO 5000 5160 REM Neues Bild laden 5170 TEXT : HOME : POKE PG%,1 5180 INPUT "File-Sammelname ";A$ 20 Peeker 6/86 ^ qRAFik Peeker 6/86 21 6760 : 6770 REM 4 Bildschirm 6780 1=0: POKE - 16302,0: GOSUB 3500: GOTO 6460 6790 REM Zeichne Achsen und Skala/Menü 6800 : 6810 REM 5 Datenliste zeigen 6820 POKE PG%,0: GOSUB 1510: GOSUB 3300: GET A$: GOTO 6460 6830 REM Zusammenfassung / Menü 6840 : 6850 REM 6 Zeichnen 6860 POKE PG%.1: GOSUB 1500; GOSUB 1020: GOTO 6460 6870 REM Grafikseite/Menü 6880 : 6960 REM Pointer in ($67) falsch gesetzt, das Programm liegt in der 6970 REM 1. Grafikseite. EXEC-File PLOT.3.PRO korrigiert das, lädt 6980 REM und startet PLOT,3.E von Neuem 6990 ; 7000 VTAB 8: HTAB 5: PRINT "Programm PLOT.3.E wird geladen": PRINT : HTAB 14: PRINT "Bitte warten" 7010 PRINT CHR$ (4)"EXEC PLOT.3.PRO" 7020 : 7100 REM *******¥*********##*** 7120 REM* PLOT 3.E * 7140 REM * für APPLE //e, //c * 7160 REM * Hans-Martin Eng * 7180 REM * 24* Februar 1986 * 7200 REM ********************** PLOT.3.PRO (Exec-File) POKE 50. 128 POKE 103, 1 POKE 104, 64 POKE 16384, 0 LOAD PLOT.3.E CALL 54514 POKE 50.255 RUN PLOT.PATCH Ändern Sie die betreffenden Zeiien im Hauptpro¬ gramm wie foigt ab, wenn Ihr Druckerinterface dop- peit hochaufiösende Grafik ausdrucken kann. Die Steuerzeichen sind natüriich druckerspezifisch. Besitzen Sie einen anderen Drucker, hiift vieileicht ein Bück ins Handbuch. 3940 REM Ausdrucken 3950 PRINT CHR$ (21): PRINT D$"PR+1": REM 80-Zeichen aus, Drucker ein 3960 PRINT CHR$ (9) CHR$ (16);; REM stelle Interface-Command—Charakter um 3970 REM FX-80 spezifische Codes 3980 PRINT CHR$ (27)"M" CHR$ (27)"1" CHR$ (8);: REM Elite-Zeichensatz, Linker Rand Spalte 8 3990 PRINT CHR$ (27)"Q" CHR$ (90) CHR$ (27)"N" CHR$ (6);: REM Rechter Rand Sp 90, unterer Rand 4000 PRINT CHR$ (27)"D" CHR$ (8) CHR$ (24) CHR$ (40) CHR$ (56) CHR$ (72) CHR$ (0): REM Definiere Tabulatorstops 4010 PRINT TAB{ 43) CHR$ (27)"-l PLOT,3.E " CHR$ (27)"-0": REM Kopfzeile unterstrichen 4020 PRINT CHR$ (13) CHR$ (10) CHR$ (10)"Die Funktion lautet:" 4030 PRINT "F{X) = " MID$ (F$,3): PRINT 4040 PRINT CHR$ (10) CHR$ (10)"Darstellungsgrenzen:" CHR$ (9)"x läuft von:" CHR$ (9): 4050 PRINT XL CHR$ (9)"bis: "XH 4060 PRINT CHR$ (9) CHR$ (9)"y läuft von:" CHR$ (9)YL CHR$ (9)"bis: "YH 4070 IF R$ = N$ AND T$ = N$ AND S$ = N$ THEN PRINT : PRINT "Es werden keine Scharparameter verwendet*": GOTO 4150 4080 PRINT CHR$ (13) CHR$ (10)"Parameterliste:"; PRINT "Die Funktion wurde mit folgenden Parameterwerten gezeichnet: 4090 PRINT : IF R$ = N$ THEN 4110 4100 PRINT " R: "::K = 0: GOSUB 4300: PRINT 4110 IF S$ = N$ THEN 4130 4120 PRINT : PRINT " S: ";:K = 1; GOSUB 4300: PRINT 4130 IF T$ = N$ THEN 4150 4140 PRINT : PRINT " T: ";:K = 2: GOSUB 4300: PRINT 4150 PRINT CHR$ (13) CHR$ (10) CHR$ (10)"Hier die Grafik:" 4160 PRINT CHR$ (27)"1" CHR$ (0) 4170 PRINT CHR$ (16)"GZ": REM kritischer Punkt, Wenn Ihr Grafikinterface keinen 4180 REM Dumpbefehl für Double-Hires-Grafik kennt, müssen Sie auf 4190 REM SUPERDUMP ausweichen 4200 PRINT : PRINT : PRINT TAB( 80)"HME" 4210 PRINT D$"PR+0": PRINT D$"PR#3" 4220 GOTO 5000 4230 REM 4240 : 4290 REM Parametertabelle 4300 FOR J = 1 TO I; PRINT CHR$ (9);P(K,J): 4310 IF J / 5 = INT (J / 5) THEN PRINT 4320 NEXT J: PRINT 4340 RETURN 4350 : 5060 PRINT ; PRINT " 6 - Ausdrucken" 6080 PRINT D$"PR#3": & HGR : POKE PG%,0: GOSUB 1510; HOME : PRINT TAB( 29)"PL0T.3,E / Direktdruck" SUPERDUMP.PATCH Damit Superdump die PLOT.S.E-Grafikfiles einiesen und ausdrucken kann, müssen einige Befehle ein¬ gefügt werden. Darum mußte an anderer Stelle Speicherplatz eingespart werden. Ändern Sie darum bitte im Appiesoft-BASIC-Programm SUPERDUMP ■EPSON oder SUPERDUMP.IMAGEWRiTER die foi- genden Zeiien ab. 1260 TEXT :D$ = CHR$ (4): PRINT CHR$ (12): HOME 1320 PRINT : PRINT D$"BRUN SUPERDUMP" 1325 IF PEEK (64435) = 6 AND PEEK (64448) = 0 THEN POKE 34499.32 1530 PI = PEEK (43634): REM ADDRESSE PARAMETERBLOCK 1540 P2 = PEEK (43635);PB = PI + 256 * P2 1740 INPUT "Welche Graphik laden ? ":F$ 1750 IF F$ = "" THEN F$ = "BILD" 1755 PRINT "Plot.3-E - Grafikfile? <j/n>";: GOSUB 2150 1760 HGR : HOME : VTAB 22 1770 IF A$ = "J" THEN PRINT D$"BL0AD"F$;".A,A$4000";F$ = F$ + ".M" 1780 PRINT D$"BL0AD";F$ 1790 IF D = 1 THEN POKE CO,2: & : REM HGR 2 -> AUXRAM 1800 POKE - 16300,0: POKE - 16301,0: POKE - 16297,0: POKE - 16304,0 1920 POKE - 16299,0: POKE - 16302,0 1970 POKE - 16300.0: POKE - 16301,0 2040 POKE - 16297,0: POKE - 16304,0 2060 POKE CO,0: POKE HI,D 2080 & : REM DRUCKE 2130 IF A$ = "N" THEN HOME : PRINT D$"EXEC PLOT.3.PRO": END Telefonische Bestellungen? Da unsere Peeker-Disketten in offener Rechnung und nicht in dem für Sie teuren Nachnahme-Verfahren ausgeliefert werden, haben Sie bitte Verständnis dafür, daß wir nur noch schriftliche Bestellungen annehmen. Sie können dazu beispielsweise die in jedem Peeker ein¬ gehefteten Bestellkarten verwenden. Hüthig Software Service 22 Peeker 6/86 quApik PLOT.BX (Tell-Quellcode) 517 * Linie beliebiger Steigung: 518 * Zuerst Differenz von yl und y2. 519 * 520 LINE SEC 521 LDA Y2 522 SBC Yl 523 STA DY 524 BCS Y1<Y2 525 * 526 * Absolutbetrag der Differenz, 527 * 528 Y1>Y2 SEC 529 LDA +0 530 SBC DY 531 STA DY 532 * negative Y-Richtung, 533 LDA +$FF 534 STA YADD 535 BMI WEITER ; immer 536 * 537 ¥ Positive Y-Richtung: 538 * 540 Y1<Y2 LDA +1 541 STA YADD 542 * 543 * Weiter mit den X-Koordinaten: 544 * Erst Differenz bestimmen. 545 * 546 WEITER SEC 547 LDA X2L 548 SBC XIL 549 STA DXL 550 LDA X2H 551 SBC XIH 552 STA DXH 553 BCS X1<X2 554 * 555 * Betragsbildung, 556 * 557 X1>X2 SEC 558 LDA *0 559 SBC DXL 560 STA DXL 561 LDA #0 562 SBC DXH 563 STA DXH 564 * negative X-Rlchtung. 565 LDA #$FF 566 STA XADDL 567 STA XADDH 568 BMI PARA? ;immer 569 * 570 * Positive X-Richtung: 571 X1<X2 LDA #0 572 STA XADDH 573 LDA #1 574 STA XADDL 575 * 576 * Jetzt testen wir, ob die Gerade 577 * parallel zur X- oder Y-Achse, 578 * 579 PARA? LDA DY 580 BEQ XLINE 581 LDA DXL 582 BNE TEST2 583 LDA DXH 584 BEQ YLINE 585 **5(t****fs************************ 586 * Kleine Modifikation des Trep-* 587 * penalgorithmus. Bringt * 588 * besseres Bild. * 589 ******5ie*****#^i|6#^fe#^^*i(f#*#*^K******^^ 590 TEST2 SEC 591 LDA DXH 592 BNE TEST3 593 LDA DXL 594 CMP DY 595 TEST3 ROR 596 597 * STA FLAG 599 600 * Initialisiere Saldoreg * 601 NOTPARA SEC 602 LDA #0 603 STA DL 604 STA DH 605 * und Schrittzähler: 606 ^ (STCNT = 0 - dY - dX) 607 * 608 SBC DY 609 * 610 SEC 611 SBC DXL 612 TAX ;Low 613 LDA +$FF 614 SBC DXH 615 STA STCNT ;High 616 ¥ 617 * Hier weiter für alle Geraden 618 * Ist D < 0, dann in X-Richtung 619 * Ist D > 0, dann Y-Richtung. 620 # Ist D = 0, dann in Richtung der 621 * größeren Koordinatendifferenz. 622 # 623 NOTREADY LDA DH 624 BMI XSTEP 625 BNE YSTEP 626 LDA DL 627 BNE YSTEP 628 BIT FLAG 629 BPL XSTEP 630 * 631 * Schritt in Y-Richtung: 633 * 634 YSTEP CLC 635 * neue Y- -Koordinate 636 LDA Yl 637 ADC YADD 638 STA Yl 639 # als Index 640 TAY 641 * 642 LDA HGRADRL.Y 643 STA INDl 644 LDA HGRADRH,Y 645 STA INDl+1 646 * Aktualisiere Saldoregister 647 * D.neu = = D.alt - dX 648 649 SEC 650 LDA DL 651 SBC DXL 652 STA DL 653 LDA DH 654 SBC DXH 655 STA DH 656 * 657 INX 658 BNE STINCY 659 INC STCNT 660 BEQ COMMON 661 * 662 STINCY BIT FLAG 663 BMI XSTEP 664 * 665 ^ Ab hier XSTEP und YSTEP 666 * wieder gemeinsam. 667 * 668 COMMON LDA QUOTIENT 669 * AUXRAM oder MAINRAM ? 670 LSR 671 BCC LPAGE2 672 * 673 LPAGEl LDY $C054 674 BCS LPAGER 675 * 676 LPAGE2 LDY $C055 677 * 678 LPAGER TAY 679 LDA (INDl),Y 680 ORA BITBYTE 681 STA (INDl),Y 682 ■5^ 683 * Schrittzähler testen. 684 685 BIT STCNT 686 BMI NOTREADY 687 * 688 * Schrittzähler >= 0, die Gerade 689 * ist fertig , 690 * 691 READY STA $C054 ;MAINRAM 692 * Alte Endkoordinaten ggf. als 693 * neue Anfangskoordinaten. 694 LDA X2H 695 STA XIH 696 LDA X2L 697 STA XIL 698 * War mir ein Vergnügen. 699 RTS 700 * 701 I - 702 * 703 * Schritt in X-Richtung : 704 * ----—-- 705 * 706 * Statt Division Manipulation von 707 * Divisionsrest und Quotient aus 708 * vorangegangener Berechnung. 709 * 710 XSTEP CLC 711 LDA RESTL 712 ADC XADDL 713 * Rest < 0, 1 Quotient erniedrigen. 714 BMI XSl 715 CMP rr 716 BNE XS2 717 * Rest > 6, 1 Quotient erhöhen 718 INC QUOTIENT 719 LDA #0 720 STA RESTL 721 BEQ XPAGE 722 * 723 XSl DEC QUOTIENT 724 LDA #6 725 STA RESTL 726 BNE XPAGE 727 * 728 XS2 STA RESTL 729 * 730 * Jetzt Bit-Position auswählen. 731 * 732 XPAGE LDY RESTL 733 LDA BITTABLE,Y 734 STA BITBYTE 735 * Schrittzähler erhöhen 736 INX 737 BNE STINCX 738 INC STCNT ;letzter 739 BEQ COMMON ;Punkt 740 * Saldoregister: 741 * (D.neu = D. alt + dY) 742 STINCX LDA DL 743 CLC 744 ADC DY 745 STA DL 746 * Nun noch Punkt setzen. 747 BCC COMMNl 748 INC DH 749 * Doppelschritt? 750 COMMNl BIT FLAG 751 BMI COMMON 752 JMP YSTEP Ältere Peeker-Hefte können für DM 6,50 pro Heft zuzüglich Versandspesen ange¬ fordert werden. Vergriffene Hefte sind als Photokopien für DM 10,- pro Heft erhält¬ lich. Mindestbestellmenge 2 Hefte. Dr. A. Hüthig Verlag - Heidelberg Peeker 6/86 23 EDIT Übungen zum Disk-Editor Hinweis: Die Teile 2 und 3 mit dem kom¬ mentierten Quelltext des Editors erschei¬ nen in den Heften 7/86 und 8/86. Nach dem Teil 1 in Heft 5/86 soll zunächst die praktische Anwendung des Editors an¬ hand einfacher Übungsbeispiele demon¬ striert werden. 1. Zunächst erstellen wir ein Duplikat der ProDOS-Systemdiskette, die in der engli¬ schen Version USERS.DISK bzw. in der deutschen Version BENUTZER. DISK heißt. 2. Dann kopieren wir mit CONVERT, das sich auf der BENUTZER.DISK befindet (oder ersatzweise mit DOSTOPRO) von der Peeker-Sammeldisk #18 das Pro¬ gramm EDIT auf das Duplikat der BENUT¬ ZER.DISK. 3. Schließlich setzen wir noch, nachdem wir CONVERT verlassen haben, das Präfix mit PREFIX/BENUTZER.DISK auf unsere Übungsdiskette. Es ist wichtig, daß Sie die ersten Schritte mit EDIT auf einer Duplikatdiskette unternehmen, weil Sie dann keine Angst zu haben brauchen, daß Sie wertvolle Daten zerstören. 4. Jetzt starten wir den Editor mit BRUN EDIT Er meldet sich mit einer Biidschirmüber- sicht, die im Falle einer 80-Zeichenkarte wie Abb. 1 aussieht, andernfalls wie Abb. 2. Der Cursor ist auf der untersten Bild¬ schirmzeile sichtbar, und alle nachfolgen¬ den Befehle schließen wir mit Return ab. 5. Wir geben als erstes PR/BENUTZER.DISK ein, womit das Präfix auf BENUTZER.DISK eingestellt wird. Alternativ können wir auch mit RP6,1 Slot 6 und Drive 1 festlegen. Würde sich die BENUTZER.DISK in Slot 4, Drive 2 befinden, so würde der Befehl RP4,2 lauten. 6. Als nächstes tippen wir A womit der Puffer in A(scii) angezeigt Ist. Wir sehen 000 -... usw. d.h. der Puffer ist Im Moment noch leer. Sodann tippen wir D womit der Puffer als Dump (= Hex-Dump -H Ascii) am Bildschirm ausgegeben wird, und zwar etwa so 000 - 00 00 00 usw. weil der Puffer immer noch leer ist. 7. Nun geben wir RO oder bei Bedarf präziser ROOOO ein, womit der Block 0 (= $0000) von der Diskette in den Puffer gelesen wird (R = Read). Anschließend tippen wir erst A und dann D um die verschiedenen Anzeigeformen kennenzulernen. 8. Mit R-l- wird der nächste Block, also Block 1, In den Speicher gelesen, mit R- der vorangehende Block, also wieder Block 0. Nun lesen wir mit R0117 oder kürzer R117 den letzten Block der 280-Block-Diskette, also Block $0117 bzw. dezimal 279, ein. Dieser Block ist auf der BENUTZER.DISK noch leer, und die Anzeige entspricht so der des leeren Puffers beim Programm- start. 9. Wir geben jetzt SOOO’MEIN NAME IST HASE ein, womit ab der relativen Byte-Position (= Offset) $000 der angegebene String In den Puffer geschrieben wird. Da der Puffer ebenso wie ein ProDOS-Block $200 Bytes umfaßt, können wir mit der S-Option einen String ab SOOO bis S1FF einfügen. Wir beachten ferner den Apostroph vor „’MEIN...“, der besagt, daß der String mit Bit 7 off in den Puffer übernommen wird. Um dies zu überprüfen, tippen wir, wie wir jetzt bereits gewohnt sind. A und danach D wobei wir im letzteren Fall Hex- und Ascii- Darstellung gleichzeitig vorfinden. Nun geben wir S000“MEIN NAME IST HASE ein, womit der String mit Bit 7 on gespei¬ chert wird, denn es wird “ statt ’ verwen¬ det. Betrachten wir zu diesem Zweck er¬ neut nach SOOO’MEIN NAME IST HASE und nach D die Hex-Folge, die CD C5 C9 usw. lautet, und dann nach S000“MEIN NAME IST HASE und nach D die Hex-Folge, die jetzt 4D 45 49 usw. heißt. Unter ProDOS werden übrigens Dateina¬ men im Directory sowie Strings in Textfiles stets mit Bit 7 off gespeichert, so daß wir normalerweise für entsprechende Ände¬ rungen SOOO’... und nicht SOOO“... verwenden müssen. 10. Wir können natürlich auch Bytes direkt eingeben, und zwar z.B. mit S000:AAAB AC was für die Bytes $AA, $AB und $AC steht. Nach A sehen wir „*-F,“, was die Ascii-Werte zu den obigen Hex-Bytes darstellt. Statt S000:0A0B0C können wir übrigens auch S000:A B C eingeben, d.h. eine „0“ als „linke Hälfte“ eines Bytes kann man unterdrücken. Des¬ gleichen können wir statt , S000:A B C auch S0:A B C eingeben, denn auch bei der S-Option, die den Offset oder Abstand zum ersten Byte des Blockpuffers ausdrückt, können füh¬ rende Nullen unterdrückt werden. 24 Peeker 6/86 T ^ pRodos 11. Wir können jedoch noch mehr tun. Mit 8080,OFF,AA füllen wir den Puffer im Bereich $080 bis $0FF mit dem Byte $AA, d.h. mit lauter Sternchen, wie man nach A gut überprüfen kann. Auf ähnliche Weise läßt sich auch ein Teil des Puffers oder der ganze Puffer mit z.B. 8000.1 FF,00 oder kürzer mit 80.1 FF,0 völlig löschen. Nachdem wir den Puffer gelöscht haben, geben wir S0:AA ein, womit ein einzelnes Sternchen zu Be¬ ginn des Blockpuffers eingetragen wird. 12. Nun tippen wir W0117 oder kürzer W117 oder ganz kurz W womit der Inhalt des Blockpuffers in den Block $0117 = 279 der Diskette zurück¬ geschrieben wird. W ist etwas narrensi¬ cherer, denn es schreibt den zuletzt gele¬ senen Block zurück. Man hätte jedoch auch z.B. W111 tippen können, womit ein ganz anderer Block, nämlich $0111, überschrieben wor¬ den wäre. 13. Wenn Sie einen Drucker in Slot 1 angeschlossen haben, so geben Sie jetzt PSI ein, womit sich EDIT Slot 1 merkt. Mit PD was für Printer-Dump steht, können wir nunmehr den momentanen Bildschirmin¬ halt ausdrucken. Probieren Sie die beiden möglichen Ausdrucke aus, indem Sie vor PD zum einen A und zum anderen D eingeben. 14. Bislang haben wir auf Blockebene ge¬ arbeitet. Nun laden wir mit §/BENUTZER.DiSK den ersten Block des Volume-Directory von BENUTZER.DISK ein, das nach A und D entsprechend angezeigt wird. Ferner kön¬ nen wir uns mit V die Volume-Bit-Map, also die Blockbele¬ gung der ProDOS-Diskette, ansehen und bei Bedarf über PD ausdrucken. Wir tippen wieder §/BENUTZER.DISK und dann D für Hex-Dump und ändern jetzt mit S004:F1 die Länge des Volume-Namens in 1 (dies ist das „ 1 “ von „ Fl “) sowie mit SOOS’A den Volume-Namen selbst in „ A“. Danach schreiben wir mit W diesen ersten Volume-Directory-Block zu¬ rück. Wir haben damit den Volume-Name der Diskette geändert und können mit §/V zwecks Kontrolle das geänderte Volume- Directory einiesen. 15. Wenn wir jetzt §/A/PRODOS eingeben, so wird der „erste“ Block der Datei PRODOS eingelesen. Genauer ge¬ sagt wird nach D der Index-Block angezeigt, der etwa so aussieht; 000- 07 09 OA usw. Mit R- gelangen wir auf den physisch ersten Datenblock (= $0007) von PRODOS, und mit R-h R-l- übersphngen wird den Indexblock und können den zweiten Datenblock (= $0009) betrachten. Soweit die Übungsbeispiele. Weitere Feinheiten, insbesondere zur Makrospra¬ che, zum Find-Befehl usw. entnehmen Sie bitte den Teilen 2 und 3 des dreiteiligen EDIT-Beitrags. US PRODOS SECTOR EDITOR Vl.0 Source: S6,Dl Blockno: $0002 Target: S6,Dl Blockno: $0002 PRODOS SECTOR EDITOR Vl.0 Source: S6,D1 Blockno: $0002 Target: S6,D1 Blockno: $0002 0T8- 00 27 53 54 41 52 54 55 . 'STARTU 078- 00 27 53 54 *. . 'ST 080- 50 00 00 00 00 00 00 00 *** P. 07C- 41 52 54 55 ,; ARTU 088- 00 FC 46 00 0E 00 9F 18 *** * , 3C 18 C9 2C • ÖF. 080- 50 00 00 00 *** * H P. . . 090- 00 B7 AA 00 00 00 00 E3 *** 21 -7*. . ..c 084- 00 00 00 00 098- 01 08 B7 AA 00 00 02 00 ., - 4F A7 *. .,7* . 088- 00 FC 46 00 *** 3C -ÖF, 0A0- 2D 41 44 52 45 53 53 45 00 00 00 00 00 00 00 00 -ADRESSE 08C- 0E 00 9F 18 *** 18 C9 2C 0A8- 4E 2E 54 58 54 31 00 00 00 00 00 00 00 00 N.TXTl.. 090- 00 B7 AA 00 .7* . 0B0- 04 3D 00 05 00 Dl 07 00 00 00 00 * . 00 00 ..Q.. 094- 00 00 00 E3 21 - . . c 0B8- B7 AA 00 00 00 00 E3 00 00 00 00 7*.,..c. 098- 01 08 B7 AA *** 4F A7 . .7* 0C0- 00 B7 AA 00 00 02 00 2D 00 00 00 00 -7* _- 09C- 00 00 02 00 *** 0C8- 41 44 52 45 53 53 45 4E *** 00 00 00 00 00 00 00 00 ADRESSEN 0A0- 2D 41 44 52 00 00 00 00 -ADR 0D0- 2E 54 58 54 32 00 00 04 *** 00 00 00 00 00 00 .TXT2.., 0A4- 45 53 53 45 00 00 00 00 ESSE 0D8- 42 00 05 00 Dl 07 00 B7 00 00 00 00 . ^ 00 ß,, Q..7 0A8- 4E 2E 54 58 00 00 00 00 N.TX 0E0- AA 00 00 00 00 E3 00 00 00 .» . * 00 * .. .. c . . 0AC- 54 31 00 00 *** 00 00 < * TI. . 0E8- B7 AA 00 00 02 00 00 41 00 00 «* 00 00 7*. .,,. A 0B0- 04 3D 00 05 *** 00 00 00 , . 0F0- 44 44 52 2E 56 45 52 57 00 00 00 00 00 00 00 00 DDR,VERW 0B4- 00 Dl 07 00 00 00 ■ Q. . §/BLANK00! H! §/BLANK01! C! », §/BLANK00 ! H! §/BLANK01! C»», , Abb. 1 Abb, 2 Peeker 6/86 25 r Verkauf Hardware Ile, 1 Disk, 80Z+64K, Im agewriter, Joyst., Mouse, 30 Bü¬ cher, Software... DM 4000,- VB Tel. 07222/419 37. Verkaufe Apple III und Pro¬ file, Software. Preis VB Telefon 02641/1441. Sharp MZ 80 B* parallel-seriell Schnittstelle, Grafik-Original-flop- py, (NP 5.200,-) umfangreiche Software VB DM 2000,-. Tel. 02641/1441. AP-20 (IBS 68000, 12BK) + Softw. DM 600,-. Bauer, Telefon 071 21/40518. Triumpf-Adler Kugelkopf¬ drucker 20 Z/Sek., bestes Schriftbild, seriell-parallel, VB DM 500,- Zu verkaufen: Apple Ile, Moni¬ tor neu, Imagewriter I, 80 Zeilen 64 KB Karte, Apple Works VB DM 2900,-. Tel. 08 21/51 0029. Verkaufe Apple Zusatzkar¬ ten: 16K, Z80 Karten DM 75,- 80 Zeichen Karten DM 180,- 128KB Karten DM 205,-, Ile Komp. Mainboard DM 385,-, 80Z & 64K für Ile DM 75,-. TEAC 54A 1 X 40 T. (Apple) DM 279,-, Kom¬ plettsystem Ile DM 1680,-, auch IBM- Karten/Infos kostenlos. Axel Braukmann, Am Sportplatz 51, 4005 Meerbusch-2, T. 021 59/3626 Apple II+, 128K, Z80, 80Z, Centronics 1 LW 40T, 1LW, 2x80T. Monitor, Cherry Tastatur, viel Software, Tel. 025 94/5538, VB DM 2000,-. Matrix + Typenraddrucker anschlußfertig für alle Computer liefert: Mail-Shop, Alsterdorfer Str. 201, 2000 Hamburg 60, T. 040/511 7603 256 KB RAM-Card DM 160,- für Apple \\+. Durch das Aufstok- ken Ihrer LC, werden aus 16 KB 256KB. Wird von vielen Progr. unterstützt da Saturn komp. Die RAM-CARD unterstützt weiterhin Ihre Software für die 16 KBLC. Al¬ so senden Sie Ihre LC-f-V-Scheck an A. Müller, Lessingstraße 17, 4000 Düsseldorf. Siemens PT 80 mit Apple-Interfa¬ ce (Cent.) VB DM 600,-. Telefon 02641/1441. Apple llc, 128K, 2. Laufwerk, Plasmabildschirm, AW, Original¬ handbücher (NP DM 6000,-), VB DM 3000,-. Tel. 02641/1441. Verkaufe USA, 1 MB-Ram, 5 MB-Profile, parallel-seriell 7/7 und Bürosystem 2.0 Software, Mac Works sowie ca. 30 Macintosh Pro¬ gramme, Mulitplan, Jazz etc. VB DM 10.000,-. Tel. 02641/1441. Gelegenheit: Apple II -I- 64K komp. UIDEX 80Z-Karte 2x40 Spurlaufw. im Rechnergehäuse, externe Preh Tastatur, Epromer Karte BMC Mon. DM 2000,- FX80 Drucker mit Grafik-Interface DM 1200,- Tel. 071 29/5027. Ilc (12/85), Imagewriter II (12/85), Monitor, Joystick, viele Bücher, Software, Garantie DM 4500,- Balfer VIA-Karte (Peeker 5/85), 220V Steuerung, Soft¬ ware VB DM 250,- Mahr, Tel. 0711/31942 55. Apple II e/c komp IBM, Look, 2LW, Drucker, Karte, Modem, Kar¬ te RGB, Karte, Eprommer, Monitor, Bücher, Software. Preis VB, Tel. 023 84/39 09. Verkaufe IBS AP17256K Ram- Karle mit ausführlichem Hand¬ buch. Ine. Software für DOS u. CPM 2.2 Preis auf Anfrage. Tel. 052 54/688 54. EPSON FX-80-E mit Grafikin¬ terface Literatur u. Software VB DM 1250,-, Daniel Keng, Tel. 021 96/24 63. Verkaufe APPLE ll-E mit Z80, 64KB, Speechcard, 2x40 Track LW, Drucker Wildcard, ca. 40 Disket¬ ten -L Box, jede Menge Bücher, etc. VB: DM 1995,-, Tel. 06103/34900 ab 17h. Apple Ilc, 2.LW, Monitor, Maus, Joystick RefMan, Soft¬ ware (270 Disk) -L Lit. 3 Mon. alt, Preis VB Tel. 0 23 61 /4914 30. Fernschreiberinterface am Gameport m. Programm DM 79,- P. Benner, Hubertusstr. 131,4150 Krefeld Apple Ile 128K, Ramdisk 256K, 2 Drives, EPSON FX-80, unheim¬ lich viel Soft- u. Paperware. Tel. 089/801838. Verschiedene Apple-Erwei- terungs-Karten z.B. Ram- works, Accelerator Uhr, Z80, Wandler u.v.a. zu verk. Tel. 0212/ 5493 36 nach 18 Uhr. Neues 40TRK. SL-Laufwerk mit Apple-Bus, o. Gehäuse, Made in USA, 6 Mon. Garantie, DM 230,-. Tel. 0 6482/322. Apple II+, 64K, 3 Laufwerke, Monitor (22 Mhz), div. Karten. Tel. 02351/5 2257 ab 14.00 Uhr. 2 BASRAM 256 K UCSD DOS CP/M für Il/Basis /08 etc. wie neu 1/2 Preis. Tel. 040/229 93 91. Apple Ilc, Maus, Philips-Monitor -t- Softw. + umfangreiche Literatur für DM 1900,-. Tel. 0211 /2233 90 Macintosh 128 auf 512KB DM 299,-. Fa. Schlösser, Tel. ab 17.00 Uhr, 089-9858 89 Ankauf Hardware Abrechnungssoftware (Kran¬ kenkassen) von der KBV zuge¬ lassen, Lightpenbedienung ge¬ sucht. Zahle bis DM 4000,-. Tel. 02641/1441. Suche Apple Ill-System. Tel. 02641/1441. Verkauf Software lle+c: CAD paint: exakte Zeichnungen m. Beschriftung (2 Stärken), 40 Funktionen, 80 fertige Symbole für Wohnungspläne -F elektr. Schalt. Info 2 DM, Briefm., Disk: DM 99,- Scheck. Lohmann, M.-Müller-Ring 7, 6500 Mainz SUPERPROGRAMME FÜR APPLE-2 (R) Lottoprogramm LOT 2000 CP/M DM 29,90 Moni- torprg. (MEMDIT-1) (DOS) DM 24,90, Prg. für dBASE II 2,4 (Quell¬ text), Dateibearbeitung (DB-DA- TEl) DM 10,- Programmierung (DB-PROGRAMM DM 10,- DB- Prg. werden als Listing geliefert sonst Apple-CP/M-Disk u.P/V incl. M. Filbrich (Abt. Softcontrol), Hauptstr. 22, 3171 Adenbüttel Tel. 05336/8259. Software Uhr für Apple 11 +, e, c, Zeitschaltmögüchkeit Diskette -F Anleitung DM 25,- Oecking Tel: Do. 0231 /391920 Utilities-Tools-Grafik: prof. Prg. für Apple ll-F, Info gegen Rückporto bei: Büttner, Brüder- Grimm-Str. 4, 3180 Wolfsburg 12. Sonderangebot Disketten 3 1/2“, 1DD 135 TPI, DM 6,00, Disketten 3 1/ 2“, 2DD 135 TPI DM 7,50, Disketten 5 1/4“, ID 48 TPI, DM 2,10, Disketten 5 1/4“, 2D 48 TPI, DM 2,30, PL-Box m. Schloss f. 100 St. DM 28^-. Alle Disketten m. Garantie und Verstärkungsring. Fa. Allg. Austro Agentur, Ringstr. 10, D-8057 Eching, Telefon 0 81 33/61 16, Tlx. 5 27551. !!!! Die Supergelegenheit !!!! Top-Apple-Games (engl.): Ultima II 29,-, Wizardry I 29,-, Wizardry II 25,-, The Heist 9,-, Wizard & Prin- ce 8,-, Ulysses 19,-, Time Zone 39,-, Dino Eggs 19,-, Miner 2049er 19,-, Wiziprint 9,-, Poli. Art. 19,-, Crypt of Medea 29,- Starmaze 9,-, Galactic Attack 9,-, Mission Asteroid 19,-. Schnell bestellen: 089/93 98 94! Nur so lange die Vorräte reichen FUN*TASTIC-MailOrder GmbH. MEGABOARD Version A (CP/M 3.0): jetzt endlich mit Pro- DOS-Anpassung durch neuent¬ wickelte Patch-SW Änderung ge¬ gen Einsendung der alten SW und DM 50,- an Matthias Meyer, Postf. 191, CH-9001 St. Gallen. APPLE II: DFÜ-Kermit, Pascal satt, Public Domain in DOS v.CP/M. Je Volume DM 15,-. Bahnhofssimu¬ lation, Sprachen (S.A.L), Schulprogr. Gratisinfo: Fa. Waltraud Muhle, Wald¬ winkel 3, 2105 Seevetal 3. 65C02-TRACER + Debugger mit Windowtechnik, 176S. Hand¬ buch Anfänger: Einstieg in ASSEM¬ BLER Fortg.: Leistungsfähiger DEBUGGER DM 79,-. Telefon 07071/74544, Stimmler Elektr., 7400 Tübingen, Heinlenstr. 34. Apple-Il. Frei-Prg.-Liste anf. b. Fa. Josef Gebhardt, PF 1174, 8458 Sulzbach-Rosenbg. Tel. 0 96 61/ 52916. Das neue Mittwochslotto zu DM 25,— Der Turm von Hanoi zu DM 10,- Förter, Am Wetterbach 53, 75 Karlsruhe 41. Apple II. DFÜ-Kermit, Pascal satt, Lisp, Public Domain in DOS und CP/M: Je Volume DM 15,- Schulpro. Gratisinfo: Fa. Waltraud Muhle, Waldwinkel 3, 2105 Seevetal 3 26 Peeker 6/86 Für Ihre Unterlagen Abonnement bestellt am:_ Vertrauensgarantie: Ich habe davon Kenntnis genommen, daß ich die Bestellung schriftlich durch Mitteilung an den Dr. Alfred Hüthig Verlag GmbH. Postfach 102869, 6900 Heidelberg innerhalb von 7 Tagen widerrufen kann. Zur Fristwahrung genügt die rechtzeitige Absendung des Widerrufs (Datum des Poststempels). Peeker Leserservice Postfach 102869 6900 Heidelberg ■8 Q Ja, ich möchte Peeker abonnieren. Liefern Sie mir Peeker ab Ausgabe ...zum Jahresbezugspreis von z. Zt. DM 72- (Inland) inkL MwSt. Die Lieferung erfolgt frei Haus, Porto, Ver¬ packung und Zustellgebühren übernimmt der Verlag. Der Jahresbezugspreis für das Ausland beträgt z. Zt. DM 72 - plus DM 18,- Versandspesen. __ X __ Datum 1 . Unterschrift Bitte lesen! Vertrauensgarantie: Ich habe davon Kenntnis genommen, daß ich die Bestellung schriftlich durch Mitteilung an den Dr. Alfred Hüthig Verlag GmbH, Postfach 10 28 69, 6900 Heidelberg innerhalb von 7 Tagen widerrufen kann. Zur Fristwahrung genügt die rechtzeitige Absendung des Widerrufs (Datum des Poststempels). _ X ____ Datum 2. Unterschrift Verlagshinweis: Das Abonnement verlängert sich zu den jeweils gültigen Bedingungen um ein Jahr, wenn es nicht 2 Monate vor Jahresende schriftlich gekündigt wird. Wir können nur Bestellungen mit zwei Unterschriften bearbeiten. Für Ihre Unterlagen Folgende Bücher bestellt: am:_ bei: Peeker Versandbuchhandlung Postfach 102869 6900 Heidelberg 1 -f^^^^pEEkER^ 0 ■c Q Bitte senden Sie mir gegen Rechnung folgende Bücher: S I o 3 D Büfiler, Applesott-BASfC, 3-7785-1094-0, DM 38,- □ Eggerich, dBase II, Bd. 1, 3-7785-1147-5, DM 39,80 □ Eggerich, dBase II, Bd. 2, 3-7785-0987-X, DM 39,80 □ Eggerich, dBase II, Bd. 3, 3-7785-0988-8, ca. DM 40,- □ Gabriel, Applewriter, 3-7785-1234-X, DM 35,- □ Hagemüller, Microsoft-BASIC, Bd. 1, 3-7785-1038-X □ Juhnke/Redlin, Apple Pascal, Bd. 1, 3-7785-1246-3, ca. DM 40,- □ Kehrel, Apple Assembler lernen, Bd. 1, 3-7785-1151-3, DM 38- □ Kehrel, Apple Assembler lernen, Bd. 2, 3-7785-1170-X, ca. DM 38- □ Schäpers, ProDOS Analyse, 3-7785-1134-3, DM 68,- n Schäpers, Bewegte Apple-Graphik, 3-7785-1150-5, DM 58,- □ Stiehl, Apple DOS 3.3, 3-7785-1297-8, DM 28,- □ Stiehl, Apple ProDOS, Bd. 1, 3-7785-1098-3, DM 28,- □ Stiehl, Apple ProDOS, Bd. 2, 3-7785-1036-3, DM 30,- □ Stiehl, Apple Assembler, 3-7785-1047-9, DM 34,- □ Wassermann, Apple llc Handbuch, 3-7785-1157-2, DM 35,- Dalum Unterschrift Für Ihre Unterlagen Folgende Disketten und Programme bestellt: am:_ bei: Peeker Softwareabteilung Postfach 102869 6900 Heidelberg 1 pEEkER ^ jl) Bitte senden Sie mir gegen Rechnung folgende Disketten: □ Peeker-Sammeldiskette, einzeln Disk#_, Disk#_ Disk#_, Disk#_ Peeker je Disk DM 28,- (einzeln) □ Peeker-Sammeldiskette, im Fortsetzungsbezug ab Disk#_ (Mindestbezug 6 Disketten) Preis je Disk DM 20,- □ Apple DOS 3.3, Begleitdisk., DM 28,- □ ProDOS, Band 1, Begleitdisk., DM 28,- □ ProDOS, Band 2, Begleitdisk., DM 28,- □ Apple Assembler, Begleitdisk., DM 28,- □ ProDOS-Editor 1.0, Programm, DM 98,- □ MMU 2.0, Programm, DM 98,- □ INPUT 2.0, Programm, DM 98,- □ Softbreaker 1.0, Programm, DM 48,- □ DB-Meister, Programm, DM 290,- □ Superplot, Programm, DM 48,- □ Superquick, Programm, DM 48,- □ Turtle Graphics, Programm, DM 98,- □ Disk 40, Programm, DM 48,- □ Kyan-Pascal 2.0, Programm, DM 170,- □ Fast-Writer, Programm, DM 98,- UntfwschriH ^ Software-Karte Buch-Karte 4 44 Abo-Karte r Marne Ffrma Siraße PLZ/Ort Ich wünsche jährliche Berechnung durch: □ Verlagsrechnung □ Abbuchung von meinem Bank- bzw. Postscheckkonto Bank/PschA Gankleilzaht KIO.-NF. POSTKARTE Peeker Leserservice Dr. Alfred Hüthig Verlag GmbH Postfach 1028 69 6900 Heidelberg INPUT 2.0 Ein Bildschirm- Maskengenerator für DOS 3.3 und ProDOS von U. Stiehl 1984, Diskette und Manual, DM 98,- ISBN 3-7785-1021-5 „Input 2.0" liegt wahlweise in der Bank 1 oder Bank 2 der Language Card und wird durch einen kurzen Driver in den unteren 48K aufgerufen. Für jedes Feld der Bildschirmmaske lassen sich u. a. definieren: Feldlänge (bis zu 255 Zeichen) - Vtab - Htab - Datentyp (insge¬ samt 8 Typen) - Scrollflag (starre oder dyna¬ mische Maske) - Ctriflag - Füllflag - Lösch¬ flag - Bildschirmflag (40- oder 80-Z-Darstel- lung). Innerhalb eines Eingabefeldes besteht jeder denkbare Redigierkomfort (Insert, De- lete, Rubout, Restore usw.). Gerätevoraussetzung: Apple Ile oder Ile; fer¬ ner Apple ll-F im 40-Zeichenmodus Karte bitte vollständig ausfüllen Vornftt^e. Nams Rmta Straßa PLZ/On Telefon mit Vorwahl Karte bttte vollständig aiisfüllen Vorname. Name flflllÖ SireGe PLZ/Ofl Telefori' mit Vorwahl POSTKARTE Peeker Buchabteilung Dr. Alfred Hüthig Verlag Postfach 1028 69 6900 Heidelberg 1 MMU 2.0 Memory Managements Utilities für die Apple Ile 64K-Karte DOS 3.3 (und ProDOS) von U. Stiehl 1984, Diskette und Manual, DM 98,- ISBN 3-7787-1023-1 Insgesamt enthält die neue „MMU 2.0"- Diskelte über 25 Programme, die neue Einsatzmöglichkeiten für die Extended 80 Column Card (erweiterte 80-Z-Karte = 64K-Karte für den Apple Ile) erschließen. Ein Teil der Programme laufen auch auf dem Apple II Plus, doch ist „MMU 2.0" primär für 64K-Karte-Besitzer gedacht. Gerätevoraussetzung: Apple Ile mit 64K- Karte oder llc POSTKARTE Peeker Softwareabteilung Dr. Alfred Hüthig Verlag Postfach 10 28 69 6900 Heidelberg 1 Softbreaker 1.0 Eine softwaremäßige Interrupt-Utility für die Apple Ile 64K-Karte von U. Stiehl 1984, Diskette und Manual, DM 48,- ISBN 3-7785-1022-3 Softbreaker ist ein Assemblerprogramm, mit dessen hülfe Programme, die sich von der 64K-Karte (= Extended 80 Column Card für den Apple Ile) starten lassen, unterbrochen, gespeichert, geladen und exakt an der Stelle der Unterbrechung fortgeführt werden kön¬ nen. Dadurch ist es auch möglich, Siche¬ rungskopien von sogenannten kopierge¬ schützten Programmen herzustellen. Mit Softbreaker unterbrochene Programme werden komplett, d. h. die ganzen 64K ein¬ schließlich Language Card, in nur ca. 11 Se¬ kunden auf einer formatierten Diskette gesi¬ chert. Gerätevoraussetzung: Apple Ile mit 64K- Karte, nicht llc, nicht neue ROMs Hüthig Software Service, Postfach 10 28 69, D-6900 Heidelberg PEeI« R Verkauf Software Ankauf Software Apple II: Verkaufe Topsoftwa¬ re! Z.B.: Ballblazer DM 110- Mer¬ lin pro Z50- Kundenverwaltung 50- Info (0,80) bei: W. Rittmeyer, Wehrbruchweg 30, 4060 Viersen 1. Pcucal, KYAN u. Turbo 3.0, org., Manuals, neu DM 300,-. Telefon 026 66/704. Profi-Soflware für den Apple II/+ /e/c. Fakturierung DM 380,- Kundenverwaltung DM 210,-, La¬ gerverwaltung DM 380,-, alle Pro¬ gramme sind verknüpfbar, Liste gegen DM 2,- in BRM. Demodisk I DM 50,-. Tel. 0211/7 33 77 78. Endlich lieferbar! BABEL II der interaktive Debugger mit vielen Hilfsfunktionen und ausführl. deutsch. Handbuch. Lieferung per Rechnung ab Mai 1986, DM 37,90, Ruf, Clemensstr. 74, 8 München 40 Suche Spiele für Apple Ile, Tel. 022 04/682 31. Suche Init/Treiber usw. Für BASIS 256K Ramkarte/Ile/UCSD PASCAL 1.2 (evtl, auch DOS 3.3). Ingram, Lütticherstr. 30, Köln 1. CP/M 2.2 Systemdiskette gesucht für Ile A. Grün Telefon 021 51/30 21 77 Handwerkerprogramm/ Schreiner auf Ile. W. Müller, Sandhäuser Str. 1, 6900 Heidel¬ berg, Tel. 0 6221/7811 32. Verschiedenes AWorks-Patch f. Epson-Inter- face DM 20,-; Steffen Holzinger, Berliner Str. 62, 6301 Biebertal. Vokabeltrainer 1.0 Apple II Preisträger Jugend forscht ’85 Kar- teik. sys., Lexikonfunktion Info DM 2,- B. Beckert, Zähringerallee 37, 7530 Pforzheim 1. Window-Technik für APPLE¬ SOFT bei allen Apple Il-Typen DM 35,-, Heinz, Waldgürtel 7, 5060 Berg. Gladbach 1 Jane u. Dazz/e Draw (Orig.) zu verk. DM 250,-. Telefon 0 28 37/8453 ab 17 Uhr. APPLE REPARATUREN (auch compatible M-boards, z.B. Atias, Area, CES, Datastar, Dipa, Lasar, Mewa, PC-48 -F 64, Plato, Radix, o. ae.) sowie Zusatzkarten und Disk-Drives führt unser Speziali¬ stenteam mit mehr als 5-jähriger Kunden- und Reparatur-Dienst-Er- fahrung, garantiert zuverlässig und besonders kostengünstig aus. Bitte genaue Fehlerangabe sowie Tel. Nr. für evtl. Rückfragen nicht vergessen. Auf Wunsch Kostenvoranschlag, aaa-electronic gmbh Habsburgerstr. 134, 7800 Freiburg, Tel. 0761/276864, Tx. 772642aaad DFÜ-Szene CH: die interessan¬ testen Auszüge aus schweizer Mailboxen mit vielen Tips und Tricks auf randvoller Apple-Disk gegen Einsendung von DM/Fr. 10,- an Matthias Meyer, Postf. 191, CH-9001 St. Gallen. Apple lic + Brother M-1009 wer kennt Konfiguration für Text -f- Grafik (seriell)? Norbert M. Dörr, H.-Heine-Str. 1. 6307 Linden. Tel. 0 64 03/84 79. !!!! Da gibt’s was umsonst!!!! 4 X im Jahr den neuen Katalog. Bühler Elektronik, Postfach 32, 7570 Baden-Baden Apple III Bes. wg. Erfah- rungs/Prg. Austausch usw. bt. melden, Eckl, Bichlerstr. 4b, 8122 Penzberg. Für weitere Informationen zu einem der in dieser Ausgabe vorgestellten Produkte stehen Ihnen die Produktkarten zur Verfügung. Bitte verwenden Sie für Kleinanzeigen die vorge¬ druckten Antwortkarten in diesem Heft. Apple und IBM kompatible Computer 16K, Z80, Diskcontroler je. 80 Zeichenkarte mit Softswitch . . 98- 2 Zeichensätze .. . . 198- Ile-kompatibles Motherboard ohne Firmware. . . 498 - Erphi-controler mit Autopatch . . . . . 285 - TEAC FD-54A mit Apple-Bus . . . . . 298- TEAC FD-55B-V 2 x 40 Track . . . . 395- TEAC FD-55F-V 2 x 80 Track . . . . 448- FD4 Spezialcontroler für Laufwerke mit bis zu 2 X 80 Track. . . 120- OLYMPIA compact NP . . 1298- Monochrome Monitore. ab 375- Farbmonitore. ab 998- Tastaturen für IBM und Apple . . . ab 298- 512K-RAM-Karte mit 256 K bestückt. . 298,- Apple Super-Modem-Karte inkl. dt. Software und dt. Handbuch .... . . 348- Versand nur per Nachnahme oder Vorkasse. Weiteres Zubehör für Apple und IBM gegen frankierten Rückumschlag. 128K Karte (Saturn kompatibel) . 248,- Ulf Mohwinkel Electronic Berliner Straße 73 Pf: 250166 5090 Leverkusen Fettehenne Telefon 0214/93781 od. 95060 etphi 640KB Controller und Floppy für Apple ll+/e und kompatible. Generalvertretung für die Schweiz und FL (Händleranfragen erwünscht) beltronic Im Chapf CH-8455 Rüdlingen Tel: 01-8 6731 41 • Tlx 825981 Weiter führen wir: IBM kompatible PC ab 2400,- Apple Ile kompatible ab 1200,- electronic Neue Preise # 6 IMB-PC/XT-COMPATIBLE COMPUTER + ZUBEHÖR Mainboard XT f. 16bit + 256K-RAM + 8 Slots, Leerkarte 79,— Mainboard XT-640 K (on Bord) f. 16 Bit + 8 Stots Leerkarte 89,— Disk Controller leer (f. 4 x 360KB-Drives) 34,— Monochrome Graph. + par. Printer Leerkarte (Hercules comp.) 55,— Color RGB -r Video Graphik Leerkarte 55.— Parallel Printer Leerkarte 29,— Disk-Muliti I/O Leerkarte, (f. 3x-360 K-Drive, 2xRS 2321 xpar. Printer Int., Game/Joystick Port. Real Time Clock/Kalender gepuff.) 59,— 384 K-Multifunktions Leerkarte. (RS 232, par. Printer Int., Game/Joystick Port, Real/time Clock/Kalender gepuffert) 55,— Prototype/Lochraster Leerkarte, durchkontaktiert 69,— Mainboard XT-256 f. 16 bit CPU, OK (bis 256K-on board, oder 640 K mit Addr. auf Karte aufr.) + Boot-ROM + 8 Slots best. + geprüft 315,— Mainboard XT-6401.16 bit CPU. OK (bis 640 K-on board aufr.) 327,— Mainboard XT-640 w.o. jedoch 256 K-RAM best. + gepr, 417.— Mainborard XT-640 w.o. jedoch 640 K - vollbest, und geprüft 587,— 64KB-RAM-Chip-AufrüstsaU (9 Stück) einzeln geprüft! 42.— 256 KB-RAM-Chip-Aufrüstung (9 Stück) einzeln geprüft 97,— Disk Controller gepr. (f. 4 x 360 KB-Drives)(Extra Kabel = 39,—) 109.— Monochrome Karte geprüft 235,— Monochrome Graph, -i- par. Printer Karte gepr. (Hercüles comp.) 288,— Color RGB + Video Graphikkarte gepr. 166.— Parallel Printer-Karte gepr. o. Kabel (Extra Kabel = 49,-) 77,— 512K-RAM-Karte gepr. (0KB) 129,— 384K-Multifunktionskarte, RS 232, par. Printer, Inten. Game/Joystick Port, Real Time Clock gepuff., OK + RAM-Disk/Spooler/Uhr Sottw. 325,— Disk Multi I/O Karte (f. 2x360 K-Drive, 2xRS 232,1 xpar. Printer Int., Game/Joystick Port, Real Time Clock/Kalender gepuff.) 388,— Profi-Funktionstastatur ASCII +15er Block ab 215,—/dl. ab 245,— 135W/150W-Netzteil mit eingebautem Ventilator, Kurzschlußf. 219,—/279,— 360KB-Diskdrive Slimline (Track Access Time <2 m S). R/W gepr. 319,— Joystick f. IBM + Compatible 79,— Maus incl. Software f. IBM + Compatible 299,— PC/XT - KOMPLETT-SYSTEME EINGEBAUT UND GEPRÜFT XT-640,16 bit-Rechner (incl. Boot-Eprom) 256K-Ram im IBM-look-like MeL-Gehäuse+Profi-Fkt Tast+135 W-Netzt gepr. 999,— XT-640,w.o.+Contr.+360KBDrive-HColor RGB+Vid. Graphic-Karte 1.677,— XT-640, w. o. jedoch statt Color mit Monochrome Karte 1.737,— XT-640, w. o. jedoch mit Monochrome-Graphic-Printer-Karle 1.817.— Aufpreis für XT-640 M-board mit 640 K vollbestückt+gepr. 169,— 20 MB-NEC-Festplatte + DTC-Controller mit Kabel + Man., geprüft 2375,— 3.876,— PHOENIX GENIE 16 C -PC-compatibel APPLE-BUS COMPUTERPLATINEN + PERIPHERIE Motherboard II48K leer, durchkont. mit Lötstopplack Motherboard II 64 K+Z 80 CPU, leer M-board II48K, gesockelt, vollbest, + gepr. Motherboard II 64K gesockelt, vollbest.+gepr. M-board II 64K -i- Z80 CPU, gesockelt, v. best. + gepr. M-board Ile 64K vollbestückt + gepr. APOLLO II Kunststoff-Leergehäuse APOLLO II Gehäuse incl. Funkt.-Tast. Superstarkes Netzteil - Kurzschlußlest 5A=115,—/7A= Leerplatine: 16K-RAM, Z80/CPU-, Controller DOS 3.3, Parallel-Druckerkarte, Ser. Int. V24,80Z/24Z-Karte, PAL-Karte je Entwicklungstochraster-Leerplatine durchkontaktiert 16K-Speicher-Karte geprüft APPLE orig. 16K-Language Karte gepr. 2-80 CPU-Karte geprüft Controller DOS 3.3-Karte geprüft Auto-Controller DOS 3.2/3.3-Karte gepr. Erphi AFDC 2 Controller + Autopatch Sottw. + Handbuch Parallel-Drucker-Karte geprüft Par.-Drucker-Grappler comp. Leerplatine Par.-Drucker Karte-Grappler comp, geprüft (Extra Kabel=45,—) 8bit par. Int + 64K-Buffer + Kabel gepr. (Grappier comp.) Seriell-lnterface-Karte V24 geprüft Super-Seriell Leerkarte Super-Seriell-Interface Karte gepr. 80-Zeichen/24-Zeilen-Karte geprüft 80Z/24Z-Karte + Softswitch-Schalter Leerplatine 80Z/24Z-Karte + Softswitch-Schalter, gest. Scharf geprüft 80Z/24Z-Softwitch Karte gepr. für Ile 80Z/24Z+64K-Ram+Softsw. Leerkarte f. Ile 80Z/24Z-f 64K-Ram+Softsw.-Karte besL+gepr. f. Ile IEEE-488 Int. Karle gepr. (Extra Kabel=45,—) PAL-Modulator/Color-Karte geprüft RGB-Color Karte gepr. 128K-Speicher-Leerkarte 128K-Speicher-Leerkarte -f Software + Manual 128K-Speicher-Karte -h Software geprüft+Manual Maus incl. Software EPROM-Burner (2716/32/64) geprüft 6522-VIA Karte geprüft Clock Karte geprüft Speech Karte geprüft Wild Karte geprüft AD/DA-8Bit Karte gepr. UHF/TV-Modulator universell Lüfter anclipsbar (220 V) Dataphon s21d Akustikkoppler-FTZ mit RS 232/V24 Anschi. APOLLO//(48K) + UHF-Mod. + Gr/Kl vollbest ^ gepr. APOLLO//(48K) + Disk 11F -l- Contr. + 12"-Monitor APOLLO//A (48K) + Gr/Kl -I- 15er-Tastatur vollbest -l- gepr. APOLLO//A (48K) + Disk II F + Contr. + 12"-Mon. APOLLO// ASKF (48K) vollbest. + gepr. Sep. Keyboard + Gr/Kl -f 15er-Block mit Funkt.-Tasten im „IBM-Iook like" Gehäuse APOLLO// ASKF (48K) w.o. + Disk IIF + Contr. Apollo IIASFK (48K) w.o.+2xDi8k ll-F-f Contr.-t-IZ” Mon. Aufpreis f.o. Systeme von 48K zu 64K Aufpreis von 48K zu 64K-I-Z80 CPU Apollo Ile (64K) vollbest, und geprüft Apollo Ile (128K)+80Z/24Z-Karte geprüft Applle Ile (64K)+15er-Tastatur vollbestückt Apollo Ile ASKF (64 K) vollbestückt und geprüft Apollo Ile (64K) -I- Disk II F-t-12” Monitor _ APPLE Ile 128K+80Z/24ZKarte+Softw. 1.9 Disk-Drives voll APPLE II, 100%ig compatibel + R/W geprüft Disk//+Contr. + Kabel DOS 3.3 (Siemens) im Geh. £ Disk//(Siemens) im Geh. + Kabel 4 Disk//F (1/2 Höhe) im Gehäuse+Contr.-i-Kabel 2 Disk//F (1 /2 Höhe) Im Gehäuse i Disk//F-HS (High Speed 1/2 Höhe) im Gehäuse+Confr.+Kabel £ Disk//F-HS (High Speed 1/2 Höhe) im Geh.+Kabel (Track Ac.<2mS) £ Disk//F-HS-80 Track im Gehäuse + Kabel f. orig. Contr. geeignet £ Disk//F-HS-80 w.o. + Contr. + DOS 3.3 + CP/M Patch-Softw. 4 Erphi DuoDisk 1,2 MByte im Gehäuse + Erphi-AFDC 3-Contr. 1.1 APPLESOFT + Turorial Reference Manual engl. APPLE-DOS 3.3 Manual engl. APPLE-DOS 3.3 Hb. dt APPLE-Pascal Reference -f Operating Manual engl. APPLE-Pascal Reference Hb. dt. APPLE-Pascal Language Hb. dt. APPLEII-Pascal Hb. dt. (te-wi) APPLE-Fortran Manual engl. CP/M-Softcard Voi. I + II, Manual engl. APPLE Il+Ile-Anwenderhandbuch deutsch (te-wi) Epson LX 80,8 Bit/par. (Extra Traktor = 69,—) EPSON FX 85F/T-I-, 8bit/parallel 160 Z/S. NLQ + IBM Komp. EPSON FX 105+, 8bft/parallei 15” sonst w.o. EPSON Traktoraufsatz für FX 80 + FX 85 APPLE/EPSON-Drucker Graphic-Interface + Kabel MX 80/82, FX/RX 80 Spezialfarbband-Kassette Oer Pack/IOOe FUJI Pack./ Stückpreis: DATA NEUTRAL MAGNE- TICS 4,27/ 3,97 5,87/ 5,47 2,56/2,46 2,25/2,15 3,26/3,06 2,75/2,55 i 7,87/ 7,67 12,87/12,57 5 6,97/ 6,67 Das i 10,17/ 9,77 sind 5 7,67/ 7,17 ) 11,17/ 9,97 Preise! 3M-Scotch S'A" RUssig-Reinigungsset (2 Disk.) zweiseitig S'A" DIsketten-Archivbox für 10 Disks (1 St./10 St.) 4,7 S'A" DIsk-Kartelkasten Kunststoff (ca. 80 Disk) S'A" Disk-Karteikasten Kunststoff (ca. 80 Disk) Rauchglas S'A" Disk-K.K.Rauchglas, abschließb. (f. ca. 80-100 Disks) 2000 Bl. Tabpapier (24 cm x 12" einf.) weiß oder grün/weiß perf. 4000 Et-/Ujfkl. doppelr. (107 x 36 mm auf 240 X'12" perf. Trägerp.) 4000 Etik.-Aufkl. einreih. (107 x 36 mm auf 125 x 12" perf. Träg.) Peeker 6/86 29 Meg oard- und enspeicher Mit ProDOS-Backup-Programmen für die MDB-Festpiatte und das Erphi-Subsystem von Ulrich ^ Hinweis: Die unten geiisteten Back- up-Progrannme\fiönnen in nnodifizierter Form auch bei\^deren Fabrikaten als Fioppy-Harddisk^mierprogramme sowie darüber hinaus alkf^ppy-Floppy-Kopier- Programme verwende werden. 1. DisMhNachfolli Die Besitzer von DisV-lj- oder Duodisk- Laufwerken werden sicA langfristig nach neuen Laufwerken umseraen müssen, da die alten SS-Spur-DriveasVt Anfang 1986 auslaufen. Dies ist [nscnem bedauerlich, als bislang alte kommeLiillen Apple-Il- Programme auf 35-Spur-fci^etten ausge¬ liefert wurden. Es wird all^dings nach wie vor funktionsgleiche Laufwerke von Fremdherstellern geben, die zaudern meist als 40-Spur-Drives ausgel\g\sind. Von Apple selbst sind in Zukunft nur noch 3,5- Zoll-Drives erhältlich, von denen wir ein Testexemplar auf der „Systems“-Messe im Herbst 1985 angefordert haben. Jetzt im April 1986 wurde das Drive genehmigt, da das Werbe-Kontingent, wie es hieß, „vorübergehend“ erschöpft sei. Und da vor kurzem der Geschäftsführer R.M.Deja sowie der Controller (= Finanzchef) E Schmollinger bei Apple „freigestelit“ wur¬ den, könnte es mit dem Test-Drive noch länger dauern. All dies ist lächerlich, klein¬ kariert und kurzsichtig. Beispielsweise ha¬ ben wir von Atari den 520 St bereits zu einem Zeitpunkt erhalten, als das Gerät in Deutschland noch gar nicht auf dem Markt war. Wenn Apple-München nicht einmal der größten deutschen Apple-Zeitschrift Testgeräte überlassen kann (aus finanziel¬ len Gründen) oder überlassen will (aus politischen Gründen), dann liegt das Mar¬ keting bereits derart im argen, daß man sich nicht mehr zu wundern braucht, wenn jedes Jahr die Köpfe rollen, denn eine billigere indirekte Werbung als eine gerä¬ tespezifische Fachzeit gibt es nicht, selbst wenn im Peeker gelegentlich Kritik geübt wird. Die „Infowelt", Heft 14/1986, drück¬ te es in den Beiträgen „Image und Umsatz futsch“ und „Apple auf Schleuderkurs“ erheblich drastischer aus: Danach soll, was von Apple nicht dementiert wurde, der BRD-Umsatz von 92 Mio. im Geschäfts¬ jahr weit hinter dem Plansoll von 140 Mio. zurückgeblieben sein, und man peile für 1986 nur noch 65 Mio. an. Wir werden uns deshalb im Peeker zu¬ nächst mit den durch ein optimales Preis/ Leistungsverhältnis bestechenden Datenspeichern der Firmen Frank & Brit- ting sowie Erphi Electronic befassen, zu¬ mal man bei diesen Produzenten als End¬ abnehmer im Falle technischer Fragen an- rufen darf, was bekanntlich bei Apple- München nicht erwünscht ist, obwohl man dort nicht verkennt, daß der Apple-Händler bei der Anpassung einer Festplatte norma¬ lerweise überfordert ist, denn schließlich ist ein Händler ein Händler und kein Sy- Peeker 6/86 pRodoS stemprogrammierer. Wenn dann nicht der Produzent oder wie hier der Peeker hilft, dann hilft eben keiner. 2. Wozu größere Datenspeicher? Falls Sie bislang nur 35- oder 40-Spur- Laufwerke benutzt haben und nunmehr auf ein 160-Spur-Subsystem der Firma Er- phi und/oder auf eine Festplatte der Firma Frank & Britting umzusteigen gedenken, so sollten Sie folgende Punkte berück¬ sichtigen. Vorab jedoch einige Defini¬ tionen: Disk-Il-Laufwerk; 35-Spur-Laufwerk für 5,25-Zoll-Disketten (SS/SD = single si- ded, single density = einseitig, einfache Spurdichte) mit 140K Speicherkapazität (= Netto-Speicherkapazität) pro Diskette nach Formatierung (1K = 1024 Zeichen): pro Controller 2 Laufwerke anschließbar (Controller = Steckkarte zur Datenüber¬ tragung zwischen Laufwerk und Rechner): Duodisk mit eigenem Controller als spe¬ zielles Doppellaufwerk erhältlich; Daten¬ übertragungsrate normalerweise maximal 8,2K/s (gut 8.000 Zeichen/Sekunde); Be¬ zugsquelle: Firma Apple; Preis für Dop¬ pellaufwerk inkl. Controller ca. DM 1400,- bis 1800,-, je nach Händler. Erphi-Subsystem: 1 60-Spur-Doppellauf- werk für 5,25-Zoll-Disketten (DD/DD = double sided, double density) mit 640K Speicherkapazität pro Diskette: pro Con¬ troller 1 Doppellaufwerk oder auch 2 ein¬ zelne Fremdlaufwerke anschließbar; Datenübertragungsrate normalerweise maximal 8K/s: Bezugsquelle: Erphi-Elec- tronic; Preis für Doppellaufwerk (FSS- 280-Subsystem) inkl. Controller ca. DM 1700,-. Der Controller namens AFDC (= Autopatch Floppy Disk Controller) kann separat bezogen werden und auch zum Anschluß von 35- und 40-Spur-Laufwer- ken (z.B. Erphi Fl 22) verwendet werden. In diesem Beitrag befassen wir uns jedoch nur mit der Komplettlösung = Erphi-FSS- 280-Subsystem + Controller, da die An¬ passung an von dritter Seite bezogene Laufwerke problematisch sein kann. Megaboard-Festplatte: Harddisk-Con¬ troller und Festplatte: wahlweise 10 oder 20 Megabytes unformatiert: formatiert bei z.B. 10M = etwa 9608K netto (statt 10240K brutto); lieferbar als interne Mega¬ core-Festplatte (Apple-Netzteil wird aus¬ getauscht) oder als externe MDB = Mobile Datenbox: Datenübertragungsrate norma¬ lerweise maximal 44K/s: Bezugsquelle: Frank & Britting: Preis für z.B. 10M-MDB inkl. Controller ca. DM 2700,- (für Mega¬ core ca. DM 1000,- mehr). Der Controller (Megaboard i.e.S.) kann auch separat be¬ zogen werden, doch ist hier noch mehr als beim Erphi-Controller vom Anschluß von Datenspeichern, die von dritter Seite er¬ worben wurden, abzuraten, da sonst nicht nur bei technisch Unkundigen Anpas¬ sungsprobleme entstehen können. Über den Hüthig Software Service ist deshalb eine preiswerte Megaboard-Komplettlö- sung einschließlich eines angepaßten Dateiverwaltungsprogramms erhältlich. 2.1. Speicherkapazität Ein Disk-Il-Doppeliaufwerk mit 2 ■ 140K Speicherkapazität reicht für viele Aufga¬ ben völlig aus. Ein gutes Beispiel ist die Textverarbeitung; Selbst wenn Sie pro Monat 1 Buch schrei¬ ben würden, so würden Sie doch nicht mehr als 4 Disketten pro Buch benötigen. Und wer schreibt schon eine halbe Million Zeichen pro Monat? Dies wären nämlich mehr als 22.000 Zeichen = 22 D1N-A4- Seiten (anderthalbzeilig) pro Werktag. Vom „Diskjockey“ kann also hier keine Rede sein. Man beachte, daß wir hier be¬ wußt von einem Doppellaufwerk gespro- TurtleGraphics-Library-Paket von Dieter Geiß Turtle-Utilities für Fenstertechnik und Apple-Maus in einfa¬ cher und doppelter Hires-Grafik für Pascal 1.2 auf Apple lle/c mit Maus oder Joystick. 2 Disketten mit umfangrei¬ chem Manual, DM 98,-. Unter Pascal 1.1 mit 64K nur ein¬ geschränkt lauffähig Im einzelnen bietet das Paket folgende Möglichkeiten: - volle Kompatibilität mit der alten „TurtleGraphics“ ~ alle zeitkritischen Funktionen in reinem Assembler programmiert - Benutzung der zweiten Hires-Seite ($4000-$5FFF) möglich - für Apple llc und Apple Ile mit erweiterter 80-Zeichen-Karte Be¬ nutzung der doppelten Hires-Grafik mit 560 x 192 Punkten bzw. 16 neuen Farben möglich - schnelle Prozeduren zum Zeichnen eines Punktes oder einer Linie - Benutzung mehrerer Zeichensätze gleichzeitig - Scrolling des Hires-Schirms oder eines Teils in vier Richtungen - drei verschiedene Schriftarten: Fett-, Breit- und Proportional¬ schrift, beliebig mischbar (acht Möglichkeiten) - spezielle schnelle Ausgabe von Text - Cursor bei Eingabe frei programmierbar ~ Ein-/Ausgabe von INTEGER-, CHAR-, STRING- und REAL- Werten im Grafikmodus - Menüzeile wie beim Macintosh - Pull-down-Menüs - Laden und Speichern von Fenstern (Windows) - Öffnen von Fenstern - Aktivieren und Deaktivieren von Fenstern - Verschieben und Vergrößern/Verkleinern von Fenstern - Scrolling von Fensterinhaiten in allen vier Richtungen - Umfangreiche Demos als Quelltexte. Hüthig Software Service • Postfach 102869 • 6900 Heideiberg DISK40 Disketten-Organisationsprogramm für Apple II+, Ile oder llc von Hermann Seibold und Dipl.-Ing. Udo Marin, 1986, Programmdiskette mit Anieitung, DM 48,- DISK40 entstand aus der Analyse bestehender Ko¬ pierprogramme und vereint in sich eine Vielzahl von Möglichkeiten, die sich als nützlich erwiesen haben. Durch eine einfach zu be¬ dienende Menüführung können DOS-3.3-Disketten umfangreich bearbeitet oder kopiert werden. Zu den vielfältigen Möglich¬ keiten des Programms zäh¬ len u. a.: - Tabellarische Ausgabe der Diskettenbelegung - Ordnen des Catalogs - „Undeiete“n von verse¬ hentlich gelöschten Dateien - Vergleichen von Disket¬ ten, Dateien oder der DOS- Spuren - Kopieren von Disketten, Dateien oder DOS-Spuren - Formatieren von Daten- Disketten - Erweitern auf 40 Spuren bei bestehenden 35-Spur- Disketten - Ändern des Boot-Pro¬ gramms - File-Editor zum Editieren von Disketten-Dateien - Komfortabler Sektor-Edi¬ tor für Hex- und ASCIl-Dar- stellung - VTOC-Editor, z. B. zur Freigabe der DOS-Spuren Schon nach wenigen Minu¬ ten können, dank der aus¬ führlichen Beschreibung, Disketten nach eigenen Wünschen modifiziert oder Daten nach einem Disk- Crash wieder gerettet wer¬ den. Hüthig Software Service • Postfach 102869 • Heideiberg 1 Peeker 6/86 31 Chen haben, denn bei einem Einzellauf¬ werk ist die Datensicherung umständlich, zeitraubend und fehlerträchtig. Es gibt jedoch viele Aufgaben, die sich mit 140K-Laufwerken nur begrenzt bewälti¬ gen lassen. Ein gutes Beispiel ist die Dateiverwaltung: Unterstellen wir einen Datensatz von 200 Zeichen für die Summe aller Eingabefel¬ der, so passen auf eine 140K-Datendis- kette nur etwa 630 Datensätze. Wer grö¬ ßere Datenmengen zu verwalten hat, ist mit einer Festplatte oder einem größeren Diskettenlaufwerk erheblich besser be¬ dient. Beim Erphi-Subsystem (= 160- Spur-Doppellaufwerk = 2 • 640K) würden auf eine einzige 640K-Diskette etwa 3.000 Datensätze passen, während eine 10-Me- gabyte-Festplatte etwa 50.000 Datensätze aufnehmen könnte. 2.2. Übertragungsrate Neben der Speicherkapazität spielt die Datenübertragungsrate eine wichtige Rol¬ le. Wir beschränken uns hier aus Platz¬ gründen auf ProDOS: Bei den Disk-Il-Laufwerken beträgt die Übertragungsrate auf Blockebene für Le¬ sen und Schreiben jeweils ca. 8,2K/s. Beim Erphi-Subsystem muß man zwi¬ schen Lesen und Schreiben differenzie¬ ren. Auf Blockebene wird mit ca. 9,3K/s gelesen und mit ca. 6,8K/s geschrieben; Mittelwert ca. 7,9K/s. Bei der Megaboard-MDB-Festplatte be¬ trägt die Übertragungsrate unter ProDOS einheitlich ca. 42,7K/s für Blocklesen und Blockschreiben (bei DOS 3.3 übrigens mit 43,75K/s größer, siehe Abschnitt 5). Zum Vergleich soll die amerikanische Festplatte namens „Sider“ eine Übertragungsrate von 15K/S haben (s. „Apple’s Sonder¬ heft“, 1986, letzte Seite). Für die Apple- Festplatte namens „Profile" soll angeblich eine Übertragungsrate von 19K/s gelten. Damit ist die MDB-Festpiatte gut 5mal schneller als ein Disk-Il- oder ein Erphi- Drive und gut 3mal schneller als die Sider bzw. gut 2mal schneller als die Profile. Die MDB-Festplatte ist damit etwa so schnell wie eine gute RAM-Disk, bei der mit 35- 55K/S (sehr stark von den „Softswitches“ und dem „Mapping“ abhängig) gerechnet werden kann. Hinweis: Für die Zeittests wurde das Pro¬ gramm BAD.BLOCKS aus „Apple Pro- DOS für Aufsteiger“, Bd. 2, S. 177 ver¬ wendet. Es sei ferner darauf hingewiesen, daß entweder der Megaboard-Driver seit dem Megacore-Test im Peeker, Heft 7/85, S. 76-77, ganz beachtlich verbessert wur¬ de oder die mir z.Zt. ausgeliehene externe MDB schneller ist als die interne Mega¬ core. Eine erneute Durchführung der Text¬ file-Tests (Heft 7/85, S. 77) ergab für den WRITE.TEST 128s statt 255s und für den READ.TEST 47s statt 65s. Ein gutes Maß für das Gespann Mega¬ board- und Erphi-Controller mag auch das weiter unten beschriebene Backup-Pro¬ gramm PRODOS.BACKUP sein. Für die Datensicherung eines 3,5-Megabyte- MDB-ProDOS-Volumes mit Hilfe von 6 Er- phi-160-Spur-Disketten benötigt man in der Richtung (a) MDB ^ Erphi: 11 min 5s (665s) (b) Erphi ^ MDB: 8min, 40s (520s) Bei (a) wird von der MDB-Festplatte gele¬ sen und auf die Erphi-Disketten geschrie¬ ben, was sichtlich länger dauert als die umgekehrte Richtung. Insgesamt müssen 3,5M gelesen tynö ge¬ schrieben werden. Die Datenübertra¬ gungsrate bezieht sich somit auf 7M. Das ergibt (7M = 7.340.032 : 1024 = 7168K): 7.168K : 665s = 10,8K/s 7.168K : 520s = 13.8K/S 14.336K : 1.185s = 12,1K/s Zum Vergleich sei hier erwähnt, daß sich mit dem ebenfalls weiter unten beschrie¬ benen Programm KOPY.160.SPUR in 2min, 40s (= 160s) eine 160-Spur-Disket- te (= 640K • 2 = 1280K) auf dem Subsy¬ stem überspielen läßt. Dies sind 1280K : 160s = 8K/s. Wozu sind nun diese Übertragungsraten gut? Wenn man ein Programm morgens einmal startet, spielt es keine Rolle, ob es z.B. in 2s (MDB-Festplatte) oder in 10s (Erphi-Subsystem, Faktor 5) im Speicher ist. Wenn jedoch etwa bei einem Dateiver¬ waltungsprogramm größere Datenbestän¬ de durchsucht werden müssen, können ganz ernorme Wartezeiten entstehen. Dann ist es eben nicht mehr gleichgültig, ob man 30s oder 150s auf die Mattscheibe starrt. Die Kluft kann jedoch bei dateiinten¬ siven Programmen noch erheblich größer werden, wenn nicht auf der bislang aus¬ schließlich betrachteten Blockebene auf Dateien zugegriffen wird. Bei ungünstigem Motor-an/aus-Timing (s. „RWTS mit War¬ teschleife“ in „Apple DOS 3.3“, S. 116) sackt nämlich die Übertragungsrate bei Disketten dramatisch ab. Dies ist bei einer Festplatte niemals der Fall, denn diese rotiert ständig. Technisches Es ist zwar bei der MDB wie auch bei anderen Festpiatten nicht irrelevant, auf welchen physikalischen Spuren sich die gewünschten Sektoren oder Blöcke befin¬ den, doch bewegt sich diese physikalische Zugriffszeit in einem Bereich, der bei un¬ serer Erörterung vernachlässigbar ist. Wie man beispielsweise dem Aufsatz „Aufbau und Funktion von Diskettensystemen “ von G.Berg (Peeker, Heft 3/85, S.10-21) entnehmen kann, wird die sog. Block- Übertragungsrate in KBit/s gemessen. Beim Erphi-Controller sind dies 250 KBit/s ^ entspricht etwa 250.000 Bits : 8 : 1024 = 30K/s und beim Megaboard-Controller 5 MBit/s. ^ entspricht etwa 5.000.000 Bits : 8 : 1024 = 600K/S. Diese physikalischen Werte sind indes völlig utopisch, weil ein 8-Bit-Prozessor derartige Übertragungsraten nicht mit¬ macht. Das denkbar schnellste Kopierpro¬ gramm für das Erphi-Subsystem, nämlich „Superquick“ von Arne Schäpers, bringt es auf eine praktische Übertragungsrate von ca. 14 bis 15K/s (ohne Verify). Faustregeln - Das Erphi-Subsystem ist dann vorzuzie¬ hen, wenn die Speicherkapazität den ge¬ stellten Anforderungen entspricht und ei¬ ne hohe Datenübertragungsrate nicht be¬ nötigt, also nicht ständig mit dateiintensi¬ ven Programmen gearbeitet wird. - Umgekehrt ist das Megaboard-Systerrj dann vorzuziehen, wenn eine noch größe¬ re Speicherkapazität erforderlich ist und/ oder eine hohe Datenübertragungsrate bei Dateiverwaltungsprogrammen benötigt wird. Diese Faustregeln heben auf den profes¬ sionellen Einsatz ab. Es sei nicht ver¬ schwiegen, daß ein (Hobby)-Programmie- rer, falls er sich eine MDB leisten kann, ein ganz neues „Programmier-Feeling“ er¬ lebt, denn alle vier Betriebssysteme (DOS 3.3, ProDOS, CP/M und UCSD-Pascal) können direkt von der Festplatte gebootet werden, und die Assemblier- und Compi- lierzeiten werden geradezu dramatisch re¬ duziert. Auch das beim Programmieren häufig erforderlich Neubooten ist bei der MDB eine Angelegenheit von etwa 2-3s, wobei der Controller intelligent genug ist und automatisch das zuletzt verwendete Betriebssystem startet (und nicht wie beim Kaltstart DOS 3.3). 3. Praxis-Tips Gegenüber den alten 35-Spur-Laufwer- ken muß der Umgang mit dem Erphi-Sub¬ system und der Megaboard-Festplatte erst erlernt werden. Abgesehen von der ein¬ malig und etwa eine Stunde dauernden Konfigurierung der Betriebssysteme, auf die wir hier aus Platzgründen nicht einge- hen, sind einige Spielregeln und auch Ein¬ schränkungen zu beachten. 3.1. Slotabhängigkeit Wenn Sie einmal Pascal oder CP/M von z.B. Slot 5 gebootet haben sollten, so wer¬ den Sie der Meldung „Must boot from slot 6“ begegnet sein. Nur die Betriebssyste- 32 Peeker 6/86 _ ZUSATZ-KARTEN; V-24-Schnittstelle. J79r 2-60-Korta. 9a,- 0O-Zeicheji-Karte m.SoftSwitch 23^,- lÄK-Longyage"Karte !!’!!!!!! 98^- Joy Sikk De LuKe . 59,- Aa;eleratar 3,6 MNu ,,..,, , 950 - 68000 Jntemex .. 1600,' PAL Karte ... «0 - ßOB Karte. 239,- IEEE 48S.312,^ Koppler dataphen m. FT2 * *,.. 325,- Z 80 fl Karte mit Software ..919,- CentrenlcS'Karte von Epson für Graphik * *., ZtO,- für Texf .... 145,- Cenfronlcs-Säirirttstelle für 2 Drucker gleichzeitig .* * 129 - Super-Eprommer Floppy-Controller FOC 4 für all© Laufwerke ,, _ _ . 169," Bausatz wie links . ♦ ♦ ♦ Leerplatine wie ob€in IncT, Prom u. Eprom .98,- Erphi-Confroller. 298,- Disketten iD.43tpi. . 10SL 29^" Diskcttfin 20 ,48 ipi...... IOSL 3Ö^~ Frei programmierbare Keyboards Wir bretenihnen dCTreh-Qualftdt auch für Apple. AK 87 spe^ mit Gehäuse, An¬ schluß kabel, Zehner-Tastenfeld H dt^Zefchensatz. Sondertasten fOr Ctrl-Codes und Rechenfunklipnen .. Preh Commander Keytmard, frei programmierbar » a bis zu T0 Ebenen. pro Taste bis zu 250 Zeichen.nur i>9T Gleiche Tastolar wie oben - * —^ für Apple Hc . nur098," TEAC ZW Laufwerk FD 35 & q. Speicherkapazität MB. {formatiert 640 KB) jetzt für nur.*r TEAC FO SS AVTx 40 Track .... 395,- TEAC FOS5flV2 x 40Track ,...460,- TEAC ro 55 EV 1 X 80 Track - 445,- TEAC FD 55 FV 2 x 80 Track _ 39fl,- Apple-^-kompatibles Laufwerk incL Gehäuse + Kabel .599,- 320 KB Laufwerk för llc.948,- 640 KB laufwerik för llc .1088,- Panasonic Drucken 1090. nur 849,- 1091.nurl095,- 1092.nurl295,- Die Microfloppy mitZukunfh Speicherkapazität: 2 k 1 MByte fonpatiert: 2 x ^ 640 k8yte. Anschluflfertig mit PROM-residenter Pal chscHwäre für CP/M 2.2. Apple DOS 3.3, Dl- versiDOS 2-C. 4-C (DD MOVER). Apple Pascal 1,1, Pascal 1,2. Pro-DOS 1.0.1. ijino ' 1.1.1.1.1 zum Prds von . i - - _ Low Power Veraion 1598,- Mega-Core ^ mit SoflMe für DOS 3.3. CP/M 2,20, Pascal. Pro'DOS. M AtZf% von Frank & Brittlng, 20 MB . . mit Softie für DOS 3.3. CP/M 2,20. Pascal. Pro'DOS. M AtZf% von Frank & Brittlng, 20 MB ... Sonderangebot Oistar Laufwerk funi.ia. ^vio incl. Kabel ü. Gehäuse.. jetzt nur 7^" GeMmt-Pralsilste orrfartfoml Prelso IrKJt«lva geiehilcher Mehrworhrteuer. Hdridlerprelalbto bWto schrfftitch anfordeml Ausgabe und Eingabe mit TYPETERM® im Slot Ihres APPLE ll/lle Das bedeutet: Computef- textverarbeitung von der Schreibmaschinentastatur! Steckerfertig ohne Umbau. Die neue CE-550! mit TYPETERM DM 1.398,- TYPETERM- DM 479,- Interface für alle BROTHER-Typenrad- schreibmäschinen ab CE-51 bis EM-250 CE-68 mit TYPETERM .. DM 1947.- EM-80 mit TYPETERM DM 1887,- TYPETERM-Kit für CE-50. DM 468.- Cable Kit A (erforderlich ab EM-80). DM 103- TYPETERM - ein starkes Interface für starke Maschinen! Alle Cursor- und Ctl- Befehle. 4k ROM auf der Karte für DOS, PRODOS, CP/M, PASCAL. 2 Zeichensätze verfügbar z. B. deutsch u. ASCII. Alle Features: Hoch-/Tiefstellen, autom. Unter¬ streichen, var. Zeichen und Zeilenabst., autom. Papierzuführung usw. TYPETERM - ein Produkt von Ausgabe mit TYPETERM® JUNIOR im Slot Ihres APPLE ll/lle Paketpreis DM 899,- Schreibmaschine AX-10 mit Interface TYPETERM JUNIOR, steckfertig. iirtetkom Kock & Mreches GmbH —j--——^ PosH., 3004 Isernhagen 4 electronic Telefon 05139-87393 bfother Die haute TYPETERM JUNIOR mit AX-10 — unser besonders günstiges Gespann, ebenfalls steckfertig. Mit TYPETERM JUNIOR kann die AX-10 mehr. Sie wird zum vollwertigen Typenraddrucker für Ihren Apple: • 3 verschiedene Schriftstärken • Automatisches Unterstreichen • 2 Zeichensätze z.B. deutsch u. ASCII • 2 Zeichenabstände • 2k ROM auf der Karte für Ausgabe unter DOS, PRODOS, CP/M u. PASCAL. TYPETERM JUNIOR — ein Produkt von IflfiBfflHlfll & Mreches GmbH I ^ Postf.. 3004 Isernhagen 4 electronic Telefon 05139-87393 INTUS-Lern- und Anwenderprogramme für Apple lle/llc - Computer • Maschinenschreiben wie der Blitz DM 175,- • Business-English, 2800 Begriffe, 16 Bereiche, 3 Übungsarten DM 120,- • Rechtschreibtrainer, 4000 Wörter, 16 Bereiche, 4 Übungsarten DM 120,- • Basic-Lernprogramm, ausgezeichnet DM 238,- • Kinderschule, für Vorschulkinder DM 49,- • Rechenmodelle für AppleWorks DM 195,- • MailWorks für AppleWorks-Serienbriefe, für alle Drucker geeignet DM 168,- • AppleGraph, Erstellen von Balken- und Kreis-Graphiken DM 120,- • PriBu-Privatbuchhaltung DM 195,- • DMP-Charger zur Gestaltung eigener Zeichensätze auf dem Matrix-Drucker DM 198,- • Gesamtkatalog mit über 200 Programmen gratis • Demo-Diskette gratis gegen Angabe/Einsendung dieses Inserates • 6000 Frei-Programme (fast) gratis (Shareware/Public domain) Liste DM 10,- . * INTUS Software Kaiserstr. 21, 7890 Waldshut, Tel. 07751-7920 Peeker 6/86 33 me DOS 3.3 und ProDOS sind prinzipiell slotunabhängig. Das Erphi-Subsystem so¬ wie die Megaboard-Festplatte sind teils weniger und teils mehr slotabhängig. Der Megaboard-Controller kann allein theoretisch in jeden Slot (außer Slot 0 beim IH- oder Slot 3 beim Ile) gesteckt werden. Normalerweise wird jedoch Slot 7 empfohlen, von dem aus dann alle vier Betriebssysteme einschließlich CP/M und Pascal direkt von der Platte gebootet wer¬ den können. Der Erphi-Controller sollte allein normaler¬ weise in Slot 6 gesteckt werden, doch sind unter DOS 3.3 und ProDOS auch Slot 5 und 4 zulässig. Allerdings funktioniert das mitgelieferte Kopierprogramm ECOPY beispielsweise nicht in Slot 5. Wenn Megaboard- und Erphi-Controller gleichzeitig benutzt werden sollen, so muß der Megaboard-Controller in Slot 7 und der Erphi-Controller in Slot 6 gesteckt werden. Andernfalls würde nach dem Booten der Festplatte von Slot 7 die zu¬ sätzlich für das Erphi-Subsystem gedach¬ te Betriebssystem-Modifikation nicht aus¬ geführt werden. Man darf also dann nicht mit PR+6 vom Erphi-Subsystem booten, sondern muß vielmehr stets mit PR#7 (oder CtrI-Apfel-Reset) die Festplatte akti¬ vieren. 3.2. Disketten und Kopierschutz Ein wesentlicher Vorzug der Disk-Il-Lauf- werke bestand darin, daß selbst bei billi¬ gen SS/SD-Disketten und selbst bei nachlässigem Umgang relativ selten Lese¬ fehler auftraten. Beim Erphi-Subsystem sollte man jedoch nicht nur DS/DD-Dis- ketten verwenden - z.B. die Scientific- Disketten von BASF, von denen wir 100 Exemplare getestet haben, ohne daß ir¬ gendwelche Fehler aufgetreten wären -, sondern zudem mit den Disketten sorgfäl¬ tiger umgehen. Zudem ist das Mischen von 35- bzw. 40-Spur- sowie 160-Spur- Disketten grundsätzlich nicht möglich. Das nachfolgende Schaubild mag dies ver¬ deutlichen: Anfang einer 80-Spur-Diskettenseite 0,265 0.265 0.265 0,265 Spurabstand 1 1 0 1 -l"l- 1 1 1 2 1 3 Spur-Nr. 'M' 1 TT 0.15 0.15 0,15 0,15 Spurbreite Anfang einer 40-Spur-Diskettenseite 0.530 1 0.530 1 Spurabstand , 1 1 0 1 1 Spur-Nr. 1- - 0,30 0.30 Spurbreite Die 80 konzentrischen Spuren einer Seite einer 160-Spur-Diskette haben einen Ab¬ stand (symbolisiert durch | ) von der vor¬ angehenden zur nächsten Spur, der etwa 0,265m m beträgt (sog. Spurabstand ). Wenn 1 Zoll (= Inch) 2,54cm bzw. 25,4mm entspricht, so würden 96 Spuren exakt 1 Zoll einnehmen (0,265 • 96 = 25,4mm = 1 Zoll). Man spricht deshalb auch von 96 TPl (= Tracks per inch = Spuren pro Zoll). (Da die 160-Spur-Dis- kette jedoch pro Seite nur 80 Spuren hat, ist die Gesamtlesezone übrigens nur ca. 2cm breit.) Demgegenüber ist der Spurab¬ stand bei einer 40-Spur-Diskette doppelt so groß, nämlich ca. 0,53mm, womit eine 48-TPI-Diskette vorliegt (0,53 • 48 = 25,4mm = 1 Zoll). Dem Diagramm kann man weiterhin ent¬ nehmen, daß die Spurbreite bei der einen Seite einer 160-Spur-Diskette (ca. 0,15mm) nur die Hälfte der Spurbreite ei¬ ner 40-Spur-Diskette (ca. 0,30mm) ein¬ nimmt. Der Lese/Schreibkopf eines 160- Spur-Laufwerks muß also halb so breit sein wie der Kopf eines 40-Spur-Drives. Aus der Abbildung ist weiterhin ersichtlich, daß die Spuren 0,1,2 usw. einer 40-Spur- Diskette, wenn man die Spurbreite igno¬ riert, dieselben Positionen einnehmen wie die Spuren 0, 2, 4 usw. der einen Seite einer 160-Spur-Diskette, und zwar der Seite 0, die sich unten bzw. auf der Nicht- Etikettseite befindet. Die Etikettseite selbst heißt Seite 1. Daraus erhellt nunmehr im einzelnen; - Eine auf dem Erphi-Subsystem mit PR#6 (= 160-Spur-Modus) gebootete 35-Spur-Diskette, die auf einem Disk-Il- Laufwerk formatiert wurde, läßt sich nicht lesen, geschweige denn beschreiben, weil die Spuren verwechselt werden. Statt der Spur 1 liest der Controller von der Mitte zwischen Spur 0 und 1, und dort ist „nichts“. - Eine auf dem Erphi-Subsystem mit IN#6 (= 35- bzw. 40-Spur-Moclus) gebootete 35-Spur-Diskette, die auf einem Disk-Il- Laufwerk formatiert wurde, läßt sich lesen, doch darf diese Diskette nicht vom Subsy¬ stem beschrieben werden, weil dann zu schmale Spuren entstehen würden, die dann wiederum vom dem Disk-ll-System nicht mehr gelesen werden könnten, weil dessen breiterer Lesekopf dann neben der schmalen Spur noch die „Reste" der ur¬ sprünglichen breiteren Spur lesen würde, und dies führt unweiterlich zu einem 1/0- Error. - Nach dem Booten einer 35-Spur-Disket- te auf dem Erphi-Subsystem mit IN#6 läßt sich auf dem Subsystem eine andere (Leer)diskette formatieren und danach im 35- bzw. 40-Spur-Modus vom Subsystem lesen und beschreiben. Doch kann diese Diskette dann trotzdem nicht mehr von einem Disk-Il-Drive gelesen werden, ob¬ wohl man eigentlich annehmen müßte, daß ein breiter Lesekopf auch eine schma¬ le Spur lesen kann. Faustregeln 1. Das Lesen von einer 35-Spur-Diskette ist mit dem Erphi-Subsystem grundsätz¬ lich möglich, wenn mit 1N#6, d.h. im 40- Spur-Emulationsmodus, gebootet wird. Deshalb können auch die meisten kopier¬ geschützten Disketten vom Subsystem gestartet werden. Programmdisketten, die jedoch als Bestandteil des Kopierschutzes auf die Diskette zurückschreiben, dürften sich folgerichtig insofern selbst zerstören, als sie sich später von einem Disk-il-Drive nicht mehr selbst lesen können. 2. Wenn man für jedermann lesbare 35- Spur-Disketten herstellen will, so muß man diese auf einem 35-Spur-Laufwerk duplizieren. Obwohl beispielsweise unser Sammeldisketten-Kopierer zusätzlich ein Erphi-Subsystem besitzt, könnte er es aus diesem Grund niemals zur Herstellung der Sammeldisketten benutzen. Während beim Erphi-Subsystem kopier¬ geschützte Programme nur mit den er¬ wähnten Einschränkungen benutzt wer¬ den können, ist bei der Megaboard-Fest¬ platte die Verwendung solcher Program¬ me in der Regel nicht möglich, denn der im „Ressort Paranoia“ behandelte Verfol¬ gungswahn namens Kopierschutz findet immer Mittel und Wege, um ein sinnvolles Diskettensystem außer Kraft zu setzen. Beispielsweise ist der DOS-3.3-Applewri- ter kopiergeschützt und läuft deshalb nicht auf Festplatten, doch kann man, was nicht in der Anleitung steht, beim Programm¬ start auf die „C"-Taste drücken, worauf (auch beim deutschen Applewriter) am Bildschirm die englischen Meldung „Do you have Corvus y/n“ erscheint. Tippt man nun „y“, so stürzt der Applewriter auch dann ab, wenn man eine Corvus- Festplatte besitzt, wie mir zwei Corvus- Besitzer bestätigt haben. Hier hat sich wohl ein paranoides Gemüt gedacht: „De¬ nen werde ich jetzt mal zeigen, was mein Kopierschutz alles kann!“ Fazit: Benutze niemals kopiergeschützte Programme, wenn du nicht selbst paranoid werden willst! 3.3. Patch-Kompatibilität Abgesehen von der slotmäßigen Ein¬ schränkung, dem Erfordernis eines pflegli¬ chen Umgangs mit 160-Spur-Disketten, der nur bedingten Benutzbarkeit von 35- Spur-Disketten auf dem 160-Spur-Subsy- stem sowie dem Kopierschutzproblem ist auch auf das Auto-Patch-Verfahren einzu¬ gehen. Erfreulicherweise muß man hier 34 Peeker 6/86 konstatieren, daß sich erstens die Patches auf ein absolutes Minimum beschränken und daß zweitens Erphi-Subsystem und Megaboard-Festplatte fast reibungslos miteinander kommunizieren. Ein kleiner Wermutstropfen ist nämlich die CP/M-Ver- sion 2.26 von Microsoft, die zwar jetzt auch auf dem Erphi-Subsystem funktio¬ niert, nicht jedoch auf der MDB- oder Me¬ gacore-Festplatte, die bislang nur CP/M 2.2 unterstützt. Im einzelnen können fol¬ gende Betriebssysteme gefahren werden: - DOS 3.3, Diversi-DOS 2C und 4C - Pascal 1.1, 1.2 (auch 128K-Version) -ProDOS 1.0.1, 1.0.2, 1.1.1 - CP/M 2.2 sowie zusätzlich bei Erphi 2.20B, 2.23 und 2.26 Ein Leser schrieb anläßlich des Beitrages „ Ein intelligenter Harddisk-Controller“ (Peeker, Heft 4/86, S. 20ff.), daß er Anga¬ ben darüber vermisse, ob beispielsweise der TASC-Compiler auf der Megaboard- Festplatte funktioniere. Dies kann man be¬ jahen, denn der Megaboard-Patch be¬ schränkt sich bei DOS 3.3 auf 3 Bytes bei $BD00. Durch den Erphi-Controller wer¬ den jedoch noch weitergehende Patches vorgenommen, wodurch das Doppellauf¬ werk in vier virtuelle Drives Dl, D2, D3 und D4 eingeteilt wird, von denen ein An¬ wenderprogramm in der Regel nichts weiß. 4. KOPY.160.SPUR Wenn man sich zum Kauf eines Massen¬ speichers entschließt, so muß man sich auch Gedanken über die Datensicherung machen. Bei dem Erphi-Doppellaufwerk ist das Duplizieren von Disketten ebenso unkompliziert wie bei den Disk-Il-Drives, doch dauert das Kopieren einer 640K-Dis- kette natürlich erheblich länger als bei ei¬ ner 140K-Diskette. Das von Erphi Electro¬ nic mitgelieferte sog. ECOPY ist leider al¬ les andere als schnell und formatiert Im übrigen nicht das Duplikat, so daß die For¬ matierung gesondert vorgenommen wer¬ den muß. Das weiter unten gelistete Pro¬ gramm KOPY.160.SPUR formatiert zwar ebenfalls nicht, ist jedoch bereits spürbar schneller als ECOPY. Am schnellsten ist jedoch das Programm SUPERQUICK des Hüthig Software Service, zumal es zusätz¬ lich formatiert und außerdem noch einen Verify beinhaltet. Für eine 160-Spur-Dis- kette ergeben sich bei den drei Program¬ men folgende Kopierzeiten: ECOPY: 3min, 25s, ohne Format KOPY.160.SPUR: 2min, 40s, ohne Format SUPERQUICK: Imin, 53s, mit Format Da KOPY.160.SPUR dem Programm PRODOS.BACKUP weitgehend ähnlich ist, beschränken wir uns hier auf die Hand¬ habung: ^ pRodos ^ 1 In dem Applesoft-Programm KOPY. 160.SPUR können Sie in der Zeile llOdie Konstanten DU = Originalslot und HU = Duplikatslot ändern. Die Voreinstellung 110 DU = 6: HU = 6 besagt, daß von Slot 6, Drive 1 nach Slot 6, Drive 2 kopiert wird. Wenn Sie Ihr Erphi- Subsystem beispielsweise in Slot 5 instal¬ liert hätten, so mußte es lauten: 110 DU = 5: HU = 5 Wenn Sie zusätzlich die Drives ändern möchten, was allerdings nur erforderlich wäre, wenn Sie über 2 Subsysteme verfü¬ gen würden, so können Sie die Zeilen 170 und 180 modifizieren. 2 Das Assemblerprogramm KOPY. 160,SPUR.O ändert die ProDOS-System- Bitmap in der Form, die aus.dem Listing von PRO.BACKUP.O, Zellen 92-100, er¬ sichtlich ist, und benutzt damit den Spei¬ cherbereich $0A00-$BE00 als Kopier¬ puffer. (a) Starten Sie also unter ProDOS das Programm mit RUN KOPY.160.SPUR (b) Legen Sie in Drive 1 das Original und in Drive 2 das spätere Duplikat und beginnen Sie den Kopiervorgang nach „W = Weiter“. (c) Falls weitere Kopien erforderlich sind, so können Sie am Ende der Kopie auto¬ matisch zu Schritt (b) zurück. (d) Wenn Sie das Programm verlassen haben, so müssen Sie mit z.B. PR#6 neu booten, weil der Kopierpuffer das BA¬ SIC.SYSTEM zerstört hat. Auch wenn KOPY.160.SPUR unter Pro- DOS gestartet wird, können trotzdem auch Disketten der anderen Betriebssysteme (DOS 3.3, Pascal, CP/M) dupliziert wer¬ den, die jedoch in jedem Fall bereits vor¬ formatiert sein müssen. Übrigens kann KOPY.160.SPUR auch bei 35-, 40- und 80-Spur-Drives verwendet werden. In diesem Fall muß man in der Zeile 120 DB = 1280: HB = 1280 die entsprechende Disketten-Blockge- samtanzahl bei beiden Variablen einset- zen. Für 35-Spur-Disketten würde gelten: 120 DB 280: HB = 280 5. PRODOS.BACKUP 5.1. Geschwindigkeitsvergleiche Im Peeker, Heft 5/86, haben wir bereits ein DOS-3.3-Backup-Programm namens MDB.KOPY für 140K-DOS-Volumes der „mobilen Datenbox“ vorgestellt, das mit einer Datenübertragungsrate von ziemlich genau 12,44K/s dem nachfolgenden Pro- DOS-Backup-Programm namens PRO¬ DOS.BACKUP für den MDB-FSS-280- Datentransfer mit 12,10K/s geringfügig überlegen ist. Trotzdem sind 12,1 K/s - gewichtet aus ca. 42,7K/s für die Festplat¬ te und ca. 8K/s für die Floppy - für einen 6502-Rechner ein ungewöhnlich hoher Wert. Denn für z.B. 3,5 Megabytes oder konkreter 3.666.944 Bytes benötigt man nämlich nur 9min bis 11min für die Datensicherung. Damit sind das DOS-3.3- und ProDOS-Backup-Problem bei der „mobilen Datenbox“ gelöst. Interessieren Sie die Gründe für das ge¬ ringfügig schlechtere Abschneiden von ProDOS gegenüber DOS 3.3? 1. Bei PRODOS.BACKUP enthalten die im obigen Abschnitt „2.2. Übertragungsrate“ genannten Zelten, z.B. 8min, 40s für 3,5 Megabytes in Richtung vom Erphi-Subsy¬ stem zur Megaboard-MDB, bereits die für das Wechseln der 6 erforderlichen Disket¬ ten benötigten Sekunden. 2. Wie oben ebenfalls bereits erwähnt. Ist bei einer Erphi-160-Spur-Diskette der Le¬ sevorgang erheblich zügiger als der Schreibvorgang. Diese Unterschiede gel¬ ten bei Disk-Il-Laufwerken nicht. 3. Auf der MDB-Festplatte werden bei der Konfigurierung zuerst die DOS-3.3-, dann die UCSD- und CP/M- und erst zum Schluß die ProDOS-Harddisk-Spuren for¬ matiert. Möglicherweise ist deshalb die Übertragungsrate unter DOS 3.3 (43,7K/ s) größer als unter ProDOS (42,7K/s). Vielleicht ist aber auch der ProDOS-Driver auf dem Controller weniger intelligent als der DOS-3.3-Driver geschrieben, denn wie mir selbst von eigenen RAM-Disk- Drivern bekannt ist, können einige unnöti¬ ge 6502-Befehle bereits 1 K/s ausmachen. 5.2. Das Pufferproblem Während das Backup-Programm MDB.KOPY aus dem letzten Peeker im Prinzip ein modifiziertes und getuntes 140K-Kopierprogramm darstellt, muß man bei einem flexiblen ProDOS-Datensiche- rungsprogramm von variablen Speicher¬ größen und Puffern ausgehen. Im einzel¬ nen muß man unterscheiden: - Größe der Harddisk - Größe der Floppy-Disks - Größe des RAM-Puffers Der Inhalt einer Harddisk entspricht in der Regel dem Inhalt mehrerer Floppy-Disks. Doch wird die letzte der Backup-Floppies meist nicht komplett gefüllt sein. Folglich muß man zwischen einer oder mehreren Komplettdisks sowie ggf. einer Restdisk unterscheiden. Nehmen wir fernerhin an, daß die Datenübertragung aus Gründen der Geschwindigkeit über einen größeren RAM-Puffer erfolgt. Dann muß für die Komplettdisks der RAM-Puffer mehrmals ganz sowie zum Schluß ggf. teils gefüllt werden. Für die Restdisk gilt das gleiche. Peeker 6/86 35 Abb. 1 wobei man jedoch zwischen dem Kom- plettdisk-Restpuffer und dem Restdisk- Restpuffer unterscheiden muß. Betrachten wir hierzu die Abb. 1 und rechnen wir ein kleines Beispiel durch: 1 Der RAM-Puffer des Programms PRO¬ DOS.BACKUP kann theoretisch den Be¬ reich $0A00-$BE00 einnehmen, doch ie- gen wir hier aufgrund einer als weitgehend optimal ermittelte Größe den RAM-Puffer auf $1000-$9000 = 32K = 128 Pages = 64 Blöcke fest. 2 Auf der Megaboard-Festplatte dürften regelmäßig mehrere Megabytes für Pro- DOS reserviert sein, wobei wir für unser Rechenbeispiel 3,5M = 7168 Blöcke (0- 7167) annehmen. Block 0 der Harddisk wird aus dem nachstehend genannten Grund niemals kopiert, so daß sich 7168-1 = 7167 Blöcke ergeben. 3 Auf eine 160-Spur-Diskette des Erphi- Subsystems passen 0,625M = 1280 Blök- ke (0-1279). Für die spätere Identifikation der Backup-Disketten reservieren wird je¬ doch jeweils den Block 0, der das Backup- Datum und die Disk-Nummer enthalten wird. Damit ergeben sich 1280-1 = 1279 Blöcke. Es gibt hierbei noch einen Trick: Wenn wir bei der ersten Backup-Floppy mit Block 1 und ebenso bei der Harddisk mit Block 1 beginnen, so stimmt die Rei¬ henfolge der Blöcke 1-1279 auf der Back¬ up-Disk mit der der Harddisk überein, so daß wir anhand eines CATALOGs der er¬ sten Backup-Disk später leicht identifizie¬ ren, was beim letzten Backup dupliziert wurde. 4 Nun teilen wir die Harddisk-Blockanzahl durch die Blockanzahl einer Komplettdisk. Das ergibt 7167 : 1279 = 5 Komplettdisks (5 • 1279 = 6395 Blöcke) -h 1 Restdisk mit 772 Blöcken; 6395 -k 772 = 7167 Hard¬ disk-Blöcke. 5 Jetzt ermitteln wir für die 5 Komplett¬ disks (mit jeweils 1279 Blöcken) die An¬ zahl der Komplettdisk-Hauptschübe mit vollem RAM-Puffer ($1000-$9000 = 64 Blöcke) sowie das Pufferende beim Kom¬ plettdisk-Restschub, der ggf. den RAM- Puffer nicht voll ausnutzt. Das ergibt 1279 : 64 = 19 Komplettdisk-Hauptschübe (19 • 64 = 1216 Blöcke) sowie 1 Komplettdisk- Restschub ($1000-$8E00) mit 63 Blök- ken; 1216 -F 63 = 1279 Blöcke pro Kom¬ plettdisk. 6 Schließlich ermitteln wir für die Restdisk (mit 772 Blöcken) die Restdisk-Haupt- schübe mit vollem RAM-Puffer sowie den Restdisk-Restschub mit ggf. partiell gefüll¬ tem RAM-Puffer. Das ergibt 772 : 64 = 12 Restdisk-Hauptschübe (12 • 16 = 768) und 1 Restdisk-Restschub ($1000-$1800) mit 4 Blöcken: 768 -I- 4 = 772 Blöcke für die Restdisk. 5.3. Praktische Handhabung 1 Formatieren Sie zunächst eine Anzahl von Backup-Disketten und beschriften Sie die Labels mit den fortlaufenden Nummern 1,2, 3 usw. sowie mit dem Backup-Datum in der Form TT.MM.JJ. 2 Wenn sich das Erphi-Subsystem in Slot 6 und die Megaboard-Harddisk in Slot 7 befinden, so booten Sie zunächst ProDOS und starten Sie dann mit RUN PRODOS.BACKUP das Applesoft-Programm von einer 160- Spur-ProDOS-Diskette. Bei einer anderen Slot-Belegung ändern Sie bitte vorher die Programmzeilen 120 DU = 6: REM Disk-Unit, S6, Dl 130 HU = 7: REM Hard-Unit, S7, D1 3 Das Applesoft-Programm ermittelt nun die Floppy-Disk-Anzahl usw. und verlangt dann eine Backup-Richtungsangabe: (1) Megaboard -> Erphi (0) Erphi ^ Megaboard 4 Für die Richtung Mega-^Erphi wird das heutige Datum, für die Richtung Erphi- -»Mega das damalige Datum angefordert. Beschriften Sie die Backup-Disketten im¬ mer klar und deutlich, sonst werden Sie weder an diesem noch an anderen Back¬ up-Programmen Freude haben! 5 Nach einer letzten, warnenden Bildschirmübersicht wird automatisch das Assemblerprogramm BACKUP.PRODOS. O geladen, das Sie dann jeweils auffor¬ dert, die Diskette Nr. X einzulegen. Bei der Datensicherung in Richtung Mega-^Erphi erfolgt keine Prüfung, wohl aber in Rich¬ tung Erphi-^Mega, wobei nur Disketten mit richtiger Nummer und richtigem Datum akzeptiert werden, so daß Verwechslun¬ gen ausgeschlossen sind. Fortgeschrittene Programmierer können bei anderen Floppy-Disk-Laufwerken un¬ terschiedliche Puffergrößen ausprobieren. Für das Erphi-Subsystem ergaben sich folgende Kopierzeiten in Richtung Mega- Erphi: $0A00-$BE00 = 11min, 45s (Bitmap!) $0A00-$9A00 = 11 min, 25s $1000-$9000 = 11min, 5s Ein nicht allzu großer RAM-Puffer führte also zu den besten Übertragungsraten. Kurzhinweise 1. Zweck: (a) ProDOS-Backup-Programm PRODOS. BACKUP zur Datensicherung von Mega- board-Harddisk-Volumes; modifiziert auch bei anderen Festplatten verwendbar. (b) ProDOS-Kopierprogramm KOPY. 160.SPUR für Erphi-160-Spurlaufwerke: modifiziert auch bei kleineren Laufwerken verwendbar. 2. Konfiguration: (a) Apple ll-k/e mit ProDOS und mit Mega- board-Festplatte in Slot 7 (MDB oder Me¬ gacore) und Erphi-160-Spur-Subsystem in Slot 6; bei anderer Slotbelegung PRO- DOS.BACKUP modifizieren. (b) Apple ll-k/e mit ProDOS und mit Erphi- 160-Spur-Subsystem in Slot 6. 3. Test: (a) RUN PRODOS.BACKUP Formatierte Disketten bereitlegen und zu Testzwecken die Richtung Mega-^Erphi wählen. (b) RUN KOPY.160.SPUR Formatierte Duplikatdiskette bereitlegen. 4. Sammeldisk: (a) ProDOS-Backup-Programm: PRODOS.BACKUP (Applesoft) T.PRO.BACKUP.O (Big-Mac-Ouelltext) PRO.BACKUP.0 (Maschinenprogramm) (b) 160-Spur-Kopterprogramm: KOPY.160.SPUR (Applesoft) T.KOPY.160.SPUR.O (Big-Mac-Quelitext) KOPY.160.SPUR.O (Maschinenpro¬ gramm) 5. Sonstiges: Die Programme müssen zunächst von der DOS-3.3-Sammeldisk mit DOSTOPRO oder CONVERT auf Ihre ProDOS-Arbeits- diskette konvertiert werden. 36 Peeker 6/86 pRodos ^ PRODOS.BACKUP 120 DU = 6: REM DISK-UNIT,S6,Dl 130 HU = 7: REM HARD-UNIT,S7,Dl 150 PA = 04096: REM PUF-ANF:$1000 160 PE = 36864: REM PUF-END:$9000 170 PL = PE - PA: IF PL / 512 < > INT (PL / 512) THEN PRINT "NUR GANZE BLOCKANZAHL!": END 180 IF PEEK (49002) < > 0 AND PEEK (49003) < > 63 THEN PRINT "ZU WENIG SPEICHER!": END 190 P = 768; REM PAGE-3-PARAMETER 200 POKE P,DU * 16+0: REM +128-FUER-D2 210 POKE P + 1,HU * 16+0: REM +128-FUER-D2 220 PRINT CHR$ (21): TEXT : HOME : PRINT : INVERSE : HTAB 10; PRINT "** PRODOS.BACKUP HTAB 10: PRINT VON U. STIEHL **": NORMAL : PRINT CHR$ (4);"PREFIX": INPUT SP$: REM START-PREFIX 230 PRINT CHR$ (4);"PREFIX,S";DU;".Dl": PRINT CHR$ (4);"PREFIX": INPUT P$: PRINT CHR$ (4);"BLOAD";P$;",TDIR,A$2000,L$100" 240 DB = PEEK (8233) + PEEK (8234) # 256:DB = DB - 1: POKE P + 3, INT (DB / 256): POKE P + 2,DB - PEEK (P + 3) * 256: REM $2029;DISK-BLOCKANZAHL-1 250 PRINT CHR$ (4);"PREFIX,S";HU;",Dl": PRINT CHR$ (4);"PREFIX": INPUT P$: PRINT CHR$ (4);"BLOAD";P$;",TDIR,A$2000,L$100" 260 HB = PEEK (8233) + PEEK (8234) * 256:HB = HB - 1: POKE P + 5, INT (HB / 256): POKE P + 4,HB - PEEK (P + 5) * 256; REM $2029:HARD-BLOCKANZAHL 270 IF HB < 280 OR DB < 280 OR HB < = DB THEN HOME : PRINT "HARD-BLOCKS <= DISK-BLOCKS?": END 280 KD = INT (HB / DB): POKE P + 6,KD:RD = 0; POKE P + 7,RD: POKE P + 8,0: POKE P + 9,0: REM KOMPLETTDISKS 290 IF HB / DB > KD THEN RD = 1: POKE P + 7,RD: RB = HB - KD * DB: POKE P + 9, INT (RB / 256): POKE P + 8,RB - PEEK (P + 9) * 256: REM RESTDISK 300 POKE P + 10,PA / 256: POKE P + 11,PE / 256:PB = PL / 512: REM ANFANG-ENDE-LAENGE 310 IF DB < = PB THEN HOME : PRINT "DISK-DRIVE <= PUFFER?"; END 320 HS = INT (DB / PB): POKE P + 12,HS: POKE P + 13,0: POKE P + 14,0: REM KOMPLETTDISK-HAUPTSCHUEBE 330 IF DB / PB > HS THEN RS = (DB - HS # PB) # 2: POKE P + 13,1: POKE P + 14,RS + PEEK (P + 10): REM KOMPLETTDISK-RESTSCHUB 340 POKE P + 15,0: POKE P + 16,0: POKE P + 17,0: IF RD = 0 THEN 380: REM KEINE-RESTDISK1 350 IF RB < PB THEN POKE P + 16.1:RS = RB * 2: POKE P + 17, RS + PEEK (P + 10): GOTO 380: REM RESTSCHUB-OHNE-HAUPTSCHUB^ 360 HS = INT (RB / PB): POKE P + 15,HS: REM RESTDISK-HAUPTSCHUEBE 370 IF RB / PB > HS THEN RS = (RB - HS * PB) # 2: POKE P + 16,1: POKE P + 17,RS + PEEK (P + 10): REM RESTDISK-RESTSCHUB 380 HTAB 11; PRINT "1. MEGA -> ERPHI": PRINT : HTAB 11: PRINT "0. ERPHI -> MEGA": PRINT ; PRINT : HTAB 11 390 GET R$: ON R$ < > "1" AND R$ < > "0" GOTO 390: POKE P + 18, ASC (R$) - 48: REM RICHTUNG-FLAG 400 IF R$ = "1" THEN VTAB 14: HTAB 10: CALL - 958: PRINT "NEUES DATUM TT.MM.JJ" 410 IF R$ = "0" THEN VTAB 14: HTAB 10: CALL - 958: PRINT "ALTES DATUM TT.MM.JJ" 420 HTAB 10: INPUT "->";D$: IF LEN (D$) < > 8 OR MID$ (D$,3,l) < > "." OR MID$ (D$,6,l) < > " J’ THEN 400 430 FOR X = 1 TO 8: POKE P + 18 + X, ASC ( MID$ (D$,X,1)): NEXT 440 HOME : PRINT KD + RD;" FORMATIERTE DISKETTEN - ETIKETTIERT": PRINT : PRINT "#1-";D$;", +2-";D$;", t3-";D$: PRINT : PRINT "USW. BEREITLEGEN UND GENAU": PRINT : PRINT "IN DERJENIGEN REIHENFOLGE EINLEGEN,": PRINT : PRINT "WIE SIE AM BILDSCHIRM ANGEWIESEN WERDEN" 450 PRINT ; IF R$ = "1" THEN PRINT "RICHTUNG MEGA -> ERPHI" 460 IF R$ = "0" THEN PRINT "RICHTUNG ERPHI -> MEGA" 470 PRINT : PRINT "OKAY J/N ";: GET X$: ON X$ < > "J" AND X$ < > "N" GOTO 440: IF X$ = "N" THEN PRINT : PRINT CHR$ (4);"PREFIX";SP$: END 480 PRINT : PRINT CHR$ (4);"PREFIX";SP$: PRINT CHR$ (4) ;"VERIFy";SP$;"PRO,BACKUP,0": PRINT CHR$ (4);"BRUN PRO.BACKUP,0": END PRO.BACKUP.O BSAVE PRO.BACKUP.O, A2051, L509 1 ORG $0803 2 * 3 * PRO.BACKUP.O 4 • 5 ¥ 6 * Backup-Programm zwischen 7 * Megaboard-Festplatte und 8 ¥ Erphi-160“Spur-Subsystem 9 ¥ U.Stiehl/Mai/1986 10 * 11 RESVKT EQU $03F2 ;Vektor 12 MLI EQU $BF00 ;ProDOS 13 SETVID EQU $FD93 :Video 0803: A0 02 0805: B9 F2 03 14 SETKBD EQU $FE89 ;Keyboard 15 HOME EQU $FC58 ;Cls 16 COUT EQU $FDED ;Print 17 CROUT EQU $FD8E ;Return 18 TABV EQU $FB5B ; Vtab 19 PRBYTE EQU $FDDA ;Hexout 20 BELLIA EQU $FBDD ;Piepston 21 RDKEY EQU $FD0C ;Taste 22 SCRTCH EQU $D64B ;New 23 OUTSP EQU $DB57 ;Space 24 OUTDO EQU $DB5C ;ORA-Cout 25 BASIC EQU $E003 ;Basic 26 LINPRT EQU $ED24 ;Dezout 27 ¥ 28 DISKUNIT EQU $0300 ;DU+00 29 HARDUNIT EQU $0301 ;HU+00 30 ¥ 31 ¥ Nicht 1 benutzt: 32 DISKBLKL EQU $0302 DB-low 33 DISKBLKH EQU $0303 DB-high 34 HARDBLKL EQU $0304 HB-low 35 HARDBLKH EQU $0305 HB-high 36 ¥ 37 ¥ Komplettdisks KD + Restdisk RD 38 ¥ 39 KOMPDISK EQU $0306 ;KD>=1 40 RESTDISK EQU $0307 ;RD>=0 41 ¥ 42 ¥ Nicht benutzt: 43 RESTBLKL EQU $0308 ;RB-low 44 RESTBLKH EQU $0309 :RB-high 45 ¥ 46 ¥ Pufferanfang PA + Pufferende PE 47 * . 48 PUFANF EQU $030A ;PA=1000 49 PUFEND EQU $030B ;PE=9000 50 ¥ - 51 ¥ KD-Hauptschübe + KD-Restschub 52 ¥ 53 KDHS EQU $030C HS>=1 54 KDRS EQU $030D RS>=0 55 KDRSPE EQU $030E P-Ende 56 ¥ 57 ¥ RD-Hauptschübe + RD-Restschub 58 * 59 RDHS EQU $030F HS>=0 60 RDRS EQU $0310 RS>=0 61 RDRSPE EQU $0311 P-Ende 62 ¥ 63 ¥ 1: Mega->Erphi 0: Erphi->Mega 64 ¥ 65 RICHTUNG EQU $0312 ;l/0 66 ¥ 67 ¥ Datum + Nr. zur Idenfitikation 68 ¥ 69 DATUM EQU $0313 -$031A 70 DISKNR EQU $031B >=0 71 ¥ 72 RESET EQU $031C -$031E 73 ¥ 74 ¥ Temporäre Zähler 75 ¥ 76 KDTEMP EQU $00FA ;Kompl- 77 KDHSTEMP EQU $00FB :Haupt. 78 RDHSTEMP EQU $00FC ;Rest. 79 PETEMP EQU $00FD :P-Ende 80 IND EQU $00CE indirekt 81 ¥ 82 ¥ Puffer-Verteilung 83 > -- 84 ¥ 85 ¥ Optimal 32K-Puffer; $1000-$9000 86 ¥ d.h. $8000-Puf.: 4096-36864 87 ¥ Möglich 36K-Puffer: $0A00-$9A00 88 ¥ d.h. $9000-Puf.: 2560-39424 89 ¥ Maximal 45K~Puffer: $0A00-$BE00 90 ¥ d.h. $BE00-Puf.: 2560-48640 91 ¥ 92 ¥ Im Maximalfall Bitmap ändern 93 ¥ 94 ¥ LDA #$00 95 ¥ STA $BF6B ;Bitmap 96 ¥ STA $BF6C 97 ¥ STA $BF6D 98 ¥ STA $BF6E 99 ¥ LDA #%00000011 100 ¥ STA $BF6F 101 ¥ 102 ¥ Reset-Vektor setzen 103 ¥ 104 LDY #2 105 INITl LDA RESVKT,Y Peeker 6/86 37 I 0808: 99 IC 03 106 STA RESET,Y 080B: 88 107 DEY 080C: 10 F7 108 BPL INITl 080E: 18 109 INIT2 CLC 080F: 20 4B D6 110 JSR SCRTCH 0812: 20 93 FD 111 JSR SETVID ;DOS ab- 0815: 20 89 FE 112 JSR SETKBD ;hängen 0818: A9 27 113 LDA #<INIT3 ;Reset- 081A: 8D F2 03 114 STA RESVKT jVektor 081D: A9 08 115 LDA #>INIT3 ;setzen 081F: 8D F3 03 116 STA RESVKT+1 0822: 49 A5 117 EOR +$A5 :Funny 0824: 8D F4 03 118 STA RESVKT+2 119 120 * Units ] poken. Richtung beachten 121 * 0827: AC 00 03 122 INIT3 LDY DISKUNIT 082A; AE 01 f>3 123 LOX HARDUHXT 0B2D; aC DD 08 124 STY »lUNXT iM9ga-> 0830: 8E CE 08 125 STX RUNIT :Erptii 0833: Al> 12 03 126 LOA RXCHTUNG 0836: 00 06 127 BNE INIT4 lOl 1 0838: 9€ CE 08 128 STY RUHIT :Erphl 0B3B' 8E DD 08 129 STX WOKIT :-?Mega 130 * 131 * Mit Hard-Block $0001 beginnen! 132 * 083E A0 01 133 INIT4 LDY fl ;S000i 0940 A2 00 134 LDX 0842 SC DI 09 135 STY RBLKL 0843 8E D2 08 139 STX RBLKH ;ErpUl 0848 AD 12 03 137 LDA RICHTUNG 084B D0 06 138 BNE INIT5 0B4D ec E0 08 139 STY ?1BLKL :Erplii 0850 86 El 08 140 STX WBLKH :->Me£n 141 * 142 * Disk-Nr. + Komplettdisk-Zähler 143 * 0853 ; A9 00 144 INIT5 LDA +0 0855 ; 8D IB 03 145 STA DISKNR 0858 : AD 06 03 146 LDA KOMPDISK 085B : 85 FA 147 STA KDTEMP 148 * 149 * Komplettdisk? 150 *- 151 * 085D : F0 2C 152 KOMPDSK? BEQ RESTDSK? :nein(?) 153 * 154 * Komplettdisk-Hauptpuffer 155 * 085F EE IB 03 156 KDLOOPl INC DISKNR 0862 ; C6 FA 157 DEC KDTEMP 0864 AD 0B 03 158 LDA PUFEND 0867 85 FD 159 STA PETEMP ;PUFEND 086S i: 20 34 09 160 JSR INSERTI 086C: AD 0C 03 161 LDA KDHS :Haupt? 086F: F0 09 162 BEQ KDL00P3 ;nein(?) 0871: 85 FB 163 STA KDHSTEMP 0873: 20 ED 08 164 KDL00P2 JSR READA :Haupt 0876: C6 FB 165 DEC KDHSTEMP ;erneut? 0878; D0 F9 166 BNE KDL00P2 :ja 167 * 168 # Komplettdisk-Restpuffer I 169 * 087A: AD 0E 03 170 KDL00P3 LDA KDRSPE :Rest 087D: 85 FD 171 STA PETEMP ;KDRSPE 087F: AD 0D 03 172 LDA KDRS 0882: F0 07 173 BEQ RESTDSK? :nein 0884: 20 ED 08 174 JSR READA 175 * 176 * Noch eine Komplettdisk? 177 * 0887: A5 FA 178 LDA KDTEMP 0889: D0 D4 179 BNE KDLOOPl 180 * 181 * Restdisk? 182 «- 183 * 088B; AD 07 03 ; 184 RESTDSK? LDA RESTDISK 088E: F0 26 185 BEQ 1 EXITl ;nein 186 * 187 * Restdisk-Hauptpuffer 188 * 0890: EE IB 02 i 189 RDLOOPl INC 1 DISKNR 0893: AD 0B 03 190 LDA PUFEND 0896: 85 FD 191 STA PETEMP ;PUFEND 0898: 20 34 09 192 JSR INSERTI 089B: AD 0F 03 193 LDA RDHS ;Haupt? 089E; F0 09 194 BEQ RDL00P3 ;nein(?) 08A0: 85 FC 195 STA RDHSTEMP 08A2: 20 ED 08 196 RDL00P2 JSR READA ;Haupt a>3A5: C6 FC 197 DEC RDHSTEMP ;erneut? 08A7: D0 F9 198 199 BNE RDL00P2 200 * Restdisk-Restpuffer 201 * 08A9: 08AC: 08AE: 08B1: 08B3; 08B6; 08B8: 08BB: 08BE: 08BF: 08C1: 85 FD AD 10 F0 03 A0 02 88 10 F7 03 202 RDL00P3 LDA 203 STA 03 204 LDA 205 BEQ 08 206 JSR 207 * 208 EXITl LDY 03 209 EXIT2 LDA 03 210 STA 211 DEY 212 BPL E0 213 JMP 214 215 * ;Rest ;RDRSPE ;Reset ;wieder ;normal :Basic 216 * 217 * Diverse Unterroutinen 218 * 219 * 1 Block lesen 220 * 0BC4! 20 00 BP 221 READ JSR MLI 0BC7: 90 222 HEX 80 08C8: CD 08 223 DA RCNT 08CA: B0 16 224 BOS JlLIERBl 08CC: S0 226 RTS 0ßCO: 03 226 RCNT HEX 03 08CE: 00 227 RU HIT HEX 00 0BCP: 00 228 RPUFL HEX 00 0SD0: 00 229 RPUFH HEX 00 0801: 00 230 hblkl HEX 00 0002: 00 231 RBLKH HEX 00 ; Read Count ßopokt eopoki Hepokt gopokt 233 * 1 Block schreiben 234 * 08D3 08D6 08D7 08D9 08DB 08DC 08DD 08DE 08DF 08E0 08E1 20 00 BF 235 WEITE JSR MLI 81 236 HEX 81 :Write DC 08 237 DA WCNT B0 07 238 BCS MLIERRl 60 239 RTS 03 240 WCNT HEX 03 Count 00 241 WUNIT HEX 00 gepokt 00 242 WPUFL HEX 00 stets 0 00 243 WPUFH HEX 00 gepokt 00 244 WBLKL HEX 00 gepokt 00 245 WBLKH HEX 00 gepokt 246 * 48 247 MLIERRl PHA MLI- 20 58 FC 248 JSR HOME Fehler- 68 249 PLA nummer- 20 DA FD 250 JSR PRBYTE ausgabe 251 * 252 * Numquam retrorsum! 253 * 4C EA 08 254 MLIERR2 JMP MLIERR2 ;Reset 255 256 # Hauptschübe/Restschub: 257 Read aSEDi AD afiF0; 80 mrz: A9 20 &0FSi 20 08Fa; EC OBFE: D0 0900: EE 0903: EE 0906: EE 0909: AD 090Cr CS 090E: 90 0A 03 D0 08 D2 ED PD C4 08 Dl 0S 03 D2 08 D0 08 D0 08 D0 0B FO ES 253 READA LOA PUFANF 259 STA RPUFH 260 LDA 261 JSR COÖT 262 READB JSR READ 263 INC RBLKL .Blk+l 264 BHE READC 266 INC RBLKH 266 READC INC RPUFH ;Püf+2 267 INC RPUFH 268 LOA RPUFH 269 CttP PETEMP 270 BCC REAOB c /1 * 272 # Hauptschübe/Restschub: 273 * ^910; AD )9I3i SD ^^16£ A9 ^918: 20 mB: 20 i9lE: EE >921; D0 B23: EE 9926: EE 3929 t EE 392C: AD 592F: C5 21931: 90 21933: 60 0A 03 DF 0B 07 ED FO D3 09 E0 08 03 El 09 DF 08 DF 0S DF 08 FD E8 274 waiTBA LpA PUFANF 27B STA WPUFH 276 LOA ♦"W" 277 JSR COUT 278 WRITBB JSR «RITE 279 IRC WBLKL :Blk+l 280 BKE WRITEC 281 IHC WBLKH 282 WRITEC INC WPUFH :Puf+2 263 INC WPÖFH 2B4 LDA WPUFH 285 CMP PETEMP 286 BCC WEITES 287 RTS 288 * 289 * Diskette einlegen 38 Peeker 6/86 pRodos 290 * 0934 20 58 FC 291 INSERTl JSR HOME 0937 A9 09 292 LDA +9 ; :Vtab 8 0939 20 5B FB 293 JSR TABV 093C AE IB 03 294 LDX DISKNR ;low 093F A9 00 295 LDA +0 i :high=0 0941 20 24 ED 296 JSR LINPRT 0944 A0 00 297 LDY #0 0946 B9 DD 09 298 INSERT2 LDA EINLEGEN,Y 0949 F0 06 299 BEQ INSERT3 094B 20 ED FD 300 JSR COUT 094E C8 301 INY 094F D0 F5 302 BNE INSERT2 0951 20 0C FD 303 INSERT3 JSR RDKEY 0954 C9 D7 304 CMP #"W" 0956 D0 F9 305 BNE INSERT3 0958 20 8E FD 306 JSR CROUT 095B 20 8E FD 307 JSR CROUT 308 * 309 * "TT.MM , JJ" - 1- Disknummer 310 * 095E A9 00 311 IDENT LDA #0 0960 85 CE 312 STA IND 0962 AD 0A 03 313 LDA PUFANF 0965 85 CF 314 STA IND+1 0967 AD 12 03 315 LDA RICHTUNG 096A F0 IF 316 BEQ IDENT0A 317 * 318 * auf Block 0 schreiben 319 096C A9 00 320 IDENTIA LDA +0 $0000 096E .8D E0 08 321 STA WBLKL Mega-> 0971 8D El 08 322 STA WBLKH Erphi 0974 AD 0A 03 323 LDA PUFANF 0977 8D DF 08 324 STA WPUFH 097A A0 08 325 LDY #8 097C B9 13 03 326 IDENTIB LDA DATUM,Y 097F 91 CE 327 STA (IND),Y 0981 88 328 DEY 0982 10 F8 329 BPL IDENTIB 0984 20 D3 08 330 JSR WRITE 0987 EE E0 08 331 INC WBLKL ;$0001 098A 60 332 RTS 333 * 334 * von Block 0 lesen 335 * 098B : A9 00 336 IDENT0A LDA 4=0 $0000 098D : SD Dl 08 337 STA RBLKL Erphi 0990 : 8D D2 08 338 STA RBLKH ->Mega 0993 : AD 0A 03 339 LDA PUFANF 0996 : 8D D0 08 340 STA RPUFH 0999 : 20 C4 08 341 JSR READ 099C : A0 08 342 LDY +8 099E : B9 13 03 343 IDENT0B LDA DATUM,Y 09A1 : Dl CE 344 CMP (IND),Y 09A3 : D0 07 345 BNE IDENT0C 09A5 : 88 346 DEY 09A6 : 10 F6 347 BPL IDENT0B 09A8 : EE Dl 08 348 INC RBLKL :$0001 09AB : 60 349 RTS 350 * 351 * Falsche Backup-Diskette 352 09AC : 20 DD FB 353 IDENT0C JSR BELLIA 09AF : A0 00 354 LDY #0 09B1 : B9 F7 09 355 IDENT0D LDA FALSCH,Y 09B4 : F0 06 356 BEQ IDENT0E 09B6 : 20 ED FD 357 JSR COUT 09B9 : C8 358 INY 09BA : D0 F5 359 BNE IDENT0D 09BC : A0 08 360 IDENT0E LDY #8 09BE : Bl CE 361 LDA (IND),Y ;Nr, 09C0 : AA 362 TAX ; low 09C1 : A9 00 363 LDA #0 ;high=0 09C3 : 20 24 ED 364 JSR LINPRT 09C6 : A9 AD 365 LDA 09C8 : A0 00 366 LDY #0 09CA : 20 5C DB 367 IDENT0F JSR OUTDO 09CD : Bl CE 368 LDA (IND),Y 09CF : C8 369 INY 0900 ; C0 09 370 CPY +9 09D2 ; D0 F6 371 BNE IDENT0F 09D4 : 20 57 DB 372 JSR OUTSP 09D7 : 20 0C FD 373 JSR RDKEY 09DA : 4C 34 09 374 JMP INSERTl 375 * 09DD : AE A0 C4 376 EINLEGEN ASC DISK" 09E3 : A0 C5 C9 377 ASC " EINLEGEN" 09EC : 8D 8D 378 HEX 8D8D 09EE: D7 A8 C5 379 ASC "W(EITER " 09F6: 00 380 HEX 00 09F7t C6 CI CC 381 FALSCH ASC "FALSCH! " 09FF: 00 382 HEX 00 KOPY.160.SPUR 100 REM #KOPY,160hSPUR* 110 DU = 6;HU = 6 120 DB = 1280:HB = 1280 130 PA = 02560: REH $0A00 140 PE = 48640: REM $BE00 150 PL = PE - PA: IF PL / 512 < > INT (PL / 512) THEN PRINT "NUR GANZE BLOCKANZAHL!": END 160 P = 768: REM PAGE-3-PARAMETER 170 POKE P.DU * 16 + 0: REM +128-FUER-D2 180 POKE P + 1,HU * 16 + 128: REM +128-FUER-D2 190 POKE P + 3, INT (DB / 256); POKE P + 2,DB - PEEK (P + 3) * 256: REM DISK-BLOCKANZAHL 200 POKE P + 5, INT (HB / 256): POKE P + 4,HB - PEEK (P + 5) * 256: REM HARD-BLOCKANZAHL 210 KD = 1: POKE P + 6,KD:RD = 0: POKE P + 7,RD: POKE P + 8,0; POKE P + 9,0: REM KOMPLETTDISK 220 POKE P + 10,PA / 256: POKE P + 11,PE / 256:PB = PL / 512: REM ANFANG-ENDE-LAENGE 230 HS = INT (DB / PB): POKE P + 12,HS: POKE P + 13,0: POKE P + 14,0: REM KOMPLETTDISK-HAUPTSCHUEBE 240 IF DB / PB > HS THEN RS = (DB - HS * PB) * 2: POKE P + 13,1: POKE P + 14,RS + PEEK (P + 10): REM KOHPLETTDISK-RESTSCHUB 250 POKE P + 15,0: POKE P + 16,0: POKE P + 17,0: REM KEINE-RESTDISK! 260 PRINT CHR$ (21): TEXT : HOME : PRINT : INVERSE : HTAB 10: PRINT "** 160-SPUR-KOPY **": HTAB 10: PRINT VON U. STIEHL **": NORMAL : PRINT CHR$ (4);"PREFIX": INPUT SP$: REM START-PREFIX 270 HTAB 10: PRINT "ORIGINAL IN DRIVE 1": PRINT : HTAB 10: PRINT "DUPLIKAT IN DRIVE 2" 280 PRINT : PRINT CHR$ (4);"BRUN";SP$:"KOPY.160.SPUR.0": END KOPY.160.SPUR.O BSAVE KOPY. 160,SPUR 0, A2051,L474 (Erst linke, dann rechte Spalte eingeben) $ 0800 : 00 00 00 $0808: 8D 6B BF $0810: BF 8D 6E $0818; BF A0 02 $0820: 03 88 10 $0828: 20 93 FD $0830: 8D F2 03 $0838: 49 A5 8D $0840: AE 01 03 $0848: 09 AD 12 $0850: 09 8E 22 $0858: 8C 16 09 $0860: 03 D0 06 $0868: 09 A9 00 $0870: 03 85 FA $0878: C6 FA AD $0880; 79 09 AD $0888: FB 20 32 $0890: AD 0E 03 $0898: F0 07 20 $08A0: D4 AD 07 $08A8: 03 AD 0B $08B0: 09 AD 0F $08B8: 20 32 09 $08C0: 11 03 85 $08C8; 03 20 32 $08D0: 03 99 F2 $08D8: 58 FC A9 $08E0: 00 B9 FA $08E8: FD C8 D0 $08F0; CE F0 13 $08F8: 03 08 C5 A9 00 8D 12 03 8D 6C BF 8D 6D BF A9 03 8D 6F B9 F2 03 99 IC F7 18 20 4B D6 20 89 FE A9 3D A9 08 8D F3 03 F4 03 AC 00 03 8C 22 09 8E 13 03 D0 06 8C 13 09 A0 00 A2 00 8E 17 09 AD 12 8C 25 09 8E 26 8D IB 03 AD 06 F0 2C EE IB 03 0B 03 85 FD 20 0C 03 F0 09 85 09 C6 FB D0 F9 85 FD AD 0D 03 32 09 A5 FA D0 03 F0 26 EE IB 03 85 FD 20 79 03 F0 09 85 FC C6 FC D0 F9 AD FD AD 10 03 F0 09 A0 02 B9 IC 03 88 10 F7 20 05 20 5B FB A0 08 F0 06 20 ED F5 20 0C FD C9 C9 CA D0 F5 4C D2 CE C5 D5 D4 $0900: A0 CA AF $0908: E0 20 00 $0910; 16 60 03 $0918: 20 00 BF $0920: 60 03 00 $0928: 20 58 FC $0930: 2F 09 AD $0938: A9 D2 20 $0940: EE 16 09 $0948: EE 15 09 $0950: 09 C5 FD $0958: 8D 24 09 $0960; 20 18 09 $0968: EE 26 09 $0970: 09 AD 24 $0978: 60 20 58 $0980: FB A0 00 $0988: 20 ED FD $0990; FD C9 D7 $0998; 20 8E FD $09A0: 8D 17 09 $09A8: 09 60 CF $09B0: CI CC A0 $09B8: C9 D6 C5 $09C0: D5 D0 CC $09C8: C9 CE A0 $09D0; A0 B2 8D $09D8; D4 C5 D2 CE A0 00 4C 03 BF 80 12 09 B0 00 00 00 00 00 81 21 09 B0 07 00 00 00 00 48 68 20 DA FD 4C 0A 03 8D 15 09 ED FD 20 09 09 D0 03 EE 17 09 EE 15 09 AD 15 90 E8 AD 0A 03 A9 D7 20 ED FD EE 25 09 D0 03 EE 24 09 EE 24 09 C5 FD 90 E8 FC A9 05 20 5B B9 AA 09 F0 06 C8 D0 F5 20 0C D0 F9 20 8E FD A9 00 8D 16 09 AD 0A 03 8D 15 D2 C9 C7 C9 CE C9 CE A0 C4 D2 A0 Bl 8D 8D C4 C9 CB CI D4 A0 C4 D2 C9 D6 C5 8D D7 A8 C5 C9 A0 00 00 00 00 Peeker 6/86 39 I SUPERDUMP für Apple-Pascal 1.1 und 1.2 Grafik-Ausdruck für und Imagewriter I von Jürgen Geiß Auf Wunsch sehr vieler Peeker-Leser, die Grafiken mittels SU PER DU MP auch in Pascal ausgeben lassen wollen, soll hier die Version für Apple-Pascal 1.1 bzw. 1.2 gebracht werden. Da der Assemblerteil fast der gleiche wie bei der in Peeker, Heft 6/85 vorgestellten DOS-3.3-Version ist, kann er wegen der Länge nicht abgedruckt werden. Er befindet sich aber auf der Peeker-Sammeldisk. Das Drucken mittels SUPERDUMP in Pas¬ cal kann wesentlich eleganter als in Basic vollzogen werden. Es gibt hier keine Peeks und Pokes, sondern vordefinierte Datentypen, die Variablen enthalten, deren Wertebereich anzeigt, welche Werte er¬ laubt sind. Diese Datentypen werden im Interfaceteil der Unit SuperDump dekla¬ riert. Dort befinden sich auch die Deklara¬ tionen von acht Prozeduren, die die Hand¬ habung der Grafik erleichtern sollten (s. Li- sting 1: Unit SuperDump). Doch zuerst zu den Typen: 1. Control-Block Der CtrIBIk entspricht genau dem aus Peeker, Heft 6/85. In ihm befinden sich die druckerspezifischen Steuerzeichen, die aus 4 Strings zu je 15 Zeichen gebildet werden. PINIT ist der String, der einmal zu Beginn des Druckvorgangs gesendet wird. Darin Epson-FX80 können beispielsweise die Steuercodes für den Zeilenabstand untergebracht werden. PLINE ist ein String, der vor jeder auszu¬ gebenden Druckzeile gesendet wird. Dort müssen sich die Steuerzeichen zum Um¬ schalten des Druckers auf den Grafikbe¬ trieb befinden. In PLF1 müssen sich die Steuerzeichen befinden, die das Papier um 1/216“ oder 1/144“ (Zoll) vorwärts transportieren (wird nur bei 2- und 4-fach-Druck benutzt). In PEXIT schließlich müssen sich die Steuerzeichen befinden, die zum Ab¬ schluß eines Druckvorgangs gesendet werden sollen. ln Listing 2: Print, Epson-Version befin¬ det sich ein Beispiel einer Vorbelegung des CtrIBIocks für den Epson-Drucker FX- 80, in Listing 3: Print, Imagewriter ent¬ sprechendes für den Imagewriter 1. (Anm. d.Red.: Damit nicht wieder eine Flut von Zuschriften auf die Redaktion niederpras¬ selt, sei mit Nachdruck darauf hingewie¬ sen, daß SUPERDUMP für Pascal auf ei¬ nem Apple Ile (a) mit Epson FX-80 und Parallelschnittstelle und (b) mit Imagewri¬ ter I und Super-Serial-Card getestet wur¬ de. Die Anpassung an andere Drucker, z.B. von Star, Okidata usw., kann mangels Hardware von der Redaktion nicht vorge¬ nommen werden. Wenden Sie sich direkt an den Lieferanten oder den jeweiligen Drucker-Hersteller.) 2. Parameter Um nicht eine Vielzahl von Parametern an die Dump-Prozedur, die das Bild druckt, übergeben zu müssen, wurden diese im Record Dumptype zusammengefaßt. Die¬ ser enthält im einzelnen: CtrIAdr: Darin muß sich die Adresse einer Variablen vom Typ CtrIBIk befinden. Um. die Adressen einer Variablen zu erhalten, kann man sich der Funktion Adr bedienen. Impression: Druckschwärze (0 = normal, 1 = Doppeldruck, 2 = Vierfachdruck). XOR: 0 bedeutet Bild schwarz auf weiß ausgeben, 255 weiß auf schwarz. Dlrectlon: 0 = Horizontaldruck, 1 = Verti¬ kaldruck. Frame: 0 = kein Rahmen, 1 = Rahmen um das Bild zeichnen. PlcAddr: Bildadresse, Seite 1 = 8192, Seite 2 = 16384 Rfactor: Anzahl der Wiederholungen des gleichen Bildes nebeneinander Rdlstance: Anzahl der Bildpunkte, die zwischen 2 oder mehreren aufeinanderfol¬ genden Bildern frei bleiben soll. Left, Right, Top und Bottom: Linker, rechter, oberer und unterer Bildrand. Xfactor, Yfactor: Dehnung des Bildes in X- bzw. Y-Richtung. Hires560: 0 = normale 280 ^ 192 Grafik, 1 = 560 ^ 192 (Double Hires) Grafik. AutoLF: 0 = sende LF nach CR, 1 = sende kein LF nach CR. DiffPics; Anzahl der verschiedenen Teil¬ bilder (für große Bilder). Needle: Drucknadel-Richtung, 0 = Ep¬ son-Drucker, 1 = imagewriter Comptype: 0 = Apple NH- oder Apple Ile mit parallelem Interface, 1 = Apple ll-F oder Apple Ile mit Super-Serial-Card, 2 = Apple llc. 3. Prozeduren der Unit Um ein Bild zu drucken, muß die Prozedur Dump mit einer Variablen des eben erläu¬ terten Typs aufgerufen werden (s. Listing 2 ). Die Prozedur MoveAuxMain verschiebt den Speicher aus dem Auxiliary-RAM ab Adresse $2000 des Apple Ile oder llc in das Main-RAM nach Adresse $4000. Die Prozedur MoveMainAux verschiebt von Main-RAM $2000 nach Aux-RAM $4000. Mit diesen beiden Prozeduren können bei¬ spielsweise Double-Hires-Bilder erstellt, in das Main-RAM geschoben und an¬ schließend abgespeichert werden. Convert560 konvertiert ein Double-Hires- Bild in 2 normale Hires-Bilder mit linker Hälfte in Seite 1 und rechter Hälfte in Seite 2 . 40 Peeker 6/86 >f KCsd Convert280 konvertiert zwei normale Hi- res-Bilder ($2000 - $5FFF) in ein Double- Hires-Bild. Da oft ein Bild nur normal ausgegeben werden soll, d.h. ohne Verzerrung oder sonstigen Besonderheiten, wird die Pro¬ zedur SetDefault verwendet. Sie stellt alle Variablen des Dump-Records auf Stan¬ dardwerte, so daß anschließend bei Bedarf nur noch wenige Änderungen vorgenom¬ men werden müssen. Um die Anzahl der Bildpunkte zu ermitteln, die in jeder Zeile an den Drucker gesendet werden, muß die Prozedur GetGrafBytes benutzt werden. Eingabewert ist eine Dumptype-Variable, Ausgabewerte sind eine Integerzahl sowie ein String, in denen sich dann die Anzahl der Bildpunkte befin¬ den. Für einen Epson-Drucker wird die Integerzahl, für einen Imagewriter der String interessant sein. Bei einem Bild von 280 * 192 befindet sich in der Variablen Bytes die Integerzahl 280, im Bytestr der String „0280“. Im Beispiel in Listing 2 erkennt man die Benutzung von GetGraf¬ Bytes. Die letzte Prozedur in SuperDump ist die Funktion Adr. Sie liefert die Adresse einer beliebigen Variablen im Speicher. Die Funktion wird benutzt, um die Adresse des Kontrollblockes zu ermitteln, um sie der Varibalen DumpParams.CtrIAdr zuzu¬ weisen. 4. Implementation-Teil Im Implementation-Teil wird die Imple¬ mentierung der einzelnen Prozeduren auf¬ gezeigt. Um nun ein Bild drucken lassen zu kön¬ nen, muß nach dem Programmkopf ein uses TurtleGraphics, SuperDump; stehen, um dem Programm die neuen Ty¬ pen und Prozeduren mitzuteilen. Im Beispielprogramm Print werden 4 Va¬ riablen benötigt; CtrIBIock: CtrlBIk ist der Kontrollblock mit den Steuerzeichen. DumpParams: Dumptype enthält sämtli¬ che zu übergebenden Parameter. S: String und Bytes: integer werden für GetGrafBytes benötigt. Das Programm initialisiert die Grafik und zeichnet ein Dreieck mit den Koordinaten (0, 0), (279, 191) und (0, 191). Anschlie¬ ßend wird SetDefault benutzt, um nicht alle Parameter selbst einstellen zu müs¬ sen. Die Adresse des Kontrollblockes wird ermittelt und der Variablen DumpPa¬ rams.CtrIAdr zugewiesen. Nun muß noch die Anzahl der Grafikpunkte durch einen Aufruf von GetGrafBytes ermittelt werden. Bevor gedruckt werden soll, muß der Kon¬ trollblock vorbesetzt werden. In unserem Beispiel in Listing 2 handelt es sich um einen Epson-Drucker. Die Strings Pinit, Pline, Plf1 und Pexit haben eine Län¬ ge von 3, 4, 3 bzw. 2 Zeichen und werden deshalb mit entsprechend vielen Zeichen gefüllt („-“), damit die Länge der Strings definiert ist. Dann werden die Steuerzei¬ chen eingesetzt. Am Ende genügt ein Auf¬ ruf von Dump (DumpParams), um das Bild an den Drucker zu schicken. Für den Imagewriter muß lediglich der Kontrollblock geändert und der Computer¬ typ eingetellt werden (s. Peeker 6/85). Die Ausgabe auf den Drucker erfolgt im As¬ semblerteil der Unit SuperDump nicht durch Anspringen der Pascal-I/O-Tabeile, d.h. daß keine Steuerzeichen für das Inter¬ face gesendet werden dürfen (wie z.B. CtrI-l, Z), da diese sonst an den Drucker weitergeleitet werden würden. Die Initiali¬ sierung des Kontrollblockes für Imagewri¬ ter könnte dann also aussehen wie in Li¬ sting 3. Kurzhinweise 1. Zweck; Ausgabe von Hires- und Double-Hires- Bildern auf den Epson FX-80 oder Ima¬ gewriter I. 2. Konfiguration; Apple ll-i-/e, Apple Pascal 1.1 oder 1.2; FX-80 oder Imagewriter I. Achtung; llc und Imagewriter II wurden nicht von der Re¬ daktion getestet! 3. Test: Exec EPSON oder IMAGEWRITER nach (!) der Einbindung in Library (siehe 5) 4. Sammeldisk: Die Sammeldisk # 18 ist eine kombinierte Pascal-DOS-Diskette und enthält in Pas¬ cal-Directory folgende Dateien; CALLDUMP.TEXT (40 Blöcke) CALLDUMP.CODE (26 Blöcke) SUPERDUMPTEXT (14 Blöcke) SUPERDUMP.LIB (10 Blöcke) EPSON.TEXT (4 Blöcke) EPSON.CODE (2 Blöcke) IMAGEWRITR.TEXT (4 Blöcke) IMAGEWRITR.CODE (2 Blöcke) LIB.TEXT (4 Blöcke) FUELLER (168 Blöcke; leer!) 5. Einbindung von SUPERDUMP.LIB in SYSTEM.LIBRARY: a) Starten von LIBRARY.CODE auf der APPLE3: Diskette b) Auf die Frage Output Code File mit SYSTEM.LIBRARY antworten c) Auf die Frage Link Code File mit SY¬ STEM.LIBRARY antworten d) Alle Slots mit dem ” = ” Befehl kopieren e) Mittels New „SUPERDUMP.LIB" holen f) Slot 1 nach Slot 7 oder anderen freien Slot kopieren (1 <LEERTASTE> 7) g) Programm mit „q” und anschließendem <RETURN> verlassen h) Testprogramm EPSON.CODE oder IMAGEWRITR.CODE kann jetzt ausge¬ führt werden. geratan untnri PICOTIPP Tastatur deutsch, für Apple* II+ und Kompatible - 95 Tasten, Deutsche Tastatur nach DIN - 12 Funktionstasten über EPROM 4-facti (Mlegbei - 7 Funktionstasten über Tastatur frei definierbar - separater Cursorblock - Cursorsteuerung unter DOS und CP/M aktiv - Caps Lock - Neigungswinkel einstellbar - komplett mit Seriell-parailel-wandelbarem KnbAt direkt austauschbar mit Standard-Tastatur Interfaces/Tastaturen 198. MUSICAL-CARD DM 99.00 CLOCK-CARD (Time II) DM 99,00 RS 232 INTERFACE DM 89.00 DISK-CONTROLLER DM 69.00 16kRAMCARD DM 50.00 LANGUAGE-CARD DM 60.00 80 ZEICHEN 64 kB RAM nur Ile DM 79.00 CÜMMUNIKATION OAHD dm 99,00 StlP^a-PAnALLEb'CAnD DM 200.00 PAR ALLEL-CARD DM 100.00 RGB-CARD DM 99.00 8088 CARD DM 300.00 MOTHERBOARD 64 kB RAM 6502/Z80 DM 280.00 MOTHERBOARD 48 kB RAM DM 250.00 TASTATUR MAK II DM 1 68 00 PICOTIPP TASTATUR deutsch DM 198,00 LIEFERUNG NUR SOLANGE VORRAT REICHT! ‘Apple ist ein eingetragenes Warenzeichen der Apple Computer Inc. picoircfi sigmaringer Straße 34 d-7798 pfullendorf telefon 0 7552/399 Peeker 6/86 41 Die ProDOS-Analyse Version 1.0.1, 1.0.2, 1.1.1 1985, 470 S., kart., DM 68,- von Arne Schäpers isbn 3-7785-1134-3 „Die ProDOS Analyse“ ist die umfangreichste und detail¬ lierteste Darstellung, die jemals ein Apple-Betriebssystem erfahren hat. Wer die „Innereien“ von ProDOS bis zum letzten Byte, z. T. bis ins letzte Bit kennenlernen möchte, braucht dieses Buch. Das komplette Betriebssystem (Urla¬ der, MLI, Disk-Driver, RAM-Disk-Driver und Uhr-Routine) mit Ausnahme des BASIC-SYSTEM wird mit umfangrei¬ chen Kommentaren und Übersichtstabellen disassem- bliert. Dabei werden alle bisherigen Versionen von 1.0.1 bis 1.1.1 berücksichtigt. „Die ProDOS-Analyse“ be¬ schreibt erstmals auch mehrere Programmierfehler, die bis in die neueste Version zu finden sind. Auch die nicht im „Technical Reference Manual“ aufgeführten Eigenschaften von ProDOS werden analysiert und beschrieben, z. B. die vertrackten eingebauten Testroutinen zur Identifikation der verschiedenen Apple-Il-Modelle und eventueller Nachbau¬ geräte. Programmierer, die ProDOS versionsabhängig „patchen“ möchten, erhalten hier den genauen Überblick, wo was geändert werden muß, damit dies keine negativen Konsequenzen hat. Durch die minutiöse theoretische Se- zierung von ProDOS eröffnen sich völlig neue program¬ mierpraktische Perspektiven. Dr. Alfred Hüthig Verlag • 6900 Heidelberg • Postfach 102869 {Listing 1: Unit SuperDump} unit SuperDump; intrinsic code 26; interface type CtrlStr = string [15]; CtrlBlk = record Finit : CtrlStr: Pline : CtrlStr; Plfl : CtrlStr; Pexit : CtrlStr end; {CtrlBlk} Dumptype = record CtrlAdr integer; Impression 0. .2; XOR 0..255; Direction 0. .1; Frame 0..1; PicAddr integer; Rfactor integer; Rdistance integer; Le ft 0..559; Right 0,.559; Top 0..191; Bottom 0 .191; Xfactor 1..31; Yfactor 1. .31; Hires560 0..1; AutoLF 0. .1; DiffPics 1, .8; Needle 0.A: Comptype 0. .2 end; {Dumptype} procedure Dump (DumpParams : Dumptype); procedure MoveAuxMain; procedure MoveMainAux; procedure Convert560; procedure Convert280; procedure SetDefault (var DumpParams ; Dumptype); procedure GetGrafBytes (DumpParams : Dumptype; var Bytes ; integer; var Bytestr : string); function Adr (var AnyVariable) : integer; j i t f Implementation {$C unit SuperDump von Juergen Geiss} {$!-} {$R-} type Paramtype = record CtrlBlk 0- .1024; CtrlAdr integer; Impression 0- -2; XOR 0. .255; Direction 0- .1; Frame 0. .1; PicAddr integer; Rfactor integer; Rdistance integer; Le ft integer; Right integer; Top 0. .191; Bottom 0. . 191; Xfactor 1. .31; Yfactor 1. .31; Hires560 0. . 1; AutoLF 0. .1; DiffPics 1. .8; Needle 0. ,1; Comptype 0. .2; Command 0. .4 {0 = dump 1 = Aux $2000 -> Main $4000 2 = Main $4000 -> Aux $2000 3 = convert 560 -> 2*280 4 = convert 2*280 -> 560} end; {Paramtype} { - } procedure CallDump (Params : Paramtype); external; {- - -—-} procedure Dump (DumpParams : Dumptype); var Params : Paramtype; begin {Dump} with Params do begin CtrlBlk - 0 ; CtrlAdr » DunpParams.CtrlAdr^ Impression ^ DuiipPa r&ms. lapressi on ; XOR = BunppäraDs.XOR:; Direction « DumpFarans.DireotiOfil Frame =■ DumpFuramS-FraflKj; PicAddr = DiuBpFiirams. PicAddr: Rfactor = DmapFarajEB-Rractor; Rdistance ^ DumpPüiram^.Rdistance; Le ft “ DumpParams . La ft ia&d? + DumpFarama.Lsft div 7 • 056: Right DuBäpPftrams .Rigtit mod 7 + DumpFaraoLs.Right div 7 • 256: Top = DumpFarama.Top; Bottom ** DumpParams , Bottoai ; Xfactor - DumpParams, X fact d r; Yfactor = DumpParams .Y f ao 10 r ; Hires560 « DuiEfpParams.Hlrdsi5e0: AutoLF » PumpFarams.AutcLP; DiffPics ^ DumpParams.OlffPiGs; Needle = DampParains.Keadle; Comptype - DunpParains.Cdmplypd,' Command « 0 end; {with} CallDump (Params) end; {MoveAuxMain} procedure MoveAuxMain; var Params : Paramtype; begin {MoveAuxMain} Params.Command := 1; CallDump (Params) end; {MoveAuxMain} procedure MoveMainAux; var Params : Paramtype; begin {MoveMainAux} Params.Command := 2; CallDump (Params) end; {MoveMainAux} 42 Peeker 6/86 ■ _ '-J iiiiiaa»j^M _ßfc aO'ZelchiiR'KarlÄ t43,- Dlak-Iaterfefl _8^ m. SoU&wUch. fi ur f. llPlu$ komtot. Centronics-Inlerf. m. Kabel 79,— Speech-Karte 55.— Clock-Karte Komp 2E 797,- Apple 2E kompatible, Rechner 64K Epromme r 14. fl; 16 KJ für 2E kompatible -^cktun^ •^atoXjQnJ Öaräuf allt^Appte//-Besitzer schon lange gewartet. ■ ^ Jeüt Wgl^;<j|® Ftpppyklate zu. El nf.da'in flach cer e^rtschaJtefi, / vier BetricibkMystcme warten auf thr Komman<fo / (pp0> PfobOSJ V: , Wotj^ Pparii^Hnar kann das schon? ’CV fisph Pnalaen und BezugsqueUen und Ste slch.för S;— DM die Demo-Dlakatto. von: fRANK&BRlTTING I*;;.■ ittlilronäli Cfltttlciiiiing* ÖnibH ^ Lariflesif 4. PostNcti n? 3 . 75?0 Forsi TeJfr(ori 07^51 i 10 3öes - es. Die Hsrd<g«kconlroller-SpozlaHiten MEGABYTES MIT MEGA-CORE j^O/20 MBytes Im Apple® TTg ^ Wenn Sie ein Buch oder eine Software nicht bei uns finden, warum schreiben Sie diese nicht für uns? Zur Erweiterung unseres Verlagspro¬ grammes in den Sparten EDV und Elektro¬ technik suchen wir ständig Autoren, die wie wir »Qualität« und »Zuverlässigkeit« hoch einschätzen. Im Bereich Home- und Personal-Computer haben auch schreib¬ freudige Hobby-EDVIer die Möglichkeit, ihre besonderen Kenntnisse umzusetzen. Die Erfahrung eines renommierten Fach¬ buch-Verlages wird Ihnen schon beim Abfassen des Manuskriptes zu Nutze kommen. Und unsere Konditionen sind interessant. Sprechen Sie uns doch einmal ganz un¬ verbindlich an: Militärische Konfliktsimulationen mit bis zu 100 (!) Stunden Spieldauer. Die Herausforderung an jeden Strategiespieler. Farbinfo für APPLE gegen DM 0,80 Rückporto. Tliim4!S ]Wt?IJ.l!R COMPUTER—SERVICE Postfach 2526 7600 Offenburg fl PH II Dr. Alfred Hüthig Verlag II I—IfJ Abt. Buchverlag — ^ Postfach 10 28 69 Htitllig 6900 Heidelberg ProDOS-Editor Die ursprünglich geplante zusätzliche Version für 80-Zeichen- darstellung wird nicht mehr erscheinen. Der ProDOS-Editor wird daher nach wie vor in der 40-Z/Z-Version ausgeliefert Softbreaker als Quellcode Aus Gründen der geänderten Hardware-Interrupt- und Rese¬ troutinen funktionierte der Softbreaker, wie auch in der Anleitung angegeben, nur auf dem ursprünglichen Ile mit den alten ROMs und somit nicht auf dem llc (mit alten und neuen ROMs) und dem Ile mit neuen ROMs. Da jetzt vermehrt die neuen Ile-ROMs eingesetzt werden, werden ab sofort die Manuals des Softbrea¬ kers zum Preis von DM 20.- (ursprünglich DM 48,-) mit einer neuen Diskette vertrieben, die 2 Objektcode-Vananten sowie zusätzlich den kompletten Quellcode enthält, da man die neuen Ile-ROMs oft überlisten kann, indem man absolute Einsprünge ($C600 usw.) benutzt. Wer nach dem 1 1,86 den Softbreaker re¬ gulär bestellt hat, erhält die neue Diskette kostenlos nachgelie¬ fert, wenn die kostenlose Nachbestellung bis zum 30.6,86 beim Hüthig Software Service eingeht. Applesoft-Editor mit Merge-Befehl Der als Treue-Prämie für Fortsetzungsbezieher erhältliche Apple¬ soft-Editor namens MACROEDITOR auf der Sammeldisk #16 hat einen zusätzlichen Befehl, der in der Anleitung in Peeker, 4/ 86, S, 13 nicht erwähnt wurde Mit NEW LOAD HAUPTPROGRAMM &R1,1 (nur bei Zeilenkonflikten) &P kann man das Hauptprogramm in einen Schutzbereich überneh¬ men, wonach man mit LOAD UNTERPROGRAMM &R1000,1 (nur bei Zeilenkonflikten) &M Unterprogramm und Hauptprogramm vereinen („morgen“) kann. Wer extrem überlange Zeilen editieren muß, kann den LIST-Be- fehl vorübergehend patchen (LG erforderlich!): ü CALL -151 * 0081 C081 * DOOO <D000,FFFFM * C083 0083 ^ D748:0C (statt 07; Space vor Token) * D762: A4 85 DO AC (statt A9 20 DO 98; Space nach Token) * D70B; 40 12 D7 (statt 20 FB DA; Poke-33,33-Patch) * Ctrl-C ü K -F Zeilennummer Hüthig Software Service Postfach 102869 6900 Heidel¬ berg 1 I Peeker 6/86 43 procedure Convert560; var Params : Paramtype; begin {Convert560} Params.Command := 3; CalIDump (Params) end; {Convert560} - — --- ----- —) procedure Convert280; var Params : Paramtype; begin {Convert280} Params.Command ;= 4; CalIDump (Params) end; {Convert280} i --—-} procedure SetDefault {var DumpParams : Dumptype}; begin (SetDefault) fillchar (DumpParams, size_of (DumpParams), 0); with DumpParams do begin PicAddr := 8192; Rfactor := 1; Right := 279; Bottom := 191; Xfactor := 1; Yfactor := 1; DiffPics ;= 1 end (with) end; {SetDefault} I-----} procedure GetGrafBytes {DumpParams : Dumptype; var Bytes : integer; var Bytestr : string}: var B : integer; I : integer; begin {GetGrafBytes} with DumpParams do begin if Direction = 0 then B := Xfactor * (Right - Left + 1) eise B ;= Yfactor * (Bottom - Top + 1); B := (B + Rdistance) * Rfactor * DiffPics; B := abs (B) mod 10000; Bytes := B; Bytestr := '0000'; for I := 4 downto 1 do begin Bytestr [I] ;= ehr (ord ('0') + B mod 10); B := B div 10 end {while} end {with} end; {GetGrafBytes} {-----—-J function Adr {(var AnyVariable) : integer}; external; {-} begin {SuperDump} {keine Initialisierung notwendig} end {SuperDump}. (Listing 2: Program Print, Epson-Ver- sion} program Print; uses TurtleGraphics, SuperDump; const ESC = 27; var CtrlBlock : CtrlBlk; DumpParams : Dumptype; S : String; Bytes : integer; begin {Print} Initturtle; moveto (0, 0); pencolor (white); moveto (279, 191); moveto (0, 191); moveto (0, 0); SetDefault (DumpParams); DumpParams.CtrlAdr := Adr (CtrlBlock); GetGrafBytes (DumpParams, Bytes, S); with CtrlBlock do {EPSON} begin Pinit := '-3-'; Pline := '-K— Plfl := '-J-'; Pexit := '-2'; Pinit [1] := ehr (ESC); Pinit [3] := ehr (23); Pline [1] := ehr (ESC); Pline [3] := ehr (Bytes mod 256); Pline [4] := ehr (Bytes div 256); Plfl [1] ;= ehr (ESC); Plfl [3] := ehr (1); Pexit [1] := ehr (ESC); end; {with} Dump {DumpParams) end {Print}. {Listing 3: Program Print, imagewriter- Version} program Print; {Imagewriter-Version} uses TurtleGraphics, SuperDump; const ESC = 27; var CtrlBlock : CtrlBlk; DumpParams : Dumptype; S : String; Bytes : integer; begin {Print} Initturtle; moveto (0, 0); pencolor (white); moveto (279, 191); moveto (0, 191); moveto (0, 0); SetDefault (DumpParams); DumpParams.CtrlAdr := Adr (CtrlBlock); DumpParams.Needle := 1; DumpParams.Comptype := 1; {fuer Apple Ile mit SSC} {DumpParams.Comptype := 2; {fuer Apple IIc mit SSC} } GetGrafBytes (DumpParams, Bytes, S); with CtrlBlock do {Imagewriter} begin Pinit := '-T16->'; Pline := concat ('-n-G', S); Plfl := "; Pexit := '-<-A': Pinit [1] := ehr (ESC); Pinit [5] := ehr (ESC); Pline [1] 7^ ehr (ESC); Pline [3] ;= ehr (ESC); Pexit [1] ehr (ESC); Pexit [3] ;= ehr (ESC); end; {with} Dump (DumpParams) end {Print}. 44 Peeker 6/86 rrrrr deeUer " Böi^e Gelegenheitsanzeigen Sie können unter dieser Rubrik zu einem besonders günstigen Preis • Ihre Hardware und Software verkaufen • Ihre Hard- und Software suchen • Kontakte knüpfen und vieles mehr Musteranzeige privat 1 Druckzeile ä 32 Buch¬ staben nur DM 5,50 zuzügl. ges. MwSt. Mindestens 2 Druckzeilen Beispiel: Verkaufe neuwertigen Typenrad¬ drucker mit Appie-Interface. Preis auf Anfrage. Tel. 007 nur DM 18,81 inkl. MwSt. Musteranzeige gewerblich 1 Druckzeile ä 32 Buch¬ staben nur DM 11,- zuzügl. ges. MwSt. Mindestens 2 Druckzeilen Beispiel: Neu im Angebot: Professionelle, separate Tastatur für Apple II plus 16 Funktionstasten und separatem Ziffernblock. Fa. Keyboard & Co. nur DM 62,70 inkl. MwSt. -f^-f-f-f-fREEkER^ o K> BQ 1 AUFTRAG FÜR KLEINANZEIGEN Bitte veröffentlichen Sie in der nächsterreichbaren Ausgabe nachstehenden Text unter folgender Rubrik: □ suche Hardware □ suche Software □ Verschiedenes □ biete Hardware □ biete Software □ Chiffre 0) 4> O (L Bitte jeweils 32 Buchstaben pro Zeile—einschließlich Satzzeichen und Wort¬ zwischenräume. Bitte Absender nicht vergessen. Mindestens 2 Zeilen. Chiffregebühr DM 6 - zuzügl. MwSt. -M-f-f-f-fREEkER^ ■S £ Zu der im Peeker, Heft. Seite. . erschienenen Anzeige über ■ s 3 ■ö 2 a, bitte ich um detaillierte Information. Ich wünsche □ Prospekt, Datenblatt □ Preisliste □ schriftliches Angebot □ tei. Rückruf Menge Produkt und Bestellnummer ÄDM gesamt DM gebe ich neben¬ stehende Bestellung unter Anerkennung Ihrer in der Anzeige genannten Liefer- und Zahlungsbedingungen auf. Unterschrift (für Jugendliche unter 18 Jahren der Erziehungsberechtigte) ^ ^^^^REEkER^ •2 £ I «s c Schreiben Sie uns, wenn Sie technische Fragen zu Aufsätzen im Peeker haben. Beachten Sie jedoch, daß die Redaktion keine Auskünfte über Be¬ zugsquellen erteilt: Info -Karte ^ Produkt-Karte ^ Peeker- Börse VorrujiTie, Man» Rrma POSTKARTE Straße Wohnort PLZ/Ort Bitte veröffentlichen Sie den um¬ stehenden Text von_Zellen ä _DM in der nächsterreich¬ baren Ausgabe vom Peeker Bei Angeboten: Ich bestätige, daß ich alle Rechte an den angebotenen Sachen besitze Peeker-Börse Anzeigen-Service Dr. Alfred Hüthig Verlag Postfach 10 28 69 6900 Heidelberg 1 üdliim ÜoJorwhrlli .44444 Produkl'- Karte Wünschen Sie weitere Informatio¬ nen zu einer der im Heft erschienenen Anzeigen? Karte bitte vollständig ausfüllen Vornama, Name Firma POSTKARTE Nichts einfacher ais das. Produkt-Karte ausfülien, frankieren und an den Inserenten (nicht an die Peeker-Redaktion) senden. Sifoßc (nserenl PLZ/Oft Straß« Telefon mit Vorwahl Anschrift der Firma angeben, bei der Sie bestelien bzw. von der Sie Informationen wünschen ieV en y PLZ/on Karte bitte vollständig ausfüllen Vcrnamo, Name POSTKARTE Firma Straße PLZ/Ort Telefon mit Vorwahl Peeker Redaktion Dr. Alfred Hüthig Verlag Postfach 10 28 69 6900 Heidelberg 1 Vorher aber nicht vergessen: Kreuzen Sie an, weichen Informations¬ wunsch Sie haben. Damit erleichtern Sie dem Hersteller eine gezielte Beant¬ wortung Ihrer Anfrage Zum Schluß tragen Sie auf der Rück¬ seite die genaue Anschrift des Inserenten und Ihren Absender ein. pEEkER ^kyAN^ m m m m B m m m m von Ulrich Stiehl 1. Kinderkrankheiten Nachdem ich mich nun seit mehreren Wochen mit der Version 2.0 von Kyan-Pascal befaßt habe, kann ich nicht umhin, auf einige Unzu¬ länglichkeiten hinzuweisen. Berücksichtigt man, daß man für ca. DM 170,- einen ca. 420 Seiten dicken Ordner sowie 2 beidseitig bespielte Dis¬ ketten mit dem eigentlichen Kyan-Pascal, dem Kix-System und dem kompletten ProDOS (PRODOS 1.1.1 einschließlich BASIC,SYSTEM 1.1) erhält, welch letzteres allein ca. DM 170,- kostet, dann leuchtet ein, daß man viel Ware fürs Geld bekommt, insbesondere wenn man an Apple-UCSD-Pascal denkt, das nach wie vor ca. DM 900,- kostet. Turbo-Pascal 3.0 muß man gesondert sehen, denn es kostet zwar mit ca. DM 280,- nur ca. DM 100,- mehr als Kyan- Pascal 2.0, doch muß man die Z80-Karte mit CP/M für ca. DM 1000,- gesondert erwerben. Kyan 2.0 ist mithin das preiswerteste Pascal- System für den Apple II. Bei der nachfolgenden Kritik muß man also stets im Auge behalten, daß man von einem derart günstigen Pascal-System keine Wunder erwarten kann. Der in vielerlei Hinsicht professionelle Eindruck, den Kyan-Pascal 2.0 hinterläßt, wird durch eine Reihe von elementaren Schlampereien getrübt. Die Kyan-Entwickler kommen mir manchmal vor wie hervorragende Dichter, die der Recht¬ schreibung entraten. Bei dem Vers The seed you sow another reaps, the wealth you find another keeps sind Form und Inhalt in Harmonie. Überspitzt formuliert, hätten die Kyan-Leute hier gedichtet The seed you though another reaps, the Wells you find another keeps womit der Spruch völlig entstellt worden wäre. 1.1. Benutzerkomfort Der Benutzerkomfort von Kyan-Pascal läßt manches zu wünschen übrig. Einige Beispiele: - Der Editor ED nimmt korrekterweise nur Text¬ files an, doch den Modulen PC und AS kann man auch Binärfiles anbieten, womit natürlich nur Schrott compiliert bzw. assembliert wird. Es hätte nur weniger Bytes bedurft, um diesen Fehler über die ohnehin benötigte Get-File-In- fo-Routine abzufangen. - Der Assembler AS läßt eine Korrektur zu, wenn man sich vertippt hat, die Moduls ED und PC hingegen nicht. Gibt man z.B. PC — ein^ dann wird erst der immerhin 55 Blöcke umfassende Pascal-Compiler eingeladen und sodann prompt wieder verlassen. Das gleiche gilt für alle Kix-Module. Ich verkenne nicht, daß etwa CP/M dieselben Schwächen hat, z.B. bei der Eingabe von PIP — Doch wenn man bedenkt, daß heute bereits Computer wie etwa der Macintosh gebaut wer¬ den, die selbst Lesebehinderte auf Bedie¬ nungsfehleraufmerksam machen können, dann scheint ein etwas größerer Komfort beim Error- Handling angebracht. Bei den nicht gerade kompakten Kyan-Modulen müßte hierfür noch Platz sein. 1.2. Apple-Versionen Es steht außer Zweifel, daß Kyan-Pascal 2.0 vor dem Verkauf nicht auf den angegebenen Gerä¬ tekonfigurationen getestet worden ist. Einige Beispiele: - Jedermann außer den Kyan-Entwicklern weiß, daß eine Videx-Karte keinen Home-Befehl (JSR $FC58) akzeptiert, sondern statt dessen CtrI-L verlangt. Folglich sehen Apple-Il-Besitzer mit einer Videx-Karte gelegentlich Schrott auf dem Monitor, weil der Bildschirm nicht gelöscht wird. Die Firma Apple selbst kümmert sich zwar auch nicht um CtrI-L, wie jeder Videx-Besitzer nach¬ prüfen kann, wenn er unter dem BASIC.SY¬ STEM den BYE-Befehl aufruft, doch dies steht auf einem anderen Blatt. - An Apple-Il-Besitzer ohne Kleinschreib-Um- rüstsatz wurde nicht gedacht, denn alle Menü- Texte erscheinen in Kleinschreibung. - Verschiedene Kix-Module, z.B. LPR, kann man, wenn eine Datei nicht existiert, nurverlas- Peeker 6/86 47 I APPLE & CP/M-80 & MS-DOS SOFTWARE & HARDWARE z. B. lür APPLE II und Kompatible Wir liefern die RAM-Karte (AE) für den Apple Ile mit max, 3 MB (Appleworks mit mehr als 2 MB)! 64-K-Ausf. ... .DM 650- Spee Demon 3.56 MHz Coproz, für ll+/e (McT^ ... DM 700,- Anpassung für APPLEWORKS 1 2 au! dem ll+/e Original APPLE oder mit externer Tastatur in deutsch für SATURN 128K und IBS AP 33 1 MB!! ... DM 170,- UPC-Programmer-Card 2716-128 komfortabel . . . .DM 580.- 72 I/O Port Card programmierbar DOS-(-CP/M ... .DM 350,- AD 16 Ch, 12 Bit. schnell! (Applied Eng.) , . DM 1150,- PKASO/U-Printer-Karle (IS) . .. DM 550,- CP/M-Plus-Card, 6 MHz, 64K, CP/M 3.0 (ALS) .... DM1150,- Timemaster II H. 0., die Uhrenkar1e!(AE} ...... DM 540.- ELF kompl. Statistik-Software (TWG) ........ DM 800,- Prime-Piotter-Grafik-Software (Primesoft) .... DM 900,- Z-RAM 512 K für APPLE llc (AE) .. DM 1250,- 2 . B. für IBM und Kompatible APPLE Turnover (Vertex) Lesen/Schreiben von Apple Disks im IBM PC & Komp. ..DM 1200,- XENO-COPY plus (Vertex) Lesen/Schreiben div, CP/M & MS-DOS Formate im IBM ...DM 600,- ELF PC kompl. Statistik Software (TWG) , . . , DM 800,- PROM Blasler 28-Pin (Apparat Inc).DM 620,- Z.B. für alle Systeme Prinlerchanger 3 parall Drucker auf 1 Micro inkl. Kabel/Neuteil (Keyzone) . , ...... .DM 570,- Printersharer 3 Micros auf 1 parall Drucker inkl Kabel/Netzteil (Keyzone) DM 460,- Shufflebuffer 64K (IS) ■. ... DM 1250,- Wir sind Import-Spezialisten und bieten Ihnen eine große Auswahl an Soft¬ ware und Hardware bedeutender Hersteller aus den USA und England Informationen gegen DM 3,- in Briefmarken, WEISSCOMPUTER Dipl.-Psych. Karl-Heinz Weiß Am Wiesenhof 17, 2940 Wilhelmshaven, Tel. 04421/183179 sen, wenn man die Esc-Taste drückt. Dies geht jedoch bekanntlich nicht beim Ile wegen eines Bugs in den ursprünglichen ROMs. Auch dies wurde von den Kyan-Entwicklern niemals aus¬ probiert. Aus all diesen Gründen hätte man deshalb in der Kyan-Anleitung klarstellen müssen, daß einige Module nur auf dem Apple Ile mit den neuen ROMs funktionieren. (Neueste Informa¬ tion It. Telex vom 15.5.86: Die Firma Videx kümmert sich jetzt selbst um die Videx-Kompa- tibilität.) 1.3. Debugging In der Anleitung heißt es vollmundig „Kyan Pascal has been tested for conformance to the ISO Pascal Standard“. Dies stimmt nicht. Zwei Beispiele; PROGRAM CONSTBUG; CONST C = 'A'; BEGIN WRITELN (ORD(C)) END. Z SO + Card Die leistungsfähige und vielseitige Z80 Karte fui Ihren Apple II naiawaio . -(-ALS CP/M-Card- und (!) SoftCard-kompatibel. -^8MHz Taktfrequena (ohne Waitzyklen) - dadurch werden Programme bis zu 4x schneller als bis¬ her (2MHz Taktfrequenz im SoftCard-Modus). -(-Interrupts sind für die beiden Betriebsmodi der Z80-I- Card getrennt zu- und abschaltbar. Software : -»-CP/M 2.20/2 23 Pseudodisktreiber, der die eigenen 64K RAM der Z80+ Card im SoftCard-Modus nutzt H-CP/M-Patch generiert aus Ihrem SoftCard CP/M 2.20 ein CP/M 2.2 für den schnellen Taktmodus der Z80-H Card mit überragenden Eigenschaften : Bis au 4x schnellerer Disk-Zugriff (Read), inte¬ grierte Pseudodisk mit 32/48/llOK bei einem Apple mit 48/64/128K RAM, Unterstützung von Disk-Laufwerken bis 640K an den verschiedensten Controllern, Unterstützung der gängigsten RAM- Karten als Pseudodisk, schnelle Bildschirmaus¬ gabe, bedienerfreundlich durch neue und erwei¬ terte Befehle in der Kommandoebene, 58K TPA. -•-Der Preis : 696.— DM (- 610,53 DM ohne Mwst) Uwe ZimmermanD - Miciocomputereutwicklungen Schwalbenstiaße 30 — 6090 Russelsheim Telefon : 06142 / 56 34 56 Selbst ein Primitivtest in der Art des Programms KYANKURS (Peeker, Heft 2/85, S. 61 ff.), das jeden der Grundbefehle exemplifiziert, hätte so¬ fort offenbart, daß der Compiler allen Char- Konstanten den Wert CHR(1) zuweist. Das De¬ mo CONSTBUG ergibt immer 1, gleich welches Zeichen man C zuweist. Folglich funktioniert auch der CASE-Befehl mit Char-Konstanten nicht. WRITELN (’A’) funktioniert natürlich. Wür¬ de man in P.OUT an den entsprechenden Stel¬ len Jcw 1 durch Jcw -l- Ascii-Code der Char- Konstanten ersetzen, dann würde der CASE- Befehl später in A.OUT korrekt funktionieren. Der Bug liegt also am Compiler. PROGRAM REFBUGj VAR I,J: FILE OF INTEGER: BEGIN {Mehrfaches Rewrite wäre okay} REWRITE (I, ’/RAM/I'); {Ref-No 1} REWRITE (J. ’/RAM/J'); {Ref-No 2} {Mehrfaches Reset geht nicht) RESET (I, '/RAM/I'): (Ref-No 1} RESET (J, '/RAM/J’i; {Ref-No 2} {Hier Abbruch bei END-Routine} END. Auch diesen sog. File-Reference-Bug, der z.B. bei dem Programm FILEDEMOS (Peeker 3/86, S.44) oder dem obigen REFBUG zutage tritt, hätte man mit Primitivtests finden müssen. Ich vermute, daß der Bug in der Library LIB zu suchen ist. _I EQU 22 ;_U EQU 22 In dem Include-File HIRES.l wurde statt _l fälschlicherweise _U getippt. Auch dieses Mo¬ dul ist folglich vor dem Verkauf von Kyan 2.0 nicht mehr ausprobiert worden. Nun muß man natürlich wissen, daß auch Tur- bo-Pascal 2.0 und Apple-Pascal 1.1 ursprüng¬ lich zahlreiche Bugs aufwiesen, die erst in späteren Versionen nach und nach beseitigt wurden. So enthält etwa das Addendum zu Apple-Pascal 1.2 auf den Seiten 77-81 eine lange Liste von Fehlern, die die Apple-Pascal- Entwickler selbst gefunden haben, von den nicht-erwähnten Unzulänglichkeiten ganz zu schweigen (z.B. Stack-Overflow-Bug u.a.). Erfreulicherweise arbeitet man bereits an der Kyan-Version 2.0.2, die u.a. die beschriebenen Fehler beheben soll. 2. Reset-Tips Wenn man unter Kyan-Pascal CtrI-Reset drückt, wird - wie auch in UCSD- und Turbo-Pascal - neu gebootet. Dies ist lästig, weil dadurch der Inhalt der 64K-RAM-Disk des Apple lle/c von ProDOS frisch initialisiert wird. Es bieten sich zwei Lösungsmöglichkeiten an: a) Man patcht das sog. RAM-Disk-lnitflag (s. „A.Schäpers, ProDOS-Analyse“, S. 297), wo¬ von jedoch im allgemeinen abzuraten ist. b) Man baut in sein Pascal-Programm die fol¬ gende Prozedur ein, die man im laufenden Pro¬ gramm e/nma/aufruft. PROGRAM RESETDEMO; VAR C:CHAR; (_-) PROCEDURE RESETVEKTOR; BEGIN #A JMP B00T3 BOOTl CLD JSR $BF00 ;Reboot-Befehl DB $65 DW B00T2 B00T2 DB $04 B00T3 LDA t>B00Tl ;Reset-Vektor STA $03F2 LDA *<B00T1 STA $03F3 EOR #$A5 STA $03F4 # END; - —--- ^1 BEGIN WRITELN ('Ctrl-Reset druecken!'); RESETVEKTOR; READLN (C) END. Um diese Prozedur zu verstehen, muß man etwas über die Restart-Routine wissen, die als Bestandteil des KIX.SYSTEMS in die Language- Card ab $D100ff. geschoben wird, wo sich zu¬ vor die Reboot-Routine von PRODOS befand. Wenn man über das ProDOS-MLI (siehe obige Reset-Prozedur) oder unter dem BASIC.SY¬ STEM überden BYE-Befehl die Reboot-Routine aufruft, so wird der Reset-Vektor auf $1000 gelegt, die Reboot-Routine selbst nach $1000 geschoben und die Eingabe eines SYS-Files erwartet, der dann geladen wird, z.B. der FILER oder das BASIC.SYSTEM. Bitte probieren Sie zunächst den BYE-Befehl aus, falls Sie ihn noch nicht kennen sollten. Verläßt man nun ein Kyan-Programm über die eigentlich erwartete Reboot-Routine, so wird in Wirklichkeit die Restart-Routine von $D100ff. nach $1000ff. geschoben. Diese Restart-Routi¬ ne enthält selbst ein 512 Bytes umfassendes Menü-Programm, das nach $BC00-$BDFF ge¬ schoben und über JMP $BC00 gestartet wird. Es erscheint dann der übliche %-Prompt, und man kann nun ED, PC, FILER, BASIC.SYSTEM usw. laden. Setzt man nun in einem eigenen Kyan-Pro¬ gramm den Reset-Vektor dergestalt, daß nach Ctrl-Reset scheinbar Reboot ausgeführt wird, so gelangt man in der geschilderten Weise wie¬ der zum %-Prompt, wie dies auch automatisch der Fall ist, wenn ein Kyan-Programm regulär über „END.“ verlassen wird. 48 Peeker 6/86 Zusammenfassung (1) Das KIX.SYSTEM verschiebt Restart nach $D100ff. und entfernt damit das ursprüngliche Reboot. (2) Der MLI-Reboot-Befehl setzt den Reset- Vektor auf $1000 und verschiebt Restart nach $ 1000 . (3) Restart enthält das Menü-Programm und verschiebt es nach $BC00-$BDFF und springt dann selbst nach $BC00, womit der %-Prompt erscheint. (a) Ein auf den MLI-Reboot-Befehl gerichteter Reset-Vektor im eigenen Pascal-Programm in¬ itiiert nach CtrI-Reset die Routinen (2) und (3). (b) Drückt man jedoch danach erneut CtrI-Re¬ set, so wird gebootet, weil die Restart-Routine den Reset-Vektor zerstört. Man könnte dies pat- chen, wie im Kyan-Rundschreiben #2 von ei¬ nem Club-Mitglied angegeben wurde, doch funktioniert dies nur dann, wenn gerade ein eigenes Pascal-Programm über „END." verlas¬ sen worden ist. Nach PC und AS geht dies nicht, weil diese Programme aus unerfindlichen Gründen je eine Kopie vom späteren $BC00- $BDFF-lnhalt enthalten, der ohne die Restart- Routine direkt dorthin verschoben wird. PC und AS werden also mit JMP $BC00 verlassen. 3. Bit-Map-Tips Die System-Bit-Map markiert diejenigen Pages (Speicherseiten), die für ProDOS tabu sind, d.h. in die keine Daten von Diskette geladen werden dürfen. Entgegen meiner ursprünglichen Ver¬ mutung gehört es zu den Schlampereien des KIX.SYSTEMS, daß es die Bit-Map nicht ändert oder wenigstens normalisiert, was sonst bei jedem SYS-Programm der Fall ist. Die ProDOS-Reboot-Routine würde den Spei¬ cher $0800-$BEFF (sowie darüber hinaus $0200-$03FF) automatisch freimachen, doch sieht die Kyan-Restart-Routine hierfür nichts vor. Booten Sie eine ProDOS-Systemdiskette mit dem BASIC.SYSTEM, legen Sie die Kix- Diskette ein und machen Sie dann folgendes Experiment: Ü BLOADKIX.SYSTEM,A$2000.TSYS Ü CALL-151 * 1000:0 * 1001<1000.10FFM *0200<1000.10FFM ^ 2000G % PROGRAM „PROGRAM" sei ein beliebiges Programm. Sie erhalten nun mit Gewißheit die MLI-Fehlermel- dung $56 (= System-Bit-Map-Konflikt), weil PROGRAM versucht, LIB in den Bereich $9000-$BEFF einzuladen, was jedoch das MLI nicht zuläßt, weil die Bit-Map noch die Belegung des BASIC.SYSTEMS aufweist. Sie werden sich nun jedoch fragen, weshalb man trotzdem das KIX.SYSTEM vom BASIC.SYSTEM aus mit Ü -KIX.SYSTEM starten kann. Des Rätsels Lösung: Der Strich- Befehl normalisiert die Bit-Map, wenn er einen SYS-Fiie vorfindet (gilt nicht für BIN-Files usw.) Um nun diesen Bit-Map-Fehler zu beheben, verankern wir in der Kyan-Library namens STDLIB.S folgende Routine, wobei wir bei Be¬ darf gleichzeitig noch den List-off/on- und evtl, den Macros-off/on-Befehl elnfügen, damit der Assembler AS im Falle der List-Option (-L) nicht immer die stets gleichbleibende Library listet. Danach können wir jedes compilierte Kyan-Pro- gramm, gleichviel ob BIN- oder SYS-Fiie, vom BASIC.SYSTEMausmIt -PROGRAM starten, denn die Bit-Map-Normalisierung wird direkt vor dem Laden der Kyan-Library (LIB) ausgeführt. LST OFF ;STDLIB.S nicht listen „lib equ $9000 jfolgt LST OFF : usw. bis. LST ON ;jetzt wieder listen MEX OFF ;ohne Makros —Start Idx txs #$ff ;Programmanfang ;Bit-Map tabu: + J$0400-$07FF + $BF00-$BFFF CLD LDA #0 LDX #$59 BM00 STA _MLI,X INX CPX #$6F BNE BM00 LDA #$CF j%11001111 STA $BF58 LDA #$01 ;%00000001 STA $BF6F ;Ab hier normal weiter; jsr „LoadPascalLibrary 4. Präfix-Tips Die Präfix-Konventionen von Kyan-Pascal dürf¬ ten Anfänger und Fortgeschrittene gleicherma¬ ßen verwirren, denn es fehlt Ihnen eine konse¬ quente Linie. Leider schweigt sich das Manual über die Präfix-Regeln aus, so daß wir etwas weiter ausholen müssen. Wir gehen dabei für unsere Erörterungen von den Prämissen aus, daß 1. ein Subdirectory namens /RAM/BIN und 2. ein momentanes Präfix (= Ersatz-Präfix = Default-Präfix) namens /K existieren. Man beachte dabei, daß /RAM/BIN keine RAM- Disk sein muß, denn Analoges gilt auch für Festplatten und Disketten mit dem Subdirectory /RAM/BIN, wobei jedoch /RAM ein Volume- Directory sein muß. Die Regeln gelten also nicht für /K/RAM/BIN usw. Ferner beachte man, daß das willkürlich gewählte Ersatz-Präfix /K auch z.B. /K/SUBDIR o.ä. heißen könnte, d.h. es muß kein Volume-Directory sein. Doch vorab die Präfix-Konventionen des BASIC.SYSTEMS unter den obigen Prämissen: (a) Wenn man „-STARTUP“ eingibt, so ent¬ spricht dies dem Befehl „-/K/STARTUP“, d.h. das Ersatz-Präfix wird automatisch hinzugefügt. Wird nun STARTUP nicht in /K gefunden, so erfolgt direkt die Fehlermeldung „File not found“: eine weitergehende Suche in anderen Directories findet nicht statt. (b) Wenn man „-/K/STARTUP" eingibt, so ist das Ersatz-Präfix mit dem vorgegebenen Präfix identisch, so daß die in (a) beschriebene Suchroutine initiiert wird. (c) Wenn man „-/RAM/BIN/STARTUP" eingibt, so werden alle angeschlossenen Volumes nach dem vorgegebenen Präfix /RAM/BIN abge¬ sucht, und eine Fehlermeldung erfolgt erst* dann, wenn /RAM/BIN in keinem Volume-Di- rectory enthalten ist. (d) Wenn man „-BIN/STARTUP“ eingibt, so wird das Subdirectory /K/BIN nur in /K gesucht, also nicht etwa zusätzlich in /RAM. Fazit: Ein vollständiger Pfadname, der mit „/" beginnt, wird in allen Volumes gesucht, ein un¬ vollständiger Pfadname, der nicht mit „/“ be¬ ginnt, dagegen nur im Ersatz-Präfix. Dabei be¬ zeichnen wir als Präfix-Directory dasjenige Di¬ rectory, das durch das vorgegebene Präfix (bei -/RAM/BIN/STARTUP ^ /RAM/BIN) oder das Ersatz-Präfix (bei -STARTUP ^ /K/) bestimmt ist. Den Sonderfall eines Null-Präfixes klam¬ mern wir hier aus, da in diesem Fall unter dem BASIC.SYSTEM die Ersatz-Slot/Drive-Parame- ter herangezogen werden. Nun zu den Präfix-Konventionen unter Kyan- Pascal: • Wenn man im KIX.SYSTEM-Menü ohne vor¬ gegebenes Präfix die Programmnamen % ED (steht auch für PC. AS. BASIC.SYSTEM usw.) % PROGRAM (steht für alle compilierten Kyan- Programme, die SYS- oder BIN-Files sein können) % KIX (steht für alle Kix-Utilities, z.B. LS usw.) eingibt, so werden diese Programme zunächst in /RAM/BIN gesucht, gleichviel ob das Ersatz- Präfix /RAM/BIN oder /K lautet. Werden die Programme im Subdirectory /RAM/BIN gefun¬ den, so werden sie direkt von dort gestartet. Werden sie jedoch dort nicht gefunden, so wer¬ den sie im Ersatz-Präfix-Directory /K gesucht. Werden sie auch dort nicht gefunden, so erfolgt die „File not found'‘-Fehlermeldung. • Wenn man m/Y vorgegebenem Präfix die Pro¬ grammnamen % /K/ED % /K/PROGRAM % /K/KIX eingibt, so werden die Programme direkt vom Directory /K gestartet, falls sie dort enthalten sind. Andernfalls erfolgt die „File not found"- Fehlermeldung, d.h. im Subdirectory /RAM/BIN wird in diesem Fall nicht mehr gesucht. 4.1. ED und PROGRAM.P Die Programme ED usw. laden meist weitere Dateien nach, so daß auch für diese Dateien die Präfix-Konventionen zu erlernen sind. ED (= Kyan-Editor) lädt den spezifizierten Text¬ file (mit Suffix .P), also PROGRAM.P. aus dem Präfix-Directory nach und speichert ihn nach Verlassen des Editors wieder dort zurück. % ED PROGRAM.P sucht zunächst ED im Subdirectory /RAM/BIN, falls dort nicht gefunden, in /K; falls dort auch nicht gefunden -4* Fehlermeldung. Dann wird PROGRAM.P von /K (und nicht zuerst von /RAM/BIN!) zu laden versucht; falls dort nicht gefunden Fehlermeldung. % ED/K/PROGRAM.P sucht zunächst ED wie oben. Dann wird PRO¬ GRAM.P direkt von /K zu laden versucht; falls dort nicht gefunden ^ Fehlermeldung. % /K/ED /K/PROGRAM.P sucht ED direkt in /K und danach PROGRAM.P direkt in /K; falls nicht gefunden ^ Fehlermel¬ dung. Beim Verlassen des Editors überX (= Exit) wird PROGRAM.P in das Präfix-Directory zurückge¬ schrieben, falls man nicht über P (= Präfix) Peeker 6/86 49 einen anderen Pfadnamen (= Präfix-Directory -1- Dateinamen) spezifiziert. Halten wir also fest; Der erste Programmname nach dem „%“ wird immer zuerst in /RAM/BIN gesucht, falls kein Präfix mit Schrägstrich, also kein vollständiger Pfadname, angegeben wur¬ de. Dagegen wird der zweite Programmname nach „% “ niemals in /RAM/BIN gesucht, es sei denn, man würde z.B. ED /RAM/BIN/PRO¬ GRAM.P spezifizieren oder das Ersatz-Präfix wäre nicht auf /K, sondern auf /RAM/BIN einge¬ stellt. 4.2, PC, P.OUT, AS, A.OUT PC (= Pascal-Compiler) lädt PROGRAM.P nach, speichert dann P.OUT im Ersatz-Präfix- Directory (immer dort!), lädt bzw. „chained“ dann den Assembler AS, der seinerseits die Standard-Library STDLIB.S lädt und am Schluß PROGRAM im Präfix-Directory oder A.OUT im Ersatz-Präfix-Directory (immer dort!) abspei¬ chert. % PC PROGRAM.P lädt zunächst PC von /RAM/BIN oder ersatzweise, d.h. falls dort nicht gefunden, von /K. Dann wird PROGRAM.P di¬ rekt von /K geladen. PC erzeugt und speichert jetzt P.OUT (= Assembler-Ouelltext ohne Pas- cal-Quelltext-Zeilen) in /K. Dann wird AS von /RAM/BIN oder ersatzweise von /K geladen. AS lädt dann STDLIB.S von /RAM/BIN oder ersatzweise von /K. AS erzeugt und speichert jetzt PROGRAM in/K. % /K/PC /K/PROGRAM.P lädt PC direct von /K, doch werden AS und STDLIB.S trotzdem zu¬ nächst von /RAM/BIN zu laden versucht. P.OUT wird in /K gespeichert. % /K/PC /RAM/BIN/PROGRAM.P lädt PRO¬ GRAM.P direkt von /RAM/BIN und speichert PROGRAM direkt in /RAM/BIN, jedoch P.OUT in /K. Andere Varianten % PC PROGRAM.P > ERRORS würde It. Ma¬ nual zusätzlich einen Textfile mit Compiler-Feh¬ lermeldungen in /K erzeugen. Dies ist jedoch nicht aus dem PC-Menü ersichtlich und funktio¬ niert deshalb bei Kyan 2.0 auch nicht. Die Slot- Option % PC PROGRAM.P >1 ist allerdings möglich (1 = Slot 1). Achtung: Wenn der Pascal-Quelltext nicht das Suffix „.P" hat, dann wird ersatzweise A.OUT erzeugt, und zwar immer im Ersatz-Präfix. % PC /RAM/BIN/QUELL erzeugt aus dem Textfile QUELL nicht den Binärfile QUELL, son¬ dern A.QUT, und zwar nicht in /RAM/BIN, son¬ dern in /K, wo sich später auch P.OUT befindet. % PC QUELL -O QUELLOBJ erzeugt aus dem Quelltext QUELL den Objektcode QUELLOBJ in /K. % PC PROGRAM.P -S erzeugt P.OUT (= As- sembler-Quelltext mit Pascal-Quelltext-Zeilen) in /K. PC „chained“ nicht AS; folglich wird PROGRAM nicht erzeugt. Man beachte, daß unter Kyan-Pascal 2.0 die S-Option aus PRO¬ GRAM.P nicht PROGRAM.S erzeugt, wie fäl¬ schlicherweise im Handbuch, III/5 erwähnt wird. % AS P.OUT lädt AS von /RAM/BIN oder ersatzweise von /K, dann STDLIB.S von /RAM/ BIN oder ersatzweise von /K und erzeugt schließlich den Objektcode A.OUT in /K, (A.OUT ist inhaltlich mit PROGRAM identisch.) % AS P.OUT -O PROGRAM erzeugt anstelle von A.OUT in /K den Objektcode PROGRAM. % AS P.OUT -L >LISTING erzeugt neben A.OUT in /K den Textfile LISTING (Assembler- Quelltext -H Hexdump des Maschinenpro¬ gramms). Für die Bildschirmausgabe genügt % AS P.QUT-L Für die Druckerausgabe in Slot 1 lautet der Befehl % AS P.OUT -L >1 Man beachte, daß P.OUT immer assembliert werden kann, gleichviel ob P.OUT über „PC PROGRAM.P“ oder über „PC PROGRAM.P -S“ erzeugt wurde. Ferner merken wir uns, daß P.OUT und A.OUT stets im Ersatz-Präfix ge¬ speichert werden. Wenn man wünscht, daß P.OUT in einem vorgegebenen Subdirectory gespeichert wird, so muß dieses Subdirectory zugleich Ersatz-Präfix sein. Nehmen wir an, PC sei in /A, PROGRAM.P sei in /B und Ersatz- Präfix sei /C, das auch AS und STDLIB.S ent¬ halte. Dann erzeugt der Befehl % /A/PC /B/PROGRAM.P P.OUT in /C und PROGRAM in /B. 4.3. PROGRAM und LIB Der Quelltext STDLIB.S enthält die Makrode¬ finitionen für den Assembler sowie die Laderou¬ tine für den Objektcode LIB, der in den Spei¬ cher ab $9000 geladen wird und die Runtime- Bibliothek darstellt. LIB ist also nicht etwa der Objektcode von STDLIB.S, sondern enthält die von allen compilierten Pascal-Programmen ge¬ meinsam benötigten Routinen (z.B. Fließkom- ma-Mathematik usw.). Speicherorganisation An dieser Stelle ist ein kurzer Überblick über die Speicherorganisation unter Kyan 2.0 erforder¬ lich, da die Abbildung im Peeker, Heft 4/86, S. 49 nur für Kyan 1.2 galt. • Bevor das compilierte Pascal-Programm (PROGRAM) geladen wird, befindet sich das Menü-Programm (mit %-Prompt) im Bereich $BC00-$BDFF, gefolgt von der ProDOS-Glo- bal-Page ($BF00-$BFFF). • Ein normales Kyan-Programm (PROGRAM) wird ab $0800 in den Speicher geladen und lädt dann seinerseits die Bibliothek LIB in den Spei¬ cher $9000-$BED3, also praktisch bis $BEFF, womit das Menü-Programm überschrieben wird, während die Global-Page natürlich erhal¬ ten bleibt. Für die Programmvariablen steht dann der Datenpool (= Heap) ab $8FFF abwärts bis zum Programmende (= LOMEM = Lowest Memory) zur Verfügung. Also: $0800-LOMEM: PROGRAM L0MEM-$8FFF; Pool (ab $8FFF rückwärts) $9000-$BEFF: LIB $BF00-$BFFF: Global-Page • Wenn zu Beginn von PROGRAM.P mit #A _USESHIRES • der Speicher der HGR-Seite 1 ($2000-$3FFF) für Grafik reserviert wird, dann ergibt sich fol¬ gende Speicherverteilung; $0800-$lFFF: Pool (ab $1FFF rückwärts) $2000-$3FFF: HGR Seite 1 $4000-LOMEM: PROGRAM $9000-$BEFF: LIB $BF00-$BFFF: Global-Page • Wenn zu Beginn von PROGRAM.P mit #A .SYSTEM Fi LE # ein SYS-File anstelle eines BIN-Fiies deklariert wird, so berührt dies die spätere Speicherver¬ teilung nicht, d.h. SYS-Files sind sowohl bei Nicht-Grafik- als auch bei Grafik-Programmen möglich, wobei im letzteren Fall die Doppeide- klarierung #A .SYSTEM Fl LE .USESHIRES # erforderlich ist. SYS-Files werden jedoch zu¬ nächst ab $2000 in den Speicher geladen und dann entweder nach $0800 (= Nicht-Grafik- Programm) oder nach $4000 (= Grafik-Pro¬ gramm) verschoben. Der Vorteil eines SYS- Files besteht darin, daß der erste Directory- SYS-File (mit Suffix „.SYSTEM“) von einer Pro- DOS-Diskette direkt nach dem Booten gestartet wird. • Wenn man ein Pascal-Programm über „END.“ verläßt, so wird wieder das Menü-Pro¬ gramm von $D100ff. nach $BC00ff. kopiert, und der untere Speicher ab $0800ff. ist dann vor¬ übergehend frei bis zum nächsten Programm¬ start. (Die ProDOS-l/O-Puffer - für jede geöffnete Datei $0400 Bytes - liegen übrigens im Datenpool, und zwar offenbar stets ab LOMEM modulo 256 aufwärts.) % PROGRAM lädt PROGRAM von /RAM/BIN oder ersatzweise von /K und danach LIB von /RAM/BIN oder ersatzweise von /K. % /K/PROGRAM lädt PROGRAM direkt von /K und danach LIB von /RAM/BIN oder ersatzwei¬ se von /K. 4.4. Weitere Feinheiten Damit haben wir die wichtigsten Präfix-Konven¬ tionen von Kyan-Pascal kennengelernt. In Wirk¬ lichkeit sind die Zusammenhänge noch viel komplizierter. Nehmen wir an, es existieren /K, /K/BIN und /RAM/BIN; (a) Wenn nun /K/BIN den Compiler PC enthält und /K den Quellcode PROGRAM.P und /K Ersatz-Präfix ist, dann findet der Befehl „% PC PROGRAM.P“ trotzdem PC in /K/BIN, nach¬ dem in /RAM/BIN vergeblich gesucht worden ist, und anschließend wird PROGRAM.P in /K gefunden und P.OUT sowie PROGRAM werden in /K gespeichert. (b) Wenn nun /K/BIN den Objektcode PRO¬ GRAM enthält und /K die Library LIB und /K Ersatz-Präfix ist, dann findet der Befehl „% PROGRAM“ zwar PROGRAM in /K/BIN, aber danach nicht mehr LIB in /K, obwohl das Ersatz- Präfix /K lautet. Erklärungsversuch: Zunächst wird /RAM/BIN/PROGRAM gesucht; Suche er¬ folglos. Dann wird /RAM abgehackt und durch /K ersetzt, womit /K/BIN/PROGRAM entsteht. Nun wird /K/BIN/PROGRAM mit Erfolg ge¬ sucht, aber das Ersatz-Präfix heißt jetzt für Ky¬ an-Pascal /K/BIN, und in /K/BIN ist LIB nicht enthalten. All dies ist für den Anfänger natürlich völlig undurchsichtig. Aber es geht noch weiter. Wir haben bislang unterstellt, daß ED, PC, AS, PROGRAM usw. automatisch zunächst in 50 Peeker 6/86 /RAM/BIN gesucht werden. Dies trifft jedoch nur dann zu, wenn die Speicherstelle $BF98 in der Global-Page (sog. Machine-Identification- Code) einen 128K-Apple ausweist (= Apple Ile mit 64K-Karte oder llc). Bei einem Apple Ile ohne 64K-Karte oder einem Apple II+ wird /RAM/BIN nicht berücksichtigt, selbst wenn ei- 'ne große RAM-Karte oder gar eine Festplatte ein Subdirectory /RAM/BIN aufweisen. Daraus ergeben sich zwei Manipulationsmöglichkeiten: (a) Wenn man als Besitzer eines Apple II + mit RAM-Karte oder Festplatte darauf Wert legt, daß ein Subdirectory namens /RAM/BIN direkt an¬ gesprochen wird, so setze man Bit 4 von $BF98. Bei einem ll-F mit 80-Zeichenkarte und ohne Flardware-Uhr lautet das Byte dann $B2. (b) Wenn man als Besitzer eines Apple Ile mit 64K-Karte wegen einer Festplatte o.ä. nicht will, daß das Subdirectory /RAM/BIN der 64K-RAM- Karte angesprochen wird, so lösche man Bit 4 von $BF98. Bei einem Ile mit 80-Zeichenkarte und ohne Flardware-Uhr lautet das Byte dann $A2. Vorteil: Durch die Suche nach /RAM/BIN geht unnötig viel Zeit verloren. Wenn man /RAM in /REM umbenennt, merkt man dies sehr deut¬ lich, denn dann werden alle Volumes vergeblich nach /RAM abgesucht. 5. Compiler-Tips Viele besitzen weder eine große RAM-Karte noch eine Festplatte, sondern müssen mit ei¬ nem einzigen Laufwerk und evtl, einer 64K- RAM-Karte vorlieb nehmen. Wie man unter die¬ sen Umständen trotzdem vernünftig arbeiten und sogar die Compilierungs- und Assemblie¬ rungszeiten unter Kyan-Pascal um über 50% reduzieren kann, werde ich Ihnen jetzt zeigen. Variante 1 Besitzer eines Apple \\+ oder eines Ile ohne 64K-Karte stellen sich folgende 140K-Arbeits- diskette zusammen: /RAM DIR BIN /RAM/BIN SYS KIX.SYSTEM BIN PC BIN AS TXT STDLIB.S BIN ED BIN LIB BIN EID TXT PROGRAM.P BIN PROGRAM TXT P.OUT (a) Booten Sie von einer ProDOS-Systemdis- kette, z.B. von Kyan-Disk 2, Seite 2. (b) Legen Sie die Arbeitsdiskette ein, setzen Sie das Präfix mit PREFIX/RAM/BIN auf das Subdirectory und starten Sie dann das KIX.SYSTEM mit -KIX.SYSTEM Für die Arbeitsdateien PROGRAM.P usw. blei¬ ben dann noch über 100 Blöcke frei, und beim Compilieren und Assemblieren wird direkt auf das Subdirectory /RAM/BIN zugegriffen. Zu Testzwecken wurde mit dieser Konfiguration ein bestimmtes Programm mit % PC PROGRAM.P compiliert, wobei sich die Compilierungs- und Assemblierungszeit auf fast genau 100s (= 100%) belief. . ^kyAN^ Variante 2 Zur Abschreckung wird die folgende „Lösung" vorgeführt, die sich automatisch dann ergibt, wenn man einen llc oder Ile mit 64K-Karte besitzt und so vorgeht, wie es das Kyan-Manual beschreibt. Danach bootet man die Kyan-Disk 1, Seite 1 (mit Präfix /KYAN.PASCAL), womit das KIX.SYSTEM gestartet wird, das automa¬ tisch /RAM/BIN erzeugt und die Dateien STDLIB.S, AS, ED, MENU, INTRO, QUIT, KIX und CD in /RAM/BIN kopiert. Nehmen wir an, man würde jetzt die Arbeitsdiskette /K einlegen, die neben PC auch FID und PROGRAM.P usw. enthielte. Dann würde das Testprogramm mit dem Befehl % /K/PC /K/PROGRAM.P in ca. 85s (= 85%) compiliert, wenn man /K mit angibt oder das Ersatz-Präfix zuvor auf /K ein¬ gestellt hat und dann % PC PROGRAM.P eingibt. Das Präfix kann nicht auf /RAM/BIN eingestellt werden, weil dort nicht genügend Platz für P.OUT wäre. Entfernt man auf /RAM/ BIN die Dateien ED, MENU usw. und kopiert statt dessen PC auf /RAM/BIN, womit sich also PC, AS und STDLIB.S, die bei der Compilierung benötigt werden, in /RAM/BIN befinden, so re¬ duziert sich die Compilierungszeit auf ca. 82s (= 82%). Es nützt also nicht viel, wenn PC, AS und STDLIB.S in einer RAM-Disk liegen, weil das Einlesen dieser drei Dateien zusammen nur ca. 8-1 Os benötigt, wie man vom BASIC.SY¬ STEM aus über den BLOAD-Befehl leicht fest¬ stellen kann. Variante 3 Nun zeigen wir eine erheblich bessere Lösung für Besitzer einer 64K-Karte, die die Compilie¬ rungszeit gegenüber Variante 2 um über 50% reduziert. Zu diesem Zweck legen wir folgende Arbeitsdiskette an: /K SYS KIX.SYSTEM BIN ED BIN LIB BIN PC BIN FID TXT PROGRAM,P BIN PROGRAM /K/BIN BIN AS TXT STDLIB.S TXT P.OUT (a) Booten Sie zunächst eine ProDOS-System- diskette, legen Sie /K ein und setzen Sie das Präfix mit PREFIX/K auf/K. (b) Starten Sie dann das KIX.SYSTEM, das in /K/BIN nur die Dateien AS und STDLIB.S vor¬ findet und diese in /RAM/BIN kopiert. (c) Danach setzen Sie das Präfix auf /RAM/BIN. Dies ist der Trick! Wenn Sie nämlich jetzt mit %/K/PC /K/PROGRAM.P compilieren, so wird P.OUT in /RAM/BIN abge¬ legt, jedoch PROGRAM in /K. Die meiste Zeit verbraucht nämlich der Compiler für das Spei¬ chern von P.OUT sowie der Assembler für das Einlesen von P.OUT, während das Laden von PROGRAM.P und das Speichern von PRO¬ GRAM nur unwesentlich verbessert werden können. Die Compilierungszeit reduziert sich dann auf sage und schreibe 41 s (= 41 %). Dies entspricht einer 60%igen Verbesserung gegen¬ über Variante 1 und einer 50%igen Verbesse¬ rung gegenüber Variante 2. Flinzu kommt, daß Variante 3 der Datensicherheit dient, denn P.OUT ist eine „Wegwerfdatei", während PRO¬ GRAM.P und PROGRAM später noch benötigt werden. Da die RAM-Disk zudem nur AS und STDLIB.S enthält, kann P.OUT dort über 70 Blöcke groß werden. Die Variante 3 ist derart effizient, daß man bei¬ spielsweise mit der Megaboard-Festplatte nur noch eine Reduzierung auf 29s (= 29%) er¬ reicht. 6. FID statt Kix-Utilities Die Kix-Utilities LS, CMP, LPR usw. sind teil¬ weise sehr leistungsfähig, doch nehmen sie fast eine ganze 140K-Diskette in Beschlag. Deshalb habe ich für die Kyan-Club-Mitglieder ein sehr kompaktes Kyan-FID (analog zum DOS-3.3- FID) in 3 Versionen mit insgesamt folgenden Befehlen entwickelt: (a) Quit, Online, Prefix, Catalog, Create, Delete, Lock, Unlock, Rename (b) Bsave, Bload (c) Copy FID (= Komplettversion) enthält alle Befehle. FID1 enthält die Befehle (a) und (c). FID2 enthält die Befehle (a) und (b). Andere Befehlskombinationen kann man sich anhand der Quelltexte FID.P, FIDI.P und F1D2.P selbst zusammenstellen. Alle Versionen enthalten neben dem Assemblerteil ein kleines Menü-Programm in Pascal. Im Gegensatz zu den Kix-Utilities können damit die FID-Routinen in eigene Pascal-Programme eingebaut wer¬ den. 1-Drive-Besitzer können FID1 benutzen, das als Objectcode nur 14 Blöcke einnimmt und damit auf der Arbeitsdiskette immer Platz findet. Nähere Informationen über FID, das nur an Club-Mitglieder abgegeben wird (Preis DM 20,-), können Sie dem Club-Rundschreiben #2 entnehmen. 7. 80-Zeichenkarte von Ueding Die Firma Ueding in Menden hat uns freundlicher¬ weise kurzfristig eine 80-Z/Z-Karte zur Überprü¬ fung der Kyan-Probleme beim 11+ ausgeliehen. Diese Karte, die über 2 Zeichensätze mit 9 x 10- Matrix (mit deutlich besserem Schriftbild als beim Ile!) verfügt, setzt einen Monitor voraus, bei dem man die Bildbreite (von außen) verstel¬ len kann, ist nur für Slot 3 gedacht und scrollt recht schnell. ProDOS erkennt die Karte nicht, was jedoch für den Kyan-ED2 unerheblich ist. Verwendet man sie jedoch auf dem lie statt auf dem II+, so müssen vorher die Softswitches normalisiert werden. Es genügt der folgende Patch: #A STX _T ; LDA $BF98 ;Machine-ID ; ORA *$02 ;80-Z/Z-Bit ; STA $BF98 ;Machine-ID JSR $FE89 ; IN*0 JSR $FE93 ; PR*0 STA $C006 ;Slot $C100ff. STA $C00B ;Slot $C300ff. JSR $C300 jUeding-Karte an LDX _T # Die Karte funktioniert dann mit dem Kyan-ED2, doch ist bei Return der Cursor nicht sichtbar. Die liegt jedoch an Kyan und nicht an der Ueding-Karte. Peeker 6/86 51 '’lUi - „ I,.' f ■'' r !'"''■ fl ..- "'■ x:,i/ Adreßverwaltungsprogramm mit dBase II Listing des überarbeiteten Quelltextes von Ing. (grad.) Ernst Fischer Im Peeker, Heft 8/1985, S. 40-44, ist ein Adreßverwaltungspro¬ gramm beschrieben worden, das auf die Peeker-Sammeldiskette #8 aufgenommen, aber nicht als Quelltext abgedruckt worden ist. Da viele Leser das dBase-Programm ändern oder auf andere Rechner anpassen wollten, bringen wir nachfolgend den komplet¬ ten Quelltext einschließlich einiger kursiver Ergänzungen, die Sie bei Bedarf in die Disk #8 einarbeiten können. Beachten Sie, daß das Listing aus drucktechnischen Gründen insbesondere bei den SAY-Zeilen auf 65 Zeichen/Zelle umbrochen wurde; die Funk¬ tionsfähigkeit des Programms wird dadurch jedoch nicht berührt. 1. AD-START.CMD * DO START.CMD (Startet das Adv} ERASE SET TALK OFF RESTORE FROM MEMORY STORE CHR (15) TO INVERSE STORE ” " TO ZGBER STORE F TO OK §23,0 SAY INVERSE 4- "ADRESSEN START" PI 5 6,21 SAY "ADRESSENVERWALTUNG" § 8,21 SAY "für Apple Ile ergänzt am 1.5.1986" § 10,21 SAY "Autor; Ernst Fischer" § 15,9 SAY "Letzter Zugriff : " + DATE +; " Anzahl Records : " I 15,68 SAY STR(R:NR,3) DO WHILE .NOT. OK § 17,9 SAY "Bitte geben Sie das Datum ein <TT/MM/JJ>; "GET DATE PICTURE '99/99/99' READ IF VAL($(DATE,1,2)) > 31; .OR. VAL($(DATE,1,2)) < 1; ,0R. VAL($(DATE,4,2)) > 12; -OR. VAL($(DATE,4,2)) < 1; .OR- VAL($(DATE,7,2)) < 83 ? CHR (7) ELSE STORE T TO OK ENDIF ENDDO ERASE STORE $(DATE,1,2) + " " + $(DATE,4,2) + TO DATUM SET DATE TO &DATUM § 23,0 SAY INVERSE + "ADRESSEN " DATUM § 17,5 SAY "Bitte Wasswort eingeben SET CONSOLE OFF ACCEPT ' ' TO ZGBER SET CONSOLE ON ERASE RELEASE OK, DATUM, DATE IF ZGBER <> "PEEKER" RELEASE ALL ERASE QUIT ENDIF DO HMENUE + $(DATE,7,2); STAR T"+; " + DATE() * Ende von AD-START + : 2. HMENUE.CMD * DO HMENUE.CMD ERASE DO WHILE T § 1,0 SAY "+=— (Hauptmenueprogramm) § 2, 0 SAY "! § 3, 0 SAY "! Hauptmenue 1 ^ t § 4, 0 SAY 1 __ i ii § 5, 0 SAY "! § 6, 0 SAY "! 1.Eingabe der Personaldaten § 7, 0 SAY "! § 8, 0 SAY "! 2.Verändern der Personaldaten § 9, 0 SAY "! § 10, 0 SAY "! 3.Suchen nach Familienname § 11, 0 SAY "! § 12, 0 SAY "! 4.Suchen nach Vornamen § 13, 0 SAY "! § 14, 0 SAY "! 5.Suchen nach Bemerkungen § 15, 0 SAY "! § 16, 0 SAY "! 6.Adressenaufkleber drucken § 17, 0 SAY "! § 18, 0 SAY "! en § 19, 0 SAY "! 7.Adressenlisten drucken / Adressen anschau § 20, 0 SAY "! 8.Löschen eines Datensatzes § 21, 0 SAY "! § 22, 0 SAY "! 9-Ende § 23, 0 SAY STORE F TO OK DO WHILE .NOT.OK SET CONSOLE OFF WAIT TO ANTW SET CONSOLE ON 52 Peeker 6/86 ^ Cp/M IF NOT ANTW$ '123456789' ? CHR(7) ELSE STORE T TO OK ENDIF ENDDO DO OASE GASE ANTff=■1' DO AUFNAHME GASE ANTW='2' DO EDITFNAM GASE ANTW='3' DO SUCHFNAM GASE ANTW='4' DO SUCHVNAM GASE ANTW=■5' DO SUCHBEME GASE ANTW='6' DO SCHREIBA GASE ANTW='7’ DO SCHREIBE GASE ANTW='8' DO LOESCH GASE ANTW='9' RELEASE ALL ERASE USE B;ADRESSEN GO BOTTOM STORE + TO R;NR STORE DATEO TO DATE SAVE TO MEMORY CLEAR CANCEL ENDCASE ENDDO # Ende von HMENUE.CMD 3. AUFNAHME.CMD * DO AUFNAHME,CMD (Programm zur Aufnahme der Daten) ERASE SET TALK OFF USE B:ADRESSEN GO BOTTOM STORE 'J' TO ANTW DO WHILE !(ANTW) ='J' STORE ’ ' TO ANTW APPEND BLANK REPLACE NAT WITH 'D' DO AUFMASKE ENDDO ERASE § 12,5 SAY 'Bitte keine Eingaben machen,Es wird eine Indexdatei; angelegt.' INDEX ON FAM TO ALPHA INDEX ON VOR TO BETA INDEX ON VORE TO GAMA CLEAR RETURN * Ende von DO AUFNAHME 4. AUFMASKE.CMD * AUFMASKE.CMD (Maske zur Datenaufnahme) ERASE § 1, 0 SAY “+ § 2,0 SAY "! § 3, 0 SAY "! Bitte geben Sie die Daten für das Adressregi; Ster ein... J" § 4, 0 SAY § 5, 0 SAY "! Fam.Name' § 5,14 GET fam § 5,34 SAY "Vorname" § 5,41 GET vor § 5,56 SAY "Geb.Datum" § 5,65 GET gebd § 5,79 SAY II111 § 6, 0 SAY "! § 7, 0 SAY "! Ehefrau.. § 7,41 GET vore § 7,56 SAY "Geb.Datum" § 7,65 GET gebde Vorname" § 7,79 SAY 11 t II § 8, 0 SAY " ! 1 II § 9. 0 SAY l "! PLZ" §9,9 GET plz § 9,16 SAY "Wohnort" § 9,23 GET ort § 9,40 SAY "Straße u.Nr." § 9,52 GET str § 9,79 SAY II j ti § 10, 0 SAY " ! * \ § 11, 0 SAY "! Land (Intern.KFZ-Zeichen als Abkürz.)" § 11,43 GET nat § 11,79 SAY II j tt § 12, 0 SAY "+-- § 13, 0 SAY "! Telefon Priv, Vorwahl" 1 13,27 GET vwp § 13,35 SAY "Rufnr," § 13,41 GET tnrp § 13,49 SAY "Auslandsvorwahl" § 13,64 GET vwal § 13,79 SAY " !" § 14, 0 SAY " ■ ^ § 15, 0 SAY "! Telefon Die. Vorwahl" § 15,27 GET vwd § 15,35 SAY "Rufnr." § 15,41 GET tnrd § 15,79 SAY M j It § 16, 0 SAY " ! ; § 17, 0 SAY "! Ehefrau... Telefon Dienstlich Vorwahl" § 17,43 GET vwde § 17,54 SAY "Rufnr," § 17,60 GET tnrde § 17,79 SAY II 1 tr § 18, 0 SAY «+— ... --' § 19, 0 SAY § 19,15 GET h&sb. § 19,79 SAY '■ \" § 20, 0 SAY "+-. § 21, 0 SAY "! Weitere Eintragungen ? (J/N)" § 21,79 SAY § 22, 0 SAY - READ RETURN * Ende von DO AUFMASKE 5. AUSMASKE.CMD * AUSMASKE.CMD (Gibt die gespeicherten Daten einer Person aus) ERASE § 1, 0 SAY ^- . § 2, 0 SAY "! Daten der gesuchten Person... ; § 3.0 SAY § 4, 0 SAY "! Fam Name;" § 4,15 SAY fam 5 4,35 SAY "Vorname:" § 4,43 SAY vor § 4,58 SAY "Geb.Datum:" § 4,68 SAY gebd 1 4,79 SAY tr 1 II § 5, 0 SAY " ! § 6, 0 SAY "! Ehefrau... VorhiJiiio:" S 6,43 SAY vore § 6,58 SAY "Geb.Datum:" § 6,68 SAY gebde § 6,79 SAY n j II % 7, 0 SAY " ' ^ r § 8, 0 SAY "! PLZ:" § 8,10 SAY plz § 8,17 SAY "Wohnort:" § 8,25 SAY ort § 8,42 SAY "Straße u.Nr.;" § 8,55 SAY str § 8,79 SAY ir [ II § 9, 0 SAY " ! 1" Peeker 6/86 53 § 10, 0 SAY "! Land (Intern.KFZ-Zeichen als Abkürz.):" § 10,44 SAY nat § 10,79 SAY "!" § 11, 0 SAY "-K-------- _h" § 12, 0 SAY "! Telefon Priv. Vorwahl;" I 12,28 SAY vwp § 12,36 SAY "Rufnr. § 12.43 SAY tnrp § 12,51 SAY "Auslandsvorwahl:" § 12,67 SAY vwal § 12,79 SAY "!" jg 13, 0 SAY "! I" § 14, 0 SAY "! Telefon Die. Vorwahl:" § 14,28 SAY vwd § 14,36 SAY "Rufnr. § 14,43 SAY tnrd § 14,79 SAY "!" § 15, 0 SAY "! !" § 16. 0 SAY "! Ehefrau... Telefon Dienstlich Vorwahl;" § 16,44 SAY vwde § 16,55 SAY "Rufnr.:" § 16,62 SAY tnrde § 16,79 SAY "!" § 17, 0 SAY "H---- -h" § 18, 0 SAY "! Bemerkung:" § 18,16 SAY bem § 18,79 SAY "!" § 19. 0 SAY "H--------- _—-——k" § 20, 0 SAY "1 Ist dies die gesuchte Person (J/N)" § 20,40 GET GP § 20,79 SAY "!" § 21, 0 SAY READ RETURN * Ende von DO AUSMASKE.CMD 6. EDITFNAM.CMD * EDITFNAM.CMD (VERÄNDERT DIE PERSONALDATEN) SET TALK OFF STORE 'J' TO ANTW DO WHILE !(ANTW)='J' USE B:ADRESSEN INDEX ALPHA STORE ' ' TO ANTW ERASE § 4,26 SAY 'Verändern von Personaldaten' § 5,26 SAY ' ? 9 ACCEPT 'Familienname der gesuchten Person ^ TO MFAM 9 ACCEPT 'Vornamen der gesuchten Person ' TO MVOR FIND &MFAM IF <> 0 STORE # TO R:NR ENDIF DO SUCH IF ENDE RETURN ENDIF USE B:ADRESSEN GO R:NR IF MVOR =' ' LOCATE FOR FAM=MFAM ELSE LOCATE FOR FAM=MFAM,AND.V0R=MV0R ENDIF STORE FAM TO TFAM STÖRE VOR TO TVOR STORE VORE TO TVORE DO AUFMASKE STORE FAM TO TIFAM STORE VOR TO TIVOR STORE VORE TO TIVORE IF TIFAM <> TFAM ? ' Einen Moment bitte . - . Aktualisierung der Fam-Indexdatei)' INDEX ON FAM TO ALPHA ENDIF IF TIVOR <> TVOR ? ' Einen Momen bitte . - . (Aktualisierung der Vornam-Indexdatei)' INDEX ON VOR TO BETA ENDIF IF TIVORE <> TVORE ? ' Einen Afoment bitte... (Aktualisierung der Vornam.Ehefr-IndexdateiV INDEX ON VORE TO GAMMA ENDIF ENDDO RELEASE TFAM, TIFAM, TVOR, TIVOR, TVORE, TIVORE RETURN * Ende von EDITFNAM.CMD 7. SUCHFNAM.CMD * SUCHFNAM.CMD (Sucht den Familiennamen) USE B:ADRESSEN INDEX ALPHA SET TALK OFF ERASE § 4,10 SAY 'Datenausgabe für einen gewünschten Familiennamen' § 5,10 SAY ' ? 9 ACCEPT 'Familienname der gesuchten Person ' TO MFAM FIND &MFAM IF # <> 0 STORE # TO R:NR ENDIF DO SUCH IF ENDE RETURN ENDIF USE B:ADRESSEN GO R:NR LOCATE FOR FAM=MFAM STORE ' ' TO GP DO AUSMASKE DO WHILE !(GP)='N' STORE ' ' TO GP CONTINUE IF EOF ERASE § 12,0 ? 'Weitere Personen, die ',MFAM,' heißen,gibt es nicht !' SET CONSOLE OFF WAIT SET CONSOLE ON RETURN ENDIF DO AUSMASKE ENDDO RETURN * Ende von DO SUCHFNAM CMD 8. SUCHVNAM.CMD * SUCHVNAM.CMD (Sucht den Vornamen) USE B:ADRESSEN INDEX BETA SET TALK OFF ERASE § 4,12 SAY 'Datenausgabe für einen gewünschten Vornamen' § 5,12 SAY ' * ? ? ACCEPT 'Vorname der gesuchten Person ' TO MVOR FIND &MVOR IF #=0 USE B:ADRESSEN INDEX GAMA FIND &MV0R ENDIF DO WHILE #=0 ERASE § 12,0 ?' Den Vornamen ',MV0R,' gibt es nicht !' ? ?' Bitte Eingabe wiederholen oder mit Return abbrechen I ? 9 ACCEPT ' Vorname der gesuchten Person ' TO MVOR IF MVOR =' ' RETURN ENDIF USE B:ADRESSEN INDEX BETA FIND &MV0R IF 4=0 USE B:ADRESSEN INDEX GAMA FIND &MV0R ENDIF ENDDO 54 Peeker 6/86 IF + <> 0 STORE # TO R:NR ENDIF USE B:ADRESSEN GO R;NR LOCATE FOR (VOR=MVOR.OR.VORE=MVOR) STORE ' ' TO GP DO AUSMASKE DO WHILE !{GP)='N' STORE ' ■ TO GP CONTINUE IF EOF ERASE § 12,0 ? 'Weitere Personen, die ',MVOR,' heißen,gibt es nicht !' SET CONSOLE OFF WAIT SET GONSOLE ON RETURN ENDIF DO AUSMASKE ENDDO RELEASE ALL RETURN * Ende von DO SUCHVNAM.CMD 9. SUCHBEME.CMD * SUCHBEME.CMD {Sucht nach Bemerkungen) USE B;ADRESSEN SET TALK OFF ERASE § 4,8 SAY 'Datenausgabe für eine gewünschte Bemerkung' § 5,8 SAY ' ? 7 ACCEPT 'Bemerkung, nach der gesucht wird ' TO MFAM LOCATE FOR MFAM$BEM DO WHILE EOF ERASE § 12.0 ?' Die Bemerkung ',MFAM,' gibt es nicht !' ? ?' Bitte Eingabe wiederholen oder mit Return abrechen! ? 7 ACCEPT ' Bemerkung, nach der gesucht wird ' TO MFAM IF MFAM =' ' RETURN ENDIF GO TOP LOCATE FOR MFAM$BEM ENDDO STORE ' ' TO GP DO AUSMASKE DO WHILE I(GP)='N' STORE ’ ' TO GP CONTINUE IF EOF ERASE § 12,0 ? 'Weitere Bemerkungen mit ',MFAM,' gibt es nicht !' SET CONSOLE OFF WAIT SET CONSOLE ON RETURN ENDIF DO AUSMASKE ENDDO RELEASE ALL RETURN * Ende von SUCHBEME.CMD 10. SCHREIBA.CMD * SCHREIBA.CMD(Schreibt Adressenaufkleber) USE B:ADRESSEN INDEX ALPHA SET TALK OFF ERASE § 4,17 SAY 'Anfertigen von Adressenaufklebern' § 5,17 SAY ' ? 9 ACCEPT 'Familienname der gesuchten Person ' TO MFAM FIND &MFAM IF #<>0 STORE # TO R:NR ENDIF DO SUCH IF ENDE RETURN ENDIF USE B;ADRESSEN GO R:NR LOCATE FOR FAM=MFAM ERASE STORE ■ ' TO ANR § 4,35 SAY ’Anredemenü' § 5,35 SAY • § 7,5 SAY '1. Keine Anrede ' § 9,5 SAY '2.Keine Anrede bei Ehefrau' § 11,5 SAY '3.Anrede "Herrn"' § 13,5 SAY '4.Anrede "Frau" bei Verheirateten' § 15,5 SAY '5.Anrede "Herr+Frau"' § 17,5 SAY '6.Anrede "Familie"' § 19,5 SAY '7.Anrede "Frau" bei Alleinstehenden' §21,5 SAY '8.Sonstige Anrede' § 23,0 SAY 'Bitte wählen Sie ' STORE F TO OK DO WHILE ,NOT.OK SET CONSOLE OFF WAIT TO ANR SET CONSOLE ON IF ,NOT,ANR$ '12345678' ? CHR(7) ELSE STORE T TO OK ENDIF ENDDO DO CASE CASE ANR='l' STORE ' ' TO ANREDE CASE ANR='2' STORE ' ' TO ANREDE CASE ANR='3' STORE 'Herrn' TO ANREDE CASE ANR='4' ,OR, ANR='7' STORE 'Frau' TO ANREDE CASE ANR='5' STORE 'Herr u. Frau' TO ANREDE CASE ANR='6' STORE 'Farn.' TO ANREDE CASE ANR='8' ERASE § 12,0 ACCEPT 'Welche Anrede wird gewünscht?' TO ANREDE ENDCASE STORE 'N' TO GP DO WHILE I(GP)<>'J' ERASE § 12,20 SAY ANREDE STORE ANREDE TO AN DO CASE CASE ANR='l',OR.ANR='3'.OR . ANR='6' . OR,ANR ='7'. 0R,ANR='8’ STORE (TRIM(V0R)+' '+FAM) TO NA § 13,20 SAY NA CASE ANR='2'.OR.ANR='4' STORE (TRIM(V0RE)+' '+FAM) TO NA § 13,20 SAY NA CASE ANR='5' STORE (TRIM(VOR)+' + '■l-TRIM{VORE) + ' ’+FAM) TO NA § 13,20 SAY NA ENDCASE § 14.20 SAY STR IF NAT ='D' STORE (PLZ+' '+0RT) TO ORTl § 16.20 SAY ORTl ELSE STORE (NAT+' '+PLZ-t-' '+0RT) TO ORTl § 16,20 SAY ORTl ENDIF STORE ' ' TO GP § 20,0 SAY 'Ist dies die gesuchte Person? ' § 22,0 SAY 'J)a W)eitersuchen oder R)eturn' GET GP READ DO CASE CASE !(GP)='W' CONTINUE IF EOF ERASE § 12,0 ? 'Weitere Personen, die ',MFAM,' heißen,gibt es nicht \* SET CONSOLE OFF WAIT SET CONSOLE ON RETURN ENDIF Peeker 6/86 55 GASE !(GP)='R' STORE LIN+1 TO LIN RETURN GASE VOR <> ' GASE !(GP}='J’ ? TRIM(VOR)+' '+FAM ENDCASE STORE LIN+1 TO LIN ENDDO GASE VOR = ' ERASE ? FAM § 5,0 SAY 'Bitte den Drucker bereit machen und die ; STORE LIN+1 TO LIN Adressaufkleber ' ENDCASE § 7,0 SAY 'einspannen!' IF STR <> ' * STORE ’ ' TO ANZ ? STR § 10,0 SAY 'Anzahl der zu druckenden Adressaufkleber?'; STORE LIN+1 TO LIN GET ANZ PIGTÜRE '99' ENDIF READ IF ORT <> ' § 15,20 SAY 'Folgende Justierung ist nötig:' ? TRIM(NAT)+' '+PLZ+' '+ORT 9 1 -- 1 § 18,0 SAY 'Linker Rand des Adressaufklebers auf 0 der Schiene' STORE LIN+2 TO LIN § 19,0 SAY ' 1 ENDIF § 21,0 SAY 'Anlegeschiene muß mit Beginn zweites Loch ; IF VWALO' übereinstimmen.' ? 'Tel.Nr.: '+TRIM(VWAL)+'-’+TRIM(VWP)+'-'+TNRP SET GONSOLE OFF STORE LIN+1 TO LIN WAIT ELSE SET PRINT ON ? 'Tel.Nr.; '+TRIM(VWP)+'-'+TNRP 9 STORE LIN+1 TO LIN STORE 0 TO ZAHL ENDIF DO WHILE ZAHL < VAL(ANZ) DO GASE P cm(27)+CHR(64)+CHR(27)+"3’’+CHR(36)+CHR(27)+"G"+' '-hAN GASE ((GEBD <> ' ' .AND. VWD <> ' ').AND.VOREO' ') « Drucker normieren.Zeilenabstand auf 36/216" und Doppeldruck ? TRIM(V0R)+' '+TRIM(GEBD)+' '+'Tel.Die.:'+VWD+TNRD t ’ '+NA STORE LIN+1 TO LIN t ' ’+STR GASE ((GEBDO ' '.AND.VWD= * ').AND.VOREO ' ') T ? TRIM(V0R)+' '+TRIM(GEBD) t CHR(27)+CHR(64)+GHR(27 ) +"E"+ ' '+0RT1 STORE LIN+1 TO LIN • Drucker normieren und auf Fettschrift setzen GASE (GEBD <> ' ' .AND.VWD O ' ') f ? TRIM(GEBD)+' Tel.Die.; '+VWD+TNRD t STORE LIN+1 TO LIN GASE (GEBD = ' '.AND.VWDO ' ') ¥ ? 'Tel,.Die.: '+VWD+TNRD STORE ZAHL+1 TO ZAHL STORE LIN+1 TO LIN ENDDO ENDCASE ? CHR(27)+GHR(64)+GHR(13) IF (GEBDE O ' ' ,0R. VWDE O ' ') * Drucker Normieren und Linefeed IF VWDE = ' SET PRINT OFF ? TRIM(V0RE)+' '+TRIM(GEBDE) SET CONSOLE ON STORE LIN+1 TO LIN RELEASE ALL ELSE RETURN ? TRIM(V0RE)+' '+TRIM(GEBDE)+' Tel Die.:'+VWDE+TNRDE * Ende von DO SGHREIBA.CMD STORE LIN+1 TO LIN ENDIF ENDIF 11.SCHREIBLCMD IF BEMO' ' ? 'Bemerk.; '+BEM * SGHREIBL GMD (Druckt Adresslisten aus) STORE LIN+1 TO LIN ERASE ENDIF SET TALK OFF 9 § 3,19 SAY 'Adresslisten - und Etikettendruckprogramm' ? § 4,19 SAY ' ' STORE LIN+2 TO LIN § 10,5 SAY '1,Adressen ansehen' SKIP § 12,5 SAY ' 2-Adressliste drucken' IF (LIN>35.AND.(ANT='2' ) ) 9 SET PRINT OFF STORE F TO OK ERASE DO WHILE .NOT.OK § 12,5 SAY 'Bitte neues Blatt in den Drucker ; SET CONSOLE OFF einspannen.' WAIT TO ANT § 14,5 SAY 'Danach mit RETURN weiterdrucken,' SET CONSOLE ON SET CONSOLE OFF IF ,N0T.ANT$'12' WAIT ? CHR(7) SET CONSOLE ON ELSE SET PRINT ON STORE T TO OK STORE 0 TO LIN ENDIF ENDIF ENDDO ENDDO ÜSE B:ADRESSEN INDEX ALPHA STORE 0 TO LIN ERASE IF ANT='l' IF ANT = '2' STORE ' ' TO FRA § 12,5 SAY 'Bitte den Drucker bereitmachen! Danach RETURN !' § 23,0 SAY 'A)bbrechen RETURN=Weiter ' GET FRA 9 READ SET CONSOLE OFF ERASE WAIT IF ! (FRA)='A' SET CONSOLE ON RETURN SET PRINT ON ENDIF ? CHR ( 27 ) +CHR ( 15 ) +CHR ( 27 ) +CHR ( 48 ) +CHR ( 27 ) +CHR ( 56 ) ENDIF * Drucker auf Schmalschrift, 1/8" Zeilenabst. + Abschaltung der DO GASE * Papierenderkennung GASE ANT='l' ENDIF ENDDO STORE 0 TO LIN GASE ANT='2' DO WHILE .NOT.EOF ENDDO DO GASE ENDCASE GASE ANT='2' IF ANT='2' DO WHILE (LIN < 42 .AND..NOT.EOF) ? CHR(27)+CHR(64) GASE ANT='l' * Drucker normieren DO WHILE (LIN < 16 ANDNOT.EOF) SET PRINT OFF ENDCASE ENDIF DO GASE RELEASE ALL GASE VORE <> ' RETURN ? TRIM(VOR)+'+'+TRIM(VORE)+' '+FAM * Ende von SCHREIBL.CMD 56 Peeker 6/86 ^ Cp/M 12. LOESCH.CMD * LOESCH,CMD (Löscht die Personaldaten einer Person} USE B;ADRESSEN INDEX ALPHA SET TALK OFF ERASE § 4,15 SAY 'Datenlöschung für eine bestimmte Person ' § 5,15 SAY ’ 9 ? ACCEPT 'Familienname der gesuchten Person ' TO MFAM FIND &MFAM IF # <> 0 STORE # TO R:NR ENDIF DO SUCH IF ENDE RETURN ENDIF USE B:ADRESSEN GO R:NR LOCATE FOR FAM-MFAM STORE ' ' TO GP DO AUSMASKE DO WHILE !(GP)='N’ STORE ' ' TO GP CONTINUE IF EOF ERASE § 12,0 ? 'Weitere Personen, die ',MFAM,' heißen,gibt es nicht !' SET CONSOLE OFF WAIT SET CONSOLE ON RETURN ENDIF DO AUSMASKE ENDDO ERASE § 5,0 SAY 'A C H T U N G, ACHTUNG, ACHTUNG, ; ACHTUNG' § 6,0 SAY ' § 9,0 SAY ' § 10,0 SAY § 12,0 SAY § 14,0 SAY § 16,0 SAY § 18,0 SAY STORE Folgende Person wird gelöscht: 'Familienname :'+FAM 'Vorname :’+VOR 'Straße :'+STR 'Ort :'+PLZ+' ’+ORT TO LOESCH § 22,0 SAY 'Ist dies die gewünschte Person zum Löschen? (J/N)' GET LOESCH READ IF !(LOESCH)='J' DELETE PACK ERASE § 12,0 SAY 'Es wurden die Daten der Person '+MFAM+'; gelöscht!!!' § 14,0 SAY 'Bitte keine Eingaben machen; es werden; die Indexdateien' § 15,0 SAY 'aktualisiert.' INDEX ON FAM TO ALPHA INDEX ON VOR TO BETA INDEX ON VORE TO GAMA ENDIF RELEASE ALL RETURN Ende von DO LOESCH.CMD 13. SUCH.CMD * SUCH.CMD (Sucht nach gegebenen Kriterien) STORE F TO ENDE DO WHILE #-0 ERASE § 12,0 ?' Den Familiennamen ',MFAM,' gibt es nicht !' ? ?' Bitte Eingabe wiederholen oder mit Return abbrechen ! 9 ? ACCEPT ' Familienname der gesuchten Person ' TO MFAM IF MFAM =' ’ STORE T TO ENDE RETURN ENDIF FIND &MFAM STORE # TO R:NR ENDDO RETURN ^ Ende von SUCH.CMD Ql HiMMs FACHBUCHTIP: rrnnk Qiittlof Applesoft BASIC Applesoft BASIC Tips und Tricks von Frank Bühler 1985, 241 S.,40Abb., kart., DM 38— ISBN 3-7785-1094-0 Begleitdiskette DM 44,— ISBN 3-7785-1291-9 Das Buch enthält eine komplette Beschreibung aller möglichen Applesoft-Befehle und zeigt an einem Bei¬ spiel die erforderliche Syntax auf. Ausgearbeitete Un¬ terroutinen können leicht in eigene Programme über¬ nommen werden. Das Buch zum Apple-Writer II/Ile von Hans Gabriel 1986, 157 S., kart., Begleitdiskette DM 44,— DM 35,— ISBN 3-7785-1337-0 ISBN 3-7785-1234-X „Das Buch zum Apple-Writer II/Ile“ wendet sich an alle, die dieses Textverarbeitungssystem schon einset- zen oder noch einsetzen wollen. Carl Ufrich Wasserrnönri Apple IIc Handbuch für Anwender und Programmierer Apple IIc Handbuch für Anwender und Programmierer von Carl-Ulrich Wassermann 1985, 324 S., zahlr. Abb., kart., DM 35,— ISBN 3-7785-1157-2 Wenn Sie die Leistungsfähigkeit Ihres Apple IIc bisher noch nicht ausschöpfen konnten, brauchen Sie dieses Buch. Peeker 6/86 57 DTACK-68000-Boarcl Ein Erfahrungsbericht von Wolfgang Trier Wir alle kennen das Problem nur zu gut: Für viele Aufgaben ist die alte 6502-CPU des Apple II einfach zu langsam, woran auch der Einsatz einer Z80-Karte nichts Entscheidendes ändert. Also was tun? Ein neues System scheidet meist aus zwei Gründen aus: Die Menge der geschriebe¬ nen und gesammelten Software verbieten einen Systemwechsel, und außerdem trennt man sich von einer bekannten Ma¬ schine nur sehr ungern, da dies mit gro¬ ßem Zeit- und Kostenaufwand verbunden ist. Um diesen Mißstand zu beheben, gibt es eine Erweiterung, die auf der Basis des MC 68000 von Motorola arbeitet, der ne¬ ben seiner internen 32-Bit-Struktur auch noch mit der 12,5fachen Taktfrequenz läuft: Das DTACK-Board. Es handelt sich hierbei um ein externes Board, das über ein Interface in einem beliebigen Slot mit dem Apple verbunden wird. Dessen mit 12,5 MHz getakteter Pro¬ zessor greift ohne „wait States“ auf stati¬ sches RAM zu. (Anm.d.Red.: Zum Ver¬ gleich arbeitet der Macintosh wegen der Wartezyklen mit ca. 5,6 MHz.) Die Karte ist sehr sauber mit Präzisions¬ sockeln aufgebaut und macht einen recht aufgeräumten Eindruck. Die Ein- und Aus¬ gabe erfolgt wahlweise über den Apple (Interface-Karten) oder ist auch direkt vom Expansion-Bus des DTACK-Boards mög¬ lich. Der DMA-Kanal des Apple wird nicht blockiert, so daß Harddisk-Controller usw. weiterhin unverändert verwendbar sind. Auch eine Floating-Point-Prozessorkarte mit dem NS 16081 ist erhältlich und wird von der Software unterstützt. Der 68000 und der 6502 des Apple arbei¬ ten parallel (gleichzeitig). Dadurch läßt sich der als intelligentes I/O genutzte App¬ le z.B. als Printer-Spooler einsetzen, ohne daß der 68000 durch die Printer-Ansteue- rung blockiert wird. Erfreulicherweise ist auch die Software- Unterstützung hervorragend, so daß alle Pascal-, Fortran- und Modula-Programme in UCSD-P-Code ohne neue Übersetzung unverändert laufen. Ferner ist das von Di¬ gital Research entwickelte und weit ver¬ breitete CP/M 68K, das auch einen C- Compiler enthält, lauffähig. Darüber hinaus ist ein von einer deut¬ schen Firma entwickelter und in 68000- Code geschriebener und daher sehr schneller 68000/68020-Assembler erhält¬ lich. 1. Das UCSD-System 1.1. P-Code-Interpreter INTER86 Das gesamte UCSD-Betriebssystem ist durch einen P-Code-Interpreter in 68000- Code mit Namen INTER68 voll verfügbar. Als besonders angenehm, vor allem für die immer zahlreicher werdenden Pascal- Freunde, erweist sich die Tatsache, daß mit INTER68 nicht nur eine enorme Ge¬ schwindigkeitsverbesserung der alten Programme möglich ist, sondern viele zu¬ sätzliche Features geboten werden, die man bisher schmerzlich vermißt hat. INTER68 interpretiert P-Code, wie er im „Apple Pascal Operating System Referen¬ ce Manual“ definiert ist und ist daher auf¬ wärtskompatibel zum Apple-Pascal. So laufen z.B. alle von Apple mit dem UCSD- System gelieferten Demo-Programme oh¬ ne erneute Übersetzung oder Modifizie¬ rung sofort, nur eben sehr viel schneller (ebenso die Turtlegraphics-Routinen). INTER68 erlaubt Compiler-Raten von über 2000 Zeilen pro Minute, was gegenüber den bekannten 300 Zeilen pro Minute auf dem Apple allein schon einen riesigen Fortschritt darstellt. Wo man früher bei lan¬ gen Programmen minutenlang warten mußte, nur um festzustellen, daß kurz vor dem Programmende noch ein Syntax- Fehler saß, macht sich das bei mir heute kaum negativ bemerkbar, da die Dots des Compilers ohnehin schneller sind als man zählen kann, so daß sich kaum ein nen- neswerter Zeitverlust ergibt. Das Program¬ mieren ist jetzt weit weniger ermüdend und macht viel mehr Spaß. Außerdem sind die Programme typischerweise zwischen 12- und 20mal schneller als bisher, je nach Grad des verwendeten I/O (z.B. Diskzu¬ griff etc., der natürlich nicht beschleunigt werden kann). INTER68 liegt ab Adresse $10.000 auf¬ wärts und bietet einen 60K-Arbeitsspei- cher; die unteren 4K können nicht benutzt werden, da sie vom Bootstrap-ROM benö¬ tigt werden. Vor allem die Systempro¬ gramme profitieren ganz besonders von diesem zusätzlichen Platz. Programme, die bisher auf die Compiler-Swapping-Op- tion angewiesen waren, können jetzt häu¬ fig ohne zeitaufwendiges Disk-Swapping compiliert werden. Der Editor kann bis zu 60 (!) Blocks im Arbeitsspeicher halten (oder 64. wenn Sy¬ stem Swapping eingeschaltet ist). INTER68 läßt mit dem CONFIGURE-Pro- gramm eine Aufteilung des Speichers in Arbeitsspeicher und RAM-Disk zu, deren Volume-Nummer frei definierbar ist. Es ist auch möglich, mit CONFIGURE die RAM- Disk als Boot-(Root-)Volume zu instal¬ lieren. Je nach Speicherausbau greift das System kaum noch auf die Diskette zu, was neben der Ruhe auch eine enorme Geschwindig¬ keitsverbesserung im Sprung zwischen den verschiedenen Systemebenen oder - Programmen bedeutet. 1NTER68 benutzt das BIOS des Apple- Pascal, um mit der Peripherie zu kommu¬ nizieren (liegt in der 16K-Karte). Solange die bekannten Aufruf-Konventionen be¬ folgt werden, kann sich z.B. jeder Anwen¬ der auch ein eigenes Host-Interface schreiben, da man am mitgelieferten Source¬ code des Standard-Software-Interfaces genau sehen kann, wie die Kommunika¬ tion zu erfolgen hat. Vier spezielle BIOS- Aufrufe (UserRead, UserWrite, UserSta- tus, UserUnit) wurden aufgestellt, um die Unit-Nummern von 128 bis 255 zu nutzen. So kann z.B. mit anwenderspezifischer Peripherie (A/D-Wandler, 640K-Drive usw.) über die Standard-Pascal-Funktio- nen BLOCKREAD/BLOCKWRITE komfor¬ tabel kommuniziert werden. 1NTER68 kann Code von positivem und negativem Byte-Geschlecht interpretieren (Apple Pascal kann nur negatives Byte- Geschlecht interpretieren); daher können die Programme Segmente beider Byte- Geschlechter beinhalten, was die Verar¬ beitungsgeschwindigkeit nicht beeinflußt. 1.2. Lieferumfang Geliefert werden auf einer Diskette folgen¬ de Files: SYSTEM.68000 - enthält INTER68 im Phase-Zero-Format. SYSTEM.COMPILER - ein modifizierter 58 Peeker 6/86 Compiler, der automatisch das Byte-Flip- pen berücksichtigt und Code generiert, für den die transzendenten Funktionen, die schon im INTER68 enthalten sind, zu¬ gänglich sind. SYSTEM.LIBRARY - enthält Longinte- ger, Turtlegraphics und Applestuff, die in 68000-Code geschrieben sind. MAKEPASCAL - Dieses Utility-Pro¬ gramm überführt eine Kopie des SY¬ STEM.PASCAL in einen File 68000.PAS- CAL. MAKEPASCAL patcht das Opera- ting-System an sechs Stellen, wie man am mitgelieferten Textfile MAKEPASCAL. TEXT leicht ersehen kann. UPLOAD - transferiert INTER68 auf das DTACK-Board. Wen interessiert, wie das geschieht, schaut sich am besten die Files UPLOAD.PASTEXT und UPLOAD.ASM. TEXT an. CALL68 - startet INTER68 im 68000 und die Kommando-Prüfroutinen im Software- Interface (apple-seitig). Auch wird hier die höchstmögliche RAM-Adresse auf dem DTACK-Board gesetzt, um die Möglichkeit einer einfachen Parameteränderung zu gewähren. Alle Interface-Routinen liegen auch als Source-Code in den Files CALL 68.AS1.TEXT und CALL68.AS2.TEXT vor, die in ihrer Bedeutung im Handbuch aus¬ führlich beschrieben sind. UPLOAD und CALL68 sind getrennt, da man normalerweise nach einem Rück¬ sprung in das Apple Pascal den im DTACK-Board liegenden Interpreter nicht neu laden muß. FLIP - flippt 16-Bit-Einheiten im Block 0 eines jeden spezifizierten Files. Wenn FLIP zweimal angewendet wird, ist der ursprüngliche Zustand wieder hergestellt. Man muß z.B. beim Linken von Files unter¬ schiedlichen Byte-Geschlechtes flippen. 1.3. Neuer Datentyp Double Besonderer Erwähnung bedarf weiterhin der neue Datentyp Double, der doppelt genaue Gleitkomma-Arithmetik mit 15 (!) signifikanten Stellen ermöglicht. Die lOOOfache Bearbeitung der Zeile a : = tan (arctan (exp (In (sqrt (sqr (a))))))/a - 1 ; ergab einen Fehler von nur 3.939 E-17, im Gegensatz zu 2.269 E-7 des Apple Pascal, was eine Genauigkeitssteigerung um den Faktor 10.000.000.000 darstellt. Wer will, kann für DM 195.- einen Native Code Generator (NCG68) erstehen, der vorhandene Programme noch einmal um bis zu 8ma! schneller laufen läßt. Man kann sogar wählen, ob man die Optimierung des gesamten Programmes oder nur eines Segmentes wünscht. pRodukTE 1.4 Macro-Assembler ASM68020 Ein weiterer wesentlicher Bestandteil des Pascal-Systems ist ein hervorragender Macro-Assembler. Mit ASM68020 erhält man einen in 68000 geschriebenen Macro-Assembler für den 68000, 68010 und den 68020 mit „Condi- tional Assembly“ und lokalen Labels. Die Codefiles des ASM68020 können an alle Pascal- oder Fortran-Programme „gelinkt“ werden oder aber auch als selbständige Programme ausgeführt werden. Es handelt sich dabei um einen „one pass"-Assembler und ist damit wesentlich schneller als zweistufige Assembler. Die¬ sen Vorteil muß man jedoch mit einer län¬ geren Symbol Table und kleinen Ein¬ schränkungen im Gebrauch von Labels bezahlen. Wenn ASM68020 auf einer RAM-Disk vor¬ liegt, sind Zeiten von über 3000 Zeilen pro Minute bei einem 25.000-Zeilen-Pro- gramm möglich, ansonsten liegt der Durchsatz immerhin noch bei etwas über 1500 Zeilen pro Minute. Der Gebrauch des ASM68020 entspricht etwa dem, was ich vom Apple-Pascal- 6502-Assembler gewohnt war. Der File SYSTEM.ASSEMBLER enthält sowohl den Assembler als auch die Opcodes. Wenn 68020.ERRORS verfügbar ist, gibt der Assembler nicht nur die Nummer, son¬ dern auch den Fehler genau an. Der gleiche Assembler steht auch unter CP/M 68K zur Verfügung. 2. Das CP/M-68K-System Eine Diskette (CPM68) ermöglicht die In¬ stallierung des CP/M-68K-Betriebssy- stems. Mit diesem CP/M von Digital Research ist es möglich, auf dem DTACK-Board Pro¬ gramme in den Sprachen Pascal, Modula, Fortran, C (wird mitgeliefert) und Forth zu schreiben. Auch der aus dem P-Code- System von INTER68 bekannte schnelle Assembler ASM 68 läuft unter CP/M weit schneller als der von Digital Research mit¬ gelieferte 68000-Assembler. 2.1. Lieferumfang Auf der CPM68-Diskette befinden sich fol¬ gende Files: CP/M.SYS - Objekt-File des BIOS für das Apple-68000-System. UPLOAD.COM - Transferiert CP/M.SYS und CP/M.REL (relozierbare Version des CP/M 68K von Digital Research) zum 68000-Board. CALL68.COM - Startet sowohl das 68K- Operating-System als auch apple-seitig die „Command Fetch Loop“, CONFIG.COM - Paßt das CP/M-Opera- ting-System den individuellen Wünschen an. Mit dem CONFIG-Programm kann jeder das System auf seine eigenen Bedürfnis¬ se zuschneiden. Das Programm ändert folgende Parameter: - Länge der TPA (Default: 96K = $00F000) - Höchste RAM-Adresse (Default: 96K = $018000) - Adresse der USER-INPUT-Routine (De¬ fault: $000000) - Adresse der USER-OUTPUT-Routine (Default: $000000) - Slot-Nummer des 68000-interfaces (De¬ fault: 2) Unter CP/M 68K können zusätzlich 8 ver¬ schiedene anwenderspezifische Ein- und Ausgaberoutinen (USER-IN PUT/USER¬ OUTPUT) installiert werden. Die Anfangs¬ adressen der USER-INPUT-/USER-Out- put-Routinen werden mit CONFIG defi¬ niert. Alle Devices (z.B. Harddisks, 640K-Drives usw.), die unter Z80-CP/M verfügbar sind, werden durch CALL68 automatisch er¬ kannt und stehen dem Benutzer unter CP/ M 68K ohne zusätzliche Installierung un¬ verändert zur Verfügung. Beide Betriebssysteme, Z80-CP/M und CP/M 68K, residieren im RAM-Bereich des Systems, was die Ausnutzung der Vorteile des jeweiligen Systems unproble¬ matisch macht. Dies ermöglicht die simultane Benutzung von bestehenden Z80-Programmen (z.B. Wordstar, dBase etc.) und 68000-Pro- grammen. Darüber hinaus können auf der gleichen Diskette Z80-CP/M- und CP/M- 68K-Programme gemischt gespeichert werden, da beide Betriebssysteme das gleiche Diskettenformat verwenden. Durch das Suffix „.68K“ und „.COM“ wird die Zugehörigkeit zum jeweiligen Be¬ triebssystem automatisch erkannt und macht so einen Systemabsturz durch Ver¬ wechslung unmöglich. Je nach Speicherangebot wird automa¬ tisch eine Pseudo-Disk angelegt, die den Platz zwischen dem Ende der TPA und der höchsten RAM-Adresse nutzt. Die Bezeichnung der Pseudo-Disk ist zwi¬ schen „A:“ und „P:“ frei wählbar. Diese logische Einheit kann in der glei¬ chen Weise wie eine externe Floppy ge¬ nutzt werden, nur daß die Geschwindigkeit des Datentransfers wesentlich steigt. Man kann auf P: Files editieren, assemblieren, compilieren, alles natürlich schneller als mit einer Harddisk. Peeker 6/86 59 Dank der sehr ausführlichen Dokumenta¬ tion ist es auch hier ohne weiteres mög¬ lich, eigene Treiber zu schreiben und ei¬ gene Karten (wie z.B. A/D-D/A-Wandler, Graphic Boards usw.) unter CP/M einzu¬ binden. Es besteht ebenfalls die Möglich¬ keit, Daten direkt über das DTACK-Board ein- und auszugeben. Leider ist in der Bundesrepublik wegen Ein Erfahrungsbericht von Herwig Cuypers Peeker-Leser und Tester Ingenieur H. Cuypers ist Belgier, der seit seiner Schui- zeit keinen längeren deutschen Text mehr geschrieben hat Trotzdem ist ihm der deutschsprachige Bericht, den wir natür¬ lich etwas überarbeiten mußten, hervorra¬ gend gelungen. Versetzen Sie sich in die Lage, Sie müßten einen Apple-Bericht in Französisch schreiben, und Sie werden sich über die sprachliche Leistung von Herrn Cuypers nur wundern können, us 1. Appleworks und Apple II+ Das integrierte Softwarepaket Appleworks wurde bekanntlich nur für die neueren Ap¬ ple-Typen Ile und llc entwickelt. Da Ap¬ pleworks verstärkt vom RAM der erweiter¬ ten 80-Zeichenkarte Gebrauch macht, ist es grundsätzlich auf dem Apple II+ nicht lauffähig. Auch eine 128K-RAM-Karte bringt keine Abhilfe, da diese nicht in den gesamten Speicherbereich des Mother¬ boards gemappt ist. Eine eigene Version für den Apple ll-H wurde von Apple, wohl auch in Hinblick auf die Flut der kompatiblen Rechner, nicht herausgebracht. Nun wird jedoch seit einiger Zeit in den USA von der Firma Norwich Data Services Ltd. das Patchprogramm Plusworks ange- boten. Dieses ist in den drei Versionen Plusworks, Plusworks XM und Plusworks XMP erhältlich. 2. Plusworks Plusworks patcht die Appleworks-Boot- Diskette. An Hardware benötigt es einen Apple IH- mit Applesoft-BASIC im ROM, 64K RAM, eine Tastatur mit Groß- und Kleinschreibung (Shift-Key-Modifikation wird unterstützt) und eine 80-Zeichenkar¬ te. Angeboten wird es für ca. $23 inkl. Porto und Verpackung. der amerikanischen Ausfuhrbestimmun¬ gen das Original-DTACK-Board der Firma Digital Acoustics, Santa Ana, Ca. nicht zu beziehen. Das Ingenieurbüro Fuchs in Aa¬ chen stellt jedoch eine verbesserte Version her, so daß man auch bei uns nicht auf den enormen Geschwindigkeitsvorteil eines am Apple betreibbaren 68000 ver¬ zichten muß. Plusworks XM stellt die gleichen Anforde¬ rungen an die Hardware, bietet auch die gleichen Möglichkeiten, unterstützt jedoch zusätzlich eine Reihe von RAM-Karten bis 1024K. Plusworks XMP schließlich unter¬ stützt noch zusätzlich die in den USA sehr verbreiteten PCPI- und ALS-CP/M-Karten mit jeweils 64K RAM. Die XM- und XMP- Versionen können auch auf einem Apple Ile sinnvoll eingesetzt werden, wenn man etwa den Desktop-Bereich mit einer RAM- Karte erweitern oder statt der erweiterten 80-Zeichenkarte lieber seine alte Video¬ term verwenden möchte. Beide Program¬ me sind für jeweils $53 inkl. Porto und Verpackung erhältlich. 3. Plusworks XM Ich selbst bin (immer noch) Besitzereines Apple ll-t-, ausgerüstet mit einer Videx- Videoterm und einer Saturn 128K-Karte. Ich bestellte daher in den USA Plusworks XM. Ungefähr 2 Wochen nach der Bestel¬ lung traf es gut verpackt per Post bei mir ein. Das Programm wird auf einer einseiti¬ gen, kopierbaren 5 1/4-Zoll-Diskette ge¬ liefert. Die Dokumentation beschränkt sich auf eine zehnseitige Broschüre in engli¬ scher Sprache. 4. 80-Zeichenkarten Plusworks XM unterstützt folgende 80- Zeichenkarten: -Videx Videoterm (mit inversem Zweitzei- chensatz) - Ultraterm - Viewmax 80 - Franklin - Viewmaster 80 - Magnum 80 - Wizard 80 - Smarterm II Die 80-Zeichenkarte muß wie üblich in Slot 3 installiert sein. 5. RAM-Karten In der mir vorliegenden Version unterstützt Plusworks XM alle RAM-Karten der Firmen Legend Industries, Titan/Saturn, Abacus und Prometheus sowie die dazu kompati¬ blen. Da der Apple II+ über 64K RAM verfügen muß, ist außerdem eine 16K- Karte in Slot 0 erforderlich. Hat die RAM- Karte mehr als 128K, kann der über 128K hinausgehende Bereich zusätzlich als RAM-Disk verwendet werden. 6. Installation Der gesamte Installierungsvorgang findet im Laufwerk 1 statt. Dazu wird die Plus- works-XM-Diskette eingelegt und geboo¬ tet. Nach dem Booten fordert Plusworks zum Einlegen der Appleworks-Startup- Diskette auf. Ist dies geschehen, fordert Plusworks wenig später zum erneuten Einlegen der Plusworks-Diskette auf. Kurz danach erscheint ein Menü mit einer Aus¬ wahl von verschiedenen 80-Zeichenkar- ten. Nach Eingabe der verwendeten 80- Zeichenkarte schaltet Plusworks auf 80- Zeichendarstellung um und testet den 80- Z/Z-Bildschirm. Zum letzten Mal fordert Plusworks dann zum Einlegen der Ap¬ pleworks Startup-Diskette (oder besser ei¬ ner Kopie) auf. Die Plusworks-Diskette benötigt man nun nicht mehr. Das Patchprogramm bittet nun um Antwort auf verschiedene Fragen. Zuerst kommt die Frage nach der Art der Tastatur. Man hat die Wahl zwischen einer ASCII-Tasta- tur und einer Apple-Tastatur mit Shift-Key- Modifikation. Die nächste Frage bittet um Angabe einer Ersatztaste für die beim Ap¬ ple ll-H fehlende Delete-Taste. Plusworks empfiehlt Control-Q. Als nächstes erfragt Plusworks eine Ersatztaste für die offene Apfel-Taste. Plusworks schlägt hier Con- trol-0 vor. Ersatzweise kann aber auch die Drucktaste 1 des Joysticks verwendet werden, eine Möglichkeit, die mir etwas umständlich erscheint. Nun fragt Plusworks, ob ein Druckerpatch notwendig Ist, warnt jedoch gleichzeitig davor, vorschnell mit „Y“ zu antworten. Es empfiehlt statt dessen, zuerst Appleworks so auszuprobieren, um festzustellen, ob der Patch überhaupt vonnöten ist. Der Rest des Konfigurationsvorgangs läuft weitgehend automatisch ab, Plusworks XM fragt nur noch nach dem Slot der RAM-Karte. Diese wird automatisch identi¬ fiziert. Verfügt sie über mehr als 128K, fragt Plusworks noch, ob der verbleibende Speicherbereich als RAM-Disk verwendet werden soll. Appleworks ist jetzt auf dem Apple \\-\- lauffähig. Wird irgendeine Taste gedrückt, bootet die Diskette. Plusworks Appleworks auf dem Apple 11+ 60 Peeker 6/86 7. Die Bedienung des modifizierten Appleworks Die geänderten Tastenfunktionen sind gut gewählt und erlauben ein bequemes Ar¬ beiten mit Appleworks. 7.1. Tastatur allgemein Alle „Offener-Apfer'-Befehle von Ap¬ pleworks können mit der gewählten Er¬ satztaste simuliert werden. Will der Benut¬ zer z.B. eine Hardcopy des Bildschirmin¬ halts ausdrucken, tippt er zuerst auf „Con- trol-0“, dann auf „H“. Nachdem die Er- satz-Apfeltaste gedrückt wurde, erscheint an der aktuellen Cursorposition ein inver¬ ses „ + “. Um dies nach versehentlichem Drücken von Control-0 wieder zum Ver¬ schwinden zu bringen, muß man einen ungültigen „Apfelcode“ eingeben, z.B. Control-O - 0. Zieht der Anwender es jedoch vor, die Joystick-Taste 1 als Apfeltaste zu verwen¬ den, muß diese gleichzeitig mit dem be¬ treffenden Codezeichen betätigt werden. Auf dem Apple II+ gibt es bekanntlich nur zwei Cursortasten. Plusworks XM sieht als Ersatz für einen Cursorblock den z.B. vom Wordstar bekannten „ESDX-Cluster“ vor. Die vorhandenen Pfeiltasten können je¬ doch ebenso wie der „ESDX-Cluster“ verwendet werden. In diesem Cluster ent¬ sprechen: Control-E = Cursor nach oben Control-D = Cursor nach rechts Control-X = Cursor nach unten Control-S = Cursor nach links Auf der Tastatur sieht das wie folgt aus: E S D X Abhängig von der Version der Tastatur werden die Cursorbewegungen, bei de¬ nen man im ungepatchten Appleworks die „Offener-Apfel “-Taste betätigt, unter¬ schiedlich ersetzt. 7.2 Original Apple-ll-h-Tastatur Hier wird die „Esc“-Taste als Lead-in-Ta- ste verwendet. Will man jedoch ein echtes „Escape“ erzeugen, muß man zweimal die „Esc“-Taste betätigen. Die „Apfel- Cursorbewegungen“ (eine Seite nach oben/unten, ein Wort rechts/links) werden durch gleichzeitiges Betätigen der Con¬ trol- und Shifttaste mit E, S, D oder X erzeugt. Delete erhält man mit Shift-Links- pfell, Control-A fungiert als Caps-Lock- Taste. Eine Reihe von Sonderzeichen kann man erzeugen, indem man erst die Escape-Taste und danach ein bestimmtes Zeichen tippt. „Tab“ erzeugt man mit ^ pRodukTE Control-I, den umgekehrten „Tab“ mit Shift-Control-L 7.3. ASCII-Tastatur Hier ist die Sache etwas einfacher. Der „ESDX“-Cluster wurde einfach um fol¬ gende Codes erweitert: Control-A = ein Wort nach links Control-F = ein Wort nach rechts Control-R = eine Seite nach oben Control-C = eine Seite nach unten Control-V = umgekehrter „TAB“-Befehl Auf der Tastatur sind diese Tasten etwa so angeordnet: E R A S D F X C V Diese Anordnung prägt sich meines Erachtens sehr leicht ein und ermöglicht ein bequemes Arbeiten. 8. RAM-Disks Da Appleworks ein ziemlich großes Pro¬ gramm ist, können nicht alle Module auf einmal in den Hauptspeicher geladen wer¬ den. Daraus resultiert ein relativ häufiger Zugriff auf das Laufwerk 1, was natürlich Zeit kostet. Um den Zugriff auf das Haupt¬ laufwerk zu minimieren, verfügt Ap¬ pleworks über eine dynamische Speicher¬ verwaltung. Beim Startup-Prozeß werden soviele Module wie möglich in den freien Desktop-Speicher geladen. Ist der Desk- top-Berelch groß genug, braucht jedes Modul nur einmal geladen zu werden. Da jedoch die Benutzerdaten höchste Priorität besitzen, verringert sich der freie Desk- topbereich um so mehr, je größer die Datenmenge wird. So werden zunehmend Module aus dem freien Desktopspeicher gelöscht, und Appleworks muß wieder häufiger auf das Laufwerk 1 zugreifen. Werden nun RAM-Karten mit einer Spei¬ cherkapazität von 256K und mehr verwen¬ det, bietet Plusworks zwei verschiedene Arten der RAM-Organisation an. 8.1. Dynamische RAM-Disk Wird diese Option gewählt, lädt Ap¬ pleworks beim Startup-Prozeß alle Pro- gramm-Module in den freien Desktop-Be- reich. Die Startup-Prozedur wird daduch recht langwierig, danach aber greift Ap¬ pleworks nur noch sehr selten auf die Boot-Diskette zu. Diese Funktion steht bei größeren RAM-Karten automatisch zur Verfügung, muß jedoch beim Startup-Pro¬ zeß explizit aufgerufen werden. Von Vorteil ist hierbei der große Desktop- Bereich, doch steht dem die lange Boot¬ dauer nachteilig gegenüber. Bootet man jedoch Appleworks einmal und arbeitet dann sehr lange Zeit damit, ist diese Mög¬ lichkeit durchaus sinnvoll einzusetzen. 8.2. Feste RAM-Disk Hier wird die RAM-Karte als echte RAM- Disk verwendet. Der Speicher wird in fe¬ sten Desktop-Bereich und Pseudo-Lauf¬ werk unterteilt. Von Nachteil Ist der Verlust von 136K bis 144K Desktop-Speicher. Demgegenüber dauert der gesamte Star¬ tup-Prozeß nur ca. 20 Sekunden (!) und man kann die Appleworks-Diskette aus dem Laufwerk herausnehmen und eine Datendiskette einlegen. 9. Druckerpatch Dieser Patch setzt bei jedem gesendeten Zeichen das 8. Bit. Einige Druckerschnitt¬ stellen scheinen diesen Patch zu benöti¬ gen, die meisten jedoch nicht. Plusworks XM empfiehlt diesen Patch nur, wenn bei der Hardcopy oder der Ausgabe von Daten Probleme auftreten. Jedenfalls brauchten weder mein Epson FX-80 noch mein Mannesmann-Tally MT-80 diesen Patch. Das Handbuch zu Plusworks nennt eine Reihe von Symptomen, bei denen der Druckerpatch angebracht isL 10. Fazit Für ca. $53 erhält man ein Patchpro¬ gramm, das Appleworks wirklich uneinge¬ schränkt auf dem Apple ll-k lauffähig macht. Allerdings ist eine RAM-Karte mit mindestens 128K dringend erforderlich. Einen Desktop-Bereich von 10K kann ich jedenfalls nur noch als lächerlich bezeich¬ nen. Mit einer 128K-Karte beträgt er dann immerhin 136K und ist damit genauso groß wie eine ProDOS-Datendiskette. Die mitgelieferte Broschüre enthält alle not¬ wendigen Informationen: das amerikani¬ sche Englisch bereitet jedoch vielleicht manchen Anwendern Probleme. Ich arbeite nun schon seit einigen Mona¬ ten mit dem gepatchten Appleworks auf einem Apple IH- und einem -Kompatiblen mit Voll-ASCil-Tastatur. Das angepaßte Appleworks erscheint mir auf dem kompa¬ tiblen Rechner wegen der Tastatur ein we¬ nig benutzerfreundlicher. Nur ein einziges Mal trat ein kleines Pro¬ blem auf. Nachdem ich aus dem Apple IH- irgendeine Karte entfernt hatte, lief mit Ap¬ pleworks überhaupt nichts mehr. Es boo¬ tete zwar, doch konnte das Datum nicht geändert werden, und im Hauptmenü wur¬ de jede Eingabe mit einem fröhlichen Piepston quittiert. Nach sehr langer Feh¬ lersuche stellte ich jedoch fest, daß ich beim Herausnehmen der Karte aus Verse¬ hen den Joystick-Stecker berührt und da¬ bei einen Fehlkontakt ausgelöst hatte. Die¬ ser Fehlkontakt erzeugte einen ständigen „offenen Apfel“. Nachdem der Stecker wieder fest in seinem Sockel saß, war das Problem behoben. Peeker 6/86 61 Z-RAM für den Apple llc Ein Erfahrungsbericht von Ulrich Tönnies 1. Gegenstand Das Z-RAM-Board der amerikanischen Firma Applied Engineering stellt eine CP/ M-Karte mit zusätzlicher Speichererweite¬ rung dar. Es ist ausgestattet mit einem Z80-Prozessor sowie RAM-Chlps für eine Speichererweiterung um 256K bzw. 512K (die 256K-Version kann durch Einstecken von geeigneten Chips auf 512K erweitert werden). Zum Lieferumfang gehören ein Handbuch sowie diverse Software. Die fol¬ genden Angaben beziehen sich auf die 512K-Version von Z-RAM. 2. Installation Der Einbau von Z-RAM in den Apple llc geschieht anhand der ausführlichen An¬ weisungen des (englischen) Handbuchs. Bis auf die im folgenden genannten Punk¬ te ist er problemlos zu bewältigen. Zu¬ nächst ist das Ilc-Gehäuse nach Lösen der 6 Gehäuseschrauben zu öffnen. Nach Ent¬ fernen des Rück-Panels des llc sollte man dann nicht versuchen, die „Nase“ am vor¬ deren Ende des llc aufzuhebeln, wie im Z- RAM Handbuch beschrieben (geht ziem¬ lich schwierig), sondern besser erst zwei „ Rasten" am Disketteneinschub (vgl. Abb. 1: Disketteneinschub*) aufhebeln, das Oberteil des Ilc-Gehäuses ist dann ganz leicht hochzuklappen. Danach kann man die Tastatur zur Seite ziehen. Es werden dann die 65C02-CPU und der MMU-Chip des llc aus ihren Fassungen ^Bezieht sich auf Abbildung im Z-RAM-Handbuch. Vgl, die 4 Abbildungen in Peeker, 2/86, S. 63 zur Cirtech- Z-80-Karte für den llc, gezogen und in entsprechende Fassun¬ gen auf dem Z-RAM-Board gesteckt. Da¬ nach ist das Z-RAM-Board in die freige¬ wordenen Sockel der Ilc-Platine zu stek- ken. Das geht u.U. zunächst scheinbar nicht, es „wackelt“. Einen hilfreichen Hin¬ weis hierzu findet man leider erst am Ende des Z-RAM-Handbuchs; Apple „vergißt“ bei der Montage des llc wohl ganz gern, einige Plastikstreifen aus CPU- und MMU- Fassung zu entfernen. Hat man dies dann selbst erledigt, so paßt Z-RAM aber genau. Schließlich ist noch das eingebaute Lauf¬ werk des lic zu lösen, an den darunter befindlichen TMG-Chip ist mittels eines „Clips“ das Z-RAM anzuschließen. Beim Einbau des Laufwerks achte man darauf, die Laufwerksschrauben nicht zu fest „an¬ zuknallen“, das könnte wegen des „auf¬ tragenden Clips“ zu Platzprobiemen mit dem Steppermotor des Laufwerks führen. Schließlich baut man den llc wieder zu¬ sammen und nimmt Z-RAM in Betrieb. 3. Einsatzmöglichkeiten von Z-RAM 3.1. CP/M Mit dem Board kommt auch das Betriebs¬ system CP/AM 4.0, mit welchem sich auch das ca. 50seitige Handbuch neben der Installationsanweisung vorwiegend beschäftigt. Ein Manko dieses Betriebssy¬ stems ist, daß es im Lieferzustand nicht an den llc angepaßt ist: Mittels CONFIGIO hat man die Terminalemulation und Tasta¬ turdefinition selbst vorzunehmen. Neben dem Betriebssystem wird noch RAM-Disk-Software mitgeliefert. Man kann damit ein Laufwerk C: mit einer Ka¬ pazität von 576K simulieren. Außerdem für die „CP/M-Weit“ gedacht sind noch eini¬ ge Utilities sowie Patchprogramme für Wordstar V3.3x, mittels deren man Word¬ star an den llc anpassen kann. Erste Tests mit gängigen Programmen zeigten, daß keine allzugroßen Probleme zu erwarten sein dürften. Der Z80 ist offenbar mit 2MHz getaktet. Geschwindigkeitsvergleiche zu „gängi¬ gen“ CP/M-Karten zeigten keine wesent¬ lichen Unterschiede (man sollte sich z.B. durch die Aussagen des Pandasoft-Ergän- zungskataiogs nicht auf 4MHz einrichten). Die Karte bootet zudem CP/M 2.23, nicht aber CP/M 2.20. Programme, die auf Dis¬ ketten mit CP/M 2.20 vorliegen, sind aber nach Kopieren des CP/AM 4.0 auf diese Disketten in aller Regel lauffähig. 3.2. DOS 3.3 Für DOS 3.3 kann man ebenfalls die Spei¬ chererweiterung als RAM-Disk nutzen. Es werden die Laufwerke S3,D1-D3 simuliert mit 744 bzw. 749 nutzbaren Sektoren. Ein für diese Situation gepatchtes FID wird mitgeliefert. Außerdem läßt sich DOS 3.3 durch den SPEEDOS-Patch (im Lieferum¬ fang) „schnell“ machen. Probleme dürften auch hier nicht zu erwarten sein, z.B. lief der gegen DOS-Patches sonst recht anfäl¬ lige TASC-Compiier mit SPEEDOS auf der RAM-Disk einwandfrei. Die Benutzung von Z-RAM unter DOS 3.3 wird im Hand¬ buch nicht weiter erläutert, jedoch durch ein menügeführtes Programm leicht er¬ möglicht. 3.3. ProDOS Hier gelten sinngemäß die Ausführungen zu DOS 3.3. Es ist möglich, nicht den gesamten Zusatzspeicher von Z-RAM für eine RAM-Disk heranzuziehen, sondern nur einen Teil (64K-Banks sind „sperr¬ bar“). Die RAM-Disk-Software unter Pro- DOS zieht auch nicht die „oberen“ 64K des llc, wo die Standard-ProDOS-RAM- Disk installiert wird, zum Speichern heran. Dadurch können Programme, die die 128K der Mutterplatine des llc nutzen, weiterhin eingesetzt werden, z.B. die Programme der Utility-Sammlung EXTRA-K von Bea- gle Bros. Das darin enthaltene Programm Extra.Variables ermöglicht z.B. einen Speicherplatz von ca. 35.000 Bytes für das Applesoftprogramm und zusätzlich ca. 60.000 Bytes für Variablen, und Z-RAM bietet dann die 512K RAM-Disk. 62 Peeker 6/86 pRodukTE Peeker-Sammeldisk # 18 Einzelpreis DM 28,-; Fortsetzungs¬ preis DM 20- Achtung: Diskette hat sowohl UCSD-Pascal- als auch DOS-3.3-Directory. D1SK18: CALLDUMP.TEXT 40 16-May-86 6 CALLDUMP2,TEXT 26 16-May-86 46 SUPERDUMP.TEXT 14 16-May-86 72 SUPERDUMP.LIB 10 16-May-86 86 EPSON.TEXT 4 16-May-86 96 EPSON.CODE 2 16-May-86 100 IMAGEWRITR.TEXT 4 16-May-86 102 IMAGEWRITR.CODE 2 16-May-86 106 LIB.TEXT 4 16-May-86 108 FUELLER 168 16-May-86 112 A 002 PEEKER= = =HEFT05/86 = = = A 002 A- B 022 EDIT A 002 B- A 003 MDB.KOPY.SPEZIAL A 004 MDB.KOPY T 016 T.MDB.KOPY.OBJ B 003 MDB.KOPY.OBJ A 002 PEEKER= = = HEFT 06/86= = = A 002 C- T 002 PLOT.3.PRO A 059 PLOT.3.E B 007 PLOT.BX T 055 T.PLOT.BX T 015 PLOT.HELP.1 T 012 PLOT,HELP.2 T 011 PLOT,HELP.3 T 011 PLOT.HELP,4 T 008 PLOT.HELP.5 T 009 PLOT.PATCH T 005 SUPERDUMP.PATCH A 002 D- A 011 PRODOS.BACKUP T 024 T.PRO.BACKUP.O B 004 PRO.BACKUP.0 A 005 KOPY.160.SPUR T 018 T.KOPY.160.SPUR.0 B 003 KOPY.160.SPUR.0 T 001 DISK HAT AUCH PASCAL-DIRECTORY Hüthig Software Service Postfach 102869 6900 Heidelberg 1 3.4. Appleworks Durch ein „Expander“-Progrannnn kann man die Fähigkeiten von Appleworks be¬ trächtlich erweitern. So läßt sich Ap¬ pleworks z.B. komplett in den Z-RAM- Speicher laden. Man kann einen internen Drucker-Puffer installieren und geeignete „Clocks" abfragen (Applied Engineering liefert z.B. eine für den llc). Wesentlich dürfte auch sein, daß sich die Zahl der Einträge/Zeilen in Textverarbeitung, Re¬ chenblatt und Datenbank vervielfacht. Die „Schreibtischkapazität“ von Appleworks kann auf über 400K vergrößert werden, entsprechend große „Dokumente“ kön¬ nen sukzessiv auf mehreren Disketten (zu je 143K) gespeichert werden. Wichtig: Die Erweiterung von Appleworks funktioniert nur mit der neuen Version VI .2; wer noch die ältere Version besitzt, sollte versu¬ chen, sie beim Händler „upzudaten“. 3.5. UCSD-Pascal Die im Lieferantenkatalog (Pandasoft) und auch in aktuellen Anzeigen von Applied Engineering in US-Zeitschriften genannte Software für Pascal 1.1 und 1.2 fehlte bei Lieferung. Auf einen Anruf hin erklärte Pandasoft dies durch eine von Applied Engineering nicht angekündigte Änderung des Lieferumfangs. Jedoch schickte Pan¬ dasoft die fehlende Pascal-Software inner¬ halb von 10 Tagen kostenfrei zu. Die RAM-Disk-Software läßt sich unter Pascal 1.1 und 1.2 nutzen, die folgenden Ausführungen beziehen sich auf die 128K-Version von Pascal 1.2. Simuliert wird ein Volume „RAM:“ oder „#12:“ mit 508K = 1016 Blöcken. Die Zuordnung zu „#12:“ bzw. den Volumenamen kann man leicht ändern, da die dafür verantwort¬ lichen Programme im Sourcetext beige¬ fügt sind. Die Installation der RAM-Disk läuft etwa wie folgt: Beim Booten wird zunächst ein geeigneter Driver installiert, das RAM-Vo- lume initialisiert und das Startup-Pro- gramm geladen. Dann werden per Exec- File z.B. sämtliche System-Files auf das RAM-Volume gebracht (man kann den Ex- ec-File leicht nach eigenem Geschmack ändern oder ergänzen). Schließlich kommt der eigentliche „Clou“: Das RAM-Volume wird zum Boot-Volume deklariert. Ab jetzt braucht man eigentlich kein weiteres „rea¬ les“ Laufwerk mehr, besonders der sonst doch häufige Diskettenwechsel ist nun kein Problem mehr. Eine ganz nette Er¬ scheinung ist, daß die Compilierungszei¬ ten deutlich kürzer werden (aber bitte kei¬ ne Wunder erwarten: Wenn man ohnehin schon unter Pascal 1.2-128K arbeitet und damit auf (*$S-F^!e) weitgehend verzich¬ ten kann, so ist nur das während des Com- pilierens häufige Anlaufen der Laufwerke eliminiert, der Compiler selbst ist nicht schneller als sonst auch). Probleme gab es beim Betrieb unter Pas¬ cal bisher keine, es wirkt nur auf die Dauer etwas ärgerlich, daß z.B. bei Benutzung von System.Charset anscheinend die „Suchreihenfolge“ etwa wie „#4:“, „#5:“.,#12:“ aussieht, d.h. daß im¬ mer sämtliche vorhandenen „ realen “ Laufwerke zuerst einmal anlaufen. Das ist jedoch kein Kritikpunkt an Z-RAM, es beruht wohl eher auf der Implementation des Pascalsystems. Dadurch kann es passie¬ ren, daß man beim Testen von Program¬ men zwar auf dem Boot-Volume „#12:“ z.B. die umgeschriebene Version einer Utility hat, aber zunächst, ohne es zu be¬ merken, immer noch eine „alte“ Version von einer Diskette gelinkt bekommt. Eige¬ ne Utilities kann man ohne weiteres so umschreiben, daß der „Suchvorgang“ auf „#12:“ beginnt. 3.6. Zusammenfassung Beim ersten Aufruf der RAM-Disk-Soft- ware unter einem bestimmten Betriebssy¬ stem wird die RAM-Disk jeweils frisch in¬ itialisiert. Wird später nochmals die instal- lationssoftware aufgerufen, so wird in der Regel ein intaktes RAM-Laufwerk nur wie¬ der „angeschlossen“, aber nicht neu in¬ itialisiert, d.h. daß z.B. nach Reset etc. die Daten der RAM-Disk nicht unbedingt „weg“ sein müssen. Man kann sogar z.B. ein Pascal-RAM-Volume halten, zwi¬ schendurch DOS 3.3 booten (natürlich hier dann keine RAM-Disk benutzen) und nachher erneut Pascal booten: Das alte RAM-Volume ist noch intakt. Natürlich kann man auch eine normale Neuinstallie¬ rung (mit sog. „Init“) auslösen, indem man die „Solid-Apple“-Taste beim Aufruf der Installationssoftware gedrückt hält. Drückt man dagegen zum genannten Zeitpunkt „Open-Apple“, so bekommt man durch unterschiedliche „Piepstöne“ den Zugriff auf die RAM-Disk angezeigt. 4. Schlußbemerkung Z-RAM für den Apple llc ist keine ganz billige Erweiterung, aber m.E. eine recht nützliche. Die Hard- und Software scheint ausgereift zu sein. Ein einzelner Benutzer dürfte jedoch lange brauchen, um alle Ein¬ satzmöglichkeiten der Karte zu nutzen. Gerade darin liegt wohl auch der Wert der Karte, die eben nicht nur eine „CP/M“- Karte ist, sondern ein recht universell ein- setzbares Werkzeug für alle wichtigen z.Zt. auf dem Apple laufenden Betriebssy¬ steme. Es sei noch angemerkt, daß es Vergleichbares auch für den Apple Ile gibt: Unter dem Namen RAM-Works wird eine Karte verkauft, die m.W. bis zu 3M aus¬ baufähig ist. Peeker 6/86 63 Analytisches Inhaltsverzeichnis der Peeker-Sammeldisketten #1 bis #18 Wenn SFe wissen wollen, was sich auf einer bestimmten Sammeldisk insge¬ samt beT\nöeX, so schlagen Sie nach für die Disketten #1 bis #11 in Heft 11 /85. S. 71 -78, #12 bis #15 in Heft 4/85, S. 47, #16 + #17 in Heft 5/85, S. 74 + 68. Korrekturen zu den Programmen finden Sie in Heft 11/85, S. 71 ff. sowie 5/86, S. 73ff. Das Aufsatz-Jahresinhaltsver¬ zeichnis (Heft 1/84 bis 12/85) ist auf Sammeldisk #12 mit Stichwort-Such¬ programm enthalten. Ältere Disketten können Sie separat zum Sonderpreis von je DM 20,- nach¬ bestellen, 1. wenn Sie momentan Sammeldisk- Fortsetzungsbezieher und auf Ihrer Be¬ stellung die Kundennummer vermer¬ ken, oder 2. wenn Sie kein Fortsetzungsbezieher sind, aber rückwirkend mindestens 6 Sammeldlsketten - beliebig gemischt - bestellen. Ansonsten gilt der normale Einzelpreis von DM 28,- je Sammeldisk. Das analytische Inhaltsverzeichnis nennt den Zweck des jeweiligen Pro¬ gramms, gefolgt von der Sammeldlsk- Nummer und der Heft-Nummer. Bei¬ spielsweise bedeutet „#10-10/85/22" = „Programm auf Disk # 10 mit Beitrag in Peeker, Heft 10, 1985, Seite 22“. 1. Hardware 1.1. Il+/e/c allgemein Neue ROMs Ile: Diverse Demopro¬ gramme: #10-10/85/22 Ilc-Schnittstellen: Initialisierungspro¬ gramm: #14-2/86/34 lle/C“Maus: Prozeduren für UCSD-Li- brary; #4-4/85/48 1.2. Drucker (s.a. Bildschirm) Epson-FX80: Hires-Grafik-Ausdruck: #1-1/84/40 + #5-6/85/22 (DOS 3.3) # 18-6/86/40 (UCSD) Imagewriter-I: Hires-Grafik-Ausdruck: #5-6/85/22 (DOS 3.3) -F # 18-6/86/40 Imagewriter-I: Steuerbefehlsprogramm: #12-12/85/8 Imagewriter-I; Sonderzeichensatz-Pro¬ gramm: #16-4/86/32 Olympia-ESWI OO-RO: Hires-Grafik- Ausdruck: #6-6/85/34 NEC 8023: Hires-Grafik-Ausdruck: #10-9/85/30 Großformatiger Grafik-Ausdruck (mit grafikfähigen Interface): #11-11/85/20 1.3. Bildschirm 40-Z/Z-ll+/e/c: Speichern des Bild¬ schirms (DOS 3.3); #2-1/85/42 80-Z/Z-lle/c: Speichern -i- Ausdrucken des Bildschirms (DOS 3.3): #4-4/85/ 33 -F #4-4/85/76 -I- #16-4/86/52 80-Z/Z-lle/c: VTAB-HTAB-Demo: #5- 5/85/69 80-Z/Z-lle/c: Ausdrucken des Bild¬ schirms (UCSD): #12-12/85/48 80-Z/Z-lle/c: Schnelle Bildschirmrouti¬ ne für UCSD-Library; #17-5/86/29 ll-i-/e/c: Speichern des Bildschirms in Language-Card (DOS 3.3): #14-2/86/ 40 Videx-Ultraterm: Zeichensätze: #1-2/ 84/60 Videx-Karte: Speichern des Bild¬ schirms: #2-1/85/42 Videx-Zeichensatz: EPROM-Pro- gramm: #7-7/85/29 1.4. RAM'Karten und RAM-Disk- Driver 16K-Language-Card-RAM-Disk-Driver (DOS 3.3): #2-1/85/8 lle/c-64K-RAM-Dlsk-Driver (Pascal 1.1): #6-6/85/48 Ile-64K-RAM-Disk-Driver in Assembler -H Turbo-Pascal (CP/M 2.20, Z80): #6- 6/85/55 -F #12-12/85/62 Balfer-VIA-Karte: Slot-RAM-Disk- Driver (DOS 3.3) für Ile-64K-Karte: #5- 5/85/12 AP20-256K-RAM-Disk-Driver (DOS 3.3): #2-1/85/18 AP33-512K-RAM-Disk-Driver (Pro- DOS): #7-7/85/8 1.5. Sonstige Hardware Accelerator-lle: Diverse Utilities: #1-1/ 84/19 -I- #4-3/85/66 Wildcard-Plus: Softswitch-Tests: #4-3/ 85/72 Modem-Karte: Terminal-Programm: #4-4/85/34 (Patch für SSC: 6/85/72) S.A.M.-Sprachkarte: Vorleseprogramm: #7-7/85/71 EPROM-Programmiergerät: EPROM- MER-Programm: #10-10/85/40 2. DOS und Disk-Drives (s.a. RAM-Karten) Betriebssystemunabhängiges Forma¬ tierungsprogramm (35-80 Spuren): #7- 7/85/20 Hardware-Testprogramm für Disk-Il- Drives: #8-8/85/7 Programm zur Ermittlung defekter Sek¬ toren: #11-11/85/24 2.1. Konvertierungsprogramme GETPAS: UCSD ^ DOS 3.3: #2-1/85/ 68 GETDOS; DOS 3.3 ^ UCSD: #2-1/ 85/70 #15 (verbesserte Version) GETCPM und WS.TRANSFER; CP/M DOS 3.3: #4-3/85/35 (Für DOS 3.3 ^ CP/M nehme man APDOS von CP/M-Systemdisk) PASTOPRO: UCSD -> ProDOS: #7-7/ 85/62 PROTOPAS: ProDOS^ UCSD: #9-9/ 85/58 PROTODOS: ProDOS ^ DOS 3.3: #14-1/86/36 (Für DOS 3.3 ^ ProDOS nehme man DOSTOPRO von „Apple-ProDOS, Bd.2“) READPAS: UCSD ^ CP/M-Turbo: #14-1/86/48 2.2. DOS 3.3 DIversi-DOS 2C als Datei; #6-6/85/74 Diversi-DOS 4C als Datei; #7-6/85/72 Harddisk-Backup-Programm (DOS 3.3; u.a. Megaboard): #18-5/86/61 File-Manager-Grundbefehle: #5-5/85/ 6 Neues FID-Dateikopierprogramm: #10-9/85/12 DOS-3.3-Mover für Language-Card: #14-2/86/17 2.3. ProDOS (versionsabhängige Programme geson¬ dert vermerkt) Diskettenkopierprogramme (1.0.1); #2- 1/85/22 Dateikopierprogramme (1.1.1): #8-8/ 85/18 Harddisk-Backup-Programm (ProDOS, u.a. Megaboard): # 18-6/86/30 64 Peeker 6/86 ^ kuRzbERichTE Disk-Editor: # 17-5/86/8 + #18-6/86/ 24 Directory-Einleseprogramme: #4-4/ 85/41 Directory-Komprimierungsprogramm: #15-3/86/20 Dateileseprogramm (TYPE-Befehl): #4-4/85/46 Schnelles Boot-Programm für ProDOS: #10-9/85/20 Block-Tracer (nur 1.0.1): #5-5/85/51 FORMAT-Befehl (nur 1.0.1): #5-5/85/ 56 Kompatiblen-Patch-Programm: #2-1/ 85/31 (1.0.1) + 5/86/59 (1,1.1; nicht auf Sammeldisk!) Erphi-160-Spur-Patch-Programm für „Superquick": #17-5/86/59 Ehring-160-Spur-Patch-Programme (1.0.1): #11-11/85/29 2.4. UCSD-Apple-Pascal Directory-Duplizierungsprogramm; #2- 1/85/64 Datei-Aufbau-Analyse-Prog ramme; #15-3/86/48 + #17-5/86/34 3. BASIC (s.a. Grafik) 3.1. Mac-BASIC und MBASIC Vierteiliger Macintosh-Microsoft-BA- SIC-Kurs: Demoprogramme (nicht auf Sammeldiskl): 2/84/54 + 1/85/78 -k 4/ 85/63 + 8/85/60 Z80-MBASiC-Kompaktkurs: Befehls¬ beispiele (nicht auf Sammeldiskl): 9/ 85/48 3.2. Applesoft-Befehlserweiterungen INSTRING-Befehl: #1-2/84/40 DELETE-Array-Befehl: #1-2/84/51 FRE-Befehl (Garbage-Collection): #2- 1/85/33 INPUT-Anything-Befehl: #4-4/85/70 -H 5/85/50 INPUT-Befehl mit Editierkommandos: #12-12/85/20 RANDOM-Befehl: #5-5/85/69 PRINT-USING-Befehl: #11-11/85/49 QUICKSORT-Befehl: #13-1/86/16 Quicksort-Demos (Applesoft): #13-1/ 86/6 Befehlssammiung (&GOTO, &GOSUB, &RESTORE, &SOUND. &SCROLL u.a.): #6-6/85/43 CHRGET: Befehlserweiterungsroutine: #14-2/86/38 (Hinweis: Komplettsammlung aller In¬ terpreterroutinen in Heft 12/85, 30-60; nicht auf Sammeldiskl) 3.3. Applesoft-Programmierhilfen Applesoft-Zeileneditor (DOS 3.3) mit Renumber, Variablen-Referenz u.a. (nur für Fortsetzungsbezieher!); #16-4/86/ 13 Referenz-Prüfung (GOTOs, GOSUBs): #11-11/85/55 Generator für Bildschirm-Menüs (Ap¬ plesoft); #4-4/85/20 Konvertierung von Klein- in Großbuch¬ staben; #10-9/85/31 4. Pascal 4.1. UCSD-Apple-Pascal Pascal-Grundkurs: Übungsprogramme: #10-12/85/33 Transzendentale Funktionen für Library: #5-5/85/35 IDSEARCH-Befehl: #8-8/85/48 P-Code-Komprimierungsprogramm: #10-10/85/50 UCSD-6502-l/O-Demos; #14-2/86/48 Funktionseingabe-Programm; #16-4/ 86/58 4.2. Kyan-Pascal Grundkurs: Übungsprogramme: #14- 2/86/56 Aubaukurs: Übungsprogramme -k String-Include-Datei: #15-3/86/32 Kyan-Assembler: Übungsprogramme: #16-4/86/48 4.3. Turbo-Pascal Pascal-Grundkurs: Übungsprogramme: #10-12/85/33 Fußballweltmeisterschaft; Simulations¬ programm; #17-5/86/6 5. Assembler 5.1. 6502/65C02 6502-Kurs: Demoprogramme (nicht auf Sammeldiskl): 7/85/33 65C02-Disassembier: #1-1/84/14 65C02-Makros für 6502-Assembler: #4-4/85/30 Disassembler für undokumentierte 6502-Opcodes: #5-5/85/31 32-Bit-Hex-Dez-Konvertierung: #7-7/ 85/69 Takt-Zähler-Programm: #10-9/85/32 (Hinweis: Komplettsammlung aller lega¬ len Monitorroutinen ll-k/e/c in Heft 5/ 85/52; nicht auf Sammeldiskl) 5.2. Z80 Z80-Kurs: Demoprogramme (nicht auf Sammeldiskl); 11/85/33 5.3. 68000 68000-Disassembler für Mac (in MS- BASIC): 5/85/41; gesonderte 3,5-Zoll- Disk, solange Vorrat reicht, 68000-Kurs: Demoprogramme (nicht auf Sammeldiskl): etwa 7/86 6. Grafik (s.a. Drucker) 6.1. Applesoft/6502-Programme Grafik-Demos für Anfänger: #8-8/85/ 67 -k 13-1/86/61 Turtle-Grafik in Basic: #1-1/84/26 Funktionsplotter für einfache Hlres: #5- 5/85/17 Funkionsplotter für doppelte Hires: #18-6/86/6 Dreidimensionaler Funktionsplotter: #14-2/86/43 Hires-Graflk-Editor mit Zirkelbefehlen u.a.: #10-10/85/6 Sprite-Editor für Animationen: #11-11/ 85/6 Textausgabe in Hires-Grafik: #12-12/ 85/16 Konvertierung Double-Hires ^ Hires: #5-5/85/25 6.2. Applesoft-Befehlserweiterungen Double-Lores-Grundbefehle; #1 -1/84/ 32 Double-Lores-Befehlssammlung: #8- 8/85/32 Double-Hires-Grundbefehle: #1 -2/84/ 24 Interpreter-Änderung für Double-Hires: #10-10/85/14 Pseudo-Double-Hiresfür ll-k: #6-6/86/ 16 XPLOT-Befehl; #4-4/85/14 BOX-FILL-Befehl, SWAP-Befehl u.a.: #6-6/85/6 HSCRN-Befehl, BOX-COPY-Befehl u.a.: #8-8/85/24 Hlres-Befehlssammiung (INVERT, TURN, COPY, SWAP, MERGE, SHRINKu.a.): #13-1/86/30 6.3. UCSD-Pascal Zeichensatz-Generator: #14-1/86/43 7. Mathematik/Technik Grundrechenarten mit größerer Genau¬ igkeit (Applesoft): #4-3/85/30 Applesoft-Fließkommazahlen: Demo- Programme: #15-3/86/12 Binäre Grundrechenarten: #14-2/86/6 + #16-4/86/6 Primzahlenberechnung (Geschwindig¬ keitswettbewerbe): #1-2/84/70 sowie #4-3/85/56 Pi-Berechnung bis 15000 Stellen: #17- 5/86/42 Fakultätenberechnung (bis max. 99991): #8-8/85/56 Fourier-Analyse: #6-6/85/38 Meßwert-Verarbeitungsprogramm; #15-3/86/58 8. Schule und Beruf Vokabeltrainer mit Englisch-Grundwort- schatz: #13-1/86/20 Legasthenie-Testgenerator: #4-3/85/ 22 Einkommensteuerprogramm 1984 (MBASIC): #3-1/85/45 Haushaltsverwaitungsprogramm: #16- 4/86/42 Simplex-Programm für Betriebswirte: #14-1/86/56 Matrizen-Programm für Betriebswirte; #14-2/86/29 Adreßverwaltung mit dBase II (lauffähig auf dBase V2.4 vom 1,4.83 und CP/M 2.2 sowie 2.26): #8-8/85/40 + 6/86/52 9. Spiele/Musik Cosmo-Crumble: Weitraum-Abschieß- spiel: #12-12/85/6 Pyramid-Pitty: Hires-Reaktionsspiel: #7-7/85/6 Solitaire: #6-6/85/64 Puzzle-Spiel: #10-10/85/65 Zeichenjagd (Einzeller): #8-8/85/69 Tonprogramm (zweistimmig): #16-4/ 86/60 Apple DOS 3.3 — Tips und Tricks von U. Stiehl 3., völlig überarb. Aufl. 1986, X, 203, mit zahlreichen, ausführlich kommentierten Programmlistings, kart., DM 28,- Begleitdiskette ebenfalls DM 28,- Dr. Alfred Hüthig Verlag • Postf.10 28 69 • 6900 Heidelberg 1 Peeker 6/86 65 Sidekick Macintosh-Büro-Manager Borland International (Helmsoeth Software) ist mittlerweile bei Ap¬ ple-Benutzern durch das Turbo- Pascal zum Begriff für preiswerte Software geworden. Nachdem die Apple-Il-Implementierung des Pascal-Interpreters eine weite Ver¬ breitung gefunden hat, bemüht sich Borland nun auch um die Mac- intosh-Besitzer. Das für den IBM PC entwickelte Sidekick bietet auf einem Macin¬ tosh (Minimalkonfiguration, 128K, eingebautes Laufwerk) eine Reihe von Möglichkeiten, die die tägliche Büroarbeit - und nicht nur diese - erleichtern und neben anderen An¬ wendungen parallel laufen können (bislang nur als amerikanische Ver¬ sion für DM 260,-). Diese Möglich¬ keiten verbergen sich unter dem Apple-Pull-Down-Menü und kön¬ nen so jederzeit aufgerufen werden. Darüber hinaus ist es möglich, einige dieser Punkte auch als reine Anwendungen aufzurufen, die dann noch etwas mehr Komfort und Umfang bieten. Sidekick enthält u.a.: -Telefon-Liste - Termin-Kalender und Wecker - Arbeitsblätter für Kreditkarten, Geldausgaben und Memos - Mini-Textverarbeitung - Taschenrechner -Terminal-Betrieb - Die Telefon-Liste umfaßt neben Name, Anschrift, Stichwort und Bemerkung auch den Gebühren¬ schlüssel, wodurch während eines Gesprächs, das ebenfalls durch den Macintosh angewählt werden kann (sofern man in den USA wohnt und über das Borland Pho- ne-Link-Interface verfügt), sofort die Gebühren ermittelt und in dem Phone Log, einem persönlichem Telefon-Report, eingetragen wer¬ den können. Dadurch ist man je¬ derzeit auf dem laufenden über seine Telefon-Rechnung und - was noch wichtiger ist - wer sie verursacht. Wer nicht in den Ge¬ nuß kommt, seinen Macintosh als Wählautomaten benutzen zu kön¬ nen, wird sich vielleicht etwas schwertun, bei allen Gesprächen den Rechner zu bemühen, wo¬ durch sich der Stand des Telefon- Reports nicht ganz mit der Rech¬ nung der Bundespost decken dürfte. Viel wichtiger und praktischer er¬ scheint die Möglichkeit, jederzeit die Daten eines Gesprächspart¬ ners auf den Schirm zu bekom¬ men, um somit schnell eine Num¬ mer oder Adresse zu finden oder auch während eines Gesprächs nachzuschauen, mit wem man es gerade zu tun hat. Im Telefon-Re¬ port können dann Gesprächsnoti¬ zen eingetragen werden. Mit dem sog. Print-Manager kann diese Te¬ lefon-Liste mit unterschiedlichem Umfang im Pocket-Format ausge¬ geben werden. - Im Termin-Kalender können al¬ le Verabredungen eingetragen werden, um sie später auf Knopf¬ druck parat zu haben. Dabei kön¬ nen sowohl einzelne Tage als auch eine ganze Woche (Week-at-a- Peek) oder ein ganzer Monat über¬ blickt und nach Stichworten abge¬ sucht werden. Auch dieser Kalen¬ der kann in Pocket-Format ausge¬ geben werden. - Die Arbeitsblätter bieten Raum für (jeweils max. 15) Eintragungen a) über den Kontostand einzelner Kreditkarten, b) für eine kleine Liste der tägli¬ chen Ausgaben und c) für ein Memo-Blatt, in dem Din¬ ge eingetragen werden können, die man nicht vergessen sollte. Unter diesem Punkt wird auch der Wecker gestellt, der zum angege¬ benen Zeitpunkt (Datum, Uhrzeit) ein Alarm-Signal ertönen läßt. - Die Mini-Textverarbeitung bie¬ tet die Möglichkeit, kleine Doku¬ mente zu erstellen (z.B. zur Über¬ tragung mit der Terminal) oder vor¬ handene Textdateien zu editieren. - Der Taschenrechner ersetzt den normalen Taschenrechner im Apple-Menü. Neben den Grund¬ rechenarten werden hier auch die gängigen wissenschaftlichen und einige kaufmännische Funktionen unterstützt. Daneben wird, wie bei einer Rechenmaschine, ein Proto¬ koll der Rechnungen mitgeschrie¬ ben, das auch gedruckt werden kann. - Im Terminal-Betrieb können Dokumente über ein Hayes-kom- patibles Interface übertragen und empfangen werden, während an¬ dere Anwendungen laufen. Auch hier besteht die Möglichkeit des automatischen Anwählens (leider nur in den USA). Laut Auskunft der Firma Heim- soeth Software ist eine deutsche Version von Sidekick bislang nicht absehbar. An der Möglichkeit des automatischen Wählens wird je¬ doch gearbeitet. Es bleibt abzu¬ warten, wie sich die Deutsche Bundespost zu diesem Problem stellt. Programming Toolkits für Kyan-Pascal 2.0 Toolkit I: System Utilities: Club- Preis DM 118,-; Normalpreis DM 148,- (lieferbar) Toolkit II: Mouse Text: Club- Preis DM 118,-, Normalpreis DM 148,- (lieferbar) Toolkit III: Advanced Graphics: Club-Preis DM 118,-, Normalpreis DM 148,- (Mitte Juni) Toolkit IV: Turtle Graphics: Club-Preis DM 68,-, Normalpreis DM 88,- (lieferbar) Toolkit V: Mouse Graphics: Club-Preis DM 158,-, Normalpreis DM 198,- (Mitte Juli) Alle Utilities werden als teils beid¬ seitig bespielte Disketten geliefert, die neben den Include-Files (meist Quelltexte) diverse Demos enthal¬ ten. Die Anleitungen selbst sind Loseblattlieferungen (z.B. bei den System Utilities 52 Druckseiten), die für den grauen Ordner von Ky- an 2.0 bestimmt sind. Zum Club- Preis werden nur Mitglieder des Kyan-Clubs beliefert. Toolkit I: System Utilities Diese Utilities decken verschiede¬ ne Bereiche ab: 1. ProDOS-Utilities: Delete, Re- name, Copy, Set-Pefix, Get-Prefix, Lock, Unlock, Make-Directory, Get-Directory, Remove-Directory, Scan-File, Format, Print-File, Bsave, Bload, Set-Time, Get-Time, Set-Date, Get-Date, Get-Clock, Set-Clock, Find-Clock. 2. Maus und Joystick: Find-Mouse, Init-Mouse, End-Mouse, Home- Mouse, Mouse-Click, Mouse-held, Mouse-moved, Mouse-x, Mouse- y, Set-Mouse-xy, Set-x-Bounds, Set-y-Bounds, Print-Mouse-Char, Button-0, Button-1, Joystick-x, Joystick-y. 3. Bildschirmsteuerung (funktio¬ nieren teilweise nur auf lle/c): Clear-Screen, Clear-Line, Clear- End-of-Line, Clear-End-of-Page, Inverse, Normal, Tab, Scroll-up, Scroll-down, Col-80, On-40, On- 80, Screen-Bottom, Screen-Top, Screen-Full, Cursor-x, Cursor-y, Get-Char, Machine-Identification. 4. Zufaliszahlen: Random im Be¬ reich min..max, Rnd im Bereich 0..1 , Seeding. 5. Zahienkonvertierungsroutinen: Real - String, String - Real, Integer - String, String - Integer. 6. Sortieren (alphabetisch und nu¬ merisch) sowie Mischen (bis zu 5 Files). 7. Line Parsing Routine. Toolkit II: Mouse Text Diese Utilities umfassen mehrere Dutzend Befehle für Fenstertech¬ nik usw. 1. Cursor-Befehle: Set-Cursor, Obscure-Curser, Hide-Cursor, Show-Cursor. 2. Interrupts: Check-Events, Get- Event, Post-Event, Set-Key-Event, Flush-Event, Peek-Event. 3. Menü-Befehle: Init-Menu, Set- Menu, Menu-Select, Menu-Key, High-Light-Menu, Disable-Menu, DIsable-ltem, Check-Item, Set- Mark. 4. Kontrollbefehle: FInd-Control, Set-Control-Max, Track-Thumb, Update-Thumb, Activate-Control. 5. Fensterbefehle: Inlt-Window- Margin, Close-Window, Open- Wlndow, Find-Window, Front-Win¬ dow, Select-Window, Drag-Win- dow, Grow-Window, Screen-to- Window, Window-to-Screen, Clo- se-all, Window-Char, Window- String, Window-Block, Window- Text, Window-Op. Toolkit IV: Turtle Graphics Diese Diskette enthält diverse Hi- res- und Ton-Routinen. 1. Turtle-Befehle: Init-Turtle, Turt- le-x, Turtle-y, Turtle-Angle, Graf- Mode, Text-Mode, Pen-Color, Turn, Turn-to, Move, Move-to, View-Port, Full-Port, Fill-Port, Fill- Area, Save-Hires, Load-Hires. 2. Ton-Befehle: Beep, Note, Clock, Phaser. 3. Balkendiagramme usw.: Bar- Chart, Pie-Chart, Plot-x-y. Hüthig Software Service Postfach 10 28 69 Heidelberg 66 Peeker 6/86 Z80+ Card ^ pRodukrE mjm getestet von Hans-Martin Eng Wie der Name schon andeutet, handelt es sich bei der Z80+ Card um eine Z80-Coprozessorkarte für den Apple 11+ und Ile. „Noch eine Z80-Karte“ sagen da vielleicht einige Leser, doch gibt es da eini¬ ge Punkte, die diese Appleerweite- rung gegenüber anderen CP/M- Karten auszeichnen. Ich will je¬ doch dem Testergebnis nicht vor¬ greifen. Zum Lieferumfang der 280+ Card gehören zum einen die Karte selbst, dann eine Diskette mit di¬ verser Software (allerdings ohne CP/M-Betriebssystem!) und zu¬ letzt ein Handbuch im DIN A4-For- mat. Beginnen wir mit der Hard¬ ware: 1. Die Z80+ Card selbst Auf der 22cm 7cm großen Plati¬ ne befinden sich, neben einer Z80H-CPU, 64K RAM und diverse Steuerbausteine. Der Systemtakt wird von einem 16,000 MHz-Quarz erzeugt. Am linken Ende der Karte fallen noch ein Jumperblock und drei LED auf. Bis auf drei sind alle ICs in gedrehten Sockeln unterge¬ bracht, was eine hohe Kontaktsi¬ cherheit gewährleistet. Alle Bauelemente sind sauber ver¬ lötet, aufgrund der hohen Pak- kungsdichte der Karte mußten die Leiterbahnen jedoch reichlich dünn ausfallen. Es ist also Vorsicht geboten, wenn man mit spitzen Gegenständen operiert. Die 280+ Card ist die einzige mir bekannte CP/M-Karte, die sowohl zur weit verbreiteten Microsoft- Softcard als auch zur ALS-CP/M- Card kompatibel ist. Sie kann somit sowohl CP/M 2.20/2.23 als auch ALS-CP/M 3.0-Software einwand¬ frei verarbeiten. Dies geschieht in zwei getrennten Betriebsmoden. Im Betriebsmodus 0, angezeigt durch eine leuchtende gelbe LED, arbeitet die 280+ Card wie die normale Softcard - leider auch nur mit 2 MHz Takt. Sie greift dabei auf den normalen Arbeitsspeicher des Apple zu, der Speicher der Karte selbst kann als RAM-Disk verwal¬ tet werden. In diesem Betriebsmo¬ dus laufen alle CP/M-Programme für den Apple ohne Einschränkun¬ gen. Ob der Speicher der 280+ Card auch für den 6502 des Apple zugänglich ist, darüber schweigt sich das Handbuch leider aus. (Lt. Rücksprache mit dem Entwickler Dipl-Math. U.Zimmermann geht dies nicht, us) Im Betriebsmodus 1 legt der Apple jedoch „die Ohren an". Hier wird die Z80H mit 8 MHz getaktet (2 MHz mehr als die ALS-Karte). Sie muß dabei keine zusätzlichen Wait-Zyklen ausführen, so daß die¬ se 8 MHz voll zur Geltung kom¬ men. In diesem Betriebsmodus greift die Z80+ Card nun auf den eigenen Speicher zu. Dies bedeu¬ tet, daß alle Programme, die spe¬ ziell auf den Apple-Speicher zu¬ greifen müssen, etwa für Hires- Grafik o.ä., nicht funktionieren. (Genauer gesagt, sie laufen zwar, erzeugen aber auch keine Grafik.) Hier wären vor allem MBASIC und GBASIC von der Softcard-Master- Diskette zu nennen. Die 280+ Card ist mit einem Inter¬ rupt-Timer ausgerüstet, der mit ca. 62 kHz Interrupt-Signale für die Z80H erzeugt. Diese Interrupts können über den Jumperblock ab¬ geschaltet werden. Eine Nutzung bleibt wohl auf eigene Anwendun¬ gen beschränkt, da für die Nutzung der Interrupts keine Software mit¬ geliefert wird. Denkbar wären bei¬ spielsweise ein Druckerpuffer o.ä.. Die Umschaltung zwischen den beiden Betriebsmoden geschieht über einen Schreibzugriff auf den Softswitch $C080+n0 (n steht für Slot n). Da sich die Karte beim Einschalten im Betriebsmodus 1 befindet, muß man den Softswitch betätigen, bevor man Softcard-CP/ M bootet. Ein Patchprogramm, das den Bootprozeß dahingehend mo¬ difiziert, daß der richtige Betriebs¬ modus eingeschaltet wird, befindet sich auf der mitgelieferten Dis¬ kette. 2. Die Software Software für die 280+ Card wird auf einer 5 1/4"-Diskette mitgelie¬ fert. Auf ihr befinden sich sowohl DOS 3.3- als auch CP/M-Program- me. (Auf einer Seite wohlgemerkt.) 2.1. DOS 3.3-Software Hier handelt es sich um Patch- Software für die CP/M-Versionen 2.20 und 2.23. Das Programm BOOT-PATCH modifiziert, wie schon angedeutet, das BOOT-Pro- gramm von CP/M-Disketten; das Betriebssystem selbst bleibt un¬ verändert. So können alle Pro¬ gramme, die unter Softcard-CP/M laufen uneingeschränkt weiterver¬ wendet werden. Nun hat man schon eine 8 MHz- CP/M-Karte, da möchte man den Rechner gefälligst auch mit 8 MHz laufen lassen. Abhilfe bringt hier das Programm CP/M-Patch. Die¬ ses patcht Softcard-CP/M-Disket- ten so, daß nun alle Software im Betriebsmodus 1 abgearbeitet wird. Dieses gepatchte CP/M nennt sich Z80+-CP/M. (lies: „zet achtzig plus ce pe em".) 2.2. CP/M-Software Hier bleiben eigentlich keine Wün¬ sche offen. Für den Softcard-Mo- dus wird ein RAM-Disk-Treiber für die 64K RAM der 280+ Card mit¬ geliefert. Für das Z80+-CP/M gibt es gleich eine ganze Anzahl ver¬ schiedener RAM-Disk-Treiber, da¬ zu noch eine Disk-Utility, mit der man Disketten formatieren und ko¬ pieren kann. Man kann damit auch das Betriebssystem auf 40-Spur- laufwerke umstellen. Schließlich kann man das 280+-CP/M auch an verschiedene gebräuchliche 80-Spur-Controlier, wie den Erphi- oder den Ehring-Controller an¬ passen. 2.3. Das Z80+-CP/M Dieses CP/M hat es in sich! Der CCP (Console Command Proces¬ sor) wurde um einige Befehle er¬ weitert: ALL - ist ein erweiterter DIR-Be- fehl. Angezeigt werden zusätzlich zur File-Länge auch der Status. Selbst SYS-File werden aufqeli- stet. BOOT - ersetzt den COMmand- File gleichen Namens von der Softcard-Master-Disk. GO - ersetzt ebenfalls einen COM-File der Softcard-Master- Disk. Damit kann man einen COM- File wieder starten, den man vor¬ her verlassen hat. Dieser Trick funktioniert nur, wenn das neu zu startende Programm nicht sich selbst reloziert, wie das z.B. bei allen Debuggern der Fall ist. Je nach Hauptspeichergröße ver¬ fügt man nach dem Kaltstart über 32, 48 oder 11 OK Speicherkapazi¬ tät auf einem Pseudolaufwerk P:. Wem das noch nicht reicht, der kann sich eine RAM-Karte zule¬ gen. Für SATURN-, IBS-AP17-, SOLARIM- und CSC-RAM-Karten sind Treiber auf der Utility-Diskette mitgeliefert, wer eine andere Karte besitzt, wird nach Herstelleranga¬ ben auch nicht alleingelassen. Die normale Disketten-2ugriffsge- schwindigkeit setzt dem Faß aller¬ dings die Krone auf. Fragen Sie mich nicht, wie, aber sie wurde um bis zu einen Faktor 4 (!) erhöht. Da alles so schön klingt, muß ich dem Enthusiasmus einen (aller¬ dings kleinen) Dämpfer verpassen. Es gibt Programme, die unter dem gepatchten CP/M nicht laufen. Der Hersteller nennt hier den Macro- Assembfer M80 und das zugehöri¬ ge CREF80, beide auf der ALDS- Diskette von Microsoft zu finden. Für diese Programme wird ein Patch genannt, der sie wieder zum Laufen bringen soll. Das konnte ich leider in Ermangelung dieser Pro¬ gramme nicht nachprüfen. Ebenso stieg ein mir kurzfristig zur Verfü¬ gung gestellter F80-Fortran-Com- piler aus. Hier gibt es jedoch eine einfache Abhilfe: Im Softcard-Mo- dus compilieren und linken, die daraus erzeugten COM-Files dürf¬ ten dann wiederum mit 8 MHz lauf¬ fähig sein. Einwandfrei funktionieren jedoch Wordstar und Turbo-Pascal, auch Multiplan entwickelt eine unge- kannte Aktivität. Mit Turbo-Pascal konnte ich auch den vierfachen Geschwindigkeitszuwachs beim Rechnen nachprüfen. 3. Das Handbuch Dieses besteht aus einem DIN A4- Heft mit Ringheftung (das im Mai neu aufgelegt worden Ist, us). Nach einer kurzen Einleitung fol¬ gen sehr ausführliche Erläuterun¬ gen zu Funktion und Installation der Karte. Weitere 34 Seiten gelten einer detaillierten Beschreibung der mitgelieferten Software. Dann folgen noch Anweisungen, um Fehlerursachen einzukreisen. Der Anhang besteht aus verschiede¬ nen Tabellen. Das Handbuch ist mit Februar 1986 datiert. Inzwischen war der Hersteller nicht untätig, eine fünf¬ seitige Ergänzung des Handbuchs dokumentiert das. Diese Ergän¬ zung behandelt neue RAM-Disk- Treiber auf der Utility-Diskette für die IBS-AP33 (256K bis 1 M) und die OHO-512-RAM-Karte. Außer¬ dem wird ein Patchprogramm für den CAT-Controller mitgeliefert, Turbo-Pascal-Besitzer können sich über einen Include-File freu¬ en, der ihnen wieder die Apple- Grafik zugänglich macht. Fazit Die 280+ Card ist meines Erach¬ tens rundherum gelungen. Das fehlende Betriebssystem wird durch die mitgelieferte Software mehr als wettgemacht. Da man au¬ ßerdem praktisch über zwei CP/M- Karten verfügt, erscheint mir der Preis von ca. DM 700.-- nicht zu hoch. Vergleicht man diesen näm¬ lich mit dem verschiedener ande¬ rer schneller CP/M-Karten, schneidet die 280+ Card nicht un- Peeker 6/86 67 günstig ab. Daß die Grafikbefehle des GBASIC nicht funktionieren, kann man der Karte nicht anlasten. So bleibt eigentlich nur noch der gute Eindruck übrig, den die Karte bei mir hinterließ. Die reichlich mit¬ gelieferte Software macht sie vor allem für Umsteiger interessant. CP/M-Anfänger können sich viel¬ leicht auch bald freuen. Der Her¬ steller bemüht sich um eine günsti¬ ge CP/M-Lizenz, die er dann für einen geringen Aufpreis an die Kunden weitergeben will. Bleibt mir nur noch übrig zuzuge¬ ben, daß ich die Karte nach Been¬ digung des Tests nur äußerst un¬ gern aus meinem Rechner wieder herauszog. (Herr Eng hat sich in¬ zwischen eine Karte gekauft, us) BASF-Reinigungs- und Justage¬ disketten Auf der diesjährigen „Mikrocom¬ puter ’86" in Frankfurt stellte die BASF als Neuheit Reinigungs- und Justagedisketten für die neuen 3.5"-Laufwerke vor. Nach den Angaben des Herstellers erspart vorsorgliches, allwöchentli¬ ches Reinigen der Magnetköpfe mit einer Reinigungsdiskette dem Anwender bei geringem Geld- und Zeitaufwand Störungen und Datenverluste. Die Schreib-ZLeseköpfe der Flop- py-Disk-Laufwerke gleiten im Be¬ trieb auf der Oberfläche der Dis¬ kette entlang. Da dieser Kontakt nie absolut staubfrei erfolgt, kön¬ nen Staub- und Schmutzteilchen auf den Kopf gelangen und Schreib-ZLesefehler verursachen. BASF-Reinigungsdisketten befrei¬ en den Magnetkopf von Ablage¬ rungen und nehmen den Schmutz auf. Sie werden als ein- und zwei¬ seitige Disketten angeboten. Während die Anwendung der Rei- nigungsdisketten-für jeden Floppy- Besitzer problemlos ist, sind die Justagedisketten für Servicetech¬ niker und Fachleute entwickelt worden. Die BASF-Justage-FlexyDisk wird zusammen mit einem Oszillogra¬ phen zum Prüfen und Reparieren von Diskettenlaufwerken verwen¬ det. Auf der Justagediskette sind dazu Informationen in Form eines optischen Informationsmusters hochpräzise aufgezeichnet. Am enfachsten lassen sich diese Infor¬ mationen mit dem Testbild beim Fernsehen vergleichen. Mit deren Hilfe kann der Fachmann durch Messen und Auswerten von Lese¬ signalen am Oszillographen die Spurlage, den Kopfeinstellwinkel und die Justage des Indexsektors überprüfen und korrigieren. Die BASF-FlexyDisk hat den Vorteil, daß Auswertung, Erkennen der Ur¬ sachen und gleichzeitige Korrektur in einem dynamischen Prozeß er¬ folgen können. Die aufgezeichne¬ ten Informationen basieren auf den für die Industrie weltweit gültigen Standards ECMA und ANSI. Jörg Bliesener beantwortet CP/M- und Wordstar-Leserbriefe Wenn Sie eine Frage haben, so schreiben Sie uns. Das Problem muß jedoch eindeutig und nach¬ vollziehbar geschildert werden. Al¬ so Gerätekonfiguration, Pro¬ grammversion usw. genau an¬ geben! Spezialfragen, die wir selbst beant¬ worten können, erledigen wir schriftlich. Fragen, die wir nicht be¬ antworten können und die zugleich von allgemeinerem Interesse sind, veröffentlichen wir im Peeker. Wordstar-Patch-Tabelle Benötige vollständige Patch-Tabel¬ le für WS.COM Version 3.0, wo ist diese zu haben? Armin Klauß, Karlsruhe Antwort: Der Wordstar-Installation-Guide sowie die Wordstar-Customiza- tion-Notes erhalten Sie bei jedem Distributor von Micropro-Software. Wordstar und dBase Ich besitze einen Apple und benut¬ ze zum Textverarbeiten „Word¬ star" und als Dateiprogramm „dBase N“. Im großen und ganzen bin ich mit diesen Systemen zu¬ frieden, doch einige Änderungen würden das Arbeiten noch mehr erleichtern. Zwar besitze ich das Installationsprogramm für „Word¬ star“, doch gewisse Grundeinstel¬ lungen werden dort mit dem Hin¬ weis auf Customization Notes nicht behandelt. Vielleicht können Sie mir behilflich sein. Wordstar: 1. Sofortiger Aufruf von Drive B: als aktuelles Laufwerk 2. Festlegung linker Rand z.B. 05 und rechter Rand z.B. 75 3. Löschen von „insert on" 4. Änderung der Zeilenzahl pro Wordstarseite 5. Druckausgabe: Bei Aufruf von P muß erst umständlich entweder mit Return oder entsprechend mit Y oder N geantwortet werden. Kann man diese Prozeduren einfach um¬ gehen, oder wie lassen sich diese Voreinstellungen ändern? 6. Wenn ich Wordstar starte, erge¬ ben sich noch folgende Probleme: Erst durch Drücken von 2 x Escape funktioniert Groß- und Kleinschrei¬ bung, allerdings mit einigen Ein¬ schränkungen. Bei Eingabe von < erscheint Ä, bei > dann ü, bei ? dann ö, bei ü dann ß, bei (dann ä, bei) dann ü und bei ! dann ö. Um die Klammern auf den Bildschirm zu bringen, schalte ich dann einmal Escape und um wieder normal schreiben zu können, drücke ich wieder 2 x Escape. dBase: 1. Von dBase aus lassen sich mit „set call on" Assemblerroutinen starten. Wie funktioniert das? Wel¬ cher Speicherbereich muß benutzt werden, ohne daß das dBase-Pro- gramm überschrieben wird etc.? 2. Wie funktioniert die unmittelbare Steuerung von Peripheriegeräten überden Befehl CHR{numerischer Ausdruck)? Ich möchte das Schriftbild meines Druckers über diesen Befehl ändern. Ich habe ei¬ nen Epson RX-80 Drucker mit Centronic-Schnittstelle. Ich bedanke mich schon jetzt füi Ihre Mühe und hoffe, daß Sie mir in einigen Punkten helfen können. Horst Peter, Mainz Antwort: Zu Wordstar: 1. Sofortiger Aufruf von Drive B: als aktuelles Laufwerk Dies ist mittels eines kurzen As¬ sembler-Programms möglich, das im Wordstar ab Speicheradresse 02E0H installiert wird. Folgende Bytes sind dazu notwendig; 02E0H OEH 02E1H0EH 02E2H 1EH 02E3H 01H 02E4H C3H 02E5H 05H 02E6H OOH t> 02A4H C^H 02A5H EOH 02A6H 02H Dieses Assembler-Programm wird bei jedem Start des Wordstars auf¬ gerufen und schaltet auf Laufwerk B um. 2,3. Die Adresse der Bytes, in de¬ nen der linke oder rechte Rand bzw. Insert gespeichert wird, ist; Label/Adresse/Standardwert linker Rand INITLM:/037FH/00H rechter Rand INITRM:/0380H/40H (=64D) Insert ITITOG:/0362H/FFH Beachten Sie, daß die Werte des linken und rechten Randes jeweils um eins dekrementiert abgespei¬ chert werden. Der rechte Rand wird automatisch auf den Wert (Bildschirmbreite-4) gesetzt, falls er größer sein sollte. Beim Insert- Flag wird OOH für „Insert aus" und FFH für „Insert an" eingesetzt. 4. Die Seiten länge In Zeilen wird bei Adresse 0367H im Label INIT- PF:-M abgespeichert. Jedoch muß für den korrekten Betrieb mit ei¬ nem Typenraddrucker im Label IN- ITPF:-f 2 und INITPF:-h 3 auf Adresse 0368H und 0369H die Anzahl der Zeilen pro Seite multi¬ pliziert mit 8 als Wort (Low Byte zuerst) stehen. 68 Peeker 6/86 P^lESERbmEFE 5. Die Abfrage der Werte bei der Druckausgabe können Sie mit ESC abbrechen. Dabei werden dann für die noch nicht abgefrag¬ ten Werte die Standardeinstellun¬ gen eingesetzt. Wenn Sie diese ändern wollen, so ist das ab Adres¬ se 03CAH (Label PODBLK:) mög¬ lich; Label/Adresse/Standardwert Diskettenausgabe PODBLK:/03CAH/00 (- nein) Form-Feeds benutzen PODBLK:-h1/03CBH/00 {= nein) Seitenform unterdrücken PODBLK:-H2/03CCH/00 {= nein) Pause zwischen Seiten PODBLK:-h 3/03CDH/00 (= nein) Auch hier gilt wieder: DFFH = ja. OOH = nein 6. Das Tastatur-Problem. Die Pro¬ grammierer von MicroPro haben sich durchaus etwas einfallen las¬ sen, um dem Apple die Groß- und Kleinschreibung beizubringen. Da¬ zu gehört das von Ihnen geschil¬ derte Problem. Wahrscheinlich er¬ scheint beim Starten Ihres Word- stars auch die Meldung „Videx with Software U/L-Case“ oder so ähnlich. Das bedeutet, daß der Wordstar softwaremäßig die Groß/ Kleinschreibung erzeugt, die die Original-Apple-Tastatur ja nicht kann. Einmal ESC drücken bedeu¬ tet dann, daß das nächste Zeichen in Großschreibung umgewandelt wird, zweimal schaltet in den „Shift-Lock"-Modus um. Weiter¬ hin kann der Origlnal-Apple-Il kei¬ ne Umlaute. Diese werden eben¬ falls im „Shift-Lock"-Modus er¬ zeugt, und zwar genau mit den von Ihnen erwähnten Tasten. Das nützt zwar Besitzern eines Apple II oder II Plus mit Original-Tastatur, lle- Benutzer oder Leute, die eine ex¬ terne Tastatur Ihr eigen nennen, sind aber nicht sehr glücklich dar¬ über. Um auch Ihnen das Gefühl eines „richtigen" Wordstars zu be¬ scheren, sind die folgenden Pat¬ ches nötig: Label/Adresse/Wert APLFLG:/02D7H/05H /411BH/00H /41C0H/00H Zu dBase: 1. Der Speicherbereich für Maschi¬ nenprogramme liegt ab AOOOH. 2. Die Ausgabe eines Textes mit der CHR-Funktion funktioniert ganz normal, nur ist zu beachten, daß die verschiedenen CHR-Funk- tionen in einem ?-Befehl nicht durch Kommata getrennt werden, sondern mit dem „-h"-Operator zusammengefügt werden, weil dBase sonst nach jedem Datenfeld ein Leerzeichen einfügt. Die Um¬ schaltung auf Kursivdruck funktio¬ niert also so: ?CHR(27)-FCHR(52) Wordstar und Imagewriter Sie haben in den Peeker-Ausga- ben mit „CP/M für Einsteiger" und „MBASIC für den Applesoft-Pro- fi‘‘ein für mich sehr interessantes Thema aufgegriffen. Ich möchte darüber hinaus mehr über das Pro¬ grammieren des 8080/Z80-Pro- zessors sowie den Umgang mit dem CP/M-Betriebssystem und Apple-Ports erfahren. Sicher wür¬ de dieses Thema auch einen gro¬ ßen Kreis Ihrer Leserschaft inter¬ essieren. Mit dem folgenden Pro¬ blem komme ich leider mangels (für mich) geeigneter Literatur und trotz Erfahrungen mit dem 6502- Prozessor nicht zurecht: Ich möch¬ te Text, den ich mit Hilfe eines Textverarbeitungsprogramms (Wordstar) auf einem Apple II eu- roplus unter dem Betriebssystem CP/M erstellt habe - auf den Apple-Imagewriter mit serieller Schnittstelle über Slot #1 (wie unter CP/M vorgesehen) aus¬ geben - auf einer Schreibmaschine mit paralleler Schnittstelle mit Parallel- Interface über Slot #2 (ist unter CP/M leider nicht vorgesehen) ausgeben. Wichtig ist für mich dabei natürlich, daß ich das Interface in Slot #1 oder sonstwo nicht wechseln muß (Parallel <-> Seriell). Lieber wür¬ de ich unterschiedliche Disketten (d.h. modifizierte Betriebssyste¬ me) für die unterschiedliche Text¬ ausgabe verwenden. Ich würde mich freuen, wenn Sie auf diese Fragen in Ihrer Zeitschrift eingehen könnten oder, falls sich diese An¬ gelegenheit mit einem unbedeu¬ tenden Patch erledigen lassen soll¬ te, um einen Hinweis im Peeker. Dipl.-Ing. Winfried Neubert, Berlin Antwort: Um den von Ihnen erwünschten Effekt, eine Datei vom Wordstar aus in S/of2ausdrucken zu lassen, zu erreichen, ist es am empfeh¬ lenswertesten, den Wordstar zu ändern. Um eine Druckausgabe in Slot 2 zu bewirken, braucht nur ein einziges Byte geändert zu werden, und zwar an Adresse 071 FH (IN- STALL-Label LISEND:-h2). Nor¬ malerweise hat es den Wert 05. Wenn Sie dieses Byte auf 04 än¬ dern, ist alles erledigt. Zum Ändern brauchen Sie zwei Disketten: Eine mit dem CP/M-Be¬ triebssystem und eine mit Ihrem Wordstar. Das Ändern geht wie folgt vor sich: CP/M-System in Laufwerk A, auf Laufwerk A umschalten, „DDT" und <Return> tippen. Nach dem Prompt des DDT die Wordstar-Dis- kette einlegen und „IWS.COM" und <Return> eingeben. Wenn die Datei geladen wurde, geben Sie „S71F“ ein und drücken wie¬ der die <Return>-Taste. Nun müßte erscheinen: 071F 05 und der Cursor sollte hinter der 05 stehen. Tippen Sie einfach „04" und <Return>, gefolgt von „." und <Return>. Nun sehen Sie wieder den DDT-Prompt Drücken Sie CtrI-C, und Sie lan¬ den wieder im Betriebssystem. Mit „SAVE 66 WS2.COM" speichern Sie die geänderte Version auf Dis¬ kette ab. Sie haben nun zwei Wordstar-Ver- sionen auf Ihrer Diskette. Die eine, WS, druckt auf Slot 1, die andere, die mit WS2 gestartet wird, gibt die zu druckenden Daten auf Slot 2 aus. Weiterhin müssen Sie die Adresse 0717 (GSWTGH:) auf 01H ändern Wordstar und zwei Drucker Ich bin im Besitz eines Apple-Il- Kompatiblen mit einem Druckerin¬ terface, einer 80-Zeichenkarte und einer Original-Super-Serial-Card. Das Druckerinterface steckt im Slot 1, die Super-Serial-Card in Slot 4. Die 80-Zeichen-Karte be¬ findet sich im Slot 3. Da die Z80- Karte fest eingebaut ist, entfällt Slot 2. An der Super-Serial-Card ist ein Typenraddrucker angeschlossen. Früher benutzte ich als Textverar¬ beitungsprogramm den Applewri- ter, mit dem ich problemlos zwi¬ schen Slot 1 und Slot 4 umschal¬ ten konnte, um den Matrix- oder Typenraddrucker anzuwählen. Nun legte ich mir das CP/M-2.2- Betriebssystem (56K-Version 2,20B) und den Wordstar zu. Nach der Anpassung des Wordstar läuft alles problemlos. Nur muß ich im¬ mer die Karten im Slot 1 austau- schen, um auf dem Matrix- oder Typenraddrucker zu drucken. Um dies zu vermeiden, möchte ich die Super-Serial-Card im Slot 4 lassen. Da ich sowieso zwei Wordstar-Ver- sionen besitze (eine für den Ma¬ trix-, eine für den Typenraddrucker angepaßt), wäre es doch sicher möglich, das BIOS von CP/M so zu verändern, daß der LST-Ausga- bevektor nicht Slot 1, sondern Slot 4 anspricht Dies habe ich bereits versucht, indem ich unter STAT- .COM die Adresse DD2C -01 auf DD2C -04 abgeändert habe. Nach dieser Änderung reagierte jedoch die SSC-Karte nicht. Nun meine Frage an Sie: Können Sie mir vielleicht die Adressen nennen, die ich ändern muß, damit der LST-Befehl nicht Slot 1, son¬ dern Slot 4 anspricht? Für Ihre Bemühungen recht herzli¬ chen Dank. Peter Westphal, Olching Antwort: Die Änderung des CP/M ist schwierig. Ich würde Ihnen viel eher einen Patch des Wordstars empfehlen. Dieser stellt nämlich die erforderlichen Programme zur Ausgabe von Daten direkt über Ports zur Verfügung. Im Wordstar- Installationshandbuch finden Sie ab Adresse 0728H (INSTALL-La- bel POBSY:) die entsprechenden Speicherstellen. Die Portadressen der SSC lauten; Datenport: 0E0C8H (für Slot 4) Statusport: 0E0C9H Receive-Ready-Maske: 08H Transmit-Ready-Maske: 10H Zur Wordstar-Anpassung im 11/ 85, S. 61 Trotz verschiedener Versuche, den 2. Zeichensatz (deutsch) auf meiner videxkompatiblen 80-Zei¬ chenkarte für Wordstar zugänglich zu machen (TRMINI, IVON, INI- SUB), ist dies nicht gelungen (Ap¬ ple \\-\-, Wordstar 3.0). Welche Werte müssen In den entspre¬ chenden Adressen stehen? Manfred Schleich, München Antwort: Ab TRMINI; sollten die folgenden drei Bytes stehen: Adresse/Byte 0292H/02H 0293H/1BH 0294H/28H MBASIC und Slot-Wechsel Im Peeker, 9/85 haben Sie einen interessanten Artikel zu MBASIC auf dem APPLE gebracht, Autor war Jörg Lange. Einige wertvolle Anregungen konnte Ich dem Arti¬ kel entnehmen, eine Frage ließ er aber unbeantwortet: Im Slot 2 meines apple-kompati¬ blen Rechners (Apple ll-H) steckt eine serielle Karte, über die ich Peeker 6/86 69 Daten aus einem Digitizer einlese, ln „Applesoft“ geht das einfach über den Befehl „IN#2“. Danach erscheinen übertragene Daten auf dem Bildschirm bzw. sind über z.B. „INPUT A$" einlesbar in eine Stringvariable. In MBASIC gibt es leider meines Wissens keinen Befehl, der die verschiedenen Slots anspricht. „INP" und „OUT“ funktionieren ebenfalls nicht, kurzum, ich habe es bisher noch nicht geschafft, in MBASIC Daten über die serielle Karte einzulesen. Können Sie mir weiterhelfen? Gibt es doch einen entsprechenden Befehl oder Ist mit bestimmten Peeks etwas zu erreichen oder...? Gerhard Vester, Freiburg Antwort: Es geht tatsächlich mit Peeks, der Peeker sagt Ihnen, wie: Um ein Byte von der seriellen Karte einzu¬ lesen, benötigen Sie folgende Be¬ fehlssequenz; WAIT STATUSPORT, RECVBIT: A$ = CHR$ (PEEK(DATENPORT)) Zum Ausgeben benutzen Sie den Befehl: WAIT STATUSPORT, XMITBIT: POKE DATENPORT, ASC(A$) Um so etwas wie die INKEY$-Fun- ktion zu simulieren, verwenden Sie: IFPEEK (STATUSPORT) AND RECVBIT THEN A$ = CHR$ (PEEK(DATENPORT)) ELSE A$=" “ Dabei steht jeweils in A$ das eln- oder auszugebende Zeichen. Na¬ türlich müssen noch die Variablen STATUSPORT, DATENPORT, RECVBIT und XMITBIT initialisiert werden. STATUSPORT gibt dabei die I/O-Adresse des Statusports der ACIA auf der seriellen Karte an, DATENPORT entsprechend den Datenport der ACIA. In RECV¬ BIT ist das Bit gesetzt, das im Sta¬ tusport den Empfang eines Zei¬ chens anzeigt, entsprechend gilt das gleiche für die Variable XMIT¬ BIT, die angibt, wann ein Zeichen gesendet werden kann. Für eine Super Serial Card in Slot 2 sind die Werte folgendermaßen: STATUSPORT = &HE0A9: DATAPORT = &HE0A8; RECVBIT = 8: XMITBIT = &H10 Wordstar und Drive-Wechsel Mit Interesse habe ich in Peeker, 3/86 den Artikel über Wordstar- Modifikationen gelesen. Obwohl ich nur Anwender bin, konnte mir der Artikel sehr helfen, denn es ärgerte mich schon länger, daß ich im Eröffnungsmenü viele Änderun¬ gen vornehmen mußte (Hilfsgrad auf 0, Blattlänge, Kopfabstand etc.) Jedoch vermisse ich in der Patch- Tabelle die Adresse für „Neues Laufwerk“, da ich ständig mit zwei LW arbeite. Könnten Sie mir diese wichtige Adresse mitteilen? Ferner habe ich folgendes Pro¬ blem: ich benutze einen Apple Ile, 2 X 640K-Laufwerke mit Erphi- Controller und einen FX-80 mit APL-B-Drucker-Graphikinterface. Beim Booten von CP/M wird leider der Drucker nicht aktiviert. In der Anleitung zur APL-B wird angege¬ ben, daß das Betriebssystem mit DDT zu ändern ist. Ich bitte um Mitteilung, ob über die Änderung des CP/M ebenfalls schon ein Artikel in der o.g. Form erschienen ist. Das wäre sehr hilf¬ reich, denn es ist sehr aufwendig, ein bereits gestartetes Programm zum Zweck des DDT-Aufrufs zu verlassen. Elmar Elsner, Köln Antwort: Bezüglich der Einstellung des De¬ fault-Laufwerks in Wordstar beach¬ ten Sie bitte die Antwort auf den Leserbrief von Herrn Peters (s.o: „Wordstar und dBase“). Zur Modifikation des CP/M, damit ein Drucker erkannt wird, gehen Sie bitte folgendermaßen vor: Legen Sie die CP/M-Systemdis- kette in das Default-Laufwerk und drücken Sie CtrI-C. Nun starten Sie DDT und geben „S100" ein. Auf die Meldung „100 00 “ geben Sie ein: „3E", „31 “, „32“, „2F‘', „DD“, „C3", „00“, „00“, je¬ weils gefolgt von <Return>. Nun müßten Sie wieder das Minuszei¬ chen von DDTZ sehen. Tippen Sie CtrI-C. Nun landen Sie wieder im CP/M. Geben Sie nun ein: „SAVE 1 EPSON.COM“. Damit speichern Sie das eben Eingegebene auf Diskette unter dem Namen EP¬ SON.COM ab. Dieses Programm sollten Sie nun nach jedem Booten starten. Das können Sie per Hand machen, indem Sie einfach „EP¬ SON" eintippen, sie können aber auch, wenn Sie das Programm TURNKEY oderAUTORUN haben, EPSON automatisch starten las¬ sen. Anschlußfertig fürApp lell,/fe... No ch un iverseller und noch komfortabler. .. Betriebssysteme DOS 3 3 DiversiDOS 2-c, 4-c, ProDOS 1 0.1, 1.1 0, 1 1 1 Pascal 1 1, 1.2 CP/M 2 20, 2.23, 2,26 SLOT-Unabhängig Die bisherigen Vorzüge bleiben erhalten, wie Autopatch-Boot automatische Erkennung und Erweiterung der Betriebssysteme während des Bootvorgangs (Betriebssystem auf der Boot- Diskette bleibt unverändert) erphi Doppellaufwerk DL 280 2 Laufwerke mit je 640 kB formatiert im Gehäuse inci, erphi Autopatch-Controller AFDC 3 Handbuch und Diskette mit Dienstprogrammen Verkaufspreis incI MwSf DM 1.298,-_ erphi Floppy-Subsystem FSS 280 für kommerzielle Anwendungen 2 Laufwerke nfiil &I0 KB fornmltrrrl ltn tmi äigencr Stromver^rgung Inci. erphi AulDpalcIvControifer AFDC 3 HoJidbirttt iifid mit OienstprcgtamErKtn VetkauTdpiel« tncl. MwSl PM i m- Origmalsystem-Boot Von herkömmlichen Apple®- Disketten (unabhängig vom Laufwerksformat) weiterhin möglich Problemloses Übertragen herkömmlicher Apple®-Software auf Disketten höherer Kapazität durch SIM 35-Hiltsprogramm (simuliert 35-Spur-Laufwerk unabhängig vom tatsächlichen Laufwerksformal) erphi electronic GmbH Dammweg 3 D-8011 Großhelfendorf Telefon (0 80 95) 441 Telex 528 021 erphi d Redakteur Für unsere Zeitschrift Peeker suchen wir einen Redakteur mit soliden Assembler- Programmierkenntnissen. Es erwartet Sie eine abwechslungsvolle Tätigkeit in einem großen Verlagshaus. Ihre Bewerbung mit den üblichen Unterla¬ gen richten Sie bitte an: Verlagsgruppe Dr. Alfred Hüthig Personalabteilung Postfach 10 28 69 6900 Heidelberg 70 Peeker 6/86 tm 4439 . APPLE II HANDBUCH 1 Die rasche Orientierung für APPLE llplus, De, De Schnelle Antwort auf Alltagsfragen am APPLE II - 1 ^ 1 LonPaj leicht nachzuschlagen, praxisbezogen, für llplus, Ile, IIc in nur 1 Buch! Unterschiede Ilplus/IIe, DOS 3.3/ProDOS, E/A-Inter- facekarten/Ports, 40/80 Zeichendarstellung, US/DTS- Lon PooIb, /Hartin >44cNlff & Steven Cook biü Tastatur, 48K/128K Systeme etc. Grafik/Soundmöglichkeiten, eine der APPLE-Stär- ken, in stark erweiterter Beschreibung. Kurzführer „Steckkartenerweiterungen“ mit Fotos; „Sofortbetrieb von Disketten/Cassettengeräten“; „Druckerbetrieb“; „Direktbefehle“; ,Jastaturbedienung“etc. Backgroundwissen: BASIC für Beginner/Professionelle; MC/BASIC-Kombination; MC- Entwicklung mit MONITOR/MINIASSEMBLER; APPLE-PASCAL-BS; Disketten/Plattenspeicherung; Dateiformate etc. Ausführlicher Anhang zu Editor, Speicherbelegung, Codes des APPLESOFT-Interpreters etc. DAS APPLE n HANDBUCH für llplus, Ile, IIc, 472 Seiten, Softcover, DM 66,- tc-wi Verlag GmbH J ■ Theo-ProsehWeg 1 Wri«! | !■ 8000 München 40 IQ IJLII Weiterführende Literatur... m Reparaturanleitung Computer: ^ Apple H, llplus Einzigartige Serviceunterlage für Reparatu¬ ren und Entwicklungsarbeiten am Apple II. Enthält Schaltpläne, Bauteile- und Ver¬ gleichstypenliste; Prüfpunkte mit Oszillo- grammen der Signalformen, Logiktabellen, Spannungsangaben; schnelle Servicetests; Anleitung zur systematischen Fehlersuche. In A4-Mappe, DM 29,80 APPLE II - Bewegte 3D-Graphik (Phil Cohen) Selbstentworfene Graphiken und Dia¬ gramme - animiert oder als Standbilder - eben oder räumlich: alle erforderlichen BASIC-Programme mit Erklärung finden Sie in diesem Buch, 200 Seiten, Softcover, DM 49,- AFPLEWQBXS 1 V MASCHfNHN 8f>RACH£ APPLE WORKS + APPLE II, Ile, IIc = Elektronischer Schreibtischmanager Dieses Programmsystem vereinigt die Funktion Texterstellung, Datenarchivie¬ rung, Formblattkalkulation, Datenfern¬ übertragung. Das System mit den höch¬ sten Verkaufsziffern. Sämtliche System/ Anwendungsfragen in 2 Bänden. Bei¬ spiele aus der Wirtschaft u.v.m. je 264 Seiten, je DM 49,- LOGO- Jeder kann programmieren (Daniel Watt) Buch des Jahres in den U SA. Für die Computer APPLE II, C-64, IBM PC, ATARI bis 520 ST, TI-99 und Schneider CPCs. Hochwertiges Textbuch für Logo-Kurse für zu Hause und im Lehrbereich. 384 Seiten, A4, DM 59,- Apple Maschinensprache Für BASIC-Programmierer der einfachste Zugang zur Muttersprache des Apple. Wesent¬ lich schnellere Maschinenprogramme, direkte Manipulation des Mikroprozessors 6502 im Apple — als Brücke dorthin benötigt dieses Buch nur die drei BASIC-Befehle, POKE, CALL, PEEK. D. Inman/K. Inman. DM 49,- Erstes deutsches Referenzwerk sämt¬ licher Befehle und Systemroutinen von Apple II, llplus, Ile APPLE II PASCAL 4^, Betriebssystem, 272 S,, DM 49,- ^ Sprache, 216 S., DM 39,- Pascal L2 Addendum, 112 S., DM 36,- Grundlagenbuch, Bestseller APPLE II PASCAL, Eine praktische Anleitung, 544 s., DM 59,- Noch im Programm: 6502 - Programmieren in Assembler DM 59,- VisiCalc, 50 Programme auf Diskette, DM 79,- Computer für Kinder, APPLE II, DM 29,80 In Vorbereitung: Macintosh Programmier-Handbuch mit Microsoft BASIC 2.0 DM 59,- Warum wollen Sie ein teures Textverarbeitungsprogramm kaufen, wenn es ein billiges und besseres gibt? Fast-Writer von Harald Grumser Programmdiskette und Handbuch Gerätevoraussetzung: Apple Ile oder llc (nicht 11+) DOS-3.3-Version. Auslieferung ab 1.6.86 Normalpreis DM 128,- (ISBN 3-7785-1419-9) Sonderpreis für Peeker-Abonnenten DM 98,- ProDOS-Version. Auslieferung ab 1.9.86 Normalpreis DM 128,- (ISBN 3-7785-1421-0) Sonderpreis für Peeker-Abonnenten DM 98,- Kombinationspreis für Bezieher der DOS-3.3-\/ersion DM 28,- Der Fast-Writer von Harald Grumser ist in zahlreichen Funktionen wie Scrollen, Suchen und Ersetzen mit Abstand das schnellste und damit angenehmste Textverarbeitungsprogramm für den Apple Ile oder llc. Flexibilität Viele Textverarbeitungsprogramme sind geschützt und laufen deshalb nur in Verbindung mit normalen Disk-Il- Laufwerken. Nicht so der Fast-Writerl - Der Fast-Writer modifiziert weder DOS 3.3 (oder Diversi-DOS) noch ProDOS und kann deshalb mit BRUN FAST.WRITER gestartet werden. Unter Diversi- DOS ist der Fast-Writer dann in 3 Sekunden im Spei¬ cher. Vergleichen Sie einmal, wie lange es dauert, bis andere Textprogramme im Speicher sindl -Da der DOS-3.3-Fast-Writer in den oberen 16K (= Language Card) liegt, kann man ihn vorübergehend verlassen und mit einem einfachen Befehl wieder star¬ ten. Mit anderen Worten: Der Fast-Writer ist permanent verfügbar, auch wenn Sie zwischendurch beispielswei¬ se mit FID Dateien kopiert haben. - Der Fast-Writer läuft mit allen externen Datenspei¬ chern, die für DOS 3.3 oder ProDOS gedacht sind, z.B. mit dem Erphi-160-Spur-Subsystem, mit der Mega- board-MDB-Festplatte, mit RAM-Karten usw. Spezielle Anpassungen sind nicht erforderlich. Suchen Sie ein¬ mal ein Textprogramm, das mit diesen Datenspeichern auf Anhieb funktioniert! - Der Fast-Writer kann mühelos über ein Menü für Ihre speziellen Aufgaben konfiguriert werden. Sie können z.B. per Knopfdruck die Zeilenbreite (normal 80 Zei¬ chen) am Bildschirm einstellen, wobei ab einer Breite von weniger als 41 Zeichen automatisch auf die größere Bildschirmschrift umgestellt wird. Ferner können Sie die Größe des Arbeitsspeichers (insgesamt ca. 35 500 Zeichen) beliebig in Textspeicher und Hilfspuffer (für Löschen und Blockverschieben) aufteilen. Wenn Sie z.B. große Textblöcke im Speicher zu verschieben ha¬ ben, so können Sie einen entsprechend großen Hilfs¬ puffer von z.B. 10 000 Zeichen einrichten. Damit entfällt das zeitraubende Zwischenspeichern und Einlesen von Diskette. Befehlsvorrat Der Fast-Writer verfügt über eine große Zahl von Be¬ fehlen, von denen Sie in der Praxis jedoch nur wenige benötigen. Fünf Befehlsübersichten sind durch einge¬ baute Hilfsübersichten immer abrufbar, so daß Sie schon nach einer mehrstündigen Einarbeitung auf das Handbuch verzichten können. Eine Auswahl der wich¬ tigsten Befehle: - Freie Cursorbewegung in allen vier Richtungen mit eingebauter Schnell-Scroll-Routine. - Diverse, per Knopfdruck ein- und ausschaltbare Op¬ tionen, z.B. Wortumbruch/kein Wortumbruch, Return sichtbar/unsichtbar, Kopfzeile (Statuszeile) mit Spei¬ cherbelegung, Cursorposition usw. eingeblendet/aus¬ geblendet, Bildschirm geteilt/ungeteilt, Tabulatorleiste sichtbar/unsichtbar, Überschreibmodus (statt normalen Einfügmodus) ein/aus usw. - Eingabe von Kontrollbuchstaben (einschließlich CtrI-V!) möglich. Automatische Konvertierung in Groß- oder Klein- schreibufig (unter Berücksichtigung der Umlaute und ß!) - Extrem schnelles Suchen und Ersetzen von Zeichen¬ ketten (vorwärts und rückwärts). - Makros frei definierbar und per Knopfdruck abrufbär. Makros können nicht nur stereotype Wortfolgen sein (z.B. „Sehr geehrte Herren“), sondern auch alle Be- fehisfolgen, die man beim Fast-Writer sonst über die Tastatur eingeben würde. So läßt sich beispielsweise ein Text automatisch von Laufwerk 1 laden und auf Laufwerk 2 speichern. - DOS-Kommandos wie Catalog, Delete, Rename usw. immer verfügbar (bei DOS 3.3 zusätzlich Init, bei Pro- DOS zusätzlich Online und Datum) - Ausdruck auf Matrixdrucker (normal endlos), Schreib¬ maschine (normal mit Einzelblatt) und zu Kontrolizwek- ken auf Bildschirm; links- und rechtsbündig, zentriert und Blocksatz; einstellbarer linker, rechter und oberer Rand (im Text änderbar), bei Bedarf mit Kopfzeile und Paginierung usw. Der Ausdruck kann über eigene Druckertreiber umgelenkt werden, um z.B. Probleme mit Typenrädern, Steuerzeichen usw. zu beheben. - Makros, Druckparameter, Druckertreiber und Tabula¬ toren können auf Diskette gespeichert werden. Hüthig Software Service * Postfach 102869 * 6900 Heidelberg 1