home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703B.ISO / terminal / niftyman / w95nim / program / data.z / PPP.SCR < prev    next >
Text File  |  1996-11-19  |  5KB  |  186 lines
  1. #
  2. #  Copyright (c) 1996 by NIFTY Corporation
  3. #
  4. #  The information in this software is subject to change without
  5. #  notice and should not be construed as a commitment by NIFTY Corporation.
  6. #
  7. #  HYPER: Connect to HyperROAD
  8. #    %UserID        : LOGIN ID
  9. #    %Password     : Login Password
  10. #
  11. WaitMsg = "\x0Dしばらくしてからやりなおしてください";
  12. CR = "\x0D";
  13.  
  14. show "HyperROADに接続開始";
  15.  
  16. Tries = 8;
  17. Wait_HYPER:
  18.     if Tries == 0 goto Return_Failure;
  19.     Tries = Tries - 1;
  20.     wait
  21.         "HOST NAME?"        goto Send_C_NIM_Host1,
  22.         "Connection-ID  --->"    goto Send_SHC_Host,
  23.         "User-ID  --->"        goto Start_LOGIN,
  24.     until 80;
  25.     goto Wait_HYPER;
  26.  
  27. Send_C_NIM_Host:
  28.     show "ホストネーム送信中...";
  29.     wait until 10;
  30.     send "C NIM" & CR; 
  31.     goto Wait_HYPER;
  32. Send_C_NIM_Host1:
  33.     wait until 10;
  34.     goto Wait_HYPER;
  35. Send_SHC_Host:
  36.     show "コネクションＩＤ送出中...";
  37.     wait until 10;
  38.     send "SHC" & CR;
  39.     goto Wait_HYPER;
  40.     
  41. Start_LOGIN:
  42. UID = %UserID;
  43. Tries = 5;
  44. Send_UID:
  45.     show "ユーザーＩＤ送出中...";
  46.     wait until 10;
  47.     send UID & CR;
  48. Wait_LOGIN:
  49.     if Tries == 0 goto Return_Failure;
  50.     Tries = Tries - 1;
  51.     wait
  52.         "User-ID  --->"            goto Send_UID,
  53.         "User-ID Error"            goto Enter_UID,
  54.         "Password --->"            goto Start_PSW,
  55.         "◆あなたのIDは一時的に"    goto Return_ID_NG_1,
  56.     until 80;
  57.     goto Wait_LOGIN;
  58.  
  59. Enter_UID:
  60.     input "正しいユーザーＩＤを入力して下さい" UID EON 1200;
  61.     if UID goto Wait_LOGIN;
  62.     errexit "ユーザーＩＤ入力タイムアウト";
  63.  
  64. Start_PSW:
  65.     PWD = %Password;
  66.     Tries = 5;
  67. Send_PSW:
  68.     show "パスワード送出中...";
  69.     wait until 10;
  70.     send PWD & CR;
  71. Wait_PASSWORD:
  72.     if Tries == 0 goto Return_Failure;
  73.     Tries = Tries - 1;
  74.     wait
  75.         "Password --->"            goto Send_PSW,
  76.         "Password ERROR"        goto Enter_PSW,
  77.         %ESC & "I"            goto Return_Success,
  78.         "大変混雑"            goto Return_BUSY,
  79.         "◆あなたのIDは一時的に"    goto Return_ID_NG_1,
  80.         "登録内容の確認作業中"        goto Return_ID_NG_2,
  81.         "登録内容の確認が終了以前に"    goto Return_ID_NG_3,
  82.         "定期保守"            goto Return_MENTE,
  83.         "◆只今の時間はご利用"        goto Return_MHA,
  84.         "◆二重ログイン"        goto Return_LOGIN,
  85.         "ログインが不正"        goto Return_BUTLOGIN,
  86.         "「CHN」"            goto Return_CARD_1,
  87.         "承認中のため"            goto Return_CARD_2,
  88.         "決済へのお手続き中"        goto Return_CARD_3,
  89.         "変更ご申請の"            goto Return_CARD_4,
  90.         "親IDの都合"            goto Return_CARD_5,
  91.     until 80;
  92.     goto Wait_PASSWORD;
  93.  
  94. Enter_PSW:
  95.     input "正しいパスワードを入力して下さい" PWD EOFF 1200;
  96.     if PWD goto Wait_PASSWORD;
  97.     errexit "パスワード入力タイムアウト";
  98.  
  99. Return_Success:
  100.   show "HyperROADに接続しました";
  101.   exit;
  102.  
  103. Return_Failure:
  104.   errexit "HyperROADに接続できません";
  105.  
  106. Return_BUSY:
  107.   errexit "◆現在、サ－ビスは大変混雑しております... ◆";
  108.  
  109. Return_ID_NG_1:
  110.   errexit 
  111.   "◆あなたのIDは一時的にご利用頂けません。" &
  112.   "カスタマーサポートへご連絡ください◆" &
  113.   CR &
  114.   "  フリーダイヤル 0120-22-1200  (平日 9時～19時、土曜日 9時～17時45分)";
  115.  
  116. Return_ID_NG_2:
  117.   errexit 
  118.   "現在あなたがお使いの利用者ＩＤは、ご登録内容の確認作業中です。" &
  119.   CR &
  120.   "恐れ入りますが今暫くお待ちください。詳しくはフリーダイヤル0120-22-1200" &
  121.   "（メンバサービス部）までお問い合わせ下さい。";
  122.  
  123. Return_ID_NG_3:
  124.   errexit 
  125.   "現在あなたがお使いの利用者ＩＤは、ご登録内容の確認が終了以前に所定の" &
  126.   CR &
  127.   "無料使用権を使いきりましたので、一時的にご利用できなくなっております。" &
  128.   "恐れ入りますが、ご登録内容の確認が終了するまで、今暫くお待ちください。" &
  129.   "詳しくはフリーダイヤル0120-22-1200（メンバサービス部）までお問い合わせ下さい。";
  130.  
  131. Return_MENTE:
  132.   errexit 
  133.   "只今の時間、定期保守をしております。";
  134.  
  135. Return_MHA:
  136.   errexit "◆只今の時間はご利用になれません◆";
  137.  
  138. Return_LOGIN:
  139.   errexit "◆二重ログインです◆";
  140.  
  141. Return_BUTLOGIN:
  142.   errexit "◆ログインできませんでした。HyperROAD以外からNIFTY-Serveに" &
  143.   "ログインしようとしたか、あるいは、ダイアラーのIDと、NIFTY ManagerのID" &
  144.   "が一致しなかった可能性があります◆";
  145.  
  146. Return_CARD_1:
  147.   errexit
  148.   "NIFTY-Serve にご登録のクレジットカード番号が更新前の旧番号及び無効番" &
  149.   "号のため、ご利用不可との連絡をカード会社より受けております。そのため、" &
  150.   "お客様のIDは、現在サービスの利用を停止させていただいております。" &
  151.   CR &
  152.   "つきましては、再度ログインのうえ、Enter Connection IDにて「CHN」と入" &
  153.   "力して、決済方法の変更手続きを行ってください。";
  154.  
  155. Return_CARD_2:
  156.   errexit 
  157.   "お客様のIDは、クレジットカード承認中のため、サービスの利用を停止させ" &
  158.   "ていただいております。"&
  159.   CR &
  160.   "サービスがご利用可能となりますのは、カード承認後１～２日後となります" &
  161.   "ので、ご了承ください。";
  162.  
  163. Return_CARD_3:
  164.   errexit 
  165.   "お客様のIDは、預金口座自動振替決済へのお手続き中のため、サービスの利" &
  166.   "用を停止させていただいております。" &
  167.   CR &
  168.   "サービスがご利用可能となりますのは、所定の用紙によるお手続き完了後と" &
  169.   "なりますので、ご了承ください。";
  170.  
  171. Return_CARD_4:
  172.   errexit 
  173.   "NIFTY-Serve にご登録のクレジットカード番号が更新前の旧番号及び無効" &
  174.   "番号のため、ご利用不可との連絡をカード会社より受けております。その" &
  175.   "ため、お客様のIDは、現在サービスの利用を停止させていただいておりま" &
  176.   "す。" &
  177.   CR &
  178.   "サービスがご利用可となりますのは、変更ご申請の２～３日後となります" &
  179.   "ので、ご了承ください。";
  180.  
  181. Return_CARD_5:
  182.   errexit 
  183.   "お客様のIDは、親IDの都合により、現在サービスの利用を停止させていただ" &
  184.   "いております。";
  185.  
  186.