home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703B.ISO / terminal / niftyman / w95nim / program / data.z / FENICS.SCR < prev    next >
Text File  |  1996-11-19  |  7KB  |  226 lines
  1. #
  2. #  Copyright (c) 1995 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. #  FENICS: Connect to FENICS
  8. #    %UserID        : LOGIN ID
  9. #    %Password     : Login Password
  10. #    ROAD        : FENICS ROAD Name (String)
  11. #
  12. WaitMsg = "\x0Dしばらくしてからやりなおしてください";
  13. CR = "\x0D";
  14.  
  15. show "FENICS" & ROAD & "に接続開始";
  16.  
  17. Tries = 8;
  18. Wait_FENICS:
  19.     if Tries == 0 goto Return_Failure;
  20.     Tries = Tries - 1;
  21.     wait
  22.         "*"            goto Send_C_NIM_Host,
  23.         "HOST NAME?"        goto Send_C_NIM_Host1,
  24.         "Connection-ID  --->"    goto Send_SHC_Host,
  25.         "User-ID  --->"        goto Start_LOGIN,
  26.         "Clear DTE"        goto Send_C_NIM_Host2,
  27.         "Clear OCC"        goto Return_Failure_OCC,
  28.         "Clear PAD"        goto Send_C_NIM_Host2,
  29.         "Clear NA"        goto Return_Failure_NA,
  30.         "Clear NP"        goto Return_Failure_NP,
  31.         "Clear NC"        goto Return_Failure_NC,
  32.         "Clear DER"        goto Return_Failure_DER,
  33.         "Clear RPE"        goto Return_Failure_RPE,
  34.     until 80;
  35.     goto Wait_FENICS;
  36.  
  37. Send_C_NIM_Host:
  38.     show "ホストネーム送信中...";
  39.     wait until 10;
  40.     send "C NIM" & CR; 
  41.     goto Wait_FENICS;
  42. Send_C_NIM_Host1:
  43.     wait until 10;
  44.     goto Wait_FENICS;
  45. Send_C_NIM_Host2:
  46.     show "センターホストに再接続中...";
  47.     wait until 10;
  48.     goto Wait_FENICS;
  49. Send_SHC_Host:
  50.     show "コネクションＩＤ送出中...";
  51.     wait until 10;
  52.     send "SHC" & CR;
  53.     goto Wait_FENICS;
  54.     
  55. Start_LOGIN:
  56. UID = %UserID;
  57. Tries = 5;
  58. Send_UID:
  59.     show "ユーザーＩＤ送出中...";
  60.     wait until 10;
  61.     send UID & CR;
  62. Wait_LOGIN:
  63.     if Tries == 0 goto Return_Failure;
  64.     Tries = Tries - 1;
  65.     wait
  66.         "User-ID  --->"            goto Send_UID,
  67.         "User-ID Error"            goto Enter_UID,
  68.         "Password --->"            goto Start_PSW,
  69.         "◆あなたのIDは一時的に"    goto Return_ID_NG_1,
  70.         "Clear DTE"            goto Return_Failure_DTE,
  71.         "Clear PAD"            goto Return_Failure_PAD,
  72.         "Clear NC"            goto Return_Failure_NC,
  73.     until 80;
  74.     goto Wait_LOGIN;
  75.  
  76. Enter_UID:
  77.     input "正しいユーザーＩＤを入力して下さい" UID EON 1200;
  78.     if UID goto Wait_LOGIN;
  79.     errexit "ユーザーＩＤ入力タイムアウト";
  80.  
  81. Start_PSW:
  82.     PWD = %Password;
  83.     Tries = 5;
  84. Send_PSW:
  85.     show "パスワード送出中...";
  86.     wait until 10;
  87.     send PWD & CR;
  88. Wait_PASSWORD:
  89.     if Tries == 0 goto Return_Failure;
  90.     Tries = Tries - 1;
  91.     wait
  92.         "Password --->"            goto Send_PSW,
  93.         "Password ERROR"        goto Enter_PSW,
  94.         %ESC & "I"            goto Return_Success,
  95.         "大変混雑"            goto Return_BUSY,
  96.         "◆あなたのIDは一時的に"    goto Return_ID_NG_1,
  97.         "登録内容の確認作業中"        goto Return_ID_NG_2,
  98.         "登録内容の確認が終了以前に"    goto Return_ID_NG_3,
  99.         "定期保守"            goto Return_MENTE,
  100.         "◆只今の時間はご利用"        goto Return_MHA,
  101.         "◆二重ログイン"        goto Return_LOGIN,
  102.         "「CHN」"            goto Return_CARD_1,
  103.         "承認中のため"            goto Return_CARD_2,
  104.         "決済へのお手続き中"        goto Return_CARD_3,
  105.         "変更ご申請の"            goto Return_CARD_4,
  106.         "親IDの都合"            goto Return_CARD_5,
  107.         "Clear DTE"            goto Return_Failure_DTE,
  108.         "Clear PAD"            goto Return_Failure_PAD,
  109.         "Clear NC"            goto Return_Failure_NC,
  110.     until 80;
  111.     goto Wait_PASSWORD;
  112.  
  113. Enter_PSW:
  114.     input "正しいパスワードを入力して下さい" PWD EOFF 1200;
  115.     if PWD goto Wait_PASSWORD;
  116.     errexit "パスワード入力タイムアウト";
  117.  
  118. Return_Success:
  119.   show "FENICS" & ROAD & "に接続しました";
  120.   exit;
  121.  
  122. Return_Failure:
  123.   errexit "FENICS" & ROAD & "に接続できません";
  124.  
  125. Return_Failure_DTE:
  126.   errexit "ホストから着信が拒否されました。"
  127.       & WaitMsg;
  128.  
  129. Return_Failure_OCC:
  130.   errexit "ホストビジー(ホストの論理回線がすべて使用中です)";
  131.  
  132. Return_Failure_PAD:
  133.   errexit "ホストからの解放要求により通信を切断した。"
  134.           & WaitMsg;
  135.  
  136. Return_Failure_NA:
  137.   errexit "接続規制(当該ホストへの接続が禁止されています)";
  138.  
  139. Return_Failure_NP:
  140.   errexit "欠番(当該ホストのセンターアドレスは存在しません)";
  141.  
  142. Return_Failure_NC:
  143.   errexit "接続回線が一時的に込み合っていて、ご使用できません"
  144.           & WaitMsg;
  145. Return_Failure_DER:
  146.   errexit "接続不可(当該ホストは定期メンテナンス、あるいは障害中です)"
  147.           & WaitMsg;
  148. Return_Failure_RPE:
  149.   errexit "ホストの手順エラーによる切断(リモート手順誤り)"
  150.           & WaitMsg;
  151. Return_BUSY:
  152.   errexit "◆現在、サ－ビスは大変混雑しております... ◆";
  153.  
  154. Return_ID_NG_1:
  155.   errexit 
  156.   "◆あなたのIDは一時的にご利用頂けません。" &
  157.   "カスタマーサポートへご連絡ください◆" &
  158.   CR &
  159.   "  フリーダイヤル 0120-22-1200  (平日 9時～19時、土曜日 9時～17時45分)";
  160.  
  161. Return_ID_NG_2:
  162.   errexit 
  163.   "現在あなたがお使いの利用者ＩＤは、ご登録内容の確認作業中です。" &
  164.   CR &
  165.   "恐れ入りますが今暫くお待ちください。詳しくはフリーダイヤル0120-22-1200" &
  166.   "（メンバサービス部）までお問い合わせ下さい。";
  167.  
  168. Return_ID_NG_3:
  169.   errexit 
  170.   "現在あなたがお使いの利用者ＩＤは、ご登録内容の確認が終了以前に所定の" &
  171.   CR &
  172.   "無料使用権を使いきりましたので、一時的にご利用できなくなっております。" &
  173.   "恐れ入りますが、ご登録内容の確認が終了するまで、今暫くお待ちください。" &
  174.   "詳しくはフリーダイヤル0120-22-1200（メンバサービス部）までお問い合わせ下さい。";
  175.  
  176. Return_MENTE:
  177.   errexit 
  178.   "只今の時間、定期保守をしております。";
  179.  
  180. Return_MHA:
  181.   errexit "◆只今の時間はご利用になれません◆";
  182.  
  183. Return_LOGIN:
  184.   errexit "◆二重ログインです◆";
  185.  
  186. Return_CARD_1:
  187.   errexit
  188.   "NIFTY-Serve にご登録のクレジットカード番号が更新前の旧番号及び無効番" &
  189.   "号のため、ご利用不可との連絡をカード会社より受けております。そのため、" &
  190.   "お客様のIDは、現在サービスの利用を停止させていただいております。" &
  191.   CR &
  192.   "つきましては、再度ログインのうえ、Enter Connection IDにて「CHN」と入" &
  193.   "力して、決済方法の変更手続きを行ってください。";
  194.  
  195. Return_CARD_2:
  196.   errexit 
  197.   "お客様のIDは、クレジットカード承認中のため、サービスの利用を停止させ" &
  198.   "ていただいております。"&
  199.   CR &
  200.   "サービスがご利用可能となりますのは、カード承認後１～２日後となります" &
  201.   "ので、ご了承ください。";
  202.  
  203. Return_CARD_3:
  204.   errexit 
  205.   "お客様のIDは、預金口座自動振替決済へのお手続き中のため、サービスの利" &
  206.   "用を停止させていただいております。" &
  207.   CR &
  208.   "サービスがご利用可能となりますのは、所定の用紙によるお手続き完了後と" &
  209.   "なりますので、ご了承ください。";
  210.  
  211. Return_CARD_4:
  212.   errexit 
  213.   "NIFTY-Serve にご登録のクレジットカード番号が更新前の旧番号及び無効" &
  214.   "番号のため、ご利用不可との連絡をカード会社より受けております。その" &
  215.   "ため、お客様のIDは、現在サービスの利用を停止させていただいておりま" &
  216.   "す。" &
  217.   CR &
  218.   "サービスがご利用可となりますのは、変更ご申請の２～３日後となります" &
  219.   "ので、ご了承ください。";
  220.  
  221. Return_CARD_5:
  222.   errexit 
  223.   "お客様のIDは、親IDの都合により、現在サービスの利用を停止させていただ" &
  224.   "いております。";
  225.  
  226.