今天小編就爲大家分享一篇關於易語言地下城與勇士拾取賣物功能類源碼，小編覺得內容挺不錯的，現在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
DNF輔助功能類
僅供學習參考，禁止商業用途
.版本 2
.程序集 功能
.子程序 自動攻擊
.局部變量 A, 整數型
.局部變量 數值, 整數型
.判斷循環首 (A ＝ 0)
置隨機數種子 ()
數值 ＝ 取隨機數 (0, 2)
.如果真 (是否有怪物 () ＝ 真)
.如果真 (數值 ＝ 0)
內存按鍵 (#X鍵)
.如果真結束
.如果真 (數值 ＝ 1)
內存按鍵 (#Z鍵)
.如果真結束
.如果真 (數值 ＝ 2)
內存按鍵 (#X鍵)
.如果真結束
.如果真結束
超級延時 (200)
.判斷循環尾 ()
.子程序 跳過動畫
彙編_寫整數型 (彙編_加 (彙編_讀整數型 (#動畫基址), #動畫偏移), 1)
.子程序 賣出遍歷
.局部變量 揹包指針, 整數型
.局部變量 首地址, 整數型
.局部變量 物品指針, 整數型
.局部變量 異常, 整數型
.局部變量 裝備欄首地址, 整數型
.局部變量 裝備指針, 整數型
.局部變量 I, 整數型
.局部變量 裝備屬性, 整數型
.局部變量 裝備名稱, 文本型
.局部變量 次數, 整數型
揹包指針 ＝ 彙編_讀整數型 (#揹包基址)
首地址 ＝ 彙編_讀整數型 (揹包指針 ＋ 88)
裝備欄首地址 ＝ 首地址 ＋ 36
.計次循環首 (56, I)
裝備指針 ＝ 彙編_讀整數型 (裝備欄首地址 ＋ (I － 1) × 4)
.如果真 (裝備指針 ≠ 0)
裝備屬性 ＝ 彙編_讀整數型 (裝備指針 ＋ 368)
裝備名稱 ＝ Unicode轉Ansi (彙編_讀字節集 (彙編_讀整數型 (裝備指針 ＋ 36), 52))
.如果真 (取文本左邊 (裝備名稱, 4) ＝ “傳承”)
到循環尾 ()
.如果真結束
.如果真 (裝備屬性 ＝ 0 或 裝備屬性 ＝ 1)
賣物Call (彙編_加 (裝備指針, 8))
延時 (50)
處理事件 ()
.如果真結束
.如果真 (裝備屬性 ＝ 2)
.如果真 (尋找文本 (裝備名稱, “密制”, , 假) ≠ -1)
賣物Call (彙編_加 (裝備指針, 8))
延時 (50)
處理事件 ()
.如果真結束
.如果真結束
.如果真結束
.計次循環尾 ()
.子程序 裝備處理
.局部變量 異步, 邏輯型, 靜態
.局部變量 賣物, 賣物遍歷
.局部變量 J, 整數型
.如果真 (異步 ＝ 真)
返回 ()
.如果真結束
異步 ＝ 真
賣物.揹包指針 ＝ 彙編_讀整數型 (#揹包基址)
賣物.首地址 ＝ 彙編_讀整數型 (彙編_加 (賣物.揹包指針, 88))
賣物.裝備欄首地址 ＝ 彙編_加 (賣物.首地址, 36)
.計次循環首 (56, 賣物.I)
賣物.裝備指針 ＝ 彙編_讀整數型 (彙編_加 (賣物.裝備欄首地址, 彙編_減 (彙編_乘 (賣物.I, 4), 4)))
.如果真 (賣物.裝備指針 ≠ 0)
賣物.裝備屬性 ＝ 彙編_讀整數型 (彙編_加 (賣物.裝備指針, #揹包屬性偏移))
賣物.名稱 ＝ Unicode轉Ansi (彙編_讀字節集 (彙編_讀整數型 (彙編_加 (賣物.裝備指針, 36)), 52))
.如果真 (賣物.裝備屬性 ＝ 0 或 賣物.裝備屬性 ＝ 1 或 賣物.裝備屬性 ＝ 2)
.如果真 (尋找文本 (賣物.名稱, “傳承”, , 假) ＝ -1 或 尋找文本 (賣物.名稱, “週年”, , 假) ＝ -1 或 尋找文本 (賣物.名稱, “紋”, , 假) ＝ -1 或 尋找文本 (賣物.名稱, “異界”, , 假) ＝ -1 或 尋找文本 (賣物.名稱, “三英雄”, , 假) ＝ -1 或 尋找文本 (賣物.名稱, “活動”, , 假) ＝ -1)
.如果真 (賣物.裝備屬性 ＝ 0)
賣物.白裝 ＝ 彙編_加 (賣物.白裝, 1)
.如果真結束
.如果真 (賣物.裝備屬性 ＝ 1)
賣物.藍裝 ＝ 彙編_加 (賣物.藍裝, 1)
.如果真結束
.如果真 (賣物.裝備屬性 ＝ 2)
賣物.紫裝 ＝ 彙編_加 (賣物.紫裝, 1)
.如果真結束
.如果真 (文件讀配置 (“裝備處理”) ＝ 1)
分解Call (彙編_加 (賣物.I, 8))
.如果真結束
.如果真 (文件讀配置 (“裝備處理”) ＝ 2)
分解Call (彙編_加 (賣物.I, 8))
.如果真結束
J ＝ J ＋ 1
.如果真結束
.如果真結束
.如果真結束
.計次循環尾 ()
異步 ＝ 假
組包_整理揹包 ()
系統公告 (“處理白裝 [ ” ＋ 到文本 (賣物.白裝) ＋ “ ] 藍裝 [ ” ＋ 到文本 (賣物.藍裝) ＋ “ ] 紫裝 [ ” ＋ 到文本 (賣物.紫裝) ＋ “ ]”)
.子程序 不死秒殺
.局部變量 秒殺, 遍歷類型
.如果真 (取遊戲狀態 () ＝ 1)
返回 ()
.如果真結束
.如果真 (取遊戲狀態 () ＝ 3)
秒殺.觸發指針 ＝ 彙編_讀整數型 (#人物基址)
秒殺.首地址 ＝ 彙編_取偏移地址 (#人物基址, { #地圖偏移, #首地址, 0 })
秒殺.尾地址 ＝ 彙編_取偏移地址 (#人物基址, { #地圖偏移, #尾地址, 0 })
秒殺.遍歷數量 ＝ 彙編_減 (秒殺.尾地址, 秒殺.首地址) ÷ 4
.計次循環首 (秒殺.遍歷數量, 秒殺.遍歷計次)
秒殺.遍歷指針 ＝ 彙編_讀整數型 (彙編_加 (秒殺.首地址, 秒殺.遍歷計次 × 4))
秒殺.遍歷類型 ＝ 彙編_讀整數型 (彙編_加 (秒殺.遍歷指針, #類型偏移))
秒殺.遍歷陣營 ＝ 彙編_讀整數型 (彙編_加 (秒殺.遍歷指針, #陣營偏移))
秒殺.遍歷血量 ＝ 彙編_讀整數型 (彙編_加 (秒殺.遍歷指針, #怪物血量))
.如果真 (秒殺.遍歷類型 ＝ 529 或 秒殺.遍歷類型 ＝ 273 或 秒殺.遍歷類型 ＝ 545)
.如果真 (秒殺.遍歷陣營 ≠ 0 且 秒殺.遍歷指針 ≠ 秒殺.觸發指針 且 秒殺.遍歷血量 ＞ 0)
' ' ' 消失Call (秒殺.首地址 ＋ 4 × 秒殺.遍歷計次, 到整數 (12))
超級加密 (彙編_加 (秒殺.遍歷指針, #不死偏移), 1) ' 不死偏移
' 無形Call (秒殺.遍歷指針)
' 模擬秒殺 (秒殺.遍歷指針)
' 血量Call (0, 秒殺.觸發指針, 秒殺.遍歷指針)
' 內存扣血Call (秒殺.觸發指針, 秒殺.遍歷指針, －秒殺.遍歷血量, 100)
.如果真結束
.如果真結束
.計次循環尾 ()
.如果真結束
系統公告 (“無形秒殺”)
.子程序 無形秒殺
全局_消息反饋 ＝ 12
.子程序 拾取遍歷
.局部變量 人物地址, 整數型
.局部變量 地圖, 整數型
.局部變量 首地址, 整數型
.局部變量 尾地址, 整數型
.局部變量 數量, 整數型
.局部變量 i, 整數型
.局部變量 地址, 整數型
.局部變量 類型, 整數型
.局部變量 陣營, 整數型
.局部變量 X, 整數型
.局部變量 Y, 整數型
人物地址 ＝ 彙編_讀整數型 (#人物基址)
地圖 ＝ 彙編_讀整數型 (彙編_加 (人物地址, #地圖偏移))
首地址 ＝ 彙編_讀整數型 (彙編_加 (地圖, #首地址))
尾地址 ＝ 彙編_讀整數型 (彙編_加 (地圖, #尾地址))
數量 ＝ (尾地址 － 首地址) ÷ 4
.計次循環首 (數量, i)
地址 ＝ 彙編_讀整數型 (彙編_加 (首地址, 4 × i))
類型 ＝ 彙編_讀整數型 (彙編_加 (地址, #類型偏移))
.如果真 (類型 ＝ 289)
X ＝ 彙編_讀小數型 (彙編_加 (人物地址, #X座標))
Y ＝ 彙編_讀小數型 (彙編_加 (人物地址, #Y座標))
組包拾取1 (超級解密 (彙編_加 (地址, 172)), X, Y)
.如果真結束
.計次循環尾 ()
.子程序 遍歷入包
全局_消息反饋 ＝ 7
.子程序 遍歷賣物
全局_消息反饋 ＝ 10
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對神馬文庫的支持。如果你想了解更多相關內容請查看下面相關鏈接