.版本 2

.支持庫 BmpOperate

.支持庫 shellEx

.支持庫 dp1

.程序集 窗口程序集1

.程序集變量 方塊數據, 方塊數據, , "19,11"

.程序集變量 位圖, 位圖

.程序集變量 熱鍵1, 整數型

.程序集變量 熱鍵2, 整數型

.程序集變量 熱鍵3, 整數型

.程序集變量 熱鍵4, 整數型

.程序集變量 方塊數量, 整數型, , , 底圖里方塊的數量

.程序集變量 窗口矩形, 矩形_

.程序集變量 背景圖字節集, 字節集

.子程序 __啟動窗口_創建完畢

.局部變量 x, 整數型

.局部變量 y, 整數型

熱鍵1 ＝ 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F4鍵)

熱鍵2 ＝ 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F2鍵)

熱鍵3 ＝ 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #右光標鍵)

熱鍵4 ＝ 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #左光標鍵)

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

.局部變量 a, 字節集

窗口句柄 ＝ 查找頂級窗口 (0, “QQ游戲 - 連連看角色版”)

.如果 (窗口句柄 ≠ 0)

.如果真 (API_判斷窗口可見性 (窗口句柄) ＝ 1)

API_顯示窗口 (窗口句柄, 9)

.如果真結束

API_窗口置頂 (窗口句柄)

延時 (100)

.否則

信息框 (“QQ游戲 - 連連看角色版 未運行！”, 0, “提示！”)

.如果結束

a ＝ 快照 (窗口句柄, , )

位圖.創建 (800, 600, 位圖.取位深度 (), )

位圖.載入數據 (a)

圖像種類 ＝ 0

.子程序 取臨時位圖數據, 字節集

.參數 x, 整數型

.參數 y, 整數型

.局部變量 臨時位圖1, 位圖

.局部變量 x1, 整數型

.局部變量 y1, 整數型

.局部變量 x2, 整數型

.局部變量 y2, 整數型

.局部變量 ys, 整數型

臨時位圖1.創建 (26, 30, 位圖.取位深度 (), )

x2 ＝ 0

y2 ＝ 0

.變量循環首 (14 ＋ (x － 1) × 31, 14 ＋ (x － 1) × 31 ＋ 26, 1, x1)

y2 ＝ 0

.變量循環首 (181 ＋ (y － 1) × 35 ＋ 4, 181 ＋ (y － 1) × 35 ＋ 34, 1, y1)

ys ＝ 位圖.取某點顏色 (x1, y1)

臨時位圖1.置某點顏色 (x2, y2, ys)

y2 ＝ y2 ＋ 1

.變量循環尾 ()

x2 ＝ x2 ＋ 1

.變量循環尾 ()

.如果真 (取字節集長度 (壓縮數據 (臨時位圖1.取位圖數據 ())) ＜ 80 且 背景圖字節集 ＝ { })

背景圖字節集 ＝ 臨時位圖1.取位圖數據 ()

.如果真結束

返回 (臨時位圖1.取位圖數據 ())

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

.局部變量 x, 整數型

.局部變量 y, 整數型

.局部變量 臨時位圖, 位圖

.局部變量 數據號, 整數型

.局部變量 臨時數據, 字節集

.局部變量 臨時數據1, 字節集

.局部變量 a, 整數型

.計次循環首 (取數組下標 (方塊數據, 2), y)

.計次循環首 (取數組下標 (方塊數據, 1), x)

a ＝ a ＋ 1

數據號 ＝ (y － 1) × 19 ＋ x

臨時數據 ＝ 取臨時位圖數據 (x, y)

.如果 (臨時數據 ＝ 背景圖字節集)

方塊數據 [數據號].圖像類型號 ＝ 0

方塊數據 [數據號].圖像數據 ＝ 臨時數據

.否則

圖像比較 (數據號, 臨時數據)

.如果結束

.計次循環尾 ()

.計次循環尾 ()

.子程序 圖像比較

.參數 數據號, 整數型

.參數 臨時數據, 字節集

.局部變量 x, 整數型

.如果 (數據號 ＝ 1)

圖像種類 ＝ 圖像種類 ＋ 1

方塊數據 [數據號].圖像類型號 ＝ 圖像種類

方塊數據 [數據號].圖像數據 ＝ 臨時數據

方塊數量 ＝ 方塊數量 ＋ 1

返回 ()

.否則

.如果結束

.計次循環首 (數據號 － 1, x)

.如果 (臨時數據 ＝ 方塊數據 [x].圖像數據)

方塊數據 [數據號].圖像類型號 ＝ 方塊數據 [x].圖像類型號

方塊數據 [數據號].圖像數據 ＝ 臨時數據

方塊數量 ＝ 方塊數量 ＋ 1

返回 ()

.否則

