Button Function - GameCreators Forum

Author

Message

Enclosed

20

Years of Service

User Offline

Joined: 8th Jun 2004

Location: Colorado

Posted: 12th Aug 2004 06:28 Edited at: 12th Aug 2004 12:10

Link

Uhh, I dont really know what to call this but I have a question(propably a noob one) that I cant seem to figure out. Since I don't know what to call this question I cant search for it on the forums, therefore I have to ask it myself.

Ok I'm making a button function for my program like this:

+ Code Snippet

function button(left,top,right,bottom,t$)
if mouseclick()=1
   if mouseX()>left
      if mouseY()>top
         if mouseX()<right
            if mouseY()<bottom
               t$
            endif
         endif
      endif
   endif
endif
endfunction

Where it says t$ how would I get darkbasic to process this as a command and use it in my program, for example.

button(0,0,100,12,"print "button pressed"")

Now I dont quite think I am going at this with the right aproach and any help would be apreciated.

Edit I shortened the function down to:

+ Code Snippet

function button(left,top,right,bottom,t$)
if mouseclick()=1 and mouseX()>left and mouseY()>top and mouseX()<right and mouseY()<bottom then t$
endfunction

but I still dont have the solution to my problem

Back to top

Profile PM Email Website

Enclosed

20

Years of Service

User Offline

Joined: 8th Jun 2004

Location: Colorado

Posted: 12th Aug 2004 06:44 Edited at: 12th Aug 2004 12:12

Link

Ok got the code posted successfuly in the right format. And my question is not answered.

Back to top

Profile PM Email Website

Dodo

20

Years of Service

User Offline

Joined: 8th Aug 2004

Location: eating lunch

Posted: 13th Aug 2004 05:32

Link

well i don't know if this will work as i've never used it before but you could try creating a file and then executing it, something a bit like this:

+ Code Snippet

function button(left,top,right,bottom,t$)
if mouseclick()=1 and mouseX()>left and mouseY()>top and mouseX()<right and mouseY()<bottom then t$
`write to file
open to write 1,Chr$(ASC("C://")+asc(t$))
write string 1,t$
close file 1
execute file `sorry don't know syntax
endfunction

please don't take it personally if im wrong cos i've never had to do something like that before. Hope it works

Back to top

Profile PM Email Website

zircher

21

Years of Service

User Offline

Joined: 27th Dec 2002

Location: Oklahoma

Posted: 13th Aug 2004 07:44

Link

Or, you could simply put PRINT in front of t$ or TEXT 10,10, depending on how much control you need.
--
TAZ

"Do you think it is wise to provoke him?" "It's what I do." -- Stargate SG-1

Back to top

Profile PM Email Website

Sorry your browser is not supported!

Newcomers DBPro Corner / Button Function