0 Members and 2 Guests are viewing this topic.
([r] is the radians symbol).CITYClrDrawClrDraw[r]Repeat getkey(15) DS<(A,10) Horizontal -[r] End For(B,0,5) B*4+L1->Z !If {Z} rand^21->{Z}->{Z+1} rand^65->{Z+2} 3->{Z+3} End If {Z+1} {Z+1}-1->{Z+1} Rect(95,{Z+2},1,rand^{Z+3})[r] If {Z}-{Z-1}<4 {Z+3}+1->{Z+3} ElseIf {Z-1}<4 {Z+3}-1->{Z+3} End Else 0->{Z}->{Z+1}->{Z+2}->{Z+3} End End DispGraph[r]End
That's pretty interesting, although it's obvious where it comes from. I could think of a game that might use this.