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