Bouncing Ball

[Maverick]

Here is my bouncing ball program. I know it kinda sucks, but its my first year programming in grade 10 and i suck at it.

code:

%n00bish bouncing ball setscreen("nocursor") setscreen("graphics:400;350") var ballx,bally,ballxdir,ballydir:int drawfillbox(1,1,400,350,blue) randint(ballx,0,maxx) randint(bally,0,maxy) ballxdir:=1 ballydir:=1 loop     drawfilloval(ballx,bally,5,5,12)     delay(1)     drawfilloval(ballx,bally,5,5,0)     if ballx>maxx and ballxdir>0 then ballxdir:=-ballxdir elsif ballx<0 and ballxdir<0 then ballxdir:=-ballxdir elsif bally>maxy and ballydir>0 then ballydir:=-ballydir elsif bally<0 and ballydir<0 then ballydir:=-ballydir end if ballx +=ballxdir bally+=ballydir end loop

[PaddyLong]

aieeee!!!


+BITS for the sig pic man we need more metal heads round these parts and I watched Maverick the other day... great movie

:grab:

[Maverick]

I agree.
Metallica Rocks big time. So does Maverick

[PaddyLong]

new Metallica is pretty bad, after Cliff died, they started going down hill, I have no problem with Jason at all, just I think the rest of the band was affected by Cliff's death so they changed

some bands you should listen to if you don't already.... Pantera, Slayer, Black Sabbath, Ozzy's solo stuff, Children of Bodom, Black Label Society, Testament.....

[Homer_simpson]

well.... their new album is kinda like a new metallica style... at first i didn't like it... but when i listened to it for a while ... it's not that bad...
btw that master of puppets picture used to be my desktop background for a while...=)

[PaddyLong]

ride the lightning is my favourite metallica album ... but if you like thrash, then you should check out Testament .. a few good songs off the top of my head are D.N.R. (Do Not Resuscitate), True Believer, Allegiance, Electric Crown, So Many Lies, Agony

[Maverick]

Well i'm not really into Slayer and Pantera, but i listen to Ozzy, Black Sabbath, and Bodom.

Other really good bands are Motorhead and Ironmaiden.

[Homer_simpson]

pantera's good... so's slayer....
here are a couple of bands u should know about if yer a rocker:
In flames
Arch Enemy
Iced Earth
soulfly
at the gates

[gigaman]

go metallica

[Thuged_Out_G]

UP THE IRONS!!!

heh, iron maiden rules

code:

setscreen ("offscreenonly") setscreen ("graphics:300;250") var ballx, bally : real var ballxdir, ballydir:real ballx:=Rand.Int ( 0, maxx) bally:=Rand.Int ( 0, maxy) ballydir := 0.1 ballxdir := 0.1 loop     cls     colorback (black)     drawfilloval (round(ballx), round(bally), 5, 5, 10)     delay (1)     if ballx > maxx and ballxdir > 0 then         ballxdir := -ballxdir     elsif ballx < 0 and ballxdir < 0 then         ballxdir := -ballxdir     elsif bally > maxy and ballydir > 0 then         ballydir := -ballydir     elsif bally < 0 and ballydir < 0 then         ballydir := -ballydir     end if     ballx += ballxdir     bally += ballydir     View.Update end loop

that code wont leave a trail behind the ball, unless you were going for that...and you can also slow the ball down alot more, by making the variables real instead of int..allowing you to make it as low as .1