/* Provider Configuration Follows:
Name		NullModemLogin	; Name for this configuration
DialUp          0
Interface	slip		; Interface Name
NeedSerial      1
IPDynamic	0 		; 1 = YES, 0 = NO
IPAddr				; IP-address if static
NSDynamic	0		; 1 = YES, 0 = NO
UseBootP	0		; 1 = YES, 0 = NO
MTU		1500		; Provider specific
Phone				; Provider phone number (without spaces)
HdrCompress	AUTO		; YES|NO|AUTO
PAPHostId			; PPP PAP hostid
PAPPassword			; PPP PAP password, asked if empty
CHAPHisHostId			; PPP CHAP remote hostid
CHAPPassword			; PPP CHAP password, asked if empty
CHAPHostId			; PPP CHAP HostId
*/
/* The rest is the Dialer script for this provider */
options results
signal on error

ShowConsole
Set WaitForTimeout 10 
retries = 10

Status "Asking for password..."
Get PassWord 

Status "Waiting for login prompt..."
do while (1)
	SendLn
	WaitFor! "login:"
	if (result = 1) then do
	  Status "Logging in..."
	  SendLn "ppp"
	  Pause 2
	  SendLn PassWord
          exit 0  /* succesfull exit */
        end
	retries = retries - 1
	if (retries = 0 ) then exit 10
end

exit 10;

error:
Say "Command on line" SIGL "returned" RC ":" SerScript.LASTERROR
Exit 10