Computer Science Canada

ideas?
Author:  marshymell0 [ Sun Apr 17, 2005 5:57 pm ]
Post subject:  ideas?
hey, I made this really simple sort of screensaver thing, anybody can add to it? thx Very Happy

code:
loop
    for x : 31 .. 103
        colourback (x)
        put skip
        put skip
        put skip
        put skip
        put skip
        put skip
        put skip
        delay (5)
    end for
end loop
Author:  Martin [ Sun Apr 17, 2005 6:15 pm ]
Post subject: 
code:
loop
    for x : 31 .. 103
        colourback (x)
        for i : 1 .. 7
              put skip
        end for
        delay (5)
    end for
end loop
Author:  marshymell0 [ Sun Apr 17, 2005 6:26 pm ]
Post subject: 
lol ok. but like make it fancier?
Author:  jamonathin [ Sun Apr 17, 2005 8:42 pm ]
Post subject: 
code:
setscreen ("graphics:200;200,nobuttonbar,position:center;center,offscreenonly")
colorback (black)
cls
loop
    for decreasing x : 103 .. 16
        cls
        drawfillstar (50, maxy div 2, x * 3, x * 3, x)
        View.Update
        delay (10)
    end for
    for x : 16 .. 103
        cls
        drawfillstar (50, maxy div 2, x * 3, x * 3, x)
        View.Update
        delay (10)
    end for
end loop

But this should be it, or else this topic is going to/already has fallen under the "133t tRiPPy C00L FlaSHeS!" category, which we try to stay away from.

:


You can syndicate this boards posts using the file backend.php or view the topic map using sitemap.php.

Terms of Use | Privacy Policy