[DBP] user interface help - GameCreators Forum

Author

Message

Merk

18

Years of Service

User Offline

Joined: 5th Feb 2006

Location:

Posted: 12th Jul 2006 11:28

Link

Hey,
I've hit a snag on what should be a really simple problem to solve. I want to have a sprite to become visible when the user clicks its button (also a sprite). A second click should close/hide the panel. Now its pretty simple (even for me) to get the panel to pop up on a mouse click, but the logic behind my function is no good making it disappear on a second click:

+ Code Snippet

function button(spra,sprb)
sx1 = sprite x(Panel(spra).no)
sx2 = sprite x(Panel(spra).no) + sprite scale x(Panel(spra).no)
sy1 = sprite y(Panel(spra).no)
sy2 = sprite y(Panel(spra).no) + sprite scale y(Panel(spra).no)
if (mousex() >= sx1 and mousex() <= sx2) and (mousey() >= sy1 and mousey() <= sy2)
   if mouseclick() = 1
      if Panel(sprb).active = 0
         Panel(sprb).active = 1
      endif
   endif

   `if mouseclick() = 1
   `      if Panel(sprb).active = 1 then Panel(sprb).active = 0
   `   endif
   `endif
endif
endfunction

Where the Panel() array holds information on buttons and panels of the user interface, and the .active variable is a boolean which is set to 1 (another function in the code later checks the .active value of each item and set visibility based on that).

The remmed out lines are definitely where the problem is coming from, since it'll detect the same mouse click that would set the active variable as 1, instantly changing back to 0.

So does anyone know how fix this?
Thanks in advance

,
Merk.

Attachments

Login to view attachments

Back to top

Profile PM Website

Dream And Death

18

Years of Service

User Offline

Joined: 21st Feb 2006

Location: The circus! Juggling job, kids and DBPro

Posted: 12th Jul 2006 12:19

Link

Yeah, you have a prob - read your logic:

If I have clicked the mouse,
If panel is inactive set it to active

If I have clicked the mouse,
If panel is active (which it now is!) make it inactive.

Try setting up your logic using an ELSE clause:
If I have clicked the mouse,
If panel is inactive set it to active
ELSE
set it to inactive

It seems from the above code that you will be ok to run with this, but if not let me know and I'll code it for you!
Hope this helps!

"You get what everyone gets, you get a lifetime!" - Death, The Sandman Library

First you Dream, then you ... - Neil Gaiman, 2001

Back to top

Profile PM

Merk

18

Years of Service

User Offline

Joined: 5th Feb 2006

Location:

Posted: 12th Jul 2006 12:58

Link

Hey death, yes an else statement like that works. Just now it flickers between being visible and invisible when you keep your finger on the mouse button. I've had this problem before, and normally something like this works:

+ Code Snippet

if keystate(205) = 1 and hold = 0 then hold = 1
   if hold = 1
      hold = 2
      zrotate object curobj,object angle z(curobj) - 180
   endif
if keystate(205) = 0 then hold = 0

But if you try that with a second if statement after the hold value change to 2 it won't do you any good (like this):

+ Code Snippet

function button(spra,sprb)
sx1 = sprite x(Panel(spra).no)
sx2 = sprite x(Panel(spra).no) + sprite scale x(Panel(spra).no)
sy1 = sprite y(Panel(spra).no)
sy2 = sprite y(Panel(spra).no) + sprite scale y(Panel(spra).no)
if (mousex() >= sx1 and mousex() <= sx2) and (mousey() >= sy1 and mousey() <= sy2)
   if mouseclick() = 1 and hold = 0 then hold = 1
   if hold = 1
      hold = 2
      if Panel(sprb).active = 0
         hold = 3
         Panel(sprb).active = 1
      else
         hold = 4
         Panel(sprb).active = 0
      endif
   endif

   if mouseclick() = 0 then hold = 0
endfunction

All you get is the hold value switching between 3 and 4 (you can get rid of hold = 3, hold = 4 and you get the same result) as long as mouseclick() = 1. There must be a better way of having one action occur per mouse click, even if you hold the mouse button down.

Help and suggestions most appreciated

,
Merk.

Back to top

Profile PM Website

Dream And Death

18

Years of Service

User Offline

Joined: 21st Feb 2006

Location: The circus! Juggling job, kids and DBPro

Posted: 12th Jul 2006 13:04 Edited at: 12th Jul 2006 13:04

Link

Try this: You will need to make MouseHeld global to get it to work, but I think it will do what you want!

+ Code Snippet

global MouseHeld

function button(spra,sprb)
sx1 = sprite x(Panel(spra).no)
sx2 = sprite x(Panel(spra).no) + sprite scale x(Panel(spra).no)
sy1 = sprite y(Panel(spra).no)
sy2 = sprite y(Panel(spra).no) + sprite scale y(Panel(spra).no)
if (mousex() >= sx1 and mousex() <= sx2) and (mousey() >= sy1 and mousey() <= sy2)
   if mouseclick() = 1 and MouseHeld = 0
      MouseHeld = 1
      if Panel(sprb).active = 0
         Panel(sprb).active = 1
      else
         Panel(sprb).active = 0
      endif
   endif

   if mouseclick() = 0 then MouseHeld = 0
endfunction

"You get what everyone gets, you get a lifetime!" - Death, The Sandman Library

First you Dream, then you ... - Neil Gaiman, 2001

Back to top

Profile PM

Merk

18

Years of Service

User Offline

Joined: 5th Feb 2006

Location:

Posted: 12th Jul 2006 13:53

Link

neat! That works a treat, thank you dream and death

Merk.

Back to top

Profile PM Website

Sorry your browser is not supported!

Newcomers DBPro Corner / [DBP] user interface help

Attachments