The awesomest party hat - GameCreators Forum

developer forums

The 20 Line Challenge / The awesomest party hat

Author

Message

sneaky smith12

Years of Service

User Offline

Joined: 30th Apr 2006

Location: Like id tell you, oh wait i just did

Posted: 30th May 2006 16:01

Link

+ Code Snippet

randomize timer(): maxcubes = 20 :size = 100 :layer = 20
for i = 1 to maxcubes
make object sphere i,size:scale object i,layer,layer,layer:position object i,100,20+y,100
layer = layer - 1:y = y + 1
next
i = 1
position camera 0,100,0:point camera 100,20,100
repeat
a = rnd(256):b = rnd(256):c = rnd(256)
color = RGB(a,b,c):color object i,color
if i < maxcubes
i = i + 1
else
i = 1
endif

until spacekey() = 1

pretty colors