home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 2000 March / VPR0003B.ISO / alpha / cis.scp < prev    next >
Text File  |  1999-10-14  |  838b  |  42 lines
  1. ;
  2. ; このスクリプトは、CompuServe と PPP 接続を行う
  3. ; ためのサンプルです。
  4. ; CompuServe との PPP 接続を行う場合には、接続確立の
  5. ; 手順の中でポートの設定を変更する必要がありますので、
  6. ; CompuServe 以外の場合でも、ポートの設定を途中で変更
  7. ; する必要のある場合に参照してください。
  8. ;
  9.  
  10.  
  11. ; スクリプトのエントリ・ポイント
  12. ;
  13. proc main
  14.  
  15.    ; ポートの設定を英字テキスト用に指定します。
  16.  
  17.    set port databits 7
  18.    set port parity even
  19.  
  20.    transmit "^M"
  21.  
  22.    waitfor "Host Name:"
  23.    transmit "CIS^M"
  24.  
  25.    waitfor "User ID:"
  26.    transmit $USERID, raw
  27.    transmit "/go:pppconnect^M"
  28.  
  29.    waitfor "Password: "
  30.    transmit $PASSWORD, raw
  31.    transmit "^M"
  32.  
  33.    waitfor "One moment please..."
  34.  
  35.    ; 接続手順の完了後、ポートの設定をデータ通信用に
  36.    ; 設定します。
  37.  
  38.    set port databits 8
  39.    set port parity none
  40.  
  41. endproc
  42.