cool thing by twinkletoes-
Author |
Message |
twinkletoes
|
Posted: Fri Nov 05, 2004 12:17 pm Post subject: cool thing by twinkletoes- |
|
|
[code]
setscreen ("title:By : shane bellefeuille")
setscreen ("graphics:300;300, nobuttonbar")
var x, y, button, co : int
co := 56
colorback (black)
for row : 1 .. 30
for col : 1 .. 180
put " " ..
end for
end for
loop
Mouse.Where (x, y, button)
Text.Locate (1, 1)
if button = 0 then
drawline (x, y, 150, 150, co)
co := co + 1
if co = 96
then
co := 69
end if
end if
end loop
[/code] |
|
|
|
|
![](images/spacer.gif) |
Sponsor Sponsor
![Sponsor Sponsor](templates/subSilver/images/ranks/stars_rank5.gif)
|
|
![](images/spacer.gif) |
cool dude
![](http://www.taylorstrategicmarketing.com/images/king.jpg)
|
Posted: Fri Nov 05, 2004 1:56 pm Post subject: (No subject) |
|
|
not bad. seems like a cool effect, but i've seen a lot like those on this site. lol. good job |
|
|
|
|
![](images/spacer.gif) |
|
|