易語言有聲小說源碼

.版本 2

.子程序 _按鈕_生成_被單擊

.計(jì)次循環(huán)首 (到整數(shù) (編輯框_生成數(shù).內(nèi)容), )

? ? 列表框1.加入項(xiàng)目 (編輯框_前段.內(nèi)容 ＋ 編輯框_后段.內(nèi)容 ＋ “----” ＋ 編輯框_密碼.內(nèi)容, )

.計(jì)次循環(huán)尾 ()

.子程序 _按鈕_復(fù)制全部_被單擊

.局部變量 i, 整數(shù)型

.局部變量 列表框內(nèi)容, 文本型, , "100"

編輯框1.加入文本 (“”)

.計(jì)次循環(huán)首 (列表框1.取項(xiàng)目數(shù) (), i)

? ? 列表框內(nèi)容 [i] ＝ 列表框1.取項(xiàng)目文本 (i － 1)

.計(jì)次循環(huán)尾 ()

i ＝ 0

.計(jì)次循環(huán)首 (列表框1.取項(xiàng)目數(shù) (), i)

? ? 編輯框1.加入文本 (列表框內(nèi)容 [i] ＋ #換行符)

.計(jì)次循環(huán)尾 ()

置剪輯板文本 (編輯框1.內(nèi)容)

.子程序 _按鈕_復(fù)制_被單擊

編輯框1.加入文本 (“”)

編輯框1.加入文本 (列表框1.取項(xiàng)目文本 (列表框1.現(xiàn)行選中項(xiàng)) ＋ #換行符)

置剪輯板文本 (編輯框1.內(nèi)容)

.子程序 _列表框1_鼠標(biāo)右鍵被按下, 邏輯型

.參數(shù) 橫向位置, 整數(shù)型

.參數(shù) 縱向位置, 整數(shù)型

.參數(shù) 功能鍵狀態(tài), 整數(shù)型

彈出菜單 (菜單, , )

.子程序 _復(fù)制全部_被選擇

_按鈕_復(fù)制全部_被單擊 ()

.子程序 _復(fù)制_被選擇

_按鈕_復(fù)制_被單擊 ()

.版本 2

.程序集 窗口程序集_啟動(dòng)窗口

.程序集變量 問題, 文本型, , "3"

.程序集變量 答案, 文本型, , "3"

.程序集變量 計(jì)次, 整數(shù)型

.子程序 __啟動(dòng)窗口_創(chuàng)建完畢

編輯框1.是否允許多行 ＝ 真

編輯框1.邊框 ＝ 5

編輯框1.禁止 ＝ 真

問題 [1] ＝ “這么簡(jiǎn)單的問題，居然回答不出來。還說自己不傻。我從新問你吧！” ＋ #換行符 ＋ “那個(gè)被稱之為金色閃光的四代火影，名字叫什么??？”

問題 [2] ＝ “在《火影忍者》里誰的體內(nèi)封印了九尾，從小被大家嘲笑為吊車尾，長(zhǎng)大之后成為了7代火影。他的名字叫什么?。俊?/p>

問題 [3] ＝ “聽說七代火影和四代火影的關(guān)系很不一般，請(qǐng)問七代火影稱呼四代火影什么啊？”

答案 ＝ { “波風(fēng)水門”, “漩渦鳴人”, “爸爸 ” }

編輯框1.內(nèi)容 ＝ “在《火影忍者》里被稱為 金色閃光 的人物，他的名字叫什么？”

計(jì)次 ＝ 1

.子程序 _按鈕1_被單擊

.判斷開始 (計(jì)次 ＝ 1)

.如果 (編輯框2.內(nèi)容 ＝ 答案 [1])

編輯框1.內(nèi)容 ＝ 問題 [2]

計(jì)次 ＝ 2

.否則

計(jì)次 ＝ 1

.如果結(jié)束

.判斷 (計(jì)次 ＝ 2)

.如果 (編輯框2.內(nèi)容 ＝ 答案 [2])

編輯框1.內(nèi)容 ＝ 問題 [3]

計(jì)次 ＝ 3

.否則

計(jì)次 ＝ 1

.如果結(jié)束

.判斷 (計(jì)次 ＝ 3)

.如果 (編輯框2.內(nèi)容 ＝ 答案 [3])

編輯框1.內(nèi)容 ＝ “兒子乖！爸爸愛你”

計(jì)次 ＝ 4

.否則

計(jì)次 ＝ 1

.如果結(jié)束

.默認(rèn)

.判斷結(jié)束

.如果真 (計(jì)次 ＝ 1)

編輯框1.內(nèi)容 ＝ 問題 [1]

.如果真結(jié)束

.版本 2

.程序集 窗口程序集_啟動(dòng)窗口

.子程序答姿昌 _選擇框1_被單擊

.如果 (選擇框1.選中冊(cè)橋 ＝ 真清扒)

文件.標(biāo)題 ＝ “File”

打開.標(biāo)題 ＝ “Open”

關(guān)閉.標(biāo)題 ＝ “Close”

退出.標(biāo)題 ＝ “Exit”

.否則

文件.標(biāo)題 ＝ “文件”

打開.標(biāo)題 ＝ “打開”

關(guān)閉.標(biāo)題 ＝ “關(guān)閉”

退出.標(biāo)題 ＝ “退出”