-----------------------------------

flamemaster89

Fri Nov 11, 2005 9:21 pm


Wave Effect Program

-----------------------------------

%well heres the code

setscreen ("graphics:max;max,nobuttonbar") 
const pi := 1
var temp,w,z,c,cc:int:=0   

           
loop       
randint(c,0,103)
randint(cc,103,255)

for x : 1 .. maxx 
    for y : 1 .. maxy 
    const angle := y * pi / 6
           
      
        if sin (angle)-cos (angle)>x/maxy
 then 
            drawdot (x, y, c) 
        else 
            drawdot (x, y, cc) 
        end if 
    end for 
end for 

for decreasing x :  maxx ..1 
    for decreasing y : maxy ..1
    const angle := y * pi / 6
           
      
        if sin (angle)-cos (angle)>x/maxy
 then 
            drawdot (x, y, cc) 
        else 
            drawdot (x, y, c) 
        end if 
    end for 
end for 
end loop


-----------------------------------

iker

Sun Nov 13, 2005 2:21 pm



-----------------------------------

i don't understand, what is it supposed to do. btw, pretty good looking


-----------------------------------

Flikerator

Sun Nov 13, 2005 7:43 pm



-----------------------------------

Pretty neat I guess...What is the point of this program though?


-----------------------------------

Cervantes

Sun Nov 13, 2005 9:53 pm



-----------------------------------

[url=http://www.compsci.ca/v2/viewtopic.php?t=7734]No point.  Random trigonometric functions.