全局變量表
1
2
3
|
.版本 2 .全局變量 源文件, 文本型 .全局變量 答案, 文本型 |
常量數據表
1
2
3
4
5
|
.版本 2 .常量 常量1, "<文本長度: 9>", , -middle"> .常量 常量2, "<文本長度: 7>", , </ span > .常量 常量3, "<文本長度: 7>", , proof"> .常量 常量4, "<文本長度: 7>", , </ div > |
驗證
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
.版本 2 .支持庫 HtmlView .支持庫 spec .程序集 窗口程序集_窗口1 .程序集變量 論證, 文本型 .子程序 _窗口1_創建完畢 標題 = 答案 論證 = “< div >< h2 >< strong >” + 答案 + “< br >< br >論證:</ p ></ strong ></ h2 >” + 文本_取出中間文本 (源文件, “論證</ p >”, “參考資料”) 寫到文件 (取運行目錄 () + “\lz.html”, 到字節集 (論證)) 超文本瀏覽框1.地址 = 取運行目錄 () + “\lz.html” .子程序 文本_取出中間文本, 文本型, 公開, 比如:欲取全文本為“12345”,現在要取出“3”,< 3 >的前面為“2”,< 3 >的后面為“4”。 .參數 欲取全文本, 文本型, , 比如:欲取全文本為 12345 .參數 前面文本, 文本型, , 3的前面為“2”,引號直接用 #引號,如:"< font color=#引號red#引號>" .參數 后面文本, 文本型, , 3的后面為“4”,引號直接用 #引號,如:"< font color=#引號red#引號>" .參數 起始搜尋位置, 整數型, 可空, 可空。1為首位置,2為第2個位置,如此類推,如果被省略,則“尋找字節集”命令默認從首部開始,“倒找字節集”命令默認從尾部開始。 .參數 是否區分大小寫, 邏輯型, 可空, 可空。初始值為“假”。假 = 不區分 真 = 區分大小寫。 .局部變量 局_位置, 整數型 .局部變量 局_位置1, 整數型 .局部變量 局_前面文本, 文本型 .局部變量 局_后面文本, 文本型 局_前面文本 = 子文本替換 (前面文本, “#引號”, #引號, , , 真) 局_后面文本 = 子文本替換 (后面文本, “#引號”, #引號, , , 真) 是否區分大小寫 = 取反 (是否區分大小寫) 局_位置 = 尋找文本 (欲取全文本, 局_前面文本, 起始搜尋位置, 是否區分大小寫) .如果真 (局_位置 ≠ -1) 局_位置 = 局_位置 + 取文本長度 (局_前面文本) .如果真結束 局_位置1 = 尋找文本 (欲取全文本, 局_后面文本, 局_位置, 是否區分大小寫) .如果真 (局_位置 = -1 或 局_位置1 = -1) 返回 (“”) .如果真結束 返回 (取文本中間 (欲取全文本, 局_位置, 局_位置1 - 局_位置)) .子程序 _窗口1_首次激活 .如果真 (答案 = “你答錯了!這是真的!”) 圖形按鈕1.正常圖片 = #圖片1 .如果真結束 .如果真 (答案 = “你答錯了!這是假的!”) 圖形按鈕1.正常圖片 = #圖片2 .如果真結束 .如果真 (答案 = “這個問題還有待考證。”) 圖形按鈕1.正常圖片 = #圖片3 .如果真結束 圖形按鈕1.可視 = 真 延遲 (3000) 圖形按鈕1.可視 = 假 |
百度真相問答機
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
.版本 2 .支持庫 EThread .支持庫 internet .支持庫 HtmlView .程序集 窗口程序集_啟動窗口 .程序集變量 正確 .程序集變量 錯誤 .子程序 _問題按鈕_被單擊 啟動線程 (&子程序1, , ) .子程序 __啟動窗口_創建完畢 _問題按鈕_被單擊 () .子程序 子程序1 真按鈕.禁止 = 真 假按鈕.禁止 = 真 置隨機數種子 () 編輯框2.內容 = “http://zhidao.baidu.com/liuyan/detail?id=” + 到文本 (取隨機數 (3100, 5900)) 編輯框1.內容 = 到文本 (HTTP讀文件 (編輯框2.內容)) 源文件 = 編輯框1.內容 編輯框3.內容 = 文本_取出中間文本 (編輯框1.內容, “status: '”, “'”) .如果真 (文本_取出中間文本 (源文件, “論證</ p >”, “參考資料”) = “”) _問題按鈕_被單擊 () 返回 () .如果真結束 .如果真 (編輯框3.內容 = “”) _問題按鈕_被單擊 () 返回 () .如果真結束 寫到文件 (取運行目錄 () + “\wt.html”, 到字節集 (文本_取出中間文本 (編輯框1.內容, #常量1, #常量2) + “< br > < br >” + 文本_取出中間文本 (編輯框1.內容, #常量3, #常量4))) 超文本瀏覽框1.地址 = 取運行目錄 () + “\wt.html” _啟動窗口.真按鈕.禁止 = 假 _啟動窗口.假按鈕.禁止 = 假 標題 = “知道真相問答機 ” + “正確:” + 到文本 (正確) + “ 錯誤:” + 到文本 (錯誤) .子程序 _真按鈕_被單擊 .如果真 (編輯框3.內容 = “1”) 正確 = 正確 + 1 _問題按鈕_被單擊 () .如果真結束 .如果真 (編輯框3.內容 = “2”) 錯誤 = 錯誤 + 1 答案 = “你答錯了!這是假的!” 載入 (窗口1, , 真) _問題按鈕_被單擊 () .如果真結束 .如果真 (編輯框3.內容 = “3”) 答案 = “這個問題還有待考證。” 載入 (窗口1, , 真) _問題按鈕_被單擊 () .如果真結束 標題 = “知道真相問答機 ” + “正確:” + 到文本 (正確) + “ 錯誤:” + 到文本 (錯誤) .子程序 _假按鈕_被單擊 .如果真 (編輯框3.內容 = “1”) 答案 = “你答錯了!這是真的!” 錯誤 = 錯誤 + 1 載入 (窗口1, , 真) _問題按鈕_被單擊 () .如果真結束 .如果真 (編輯框3.內容 = “2”) 正確 = 正確 + 1 _問題按鈕_被單擊 () .如果真結束 .如果真 (編輯框3.內容 = “3”) 答案 = “這個問題還有待考證。” 載入 (窗口1, , 真) _問題按鈕_被單擊 () .如果真結束 標題 = “知道真相問答機 ” + “正確:” + 到文本 (正確) + “ 錯誤:” + 到文本 (錯誤) |
運行結果:
總結
以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接