冰楓論壇

標題: 龍大的VB開源 [打印本頁]

作者: nisasd001    時間: 2015-8-21 11:28
標題: 龍大的VB開源
我的開源的聖十字魔法噸 我有跟新到182.4
但是我開啟遊戲鎖定後進去遊戲把他打勾 但是沒效果 人物血量 魔量 都沒顯示
    '======================================================================='
    '==============================Pointer讀寫=============================='
    '======================================================================='

    Private Sub tmPointer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tmPointer.Tick
        WritePointer_LA("17FB3F8", "58", 48)
        WritePointer_LA("17FB3F8", "5C", 48)
        lblHp.Text = ReadPointer_LA("17F6EC0", "3034")
        lblMp.Text = ReadPointer_LA("17F6EC0", "3038")
    End Sub

這個我也不知道182.4的哪= =

    '========================================================================'
    '==============================Byte寫入方式=============================='
    '========================================================================'

    Private Sub chkByte_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chkByte.CheckedChanged
        Dim actByte As Byte() = {db, &H81, &H1D, &H70, &H56, &HEC, &H80, &HB3, &H5A, &H58, &H70, &H1A, &HC2, &H90, &H35, &H07, &H58, &HB7, &H23, &HC1, &H8A, &HE3, &H79, &HD6, &H79, &H54, &H7E, &H29, &HAC, &HC1, &HA8, &H72, &H85, &H33, &HCD, &H26, &H4E}
        Dim desByte As Byte() = {db, &H0F, &HE7, &HE8, &HB7, &H38, &H47, &HBF, &H7D, &HF0, &H6F, &H29, &H8E, &H2C, &H13, &H4E, &HB7, &H99, &H70, &HBA, &H65, &HB2, &H8F, &H29, &H6E, &HAD, &HB9, &H87, &H28, &HE3, &HE8, &H57, &H29, &H30, &H3B, &HE9, &H2D}
        ActiveByte_LA(chkByte, "01951BE0", actByte, desByte)
    End Sub

這是動態數據無敵我也更新到182.4版了
但是就是不能用
誰可以救我啊
    '============================================================================='
    '==============================CEAutoAsm寫入方式=============================='
    '============================================================================='

    Private Sub chkScript_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chkScript.CheckedChanged
        ActiveScript_LA(chkScript, txtScript.Text)
    End Sub

那如果我要新增
新的功能假如
//TwMS_v182.4_ICS_只撿錢
//作者:未知
//更新:V3611441

[Enable]
Alloc(MoneyOnly, 64)
Alloc(MoneyOnlySW,4)
RegisterSymbol(MoneyOnlySW)

MoneyOnlySW:
DD 01

MoneyOnly:
Cmp [MoneyOnlySW],0
Je 00A8309D
Cmp [Esp+13C], 006387BB
Jne 00A8309D
Mov [Esp+13C], 00638852
Jmp 00A8309D

018EE274:
DD MoneyOnly

[Disable]
018EE274:
DD 00A8309D
DeAlloc(MoneyOnly)

那我這邊要該嗎?
還是只要新增這邊就好

sdf.png (17.16 KB, 下載次數: 1)

sdf.png


作者: nisasd001    時間: 2015-8-21 11:49
笨笨烏龜大大 那請問可以教我媽? 請問是否有RC?!
作者: aaa0986555377    時間: 2015-8-21 14:23
27316626 有的話需要過來  
作者: 鑽石烤鴨    時間: 2015-8-21 17:38
來看一看 我自己也不會用
作者: wasd5122    時間: 2015-8-21 21:49
不好意思 請問一下您這個開源能傳嗎.. 因為龍大的部落格上 無法下載!!
作者: xiaobaobei    時間: 2015-8-21 23:56
感謝開源,這個功能楓之島也有。。。不知道什麼原理。
作者: t7764921    時間: 2016-1-21 13:31
AOB阿那麼可愛





歡迎光臨 冰楓論壇 (https://bingfong.com/) Powered by 冰楓