Delphi-Turtle - Sequenzen

Aus ProgrammingWiki

Delphi Turtle - Sequenzen

---

Zur Einführung in eine Programmierumgebung eignen sich besonders graphische Darstellungen. Man stellt sich einen Roboter (meist Turtle oder auch Igel) vor, der sich auf einer Zeichenfläche (Canvas) bewegt und mit einem Stift Grafiken auf die Zeichenfläche malt.

Auf folgende Syntax (Festlegungen in der jeweiligen Programmierumgebung) ist zu achten:

• Groß- und Kleinschreibung wird unterschieden
• Jede Anweisung (Befehl, Kommando) schließt mit einem Semikolon ab
• Objekte können mit Methoden reagieren: ojekt.methode: turtle.penUp();
• Methoden können Botschaften als Parametern in Klammern übergeben werden: turtle.vorward(20);

Informieren Sie sich über die wichtigsten Befehl zum Erstellen von Turtle-Grafiken in Delphi:
[Turtle Grafik in Delphi]

Vervollständigen Sie die Methoden für die Objekte Canvas und Turtle:

Canvas
Leinwandgröße	canvas w=400 h=400
Leinwand löschen	canvas_clear()
Objekt Turtle (zeichnende Schildkröte)
Turtle geht x Schritte vorwärts	turtle_forward(x);
Turtle geht x Schritte rückwärts	turtle_backward(x);
Turtle dreht sich x° nach rechts	turtle_right(x);
Turtle dreht sich x° nach links	turtle_left(x);
Turtle dreht sich um x° absolut	turtle_setAngle(x);
Turtle geht in die Mitte der Zeichenfläche	turtle_home();
Turtle hebt den Schift	turtle_penUp();
Turtle setzt den Stift zum Zeichnen ab	turtle_penDown();

Aufgabe 1:

• Worin unterschieden sich die letzten drei Turtle-Methoden von den voran gegangen?

Aufgabe 2:

• Erstellen Sie folgende Turtle-Grafiken mit folgenden Vereinbarungen:
• Standardschrittweite: 50
• Startposition: Canvasmitte

Fahne	Pfeil Länge 100, 45° 20 Schritte, Turtle zum Pfeilanfang setzten
var T1: integer; selectCanvas(1); T1 := createTurtle(1); selectTurtle(T1); canvas_clear(); turtle_move(200,100); turtle_home(); turtle_penDown(); ausführen	var T2: integer; selectCanvas(2); T2 := createTurtle(2); selectTurtle(T2); canvas_clear(); turtle_move(200,100); turtle_home(); turtle_penDown(); ausführen
Quadratturm: 100, 75,50	Nikolaushaus: Seitelänge 50
var T3: integer; selectCanvas(3); T3 := createTurtle(3); selectTurtle(T3); canvas_clear(); turtle_move(200,100); turtle_home(); turtle_penDown(); ausführen	var T4: integer; selectCanvas(4); T4 := createTurtle(4); selectTurtle(T4); canvas_clear(); turtle_move(200,100); canvas_clear(); turtle_home(); ausführen
Eigene Idee 1	Eigene Idee 2
var T5: integer; selectCanvas(5); T5 := createTurtle(5); selectTurtle(T5); canvas_clear(); turtle_move(200,100); canvas_clear(); turtle_home(); turtle_penDown(); ausführen	var T6: integer; selectCanvas(6); T6 := createTurtle(6); selectTurtle(T6); canvas_clear(); turtle_move(200,100); canvas_clear(); turtle_home(); turtle_penDown(); ausführen

Aufgabe 3:

• Warum wurde die Startposition vorgegeben?

Aufgabe 4:

• Erstellen Sie zwei eigene Grafiken, bestehend aus mindestens 15 Anweisungen!

Aufgabe 5:

• Welche Vereinfachungen bzgl. des Programmieraufwandes würden Sie sich wünschen?

Aufgabe 6:

• Wie viele Varianten zum Zeichnen des Nikolaus-Hauses gibt es?