.如果結束

.計次循環尾 ()

圖像種類 ＝ 圖像種類 ＋ 1

方塊數據 [數據號].圖像類型號 ＝ 圖像種類

方塊數據 [數據號].圖像數據 ＝ 臨時數據

方塊數量 ＝ 方塊數量 ＋ 1

返回 ()

.子程序 測試連接

.局部變量 y, 整數型

.局部變量 x, 整數型

.局部變量 數據號, 整數型

.局部變量 a, 整數型

.局部變量 第一塊坐標, 坐標數據

.局部變量 第二塊坐標, 坐標數據

.局部變量 臨時圖像數組, 坐標數據, , "0"

.局部變量 臨時變量, 整數型

.計次循環首 (取數組下標 (方塊數據, 2), y)

.計次循環首 (取數組下標 (方塊數據, 1), x)

數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [數據號].圖像類型號 ＝ 0)

到循環尾 ()

.否則

.如果結束

.如果 (a ＝ 0)

第一塊坐標.x ＝ x

第一塊坐標.y ＝ y

a ＝ 方塊數據 [數據號].圖像類型號

.否則

到循環尾 ()

.如果結束

清除數組 (臨時圖像數組)

.如果 (尋找下一個相同塊 (數據號, a, x, y, 臨時圖像數組))

.計次循環首 (取數組成員數 (臨時圖像數組), 臨時變量)

.如果 (判斷是否可以相連1 (第一塊坐標, 臨時圖像數組 [臨時變量]))

第二塊坐標.x ＝ 臨時圖像數組 [臨時變量].x

第二塊坐標.y ＝ 臨時圖像數組 [臨時變量].y

模擬點擊程序 (第一塊坐標, 第二塊坐標)

數據號 ＝ (第一塊坐標.y － 1) × 19 ＋ 第一塊坐標.x

方塊數據 [數據號].圖像類型號 ＝ 0

數據號 ＝ (第二塊坐標.y － 1) × 19 ＋ 第二塊坐標.x

方塊數據 [數據號].圖像類型號 ＝ 0

方塊數量 ＝ 方塊數量 － 2

返回 ()

.否則

.如果結束

.計次循環尾 ()

a ＝ 0

.否則

a ＝ 0

.如果結束

.計次循環尾 ()

.計次循環尾 ()

時鐘1.時鐘周期 ＝ 0

標簽1.標題 ＝ “無解”

_啟動窗口.標題 ＝ “停止自動點擊”

.子程序 尋找下一個相同塊, 邏輯型

.參數 數據號, 整數型

.參數 圖號, 整數型

.參數 x, 整數型

.參數 y, 整數型

.參數 臨時圖像數組, 坐標數據, 數組

.局部變量 局部數據號, 整數型

.局部變量 臨時坐標, 坐標數據

.計次循環首 (取數組下標 (方塊數據, 2), y)

.計次循環首 (取數組下標 (方塊數據, 1), x)

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (局部數據號 ＞ 數據號 且 方塊數據 [局部數據號].圖像類型號 ＝ 圖號)

臨時坐標.x ＝ x

臨時坐標.y ＝ y

加入成員 (臨時圖像數組, 臨時坐標)

.否則

.如果結束

.計次循環尾 ()

.計次循環尾 ()

.如果 (臨時坐標.x ＝ 0)

返回 (假)

.否則

返回 (真)

.如果結束

.子程序 雙直線判斷, 邏輯型

.參數 第一塊坐標, 坐標數據

.參數 第二塊坐標, 坐標數據

.局部變量 x, 整數型

.局部變量 局部數據號, 整數型

.局部變量 y, 整數型

.局部變量 結果x1, 邏輯型

.局部變量 結果x2, 邏輯型

.局部變量 結果y1, 邏輯型

.局部變量 結果y2, 邏輯型

.局部變量 臨時邏輯1, 邏輯型

.局部變量 abc, 整數型

y ＝ 第一塊坐標.y

.變量循環首 (第一塊坐標.x, 第二塊坐標.x, 選擇 (第一塊坐標.x ＞ 第二塊坐標.x, -1, 1), x)

.如果 (abc ＝ 0)

abc ＝ abc ＋ 1

到循環尾 ()

.否則

.如果結束

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

結果x1 ＝ 真

.否則

結果x1 ＝ 假

跳出循環 ()

.如果結束

.變量循環尾 ()

abc ＝ 0

y ＝ 第二塊坐標.y

.變量循環首 (第二塊坐標.x, 第一塊坐標.x, 選擇 (第一塊坐標.x ＞ 第二塊坐標.x, 1, -1), x)

.如果 (abc ＝ 0)

abc ＝ abc ＋ 1

到循環尾 ()

.否則

.如果結束

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

結果x2 ＝ 真

.否則

結果x2 ＝ 假

跳出循環 ()

.如果結束

.變量循環尾 ()

x ＝ 第一塊坐標.x

abc ＝ 0

.變量循環首 (第一塊坐標.y, 第二塊坐標.y, 選擇 (第一塊坐標.y ＞ 第二塊坐標.y, -1, 1), y)

.如果 (abc ＝ 0)

abc ＝ abc ＋ 1

到循環尾 ()

.否則

.如果結束

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

結果y1 ＝ 真

.否則

結果y1 ＝ 假

跳出循環 ()

.如果結束

.變量循環尾 ()

abc ＝ 0

x ＝ 第二塊坐標.x

.變量循環首 (第二塊坐標.y, 第一塊坐標.y, 選擇 (第一塊坐標.y ＞ 第二塊坐標.y, 1, -1), y)

.如果 (abc ＝ 0)

abc ＝ abc ＋ 1

到循環尾 ()

.否則

.如果結束

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

結果y2 ＝ 真

.否則

結果y2 ＝ 假

跳出循環 ()

.如果結束

.變量循環尾 ()

.如果 (位與 (到整數 (結果x1), 到整數 (結果y2)) ≠ 0 或 位與 (到整數 (結果x2), 到整數 (結果y1)) ≠ 0)

返回 (真)

.否則

返回 (假)

.如果結束

.子程序 三直線判斷, 邏輯型

.參數 第一塊坐標, 坐標數據

.參數 第二塊坐標, 坐標數據

.局部變量 y, 整數型

.局部變量 x, 整數型

.局部變量 臨時坐標, 坐標數據

.局部變量 局部數據號, 整數型

x ＝ 第二塊坐標.x

.變量循環首 (第二塊坐標.y ＋ 1, 11, 1, y) ' 判斷y向下

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

臨時坐標.x ＝ x

臨時坐標.y ＝ y

.如果 (雙直線判斷 (第一塊坐標, 臨時坐標))

返回 (真)

.否則

.如果結束

.否則

跳出循環 ()

.如果結束

.變量循環尾 ()

.變量循環首 (第二塊坐標.y － 1, 1, -1, y) ' 判斷y向上

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

臨時坐標.x ＝ x

臨時坐標.y ＝ y

.如果 (雙直線判斷 (第一塊坐標, 臨時坐標))

返回 (真)

.否則

.如果結束

.否則

跳出循環 ()

.如果結束

.變量循環尾 ()

y ＝ 第二塊坐標.y

.變量循環首 (第二塊坐標.x ＋ 1, 19, 1, x) ' 判斷x向右

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

臨時坐標.x ＝ x

臨時坐標.y ＝ y

.如果 (雙直線判斷 (第一塊坐標, 臨時坐標))

返回 (真)

.否則

.如果結束

.否則

跳出循環 ()

.如果結束

.變量循環尾 ()

.變量循環首 (第二塊坐標.x － 1, 1, -1, x) ' 判斷x向左

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

臨時坐標.x ＝ x

臨時坐標.y ＝ y

.如果 (雙直線判斷 (第一塊坐標, 臨時坐標))

返回 (真)

.否則

.如果結束

.否則

跳出循環 ()

.如果結束

.變量循環尾 ()

返回 (假)

.子程序 單直線判斷, 邏輯型

.參數 第一塊坐標, 坐標數據

.參數 第二塊坐標, 坐標數據

.局部變量 abc, 整數型

.局部變量 結果x1, 邏輯型

.局部變量 x, 整數型

.局部變量 y, 整數型

.局部變量 局部數據號, 整數型

.局部變量 結果y1, 邏輯型

.如果 (第一塊坐標.y ＝ 第二塊坐標.y)

y ＝ 第一塊坐標.y

.變量循環首 (第一塊坐標.x, 第二塊坐標.x, 選擇 (第一塊坐標.x ＞ 第二塊坐標.x, -1, 1), x)

.如果 (abc ＝ 0)

abc ＝ abc ＋ 1

到循環尾 ()

.否則

.如果結束

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

結果x1 ＝ 真

.否則

結果x1 ＝ 假

跳出循環 ()

.如果結束

.變量循環尾 ()

.如果 (x ＝ 第二塊坐標.x)

返回 (真)

.否則

.如果結束

.否則

.如果結束

abc ＝ 0

.如果 (第一塊坐標.x ＝ 第二塊坐標.x)

x ＝ 第一塊坐標.x

.變量循環首 (第一塊坐標.y, 第二塊坐標.y, 選擇 (第一塊坐標.y ＞ 第二塊坐標.y, -1, 1), y)

.如果 (abc ＝ 0)

abc ＝ abc ＋ 1

到循環尾 ()

.否則

.如果結束

局部數據號 ＝ (y － 1) × 19 ＋ x

