ScienceSource.info
ScienceSource.info
SiS
20:01
Allgemeines
:: Home
:: Disclaimer
Artikel
:: Physik
:: Astrophysik
:: Mathematik
:: Informatik
Community
:: Foren
:: Chat
Sonstiges
:: Quiz
:: Partner
:: Kontakt
Funktionen
:: Forum-Login
:: Login
:: Suchen

Info
Viel Spaß im Forum!



Home Forengruppe Kontakt Suchen
ScienceSource.info / Artikel / Informatik

LOGO-Grundlagen

Die Turtle-Graphik in LOGO bietet einfache Möglichkeiten, Algorithmen zur Darstellung von Graphiken auf einfache Art und Weise zu formulieren und zu testen.

LOGO Elemente:
:x Parameter
quadrat, fd, ... Prozeduren
"Name Name
[...] Listen
LOGO Prozeduren:
cs clear screen
pd pen down
pu pen up
ht Zeiger Verstecken
st Zeiger Anzeigen
fd :x Vorwärts um x
bk :x Rückwärts um x
rt :x Rechtsdrehung um x
lt :x Linksdrehung um x
stop Abbruch der Prozedur

Diese Befehle werden wir nun anhand einiger Beispiele verdeutlichen.

Beispiel: (ein Quadrat)
fd 100
rt 90
fd 100
rt 90
fd 100
rt 90
fd 100
rt 90

Das gleiche geht allerdings auch einfacher, in dem wir die Repeatanweisung einbauen.

Beispiel: (ein Quadrat)
to quadrat :x
 repeat 4[fd :x rt 90]
end

Aufrufen können wir quadrat nun mit der Eingabe z.B. von quadrat 100. Ein Quadrat mit der Seitenlänge von 100 wird gezeichnet.

Nun 2 schwierigere Beispiele, eine Koch-kurve und eine C-Kurve.

Beispiel: (eine Kochkurve)
;
; program:  .............  Kochkurve
; sourcecode:  ..........  MSWLogo
; author:  ..............  Harald Wolfsgruber
; version:  .............  1.0
; last change:  .........  19.9.2002
;


to main

 ;clear and perspective
   cs
   perspective

 ;set position and configure turtle
   pu
   setxyz -600 -50 100
   pd
   ht
   rt 90

   print "Kochkurve

 ;values for Kochkurve
   make "x 800 ;bigness
   make "y 6 ;iteration

 ;paint Kochkurve
   koch1 :x :y

end


to koch1 :x :y
   if :y<1 [fd :x stop]
   koch1 :x/3 :y-1 lt 60
   koch1 :x/3 :y-1 rt 120
   koch1 :x/3 :y-1 lt 60
   koch1 :x/3 :y-1
end


Make "startup [main]

Beispiel: (eine C-Kurve)
;
; program:  .............  C-Kurve
; sourcecode:  ..........  MSWLogo
; author:  ..............  Harald Wolfsgruber
; version:  .............  1.0
; last change:  .........  19.9.2002
;


to main

 ;clear and perspective
   cs
   perspective

 ;set position and configure turtle
   pu
   setxyz -500 -50 100
   pd
   ht

   print "C-Kurve

 ;values for Kochkurve
   make "x 100 ;bigness
   make "y 16 ;iteration

 ;paint C-Kurve
   c :x :y

end


to c :x :y
   if :y<1 [fd :x stop]
   lt 45
   c :x/sqrt 2 :y-1 rt 90
   c :x/sqrt 2 :y-1 lt 45
end


Make "startup [main]
Version 3.2      © 2001-2008 Harald Wolfsgruber