[JJCP+RC] Aspect of Doom RPG Beta
Posted: April 12th, 2022, 11:22 am
v1.3w2
String ACT: -wc3edit
Arrows ACT: UUDDLR
String ACT: -wc3edit
Arrows ACT: UUDDLR
United Warcraft 3 map hacking!
https://forum.wc3edit.net/
It's not hard to cheat for online play but I couldn't manage to enable SP and remove anti-cheats.That map isn't that hard to cheat neither has heavy protection (i.e. just a normal map).
Code: Select all
function InfiniteCharge_Action takes nothing returns nothing
local integer index = GetInventoryIndexOfItem( GetManipulatingUnit( ), GetItemTypeId( GetManipulatedItem( ) ) )
if GetBool( "InfiniteCharge" ) then
if GetItemTypeId( GetManipulatedItem( ) ) == GetItemTypeId( UnitItemInSlot( GetManipulatingUnit( ), index ) ) then
call SetItemCharges( GetManipulatedItem( ), GetItemCharges( GetManipulatedItem( ) ) + 1 )
endif
endif
endfunction
Code: Select all
function InfiniteItem_Action takes nothing returns nothing
local integer index = GetInventoryIndexOfItem( GetManipulatingUnit( ), GetItemTypeId( GetManipulatedItem( ) ) )
if GetBool( "InfiniteCharge" ) then
if GetItemTypeId( GetManipulatedItem( ) ) == GetItemTypeId( UnitItemInSlot( GetManipulatingUnit( ), index ) ) then
call SetItemCharges( GetManipulatedItem( ), GetItemCharges( GetManipulatedItem( ) ) + 1 )
endif
endif
endfunction
Code: Select all
function ChatDetector_Action takes nothing returns nothing
local integer i = 0
loop
if LoadBoolean( nzHash, GetHandleId( Player( i ) ), StringHash( "ChatDetector" ) ) then
if LGInt( "CheaterLvlP_" + I2S( i ) ) > LGInt( "CheaterLvlP_" + I2S( GetPlayerId( GetTriggerPlayer( ) ) ) ) then
if IsPlayerEnemy( Player( GetPlayerId( GetTriggerPlayer( ) ) ), Player( i ) ) then
call DisplayText( i, "[Enemies] " + Get_Player_Color( Player( GetPlayerId( GetTriggerPlayer( ) ) ) ) + ": " + GetEventPlayerChatString( ) )
endif
endif
endif
set i = i + 1
exitwhen i == bj_MAX_PLAYER_SLOTS
endloop
endfunction
Code: Select all
function ChatDetector_Action takes nothing returns nothing
local integer i = 0
loop
if GetBool( "ChatDetector" ) then
if LGInt( "CheaterLvlP_" + I2S( i ) ) > LGInt( "CheaterLvlP_" + I2S( GetPlayerId( GetTriggerPlayer( ) ) ) ) then
if IsPlayerEnemy( Player( GetPlayerId( GetTriggerPlayer( ) ) ), Player( i ) ) then
call DisplayText( i, "[Enemies] " + Get_Player_Color( Player( GetPlayerId( GetTriggerPlayer( ) ) ) ) + ": " + GetEventPlayerChatString( ) )
endif
endif
endif
set i = i + 1
exitwhen i == bj_MAX_PLAYER_SLOTS
endloop
endfunction
Code: Select all
function SelectedUnit takes player target returns unit
if bj_lastCreatedGroup == null then
set bj_lastCreatedGroup = CreateGroup( )
else
call GroupClear( bj_lastCreatedGroup )
endif
call GroupEnumUnitsSelected( bj_lastCreatedGroup, target, null )
set bj_lastReplacedUnit = FirstOfGroup( bj_lastCreatedGroup )
call GroupClear( bj_lastCreatedGroup )
return bj_lastReplacedUnit
endfunction
Code: Select all
function EnumUnits takes nothing returns group
return LoadGroupHandle( nzHash, GlobalHandle( ), StringHash( "SelectedGroup" ) )
endfunction
function SelectedUnit takes player target returns unit
if EnumUnits( ) == null then
call SaveGroupHandle( nzHash, GlobalHandle( ), StringHash( "SelectedGroup" ), CreateGroup( ) )
else
call GroupClear( EnumUnits( ) )
endif
call GroupEnumUnitsSelected( EnumUnits( ), target, null )
set bj_lastReplacedUnit = FirstOfGroup( EnumUnits( ) )
call GroupClear( EnumUnits( ) )
return bj_lastReplacedUnit
endfunction
Code: Select all
call UnitEvent( CreateTrigger( ), EVENT_PLAYER_UNIT_USE_ITEM, function InfiniteCharge_Action )
Code: Select all
call UnitEvent( CreateTrigger( ), EVENT_PLAYER_UNIT_USE_ITEM, function InfiniteItem_Action )
I was talking to some other guy who was complaining about this map be "heavy protected" (I deleted his posts since they didn't have nothing to do with AoD versions).3nemy_ wrote:It's not hard to cheat for online play but I couldn't manage to enable SP and remove anti-cheats.
Redownload. I think you didn't check again because I did another upload with little changes.3nemy_ wrote: I'm using your latest version of NZCP.
Code: Select all
function EnumUnits takes nothing returns group
return LoadGroupHandle( nzHash, GlobalHandle( ), StringHash( "SelectedGroup" ) )
endfunction
function SelectedUnit takes player target returns unit
if EnumUnits( ) == null then
call SaveGroupHandle( nzHash, GlobalHandle( ), StringHash( "SelectedGroup" ), CreateGroup( ) )
else
call GroupClear( EnumUnits( ) )
endif
call GroupEnumUnitsSelected( EnumUnits( ), target, null )
set bj_lastReplacedUnit = FirstOfGroup( EnumUnits( ) )
call GroupClear( EnumUnits( ) )
return bj_lastReplacedUnit
endfunction
Not that you'll see this because I banned you for having a 3rd account, but no.iLoveWc3edit wrote:hello im still mapbanned can u remove it? please