Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 sparkler
Index -> Programming, Turing -> Turing Submissions
Goto page 1, 2  Next
View previous topic Printable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
WhatAmIDoing




PostPosted: Mon Mar 01, 2004 12:21 pm   Post subject: sparkler

this one is very simple but effective
code:

setscreen ("graphics")
var x, y, c, a, b, button : int
const centerx := maxx div 2
const centery := maxy div 2
loop
    mousewhere (a, b, button)
    randint (x, 0, maxx)
    randint (y, 0, maxy)
    randint (c, 0, 50)
    drawline (a, b, x, y, c)
end loop
Sponsor
Sponsor
Sponsor
sponsor
jonos




PostPosted: Mon Mar 01, 2004 3:35 pm   Post subject: (No subject)

thats a nice effect. you should make it so that when the user presses a button it shoots stars/circles/something at the mouse. nice work.
WhatAmIDoing




PostPosted: Thu Mar 04, 2004 9:17 am   Post subject: ya

hey thats a good idea thx

i'll try it with random stars,circles or leafs
apomb




PostPosted: Thu Mar 04, 2004 10:30 am   Post subject: (No subject)

here's a variation of that , with some input from the buttons

code:

setscreen ("graphics,nobuttonbar")
var x, y, c, a, b, button : int
const centerx := maxx div 2
const centery := maxy div 2
loop
    mousewhere (a, b, button)
    if button = 1 then
        randint (x, 0, maxx)
        randint (y, 0, maxy)
        randint (c, 0, 50)
        drawfillstar (a, b, x, y, c)
    else
        randint (x, 0, maxx)
        randint (y, 0, maxy)
        randint (c, 0, 50)
        drawline (a, b, x, y, c)
    end if
end loop 
shorthair




PostPosted: Thu Mar 04, 2004 10:53 am   Post subject: (No subject)

Compwiz , Thats really nice , i like it ( dont plug threads ) unless there is a need to , but good job anyway ,
jonos




PostPosted: Thu Mar 04, 2004 11:55 am   Post subject: (No subject)

that's nice, just put a little delay after the stars so that it is slower and it looks awesome.
WhatAmIDoing




PostPosted: Thu Mar 04, 2004 12:09 pm   Post subject: nice

ya thats pretty good how bout this one

setscreen ("graphics,nobuttonbar")
var x, y, c, a, b, button, number : int
const centerx := maxx div 2
const centery := maxy div 2
loop
randint (number, 1, 3)
mousewhere (a, b, button)
if button = 1 and number = 1 then
randint (x, 0, maxx)
randint (y, 0, maxy)
randint (c, 0, 50)
drawfillstar (a, b, x, y, c)
delay (50)
elsif button = 1 and number = 2 then
randint (x, 0, maxx)
randint (y, 0, maxy)
randint (c, 0, 50)
drawfilloval (a, b, x, y, c)
delay (50)
elsif button = 1 and number = 3 then
randint (x, 0, maxx)
randint (y, 0, maxy)
randint (c, 0, 50)
drawfillmapleleaf (a, b, x, y, c)
delay (50)
else
randint (x, 0, maxx)
randint (y, 0, maxy)
randint (c, 0, 50)
drawline (a, b, x, y, c)
end if
end loop
jonos




PostPosted: Thu Mar 04, 2004 12:16 pm   Post subject: (No subject)

ahh, too many shapes:

code:

setscreen ("graphics,nobuttonbar")
var x, y, c, a, b, button : int
const centerx := maxx div 2
const centery := maxy div 2
loop
    mousewhere (a, b, button)
    if button = 1 then
        randint (x, 0, maxx)
        randint (y, 0, maxy)
        drawline (a, b, x, y, 0)
        drawline (a+1, b+1, x+1, y+1, 7)
    else
        randint (x, 0, maxx)
        randint (y, 0, maxy)
        randint (c, 0, 50)
        drawline (a, b, x, y, c)
    end if
end loop


last code im posting in this thread, we shouldn't be plugging them with out code, like shorthair said.
WhatAmIDoing




PostPosted: Thu Mar 04, 2004 12:25 pm   Post subject: nice

hey thats a sweet idea i like it. and ya i won't post anymore code in this thread
white_dragon




PostPosted: Thu Mar 04, 2004 5:13 pm   Post subject: (No subject)

tat's sweet! nice prog! make one so every button pressed on keyboard makes one where mouse is. tink u can do it?
jonos




PostPosted: Thu Mar 04, 2004 6:47 pm   Post subject: (No subject)

that's easy... just make tons of if statements and do mousewhere and then make the effect... voila, that would look awesome though, someone do it. im not going to though because i have homework i should be doingl.
WhatAmIDoing




PostPosted: Sat Mar 06, 2004 2:29 pm   Post subject: ok

ya I could do that but i'm putting the finishing touches on my frogger program. also i need you guys to test it for me ok?
the_short1




PostPosted: Sat Mar 06, 2004 3:00 pm   Post subject: (No subject)

once a month... someone submits the EXACT same thing i made when i was starting out in turing (long time ago) .... funny.... and i DONT want to plug... but yea... i have this, plus recepneps line deal in my Kevin the shorts cool visuals.. funny ... great minds think alike,.,,., rite?

i find it weird that you though up this idea..... i think it sparkes the minds of junior programers as soon as they start randint and char graphics to do these kinds of things... Codus... it lookz good... try making the screen bigger, then have it on a black backround... and save a screenshot... it lookz REALY sweet for a destopbackround if you mouse was in middle.. and not stay there too long...

also
if msbtn = 1 then
colorback (black)
cls
end if
then you can click in middle of screen and start over for making that screenshot...

and compwiz.. .that lookz ASWEOME...
Jodo Yodo




PostPosted: Sat Mar 06, 2004 10:28 pm   Post subject: (No subject)

OOH, seizure
nastynika




PostPosted: Tue Dec 13, 2005 11:06 am   Post subject: (No subject)

good job
Display posts from previous:   
   Index -> Programming, Turing -> Turing Submissions
View previous topic Tell A FriendPrintable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 2  [ 25 Posts ]
Goto page 1, 2  Next
Jump to:   


Style:  
Search: