;Save this script on your computer and use it with your dialup connection
;for access numbers that require dialup script: scrpt1.scp
proc main
	integer nTries = 3
	delay 2
	while nTries > 0 do
		transmit "...^M"
		waitfor "NETWORK" then DoLogin until 5
		nTries = nTries -1
	endwhile
	; timed out
	goto Abort
DoLogin:
	delay 2
	transmit "NUI a0700001^M"
	waitfor "XXXXXX"
	transmit "odco0q^M"
	waitfor "active"
	transmit "set 1:0,2:0,3:0,4:1,9:0,13:4,21:0^M"
   delay 1
   transmit "^M"
   waitfor "NETWORK"
	transmit "Line(256/256) 9002130001^M"
	waitfor "connected"
	goto Done
Abort:
	; allow manual completion
	set screen keyboard on
	halt
Done:
	delay 4
endproc