home *** CD-ROM | disk | FTP | other *** search
/ Curio City 9 / CURIO9.bin / pc / internet / win / joynt / term / coper.ap < prev    next >
Text File  |  1997-01-15  |  2KB  |  125 lines
  1. #AUTOLOGIN
  2. Wait(6)
  3. Timeout = 180
  4. Send("COPER\n")
  5. Ls
  6.     case "USER ID  :"
  7.         Send(Hostid)
  8.         Wait(1)
  9.         Send("\n")
  10.         LsStop
  11.     case LsTimeout
  12.         MsgDsp("エラーが発生したので処理を中断します")
  13.         StopMacro
  14. LsEnd
  15. Ls
  16.     case "PASSWORD :"
  17.         Send(Hostpass)
  18.         Wait(1)
  19.         Send("\n")
  20.         LsStop
  21.     case "login incorrect."
  22.         MsgDsp("ＩＤ又はパスワードが間違っています｡ 確認してください｡")
  23.         StopMacro
  24.     case LsTimeout
  25.         MsgDsp("エラーが発生したので処理を中断します")
  26.         StopMacro
  27. LsEnd
  28.  
  29. Ls
  30.     case "プロファイルを修正しますか"
  31.         Send("n\n")
  32.     case "お知らせを表示しますか"
  33.         Send("n\n")
  34.     case "リターンキーを押して下さい"
  35.         Send("\n")
  36.     case "番号またはコマンド"
  37.         MsgDsp("自動処理が終了しました。Joynt-Clubへ接続ボタンを押して下さい")
  38.         LsStop
  39.     case LsTimeout
  40.         MsgDsp("エラーが発生したので処理を中断します")
  41.         StopMacro
  42. LsEnd
  43.  
  44. #JLOGIN
  45. Send("J JOYNT\n")
  46. Ls
  47.     case "番号またはコマンド"
  48.         Send("8\n")
  49.         LsStop
  50.     case "リターンキーを押して下さい"
  51.         Send("\n")
  52.     case LsTimeout
  53.         MsgDsp("エラーが発生したので処理を中断します")
  54.         StopMacro
  55. LsEnd
  56.  
  57. ChkCode("JID");
  58. ChkCode("JPASS");
  59. ChkCode("JNAME");
  60.  
  61. Ls
  62.     case ")="
  63.         Send("3\n")
  64.         LsStop
  65.     case LsTimeout
  66.         MsgDsp("エラーが発生したので処理を中断します")
  67.         StopMacro
  68. LsEnd
  69.  
  70. Ls
  71.     case "CODE:"
  72.         Send(JID)
  73.         Send("\n")
  74.         LsStop
  75.     case LsTimeout
  76.         MsgDsp("エラーが発生したので処理を中断します")
  77.         StopMacro
  78. LsEnd
  79. Ls
  80.     case "WORD:"
  81.         Send(JPASS)
  82.         Send("\n")
  83.         LsStop
  84.     case "ERROR"
  85.         MsgDsp("プレイヤーコードが間違っています｡ 確認してください｡")
  86.         StopMacro
  87.     case LsTimeout
  88.         MsgDsp("エラーが発生したので処理を中断します")
  89.         StopMacro
  90. LsEnd
  91.  
  92. Ls
  93.     case "リターン"
  94.         LsStop
  95.         StopMacro
  96.     case "違います"
  97.         MsgDsp("パスワードが間違っています｡ 確認してください｡")
  98.         StopMacro
  99.     case LsTimeout
  100.         MsgDsp("エラーが発生したので処理を中断します")
  101.         StopMacro
  102. LsEnd
  103.  
  104.  
  105. #JENTRY
  106. Send("J JOYNT\n")
  107. Ls
  108.     case "番号またはコマンド"
  109.         Send("8\n")
  110.         LsStop
  111.     case "リターンキーを押して下さい"
  112.         Send("\n")
  113.     case LsTimeout
  114.         MsgDsp("エラーが発生したので処理を中断します")
  115.         StopMacro
  116. LsEnd
  117. Ls
  118.     case ")="
  119.         LsStop
  120.         StopMacro
  121.     case LsTimeout
  122.         MsgDsp("エラーが発生したので処理を中断します")
  123.         StopMacro
  124. LsEnd
  125.