Computer Science Canada

roses are actually red this time..

Author:  SilverSprite [ Tue Jun 01, 2004 3:55 pm ]
Post subject:  roses are actually red this time..

well.. here is my roses program.. now that computer is pretty much feeling a little better from those virii... source code this time.. its from a math thing i found some time ago and coded..

code:

View.Set ("nobuttonbar, graphics:max;max, offscreenonly")
var oldx, oldy, x, r, t, newx, newy, cx, cy, size := 0.0
cx := maxx div 2
cy := maxy div 2
size := 100
for n : 1 .. 359
    for d : 1 .. 359
        locate (1, 1)
        put "n: ", n, "   d: ", d
        loop
            t := (t + d) mod 360
            r := sind (((n * t) mod 360))
            newx := r * cosd (t)
            newy := r * sind (t)
            drawline (round (cx + size * oldx), round (cy + size * oldy), round (cx + size * newx), round (cy + size * newy), 7)
            oldx := newx
            oldy := newy
            exit when t = 0
        end loop
        View.Update
        cls
    end for
end for


Author:  Paul [ Tue Jun 01, 2004 4:37 pm ]
Post subject: 

Hm... interesting, although I didn't see any roses... or red... but its a cool effect. Reminded me of the movie "the ring"
Is it viruses or virii?

Author:  rhomer [ Tue Jun 01, 2004 4:53 pm ]
Post subject: 

THTA WAS THE COOLEST THING I EVER SAW!!!!

Author:  SilverSprite [ Tue Jun 01, 2004 4:53 pm ]
Post subject: 

i didnt name it man.. that was what the pdf was called "roses are red"...
and i think both work

Author:  SilverSprite [ Tue Jun 01, 2004 4:54 pm ]
Post subject: 

choose different numbers. you get some really cool ones

Author:  Raugrist [ Tue Jun 01, 2004 6:25 pm ]
Post subject: 

That was pretty nice, I think next to trig, this is the only time that I don't exactly hate math. Glad to hear the virus problem is gone.

Author:  SilverSprite [ Tue Jun 01, 2004 8:26 pm ]
Post subject: 

the virus problem isnt gone yet... just temporarily im working it through

Author:  Tony [ Tue Jun 01, 2004 8:27 pm ]
Post subject: 

ouch man, it's been in your computer for a while now... maybe you should just format Rolling Eyes

Author:  SilverSprite [ Tue Jun 01, 2004 8:39 pm ]
Post subject: 

oh i did.. i reformatted once.. then they all came back.. i reformatted a second time.. and i installed norton before i connected to the internet.. my computer is for some reason very susceptible to virii, if i dl msn for example.. one seems to leak through.. i have to clean it up real quick after norton detects it its annoying..

Author:  the_short1 [ Sat Jun 12, 2004 5:44 pm ]
Post subject: 

lookz nice..... i have gotten similiar results by doing a drawpolygon and have it keep raising the number of sides... maybe u can try that out...


good job!

Author:  SilverSprite [ Sat Jun 12, 2004 7:25 pm ]
Post subject: 

that besides the point.. and i doubt that drawpolygon would give the same thing.. go to a larger number of n and d

Author:  this_guy [ Thu Jun 24, 2004 5:01 pm ]
Post subject: 

i dont get it at all....where's the red? and the rose?
nice seizure giving thingy though.

Author:  Kingnoz [ Thu Jun 24, 2004 10:13 pm ]
Post subject: 

AH MY EYES...there should be a seizure warning for ppl with fast computers...other than that, the program is amazing, props to u.

Author:  the_short1 [ Fri Jun 25, 2004 11:17 am ]
Post subject: 

Posted Image, might have been reduced in size. Click Image to view fullscreen.

there Razz.... << have it for my cool ways to clear ur screen visuals.,.,. cuz thoe are nuts..


: