KTurtle/Eksempler

    From KDE UserBase Wiki
    This page is a translated version of the page KTurtle/Examples and the translation is 100% complete.
    Other languages:

    Hjem » Programmer » Uddannelse » KTurtle

    Tip

    Scriptformattering er resultatet af en "HTML-eksport" af KTurtle.



    Koch kurve

    Dette er en fraktal kurve. Du kan finde mere information om den på Wikipedia.

    Logo-script:

    # Koch curve

    reset
    canvassize 850550
    go 125350
    turnright 90

    learn koch $x$t {
      if $t>0  {
        $t=$t-1
        $x=$x/3
        koch $x$t
        turnleft 60
        koch $x$t
        turnright 120
        koch $x$t
        turnleft 60
        koch $x$t
      } else {
      forward 3*$x 
      }
    }
    koch 2006

    Resultat:

    Sierpinski-trekant

    En anden berømt fraktal er Sierpinski-trekanten.

    Logo-script:

    # Sierpinski triangle

    learn sierp $l {
      if $l > 2 {
        repeat 3 {
          sierp $l/2
          forward $l
          turnleft 120
        }
      }
    }

    reset
    canvassize 600533
    go 50483
    turnright 90
    sierp 500

    Resultat:

    Heighways drage

    Endnu en berømt fraktal er Heighways drage.

    Logo-script:

    # Heighway dragon

    reset
    canvassize 500500
    go 320400
    turnright 90
    $size = 7

    learn X $depth {
      if $depth>0 {
        X $depth-1
        turnleft 90
        Y $depth-1
        forward $size
      }
    }

    learn Y $depth {
      if $depth>0 {
        forward $size
        X $depth-1
        turnright 90
        Y $depth-1
      }
    }

    pencolor 0,255,0
    forward $size
    10
    turnleft 90
    pencolor 255,0,0
    10
    forward $size

    go 50,450

    Resultat: