Programm Spirale

Logo-Programm "Spirale"

Mit diesem Programm soll auf dem Grafikbildschirm der Logo-Umgebung eine eckige Spirale (siehe unten) gezeichnet werden.

Hier folgt der Quelltext in Logo:

PR SPIRALE :Seite FARBE ZZ 15

VW :Seite

RE 90 WENN :Seite > 300 DANN AUSSTIEG SPIRALE :Seite + 5 ENDE

Dieses Programm enthält eine Prozedur, die sich selbst aufruft. Bei jedem neuen Aufruf der Prozedur SPIRALE wird die Seite um 5 Einheiten verlängert. Damit die entstehende Spirale nicht zu groß wird, wird kontrolliert, wann die Seitenlänge über 300 Einheiten wächst. Wenn die Seite größer als 300 ist, wird durch die Logo-Anweisung AUSSTIEG das Programm beendet.

Weitere Erklärungen zu einzelnen Anweisungen:

FARBE ZZ 15: Hier wird bei jedem neuen Prozeduraufruf eine neue Farbe per Zufall genommen, jeder Zahl zwischen 0 und 15 entspricht einer Farbe. Die Zufallszahlen (ZZ = ZUFALLSZAHL) stammen wegen ZZ 15 aus dem Bereich 1 bis 15.
VW heißt VORWÄRTS, dahinter die Variable Seite, deren Inhalt die Linienlänge darstellt, die gezeichnet werden soll.
RE 90 oder RECHTS 90 verändert die Richtung um 90 Grad für die nächste Linie, die gezeichnet wird.

Die Kopie des Logo-Bildschirms nach dem Aufruf SPIRALE 5: