忍びいろは暗号（字数四十九）の暗号化と復号化

忍びいろは暗号をつくります。（画像：Motokoka - 投稿者自身による著作物, Shinobi no sato PLALA, Koka city, CC 表示-継承 4.0, https://commons.wikimedia.org/w/index.php?curid=80502285による）

文法命令一覧

エディタ

プログラム

# ひらがなと漢字の変換表
平文一覧＝[
「あ」「い」「う」「え」「お」
「か」「き」「く」「け」「こ」
「さ」「し」「す」「せ」「そ」
「た」「ち」「つ」「て」「と」
「な」「に」「ぬ」「ね」「の」
「は」「ひ」「ふ」「へ」「ほ」
「ま」「み」「む」「め」「も」
「や」「ゐ」「ゆ」「ゑ」「よ」
「ら」「り」「る」「れ」「ろ」
「わ」「を」「ん」「、」
]

漢字一覧＝[
「𣘸」「栬」「𡋽」「伯」「𪜻」
「𲄤」「𱗻」「𲄠」「𡊚」「泊」
「㷵」「𨊂」「𬈶」「𲇡」「鐄」
「熿」「棈」「潢」「𲄜」「𨉆」
「𨊇」「銫」「埥」「僙」「浾」
「𱖥」「𱬒」「鉑」「𠈜」「𣴊」
「𤇢」「𠎁」「焃」「潶」「𱗺」
「柏」「䤲」「𨭆」「橴」「橫」
「𪲒」「𭴼」「錆」「墴」「𰞑」
「倩」「淸」「𱏑」「𲄬」
]

# 対応辞書を作成
対応辞書＝{}
逆対応辞書＝{}

Nを0から(平文一覧の要素数-1)まで繰り返す
    P＝平文一覧[N]
    C＝漢字一覧[N]
    対応辞書[P]＝C
    逆対応辞書[C]＝P
ここまで

# 濁音・半濁音・小文字を清音にする
●(Sの)入力清音化処理とは
    S＝Sを平仮名変換
    Sの「ー」を「」に置換してSに代入

清音対照表＝「がかぎきぐくげけごこざさじしずすぜせぞそだたぢちづつでてどとばはびひぶふべへぼほぱはぴひぷふぺへぽほっつゃやゅゆょよぁあぃいぅうぇえぉおゔうゕかゖけ」を文字列分解

Kを0から(清音対照表の要素数/2-1)まで繰り返す
        Sの清音対照表[K*2]を清音対照表[K*2+1]に置換してSに代入
    ここまで

Sを戻す
ここまで

# 暗号作成
●(Sの)独自暗号化処理とは
    S＝Sの入力清音化処理
    文字配列＝Sを文字列分解
    結果＝「」

Nを0から(文字配列の要素数-1)まで繰り返す
        C＝文字配列[N]

もし(対応辞書にCが辞書キー存在)ならば
            結果＝結果＆対応辞書[C]
        ここまで
    ここまで

結果を戻す
ここまで

# 暗号解読
●(Sの)独自復号化処理とは
    文字配列＝Sを文字列分解
    答え＝「」

Nを0から(文字配列の要素数-1)まで繰り返す
        C＝文字配列[N]

もし(逆対応辞書にCが辞書キー存在)ならば
            答え＝答え＆逆対応辞書[C]
        ここまで
    ここまで

答えを戻す
ここまで

# UIを作成
T平文＝「」のテキストエリア作成
改行作成

暗号ボタン＝「漢字暗号作成↓」のボタン作成
複号ボタン＝「↑漢字暗号複号」のボタン作成
改行作成

T暗号＝「」のテキストエリア作成
改行作成

# イベントを指定
暗号ボタンをクリックした時には
    A＝T平文のテキスト取得
    A＝Aの独自暗号化処理
    AをT暗号にテキスト設定
ここまで

複号ボタンをクリックした時には
    S＝T暗号のテキスト取得
    S＝Sの独自復号化処理
    SをT平文にテキスト設定
ここまで

実行結果

保存

プログラムを保存

表示ページ

直前に実行または一時保存した内容を復元

実行環境

なでしこバージョン

素材

画像・音声・データ

ログインすると素材をアップロードできます。

🍯 プログラム貯蔵庫

プログラム

プログラムを保存

なでしこバージョン

画像・音声・データ