----------------------------------- WhatAmIDoing Mon Mar 01, 2004 12:21 pm sparkler ----------------------------------- this one is very simple but effective 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 ----------------------------------- jonos Mon Mar 01, 2004 3:35 pm ----------------------------------- 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 Thu Mar 04, 2004 9:17 am ya ----------------------------------- hey thats a good idea thx i'll try it with random stars,circles or leafs ----------------------------------- apomb Thu Mar 04, 2004 10:30 am ----------------------------------- here's a variation of that , with some input from the buttons 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 Thu Mar 04, 2004 10:53 am ----------------------------------- Compwiz , Thats really nice , i like it ( dont plug threads ) unless there is a need to , but good job anyway , ----------------------------------- jonos Thu Mar 04, 2004 11:55 am ----------------------------------- that's nice, just put a little delay after the stars so that it is slower and it looks awesome. ----------------------------------- WhatAmIDoing Thu Mar 04, 2004 12:09 pm 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 Thu Mar 04, 2004 12:16 pm ----------------------------------- ahh, too many shapes: 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 Thu Mar 04, 2004 12:25 pm nice ----------------------------------- hey thats a sweet idea i like it. and ya i won't post anymore code in this thread ----------------------------------- white_dragon Thu Mar 04, 2004 5:13 pm ----------------------------------- tat's sweet! nice prog! make one so every button pressed on keyboard makes one where mouse is. tink u can do it? ----------------------------------- jonos Thu Mar 04, 2004 6:47 pm ----------------------------------- 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 Sat Mar 06, 2004 2:29 pm 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 Sat Mar 06, 2004 3:00 pm ----------------------------------- 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 Sat Mar 06, 2004 10:28 pm ----------------------------------- OOH, seizure ----------------------------------- nastynika Tue Dec 13, 2005 11:06 am ----------------------------------- good job ----------------------------------- Mr. T Tue Dec 13, 2005 5:45 pm Alex's Opinion ----------------------------------- Wow, Nastynika really needs to be banned. Not only does he steal the code of others, but he also brings up year old topics. :withstupid: ----------------------------------- Cervantes Tue Dec 13, 2005 6:32 pm ----------------------------------- Indeed. And in the meantime before he gets eaten, he can read the [url=http://www.compsci.ca/v2/viewtopic.php?t=3151]Rules. ----------------------------------- nastynika Wed Dec 14, 2005 10:14 am ----------------------------------- whos code did i steal ----------------------------------- nastynika Wed Dec 14, 2005 10:35 am ----------------------------------- and y should i be banned just because you think so ----------------------------------- Mr. T Wed Dec 14, 2005 5:42 pm Alex's Opinion ----------------------------------- You are not making your situation any better by triple posting. :wink: ----------------------------------- Cervantes Wed Dec 14, 2005 6:00 pm ----------------------------------- and y should i be banned just because you think so A good point. It is not the position of the user to dictate who should be banned or not. That's not my position either. That treat is saved for those with higher authority. ----------------------------------- Saad85 Wed Dec 14, 2005 8:12 pm ----------------------------------- well, while this thread is relatively usable, and befor it egts locked, could some1 tell me why the constants are even in there?(origional program) ----------------------------------- Paul Wed Dec 14, 2005 8:48 pm ----------------------------------- Actually, it should be put in the "OMG trippy graphics" thread. And its prolly there because he was using it, before he changed it, and it stayed. ----------------------------------- Dan Wed Dec 14, 2005 9:13 pm ----------------------------------- and y should i be banned just because you think so 1. so far i have 2 post where you stole code, the volley ball one and space game wtich you seem to have posted mulptial times. 2. why should you be baned? well you broke the rules and are being disrepstfull to users. ----------------------------------- Tony Thu Dec 15, 2005 10:53 am ----------------------------------- Well ahead of you Dan :wink: I would like to bring it to everybody's attentioin that I can't keep up with every post. Please PM and bring it to my attenton if you have any concerns about any specific user and/or post. Thank you.