my code is very long and it didnt work well when i add more than 6 function. How can I make it better?
Code:
#include <GUIConstants.au3>
#include <NomadMemory.au3> ;because you need this for _memread functions
dim $a
GUICreate("My GUI Button")
;mob 23////////////////////////////////////////////
$Label_1 = GUICtrlCreateLabel("unknown",15, 105,100,15)
$Label_2 = GUICtrlCreateLabel("0/0",15, 120,100,15)
$Label_3 = GUICtrlCreateLabel("0/0",15, 135,100,15)
;//////////////////////////////////////////////////
;mob 13////////////////////////////////////////////
$Label_131 = GUICtrlCreateLabel("unknown",100, 105,100,15)
$Label_132 = GUICtrlCreateLabel("0/0",100, 120,100,15)
$Label_133 = GUICtrlCreateLabel("0/0",100, 135,100,15)
;//////////////////////////////////////////////////
;mob 24////////////////////////////////////////////
$Label_241 = GUICtrlCreateLabel("unknown",15, 150,100,15)
$Label_242 = GUICtrlCreateLabel("0/0",15, 165,100,15)
$Label_243 = GUICtrlCreateLabel("0/0",15, 180,100,15)
;//////////////////////////////////////////////////
;mob 14////////////////////////////////////////////
$Label_141 = GUICtrlCreateLabel("unknown",100, 150,100,15)
$Label_142 = GUICtrlCreateLabel("0/0",100, 165,100,15)
$Label_143 = GUICtrlCreateLabel("0/0",100, 180,100,15)
;//////////////////////////////////////////////////
;mob 22////////////////////////////////////////////
$Label_221 = GUICtrlCreateLabel("unknown",15, 60,100,15)
$Label_222 = GUICtrlCreateLabel("0/0",15, 75,100,15)
$Label_223 = GUICtrlCreateLabel("0/0",15, 90,100,15)
;//////////////////////////////////////////////////
;mob 12////////////////////////////////////////////
$Label_121 = GUICtrlCreateLabel("unknown",100, 60,100,15)
$Label_122 = GUICtrlCreateLabel("0/0",100, 75,100,15)
$Label_123 = GUICtrlCreateLabel("0/0",100, 90,100,15)
;//////////////////////////////////////////////////
;mob 25////////////////////////////////////////////
$Label_251 = GUICtrlCreateLabel("unknown",15, 195,100,15)
$Label_252 = GUICtrlCreateLabel("0/0",15, 210,100,15)
$Label_253 = GUICtrlCreateLabel("0/0",15, 225,100,15)
;//////////////////////////////////////////////////
;mob 15////////////////////////////////////////////
$Label_151 = GUICtrlCreateLabel("unknown",100, 195,100,15)
$Label_152 = GUICtrlCreateLabel("0/0",100, 210,100,15)
$Label_153 = GUICtrlCreateLabel("0/0",100, 225,100,15)
;//////////////////////////////////////////////////
;mob 21////////////////////////////////////////////
$Label_211 = GUICtrlCreateLabel("unknown",15, 15,100,15)
$Label_212 = GUICtrlCreateLabel("0/0",15, 30,100,15)
$Label_213 = GUICtrlCreateLabel("0/0",15, 45,100,15)
;//////////////////////////////////////////////////
;mob 11////////////////////////////////////////////
$Label_111 = GUICtrlCreateLabel("unknown",100, 15,100,15)
$Label_112 = GUICtrlCreateLabel("0/0",100, 30,100,15)
$Label_113 = GUICtrlCreateLabel("0/0",100, 45,100,15)
;//////////////////////////////////////////////////
;//////////////////////////////////////////////////
;char 23////////////////////////////////////////////
$Label_1char = GUICtrlCreateLabel("unknown",300, 105,100,15)
$Label_2char = GUICtrlCreateLabel("0/0",300, 120,100,15)
$Label_3char = GUICtrlCreateLabel("0/0",300, 135,100,15)
;//////////////////////////////////////////////////
;char 13////////////////////////////////////////////
$Label_1char13 = GUICtrlCreateLabel("unknown",200, 105,100,15)
$Label_2char13 = GUICtrlCreateLabel("0/0",200, 120,100,15)
$Label_3char13 = GUICtrlCreateLabel("0/0",200, 135,100,15)
;//////////////////////////////////////////////////
;char 24////////////////////////////////////////////
$Label_1char24 = GUICtrlCreateLabel("unknown",300, 150,100,15)
$Label_2char24 = GUICtrlCreateLabel("0/0",300, 165,100,15)
$Label_3char24 = GUICtrlCreateLabel("0/0",300, 180,100,15)
;//////////////////////////////////////////////////
;char 14////////////////////////////////////////////
$Label_1char14 = GUICtrlCreateLabel("unknown",200, 150,100,15)
$Label_2char14 = GUICtrlCreateLabel("0/0",200, 165,100,15)
$Label_3char14 = GUICtrlCreateLabel("0/0",200, 180,100,15)
;//////////////////////////////////////////////////
;char 25////////////////////////////////////////////
$Label_1char25 = GUICtrlCreateLabel("unknown",300, 195,100,15)
$Label_2char25 = GUICtrlCreateLabel("0/0",300, 210,100,15)
$Label_3char25 = GUICtrlCreateLabel("0/0",300, 225,100,15)
;//////////////////////////////////////////////////
;char 15////////////////////////////////////////////
$Label_1char15 = GUICtrlCreateLabel("unknown",200, 195,100,15)
$Label_2char15 = GUICtrlCreateLabel("0/0",200, 210,100,15)
$Label_3char15 = GUICtrlCreateLabel("0/0",200, 225,100,15)
;//////////////////////////////////////////////////
;char 22////////////////////////////////////////////
$Label_1char22 = GUICtrlCreateLabel("unknown",300, 60,100,15)
$Label_2char22 = GUICtrlCreateLabel("0/0",300, 75,100,15)
$Label_3char22 = GUICtrlCreateLabel("0/0",300, 90,100,15)
;//////////////////////////////////////////////////
;char 12////////////////////////////////////////////
$Label_1char12 = GUICtrlCreateLabel("unknown",200, 60,100,15)
$Label_2char12 = GUICtrlCreateLabel("0/0",200, 75,100,15)
$Label_3char12 = GUICtrlCreateLabel("0/0",200, 90,100,15)
;//////////////////////////////////////////////////
;char 21////////////////////////////////////////////
$Label_1char21 = GUICtrlCreateLabel("unknown",300, 15,100,15)
$Label_2char21 = GUICtrlCreateLabel("0/0",300, 30,100,15)
$Label_3char21 = GUICtrlCreateLabel("0/0",300, 45,100,15)
;//////////////////////////////////////////////////
;char 11////////////////////////////////////////////
$Label_1char11 = GUICtrlCreateLabel("unknown",200, 15,100,15)
$Label_2char11 = GUICtrlCreateLabel("0/0",200, 30,100,15)
$Label_3char11 = GUICtrlCreateLabel("0/0",200, 45,100,15)
;//////////////////////////////////////////////////
GUISetState ()
$Process1 = WinGetProcess("[CLASS:##RAYSDDWNDCLASS20010705##]") ;the window to get PID
While 1
$msg = GUIGetMsg()
if $msg = $GUI_EVENT_CLOSE Then
ExitLoop
else
char23()
char13()
char22()
char12()
char24()
char14()
char25()
char15()
char11()
char12()
mob23()
mob13()
mob24()
mob14()
mob22()
mob12()
mob25()
mob15()
mob11()
mob21()
EndIf
Wend
Func mob23()
local $checking_mob = 0x01313A18; checking mob
$name = 0x01313A20 ;mob name
$hp = 0x01313A3C ; mob hp
$maxhp = 0x01313A38 ; mob maxhp
$mp = 0x01313A44 ; mob mp
$maxmp = 0x01313A40 ; mob maxmp
Global $mob1check[6]
; finding values of all variables
$Mem_Open23 = _MemoryOpen($Process1) ;must open before you can read address
$mob1check[0] = _MemoryRead($checking_mob, $Mem_Open23) ;reads value to check mob exist or not at memory address
$mob1check[1] = _MemoryRead($name, $Mem_Open23, "char[255]")
$mob1check[2] = _MemoryRead($hp, $Mem_Open23)
$mob1check[3] = _MemoryRead($maxhp, $Mem_Open23)
$mob1check[4] = _MemoryRead($mp, $Mem_Open23)
$mob1check[5] = _MemoryRead($maxmp, $Mem_Open23)
_MemoryClose($Mem_Open23) ;close it afterwards
if $mob1check[0]=1 Then
GUICtrlSetData($Label_1, $mob1check[1])
GUICtrlSetData($Label_2, $mob1check[2] &" / "&$mob1check[3])
GUICtrlSetData($Label_3, $mob1check[4] &" / "&$mob1check[5])
EndIf
EndFunc
Func mob13()
local $checking_mob13 = 0x01313bec; checking mob
$name13 = 0x01313A20 + 0x1D4 ;mob name
$hp13 = 0x01313C10; mob hp
$maxhp13 = 0x01313C0C; mob maxhp
$mp13 = 0x01313C18 ; mob mp
$maxmp13 = 0x01313C14; mob maxmp
Global $mob13check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob13check[0] = _MemoryRead($checking_mob13, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob13check[1] = _MemoryRead($name13, $Mem_Open, "char[255]")
$mob13check[2] = _MemoryRead($hp13, $Mem_Open)
$mob13check[3] = _MemoryRead($maxhp13, $Mem_Open)
$mob13check[4] = _MemoryRead($mp13, $Mem_Open)
$mob13check[5] = _MemoryRead($maxmp13, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob13check[0]=1 Then
GUICtrlSetData($Label_131, $mob13check[1])
GUICtrlSetData($Label_132, $mob13check[2] &" / "&$mob13check[3])
GUICtrlSetData($Label_133, $mob13check[4] &" / "&$mob13check[5])
EndIf
EndFunc
Func mob24()
local $checking_mob24 = 0x01313bec + 0x1D4; checking mob
$name24 = 0x01313A20 + 0x1D4 + 0x1D4 ;mob name
$hp24 = 0x01313C10 + 0x1D4; mob hp
$maxhp24 = 0x01313C0C + 0x1D4; mob maxhp
$mp24= 0x01313C18 + 0x1D4; mob mp
$maxmp24 = 0x01313C14 + 0x1D4; mob maxmp
Global $mob24check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob24check[0] = _MemoryRead($checking_mob24, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob24check[1] = _MemoryRead($name24, $Mem_Open, "char[255]")
$mob24check[2] = _MemoryRead($hp24, $Mem_Open)
$mob24check[3] = _MemoryRead($maxhp24, $Mem_Open)
$mob24check[4] = _MemoryRead($mp24, $Mem_Open)
$mob24check[5] = _MemoryRead($maxmp24, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob24check[0]=1 Then
GUICtrlSetData($Label_241, $mob24check[1])
GUICtrlSetData($Label_242, $mob24check[2] &" / "&$mob24check[3])
GUICtrlSetData($Label_243, $mob24check[4] &" / "&$mob24check[5])
EndIf
EndFunc
Func mob14()
local $checking_mob14 = 0x01313bec + 0x1D4*2; checking mob
$name14 = 0x01313A20 + 0x1D4 + 0x1D4*2 ;mob name
$hp14 = 0x01313C10 + 0x1D4*2; mob hp
$maxhp14 = 0x01313C0C + 0x1D4*2; mob maxhp
$mp14= 0x01313C18 + 0x1D4*2; mob mp
$maxmp14 = 0x01313C14 + 0x1D4*2; mob maxmp
Global $mob14check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob14check[0] = _MemoryRead($checking_mob14, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob14check[1] = _MemoryRead($name14, $Mem_Open, "char[255]")
$mob14check[2] = _MemoryRead($hp14, $Mem_Open)
$mob14check[3] = _MemoryRead($maxhp14, $Mem_Open)
$mob14check[4] = _MemoryRead($mp14, $Mem_Open)
$mob14check[5] = _MemoryRead($maxmp14, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob14check[0]=1 Then
GUICtrlSetData($Label_141, $mob14check[1])
GUICtrlSetData($Label_142, $mob14check[2] &" / "&$mob14check[3])
GUICtrlSetData($Label_143, $mob14check[4] &" / "&$mob14check[5])
EndIf
EndFunc
Func mob22()
local $checking_mob22 = 0x01313bec + 0x1D4*3; checking mob
$name22 = 0x01313A20 + 0x1D4 + 0x1D4*3 ;mob name
$hp22 = 0x01313C10 + 0x1D4*3; mob hp
$maxhp22 = 0x01313C0C + 0x1D4*3; mob maxhp
$mp22= 0x01313C18 + 0x1D4*3; mob mp
$maxmp22 = 0x01313C14 + 0x1D4*3; mob maxmp
Global $mob22check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob22check[0] = _MemoryRead($checking_mob22, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob22check[1] = _MemoryRead($name22, $Mem_Open, "char[255]")
$mob22check[2] = _MemoryRead($hp22, $Mem_Open)
$mob22check[3] = _MemoryRead($maxhp22, $Mem_Open)
$mob22check[4] = _MemoryRead($mp22, $Mem_Open)
$mob22check[5] = _MemoryRead($maxmp22, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob22check[0]=1 Then
GUICtrlSetData($Label_221, $mob22check[1])
GUICtrlSetData($Label_222, $mob22check[2] &" / "&$mob22check[3])
GUICtrlSetData($Label_223, $mob22check[4] &" / "&$mob22check[5])
EndIf
EndFunc
Func mob12()
local $checking_mob12 = 0x01313bec + 0x1D4*4; checking mob
$name12 = 0x01313A20 + 0x1D4 + 0x1D4*4 ;mob name
$hp12 = 0x01313C10 + 0x1D4*4; mob hp
$maxhp12 = 0x01313C0C + 0x1D4*4; mob maxhp
$mp12= 0x01313C18 + 0x1D4*4; mob mp
$maxmp12 = 0x01313C14 + 0x1D4*4; mob maxmp
Global $mob12check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob12check[0] = _MemoryRead($checking_mob12, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob12check[1] = _MemoryRead($name12, $Mem_Open, "char[255]")
$mob12check[2] = _MemoryRead($hp12, $Mem_Open)
$mob12check[3] = _MemoryRead($maxhp12, $Mem_Open)
$mob12check[4] = _MemoryRead($mp12, $Mem_Open)
$mob12check[5] = _MemoryRead($maxmp12, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob12check[0]=1 Then
GUICtrlSetData($Label_121, $mob12check[1])
GUICtrlSetData($Label_122, $mob12check[2] &" / "&$mob12check[3])
GUICtrlSetData($Label_123, $mob12check[4] &" / "&$mob12check[5])
EndIf
EndFunc
Func mob25()
local $checking_mob25 = 0x01313bec + 0x1D4*5; checking mob
$name25 = 0x01313A20 + 0x1D4 + 0x1D4*5 ;mob name
$hp25 = 0x01313C10 + 0x1D4*5; mob hp
$maxhp25 = 0x01313C0C + 0x1D4*5; mob maxhp
$mp25= 0x01313C18 + 0x1D4*5; mob mp
$maxmp25 = 0x01313C14 + 0x1D4*5; mob maxmp
Global $mob25check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob25check[0] = _MemoryRead($checking_mob25, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob25check[1] = _MemoryRead($name25, $Mem_Open, "char[255]")
$mob25check[2] = _MemoryRead($hp25, $Mem_Open)
$mob25check[3] = _MemoryRead($maxhp25, $Mem_Open)
$mob25check[4] = _MemoryRead($mp25, $Mem_Open)
$mob25check[5] = _MemoryRead($maxmp25, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob25check[0]=1 Then
GUICtrlSetData($Label_251, $mob25check[1])
GUICtrlSetData($Label_252, $mob25check[2] &" / "&$mob25check[3])
GUICtrlSetData($Label_253, $mob25check[4] &" / "&$mob25check[5])
EndIf
EndFunc
Func mob15()
local $checking_mob15 = 0x01313bec + 0x1D4*6; checking mob
$name15 = 0x01313A20 + 0x1D4 + 0x1D4*6 ;mob name
$hp15 = 0x01313C10 + 0x1D4*6; mob hp
$maxhp15 = 0x01313C0C + 0x1D4*6; mob maxhp
$mp15= 0x01313C18 + 0x1D4*6; mob mp
$maxmp15 = 0x01313C14 + 0x1D4*6; mob maxmp
Global $mob15check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob15check[0] = _MemoryRead($checking_mob15, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob15check[1] = _MemoryRead($name15, $Mem_Open, "char[255]")
$mob15check[2] = _MemoryRead($hp15, $Mem_Open)
$mob15check[3] = _MemoryRead($maxhp15, $Mem_Open)
$mob15check[4] = _MemoryRead($mp15, $Mem_Open)
$mob15check[5] = _MemoryRead($maxmp15, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob15check[0]=1 Then
GUICtrlSetData($Label_151, $mob15check[1])
GUICtrlSetData($Label_152, $mob15check[2] &" / "&$mob15check[3])
GUICtrlSetData($Label_153, $mob15check[4] &" / "&$mob15check[5])
EndIf
EndFunc
Func mob21()
local $checking_mob21 = 0x01313bec + 0x1D4*7; checking mob
$name21 = 0x01313A20 + 0x1D4 + 0x1D4*7 ;mob name
$hp21 = 0x01313C10 + 0x1D4*7; mob hp
$maxhp21 = 0x01313C0C + 0x1D4*7; mob maxhp
$mp21= 0x01313C18 + 0x1D4*7; mob mp
$maxmp21 = 0x01313C14 + 0x1D4*7; mob maxmp
Global $mob21check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob21check[0] = _MemoryRead($checking_mob21, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob21check[1] = _MemoryRead($name21, $Mem_Open, "char[255]")
$mob21check[2] = _MemoryRead($hp21, $Mem_Open)
$mob21check[3] = _MemoryRead($maxhp21, $Mem_Open)
$mob21check[4] = _MemoryRead($mp21, $Mem_Open)
$mob21check[5] = _MemoryRead($maxmp21, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob21check[0]=1 Then
GUICtrlSetData($Label_211, $mob21check[1])
GUICtrlSetData($Label_212, $mob21check[2] &" / "&$mob21check[3])
GUICtrlSetData($Label_213, $mob21check[4] &" / "&$mob21check[5])
EndIf
EndFunc
Func mob11()
local $checking_mob11 = 0x01313bec + 0x1D4*8; checking mob
$name11 = 0x01313A20 + 0x1D4 + 0x1D4*8 ;mob name
$hp11 = 0x01313C10 + 0x1D4*8; mob hp
$maxhp11 = 0x01313C0C + 0x1D4*8; mob maxhp
$mp11= 0x01313C18 + 0x1D4*8; mob mp
$maxmp11 = 0x01313C14 + 0x1D4*8; mob maxmp
Global $mob11check[6]
; finding values of all variables
$Mem_Open = _MemoryOpen($Process1) ;must open before you can read address
$mob11check[0] = _MemoryRead($checking_mob11, $Mem_Open) ;reads value to check mob exist or not at memory address
$mob11check[1] = _MemoryRead($name11, $Mem_Open, "char[255]")
$mob11check[2] = _MemoryRead($hp11, $Mem_Open)
$mob11check[3] = _MemoryRead($maxhp11, $Mem_Open)
$mob11check[4] = _MemoryRead($mp11, $Mem_Open)
$mob11check[5] = _MemoryRead($maxmp11, $Mem_Open)
_MemoryClose($Mem_Open) ;close it afterwards
if $mob11check[0]=1 Then
GUICtrlSetData($Label_111, $mob11check[1])
GUICtrlSetData($Label_112, $mob11check[2] &" / "&$mob11check[3])
GUICtrlSetData($Label_113, $mob11check[4] &" / "&$mob11check[5])
EndIf
EndFunc
;///////////////////////////////////////////////////////////
Func char23()
local $checking_char = 0x01313A18 - 0x1248; checking mob
$namechar = 0x01313A20 - 0x1248;mob name
$hpchar = 0x01313A3C - 0x1248; mob hp
$maxhpchar = 0x01313A38 - 0x1248; mob maxhp
$mpchar = 0x01313A44 - 0x1248; mob mp
$maxmpchar = 0x01313A40 - 0x1248; mob maxmp
Global $char1check[6]
; finding values of all variables
$Mem_Openc23 = _MemoryOpen($Process1) ;must open before you can read address
$char1check[0] = _MemoryRead($checking_char, $Mem_Openc23) ;reads value to check mob exist or not at memory address
$char1check[1] = _MemoryRead($namechar, $Mem_Openc23, "char[255]")
$char1check[2] = _MemoryRead($hpchar, $Mem_Openc23)
$char1check[3] = _MemoryRead($maxhpchar, $Mem_Openc23)
$char1check[4] = _MemoryRead($mpchar, $Mem_Openc23)
$char1check[5] = _MemoryRead($maxmpchar, $Mem_Openc23)
_MemoryClose($Mem_Openc23) ;close it afterwards
if $char1check[0]=1 Then
GUICtrlSetData($Label_1char, $char1check[1])
GUICtrlSetData($Label_2char, $char1check[2] &" / "&$char1check[3])
GUICtrlSetData($Label_3char, $char1check[4] &" / "&$char1check[5])
EndIf
EndFunc
Func char13()
local $checking_char13 = 0x01313A18 - 0x1248 +0x1D4; checking mob
$namechar13 = 0x01313A20 - 0x1248+0x1D4;mob name
$hpchar13 = 0x01313A3C - 0x1248+0x1D4; mob hp
$maxhpchar13 = 0x01313A38 - 0x1248+0x1D4; mob maxhp
$mpchar13 = 0x01313A44 - 0x1248+0x1D4; mob mp
$maxmpchar13 = 0x01313A40 - 0x1248+0x1D4; mob maxmp
Global $char13check[6]
; finding values of all variables
$Mem_Openc13 = _MemoryOpen($Process1) ;must open before you can read address
$char13check[0] = _MemoryRead($checking_char13, $Mem_Openc13) ;reads value to check mob exist or not at memory address
$char13check[1] = _MemoryRead($namechar13, $Mem_Openc13, "char[255]")
$char13check[2] = _MemoryRead($hpchar13, $Mem_Openc13)
$char13check[3] = _MemoryRead($maxhpchar13, $Mem_Openc13)
$char13check[4] = _MemoryRead($mpchar13, $Mem_Openc13)
$char13check[5] = _MemoryRead($maxmpchar13, $Mem_Openc13)
_MemoryClose($Mem_Openc13) ;close it afterwards
if $char13check[0]=1 Then
GUICtrlSetData($Label_1char13, $char13check[1])
GUICtrlSetData($Label_2char13, $char13check[2] &" / "&$char13check[3])
GUICtrlSetData($Label_3char13, $char13check[4] &" / "&$char13check[5])
EndIf
EndFunc
Func char24()
local $checking_char24 = 0x01313A18 - 0x1248 +0x1D4*2; checking mob
$namechar24 = 0x01313A20 - 0x1248+0x1D4*2;mob name
$hpchar24 = 0x01313A3C - 0x1248+0x1D4*2; mob hp
$maxhpchar24 = 0x01313A38 - 0x1248+0x1D4*2; mob maxhp
$mpchar24 = 0x01313A44 - 0x1248+0x1D4*2; mob mp
$maxmpchar24 = 0x01313A40 - 0x1248+0x1D4*2; mob maxmp
Global $char24check[6]
; finding values of all variables
$Mem_Openc24 = _MemoryOpen($Process1) ;must open before you can read address
$char24check[0] = _MemoryRead($checking_char24, $Mem_Openc24) ;reads value to check mob exist or not at memory address
$char24check[1] = _MemoryRead($namechar24, $Mem_Openc24, "char[255]")
$char24check[2] = _MemoryRead($hpchar24, $Mem_Openc24)
$char24check[3] = _MemoryRead($maxhpchar24, $Mem_Openc24)
$char24check[4] = _MemoryRead($mpchar24, $Mem_Openc24)
$char24check[5] = _MemoryRead($maxmpchar24, $Mem_Openc24)
_MemoryClose($Mem_Openc24) ;close it afterwards
if $char24check[0]=1 Then
GUICtrlSetData($Label_1char24, $char24check[1])
GUICtrlSetData($Label_2char24, $char24check[2] &" / "&$char24check[3])
GUICtrlSetData($Label_3char24, $char24check[4] &" / "&$char24check[5])
EndIf
EndFunc
Func char14()
local $checking_char14 = 0x01313A18 - 0x1248 +0x1D4*3; checking mob
$namechar14 = 0x01313A20 - 0x1248+0x1D4*3;mob name
$hpchar14 = 0x01313A3C - 0x1248+0x1D4*3; mob hp
$maxhpchar14 = 0x01313A38 - 0x1248+0x1D4*3; mob maxhp
$mpchar14 = 0x01313A44 - 0x1248+0x1D4*3; mob mp
$maxmpchar14 = 0x01313A40 - 0x1248+0x1D4*3; mob maxmp
Global $char14check[6]
; finding values of all variables
$Mem_Openc14 = _MemoryOpen($Process1) ;must open before you can read address
$char14check[0] = _MemoryRead($checking_char14, $Mem_Openc14) ;reads value to check mob exist or not at memory address
$char14check[1] = _MemoryRead($namechar14, $Mem_Openc14, "char[255]")
$char14check[2] = _MemoryRead($hpchar14, $Mem_Openc14)
$char14check[3] = _MemoryRead($maxhpchar14, $Mem_Openc14)
$char14check[4] = _MemoryRead($mpchar14, $Mem_Openc14)
$char14check[5] = _MemoryRead($maxmpchar14, $Mem_Openc14)
_MemoryClose($Mem_Openc14) ;close it afterwards
if $char14check[0]=1 Then
GUICtrlSetData($Label_1char14, $char14check[1])
GUICtrlSetData($Label_2char14, $char14check[2] &" / "&$char14check[3])
GUICtrlSetData($Label_3char14, $char14check[4] &" / "&$char14check[5])
EndIf
EndFunc
Func char22()
local $checking_char22 = 0x01313A18 - 0x1248 +0x1D4*4; checking mob
$namechar22 = 0x01313A20 - 0x1248+0x1D4*4;mob name
$hpchar22 = 0x01313A3C - 0x1248+0x1D4*4; mob hp
$maxhpchar22 = 0x01313A38 - 0x1248+0x1D4*4; mob maxhp
$mpchar22 = 0x01313A44 - 0x1248+0x1D4*4; mob mp
$maxmpchar22 = 0x01313A40 - 0x1248+0x1D4*4; mob maxmp
Global $char22check[6]
; finding values of all variables
$Mem_Openc22 = _MemoryOpen($Process1) ;must open before you can read address
$char22check[0] = _MemoryRead($checking_char22, $Mem_Openc22) ;reads value to check mob exist or not at memory address
$char22check[1] = _MemoryRead($namechar22, $Mem_Openc22, "char[255]")
$char22check[2] = _MemoryRead($hpchar22, $Mem_Openc22)
$char22check[3] = _MemoryRead($maxhpchar22, $Mem_Openc22)
$char22check[4] = _MemoryRead($mpchar22, $Mem_Openc22)
$char22check[5] = _MemoryRead($maxmpchar22, $Mem_Openc22)
_MemoryClose($Mem_Openc22) ;close it afterwards
if $char22check[0]=1 Then
GUICtrlSetData($Label_1char22, $char22check[1])
GUICtrlSetData($Label_2char22, $char22check[2] &" / "&$char22check[3])
GUICtrlSetData($Label_3char22, $char22check[4] &" / "&$char22check[5])
EndIf
EndFunc
Func char12()
local $checking_char12 = 0x01313A18 - 0x1248 +0x1D4*5; checking mob
$namechar12 = 0x01313A20 - 0x1248+0x1D4*5;mob name
$hpchar12 = 0x01313A3C - 0x1248+0x1D4*5; mob hp
$maxhpchar12 = 0x01313A38 - 0x1248+0x1D4*5; mob maxhp
$mpchar12 = 0x01313A44 - 0x1248+0x1D4*5; mob mp
$maxmpchar12 = 0x01313A40 - 0x1248+0x1D4*5; mob maxmp
Global $char12check[6]
; finding values of all variables
$Mem_Openc12 = _MemoryOpen($Process1) ;must open before you can read address
$char12check[0] = _MemoryRead($checking_char12, $Mem_Openc12) ;reads value to check mob exist or not at memory address
$char12check[1] = _MemoryRead($namechar12, $Mem_Openc12, "char[255]")
$char12check[2] = _MemoryRead($hpchar12, $Mem_Openc12)
$char12check[3] = _MemoryRead($maxhpchar12, $Mem_Openc12)
$char12check[4] = _MemoryRead($mpchar12, $Mem_Openc12)
$char12check[5] = _MemoryRead($maxmpchar12, $Mem_Openc12)
_MemoryClose($Mem_Openc12) ;close it afterwards
if $char12check[0]=1 Then
GUICtrlSetData($Label_1char12, $char12check[1])
GUICtrlSetData($Label_2char12, $char12check[2] &" / "&$char12check[3])
GUICtrlSetData($Label_3char12, $char12check[4] &" / "&$char12check[5])
EndIf
EndFunc
Func char25()
local $checking_char25 = 0x01313A18 - 0x1248 +0x1D4*6; checking mob
$namechar25 = 0x01313A20 - 0x1248+0x1D4*6;mob name
$hpchar25 = 0x01313A3C - 0x1248+0x1D4*6; mob hp
$maxhpchar25 = 0x01313A38 - 0x1248+0x1D4*6; mob maxhp
$mpchar25 = 0x01313A44 - 0x1248+0x1D4*6; mob mp
$maxmpchar25 = 0x01313A40 - 0x1248+0x1D4*6; mob maxmp
Global $char25check[6]
; finding values of all variables
$Mem_Openc25 = _MemoryOpen($Process1) ;must open before you can read address
$char25check[0] = _MemoryRead($checking_char25, $Mem_Openc25) ;reads value to check mob exist or not at memory address
$char25check[1] = _MemoryRead($namechar25, $Mem_Openc25, "char[255]")
$char25check[2] = _MemoryRead($hpchar25, $Mem_Openc25)
$char25check[3] = _MemoryRead($maxhpchar25, $Mem_Openc25)
$char25check[4] = _MemoryRead($mpchar25, $Mem_Openc25)
$char25check[5] = _MemoryRead($maxmpchar25, $Mem_Openc25)
_MemoryClose($Mem_Openc25) ;close it afterwards
if $char25check[0]=1 Then
GUICtrlSetData($Label_1char25, $char25check[1])
GUICtrlSetData($Label_2char25, $char25check[2] &" / "&$char25check[3])
GUICtrlSetData($Label_3char25, $char25check[4] &" / "&$char25check[5])
EndIf
EndFunc
Func char15()
local $checking_char15 = 0x01313A18 - 0x1248 +0x1D4*7; checking mob
$namechar15 = 0x01313A20 - 0x1248+0x1D4*7;mob name
$hpchar15 = 0x01313A3C - 0x1248+0x1D4*7; mob hp
$maxhpchar15 = 0x01313A38 - 0x1248+0x1D4*7; mob maxhp
$mpchar15 = 0x01313A44 - 0x1248+0x1D4*7; mob mp
$maxmpchar15 = 0x01313A40 - 0x1248+0x1D4*7; mob maxmp
Global $char15check[6]
; finding values of all variables
$Mem_Openc15 = _MemoryOpen($Process1) ;must open before you can read address
$char15check[0] = _MemoryRead($checking_char15, $Mem_Openc15) ;reads value to check mob exist or not at memory address
$char15check[1] = _MemoryRead($namechar15, $Mem_Openc15, "char[255]")
$char15check[2] = _MemoryRead($hpchar15, $Mem_Openc15)
$char15check[3] = _MemoryRead($maxhpchar15, $Mem_Openc15)
$char15check[4] = _MemoryRead($mpchar15, $Mem_Openc15)
$char15check[5] = _MemoryRead($maxmpchar15, $Mem_Openc15)
_MemoryClose($Mem_Openc15) ;close it afterwards
if $char15check[0]=1 Then
GUICtrlSetData($Label_1char15, $char15check[1])
GUICtrlSetData($Label_2char15, $char15check[2] &" / "&$char15check[3])
GUICtrlSetData($Label_3char15, $char15check[4] &" / "&$char15check[5])
EndIf
EndFunc
Func char21()
local $checking_char21 = 0x01313A18 - 0x1248 +0x1D4*8; checking mob
$namechar21 = 0x01313A20 - 0x1248+0x1D4*8;mob name
$hpchar21 = 0x01313A3C - 0x1248+0x1D4*8; mob hp
$maxhpchar21 = 0x01313A38 - 0x1248+0x1D4*8; mob maxhp
$mpchar21 = 0x01313A44 - 0x1248+0x1D4*8; mob mp
$maxmpchar21 = 0x01313A40 - 0x1248+0x1D4*8; mob maxmp
Global $char21check[6]
; finding values of all variables
$Mem_Openc21 = _MemoryOpen($Process1) ;must open before you can read address
$char21check[0] = _MemoryRead($checking_char21, $Mem_Openc21) ;reads value to check mob exist or not at memory address
$char21check[1] = _MemoryRead($namechar21, $Mem_Openc21, "char[255]")
$char21check[2] = _MemoryRead($hpchar21, $Mem_Openc21)
$char21check[3] = _MemoryRead($maxhpchar21, $Mem_Openc21)
$char21check[4] = _MemoryRead($mpchar21, $Mem_Openc21)
$char21check[5] = _MemoryRead($maxmpchar21, $Mem_Openc21)
_MemoryClose($Mem_Openc21) ;close it afterwards
;if $char21check[0]=1 Then
GUICtrlSetData($Label_1char21, $char21check[1])
GUICtrlSetData($Label_2char21, $char21check[2] &" / "&$char21check[3])
GUICtrlSetData($Label_3char21, $char21check[4] &" / "&$char21check[5])
;EndIf
EndFunc
Func char11()
local $checking_char11 = 0x01313A18 - 0x1248 +0x1D4*9; checking mob
$namechar11 = 0x01313A20 - 0x1248+0x1D4*9;mob name
$hpchar11 = 0x01313A3C - 0x1248+0x1D4*9; mob hp
$maxhpchar11 = 0x01313A38 - 0x1248+0x1D4*9; mob maxhp
$mpchar11 = 0x01313A44 - 0x1248+0x1D4*9; mob mp
$maxmpchar11 = 0x01313A40 - 0x1248+0x1D4*9; mob maxmp
Global $char11check[6]
; finding values of all variables
$Mem_Openc11 = _MemoryOpen($Process1) ;must open before you can read address
$char11check[0] = _MemoryRead($checking_char11, $Mem_Openc11) ;reads value to check mob exist or not at memory address
$char11check[1] = _MemoryRead($namechar11, $Mem_Openc11, "char[255]")
$char11check[2] = _MemoryRead($hpchar11, $Mem_Openc11)
$char11check[3] = _MemoryRead($maxhpchar11, $Mem_Openc11)
$char11check[4] = _MemoryRead($mpchar11, $Mem_Openc11)
$char11check[5] = _MemoryRead($maxmpchar11, $Mem_Openc11)
_MemoryClose($Mem_Openc11) ;close it afterwards
;if $char11check[0]=1 Then
GUICtrlSetData($Label_1char11, $char11check[1])
GUICtrlSetData($Label_2char11, $char11check[2] &" / "&$char11check[3])
GUICtrlSetData($Label_3char11, $char11check[4] &" / "&$char11check[5])
;EndIf
EndFunc