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

marshymell0

Sun Apr 17, 2005 5:57 pm


ideas?

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

hey, I made this really simple sort of screensaver thing, anybody can add to it? thx  :D 

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


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

Martin

Sun Apr 17, 2005 6:15 pm



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

loop
    for x : 31 .. 103
        colourback (x)
        for i : 1 .. 7
              put skip
        end for
        delay (5)
    end for
end loop


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

marshymell0

Sun Apr 17, 2005 6:26 pm



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

lol ok. but like make it fancier?


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

jamonathin

Sun Apr 17, 2005 8:42 pm



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

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.