KTurtle/Examples: Difference between revisions

From KDE Wiki Sandbox
No edit summary
Line 2: Line 2:
{{Construction}}
{{Construction}}


''Annotation:'' Script formatting results from the HTML export of '''KTurtle'''.
{| cellpadding="10"
| align="center" | [[Image:help-hint.png]] <br /> '''Tip'''
|| Script formatting results from the ''HTML export'' of '''KTurtle'''.  
|}
 
 


==Koch curve==
==Koch curve==

Revision as of 13:21, 8 July 2010

Home » Applications » Education » KTurtle » Examples

Under Construction
This is a new page, currently under construction!



Tip
Script formatting results from the HTML export of KTurtle.


Koch curve

This is a fractal curve. You can find more information about this at 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

Result:

Sierpinski Triangle

Another famous fractal is the Sierpinski triangle.

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

Result:

Heighway Dragon

Another famous fractal is the Heighway Dragon.

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
  }
}

forward $size
11

go 50,450

Result: