易語言使用動(dòng)畫框做消除游戲的代碼
更新時(shí)間：2018年12月03日 10:58:44 作者：易語言源碼教程
今天小編就為大家分享一篇關(guān)于易語言使用動(dòng)畫框做消除游戲的代碼，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧
全局變量表
.版本 2 .全局變量 得分總和, 整數(shù)型 .全局變量 最高得分, 整數(shù)型 .全局變量 關(guān)卡, 整數(shù)型
利用動(dòng)畫框做的一個(gè)消除游戲
.版本 2
.支持庫 iext2
.支持庫 iext
.程序集 窗口程序集1
.程序集變量 標(biāo)識(shí)1, 整數(shù)型, , "100"
.程序集變量 角度, 整數(shù)型
.程序集變量 是否開始, 邏輯型
.子程序 初始化
.局部變量 a, 整數(shù)型
.局部變量 b, 整數(shù)型
.局部變量 C, 整數(shù)型
.局部變量 d, 整數(shù)型
置隨機(jī)數(shù)種子 ()
d ＝ 1
.計(jì)次循環(huán)首 (10, a)
.計(jì)次循環(huán)首 (10, b)
C ＝ 取隨機(jī)數(shù) (1, 5)
標(biāo)識(shí)1 [d] ＝ 動(dòng)畫框1.創(chuàng)建物體 (方塊1, (b － 1) × 40, (a － 1) × 40, , )
動(dòng)畫框1.置類型 (標(biāo)識(shí)1 [d], d)
動(dòng)畫框1.置圖片 (標(biāo)識(shí)1 [d], 取圖片組圖片 (#圖片組1, C － 1, ), )
動(dòng)畫框1.置附加文本 (標(biāo)識(shí)1 [d], 到文本 (C － 1))
動(dòng)畫框1.置角度 (標(biāo)識(shí)1 [d], 180)
動(dòng)畫框1.自動(dòng)前進(jìn) (標(biāo)識(shí)1 [d], 5, 1, , , , , , , )
d ＝ d ＋ 1
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
.如果 (關(guān)卡 ＝ 1)
當(dāng)前關(guān)卡.標(biāo)題 ＝ “第” ＋ 到文本 (關(guān)卡) ＋ “關(guān)” ＋ “目標(biāo)：” ＋ “1000”
.否則
.如果 (關(guān)卡 ＝ 2)
當(dāng)前關(guān)卡.標(biāo)題 ＝ “第” ＋ 到文本 (關(guān)卡) ＋ “關(guān)” ＋ “目標(biāo)：” ＋ “3000”
.否則
.如果 (關(guān)卡 ≥ 3 且 關(guān)卡 ＜ 10)
當(dāng)前關(guān)卡.標(biāo)題 ＝ “第” ＋ 到文本 (關(guān)卡) ＋ “關(guān)” ＋ “目標(biāo)：” ＋ 到文本 ((關(guān)卡 － 1) × 3000)
.否則
當(dāng)前關(guān)卡.標(biāo)題 ＝ “第” ＋ 到文本 (關(guān)卡) ＋ “關(guān)” ＋ “目標(biāo)：” ＋ 到文本 ((關(guān)卡 － 1) × 4000)
.如果結(jié)束
.如果結(jié)束
.如果結(jié)束
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
關(guān)卡 ＝ 1
初始化 ()
.如果真 (尋找文件 (取運(yùn)行目錄 () ＋ “\win.ini”, ) ＝ “”)
寫配置項(xiàng) (取運(yùn)行目錄 () ＋ “\win.ini”, “userdata”, “最高得分”, 到文本 (最高得分))
.如果真結(jié)束
最高得分 ＝ 到整數(shù) (讀配置項(xiàng) (取運(yùn)行目錄 () ＋ “\win.ini”, “userdata”, “最高得分”, ))
最高得分1.標(biāo)題 ＝ “最高得分：” ＋ 到文本 (最高得分)
.子程序 _動(dòng)畫框1_碰撞到邊界, 邏輯型
.參數(shù) 物體標(biāo)識(shí)值, 整數(shù)型
.參數(shù) 碰撞前橫坐標(biāo), 整數(shù)型
.參數(shù) 碰撞前縱坐標(biāo), 整數(shù)型
.參數(shù) 邊界類型, 整數(shù)型
.如果 (邊界類型 ＝ 8 且 邊界類型 ＝ 1)
動(dòng)畫框1.置物體位置 (物體標(biāo)識(shí)值, 碰撞前橫坐標(biāo), 碰撞前縱坐標(biāo), 真)
動(dòng)畫框1.停止自動(dòng)前進(jìn) (物體標(biāo)識(shí)值)
.否則
.如果 (邊界類型 ＝ 8 且 動(dòng)畫框1.取角度 (物體標(biāo)識(shí)值) ＝ 180)
動(dòng)畫框1.置物體位置 (物體標(biāo)識(shí)值, 碰撞前橫坐標(biāo), 碰撞前縱坐標(biāo), 真)
動(dòng)畫框1.停止自動(dòng)前進(jìn) (物體標(biāo)識(shí)值)
.否則
.如果結(jié)束
.如果結(jié)束
.子程序 _動(dòng)畫框1_碰撞到物體
.參數(shù) 碰撞物體標(biāo)識(shí)值, 整數(shù)型
.參數(shù) 碰撞前橫坐標(biāo), 整數(shù)型
.參數(shù) 碰撞前縱坐標(biāo), 整數(shù)型
.參數(shù) 被碰撞物體標(biāo)識(shí)值, 整數(shù)型
動(dòng)畫框1.置物體位置 (碰撞物體標(biāo)識(shí)值, 碰撞前橫坐標(biāo), 碰撞前縱坐標(biāo), 真)
.子程序 _動(dòng)畫框1_雙擊物體
.參數(shù) 物體標(biāo)識(shí)值, 整數(shù)型
.局部變量 連定, 整數(shù)型, , "5"
.局部變量 計(jì)數(shù), 整數(shù)型
.局部變量 計(jì)次, 整數(shù)型
.局部變量 計(jì)次1, 整數(shù)型
.局部變量 計(jì)次2, 整數(shù)型
.局部變量 計(jì)次3, 整數(shù)型
.局部變量 計(jì)次4, 整數(shù)型
.局部變量 A, 整數(shù)型
.局部變量 B, 整數(shù)型
.局部變量 有無, 邏輯型
.局部變量 確定相連, 整數(shù)型, , "100"
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 有沒, 邏輯型
.局部變量 定位1, 整數(shù)型
.局部變量 剩余, 整數(shù)型
計(jì)數(shù) ＝ 1
.如果真 (物體標(biāo)識(shí)值 ≤ 0)
返回 ()
.如果真結(jié)束
連定 [1] ＝ 物體標(biāo)識(shí)值
確定相連 [計(jì)數(shù)] ＝ 連定 [1]
連定 [2] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) － 40) ' 上
.如果真 (連定 [2] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [2]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [2]
.如果真結(jié)束
.如果真結(jié)束
連定 [3] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) ＋ 40) ' 下
.如果真 (連定 [3] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [3]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [3]
.如果真結(jié)束
.如果真結(jié)束
連定 [4] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) － 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 左
.如果真 (連定 [4] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [4]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [4]
.如果真結(jié)束
.如果真結(jié)束
連定 [5] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) ＋ 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 右
.如果真 (連定 [5] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [5]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [5]
.如果真結(jié)束
.如果真結(jié)束
.如果真 (動(dòng)畫框1.取附加文本 (連定 [2]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]) 且 動(dòng)畫框1.取附加文本 (連定 [3]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]) 且 動(dòng)畫框1.取附加文本 (連定 [4]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]) 且 動(dòng)畫框1.取附加文本 (連定 [5]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]))
返回 ()
.如果真結(jié)束
.計(jì)次循環(huán)首 (計(jì)數(shù) ＋ 20, 計(jì)次)
.如果真 (確定相連 [計(jì)次 ＋ 1] ＝ 0 或 計(jì)次 ＋ 1 ＞ 計(jì)數(shù))
跳出循環(huán) ()
.如果真結(jié)束
連定 [1] ＝ 確定相連 [計(jì)次 ＋ 1]
.如果真 (有無 ＝ 真)
有無 ＝ 假
.如果真結(jié)束
連定 [2] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) － 40) ' 上
.如果真 (連定 [2] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [2]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [2] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [2]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
連定 [3] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) ＋ 40) ' 下
.如果真 (連定 [3] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [3]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [3] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [3]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
連定 [4] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) － 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 左
.如果真 (連定 [4] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [4]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [4] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [4]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
連定 [5] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) ＋ 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 右
.如果真 (連定 [5] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [5]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [5] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [5]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)首 (計(jì)數(shù), 計(jì)次)
動(dòng)畫框1.銷毀物體 (確定相連 [計(jì)次])
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)首 (9, 計(jì)次3)
.計(jì)次循環(huán)首 (11, 計(jì)次)
橫坐標(biāo) ＝ (計(jì)次 － 1) × 40
.計(jì)次循環(huán)首 (100, 計(jì)次1)
.如果真 (動(dòng)畫框1.是否在區(qū)域內(nèi) (標(biāo)識(shí)1 [計(jì)次1], , , 橫坐標(biāo), 0, 40, 500))
有沒 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有沒 ＝ 假)
.計(jì)次循環(huán)首 (20 － 計(jì)次, 計(jì)次1)
.計(jì)次循環(huán)首 (20 － 計(jì)次, 計(jì)次2)
.如果真 (動(dòng)畫框1.定位物體 (橫坐標(biāo) ＋ 40 × 計(jì)次1, 動(dòng)畫框1.高度 － 40 × (計(jì)次2 － 1)) ≠ -1)
定位1 ＝ 動(dòng)畫框1.定位物體 (橫坐標(biāo) ＋ 40 × 計(jì)次1, 動(dòng)畫框1.高度 － 40 × (計(jì)次2 － 1))
動(dòng)畫框1.置角度 (定位1, 270)
動(dòng)畫框1.前進(jìn) (定位1, 40)
動(dòng)畫框1.置角度 (定位1, 180)
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
.如果真結(jié)束
有沒 ＝ 假
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
得分總和 ＝ 得分總和 ＋ 計(jì)數(shù) × 計(jì)數(shù) × 5
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
.計(jì)次循環(huán)首 (100, 計(jì)次3)
.如果真 (動(dòng)畫框1.是否已顯示 (標(biāo)識(shí)1 [計(jì)次3]))
連定 [1] ＝ 標(biāo)識(shí)1 [計(jì)次3]
連定 [2] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) － 40)
連定 [3] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) ＋ 40)
連定 [4] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) － 40, 動(dòng)畫框1.取物體頂邊 (連定 [1]))
連定 [5] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) ＋ 40, 動(dòng)畫框1.取物體頂邊 (連定 [1]))
.如果真 (連定 [2] ≠ -1 且 動(dòng)畫框1.取附加文本 (連定 [2]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
有沒 ＝ 假
返回 ()
.如果真結(jié)束
.如果真 (連定 [3] ≠ -1 且 動(dòng)畫框1.取附加文本 (連定 [3]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
有沒 ＝ 假
返回 ()
.如果真結(jié)束
.如果真 (連定 [4] ≠ -1 且 動(dòng)畫框1.取附加文本 (連定 [4]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
有沒 ＝ 假
返回 ()
.如果真結(jié)束
.如果真 (連定 [5] ≠ -1 且 動(dòng)畫框1.取附加文本 (連定 [5]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
有沒 ＝ 假
返回 ()
.如果真結(jié)束
.如果真結(jié)束
.如果真 (計(jì)次3 ＝ 100 且 有沒 ＝ 假)
有沒 ＝ 真
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有沒)
剩余 ＝ 動(dòng)畫框1.取物體數(shù) ()
.如果真 (剩余 ＜ 10)
得分總和 ＝ 得分總和 ＋ 2000 － 剩余 × 剩余 × 20
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
.如果真結(jié)束
.如果真 (得分總和 ＞ 最高得分)
最高得分 ＝ 得分總和
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
最高得分1.標(biāo)題 ＝ “最高得分：” ＋ 到文本 (最高得分)
.如果真結(jié)束
.如果真 (關(guān)卡 ＝ 1)
.如果 (到整數(shù) (當(dāng)前得分.標(biāo)題) ≥ 1000)
信息框 (“闖關(guān)成功！”, 0, )
關(guān)卡 ＝ 關(guān)卡 ＋ 1
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.否則
信息框 (“闖關(guān)失??！”, 0, )
關(guān)卡 ＝ 1
當(dāng)前得分.標(biāo)題 ＝ “0”
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.如果結(jié)束
.如果真結(jié)束
.如果真 (關(guān)卡 ＝ 2)
.如果 (到整數(shù) (當(dāng)前得分.標(biāo)題) ≥ 3000)
信息框 (“闖關(guān)成功！”, 0, )
關(guān)卡 ＝ 關(guān)卡 ＋ 1
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.否則
信息框 (“闖關(guān)失??！”, 0, )
關(guān)卡 ＝ 1
當(dāng)前得分.標(biāo)題 ＝ “0”
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.如果結(jié)束
.如果真結(jié)束
.如果真 (關(guān)卡 ≥ 3 且 關(guān)卡 ＜ 10)
.如果 (到整數(shù) (當(dāng)前得分.標(biāo)題) ≥ (關(guān)卡 － 1) × 3000)
信息框 (“闖關(guān)成功！”, 0, )
關(guān)卡 ＝ 關(guān)卡 ＋ 1
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.否則
信息框 (“闖關(guān)失?。 ? 0, )
關(guān)卡 ＝ 1
當(dāng)前得分.標(biāo)題 ＝ “0”
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.如果結(jié)束
.如果真結(jié)束
.如果真 (關(guān)卡 ≥ 10)
.如果 (到整數(shù) (當(dāng)前得分.標(biāo)題) ≥ (關(guān)卡 － 1) × 4000)
信息框 (“闖關(guān)成功！”, 0, )
關(guān)卡 ＝ 關(guān)卡 ＋ 1
當(dāng)前得分.標(biāo)題 ＝ 到文本 (得分總和)
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.否則
信息框 (“闖關(guān)失??！”, 0, )
關(guān)卡 ＝ 1
當(dāng)前得分.標(biāo)題 ＝ “0”
動(dòng)畫框1.銷毀所有物體 ()
初始化 ()
返回 ()
.如果結(jié)束
.如果真結(jié)束
動(dòng)畫框1.銷毀所有物體 ()
.如果真結(jié)束
.子程序 _重開按鈕_被單擊
動(dòng)畫框1.銷毀所有物體 ()
得分總和 ＝ 0
初始化 ()
.子程序 _動(dòng)畫框1_物體左鍵被放開
.參數(shù) 物體標(biāo)識(shí)值, 整數(shù)型
.參數(shù) 已被按下物體, 整數(shù)型
.局部變量 連定, 整數(shù)型, , "5"
.局部變量 計(jì)數(shù), 整數(shù)型
.局部變量 計(jì)次, 整數(shù)型
.局部變量 A, 整數(shù)型
.局部變量 有無, 邏輯型
.局部變量 確定相連, 整數(shù)型, , "100"
.局部變量 變暗計(jì)次, 整數(shù)型
.如果真 (物體標(biāo)識(shí)值 ＋ 已被按下物體 ＞ 0 且 物體標(biāo)識(shí)值 ＝ 已被按下物體)
計(jì)數(shù) ＝ 1
連定 [1] ＝ 物體標(biāo)識(shí)值
確定相連 [計(jì)數(shù)] ＝ 連定 [1]
連定 [2] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) － 40) ' 上
.如果真 (連定 [2] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [2]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [2]
.如果真結(jié)束
.如果真結(jié)束
連定 [3] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) ＋ 40) ' 下
.如果真 (連定 [3] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [3]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [3]
.如果真結(jié)束
.如果真結(jié)束
連定 [4] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) － 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 左
.如果真 (連定 [4] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [4]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [4]
.如果真結(jié)束
.如果真結(jié)束
連定 [5] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) ＋ 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 右
.如果真 (連定 [5] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [5]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [5]
.如果真結(jié)束
.如果真結(jié)束
.如果真 (動(dòng)畫框1.取附加文本 (連定 [2]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]) 且 動(dòng)畫框1.取附加文本 (連定 [3]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]) 且 動(dòng)畫框1.取附加文本 (連定 [4]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]) 且 動(dòng)畫框1.取附加文本 (連定 [5]) ≠ 動(dòng)畫框1.取附加文本 (連定 [1]))
返回 ()
.如果真結(jié)束
.計(jì)次循環(huán)首 (計(jì)數(shù) ＋ 20, 計(jì)次)
.如果真 (確定相連 [計(jì)次 ＋ 1] ＝ 0 或 計(jì)次 ＋ 1 ＞ 計(jì)數(shù))
跳出循環(huán) ()
.如果真結(jié)束
連定 [1] ＝ 確定相連 [計(jì)次 ＋ 1]
.如果真 (有無 ＝ 真)
有無 ＝ 假
.如果真結(jié)束
連定 [2] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) － 40) ' 上
.如果真 (連定 [2] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [2]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [2] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [2]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
連定 [3] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]), 動(dòng)畫框1.取物體頂邊 (連定 [1]) ＋ 40) ' 下
.如果真 (連定 [3] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [3]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [3] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [3]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
連定 [4] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) － 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 左
.如果真 (連定 [4] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [4]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [4] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [4]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
連定 [5] ＝ 動(dòng)畫框1.定位物體 (動(dòng)畫框1.取物體左邊 (連定 [1]) ＋ 40, 動(dòng)畫框1.取物體頂邊 (連定 [1])) ' 右
.如果真 (連定 [5] ≠ -1)
.如果真 (動(dòng)畫框1.取附加文本 (連定 [5]) ＝ 動(dòng)畫框1.取附加文本 (連定 [1]))
.計(jì)次循環(huán)首 (計(jì)數(shù), A)
.如果真 (連定 [5] ＝ 確定相連 [A])
有無 ＝ 真
跳出循環(huán) ()
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (有無 ＝ 假)
計(jì)數(shù) ＝ 計(jì)數(shù) ＋ 1
確定相連 [計(jì)數(shù)] ＝ 連定 [5]
.如果真結(jié)束
有無 ＝ 假
.如果真結(jié)束
.如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真結(jié)束
.計(jì)次循環(huán)首 (100, 變暗計(jì)次)
動(dòng)畫框1.置亮度 (標(biāo)識(shí)1 [變暗計(jì)次], 0)
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)首 (計(jì)數(shù), 計(jì)次)
動(dòng)畫框1.置亮度 (確定相連 [計(jì)次], 250)
.計(jì)次循環(huán)尾 ()
本次得分1.標(biāo)題 ＝ 到文本 (計(jì)數(shù) × 計(jì)數(shù) × 5)
.子程序 __啟動(dòng)窗口_將被銷毀
寫配置項(xiàng) (取運(yùn)行目錄 () ＋ “\win.ini”, “userdata”, “最高得分”, 到文本 (最高得分))
運(yùn)行結(jié)果：
總結(jié)
以上就是這篇文章的全部內(nèi)容了，希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
相關(guān)文章
易語言驗(yàn)證十八位身份證號(hào)碼是否正確的代碼
今天小編就為大家分享一篇關(guān)于易語言驗(yàn)證十八位身份證號(hào)碼是否正確的代碼，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11
在本篇內(nèi)容里小編分享給大家關(guān)于易語言取反的教學(xué)內(nèi)容，對(duì)此有需要的讀者們學(xué)習(xí)下。2018-12-12
今天小編就為大家分享一篇關(guān)于易語言更改選擇夾子夾名稱的方法，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11
今天小編就為大家分享一篇關(guān)于易語言打開與關(guān)閉輸入法的代碼示例，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-12-12
在本篇內(nèi)容里小編給大家分享了關(guān)于易語言創(chuàng)建Word對(duì)象的方法和步驟，對(duì)此有需要的朋友們可以學(xué)習(xí)下。2019-01-01
一步一步跟我學(xué)易語言之?dāng)?shù)據(jù)類型與常用語句
今天小編就為大家分享一篇關(guān)于一步一步跟我學(xué)易語言之?dāng)?shù)據(jù)類型與常用語句，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-10-10
今天小編就為大家分享一篇關(guān)于易語言窗口界面與菜單功能詳解，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-10-10
在本篇內(nèi)容里小編為大家分享了關(guān)于易語言氣球提示框組件怎么使用的相關(guān)內(nèi)容，需要的朋友們可以學(xué)習(xí)下。2019-01-01
在本篇文章里小編給大家分享了關(guān)于易語言做軟件的實(shí)例教學(xué)以及相關(guān)內(nèi)容，需要的朋友們可以學(xué)習(xí)下。2019-02-02
易語言通過取設(shè)備句柄命令獲取指定畫板的設(shè)備場(chǎng)景句柄
今天小編就為大家分享一篇關(guān)于易語言通過取設(shè)備句柄命令獲取指定畫板的設(shè)備場(chǎng)景句柄，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11