ひまわりユーザー プログラム掲示板 バックアップ
注意
ひまわりのススメ  □ ひまわり本家Home  □ 新着記事  □ 新規投稿  □ SEARCH  □ 参考プログラム集
ツリー表示

MESSAGE 2002年年賀状あたりチェック /くまこ (02/01/23(Wed) 12:52) [290]


親記事 / 返信無し
NO.290  2002年年賀状あたりチェック
□投稿者/ くまこ -(2002/01/23(Wed) 12:52:39)
□U R L/
自分のために、こんなものを作ってみました。
よければ使ってくださいませ。

{---プログラム掲示板投稿フォーム---
【ソフト名】2002年年賀状あたりチェック (バージョン 1.00)
【作 成 者】くまこ(連絡先:kumako@eiri.com)
【種  別】フリーソフトウェア
【ひまわりのバージョン】ver.1.12
【転  件】可(転載条件:作者にメールで連絡すること)
【ひまわり本体への梱包】可
【実行時に利用作成するファイル】無
【コメント】ことしの年賀状のあたりをチェックするツールです。
---投稿フォームここまで---}

{1等 液晶TV、ノートPC、カーナビ、電動自転車、高画素デジカメ
284482, 706000
2等 電子辞書、携帯液晶TV、デジカメ、DVDプレーヤー、万年筆、ふるさと小包6個
03555
3等 ふるさと小包
4551, 6394
4等 切手シート
43, 54, 58 }
母艦の、幅は、120。
母艦の、高さは、40。
「あたりチェキ」と、表示。
*4等チェック
「下二桁は?」と、尋ねる。
結果は、「はずれ」。
下二桁は、それ。
下二桁を、「43|54|58」で、正規表現マッチ。
もし、それが、「」でなければ、(
   「4等があたりです」と、言う。
   結果は、「あたり」。
)
'3等チェック
下二桁を、「51|94」で、正規表現マッチ。
もし、それが、「」でなければ、(
   「3等があたりかもしれません。下四桁は?」と、尋ねる。
   下四桁は、それ。
   下四桁を、「4551|6394」で、正規表現マッチ。
   もし、それが、「」でなければ、(
      「3等があたりです」と、言う。
      結果は、「あたり」。
   )
)
'2等チェック
下二桁を、「55」で、正規表現マッチ。
もし、それが、「」でなければ、(
   「2等があたりかもしれません。下五桁は?」と、尋ねる。
   下五桁は、それ。
   下五桁を、「03555」で、正規表現マッチ。
   もし、それが、「」でなければ、、(
      「2等があたりです」と、言う。
      結果は、「あたり」。
   )
)
'1等チェック
下二桁を、「82|00」で、正規表現マッチ。
もし、それが、「」でなければ、(
   「1等があたりかもしれません。下六桁は?」と、尋ねる。
   下六桁は、それ。
   下六桁を、「284482|706000」で、正規表現マッチ。
   もし、それが、「」でなければ、、(
      「1等があたりです」と、言う。
      結果は、「あたり」。
   )
)
もし、結果が、「はずれ」ならば、
「残念。はずれです。」と、言う。

「続ける\n終わる」の、ボタンで選択。
もし、それが、「続ける」ならば、4等チェックへ、飛ぶ。
違えば、終了ラベルへ、飛ぶ。

*終了ラベル
終わる。



- Child Tree -