Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

--- homecomputer:ac1:forth [2025/07/11 12:10] – angelegt volkerp
+++ homecomputer:ac1:forth [2025/07/21 08:36] (aktuell) – [Beschreibung] volkerp
@@ Zeile 2: / Zeile 2: @@
 /2025 habe ich das [[forth:fgforth|]] an den AC1 angepasst. Es läuft auf allen Systemen, speziell für den [[picoac1|]] gibt es I/O-Routinen zur Nutzung der SD-Karte.
+{{:homecomputer:ac1:forth83_ac1.png|}}
 ===== Download =====
+  * {{ :homecomputer:ac1:forth_ac1.zip |}} Forth, Docs, Zusatzpakete, Beispiele, picoAC1-GET/PUT\\ Der Ordner forth wird beim picoAC1 auf eine SD-Karte kopiert.
 ===== Kurzanleitung =====
+  * Start mit "f"
+  * 1 EDIT startet den Full-Screen Editor, Ende mit ^C
+  * 1 GET filename lädt eine Datei in die RAM-Disk
+  * 1 n THRU compiliert Screen 1 bis n
+  * Worte können mit SEE name decompiliert werden
+  * Vokabulare: VOCS und ORDER
+  * Dictionary: WORDS
+  * Ende mit BYE
 ===== Beschreibung =====
@@ Zeile 18: / Zeile 29: @@
 | OS-Kommando | f |
+Beischreibung des Forth s. [[forth:fgforth|]]
+{{simplenavi>forth:fgforth}}
 ===== picoAC1 =====
@@ Zeile 30: / Zeile 44: @@
 In Forth werden die bereits in der RAM-Disk stehenden I/O-Routinen compiliert mit ''1 6 THRU''. Ab jetzt stehen die Worte ''.FILES, GET, PUT'' zur Verfügung (s. [[forth:fgforth:kassette|I/O]]). Mit ''.FILES'' wird das aktuelle Verzeichnis gelistet. Mit ''1 GET filename'' lädt man eine Datei in die interne RAM-Disk. Nach dem Laden wird die Zahl der geladenen Screens angezeigt (#scr n). Mit ''1 n THRU'' erfolgt üblicherweise das Compilieren des geladenen Programms, es gibt aber auch Ausnahmen!
+Gespeichert wird mit ''1 n PUT filename''. Dieses Kommando speichert Screen 1 bis n auf SD-Karte unter dem Namen "filename" im Z80-Format. Als Typ wird "F" (für Forth-Datei) eingetragen. Ein Dateityp wird nicht automatisch an den Filenamen angehängt!
+===== Systemzusammenstellung =====
+<code>
+as_z80 forth83.asm
+erzeugt forth83.z80, Adresse 2000-46FF
+starten mit "f" (oder J 2000), Restart mit "r"
+Fullscreen-Editor
+	Sedit_AC1.Z80
+	extern laden (nach 8000), Forth starten
+LOAD
+	Anwenden: n EDIT (editiert Screen n, n = 1..xx)
+SEE - Dekompiler
+	SEE           vp.z80
+	extern laden (nach 8000), Forth starten
+10 THRU
+	Anwenden: SEE xxx
+Datei-Arbeit
+	getput_ac1pico.Z80
+	extern laden (nach 8000), Forth starten
+6 THRU
+	Anwenden: .FILES (DIR)
+	n GET fname (Lädt File ab Screen n)
+MARK EMPTY  HERE FENCE !
+SAVE-SYSTEM FORTH83A3
+	speichert das gesamte Forth incl. Pakete
+</code>
+===== Beispiele =====
+Die Beispiele können auch am originalen AC1 getestet werden. Dazu verlässt man Forth, lädt die Datei im Monitor-Modus nach 8000h, und geht dann zu Forth zurück (mit "f").
+Am picoAC1 werden die Dateien direkt unter Forth geladen, z.B. "1 GET LINED.Z80". Groß-/Kleinschreibung des Dateinamens ist egal.
+==== lined.z80 ====
+[[forth:fgforth:lined|]]
+6 THRU
+EDIT		\ Screen 1 bearbeiten
+	...
+	DONE
+==== turmvonhanoi.z80 ====
+demonstriert, wie der "Turm von Hanoi" optimal gelöst wird. ''n HANOI'' startet das Programm für n (≤ 5) Scheiben.
+5 THRU
+HANOI		\für 3 Scheiben
+{{:homecomputer:ac1:turmvonhanoi.png|}}
+==== unsinnstext.z80 ====
+nach L. Brodie, erzeugt witzige Texte
+5 THRU	\ Screen 6..10 enthalten Textbausteine
+	TEXT		\ nach jedem Absatz ENTER drücken
+	NOCHMAL		\ gibt letzten erzeugten Text nochmal aus
+{{:homecomputer:ac1:unsinnstext.png|}}
+==== demorechner.z80 ====
+Großanzeige von Ziffern und Rechenzeichen. Enthält in Screen 1 und 2 Eaker-Case, nutzt AT vom Paket SEDIT (Screen-Editor).
+8 THRU
+	DEMO		\ erwartet korrekte Fortheingabe, z.B. 15 6 *
+{{:homecomputer:ac1:demorechner.png|}}
+Zusammen mit formi2.f83 kann die Aufgabe auch in infix-Notation eingeben werden: ''{ 12 * 4 + 3 * 2 }''