.如果 (方塊數據 [局部數據號].圖像類型號 ＝ 0)

結果y1 ＝ 真

.否則

結果y1 ＝ 假

跳出循環 ()

.如果結束

.變量循環尾 ()

.如果 (y ＝ 第二塊坐標.y)

返回 (真)

.否則

.如果結束

.否則

.如果結束

返回 (假)

.子程序 判斷是否可以相連1, 邏輯型

.參數 a, 坐標數據

.參數 b, 坐標數據

.如果 (單直線判斷 (a, b))

返回 (真)

.否則

.如果結束

.如果 (雙直線判斷 (a, b))

返回 (真)

.否則

.如果結束

.如果 (三直線判斷 (a, b))

返回 (真)

.否則

.如果結束

返回 (假)

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

.如果 (時鐘1.時鐘周期 ＝ 0)

時鐘1.時鐘周期 ＝ 1000

.否則

時鐘1.時鐘周期 ＝ 0

.如果結束

.子程序 模擬點擊程序, 邏輯型

.參數 坐標1, 坐標數據

.參數 坐標2, 坐標數據

.局部變量 坐標位置1, 整數型

.局部變量 坐標位置2, 整數型

坐標位置1 ＝ 坐標1.x × 31 ＋ 13 － 15 ＋ (坐標1.y × 35 ＋ 180 － 17) × 65536

坐標位置2 ＝ 坐標2.x × 31 ＋ 13 － 15 ＋ (坐標2.y × 35 ＋ 180 － 17) × 65536

API_投遞消息 (窗口句柄, 512, 2, 坐標位置1) ' 移動鼠標

API_投遞消息 (窗口句柄, 513, 0, 坐標位置1) ' 按下

API_投遞消息 (窗口句柄, 514, 1, 坐標位置1) ' 放開

' 模擬鼠標點擊 (坐標1.x × 31 ＋ 13 － 15 ＋ 窗口矩形.左邊, 坐標1.y × 34 ＋ 180 － 17 ＋ 窗口矩形.頂邊, 0)

' 延時 (10)

' 模擬鼠標點擊 (坐標2.x × 31 ＋ 13 － 15 ＋ 窗口矩形.左邊, 坐標2.y × 34 ＋ 180 － 17 ＋ 窗口矩形.頂邊, 0)

API_投遞消息 (窗口句柄, 512, 2, 坐標位置2) ' 移動鼠標

API_投遞消息 (窗口句柄, 513, 0, 坐標位置2) ' 按下

API_投遞消息 (窗口句柄, 514, 1, 坐標位置2) ' 放開

返回 (真)

.子程序 _時鐘1_周期事件

測試連接 ()

.子程序 _標簽1_反饋事件, 整數型

.參數 參數一, 整數型

.參數 參數二, 整數型

_按鈕1_被單擊 ()

_按鈕2_被單擊 ()

.如果真 (參數一 ＝ 熱鍵1)

.如果 (時鐘1.時鐘周期 ≠ 0)

_啟動窗口.標題 ＝ “停止自動點擊”

時鐘1.時鐘周期 ＝ 0

.否則

取窗口矩形_ (窗口句柄, 窗口矩形)

時鐘1.時鐘周期 ＝ 到整數 (編輯框2.內容)

_啟動窗口.標題 ＝ “開始自動點擊”

.如果結束

.如果真結束

.如果真 (參數一 ＝ 熱鍵2)

.如果 (時鐘1.時鐘周期 ≠ 0)

_啟動窗口.標題 ＝ “秒殺完畢”

時鐘1.時鐘周期 ＝ 0

.否則

取窗口矩形_ (窗口句柄, 窗口矩形)

時鐘1.時鐘周期 ＝ 10

_啟動窗口.標題 ＝ “秒殺”

.如果結束

.如果真結束

.如果真 (參數一 ＝ 熱鍵3)

.如果 (時鐘1.時鐘周期 ≠ 0)

編輯框2.內容 ＝ 到文本 (到整數 (編輯框2.內容) ＋ 100)

時鐘1.時鐘周期 ＝ 到整數 (編輯框2.內容)

.否則

編輯框2.內容 ＝ 到文本 (到整數 (編輯框2.內容) ＋ 100)

.如果結束

.如果真結束

.如果真 (參數一 ＝ 熱鍵4)

.如果 (時鐘1.時鐘周期 ≠ 0)

編輯框2.內容 ＝ 到文本 (到整數 (編輯框2.內容) － 100)

時鐘1.時鐘周期 ＝ 到整數 (編輯框2.內容)

.否則

編輯框2.內容 ＝ 到文本 (到整數 (編輯框2.內容) － 100)

.如果結束

.如果真結束

總結

以上是生活随笔為你收集整理的python跟易语言那个写辅助_易语言写练练看辅助的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。