home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Inside Multimedia 1996 February
/
IMM0296.ISO
/
direct
/
qsockpro.qip
/
SPACENET.MPS
< prev
next >
Wrap
Text File
|
1995-12-16
|
1KB
|
58 lines
# SpaceNet (Muenchen, Germany) PPP/SLIP script fixed IP for SLIP
# 08/08/95 BC
String username
String password
String framing
String IPAdress
# Trace on
SetTimeout 60
CfgGetValue "Username" username
if result = 0 then
GetInput "Enter your user name" username
if result = 0 then
Print "Warning, no username entered"
else
Print "Username set to ["; username; "]"
endif
endif
CfgGetValue "Password" password
if result = 0 then
GetPassword "Enter your password" password
if result = 0 then
Print "Warning, no password entered"
else
Print "Password set."
endif
endif
CommWaitFor "ogin:"
CommSend username
CommSend "%r"
CommWaitFor "assword:"
CommSend password
CommSend "%r"
CfgGetValue "Framing" framing
if result = 0 then
Abort "Can't read 'Framing' setting from qdeck.ini"
endif
if framing = "MPSLIP" then
Print "Getting IP Address"
# CommWaitFor ") to"
# CommReadIPAddr IPAddress
# CfgSetValue "IPAddress" IPaddress
# Print ""
# Print "IP Address set to ["; IPAddress; "]"
else
Print "Framing is PPP"
endif
END