Добавлен , опубликован
Алгоритмы, Наработки и Способности
Способ реализации:
Jass
Тип:
Наработка
Версия Warcraft:
1.26\1.27
Собственно обновленный детект типов урона и атаки от DracoL1ch, который позволяет отловить все параметры урона, такие как атака ближнего\дальнего боя, тип атаки, тип урона, изначальный урон без учета резистов.
Для работы этого хака нужна последняя версия мемхака, который приложен ниже.
сам хак

globals
	integer DamageIncrementer = 0
	integer array DamageAttackTypes
	integer array DamageDamageTypes
	real array DamageValues
	//прочие переменные есть в самом мемхаке
endglobals

function TestMissileHandlerWorker takes nothing returns nothing
    local integer offset=RMem(pDamageEspData)
    local integer target=RMem(pDamageTarget)
   
    if offset>0 then
        set offset=Memory[offset/4+2]//RMem(offset+0x8)
    endif
    if DamageIncrementer>8000 then
        set DamageIncrementer=10
    endif
    set DamageIncrementer=DamageIncrementer+1
    //call BJDebugMsg("dmg event "+I2S(DamageIncrementer)+" source="+Id2String(RMem(target+0x30))+" val="+R2S(mI2R(Memory[offset/4+0x10/4])))
    if offset>0 then
        set DamageAttackTypes[DamageIncrementer]=Memory[offset/4+0x20/4]//RMem(offset+0x20)
        set DamageDamageTypes[DamageIncrementer]=Memory[offset/4+0x14/4]//RMem(offset+0x14)
        set DamageValues[DamageIncrementer]=mI2R(Memory[offset/4+0x10/4])//RMem(offset+0x10))
        //call ExecuteFunc("PreDamageWorker")
    endif
endfunction
 
function TestMissileHandler takes nothing returns nothing
    call TestMissileHandlerWorker( )
//  local integer offset=RMem(RMem(pDamageEspData)+0x8)
//  if DamageIncrementer>8000 then
//      set DamageIncrementer=10
//  endif
//  set DamageIncrementer=DamageIncrementer+1
//  set DamageValues[DamageIncrementer]=mI2R(RMem(offset+0x10))
//  set DamageAttackTypes[DamageIncrementer]=RMem(offset+0x20)
//  set DamageDamageTypes[DamageIncrementer]=RMem(offset+0x14)
//  call TestIfdamageHookCrash()
//  return
//  call ExecuteFunc("PreDamageWorker")
    //Barrage missiles always have 0x8 == 0x10000000
//  call BJDebugMsg("Target" + Int2Hex(RMem(pDamageTarget)))
//  call BJDebugMsg(Int2Hex(RMem(RMem(RMem(pDamageEspData)+0x8)+0x0)))//source
//  call BJDebugMsg(Int2Hex(RMem(RMem(RMem(pDamageEspData)+0x8)+0x8)))//proj or link onto something
// 
//  call BJDebugMsg(Int2Hex(RMem(RMem(RMem(pDamageEspData)+0x8)+0xC)))//0x101 == ranged, 0x100 == melee
//  call BJDebugMsg("Damage:" + R2S(mI2R(RMem(RMem(RMem(pDamageEspData)+0x8)+0x10))))//damage val
endfunction
 
function InitializeDamageHandler takes integer pTriggerHandle returns nothing
    local integer pUnitDamageHandler = pUnitVtable+0x120
    local integer oldprotection = ChangeOffsetProtection(pUnitDamageHandler,4,0x40)
    set Memory[pReservedMemoryForDamageHandler/4+0]=0xB890C08B
    set Memory[pReservedMemoryForDamageHandler/4+1]=pDamageTarget
    set Memory[pReservedMemoryForDamageHandler/4+2]=0xB8900889
    set Memory[pReservedMemoryForDamageHandler/4+3]=pDamageEspData
    set Memory[pReservedMemoryForDamageHandler/4+4]=0x68602089
    set Memory[pReservedMemoryForDamageHandler/4+5]=pTriggerHandle
    set Memory[pReservedMemoryForDamageHandler/4+6]=0xB890C08B
    set Memory[pReservedMemoryForDamageHandler/4+7]=pTriggerExecute
    set Memory[pReservedMemoryForDamageHandler/4+8]=0xC483D0FF
    set Memory[pReservedMemoryForDamageHandler/4+9]=0xB8906104
    set Memory[pReservedMemoryForDamageHandler/4+10]=pRealUnitDamageHandler
    set Memory[pReservedMemoryForDamageHandler/4+11]=0xCCCCE0FF
 
     //call BJDebugMsg(Int2Hex(pReservedMemoryForDamageHandler))
   
    call WMem(pUnitDamageHandler,pReservedMemoryForDamageHandler)
   
    set oldprotection = ChangeOffsetProtection(pUnitDamageHandler,4,oldprotection)
   
endfunction
Инициализация хака
	set t=CreateTrigger()
    call TriggerAddAction(t,function TestMissileHandler)
    call InitializeDamageHandler(GetHandleId(t))
	//далее уже делаем что хотим в функции TestMissileHandler )
А вот еще одна полезная функция:
Проверка типа урона
Кто уже скачал систему заметил, что тип атаки это числа от 0 до 6, каждый тип имеет свое число, задается через ConvertDamageType(N)
Но как же быть с типом урона, система выводит на экран какие то числа от 0 до нескольких тысяч, которые не похожи на damagetype, как же их превратить в тип урона, если ConvertDamageType() возвращает null с этих чисел? А вот как, код приведенный ниже поможет вам сопоставить константы типов урона и выведенные системой данные:
function DT2DT takes integer k returns integer
    local integer i = 1
    if k == 0 then
        return 0
    endif
    loop
        exitwhen k / 2 <= 1
        set i = i + 1
        set k = k / 2
    endloop
    return i
