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

MESSAGE やっとできた「暗号化君」 /ライ (02/06/25(Tue) 21:21) [1003]
......MESSAGE Re[1]: エラーにより変更 /ライ (02/06/25(Tue) 21:37) [1004]
............MESSAGE Re[2]: エラーにより変更 /プレイヤー (02/06/26(Wed) 01:03) [1005]
..................MESSAGE Re[3]: エラーにより変更 /ライ (02/06/26(Wed) 18:36) [1006]


親記事 / ▼[ 1004 ]
NO.1003  やっとできた「暗号化君」
□投稿者/ ライ -(2002/06/25(Tue) 21:21:10)
□U R L/
{---プログラム掲示板投稿フォーム---
【ソフト名】暗号化君
【作 成 者】ライ (連絡先:xxx)
【種  別】フリーソフトウェア
【ひまわりのバージョン】ver.1.50
【転  載】可
【改変運用】可
【ひまわり本体への梱包】可
【実行時に利用作成するファイル】有:password_data.txt
【コメント】
質問掲示板で助けられながらも作る事に成功した、
暗号化文章編集ソフトです(?)
---投稿フォームここまで---}

*最初
母艦の、タイトルは「ログイン」
文字サイズ=10
「password_data.txt」が、存在するか
パスワード保管=それ
もし、それ=0ならば(「パスワードを決めてね」と、尋ねる
『password_data.txt』へ、暗号化して保存。
最初へ、飛ぶ)

パスワードに、『password_data.txt』を、暗号解除して読み込む。
「パスワードを入力してください」と、尋ねる
もし、それ=パスワードならば、(BEEP
文字サイズ=10
「パスワード認証に成功しました!」と、言う
メインへ、飛ぶ)
もし、それ=「」ならば、終わり。
違えば、(BEEP
文字サイズ=10
「ERROR:パスワードが一致しません。」と、言う
最初へ、飛ぶ)
待機。



*メイン
母艦浮上。
母艦のサイズは、(150,120,0,0)
母艦の、タイトルは、「暗号化君」
文字色=青色
センタリング
文字サイズ=20
「暗号化君」と、表示
文字サイズ=14
「このソフトは、重要な書類などを、
暗号化して、他人に見られないようにするソフトです。」と、表示

終わりメニューを、メニュー作成
その、テキストは、「終了」
その、イベントは、(
終わり)

暗号を、メモとして、作成
その、幅は、450
その、高さは、230

文字サイズ=11
(380,323)に、移動
暗号化保存するを、ボタンとして、作成
その、幅は、200
その、イベントは、暗号化保存処理

(380,353)に、移動
開くを、ボタンとして、作成
その、幅は、200
その、イベントは、暗号化開く処理

待機

*暗号化保存処理
元テキスト=暗号の、テキスト
「txt」の、
書込ファイル選択。
もし、それ=「」ならば、待機。
保存先=それ

「{元テキスト}」を、「{保存先}」へ、暗号化して保存
暗号=「」
戻る

*暗号化開く処理
「txt」の、読込ファイル選択。
もし、それ=「」ならば、待機。
解読=それ

「{解読}」を、暗号解除して読込。
暗号=それ




▲[ 1003 ] / ▼[ 1005 ]
NO.1004  Re[1]: エラーにより変更
□投稿者/ ライ -(2002/06/25(Tue) 21:37:01)
□U R L/
*最初
母艦の、タイトルは「SECRETログイン」
文字サイズ=10
『password_data.txt』が、存在するか
パスワード保管=それ
もし、それ=0ならば(『パスワードを決めてね』と、尋ねる
『password_data.txt』へ、暗号化して保存。
最初へ、飛ぶ)

パスワードに、『password_data.txt』を、暗号解除して読み込む。
『パスワードを入力してください』と、尋ねる
もし、それ=パスワードならば、(BEEP
文字サイズ=10
『パスワード認証に成功しました!』と、言う
メインへ、飛ぶ)
もし、それ=「」ならば、終わり。
違えば、(BEEP
文字サイズ=10
『ERROR:パスワードが一致しません。』と、言う
最初へ、飛ぶ)
待機。



*メイン
母艦浮上。
母艦のサイズは、(150,120,0,0)
母艦の、タイトルは、『SECRET』
文字色=青色
センタリング
文字サイズ=20
『SECRET』と、表示
文字サイズ=14
『このソフトは、重要な書類などを、
暗号化して、他人に見られないようにするソフトです。』と、表示

終わりメニューを、メニュー作成
その、テキストは、『終了』
その、イベントは、(
終わり)

暗号を、メモとして、作成
その、幅は、450
その、高さは、230

文字サイズ=11
(380,323)に、移動
暗号化保存するを、ボタンとして、作成
その、幅は、200
その、イベントは、暗号化保存処理

(380,353)に、移動
開くを、ボタンとして、作成
その、幅は、200
その、イベントは、暗号化開く処理

待機

*暗号化保存処理
元テキスト=暗号の、テキスト
『txt』の、
書込ファイル選択。
もし、それ=『』ならば、待機。
保存先=それ

『{元テキスト}』を、『{保存先}』へ、暗号化して保存
暗号=『』
戻る

*暗号化開く処理
『txt』の、読込ファイル選択。
もし、それ=『』ならば、待機。
解読=それ

『{解読}』を、暗号解除して読込。
暗号=それ



▲[ 1004 ] / ▼[ 1006 ]
NO.1005  Re[2]: エラーにより変更
□投稿者/ プレイヤー -(2002/06/26(Wed) 01:03:43)
□U R L/
暗号化した後、保存や読込をする時、『{解読}』等となっていますが、
『』だと、"{解読}"という変数を展開しません。
変数を展開したい場合は、「」を使ってください。

参考までに…http://www.text2music.com/hima/doc/faq/grammar.htm#5


後、ファイルを読み込む時、「暗号解除して読込」しか使われていないため、
暗号化されていないファイルを読み込もうとすると、エラーが出ます。
「エラー処理設定」を使って、エラーが出るか(暗号化されているか)を調べて、
もし、エラーがあったら(暗号化されていなければ)メッセージボックスを出す(等の処理)、
ということをしてやればいいと思います。

ファイル名だけでは、暗号化されているかわかりませんからね…。



▲[ 1005 ] / 返信無し
NO.1006  Re[3]: エラーにより変更
□投稿者/ ライ -(2002/06/26(Wed) 18:36:10)
□U R L/
アドバイスありがとうございます。
訂正しておきます。



- Child Tree -