home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703A.ISO / OLS / Win95 / HT315 / HT315.LZH / PPJOIN.SCR < prev    next >
Text File  |  1996-02-09  |  837b  |  46 lines
  1. ; People用オンラインサインアップスクリプト
  2.  
  3.     timeout 4
  4. Restart:
  5.     switch
  6.         case "Host_Name:"
  7.             send "P^M"
  8.             goto Restart
  9.         case "UserID:"
  10.             goto EnterUserID
  11.         case timeout
  12.             send "@"
  13.             sleep 1
  14.             send "^M"
  15.             timeout 10
  16.             switch
  17.                 case "*"
  18. SendPAMRestart:
  19.                     if( ##HPAM )
  20.                         send "A HPAM^M"
  21.                     else
  22.                         send "A PAM^M"
  23.                     endif
  24.                     switch
  25.                         case "*"
  26.                             if( ##HPAM )
  27.                                 ##HPAM = 0
  28.                             else
  29.                                 ##HPAM = 1
  30.                             endif
  31.                             goto SendPAMRestart
  32.                         case "UserID"
  33.                             goto EnterUserID
  34.                         case timeout
  35.                             error "ホストが応答しません。"
  36.                     endswitch
  37.                 case "UserID:"
  38.                     goto EnterUserID
  39.                 case timeout
  40.                     error "ホストが応答しません。"
  41.             endswitch
  42.     endswitch
  43. EnterUserID:
  44.     send "PAMGUEST^M"
  45.     message "ここから手動で操作してください。"
  46.