Das Video auch auf YouTube: youtu.be/qB3PLC4NSb0

Ein kurzes Programm auf Mac-59, dem TI-59 auf dem Macintosh: zehn Fibonacci-Zahlen, auf dem Drucker PC-100C ausgegeben. Das Video zeigt den ganzen Weg in 51 Sekunden. Aufgenommen ist es unter System 7.6.1 in Basilisk II; Eintippen und Drucken sind beschleunigt.

Was zu sehen ist

  1. TRACE ein, Lernmodus: Bei jeder Taste zählen die Anzeige und der Drucker die Programmschritte hoch.
  2. Das Programm, Taste für Taste, 37 Schritte.
  3. Das Listing mit RST 2nd List: Adresse, Tastencode und Taste.
  4. Der Lauf mit A: 1, 1, 2, 3, 5, 8, 13, 21, 34, 55 auf dem Papier, 89 in der Anzeige.

Das Programm

2nd Lbl A  0 STO 01  1 STO 02  10 STO 00      Startwerte 0 und 1, Zähler 10
2nd Lbl B  RCL 02 2nd Prt                     aktuelle Zahl drucken
           RCL 01 + RCL 02 = STO 03           nächste = Summe der beiden letzten
           RCL 02 STO 01  RCL 03 STO 02       eine Stelle weiterrücken
           2nd Dsz 0 B  R/S                   zehnmal, dann halt

Wie Schleifen mit Dsz funktionieren, erklärt Lektion 3.3 des Programmierkurses.

Mac-59 selbst ausprobieren

Quelltext und Programm stehen auf GitHub: github.com/LoetLuemmel/Mac-59, die fertige Version 1.1 unter Releases. Die ROM-Dateien des TI-59 sind nicht dabei; woher man sie bekommt, steht in der README.

TI-59 und Texas Instruments sind Marken von Texas Instruments Incorporated. Mac-59 steht in keiner Verbindung zu Texas Instruments.