Focal-Listing
![[First]](../../arrows/gn1_first.gif)
|
![[Prev]](../../arrows/gn1_prev.gif)
|
|
![[Index]](../../arrows/gn1_index.gif)
|
![[Next]](../../arrows/gn1_next.gif)
|
![[Last]](../../arrows/gn1_last.gif)
|
|
|
|
|
|
|
|
Dieses Focal-Programm berechnet die Lissajous-Figur. Man beachte: Das Copyright von 1969. Der ganze Interpreter passt in die 4K Hauptspeicher des PDP8/L. Dazu noch das Focal-Programm selbst, sowie die Variablen. Im Gegensatz zu vielen Tiny-Basic-Interpretern aus der Mitte der 70er-Jahre für den i8080 u.ä. kann das FOCAL sowohl Floatingpoint-Arithmetik und trigonometrische Funktionen berechnen.