# Dies ist ein Kommentar. Alles, was nach dem Zeichen # in
# einer Zeile steht, ist ein Kommentar und wird vom
# Computer nicht beachtet.
# Ebenso werden Leerzeilen vom Computer nicht beachtet.

# Die folgende Zeile sagt dem Computer, dass im Folgenden
# die "Turtle-Befehle" verwendet werden.
from gturtle import * 

# Ein Zeichenfenster samt Turtle (= Schildkröte) in der Mitte
# mit Blickrichtung nach oben wird erzeugt. 
makeTurtle()


# Setze die Breite ("width") des Zeichenstifts.
penWidth(5)

# Setze die Farbe des Zeichenstifts 
# (beachte die Anführungszeichen):
setPenColor("brown")

right(90)
forward(50)

# Setze die Farbe des Zeichenstifts 
# (beachte die Anführungszeichen):
setPenColor("blue")

# Andere Farben:
# yellow, gold, orange, red, maroon, violet, magenta, purple, 
# navy, blue, skyblue, cyan, turquoise, lightgreen, green, 
# darkgreen, chocolate, brown, black, gray, white.

left(90)
forward(100)

penWidth(10)
setPenColor("red")

right(90)
forward(100)

# Wenn die Turtle beim Zeichnen nicht angezeigt werden soll:
hideTurtle()
# Die Zeichnung entsteht dann deutlich schneller. Wenn man die
# Turtle am Anfang des Programms (direkt nach "makeTurtle()")
# versteckt, wird sehr schnell gezeichnet.

left(135)
forward(70.7)

left(90)
forward(70.7)

# Zeigt die Turtle wieder an.
showTurtle()

# Die Turtle hat dann leider eine andere Geschwindigkeit
# als am Anfang. 
# Der folgende Befehl setzt die Geschwindigkeit der Turtle:
# Geschwindigkeiten zwischen 0 (sehr langsam) und 
# 2000 (recht schnell) sind erlaubt. 
# Sonderfall ist Geschwindigkeit -1 (sehr schnell): 
# Turtle bewegt sich unmittelbar zum neuen Endpunkt.
speed(200)

penWidth(5)
setPenColor("blue")

left(90)
forward(141.4)
left(135)
forward(100)
left(135)
forward(141.4)
setPenColor("green")
left(135)
forward(150)
left(90)

# Anheben des Zeichenstifts.
penUp()

# Bewege rückwärts
backward(50)

# Absenken des Zeichenstifts.
penDown()

left(90)

setPenColor("brown")
penWidth(40)

forward(200)

# Setzt die Turtle auf die Anfangsposition
home()

setPenColor("green")
penWidth(2)
forward(50)

# Zeichnet einen ausgefüllten Kreis (= dicken Punkt)
# mit Durchmesser 10.
dot(10)

forward(40)
# Zeichnet einen nicht ausgefüllten Kreis mit Durchmesser 20.
openDot(20)

home()

left(45)

setPenColor("blue")
penWidth(4)

# Wiederhole gewisse Befehle, hier 5 Mal:
# Beachte, dass alles, was wiederholt wird, 
# um 4 Leerzeichen eingerückt ist.

repeat(5):
    forward(20)
    left(90)
    forward(20)
    right(90)    

right(45)

penUp()
forward(200)
setPenColor("orange")
penDown()

dot(100)

home()

penUp()
backward(200)
penDown()

setPenColor("blue")
repeat 7:
    forward(50)
    # Bei einem Siebeneck dreht sich die Turtle an jeder Ecke
    # ein Siebtel des Vollwinkels 360 Grad.    
    left(360/7) 

penUp()
right(90) 
forward(200)
left(90)
penDown()

setPenColor("blue")

# Hier eine ausgebaute Version der obigen repeat-Struktur:

repeat 7:
    forward(50)
    
    # hier startet die Zeichnung der "Ausleger"
    right(90)
    forward(30)
    setPenColor("red")
    dot(25)
    setPenColor("yellow")
    dot(10)
    setPenColor("blue")
    openDot(20)
    setPenColor("green")
    backward(30)
    left(90)
    # hier endet die Zeichnung der Ausleger
    
    setPenColor("blue")
    left(360/7) 
    
hideTurtle()