nisasd001 發表於 2015-8-21 11:28:45

龍大的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


Alloc(MoneyOnly, 64)
Alloc(MoneyOnlySW,4)
RegisterSymbol(MoneyOnlySW)

MoneyOnlySW:
DD 01

MoneyOnly:
Cmp ,0
Je 00A8309D
Cmp , 006387BB
Jne 00A8309D
Mov , 00638852
Jmp 00A8309D

018EE274:
DD MoneyOnly


018EE274:
DD 00A8309D
DeAlloc(MoneyOnly)

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

nisasd001 發表於 2015-8-21 11:49:54

笨笨烏龜大大 那請問可以教我媽? 請問是否有RC?!

aaa0986555377 發表於 2015-8-21 14:23:13

27316626 有的話需要過來  

鑽石烤鴨 發表於 2015-8-21 17:38:31

來看一看 我自己也不會用

wasd5122 發表於 2015-8-21 21:49:31

不好意思 請問一下您這個開源能傳嗎.. 因為龍大的部落格上 無法下載!!

xiaobaobei 發表於 2015-8-21 23:56:07

感謝開源，這個功能楓之島也有。。。不知道什麼原理。

t7764921 發表於 2016-1-21 13:31:15

AOB阿那麼可愛
頁: [1]
查看完整版本: 龍大的VB開源