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] |
|
|
|
|
 |
Sponsor Sponsor

|
|
 |
cool dude

|
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 |
|
|
|
|
 |
|
|