Turtle-Befehle

Aus ProgrammingWiki

Scheme-Strachelemente zur Turtle-Grafik

Die folgende Tabelle enthält die wesentlichsten Sprachelemente der Turtle-Grafik.

Syntax	Semantik
(move <turtle> <x> <y>)	positioniert die Turtle in der Zeichenfläche, x ... Spaltenkoordinate, y ... Zeilenkoordinate, der Koordinatenursprung befindet sich in der linken oberen Ecke der Zeichenfläche,
(forward <turtle> <x>)	lässt die Turtle x Schritte vorwärts gehen,
(backward <turtle> <x>)	lässt die Turtle x Schritte zurück gehen,
(pendown <turtle>)	setzt den Stift ab, so dass Turtle-Bewegungen eine Spur hinterlassen,
(penup <turtle>)	hebt den Stift an, so dass Turtle-Bewegungen keine Spur hinterlassen,
(penwidth <turtle> <x>)	setzt die Breite des Stiftes auf den Wert x,
(pencolor <turtle> <r> <g> <b>)	legt den Fabwert des Stiftes fest, mögliche Zahlenwerte für rot (r), grün (g) und blau (b) sind: 0 ... 255,
(right <turtle> <x>)	dreht die Turtle um x Grad nach rechts,
(left <turtle> <x>)	dreht die Turtle um x Grad nach links,
(hide <turtle>)	macht die Turtle unsichtbar,
(show <turtle>)	macht die Turtle sichtbar,
(penerase <turtle>)	die Turtle löscht eine gezeichnete Linie (wie ein Radiergummi),
(clear <canvas>)	löscht die Zeichenfläche,

Test

Mit den nachfolgenden Definitionen können die vorgestellten Sprachelemente bequem ausprobiert werden:

(define center (lambda (turtle) (move turtle 200 150))) (define black (lambda (turtle) (pencolor turtle 0 0 0))) (define red (lambda (turtle) (pencolor turtle 255 0 0))) (define brown (lambda (turtle) (pencolor turtle 100 50 0))) (define orange (lambda (turtle) (pencolor turtle 255 100 0))) (define yellow (lambda (turtle) (pencolor turtle 255 200 0))) (define green (lambda (turtle) (pencolor turtle 0 255 0))) (define blue (lambda (turtle) (pencolor turtle 0 0 255))) (define pink (lambda (turtle) (pencolor turtle 200 50 200))) (define n-eck (lambda (turtle len n) (letrec ([zeichnen (lambda (m winkel) (if (> m 0) (begin (forward turtle len) (right turtle winkel) (zeichnen (- m 1) winkel)) 'ok))]) (zeichnen n (/ 360 n)))))

(clear canvas1) (center turtle1) (pink turtle1) (n-eck turtle1 50 7)

ausführen

Zurück zu Rekursionen bzw. Fraktalen.