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.

3 Dimensional Chat / why isnt this working

Author
Message
Lancewrath
17
Years of Service
User Offline
Joined: 30th Dec 2002
Location:
Posted: 13th Jan 2003 07:58
For some reason i go to connect to someone ive tried 3 people so far and it wont display any sessions going.

cls
set window on
print "1.)host Game"
print "2.)Join Game"
print
input "select option: ",poop
if poop = 1 then goto hosto
if poop = 2 then goto joino

hosto:
cls
perform checklist for net connections
print "CONNECTION SELECTION (";checklist quantity();")"
for n=1 to checklist quantity()
print "[ ";n; " ] ";checklist string$(n)
next n
input "Select Connection: ",connecto
input "Type in your ip address: ",ipaddy$
set net connection connecto,ipaddy$
cls
input "Your name: ",pname1$
input "Game name: ",gname$
input "Max Players(255): ",players1
create net game gname$,pname1$,players1,2
if net game exists() = 1
print "NET GAME "+gname$+" CREATED"
goto getonwiffit
endif
end

joino:
perform checklist for net connections
print "CONNECTION SELECTION (";checklist quantity();")"
for n=1 to checklist quantity()
print "[ ";n; " ] ";checklist string$(n)
next n
input "Select Connection: ",connecto
input "Type in ip address: ",ipaddy$
set net connection connecto,ipaddy$
cls
input "Your name: ",pname1$
perform checklist for net sessions
print "CONNECTION SELECTION (";checklist quantity();")"
for n=1 to checklist quantity()
print "[ ";n; " ] ";checklist string$(n)
next n
input "Session to connect to: ",connecta
join net game connecta,pname1$
if net game exists() = 1
Print "Joined Game!"
goto getonwiffit
endif
end


getonwiffit:
cls
repeat
if inkey$()="s"
input "Message: ",msg1$
send net message string 0,pname1$+" "+msg1$
endif
poopo$ = STR$(net game now hosting())
text 200,200,"Hosting1-yes,0-no) "+poopo$
get net message
if net message exists() = 1
print net message string$()
endif

until inkey$() = "q"
if god = infinity and infinity = 0 then god = 0
indi
17
Years of Service
User Offline
Joined: 26th Aug 2002
Location: Earth, Brisbane, Australia
Posted: 14th Jan 2003 04:50
you might have to break down the steps into visual components onscreen to discern this kind of problem easier,

also turn your firewall off or down when trying things of this nature.

Shadow Robert
17
Years of Service
User Offline
Joined: 22nd Sep 2002
Location: Hertfordshire, England
Posted: 14th Jan 2003 08:43
i can spot several problems... but this really isn't the place for this

Anata aru kowagaru no watashi!

Login to post a reply

Server time is: 2020-08-06 08:36:54
Your offset time is: 2020-08-06 08:36:54