Tree
-------------------------------------------------------------
Version: 1.0, 971126
Creator: Daniel Bergman.
Description: The program draws a fractal tree on the screen.
Comments: "->" is the "STO>"-button.
Known bugs: None.
Size: 197 bytes.

For more games and programs, please visit http://ti80.burtrask.net.

PROGRAM:TREE
7->XMIN
7.6->XMAX
0->XSCL
0->YSCL
1->YMIN
1.5->YMAX
CLRDRAW
0->C
LBL 0
C->A
PT-ON(A+7.3,B+1
IF RAND<.5
GOTO 1
IF RAND<.15
GOTO 2
IF RAND<.4
GOTO 3
.42A-.42B->C
.42A+.42B+.2->B
GOTO 0
LBL 1
0->C
.5B->B
GOTO 0
LBL 2
.1A->C
.1B+.2->B
GOTO 0
LBL 3
.42A+.42B->C
-.42A+.42B+.2->B
GOTO 0

--------------------------------------------------------------------
Copyright (C) 1998 by Daniel Bergman & Mattias Morén