Sorry your browser is not supported!

You are using an outdated browser that does not support modern web technologies, in order to use this site please update to a new browser.

Browsers supported include Chrome, FireFox, Safari, Opera, Internet Explorer 10+ or Microsoft Edge.

Newcomers DBPro Corner / my gosub dont work

Author
Message
rockabillypete
21
Years of Service
User Offline
Joined: 3rd Jan 2003
Location:
Posted: 11th Jan 2003 01:00
Link
Ive tried useing gosub but it keeps giveing me errors very strange
i dont think im writting anything wrong
music is life
Back to top
Profile PM
IanM
Retired Moderator
21
Years of Service
User Offline
Joined: 11th Sep 2002
Location: In my moon base
Posted: 11th Jan 2003 01:02
Link
But what are you writing? Give us examples.
Back to top
Profile PM Email Website
rockabillypete
21
Years of Service
User Offline
Joined: 3rd Jan 2003
Location:
Posted: 11th Jan 2003 01:05
Link
im trying to learn how to use it very basic at first

if inkey$()<>"e" then gosub peter
if inkey$()="e" then print "hello"
cls

peter:
print "peter"
return

music is life
Back to top
Profile PM
IanM
Retired Moderator
21
Years of Service
User Offline
Joined: 11th Sep 2002
Location: In my moon base
Posted: 11th Jan 2003 01:08
Link
What you are not doing is stopping th program running into your subroutine.

if inkey$()<>"e" then gosub peter
if inkey$()="e" then print "hello"
cls
end : ` <--- stop the program running into the subroutine.

peter:
print "peter"
return
Back to top
Profile PM Email Website
rockabillypete
21
Years of Service
User Offline
Joined: 3rd Jan 2003
Location:
Posted: 11th Jan 2003 01:12
Link
I changed it to this
do
if inkey$()="e" then gosub peter
if inkey$()>"e" then print "hello"
wait key
loop

peter:
print "peter"
return

seems to work now
there was no loop in it

music is life
Back to top
Profile PM
Back to top

Login to post a reply

Server time is: 2024-05-17 05:12:57
Your offset time is: 2024-05-17 05:12:57