VIERTE DIMENSI - Organ der FORTH - Forth e.V.
←
→
Transkription von Seiteninhalten
Wenn Ihr Browser die Seite nicht korrekt rendert, bitte, lesen Sie den Inhalt der Seite unten
..............................................
. . . . . ..... . . ... ... . . . .... . . .... . . . ............
VIERTE
DIMENSI
...... ............................ ........
..........................
.................................
.................................
.................................
................................
................................
............... ................................
...............................
............... ...............................
MAGAZIN
................
................ ...............................
............................
.................
................. ............................
............................
..................
.................. ............................
............................
...................
................... ...........................
...........................
....................
.................... ...........................
.........................
.....................
..................... .........................
.........................
......................
...................... ........................
........................ Organ der FORTH -Gesellschaft e.V.
......................
...................... ........................
........................FORTH ENTWICKLUNGSUMGEBUNG
Modell TDS2020
16 Bit, 20 MHz CPU H8/532 Hitschi
Starter Pack
TDS2020-PIN: TDS-PC:
Computerboard mit H8/532 CPU Entwicklungssoftware für IBM-PC mit Applika-
auch geeignet für direkten Anschluß an Tastatur tion-Library. 1 Jahr Update-Service.
mit 64 Keys und LCD-Display. Handbücher:
(Größe: 100 x 80 mm) Hitschi Hardware Manual,
Hitschi Programming Manual,
TDS2020-DV TDS2020 Technical Manual.
Piggyback Entwicklungsboard mit Forth.
Komplett Preis:
TDS2020-PA: DM 930,-- + MWSt.
Adapterboard zur Programmierung von H8 Einführungspreis:
EPROM. DM 795,-- + MWSt.
Zusätzlich erhältlich:
DS1213C: Datalogger Modul TDS2020CM
Batteriegepufferter Sockel für S-RAM. mit PCMIA Memory Card.
Lascar Electronics Produktions- und VertriebsgmbH
Vordere Kirchstraße 4, D-7241 Eutingen-2
Telefon: 0 74 59 112 71, Telefax: 0 74 59 / 24 71
.
.
SMAN - Der Software-Manager
Probleme mit der Verwaltung großer Mengen Quelltext?
Rasches Finden von Quelltext-Modulen nicht möglich?
Zusammenfügen von Modulen umständlich?
Keine einheitliche Umgebung für verschiedene Compiler?
SMAN kann% !
DFF-Team, Frank Stüss
An der Turnhalle 6
6369 Schöneck 2
Tel.: 06187-91503
FAX: 06187-91725Editorial J?’
Lt
IMPRESSUM
Name der Zeitschrift
VIERTE DIMENSION
FORTH MAGAZIN
Organ der Forth-Gesellschaft e.V.
Herausgeber
Forth-Gesellschaft e.V.
Postfach 1110
W-8044 Unterschleißheim
Tel.: 089-3173784 oder
Forth-Mailbox Tel. 089-8714548 8N1
Redaktionsleitung
Rolf Kretzschmar
Rote Gasse 7, W-5112
(Redaktionsadresse)
(rk), (verantwortlich)
Baesweiler Die Beule
TeIlFax: 02401-88891 von Rolf Kretzschmar
Redaktion
Arndt Klingelnberg (akg), Alsdorf
Tel.: 02404.61648 Fax: 02404-63039 Mir geht es wie Ihnen, ich mag Beulen nicht. Lassen Sie mich dennoch
Klaus-Peter Schleisiek (kps), Aachen über eine Beule berichten, die nur Gutes erwarten läßt, wenn sie erst einmal
TeliFax: 0241-873462 geöffnet ist,
Layout, Satz, Herstellung Erfahrung habe ich mit mehreren Beulenarten: Fast wäre mir im Urlaub ein
ORGASport, Rilkestr. 8, W-5110 Alsdorf Reifen am Wohnmobil geplatzt, hätte ich nicht rechtzeitig -wenn auch eher
Tel/Fax: 02404-61425 zufällig- die dicke Beule entdeckt. Beulen können also Signalwirkung haben
Grafik, Illustration, Layout und rechtzeitiges Handeln verhindert schlimme Folgen.
Rolf Kretzschmar (rolf) Die Beulen, die ich mir mehr als einmal am Kopf durch Unachtsamkeit
Anzeigenverwaltung zuzog, waren schmerzhaft und z.T. entstellend. Diese Art Beulen scheinen
unvermeidlich; die Absichtserklärung, sich nie wieder das edelste der
Arndt Klingelnberg
Straßburger Str. 12 Körperteile an unverhofft vorstehenden Dingen zu stoßen, scheint müßig.
5110 Alsdorf Und wer sich noch nie eine Beule zuzog , war nicht neugierig genug.
Tel.: 02404.61648 Fax: 62404-63039
Neugierde ist aber der Humus, auf dem Kreativität gedeiht. In unbekannten
Redaktionsschluß Räumen wächst leider mit zunehmender Neugier die Wahrscheinlichkeit, sich
Feb., Mai, Aug., Nov. eine Beule zu holen. Wer alle Widrigkeiten abwägen will, kommt nicht
‘Erscheinungsweise schnell voran. Also: Beulen können Ausdruck neugieriger Kreativität sein.
vierteljährlich Forther holen sich ständig Beulen. Was turnen sie auch auf ungeschützten
Seilen umher?! Es gibt doch Sprachen, die liefern mehr Halt ( Mengen an
Auflage Literatur)! Es gibt doch Sprachen, die haben Netze und doppelte Böden
1000 (“access denied”)! Es gibt Sprachen, die sind derart verbreitet, daß man sich
Preis auf einschlägigen Partys in der Syntax dieser Sprachen verständigen, ja
Einzelheft DM 750, Abonnementpreis angeregt unterhalten kann! Forth? Nie gehört! Zeigt her Eure Forth-Beulen. ..
DM 40,-, bei Auslandsadresse DM 45,- Da ist noch eine andere Forth-Beule. Sie wächst unaufhaltsam. Es drückt
inklusive Versandkosten
auf der einen, es zieht auf der anderen Seite. Ich hoffe, daß sie bald platzen
Manuskripte und Rechte wird! Wie sie aussieht? Nun, sie hat die Form von kleinen Kreuzehen und sie
Berücksichtigt werden alle ein esandten ist zu sehen im Stapel der eingegangenen Fragebogen (Leider bisher nur 32!
Manuskripte von Mitgliedern un a. Nrchtmrt-
gliedern, Leserbriefe können ohne Rück- Also bitte...!). Die Kreuzehen betreffen “Forth und Hardware-Anwendungen”.
Sprache ekürzt wiedergegeben werden. Die Menge macht die Beule: 90% der Fragebogenzurücksender wünschen
Beiträge 8 er Redaktion sind vom jeweiligen
Redakteur mit seinem Kürzel (S.O.) gekenn-
Artikel über Forth auf PP-Controllern, bzw. zur Hardwaresteuerung über den
zeichnet. Für die mit dem Namen des Ver- PC. 80% arbeiten schon mit einem oder mehreren (!) l.tP-Controller(n). Wo
fassers gekennzeichneten Beiträge über- sind die Artikel dazu? Helft, diese Beule zum Platzen zu bringen!
nimmt dre Redaktion lediglich die presse-
rechtliche Verantwortung. Die in diesem Die Redaktion hat schon mal zum Operationsbesteck gegriffen:
Magazin veröffentlichten Beitrage sind ur-’ In diesem Heft bieten wir - mit der Vorstellung von Disco - eine attraktive
heberrechtlich geschützt. Ubersetzung,
Vervielfältigung, Nachdruck sowie Speiche- Einstiegs-Droge für Programmierung in Forth, die sich auch noch sehen
rung auf beliebrge Medien ist auszugsweise lassen kann, und es gibt Hinweise auf Testgeräte, die von FG-Mitgliedern
nur mit genauer Quellenangabe erlaubt. Die kostenlos ausgeliehen werden können.
eingereichten Beiträge müssen frei von An-
Sprüchen Dritter sern. Veröffentlichte Pro-
gramme gehen - soweit nicht anders ver-
Euer
merkt -in die Public Domain über. Für Feh-
ler im Text, in Schaltbildern,, Aufbauskizzen
etc., die zum Nichtfunktionreren oder evtl.
Schadhaftwerden von Bauelementen oder ep~Q-+-
Geräten führen, kann keine Haftung über-
nommen werden. Sämtliche Veröffentli-
chungen erfolgen ohne Berücksichtigung ei-
nes eventuellen Patentschutzes. Warenna-
men werden ohne Gewährleistung einer
freien Verwendung benutzt.
Forth-Magazin ‘Vierte Dimension’ 8. Jahrgang 1992,- 4. Quartal
1ter der notige Entpacker verfügbar.
Mailboxing
von Rafael Deliano
Für Amiga z.B. noch nicht und für
Oldtimer wie C64 und CPC wird er
wahrscheinlich nie verfügbar.
Download im Klartext (ungepackt)
bei 2400 Baud dauert dann für die
Über Nutzen und Nutzer von Forth-Mailboxen Nachrichten einer Woche ca. 8 Minu-
ten.
Womit wir bei den laufenden Ko-
Das Problem bestimmten Bezugsquelle, oder Sie sten wären. Mit Ortsgesprächen kann
wollen die Meinung zu einem Produkt man sich generell nicht ruinieren. Bei
Wenn man sich die ca. 400 Mitglie- hören, bevor sie es kaufen. Sie be- Ferngesprächen in Zone 3 klingelt die
der der FORTH e.V. gleichmäßig kommen nicht nur eine informative Kasse der Telekom jedoch. Aber nur
über die Fläche der Bundesrepublik Antwort, sondern auch eine aktuelle vier- bis fünfmal im Monat.
verteilt vorstellt, wird offensichtlich, Antwort. Tatsachen veralten heute
daß eine funktionsfähige lokale schnell. Bücher und Zeitschriften mit
Gruppe eine statistische Anomalität ihnen. Die Netze
sein muß. Es sind dafür einfach nicht
genügend Leute auf einem Fleck bei- Können die Kosten für die Benut-
einander. Man fragt sich auch, wie ei- Die Box zer vermindert werden, indem, man
ne Fachgruppe effektiv arbeiten soll. den Inhalt der Münchner Box ins Z-
Briefchen schreiben und beantworten Nach einigen Anlaufschwierigkei- und Mausnetz einspeist ? Eine Box
ist mit der gelben Post so quälend ten ist die Mailbox der FORTH e.V. dieser Netze könnte man eventuell
langsam, daß jeder Elan daran schnell voll einsatzfähig. In zum Ortstarif erreichen. Im Gegen-
zugrunde geht. Comp.Lang. Forth treffenlaufend satz zur Münchner Box, die von der
die neuesten Nachrichten aus den FG finanziert wird, erhebt die Mehr-
USA ein. Und auch die Diskussion im zahl der Boxen jedoch einen satten
Die Lösung deutschen Forum ist in Gang gekom- Mitgliedsbeitrag. Irgendwie muß die
men. Trotzdem beteiligen sich noch Grundgebühr der Post und die Gebüh-
Es gibt ein Medium, das schnell ren, die durch den automatischen File-
und relativ billig ist, verschicken einer austausch entstehen, ja wieder herein-
Nachricht an alle oder gezielt an einen geholt werden. Das untergräbt den
Empfänger erlaubt. Wo man die Kostenvorteil. Außerdem übemeh-
Nachricht holt, wenn man Zeit für sie men die einzelnen Boxen ungern Fi-
hat und nicht wie beim Telefon im fal- les, die wenig Benutzer,,aber laufen-
schen Augenblick gestört wird. Wo es den Datentransfer haben. Nicht jede
keine Komplikationen beim Ver- Box eines Netzes fuhrt deshalb die
schicken von Sourcecode mit unter- FORTH-Nachrichten. Also muß lokal
schiedlichen Diskettenformaten gibt. erst die kritische Masse an aktiven
Eine Medium, das ideal für Leute ist, Mitgliedern erreicht werden, bevor ei-
die gerne mit Computern arbeiten. ne externe Mailbox sinnvoll nutzbar
Und damit ideal für die Kommunika- ist.
tion innerhalb der FORTH e.V. ist: Generell ist ,die Präsenz von
EMAIL. zuwenige Mitglieder. Die Redaktion FORTH in den Netzen natürlich wün-
Der Nutzen ist nicht nur für den der VD ist nur über Umwege erreich- schenswert, weil dies eine gute und
Verein gegeben, sondern auch für die bar. Das Direktorium wird selten ge- billige Werbung für die FORTH e.V.
einzelnen Benutzer. Eine in der Mail- sichted. Die Idee, daß Fachgruppen darstellt. Und der Transfer von der
box gestellte Frage wendet sich an al- über EMAIL organsiert werden könn- Münchner Box in die Netze ist des-
le Benutzer und hat damit beste Chan- ten, scheint noch weit entfernt. halb auch sinnvoll. Er ändert nur
ten auf eine qualifizierte Antwort. Sei Das Nachrichtenaufkommen in nichts an der Tatsache, daß in der An-
es eine technische Frage, oder Sie der Münchner Mailbox fangsphase noch einge Zeit der
brauchen die aktuelle Anschrift einer (Comp . Lang. FORTHLFORUM) Schwerpunkt der Aktivitäten in der
zentralen Box der FORTH e.V. kon-
zentriert werden muß.
Erst wenn die Teilnehmerzahl we-
Download ist im Klartext oder in ge- sentlich höher ist, werden die Netze
wichtig.
mit LZH, was für Texte sehr effizient
ist. Leider ist nicht für jeden Compu- Cl
Forth-Magazin‘Vierte Dimension’ 8. Jahrgang’Nr.1992- 4. QuartalImpressum ........................ 1
Editorial, Die Beule rk ....................... 1
Mailboxing Rafael Deliano ................ 2
Über Nutzen und Nutzer von Forth-Mailboxen
Disco, Ein Lichtspiel Rolf Kretzschmar . . . . . . . . . . . . . . . 4
Vorstellung eines Lampenfeldes als einfacher
Programmiergegenstand zu Lehr- und Lernzwecken
Wie das Licht aufging Rolf Kretzschmar . . . . . . . . . ., . . . . . 7
Eine Rückschau auf die Entwicklung des Disco
Buchbesprechung Arndt Klingeinberg .............. 8
Ting, F-PC 3.5 Technical Reference Manual
Seminarankündigung ........................ 8
Forth und Forth-Prozessoren für
Realtime-Aufgaben, (K. Koller)
Disco mit System Klaus-Peter Schleisiek ............ 9
Beschreibung des Softwaresystems zu Disco
Microcontroller zu verleihen! Rafael Deliano ................ 12
Portierung: eforth -> 68HCll Wolfgang Schemmert ............. 13
Das eforth für den 8051 Mikrocontroller wurde auf
Assemblerbasis für den 68HCi 1 umgeschrieben
Zeitschriftenbesprechung akg ...................... 16
Elektronik Plus, Sonderheft der Elektronik:
Automatisierungspraxis 1
ELRAD-MOPS und eForth akg ...................... 16
Der passende 68HCll -Controller zum Schemmert-Artikel
Die Uhr (1) Friederich Prinz ................ 17
Am Beispiel einer im Hintergrund arbeitenden Uhr wird die
TSR-Programmierung unter ZF-Forth ausführlich behandelt
Vorschau auf die nächste VD 20
. . . . . . . . . . . . . . . . . . . . . . . .
Was tickt denn da... Thomas Beierlein . . . . . . . . . . . . . . . ‘21
Wie man im F-PC an eine genauere Millisekunde kommt
I NUN endlich Arndt Klingelnberg . . . . . . . . . . . . . . 23
Execute> TIB für die Light-Show in der VD 8/2
forth Tagung ‘93 in Nürnberg . ‘ . . . . . . . . . . . . . . . . . . . . . . 27
EuroForth ‘92 Dr. Wolf Wejngaard .............. 28
Der Bericht eines Teilnehmers
Zeige: xy.dbf Michael Major ................. 29
dBase Daten mit Fonh ausgeben
Leserbriefe Prinz, Klingelnberg, Paul, Limbach, Staben . 29
Inserentenverzeichnis ........................ 33
Wunschzettel Ulrike Schnitter ................ 34
aus dem Forth-Büro
BITS vom BUS Arndt Klingelnberg .............. 34
Ein Kurzbericht über den universellen I-X FeldbusProzessor
Termine 1993 akg . . . . . . . . j . . . . . . . . . . . . . 35
Gruppen, Fachberatung, Ansprechpartner . . . . . . . . . . . . . . . . . . . . . . . . 36
Forth-Magazin ‘Vierte Dimension’ 8. Jahrgäng 1992 - 4. QuartalSchule
Disco
Ein Lichtspiel
von Rolf Kretzschmar
“Dieses Ding hätten wir vor fünf Jahren schon haben,müssen!” ein Gesicht auf dem Lampenfeld
sagte mir mit vorwurfsvollem Unterton ein passionierter Forther erscheint, ist der Umgang mit den x y
aus Moers. Wer 1991 auf der Forth-Tagung in Frankfurt war, kennt Koordinaten (kartesisch, x von 0 bis
es schon. Dem Rest der vd-lesenden Forther wird es nun vorge- 7, y von 0 bis 7) schnell gelernt. Denn:
stellt: Das Lampenfeld, mit dem Programmierenlernen, Spaß Fehler werden sofort sichtbar und
macht. kömrenz.B. mit 5 3 AUS 5 2 AN kor-
rigiert werden. Die ersten Klagen über
wunde Finger beim zweiten oder drit-
Ich weiß nicht, ob Sie sich vorstel- controllem geeignet scheinen. Den ten Malauftrag sollte Anlaß genug
len können, wieviele Programmier- Abschlul3 bildet ein Appell an alle in- sein, den Begriff Programmierung
Probleme man an einem 8X8-Lam- teressierten Forther, sich am Projekt einzuführen. Meine Definition lautet:
penfeld demonstrieren kann. Mir je- Disco als einer systemunabhängigen Programmieren he@, dem Computer
(!> Plattform zu be- etwas beibringen, was er vorher nicht
teiligen. .. konnte! Und wenn nach der Eingabe
Die geplante Artikelserie über das haben Geleg%; des Wortes GESICHT das Gesicht er-
scheint, während kurz vorher noch
Lampenfeld wendet sich am Anfang - ~~~~p~~e~$& GESICHTFür Schüler ist die Anwendung der oder logische Operatoren einführen. mit dem Lampenfeld gebrauchen.
Postfix-Notation bis hierher über- Ihr Lampenfeld hilft ihnen auch hier Lassen Sie z.B. zufällig eine der 64
haupt kein Problem. Sie lernen spie- bei der Visualisierung: Bitmuster und Lampen einschalten, und stellen Sie
lend damit umzugehen, nehmen sie deren logische Verknüpfungen kön- als Programmieraufgabe, daß ein
als Regel im Spiel ganz selbstver- nen sichtbar gemacht werden, das Punkt solange auf einem vorgegebe-
ständlich an. Erst wenn plötzlich die Lampenfeld gar als Abbild eines 8-Bit nen Weg vorwärts geht, bis er auf die-
arithmetischen Operatoren eingeführt Stapels genutzt werden. Lassen Sie se zufällig eingeschaltete Lampe
werden müssen, kommt man als Leh- die Schuler die Bitmuster der Zahlen trifft. Danach soll der Punkt den sel-
rer in Erläuterungszwang. Bei der hier von 1 bis 8 in das Lampenfeld pro- ben Weg bis zum Ausgangspunkt zu-
vorgestellten Wahl der Reihenfolge grammieren und Sie werden mit Ver- ruckgehen. (Bildl, Beispiel x) In Dis-
(erst Lampen-Operatoren, dann arith- gnügen feststellen, daß einige Schüler Co können Sie die Zustande der Op-
metische und logische Operatoren) ist von der Regelmäßigkeit der Struktur jekte (Punkt, Zeile, Spalte oder Bild)
die Hürde aber deutlich geringer. Wer überrascht sind. Die wenigsten Schü- vergleichen, um vom Ergebnis des
Forth-Unterricht mit der Erläuterung ler hatten danach Probleme, in kürze- Vergleiches Abbruchbedingungen
des Stapels beginnt, darf sich über ab- ster Zeit alle Kombinationen einer usw. abzuleiten. Für einzelne Punkte
lehnende Haltungen nicht wundem. vorgegebenem Datenwortlange zu gebe ich das Wort AN? ( x y -- f ), das
Zur Einführung der Steuersttuktu- notieren. im Fall der eingeschalteten Lampe das
ren beginne ich mit dem DO...LOOP, An dieser Stelle möchte ich den true-flag hinterläßt. Mit Aufgaben
weil sich dessenEinsatz bei der Lam- Sprung in anspruchsvollere Erlebnis- dieser Art läßt sich der Umgang mit
penfeldprogrammierung sehr schnell räume der Programmietung machen. Fallentscheidungen trainieren.
durch kompakteren Code bezahlt Vorher muß ich aber noch erwähnen,
macht. Für die Bilddiagonale gibt es da8 die bisher skizzierte Einführung
kein Wort in der Disco. Lassen Sie in die Programmierung auf einem si- Sortieren
diese Programmieren, weil Sie z.B. mulierten Lampenfeld auf dem Bild-
ein großes X aus den beiden Diagona- schirm durchgeführt wird. Das muß Zu den Aufgaben der Informatik an
len zeichnen lassen wollen, so fallt nicht sein. Die Motivation bei den Schulen gehören die Sortieralgorith-
den Schülern sofort die typische Schülern kann noch gesteigert wer-
Struktur der Parameter auf. den, wenn man ein reales Lampenfeld
: DIA/ aus Leuchtdioden für jeden Schülerar-
.WEISE beitsplatz hat. Solch ein Lampenfeld
0 0 AN existiert und es hat sich bewahrt. Es
1 1 AN trägt außer den LEDs lediglich ein IC
2 2 AN und kann über die Centronix-Schnitt-
... stelle eines PC angesteuert werden.
1 1 AN Ich werde darauf zurückkommen,
: wenn ich die Absichten der Redaktion
bezüglich dieses Lampenfeldes erläu-
: DIA\ tern werden.
.WEISE
0 1 AN
1 6 AN Zufall
2 5.AN men. Ich glaube nicht, da8 ich Ihnen
... Einen Zufallszahlengenerator kön- schildern muß, wie schön Sie dazu das
7 0 AN nen sie für viele Aufgabenstellungen Lampenfeld verwenden können. Die
Zeiten messen zu lassen, die die ver-
:I
Bei der notwendigen Parameterbe- schiedenen Algorithmen an unter-
rechnung bei DIA\ wird erstmals die
Postfix- mit der traditionellen Nota-
;” & -_ schiedlichen Datensätzen verbrau-
chen und die Ergebnisse als Zahlen
tion verglichen. Der Stapel wird aber I ’ l am Bildschirm auszugeben, ist eine
immer noch nicht ins Spiel gebracht. Sache. Zu sehen, welche typischen
Er ist für diese Problemstellung nicht 1 Spuren die einzelnen Algorithmen auf
von Belang und damit unnötiger Bal-
last. Das Prinzip ist: Eine Spielregel
I
[,‘-,
dem Lampenfeld hinterlassen, zu se-
hen, wie die Blasen (Bubbles) bei
sollte erst dann erklärt werden, wenn Bubble-Sort aufsteigen, ist eine ande-
deren Verwendung notwendig wird. re, eine einprägsame Sache. Schüler
Je nachdem, welche,Vorkermtnisse erinnern sich: “Das war doch der Sor-
Ihre Schüler haben, können Sie an tierer, der...“.
dieser Stelle die Themenbereiche: Da-
ten und Information, Zahlensysteme
-
FORTH-Magazin ‘Vierte Dimension‘ 8. Jahrgang 1992 - 4. Quartal
5Disco, ein Lichtspiel
von Rolf Kretzschmar
Labyrinth reale Lampenfelder benutzt werden
können.
Selbst ein Labyrinth läßt sich auf
dem 8X8-Feld realisieren. Die zufälli-
ge Generierung unterschiedlicher La- Aufzug
byrinthe dürfte schon nicht mehr zu
den trivialen Aufgaben zählen, wenn
man sirmvolle Lösungen verlangt.
Sinnvoll ist ein Labyrinth nur, wenn
es alternative Wege gibt, die in Sack-
gassen enden. Andere Lösungen las-
sen sonst nur eine Art Hindemisren-
nen zu. Aber auch das könnte schon
wieder zu einer neuen Aufgabe füh-
ren. Ich denke, als Aufgabe für Schü- 8X8-Lampenfeld wandern läßt. Zur
ler reicht es schon, wenn sie versu- Generierung fester Bilder (Bildkon-
chen einen Punkt möglichst schnell stanten) sind in Disco Worte vorgesea
das vorgegebene Ziel (blinkender hen. Ebenso für das Schiften und Rol-
Punkt) z; erreichen. ~ len. Wie wäre es mit einer kleinen
Wetterstation, die bei Bedarf die
Windrichtung als Bild darstellt, die Lassen Sie einen Lampenpunkt als
Waschmaschine momentane Temperatur als Text aus- Aufzug fungieren. Die Anzahl der
gibt oder die letzten 8 Temperatur- Lampen, die zufällig eingeschaltet
werte in, Form eines groben Histo- sind, können die wartenden Personen
gramms anzeigt. Für die Darstellung auf vier Etagen symbolisieren. Wer
von Tendenzen fallt Ihnen sicher auch schafft es, ein Programm zu schrei-
noch etwas ein. Das Ganze betreiben ben, das den Aufzug möglichst effek-
Sie natürlich nicht mehr am PC, son- tiv steuert (“Alle Personen der Etagen
dem an einem kleinen Mikrocontrol- 1,2 und 3 wollen ins Parterre; die, die
ler. dort warten, wollen ins Obergeschoß.
Der Aufzug trägt nur drei Personen.“)
Oszilloskop
Einstellhilfe
Als Funkamateur ist mir noch die
In Waschmaschinen arbeiten heute folgende Anwendung eingefallen: Zur
schon Mikroprozessoren. Simulieren Optimierung bestimmter technischer
Sie doch solch eine Waschmaschine,
indem Sie für jeden Prozeßzustand ein
typisches, bewegtes Bild program-
mieren lassen. Es gibt ja Waschma-
schinen, die nicht das typische Fenster
haben. In diesem Fall könnte man mit
dem Lampenfeld die Illusion der Zu-
stande (Füllen, Waschen, Spülen,
Heizen und Schleudern) vermitteln.
Die Darstellung typischer Span-
nungsarten (Rechteck-, sinus-
Text Gleichspannung) läßt sich grob auch
bei einer Auflösung von 8x8 Punkten
Zwar kann man nicht mit den gro- realisieren. Auf dem Bildschirm kön-
ßen Anzeigetafeln konkurrieren, was nen Sie ja das Lampenfeld für diesen
die Lesbarkeit von Text angeht, aber Fall vergrößern. Das DisCo-Vokabu- Einrichtungen ist es oft nicht wichtig,
es klappt besser als man denkt: Text lar läßt grundsätzlich beliebige Feld- zu wissen, welchen Wert eine Ein-
läßt sich lesen, wenn man mit der größen zu. Geplant ist auch ein reales stellgröße hat, sondern in welche
richtigen Geschwindigkeit die Buch- Lampenfeld, das aneinandergereiht Richtung man sie verändern muß, um
staben von rechts nach links durch das werden kann; so da8 auch größere optimale Bedingungen zu schaffen
FORTH-Magazin ‘Vierte Dimension’ 8. Jahrgang 1992 - 4. Quartal
6(Antennenabstimmung). Dazu, ist es
notwendig, sich ein sinnvolles Bild Wie das Licht aufging
für Einstellung ist opti mal. auszuden-
-
ken. Wir wollen eine stromsparende Eine Rückschau auf die Entwicklung des Disco
Potimmnn rl3R
Version wählen und bluuil..nvll, UI«J von R. Kretzschmar I
in diesem Fall die vier Lampen in der
Mitte angehen sollen. Nun können Erfahrung. Eine iweite Klasse bekam eine sehr ge-
mind&tens Vierparameter I”-- di esep
---1--I--- Rild Es hat mich als Schüler immer genervt, wenn schwätzige (iedundante) Sprache vorgesetzt.
ein Lehrer Beispielaufgaben zum aktuellen In dieserSprachumgeb&g konnte rnti Sätze
verändern. An der An uu vc -I-- “Trkde-
Stoff mit Sachen aus anderen Fächern ver- bilden wie:
rung soll man intuitiv den Grad der knopfte, die gerade aktuell waren. In vielen LAMPE DARUNTEREINSCHALTEN
Abweichung erkennen können, so daß dieser Situationen kämpfte ich mit einer Hy- ZURLAMPEDARÜBERGEHEN
dra: Die Sache, um die es ging, hatte ich noch und man kam ohne Parameter aus. Doppel-
man gezielt reagieren kann. Der erste nicht verstanden und nun sollte dieses nicht Punkt und Semikolon hießen übrigens
Parameter verschiebt die Lage der vorhandene Wissen Gegenstand einer neuen LERNE: und ;LERNENDE. Sie werden es
leuchtenden Lampen horizontal. Der Problemstellung sein. Ich erinnere mich noch kaum glauben, aber es gab Schüler, die diese
sehr gut, daß ich in solchen Momenten in eine Schreibweise beibehielten, als längst die Ab-
zweite vertikal. Ein dritter vergrößert Art Panik geraten konnte, die meine Aufnah- kürzungen bekannt waren! Eine dritte Klasse
das Lichtquadrat ohne Lageverände- mefähigkeit stark einschränkte. Wahrschein- durftesich miteinersyntaxanzufreundenver-
rung. Wenn ein vierter Parameter be- lieh hatten sich diese Lehrer sogar besondere suchen, wie sie in der CNC-Technik bis heute
Mühe gegeben. Sowas nannte und nennt man akzeptiert wird:
nötigt wird, kann das Quadrat in zwei fächerübergreifenden Unterricht! Ich versi- Glo (1,2)=“Lampe1,2an”
Richtungen zu einem Rechteck verzo- chere Ihnen, die Theorien dazu sind zahlreich Gll (1,2) =“Lampe 1,2aus”
gen werden. und prächtig.... Erschwerend konnte noch ,:: Es zeigte sich, daß zwar mit s&Iehmehder
hinzukommen, daß mich das einbezogene Redundanz, bzw. zunehmender Natürlich-
Als Anwendung für eine solche Fach überhaupt nicht interessierte. Folge: die sprachigkeit die lernschwächeren Schüler
Anzeige ist auch ein Autofeedback- Motivation sank auf Null. profitierten, dagegen ließ die Lernleistung der
Gerät -denkbar: die vier Parameter “besseren” Schuler recht schnell nach. Ver-
Seitenwechsel. mutllch wurden sie durch die langen Eingaben
könnten Pulsfrequenz, Blutdruck, Mit diesen Ennnerungen im Hinterkopf wollte gelangweilt
Hautwiderstand, Atemfrequenz usw. ich nun, da ich auf der anderen Seite des
sein. Als Referenz gibt man eine ge- Lehrerpultes stand, dte Grundlagen der Pro- Konsolidierung.
grammlerung nicht an Beispielen der Mathe- Seit etwa vier Jahren arbeite ich nun mit ei-
wünschte Einstellung vor, und der matik unterrichten. nem Wortschatz, der für mich ein Optimum
Proband versucht seine autogenen Welches Modell, welches Material war aber an Verständlichkeit, Einfachheit und Nutzbar-
Körperfunktionen so zu beeinflussen, dann besser geeignet? Es mußte so einfach keit für den Unterricht darstellt. Für die Vor-
sein, daß jeder es kannte oder sofort begriff. Stellung In der VD hat Klaus-PeterSchleisiek
daß das kleinste Quadrat im Zentrum Der KenntnIsstand aller Schiller über die Sa-, die Software noch einmal gnjndlich überarbei-
des Lampenfeldes aufleuchtet. ehe sollte gleich sein, egal welche Schule(n) tet und mit zahlreichen Ideen versorgt. (Siehe
Damit möchte ich meine Ideenbör- vorher besucht worden war Bei aller Einfach- Artikel Disco Mit System auf Seite 9) Um das
helt sollte die Sache doch variabel genug sein, Grundkonzept noch besser zu unterstützen,
se schließen und zum Abschluß noch um auch komplexere Aufgabenstellungen zu- sollte eine Lehr- und Lernumgebung geschaf-
einmal die Ziele des Projektes hervor- zulassen Ach Ja, und dann sollte die Beschäf- fen werden, diefürAnfangerund Fortgeschrit-
heben: tigung damit auch noch Spaß machen. tene glelchermaßen attraktiv ist. Emgesetzt
Unmi>gllch! werden Sie sagen wird DISCO in Berufsschulklassen, In der
Das Projekt Lampenfeldprogram- Fachoberschule und rn Technikerklassen.
mierung soll: Lichtblick Noch nie hat sich ein Schüler über einen
q Hilfen für den Programmierspra- Wie ich schllelYich auf ein Feld von Lampen Mangel an Seriösität bei den Aufgabenstel-
kam, weiß Ich nicht mehr genau, aber damals lungen beklagt. Erst wenn ich sehe, daß die
chenunterricht bieten waren bei den Schülern jene geschmackvol- Schuler ein Programmierproblem in der Lam-
n ein einfach zu handhabendes In- len Geräte für Musikanlagen in Mode, die in penfeldumqebunq völllq beherrschen, waqe
strument zum Üben und Lernen ei- Abhängigkeit von der Ton-höhe und der Laut- auch ich den geforderten Praxisbezug. Öft
stärke die Helligkeit von drei farbigen Lampen genug muß ich dann mit Defiziten bei den
ner Programmiersprache (in unse- steuerte. Ein Schüler fragte mich damals, wie Schillern ( oder auch bei mir ) in diesem
rem Fall natürlich Forth) bieten. man die Elektronik umbauen könnte, um das Bereich kämpfen und meistens atmen die
Verhalten etwas zu beeinflussen. Damit war Schüler wieder frei durch, wenn wir zu unse-
0 eine Plattform für interessante Pro- das gesuchte Ding gefunden. Ich begann Dis- rem vertrauten Lampenfeld zurückkehren.
grammierkonzepte (systemunab- Co(DisplayComputer) zu entwickeln. Daswar
hängig! !) darstellen im Herbst 1985. Auf den Bildschirmen der 10 Hardware.
n Anregungen für eigen*
eigene &np
Experimen- APPLE ][ unserer Schule gingen die Lampen Doch zurück zur Entwicklungsgeschichte.
an. Einfache, quadratische Blöcke konnten Nun hatte ich zwar die Simulation eines Lam-
te und deren Diskus
Diskussion in der VD von den Schülern ein- und ausaeschaltet wer- oenfeldes auf dem Bildschirm, aber eine ein-
bieten, den. Natürlich mit Forth DamaL noch mitdem ;ige reale rote Lampe, die durch den
o eine erste, attraktive Anwendung holländischen FysForth, dessen Editor Ich Computer ein und ausgeschaltet werden
vollständig eingedeutscht hatte. konnnte, würde ein vielfaches an Interesse
für Mikrocontroller zeigen und bei den Schirlern wecken, da war ich sicher.
deren Programmierung unterstüt- Experimente. Welches Maß an Motivation würde dann erst
zen, Was die Steuersprache (Forth-Worte) betraf, e!n reales 8X8-Lampenfeld bei Schülern her-
die ich den Schülern anbot, machte ich zu vorrufen?! Also baute ich den Prototyp eines
q einen Pool hübscher und vielleicht dleserZeitzahlrelche Experimente.eine Klas- Lampenfeldes mit 64 Leuchtdioden. Uber die
auch nützlicher Anwendungen se arbettete mit einer mnemonischen Spra- Centronix-Schnittstelle wurde dieses Lam-
sammeln. ehe, deren Worte nicht mehr als drei Zeichen penfeld wie ein Drucker angesprochen: jedes
hatten. Beispiel eintreffende Byte schob sich spaltenweise In
1 2 LoN (” Lampe 1 2 an”) die 8x8-Matrix und das BItmuster wurde so
Die Attraktivität des Projektes 3 2oF ( “alle Lampen in Zeile 3 aus”) sichtbar. Auf diese Welse konnten leicht (Libri-
hängt von der Resonanz ab, die die
FORTH-Magazin ‘Vierte Dimension’ 8. Jahrgang 199‘2 - 4. QuartalDisco, ein Lichtspiel
von Rolf Kretzschmar
gens aus jeder Programmierumgebung) gan- System (KiaRo: Klaus-Rolf) auszubauen. Von Redaktion von den VD-Lesern er-
ze Bilder und Laufschriften realisiert werden. Anfang an hatten wir vorgesehen, daß das fährt. An unserer Schule wurden von
Daß es funktionierte, hatte ich mit dem Proto- reale Lampenfeld überdie VG-Leiste an einen
typen bewiesen. Aberwohersollte ich minde- Mikrocontroler (MiniBee, Firma D. Brilhl) an- Schülern einige 8x8-LED-Felder in
stens zehn dieser Geräte bekommen? Der geschlossen werden konnte. Damit war die halber Europakarten-Größe gebaut.
Aufwand für den Selbstbau war erheblich, so Möglichkeit geschaffen, die Einfllhrung in die Der Entwurf und das Layout stammen
daßdie Realisation mit Schülern nicht möglich Programmierung eines Mikroprozessors mit
war. Doch auch in diesem Fall kam mir Klaus- dem beliebten Lampenfeld als Zielmaschine von Klaus-P. Schleisiek (Aachen). Er
Peter-wie so oft- mit Rat und vorallem mit Tat zu realisieren. Muß noch erwähnt werden, legt gerade eine kleine Serie davon
zu Hilfe: Er entwarf ein Lampenfeld, das mit daß die MiniBee (RSC-) Forth versteht? Aber auf; wer Interesse hat, sollte sich bei
nur einem IC auskommt. Dieses konnte ich selbst, wenn ich in entsprechenden Klassen
dann leicht mit Schülern nachbauen. Der Er- Assembler unterrichten wollte, müßte ich ihm melden.
felg war: Schuler wollten solch ein Lampen- mich nicht aus dervertrauten Umgebung ent- Das Software-Paket ist erhältlich:
feldhaben, um damit zuhause zu spielen und fernen. q in der Mailbox der Forth-Gesell-
um Freunden endlich mal zu zeigen, daß
Computer auch was Nützliches machen ktin- Zukunftsmusik. Schaft, München
“en.... Inzwischen hat Klaus eine Variante zur Mini- q bei den Autoren gegen SAFU-
Na KiaRo!
Beeentworfen, den Heinz65, und gemeinsam MFD (Selbst Adressierten Freium-
wollen wir versuchen, das KlaRo-System
Von der Faszination, die dieses schlichte In- (PC+Lampenfeld+DisCo+Teach/Software)
schlag -Mit Formatierter Diskette).
strument auf die Schiller ausübte, waren zur Alltags- und Schultauglichkeit zu verhel- Cl
Klaus und ich dann doch überrascht. Wirbe- fen
schlossen, dieses Konzept zu einer Art Lehr- Cl
F-PC 3.5 Technical nicht unbedingt laptoppen; da ist ge- FORTH und FORTH-Prozesso-
drucktes geeigneter. Zudem steht in ren für Realtime-Aufgaben
Reference Manual diesem Buch gerade auch das, was
Dr. C. H. Ting Tom Zimmer nicht dokumentiert hat, Einen Lehrgang über FORTH und
2nd Edition 1989 englisch, und es steht das gemeinsam geordnet, FORTH-Prozessoren mit praktischen
269 Seiten was logisch zusammen gehört. Ein Übungen veranstaltet die Technische
Offete Enterprises, Buch muß VorwärtsReferenzen nicht Akademie Esslingen vom 15. bis 17,
San Mateo, USA vermeiden. Ting steht der Didaktik Februar 1993. Unter der Leitung von
(1306 South B Street, CA 94402) offensichtlich nicht fem. Vielleicht ist Dr. Konrad Koller von der Zentralab-
no. 1008: $30(+$9 AirMail) es auch natürlicher ‘Chinese wisdom’ teilung Forschung und \ Entwicklung
oder sein spezieller Stil, den ich gern der SIEMENS AG bekommt der Teil-
mag und hinter dem sich sehr viel nehmereinen Überblick über die Pro-’
F-PC 3.5 Background-Wissen verbirgt. (Er sitzt grammierumgebung FORTH und die
TECHNICAL REFERENCE MANUAL ja wohl auch mittendrin in der 4th- heute auf dem Markt erhältlichen
Szene). Realtime-Prozessoren auf der Basis
ILCONDED*m
b.CILTln# v.3.50 ist zwar das “Offical Relea- von FORTH.
se F-PC”, aber für manche schon der Die Veranstaltung richtet sich in
Schnee von gestern. Und obwohl Tom erster Linie an Software-Entwickler,
Zimmer mehr und mehr hinzuschafft, die sich grundlegend über, Eigen-
bleibt das Technical Reference Manu- schaften und Möglichkeiten von
al eine Referenz. Wer etwastieferein- FORTH informieren wollen, an Mit-
steigen will, sollte es haben. Hierend- arbeiter von Fachabteilungen, die sich
lieh fand ich Bestätigung und Zusatz- mit Problemlösungen in der Steuer-,
‘aha’-Effekte, als ich z.B. AT Regel- und Meßtechnik befassen, so-
begreifen wollte. Meine Fragen hier wie an Anwender von Mikroprozes-
und da ergaben sonst nur Achselzuk- soren, die auch bei zeitkritischen bzw.
ken. maschinennahen Problemen nie wie-
Gravierende Änderungen, wie das der in Assembler programmieren wol-
Pointer-Memory-Konzept, fehlen len.
hier. Auch wird man/fra weder in F- Interessenten richten ihre Anmel-
PC, selbst noch hier z.B. auf \CHARS dung an die Technische Akademie
akg. F-PC 3.50 war das erste Sy- gestuppst. Aber ich wurde mir z.B. Esslingen, Postfach 1265, 7302 Ost-
stem, in das ich voll und tief einstei- im Umgang mit PLACE , "" ( besser: fildem, Tel. 0711/34008-23, FAX’
gen konnte, OHNE ein Buch dazu zu X” ) und ; CODEsicherer: drei inter- 0711/34008-27. Wegen der begrenz-
haben und ohne auch nur eine einzige essante Wörter die Tom Zimmer nie ten Teilnehmerzahl wird eine frühzei-
Anleitung auszudrucken. Trotzdem, selbst verwendet(e). tige Anmeldung empfohlen.
man/fra will im Bus oder im Liegetuhl ci ci
FORTH-Magazin‘Vierte Dimension’ 8. Jahrgang1992- 4. QuartalSchule
Methoden beschrankt und aus diesen
bis zu zehn weitere gebildet, die uns
DisCo als besonders empfehlenswert er-
schienen. Das Glossar am Ende dieses
Beitrags erklärt die Einzelheiten.
mit System
von Klaus-Peter Schleisiek
Einfach...
...und pflegeleicht wie die Anwen-
dung soll auch die Software sein. Da-
mm benutzen wir von Anfang an
Forth. Seit dem Beginn mit A-Forth
Die Unterrichts-Hilfe für Digital-Technik und Programmier-Spiel- auf Apple 11 wurden einige Reifesta-
wiese nach dem Motto: Am Anfang war das Bit, und das Bit machte dien durchlaufen, Das erste Konzept
Licht, und das Licht zeigte das Bit. war mehr experimentell, das Bild war
auf ein Paket aus 8.Linien zu je einem
Byte beschrankt, und die zur Übertra-
Disco, der Display-Computer, ist ich die Objekte und Methoden hier gung auf verschiedene Lampenfeld-
die von Rolf Kretzschmar erdachte kurz vor: Hardware notwendige Gliederung in
Kommando- und Programmier-Um- Gerätetreiber und Handhabung fehlte
gebung, mit der das Verständnis der Das Grundobjekt... zunächst. Inzwischen können Linien
Digitaltechnik vermittelt und geübt ...ist die einzelne Lampe, mit der oder Bilder so viele Bytes enthalten,
werden kann. Wie er seit Jahren in der sich schon einiges anfangen läßt: tri- wie mit einer normalen Integerzahl
Schule demonstriert, ist dabei nichts vial ist das Ein-, Aus- und Umschal- ausgedruckt werden kann. Um die
einleuchtender, als Bits durch Lam- ten; es läßt sich aber auch der Zustand Objekte trotz ihrer Größe bequem auf
pen abzubilden, nicht nur als Darstel- einer Lampe gewinnen und verwen- dem Stack swappen und duppen zu
lung auf dem Bildschirm, sondern den. Die nächstliegenden Verwen- können, wurde etwas in objektorien-
auch real mit LEDs als Lampen. dungen des Zustands sind: Darstel- tierte Programmierung und dynami-
So schlicht und einfach wie die be- lung an anderer Stelle, Vergleich mit sche Speicherverwaltung investiert.
nutzte rechteckige Lampenmatrix soll anderem Lampenzustand und Ver- Schließlich wurde durch geeignete
natürlich das gesamte System sein, in knüpfung mit anderem Lampenzu- Modularisierung die für die Verbrei-
Soft- und Hardware. Dafür habe ich stand durch die üblichen logischen tung nötige Übertragbarkeit erreicht.
gesorgt. Die folgende Darstellung Funktionen ( und, oder, ..). Statt der Die neueste Auflage des Disco ist
richtet sich einerseits an die Anwen- üblichen logischen Funktionen sind in Forthmacs geschrieben; für F-PC
der, die für Unterricht oder einfach ebenso beliebige selbstdefinierte Ver- und Rockwells RSC-Forth (etwa 79er
zum eigenen Spaß mit den bereitge- quickungen in gleicher Weise ver- Standard) gibt es Einleitungen, die
stellten Mitteln umgehen möchten, wendbar. das Disco File akzeptabel machen.
und zum anderen an Programmierer, Gerätetreiber für Bildschinn und
die Disco auf andere Rechner und Das Geamtobjekt... Lampen-Hardware werden nach Be-
Ausgabe-Geräte übertragen wollen. . ..ist das Bild, auf das sich die Me- darf zum Schluß geladen.
Die Quell-Files werden über die FG- thoden der lampenweisen Betrach-
Mailbox zur Verfugung gestellt. tung sinngemäß anwenden lassen.
Statt der identifizierenden Koordina- Beschreibung:
Forderungen tenpaare bei Lampen sind etwa die
Einfach muß das System sein, aber Namen verschiedener Bilder zu ver- Da die Kommentare in den Queü-
nicht primitiv. Wenige Methoden sol- wenden. Files weder Einführung noch Uber-
len - einmal verstanden - auf komple- Auch Teile des Bildes sind als Ob- blick bieten, folgt hier die wiinschens-
xere Objekte übertragbar sein. Aus jekte der Betrachtung geeignet; wir werte Ergänzung in knapper Form.
verschiedenen Sichtweisen auf ein haben uns auf ZEILENWEISE und Das Zeichen # verwenden wir all-
Feld die jeweils passende Methode zu SPALTENWEISE beschränkt, Bei gemein als Kennzeichen für die Bild-
wählen und anzuwenden, ist ein Bil- diesen genügt jeweils eine Koordinate matrix, i für Spalten, _ für Zeilen und
dungsziel, das sich an diesem einfa- zur Identifikation. . für Punkte bzw. einzelne Lampen.
chen Modell üben läßt. Konkret stelle Außer den genannten Methoden
sind zahllose weitere möglich, von Organisatorisches
Stichworte denen die Erzeugung benannter Ob- Die Dimensionen des Lampenfel-
jekte als Konstanten oder Variablen des sind in den Values #COLS und
Disco besonders erwähnenswert ist. Um #ROWS für Spalten und Zeilen enthal-
Methoden aber die Übersichtlichkeit nicht zu ge- ten. Ein Lampenfeld bildet den zu-
Lampenfeld fährden, haben wir uns auf ein Dut- sammenhangenden Speicherbereich
Vokabulare zend als “notwendig” bezeichnete beginnend mit Adresse #SPACE ab.
Forth-Magazin ‘Vierte Dimension’ 8. Jahrgang Nr. 1992‘- a. QuartalDisco mit System
von Klaus-Peter Schleisiek
Jede Lampe entspricht einem Bit. Das lautende Worte in verschiedenem allem dem bequemen Umgang: AN
1. Byte liegt in der linken oberen Ecke Kontext auf verschiedene Objekte und AUS und UMersparen im Stand-
des Lampenfeldes waagerecht. Die spezifisch anzuwenden, Wir verwen- ard-Fall Schreibarbeit, SH1FT und
Lampe am linken Rand wird mit dem den daher - innerhalb des Vokabulars ROLL bieten etwas für das Auge des
Bit-Offset 0 adressiert. Die folgenden DISCO - die folgenden; Anfängers bevor er böse Abstütze
Bytes schließen sich recht an. Nach .WEISE "punktweise" oder überstehen muß.
dem letzten Byte einer Zeile folgt das "lampenweise"
linke Byte der darunter liegenden Zei- WEISE "zeilenweise" Der Treib&...
le. Die Spalten und Zeilen werden al- IWEISE "spaltenweise" . ..hat sein eigenes Vokabular, das
SOvon der linken, oberen Ecke aus ge- #WEISE "bildweise" er ins Defer-Wort TREIBER schreibt,
zahlt, mit 0 beginnend. Dies ist die in- Diese vier Vokabulare sind und darin das Wort PRINT, dasüber
tern benutzte “technische” IMMED IATE , das hat sich bewahrt. das Defer-Wort #PRINT znbenutzen
Anordnung, die wohl auch den mei- Zur vorübergehenden Rettung und ist. Zusätzlich kann er HELL und
sten Bildschirmen entspricht, Die äu- Restaurierung des CONTEXT bieten DUNKELenthalten, um auszuwählen,
ßere Darstellung ist davon unabhän- wir die Immediate-Worte ZEITWEI- wie l-Bits dargestellt werden sollen,
gig. In der Schule ist die kartesische SE und ALTWEISE. Dies ist beson- Falls er einen Bildschirm steuert, sind
Orientierung üblich, bei der die verti- ders nützlich in einem Forth-System noch Rahmen mit Zeilen- und Spal-
kale Achse nach oben zeigt. Gelegent- nach 79er Standard, das keine wahl- tenzahlen nützlich. Weiten Spielraum
lich wollen wir auch Binärzahlen dar- freie Suchordnung hat. bieten Variationen der Lampengröße
stellen, bei denen wir das höchstwerti- und -Form. Die vom jeweiligen Trei-
ge Bit nicht rechts, sondern links Manipulatoren ber unterstützten Werte für #COLS
außen brauchen. Jedes Vokabular enthält minde- und #ROWS,sowie eine Reihe davon
Um alle Ansprüche erfüllen zu stens das Dutzend der im Glossar ver- abgeleiteter Values können mit
können, schalten wir den Eingabe- zeichneten erforderlichen Worte, so- >DEPENDANTS?belegt werden, das
Modus um mit den Worten TECH- weit sich die passende Version nicht auch Speicher reserviert. Das geliefer-
NISCH,SCHULISCH oder WERTIG. bereits in der Suchordnung als erstes te Flag zeigt an, ob sich eventuelle
Eingabe-Worte haben daher gegebene findet. Besondere Beachtung verdient Voreinstellungen mit den geforderten
Koordinaten erst zu bearbeiten: Spal- das Wort BITS: , das den Schlüssel Werten vertragen.
ten werden mit 1 behandelt, das nach zur bitweisen Verknüpfung zweier
einem Bereichstest das Defer-Wort Objekte liefert. Anstatt eines umfang- Nützliches
( I ) anwendet, das je nach Modus reichen Satzes der üblichen AND ', Unabhängig von spezieller Be-
l REVERS bzw. NOOP ausführt. Für OR , etc. nebst ihren Invertienmgen in trachtungsweise durch die vier obigen
Zeilen sind die Worte _ und (-) zu- jedem der Vokabulare bieten wir Vokabulare finden sich in DISCO
ständig. Die Modus-Worte setzen “nur” die spezfifischen Versionen des noch andere schöne Worte:
(1) und (-) nach Bedarf; (state-)smarten BITS : als Werkzeug. NURist sehr praktisch, um nur das
TECHNISCH z.B.installiert NOOPs. Beispiel: ( / WEISE) angezeigte Bild für ein neues zu lö-
Prinzipiell passen die Objekte der \ Definition schen. (z.B: ,WEISE NUR0 MAN)
Betrachtung - von einzelnen Lampen : UND ( Objl Obj2--0bj ) CLEAR leert die Stacks und gibt
abgesehen - nicht auf den Stack. Sie BITS: AND ; eventuell reservierten dynamischen
werden daher intern als Linienbehan- \ interaktiv mit selbst- Speicher frei.
delt, die als Superstrings realisiert \ gestrickter Verquick- Mit SHOWund -SHOWkann man
sind: Count-Wort (nicht -Byte) mit \ ung namens QUICK einstellen, ob die mit PUT (s.Glossar)
angehängten Datenbytes. Auf dem 1 GET 5 GET BITS: QUICK erreichten Ergebnisse gleich ange-
Stack ist als Repräsentant nur der Zei- 5 PUT zeigt werden. Das ermöglicht unter
ger auf das Count-Wort. ALLOGATE Jede Bit-Verknüpfung, auch ir- anderem, durch Vergleich zu ermit-
und FREE verwalten den für diese gendein in DISCO definiertes teln, wieviel der verbrauchten Re-
Objekte reservierten Speicher von QUICK, steht dadurch allen objekt- chenzeit dem Bildaufbau zu verdan-
[SPACE bis SPACE] dynamisch. Weise Vokabularen zur Verfügung. ken ist.
Diese Technik hat für die Benutzung Diese in bester Form-Tradition ste- Text-Darstellung ist in DISCO
nur eine Auswirkung: Sonderversio- hende Technik hält nicht nur den nicht enthalten. Diese schöne Anwen-
nen für die Stack-Manipulation. Standard-Wortsatz schlank, sondern dung stelle ich im nächsten Heft vor.
*DUP,*DROP,*SWAP sowie *ROT erlaubt die einheitlich elegante Ver- tl
und *OVER sind eingeführt zur ein- wendung beliebiger Paar-Verknüp- II Anzelge
heitlichen Handhabung, obwohl man- fungen, die sogar von weiteren Bedin- Um dem Schwund an Forth-Literatur
che nichts anderes tun als ihre *-losen gungen abhängig sein dürfen. (Puri- und den Anfragen entgegenzutreten,
Aliase. sten dürfen sich gerne die gibt es mein FORTH-Buch jetzt auch
nicht-state-smarten BITS: und einzeln: 59,- DM + Porto bei:
Vokabulare... J. Stuben, Hagelkreuz&. 23,
[BITS 1 : schreiben.) D(W)-4010 Hilden, Tel.: 02103-240609
. ..bieten die Möglichkeit, gleich- Die empfohlenen Worte dienen vor
Forth-Magazin‘Vierte Dimension’ 8.,JahrgangNr. 1992- 4. Quartal
IOSchule --
D
Glossar der Disco Standard-Worte
Zeichen-Erklärung: SCHULISCH (--) setzt (1) und (.J passend, dann SHOW
WERTIG ( -- ) setzt (1) und (J passend, dann SHOW
(7 erforderliche Worte
empfohlene Wort-Einträge
Adr 0, 1 oder 2 Stack-Eintrag je nach CONTEXT Manipulation:
Obj Reprasentation mit einem Stack-Eintrag NUR ( -- ) löscht ganzen Bildspeicher
P Pointer .WEISE ( -- ) Vok.“punktweise” oder “Iampenweise’Y’)
col Column, Spalte - WEISE ( -- ) Vokabular “zeilenweise“ (7
row Row, Zeile IWEISE ( -- ) Vokabular “spaltenweise” (‘1
#X Adresse eines alternativen Bildspeichers, gleich #WEISE ( -- 1 Vokabular “bildweise” (‘)
groß wie bei #SPACE Diese Vokabulare sind IMMEDIATE
Ein Wort zu Bitverknüpfung, z B. AND
Folgende Worte sind in ledern Vokabular definiert oder in passender
Speichetung: (alle Worte erforderlich) Version In der Suchordnung zuoberst verfügbar:
*GET ( #x Adr -” Obj )
#COLS C--n) Value: Spalten im Speicher
holt aus Bild-X das passende Objekt, (‘)
#ROWS C--n) Value: Zeilen im Spelcher
also Punkt,Zeile,Spalte oder ganzes Bild
(von diesen abhlngig:)
*PUT ( Obj #x Adr -- )
#B/COLS C--n) Value: Bytes für eme Spalte Im SpeEcher
setzt Obj in Bild-X an Adr ein (7
#B/ROWS C--n) Value: Bytes für eme Zeile im Speicher
VARTABLE (comp, -- ) (run: -- p) (7
#B/# t--n) Value. Bytes fOr em Bild Im Spelcher @
( P -- Obj ) holt Obj aus der Var. in Arbeitsform (‘)
#SPACE C--n) Value: Anfang des Bildspeichers
( W P -- ) speichert Obj in der Variablen (7
>DEPENDANTS?(COkt'OWS-- f)
INV ( Obj -- Obj’ ) invertiert alle Bits eines Objektes (‘)
tut nichts, falls die Werte auf dem
( Objl Ob12 -- f )
Stack tibereinstimmen mit #COLS und =
vergleicht zwei Objekte (7
BROWS. (Erfolg) falls #COLS und
BITS: ( Objl Obj2 -- Obj )
#ROWS noch =0 sind
verknüpft 2 Obj., hinterläßt Ergebnis (*)
Initialisierung abhanglger Values, Spe1
Der Name der Operation vom Input-Kanal wird benutzt.
eher-Resetvlerung
BITS: 1st state-smart, daher auch innerhalb einer :-Definition nutzbar
Meldet Fehler,wenn #COLS und #ROWS
NULL ( -- Obj ) gibt Obj mit sämtlichen Bits = 0 (*)
schon anders besetzt
*DUP ( Objl -- Objl Objl )
f = 0 zeigt MiOerfolg
DUP für Objekte (‘)
CLEAR (?--) leert die Stacks und gibt eventuell
'DROP ( 04 -- ) DROP fUr Objekte (7
reservierten dynamischen Speicher frei
*SWAP ( Objl Obj2 -- Obj2 Objl )
SWAP für Objekte (‘)
[SPACE und SPACE] sind die Grenzen des des durch ALLOCATE und
GET ( Adr -- Ob] ) holt aus # SPACE das pass. Objekt
FREE automatisch verwalteten dynamischen Speichers Nicht zur di-
PUT ( Obj Adr -- ) setzt Obj in #SPACE an Adr ein,
rekten Anwendung vorgesehen.
S.O. SHOW
CONSTANT @mp Ob] --)(run -- Obj)
Ausgabe: AUS ( Adr -- ) macht NULL PUT an gegebener Adresse
TREIBER ( -- ) Defer ftir Treiber-Vokabular (‘) AN ( Adr -- ) macht NULLINVPUT..
#PRiNT ( -- ) DEFER furTreibers PRINT, (*) UM ( Adr -- ) macht das Gegenteil
das den #SPACE abbildet
SHoW (-- 1 veranlafit, daß PUT auch #PRINT aus- SHIFT ( Obj n (m) -- Obj’ )
führt, evtl. mit schmückendem Beiwerk bewegt die Bits der Linie um n Plätze in
-SHOW ( -- ) veranlaßt das Gegenteil die eingestellte Zahlrichtung, n darf auch
(SHOW) C--f) Flag-Variable. Wahr, wenn SHOW aktiv negativ sein. In die geräumten Plätze
HELL ( -- ) Erscheinen eingeschalteter Punkte rücken O-Bits nach
DUNKEL ( -- ) Erscheinen eingeschalteter Punkte Auf Bllder angewendet wird um n Spalte
und m Zeilen gesch. (Anzeige mit PUT)
Eingabe: ROLL ( Ob] n (m) -- Ob]’ )
arbeitet wie SHIFT, aber mit dem Unter-
(1) ( col - col’ ) Spalten-Eingabe - techn. Zahlwelse (‘)
schied, daß in die geräumten Plätze die
/ ( col -col’ ) Bereichs-Prbfung, dann (1) (‘1
hinausgeschobenen Bits nachrücken.
(-1 ( row - row’ ) Zeilen-Eingabe - techn. Ztihlweise (*)
( row - row’ ) Bereichs-Prüfung, dann (J (7 D
TECHNISCH (--) setzt (1) und (J passend, dann SHOW (*)
FORTH-Magazin ‘Vierte Dimension’ 8. Jahrgang 1992 - 4. QuartalInfo
ledigt. Nicht weiter tragisch. Wenn
Microcontroller Sie nicht selbst in der Lage sind es zu
reparieren, senden Sie es bitte direkt
an mich zurück, damit ich mich um
zu verleihen ! die Instandsetzung kümmere.
Einschränkungen
Mitteilung von Rafael Deliano
Steinbergstr. 37, W-EO34 Germering, Tel.: 089/8418317 Wenn Sie nicht gerade zum Lötkol-
ben greifen und Hardware anbauen,
Der Verleih der Microcontroller wird neu geregelt. Hier die Einzel- können Sie mit den Geräten einstwei-
heiten. len noch nicht sehr viel tun. Man kann
natürlich Programme entwickeln.
Aber Controller sind zum Ansteuern
Bisher hat Jörg Staben das Hand- Zugriff von Hardware gedacht, und die Bo-
ling der Boards durchgeführt. Aber da ards haben derzeit noch kein passen-
er mit seinem Direktorposten und sei- Wenn Sie Mitglied der FORTH des I/O. Es sind Demozusatzplatinen
nem Engagement für F-PC bis über e.V. sind und eines der Systeme zum mit Displays, Laut- Sprecher usw. in
die Ohren zu ist, ist die Verwaltung Testen haben wollen, rufen sie mich Vorbereitung. Aber bis die verfügbar
einstweilen auf mich übergegangen. an. Ich benachrichtige denjenigen, der sind, dauert es noch eine Weile.
Auch die Hardware hat sich etwas das gewünschte System gerade hat. Er tl
verändert. Die Controllerplatinen ent- wird es direkt an Sie weiterschicken.
halten jetzt durchweg Steckernetzteil Oder er wird Sie informieren, wie lan-
und 9-Pin-V24-Buchse. Deren Bele- ge er es noch braucht. Wenn Sie das &wr,&g derRedaktion:
gung enspricht einem Modem, es sind Gerät erhalten, öffnen Sie die Schach- Sie können natürlich das DisCo-Lampen-
also handelsübliche Kabel verwend- tel bitte vorsichtig. Sie brauchen sie felddamit ansteuern!
bar. Aber es liegt kein V24-Kabel bei. nochmal beim
Weiterschicken. 1Super8 1F65-KIT
Überprüfen Sie I I
Voraussetzungen bitte den Inhalt auf Hardware
CPU 8-Bit “Suoer8” d-Bit “65CO2”
Vollständigkeit Microcontroller Microprozessor
Wenn Ihr Tischcomputer einen 9- und rufen Sie von Zilog von Rockwell
Pin V24Stecker hat, brauchen Sie al- mich dann bitte EPROM 8kByte 28kByte
so ein 9poliges Kabel, das 1: 1 durch- an, damit ich nicht ( ROM im Controller ) ( nur 14kByte belegt )
RAM 32kByte 32kByte
verbindet. Wird oft als “Mauskabel” im Dunkeln tappe, ( batteriegepuffert )
bezeichnet. Hat der PC einen 25Pin wo die Boards der IJ0 UART UART in Software
Stecker, ist außerdem Kabel auch ein e.V. verblieben 3 Parts
Adapter nötig. F65 ist nicht auf einen sind. Die Control- 2 Timer
bestimmten Computertyp festgelegt. ler sind offene 8 IRQs
Software FORTH in Microcode JSRthreaded-FORTH
Man braucht zusätzlich nur noch ein Leiterplatten. Da von CPU unterstützt Assembler &
beliebiges, einfaches Terminalpro- kann es durchaus FORTH-83-Standart Disassembler
gramm. Beim Super8 liegen 35” und vorkommen, da8 für 65x02
5”-Disketten für IBM-PCs bei. man ein Board er-
aber für ernsthaftes Entwickeln ist die
Verwendung der mitgelieferten Soft- Die Kolumne ,,Forthund der Rest der Welt” muß diesmal leider ausfallen, weil
wareunumgänglich. Andreas Goppold beruflich zu sehr beansprucht war. Er hat aber versprochen,
sich im nächsten Heft wieder zu melden.
Die Rubrik ,,WANTED in Forth” mußte aus Platzmangel entfallen.
Stichworte Vielen Dank an alle Autoren und Ideenlieferanten der VD. Damit das Heft in
Microcontroller Zukunft noch vielseitiger wird, brauchen wir Ihre Mitarbeit auch im nächsten
Super8 Jahr.
65CO2
Verleih Die Redaktion wünscht sich daher viele Beiträge und seinen Lesern ein gutes
und erfolgreiches Jahr 1993
Forth-Magazin‘Vierte Dimension’ 8. JahrgangNr. 1992- 4. QuartalWerkstatt
lagert, mit dem der Targetcontroller
Portieflulg: während des interaktiven Betriebs via
RS232 verbunden ist. Entsprechend
programmierte stand-alone Applika-
eforth +> 68HCll
von Wolfgang Schemmert
tionen laufen natürlich auch ohne die
Nabelschnur.
Der erste Schritt bestand darin, das
Programm von der Original-Diskette
auf einer entsprechend konfigurierten
StrahlenbergerStr.123 6050 Offenbach Tel:069-8001208 Fax:069-64825957 805 1-Platine zum Laufen zu bringen.
Das Originalprogramm ist mit dem
Das eforth für den 8051 Mikrocontroller wurde auf Assemblerbasis Microsoft-Macroassembler codiert,
für den 68HCi 1 umgeschrieben. Neben wesentlichen Eigenschaf- wobei anzumerken ist, daß dabei der
ten dieser Forth-Version wird die Vorgehensweise bei solch einer MASM eigentlich nur als komfortab-
Portierung skizziert. les Werkzeug zur strukturierten Bele-
gung von Speicherbereichen einge-
setzt wird. Der 805 1- Maschinencode
Der 68HCI 1 ist neben der 8051- vom Assembler her aufzubauen, für die Primaries ist byte-weise von
Familie derzeit einer der gebräuch- So habe ich mir zuerst ein Listing Hand a la KIM oder Junior-Computer
lichsten low-cost/low-end Mikrocon- des 6800 fig.Forth besorgt, dann bin eingetragen. Erfreulicherweise ließ
troller. Während der 8031132 erstaun- ich im Kleinanzeigenteil der 4.Di- sich der Code ohne größere Probleme
lieh schnell und komfortabel arbeitet mension auf das von AKlingelnberg “assemblieren” und in ein EPROM
bei Aufgaben, die mit 128/256Byte vertriebene 8051 eForth gestoßen. brennen. Dann waren allerdings noch
Datenspeicher (und der im Controller Nach einigem Hin und Her habe ich einige Anstrengungen nötig, um einen
eingebauten Peripherie) auskommen, mich entschieden, das eForth als Aus- in der Source versteckten Fehler zu
ist der 68HCII für Probleme, die in- gangspunkt für meine eigenen Pro- finden (falsche RAM-Adresse). Ob-
tensiv 16-Bit Daten- bzw. externe grammietversuche zu nehmen, vor al- wohl im engeren Sinne “funktionie-
I/O- Adressen benötigen, in mancher lem, weil mir das einen Haufen Tipp- rend” hat diese Version einen ent-
Hinsicht besser geeignet. Mit beiden arbeit ersparte und zusätzlich zum scheidenden Pferdefuß, der sie für den
Prozessoren habe ich des öfteren primär angestrebten 68HClI -Forth praktischen Einsatz unbrauchbar
hardware- und assemblermäßig zu mich auch mit 8051 -Forth versorgte. macht: Es gibt keinerlei Möglichkeit,
tun. Teils aus Neugierde, teils mit ei- Im Unterschied zu anderen Forth- auf die “Special Function Registers”
ner konkreten Anwendung im Hinter- Versionen ist das eForth nicht “self also auf die eingebaute Peripherie des
kopf kam irgendwann der Wunsch sufficient” angelegt, seine Program- 805 1 von eForth aus zuzugreifen. Die
auf, auf Einplatinen-Minimalsyste- mierumgebung und dazu notwendiger dazu notwendigen Worte lassen sich
men mit diesen Prozessoren auch in Massenspeicher wurde in einen exter- zwar als Dictionary-Erweiterungen
Forth zu arbeiten. nen Steuerrechner, z.B. IBM-PC, ver- nachprogrammieren,~aber nur mit ex-
Als Hardwareplattform für das
68HCll Forth habe ich den MOPS- Der eforth Header
Einplatinen-Controller gewählt, weil
er preiswert und verfügbar ist (Be- : Comprle a code definrtion header.
Schreibung und Bauanleitung siehe .MACRO
@CODE
PLABEL,PLILABEL,
LINK,LEX,NAME
:force HEADER to even address
Elrad Hefie 3 bis 5 /91). Besonders in @ALIGN
.DW f * + 6+((LEX) 6SlE)) :points to subsequent code-addr
seiner erweiterten Form (siehe Elrad .DW LINK :Lmk to previous name-address
Heft 8/92) wird er den verschieden- PLILABEL: .DB LEX,NAME :Lex byte and name string
sten YO-Anforderungen gerecht. BALIGN :f0rce CODE to even address
PtABEL: :begm of primary code
Wie anfangen? Da ich mich eher zu . ENDM
den Form-Laien rechne und auch kei-
nen Metacompiler etc habe oder kau- : Compile a colon
definition header.
.MACRO BCOLON SLILABEL,L~NK,LEX,NAME
SLABEL,
fen wollte, lag es nahe, das System BALIGN :force HEADER to even address
.DW C* + 6+L (LEX) h SlE) ) :points to subsequent code-addr
.DW LINK :Link to previous name-address
Stichworte SLILABEL: .“B LEX,NAME :Lex bvte and *am strina
IALIGN :force CODE to even address
e-Forth SLABEL: :beqin af code
;;;fli (MOPS) noP :aliqn dummy
lcall DOLST :Forth ENTER
. ENDM
Portierung
Assembler Abb. 1
Forth-Magazin ‘Vierte Dimension’ 8. Jahrgang Nr. 1992 - 4. QuartalSie können auch lesen