endfunction

	//пример использования:
	ConvertDamageType(DT2DT(dmgTypeHex))==DAMAGE_TYPE_FIRE
`
ОЖИДАНИЕ РЕКЛАМЫ...

Показан только небольшой набор комментариев вокруг указанного. Перейти к актуальным.
0
32
7 лет назад
0
Ige, нетак, фигню написал...
Методом тыка вам тут только фаталы ловить, нужен Cheat Engine и познание структуры триггеров, покуда у вас этого нету, можно не старатся, у драколича ушело на это больше года...
Пишите личу про смену урона, только он колупал и проверял это, возможно что урон вовсе не сменить с уровня jass.
pro100master, Нужно еще понимать как там устроена структура и где прилеплен код к событию...
0
23
7 лет назад
0
call WMem(offset+0x10, положительное число) // будет сигналить урон 0.000
call WMem(offset+0x10, отрицательное число) // будет сигналить отрицательный урон 0.500

Дальше колдую с 0x10 машиный код 
quq_CCCP:
Ige, нетак, фигню написал...
Методом тыка вам тут только фаталы ловить, нужен Cheat Engine и познание структуры триггеров, покуда у вас этого нету, можно не старатся, у драколича ушело на это больше года...
Пишите личу про смену урона, только он колупал и проверял это, возможно что урон вовсе не сменить с уровня jass.
pro100master, Нужно еще понимать как там устроена структура и где прилеплен код к событию...
Он чета не в сети уже день даже на хайве молчит подождем =)
0
7
7 лет назад
0
quq_CCCP, пока нет какого-либо руководства, приходится все проверять эмпирическим методом.
Фигня или не фигня (хотя я склоняюсь как раз к первому варианту), только она пока что работает и без сбоев
Загруженные файлы
3
16
7 лет назад
3
function OnDamageReceivedHookWorker takes nothing returns nothing
	local integer offset=Memory[pDamageEspData/4]
	local integer target=Memory[pDamageTarget/4]
	local integer hu
	local real bonusdmg
	local real flatbonusdmg
	if offset>0 then
		set offset=Memory[offset/4+2]//RMem(offset+0x8)
	endif
	if DamageIncrementer>8000 then
		set DamageIncrementer=10
	endif
	set DamageIncrementer=DamageIncrementer+1
	set RaindropBeenActivated=false
	if offset>0 then
		set DamageAttackTypes[DamageIncrementer]=Memory[offset/4+0x20/4]//RMem(offset+0x20)
		set DamageDamageTypes[DamageIncrementer]=Memory[offset/4+0x14/4]//RMem(offset+0x14)
		set DamageValues[DamageIncrementer]=mI2R(Memory[offset/4+0x10/4])//RMem(offset+0x10))
		
		set tt_unit2=I2Unit(target)//tt_unit2 = target
		if DamageValues[DamageIncrementer]>0.1 then
			set tt_unit1=I2Unit(RMem(offset))//tt_unit1 == source
//			call echo(GetUnitName(tt_unit1)+" damages "+GetUnitName(tt_unit2)+" for "+R2S(DamageValues[DamageIncrementer]))
		endif
		if true then
			set bj_meleeNearestMineDist=RMaxBJ(DamageValues[DamageIncrementer] - 120.,1.)
			set bj_randomSubGroupChance=DamageValues[DamageIncrementer]-bj_meleeNearestMineDist
			call WMem(offset+0x10,mR2I(bj_meleeNearestMineDist))
			set DamageValues[DamageIncrementer]=bj_meleeNearestMineDist
		endif
	endif
endfunction
Элементарно, ватсон. По аналогии тому, как здесь я меняю урон, меняешь и тип урона, переписывая через WMem. просто вспомни, что там степени двойки должны быть, в типе атаки/урона, а не голые числа. ну а про отрицательные значения хз
0
23
7 лет назад
0
DracoL1ch, отрицательный работает если способность было пройдено то лечит а чистый урон не идет прям крутой хил =)
0
7
7 лет назад
0
call WMem(offset+0x10,mR2I(bj_meleeNearestMineDist))
А вот это неожиданно!)
// либо так
WMem(offset+0x10, mI2R(newValue))
DracoL1ch:
просто вспомни, что там степени двойки должны быть, в типе атаки/урона, а не голые числа. ну а про отрицательные значения хз
Тип атаки,вроде бы имеет значения 0..6, т.е. без степени 2
	attackType[0] = "Заклинание"
	attackType[1] = "Обычная"
	attackType[2] = "Дальний бой"
	attackType[3] = "Артиллерия"
	attackType[4] = "Магическая"
	attackType[5] = "Сила Тьмы"
	attackType[6] = "Герой"

а еще стоит заметить, что источник урона это:
set tt_unit1=I2Unit(RMem(offset))//tt_unit1 == source
о чем я писал ранее
Я не сразу понял, что offset == источник урона (DamageSource)
0
16
7 лет назад
0
а, ну возможно. для типа урона точно нужна степень, тип атаки мне проверять не надобно было. ничего неожиданного не вижу в переписи, пару глобалок у близзов забрал, чтобы локалки не создавать
0
6
7 лет назад
0
DracoL1ch:
а, ну возможно. для типа урона точно нужна степень, тип атаки мне проверять не надобно было. ничего неожиданного не вижу в переписи, пару глобалок у близзов забрал, чтобы локалки не создавать
Воришка)
Показан только небольшой набор комментариев вокруг указанного. Перейти к актуальным.
Чтобы оставить комментарий, пожалуйста, войдите на сайт.