#
#           This file (should show) shows how to use the DIP
#	    scripting commands to establish a link to a host.
#

#  This section sets up the comm port and speed.
  
  port cua1
  speed 38400

#  Self explanatory
  
  send AT\r
  wait OK 2
 
#  Self exlpanatory...
  
  dial *674988144
  
#  Connection made and the echo is set on to see the connection take place.

  echo on
  
#  Waits for login prompt and sends login...  same goes for password

  wait ogin: 6
  send login\n
  wait ord: 6
  send password\n

#  Sets up Maximum Transmission Unit (MTU).  It determines the largest
#  datagram that can be transmitted by an IP interface without needing
#  it to be broken down into smaller units.

  get $mtu 240

#   Waits until the address assignment is disaplayed on the screen...
#   You are then prompted to enter the second address which is the address
#   assigned to your machine.  The script sets up the gateway address for
#   you since it will always be 198.80.1.2 .  DIP sets up the routing and
#   addressing with "default".  

  wait ... 3
  print             Please enter the second IP address:
  get $locip ask
  get $rmtip 198.80.1.2
  default

  print CONNECTED $locip ---> $rmtip
  mode CSLIP