Here you go Zombie, I changed around your co-ordinates so the buttons will work properly now.
As OBese87 said
Quote: ""You're not RETURNing from the check region gosub.""
which was causing a lot of your dramas. I was 95% sure this was the problem before but didn’t want to say anything until I could test it myself seeing as I never (and I mean never ever) have used goto/gosubs I'm purely a function kinda guy.
Definitely have a good look at OBese87s code to find out ways of improving yours. "Wait" commands are really a big no no along with loading media in the main loop when there is the opportunity to load everything beforehand.
In future I would suggest just printing out your MouseX() and MouseY() returns to the screen in order to quickly reference "button boundaries" for hard coding them in later.
You will need to redo your file locations for you load bitmap commands due to the forum screwing up all the backslashes.
I hope your project goes well and if you need anymore help just ask.
sync on:cls:sync rate 60
load bitmap "Title concept2.png",0
load music "C:Documents and SettingsZombieMy DocumentsMy Musicitunesitunes MusicUnknown ArtistUnknown AlbumGaelic Storm - Road to Dublin.mp3",1
play music 1
Do
Mx=MouseX(): My=MouseY(): Mc=MouseClick()
If Mc=1 Then Gosub CheckRegion
Sync
Loop
End
CheckRegion:
Rem First Button
If Mx > 188 and Mx < 420 and My > 321 and My < 384
gosub image_one
Endif
If Mx > 184 and Mx < 424 and My > 417 and My < 480
gosub mouse_one
Endif
return
image_one:
load bitmap "C:Documents and SettingsZombieMy DocumentsMy Picturescredit screen two.bmp",0
gosub image_two
return
image_two:
cls
load bitmap "C:Documents and SettingsZombieMy DocumentsMy Picturescredit screen one.bmp",0
gosub image_three
return
image_three:
cls
load bitmap "C:Documents and SettingsZombieMy DocumentsMy PicturesMock Map.bmp",0
gosub image_four
return
image_four:
cls
load bitmap "C:Documents and SettingsZombieMy DocumentsMy PicturesPromotion.bmp",0
gosub image_five
return
image_five:
cls
load bitmap "C:Documents and SettingsZombieMy DocumentsMy Picturescookie.bmp",0
end
return
mouse_one:
cls
print "you did it"
return
That we simply are has allowed this reality we call real from the power of intangibility to pull out of inertness action, chaos and hold it into its form we call matter.