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

Username:   Password: 
 RegisterRegister   
 Clicker Extreme!
Index -> Programming, Turing -> Turing Submissions
View previous topic Printable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
Lekegolo killer




PostPosted: Thu May 14, 2009 10:57 am   Post subject: Clicker Extreme!

Here is a rough version of my first attempt at a game, the only things missing are a way to win, a opening menu and alot of refinement.

Enjoy...or at least try to!

Turing:

 View.Set ("title:CLICKER EXTREME!,graphics:800;600,nobuttonbar,position:center;middle,offscreenonly")
Mouse.ButtonChoose ("multibutton")
Text.Colour(white)
Text.ColourBack (blue)
%Clicker EXTREME%
var score,x,y,x1,x2,y1,y2,button,a :int

%===============================================%
process scoring
loop
Mouse.Where(x,y,button)
    if  Mouse.ButtonMoved ("downup")     
        and x<x2
        and x>x1
        and y<y2
        and y>y1
        and button=1
            then
            score:=score+1
            View.Update
            delay(200)   
    end if
end loop
end scoring
%================================================%
put "v1.0"
put "Created by Lekegolo with the assistance of DemonWasp"
View.UpdateArea(0,0,800,600)
Text.ColourBack (green)
score:=0
delay(2000)
%
locatexy(maxx div 2-1,maxy div 2)
Draw.FillBox(0,0,800,600,white)
Draw.FillBox(0,0,50,50,green)
put "3"..
locatexy(15,25)
put score,""..
View.Update
delay(1000)
cls
%
locatexy(maxx div 2-1,maxy div 2)
Draw.FillBox(0,0,800,600,white)
Draw.FillBox(0,0,50,50,green)
put "2"..
locatexy(15,25)
put score,""..
View.Update
delay(1000)
cls
%
locatexy(maxx div 2-1,maxy div 2)
Draw.FillBox(0,0,800,600,white)
Draw.FillBox(0,0,50,50,green)
put "1"..
locatexy(15,25)
put score,""..
View.Update
delay(1000)
cls
%
locatexy(maxx div 2-10,maxy div 2)
Draw.FillBox(0,0,800,600,white)
Draw.FillBox(0,0,50,50,green)
put "GO!"..
locatexy(15,25)
put score,""..
View.Update
delay(300)
cls
%===============================================%
fork scoring
loop
    Draw.FillBox(0,0,800,600,white)
    Draw.FillBox(0,0,50,50,green)
    locatexy(15,25)
    put score,""..
    x1  := Rand.Int (50,789)
    y1  := Rand.Int (50,589)
    x2  := Rand.Int (x1+10,800)
    y2  := Rand.Int (y1+10,600)
    a   := Rand.Int (1,255)
    Draw.FillBox(x1,y1,x2,y2,a)
    View.Update
    delay(800)
    cls
end loop
Sponsor
Sponsor
Sponsor
sponsor
DanTheMan




PostPosted: Thu May 14, 2009 11:19 am   Post subject: RE:Clicker Extreme!

Nice game. Would be nice if you had a time limit, instead of a continuous clicking.
Lekegolo killer




PostPosted: Fri May 15, 2009 10:20 am   Post subject: RE:Clicker Extreme!

Yes, I'm still working on that also i'm trying to find a way to sync the scoring proccess with the Images appering so that you only get one point per click, currently you can click and hold to get multiple points.
tjmoore1993




PostPosted: Mon May 18, 2009 8:18 am   Post subject: Re: RE:Clicker Extreme!

Lekegolo killer @ Fri May 15, 2009 10:20 am wrote:
Yes, I'm still working on that also i'm trying to find a way to sync the scoring proccess with the Images appering so that you only get one point per click, currently you can click and hold to get multiple points.


May I suggest using a button? If I am not mistaken the GUI implements a Delay of some sort so you can't hold and click. Correct me if I'm wrong!
A.J




PostPosted: Mon May 18, 2009 9:56 am   Post subject: RE:Clicker Extreme!

cool game Smile

I would advise you too have negative scoring also (if you don't click on the rectangle) to make it more interesting. Also, adding difficulty levels to the game (i.e. changing the maximum size of the rectangle) would also make the game a bit more interesting.

And adding a timer (like DanTheMan suggested) is also a good idea
zero-impact




PostPosted: Mon May 18, 2009 11:13 am   Post subject: Re: RE:Clicker Extreme!

tjmoore1993 @ Mon May 18, 2009 8:18 am wrote:
Lekegolo killer @ Fri May 15, 2009 10:20 am wrote:
Yes, I'm still working on that also i'm trying to find a way to sync the scoring proccess with the Images appering so that you only get one point per click, currently you can click and hold to get multiple points.


May I suggest using a button? If I am not mistaken the GUI implements a Delay of some sort so you can't hold and click. Correct me if I'm wrong!


If I'm not mistaken then this should help you solve that problem.
ecookman




PostPosted: Mon May 18, 2009 11:38 am   Post subject: RE:Clicker Extreme!

fun game, but yea try to make it 1 point per square that appears, because you can get multiple clicks and points for that
copthesaint




PostPosted: Tue May 19, 2009 3:24 am   Post subject: RE:Clicker Extreme!

you should take out the process for scoring... It took me 5 runs just to accually see what ur program is because the scoring is in a process.
Sponsor
Sponsor
Sponsor
sponsor
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 1  [ 8 Posts ]
Jump to:   


Style:  
Search: