完全ランダム俳句ジェネレータ

ソース

プログラム

# 制限モード対応・ボタン表示版

●(A,B)乱数範囲とは
    幅=B-A+1。
    (乱数(幅)+A)を戻す。
ここまで。

●(配列)ランダム要素とは
    I=乱数(配列の要素数)。
    配列[I]を戻す。
ここまで。

●(配列,長さ)行作成とは
    行=""。
    Nを1から長さまで繰り返す
        行=行&ランダム要素(配列)。
    ここまで。
    行を戻す。
ここまで。

トークン=[
"あ","い","う","え","お",
"か","き","く","け","こ",
"さ","し","す","せ","そ",
"た","ち","つ","て","と",
"な","に","ぬ","ね","の",
"は","ひ","ふ","へ","ほ",
"ま","み","む","め","も",
"や","ゆ","よ",
"ら","り","る","れ","ろ",
"わ","を","ん",
"ゐ","ゑ",
"が","ぎ","ぐ","げ","ご",
"ざ","じ","ず","ぜ","ぞ",
"だ","ぢ","づ","で","ど",
"ば","び","ぶ","べ","ぼ",
"ぱ","ぴ","ぷ","ぺ","ぽ",
"きゃ","きゅ","きょ",
"しゃ","しゅ","しょ",
"ちゃ","ちゅ","ちょ",
"にゃ","にゅ","にょ",
"ひゃ","ひゅ","ひょ",
"みゃ","みゅ","みょ",
"りゃ","りゅ","りょ",
"ぎゃ","ぎゅ","ぎょ",
"じゃ","じゅ","じょ",
"びゃ","びゅ","びょ",
"ぴゃ","ぴゅ","ぴょ",
"くゎ","くぃ","くぅ","くぇ","くぉ",
"ふぁ","ふぃ","ふぇ","ふぉ",
"てぃ","でぃ","とぅ","どぅ",
"つぁ","つぃ","つぇ","つぉ",
"うぃ","うぇ","うぉ",
"ちぇ","しぇ","じぇ"
]。

●俳句生成とは
    一行目長さ=乱数範囲(4,6)。
    二行目長さ=乱数範囲(6,8)。
    三行目長さ=乱数範囲(4,6)。

    一行目=行作成(トークン,一行目長さ)。
    二行目=行作成(トークン,二行目長さ)。
    三行目=行作成(トークン,三行目長さ)。

    改行を表示。
    "----------------"を表示。
    一行目を表示。
    二行目を表示。
    三行目を表示。
ここまで。

# 疑似ボタン方式
永遠に繰り返す
    俳句生成。
    改行を表示。
    "再生成したいなら「1」を入力してください。"を表示。
    入力値=入力。
    もし 入力値≠"1"なら
        抜ける。
    ここまで。
ここまで。

作品について

作品情報

作品を編集

Karn1ya_ 作

ライセンス: 未指定（未指定/貯蔵庫のみ）
形式: wnako
タグ: -
利用バージョン: 3.7.15
アクセス数(累計): 1
アクセス数(今月): 1
更新日時: 2026/02/21 18:04 編集: 2026/02/22 16:24

作品公開情報

交流

完全ランダム俳句ジェネレータ

プログラム

作品情報

コメント