コンテンツにスキップ

モジュール:サンドボックス/なノな15どバと/test

リンクを追加
モジュールの解説[作成]
このScribuntoモジュールの解説ページを作成することができます。
編集者は、このモジュールをサンドボックス (作成 | 複製)とテストケース (作成)で試すことができます。（解説）
/docのサブページにカテゴリを追加してください。 このモジュールのサブページ一覧。
local p = {}

function p.main(kekka)

    local rekekka = "== 診断テスト ==\n;使用頻度\n# 使用…"
    kekka = tonumber(kekka.args[1])

    mon = 3
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週は週3~4日程度で、ウィキペディアを使った。（3点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end

    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週は毎日、ウィキペディアを使った。（5点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先月は毎日、ウィキペディアを使った。（さらに15点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "半年間毎日、ウィキペディアを使った。（さらに50点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日も休まず[[Help:ページの編集|編集]]した。（10点）"
        rekekka = rekekka .. "\n# 編集…\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n# 編集…\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先月、1日も休まず編集した。（さらに20点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり5回以上編集した。（5点）"
        rekekka = rekekka .. "\n# 平均編集回数…\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n# 平均編集回数…\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり10回以上編集した。（さらに5点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり20回以上編集した。（さらに10点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり50回以上編集した。（さらに30点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり100回以上編集した。（さらに50点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり200回以上編集した。（さらに80点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日あたり300回以上編集した。（さらに100点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日で20回以上編集した日がある。（10点）"
        rekekka = rekekka .. "\n# 最大編集回数…\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n# 最大編集回数…\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日で50回以上編集した日がある。（さらに15点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日で100回以上編集した日がある。（さらに25点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日で200回以上編集した日がある。（さらに50点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、1日で300回以上編集した日がある。（さらに80点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "現在、[[Wikipedia:編集回数の多いウィキペディアンの一覧|編集回数の多いウィキペディアンの一覧]]に名前が載っている。（50点）"
        rekekka = rekekka .. "\n# '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n# " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "現在、[[Wikipedia:編集回数の多いウィキペディアンの一覧|編集回数の多いウィキペディアンの一覧]]の[[Wikipedia:編集回数の多いウィキペディアンの一覧#記事名前空間|記事名前空間]]、[[Wikipedia:編集回数の多いウィキペディアンの一覧#全名前空間|全名前空間]]の両方に名前が載っている。（さらに50点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、ウィキペディアやそれに関する作業がネットの利用時間の半分以上を占めた。（10点）"
        rekekka = rekekka .. "\n# ネット利用の中のウィキペディア…\n## 利用時間の割合…\n### '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n# ネット利用の中のウィキペディア…\n## 利用時間の割合…\n### " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、ウィキペディアやそれに関する作業がネットの利用時間の4分の3以上を占めた。（さらに15点）"
        rekekka = rekekka .. "\n### '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n### " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、ネットの利用時間のすべてがウィキペディアやそれに関する作業だった。(さらに50点)"
        rekekka = rekekka .. "\n### '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n### " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、ウィキペディアに関係しない作業にサイトを利用しなかった。（さらに25点）"
        rekekka = rekekka .. "\n### '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n### " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、ウィキペディアを使いすぎて、[[スマホ]]などの[[バッテリー]]が切れた。（50点）"
        rekekka = rekekka .. "\n### '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n### " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "ウィキペディアを使いすぎて友人との約束を忘れたことがある。(さらに50点)"
        rekekka = rekekka .. "\n### '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n### " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "現在、[[ワイヤレス通信]]でウィキペディアを利用している。（2点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、[[Wikipedia:曖昧さ回避|曖昧さ回避ページ]]や[[Help:テンプレート|テンプレート]]を編集した。（5点）"
        rekekka = rekekka .. "\n;編集の種類\n# '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n;編集の種類\n# " .. toi
        mon = mon + 1
    end
    --------------------------------------------------------------------------
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、不適切な記事名は見つけ次第移動させている。（5点）"
        rekekka = rekekka .. "\n# 雑草取り関連…\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n# 雑草取り関連…\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、読み仮名がない記事は、見つけ次第読み仮名をつけている。（5点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "記事名部分が太字化されていない記事は、太字化している。（3点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、[[カテゴリ]]がない記事やスタブカテゴリのみの記事は見つけ次第カテゴライズしている。（5点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、[[Wikipedia:同じ記事への連続投稿を減らす|同じ記事へ連続投稿]]している利用者を見つけ次第、その利用者の[[Wikipedia:利用者ページ#会話ページでできること|会話ページ]]に「[[Help:プレビューを表示|プレビュー機能]]のお知らせ」を書いている。（5点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、利用者ページの[[Wikipedia:サブページ|サブページ]]を作成・編集した。（10点）"
        rekekka = rekekka .. "\n;利用者ページ\n# 利用者サブページ…\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n;利用者ページ\n# 利用者サブページ…\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、利用者ページのサブページを10回以上作成・編集した。（さらに20点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、利用者ページのサブページを20回以上作成・編集した。（さらに40点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "最近、利用者ページのサブページを30回以上作成・編集した。（さらに60点）"
        rekekka = rekekka .. "\n## '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n## " .. toi
        mon = mon + 1
    end
    if (tonumber(string.sub(kekka, mon, mon)) > 0) then
        toi = "先週、記事にコメントをしたり、記事に関する議論の拡大をしたりといったことをした。（2点）"
        rekekka = rekekka .. "\n;議論や依頼\n# '''" .. toi .. "'''"
        mon = mon + 1
    else
        rekekka = rekekka .. "\n;議論や依頼\n# " .. toi
        mon = mon + 1
    end

    
    return rekekka
end
return p
--Wikipedia:あなたはウィキペディア中毒でしょうかテスト　2024年4月4日 (木) 19:50の版をもとに作成。
「https://ja.wikipedia.org/w/index.php?title=モジュール:サンドボックス/なノな15どバと/test&oldid=100651923」から取得