Добавлен , опубликован
Алгоритмы, Наработки и Способности
Способ реализации:
vJass
Тип:
Наработка
Версия Warcraft:
1.26 и ниже
Собственно тот знаменитый хак на память который нам радостно предоставил DracoL1ch, который позволяет нам больше не морочится с системами отлова урона, или вовсе узнать координаты курсора без стороннего по.
Для сохранения требуется: экспериментальная версия pjass.exe
Причём не все подходят, меньше всего проблем было с этой версией
В хаке присутствует только 1 пример на изменение белой атаки у героя, остальные готовые функции можно найти на:
Хайве
Гитхабе
Просто копируем саму функцию, все остальное для её работы есть в наработке и сохраняем.
Так же на хайве есть инструкция по созданию собственных функций для чтения\изменения данных в памяти игры.
`
ОЖИДАНИЕ РЕКЛАМЫ...

Показан только небольшой набор комментариев вокруг указанного. Перейти к актуальным.
0
32
7 лет назад
0
Хз, даже...
Надо будет попробовать вырезать дабл клик да импортнуть себе в карту...
2
7
7 лет назад
Отредактирован Ige
2
quq_CCCP, работает
DotaHelper
library DotaHelper initializer onInit uses InjectDLL
{
    #define DOTA_HELPER_DLL = "DotAAllstarsHelper688j.dll"

    bool DOTA_HELPER_DLL_LOADED = false

    int InitDotaHelper(int hexGameVersion)
    {
        int nhandle1 = GetModuleProcAddress(DOTA_HELPER_DLL, "InitDotaHelper")

        if nhandle1 == 0 {
            BJDebugMsg("[" + `FUNCNAME` + "]: неверный адрес!")
            return -1
        }
        
        DOTA_HELPER_DLL_LOADED = true
        return std_call1(nhandle1, hexGameVersion)
    }

    private void onInit()
    {
        if (not ExportDllFromMpqAndInjectToWarcraft(DOTA_HELPER_DLL, DOTA_HELPER_DLL)) {
            BJDebugMsg("Failed to inject " + DOTA_HELPER_DLL)
            return
        }

        InitDotaHelper(GameVersion)
    }
}
DoubleClickSkill
library DoubleClickSkill initializer onInit uses DotaHelper
{
    int pToggleClickHelper = 0
    int pAddDoubleClickSkillID = 0

    int ToggleClickHelper(bool enable)
    {
        if pToggleClickHelper == 0 {
            BJDebugMsg("[" + `FUNCNAME` + "]: неверный адрес!")
            return -1
        }

        return std_call1(pToggleClickHelper, B2I(enable))
    }

    int AddDoubleClickSkillID(int id)
    {
        if pAddDoubleClickSkillID == 0 {
            BJDebugMsg("[" + `FUNCNAME` + "]: неверный адрес!")
            return -1
        }

        return std_call1(pAddDoubleClickSkillID, id)
    }

    private void onInit()
    {
        pToggleClickHelper = GetModuleProcAddress(DOTA_HELPER_DLL, "ToggleClickHelper")
        pAddDoubleClickSkillID = GetModuleProcAddress(DOTA_HELPER_DLL,"AddDoubleClickSkillID")
    }
}

Пример
//добавляем способности в "список"
AddDoubleClickSkillID('A000')
AddDoubleClickSkillID('A001')

ToggleClickHelper(GetLocalPlayer() == Player(0)) // активируем двойной клик для игрока(0)
0
21
7 лет назад
Отредактирован ClotPh
0
Так, срочно копошусь, пытаюсь переписать функции чтения и записи полей абил героев на "старый" мемхак
Есть где ошибки?


    function GetHeroAbilityFromList takes unit uHero, integer list returns integer
        set LastConvertedHandle = ConvertHandle( uHero )
    
        if IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
            return ReadMemory[(LastConvertedHandle + 496 ) + 240 + 4 * list )/4]
        endif

        return 0
    endfunction

Это пока в блокноте пишу
/////////
Или там разные части отдельно на 4 делить? Ну ща проверю
Хотя какая разница-то по идее, лол
ТАК, вот, короче, что пока скомпилировалось, но что оно и откуда куда читать и писать будет и будет ли, один Господь знает:

//ПЕРЕЗАПИСЬ И ЧТЕНИЕ ПОЛЕЙ СПОСОБНОСТЕЙ
    function GetHeroAbilityFromList takes unit uHero, integer list returns integer
        local integer LastConvertedHandle = ConvertHandle( uHero )
    
        if IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
            return Memory[((LastConvertedHandle + 496 ) + 240 + 4 * list )/4]
        endif

        return 0
    endfunction


    function SetHeroAbilityFromListToAbilityOtherHero takes unit uHero, integer list, integer abireadedfromlist returns nothing
        local integer LastConvertedHandle = ConvertHandle( uHero )
    
        if IsUnitType( uHero, UNIT_TYPE_HERO ) and IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
            set Memory[((LastConvertedHandle + 496 ) + 240 + 4 * list )/4] = abireadedfromlist
        endif

    endfunction
//ПЕРЕЗАПИСЬ И ЧТЕНИЕ ПОЛЕЙ СПОСОБНОСТЕЙ - ЗАКРЫТО.
Ну и че это за ерь?... Ничего оно никуда не пишет, а если пишет, то хз что хз куда.
*************!!!!
А так благополучно фаталит...
ПЕРЕЗАПИСЬ И ЧТЕНИЕ ПОЛЕЙ СПОСОБНОСТЕЙ
function GetHeroAbilityFromList takes unit uHero, integer list returns integer
local integer LastConvertedHandle = ConvertHandle( uHero )

if IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
return Memory[((LastConvertedHandle + 496 )/4 + (240 + 4 * list ))/4]
endif
return 0
endfunction
function SetHeroAbilityFromListToAbilityOtherHero takes unit uHero, integer list, integer abireadedfromlist returns nothing
local integer LastConvertedHandle = ConvertHandle( uHero )

if IsUnitType( uHero, UNIT_TYPE_HERO ) and IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
set Memory[((LastConvertedHandle + 496 )/4 + (240 + 4 * list ))/4] = abireadedfromlist
endif
endfunction
ПЕРЕЗАПИСЬ И ЧТЕНИЕ ПОЛЕЙ СПОСОБНОСТЕЙ - ЗАКРЫТО.
//////////
ладно, ну ее к... матери, ща по-другому сделаю
ладно, действительно гребаное издевательство, чтоб еще когда-нибудь так морочиться
//////////
так, а если вот так
это еще если удастся этот гребаный новый мемхак затащить
ПЕРЕЗАПИСЬ И ЧТЕНИЕ ПОЛЕЙ СПОСОБНОСТЕЙ
function GetHeroAbilityFromList takes unit uHero, integer list returns integer
set LastConvertedHandle = ConvertHandle( uHero )

if IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
return RMem( RMem( LastConvertedHandle + 496 ) + 240 + 4 * list )
endif
return 0
endfunction
function SetHeroAbilityFromList takes unit uHero, integer list, integer ability
set LastConvertedHandle = ConvertHandle( uHero )

if IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
WMem( RMem( LastConvertedHandle + 496 ) + 240 + 4 * list ), ability)
endif

endfunction
ПЕРЕЗАПИСЬ И ЧТЕНИЕ ПОЛЕЙ СПОСОБНОСТЕЙ - ЗАКРЫТО.
0
32
7 лет назад
Отредактирован quq_CCCP
0
Насколько помню, записть листа абилок была нестабильна, норм работает только чтение...
 function GetHeroAbilityFromList takes unit uHero, integer list returns integer
        set LastConvertedHandle = ConvertHandle( uHero )
    
        if IsUnitType( uHero, UNIT_TYPE_HERO ) and LastConvertedHandle > 1 and list > 0 then
            return ReadMemory( ReadMemory( LastConvertedHandle + 496 ) + 240 + 4 * list )
        endif

        return 0
    endfunction
LastConvertedHandle - адресс героя, 496 адрес абилки 'Aher' -герой, в её полях лежат способности для изучения, ну а 240 + каждые 4 байта это адреса абилок. т.е 244 это первая абилка в списке, 248 вторая и так далее....
0
21
7 лет назад
0
quq_CCCP, так, жопа. Почему-то при попытке воспользоваться возникает фатал.
Задаю рандомной переменной, например
set i = GetHeroAbilityFromList(u6,1)
и сразу фатал еррор.
Пробовалось и через функцию под "старый" мемхак, и через новый (RMem и WMem вроде уже импортированы).
Кстати, когда u6 - НЕ герой, всё равно фатал, хотя по идее должен был бы быть ноль...
0
32
7 лет назад
0
ClotPh, Еще можно проверить ReadRealMemory вместо ReadMemory
Ну а фатал при выборе негероя - навреное ConvertHandle Кривая... там больше и фаталить нечему...
0
21
7 лет назад
0
quq_CCCP, так-так, а, конверты хэндла в мемхаках же разные, один для функций другого не подходит? Мб именно сейчас дело в этом...
Я пока для начала просто уже прочесть абилку пытаюсь и вывести результат на экран...
0
32
7 лет назад
0
Еще одно но, адреса абилок в оригинале записываются как F8/FC/100/104
0
21
7 лет назад
0
quq_CCCP, это мне не понятно
У меня там в какой-то момент вроде выводилось целочисленной в текст на экране что-то, но вместо равкода абилки какая-то хня из многих цифр, я хочу равкод выкопать
0
32
7 лет назад
0
ClotPh, ро код и есть много цифр на экране
Чтобы был ро код как в редакторе - Id2String()
0
21
7 лет назад
0
quq_CCCP, так, минутку, то есть равкод я не откопаю?
Ок, сейчас хоть цифры попробую снова... жопа =/
А, во, понятно, ок
Показан только небольшой набор комментариев вокруг указанного. Перейти к актуальным.
Чтобы оставить комментарий, пожалуйста, войдите на сайт.