Back to the list Lindenmayer-System V3.3 version: 3.3
remi_meier
-
Platform:
Windows Type: Application Genre: - Language: English
read: 9017
8.83 / 6
BBCode Link
[url=http://www.purearea.net/pb/showcase/show.php?id=151]
[b]Lindenmayer-System V3.3 v.3.3[/b][/url]


Neue Version 3.2!
Neu 3.2: Alle Farben k?nnen gew?hlt werden! Bugfixes
Neu 3.1: Nicht mehr einfarbig! Mit % kann der Wert der Winkelerh?hung (+ od. -) im Code gesetzt werden. Mit $ das Gleiche f?r die L?nge eines Linienabschnittes! Einfach "Thing" Datei laden und ausprobieren (geht auch mit Kommazahlen)! Bsp.: F:F+F%20.0-$10.0F
Im Prinzip gleich wie Version 2.0, jedoch kann jetzt eingestellt werden, ob man vor dem Neuzeichnen/Berechnen einen Knopf (oder Hotkey F1) dr?cken muss, oder Realtime (V2). Ausserdem habe ich jetzt den String-Speicher-Voll-Fehler weggemacht, es wir jetzt alles dynamisch behandelt (meine MemoryStringFunktionen). Ev. ist es ein bisschen langsamer geworden. Das Berechnen kann jetzt (oft) abgebrochen werden :-)

Achtung: Das Dateiformat der Version 1 wird nicht mehr unterst?tzt! Die alte Version ist erh?ltlich unter der folgenden Adresse:
http://mypage.bluewin.ch/remimeier/zip/lsystem.zip
und Version 2.0 unter
http://mypage.bluewin.ch/remimeier/zip/lsystemv2.zip

Beispiel (in Datei kopieren und laden!):
268
354
20
180
10.000000
0.500000
9
10
Start: VZFFF
V : [+++W][---W]YV
W : +X[-W]Z
X : -W[+X]Z
Y : YZ
Z : [-FFF][+FFF]F

Dies ist ein Programm um Lindenmayer Fraktale zu berechnen und darzustellen.
Zum Thema: http://astronomy.swin.edu.au/~pbourke/fractals/lsys/


Inklusive einem Lindenmayerinterpreter, der bis jetzt folgende Zeichen unterst?tzt:
; Character Meaning
; F Move forward by line length drawing a line
; f Move forward by line length without drawing a line
; + Turn left by turning angle
; - Turn right by turning angle
; | Reverse direction (ie: Turn by 180 degrees)
; [ Push current drawing state onto stack
; ] Pop current drawing state from the stack
; # Increment the line width by line width increment
; ! Decrement the line width by line width increment
; @ Draw a dot with line width radius
; > Multiply the line length by the line length scale factor
; < Divide the line length by the line length scale factor
; & Swap the Meaning of + And -
; ( Decrement turning angle by turning angle increment
; ) increment turning angle by turning angle increment
; %XX set angle increment directly
; $XX set line length directly

Neu: Speicher-/Ladefunktion integriert
NEU: Version 2
Neu: Resize und interne Dinge
Neu: Version 3: String unlimited! Option f?r nicht Realtime-Berechnung. Abbruch der Berechnung (oft) m?glich :-)
[50 KB]    (1030 Downloads)
The source is included in the program package

to vote LogIn or Register an account.




 
 
 
DarkDragon
08:40:20 2006-07-15
Sieht nicht schlecht aus, ist allerdings f?r mich ziemlich unverst?ndlich.

"Achtung: Das Dateiformat der Version 1 wird nicht mehr unterst?tzt! Die alte Version kriegen sie unter:" - H?rt sich ein wenig bl?d an, findest du nicht? ;-) "kriegen" -> "bekommen" oder "sie" -> "ihr"

remi_meier
12:11:31 2006-07-15
Ok, Chef ;)

Naja, ist wie programmieren. Es ist halt eine kleine Sprache und die muss man
lernen. Dabei muss man v. a. auch die Rekursion verinnerlicht haben.