Schildkrötenkreuz
TextWindow.WriteLine(„Guten Taaaag!“)
TextWindow.WriteLine(„Ich, die flinke Schildkröte, male dir ein Kreuz ins Fenster.“)
TextWindow.WriteLine(„Dazu musst du mir nur deine gewünschte Höhe und Breite des Fensters angeben.“)
typewidth:
TextWindow.Write(„Und jetzt bitte die Breite (auch größer als 100 Pixel): „)
width = TextWindow.ReadNumber()
If width < 100 Then
Goto typewidth
EndIf
typeheight:
TextWindow.Write(„Nenne mir bitte die Höhe (aber bitte größer als 100 Pixel): „)
height = TextWindow.ReadNumber()
If height < 100 Then
Goto typeheight
EndIf
TextWindow.Hide()
GraphicsWindow.Width = width
GraphicsWindow.Height = height
GraphicsWindow.BrushColor = „black“
GraphicsWindow.FontSize = (width/20+height/20)/2
GraphicsWindow.CanResize = 0
Turtle.Speed = 9
Turtle.PenUp()
Turtle.MoveTo(width/2, 0)
Turtle.PenDown()
Turtle.MoveTo(width/2, height)
Turtle.PenUp()
Turtle.MoveTo(0, height/2)
Turtle.PenDown()
Turtle.MoveTo(width, height/2)
Turtle.PenUp()
Turtle.MoveTo(width-width/6, height/6)
Turtle.Angle = 225
GraphicsWindow.DrawText(5*width/8, height/4, „Cool, ne?“)



