16
"UWorld Find"
Auto Assembler Script
// Game Executable : KingOfBones.exe
// Author : admin
// Executable Version: 5.4.4.0
// Module Version :
// Script Date : 2026-03-03
// Created with : customAOBInjectionTemplates version: 1.3.6
[ENABLE]
aobscanmodule(aob_Uworld,KingOfBones.exe,488B??????????8B??4C????????????85??74??4C??????488B)
registersymbol(GWORLD)
label(GWORLD)
aob_Uworld+7+(LONG)[aob_Uworld+3]:
GWORLD:
registersymbol(aob_Uworld)
[DISABLE]
unregistersymbol(GWORLD)
unregistersymbol(aob_Uworld)
{
// ORIGINAL CODE - INJECTION POINT: KingOfBones.exe+5FC1726
KingOfBones.exe+5FC16D9: 48 8D 0D 6B 89 88 0B - lea rcx,[KingOfBones.exe+1184A04B]
KingOfBones.exe+5FC16E0: E8 CB 63 F2 07 - call KingOfBones.exe+DEE7AB0
KingOfBones.exe+5FC16E5: 84 C0 - test al,al
KingOfBones.exe+5FC16E7: 74 0E - je KingOfBones.exe+5FC16F7
KingOfBones.exe+5FC16E9: 90 - nop
KingOfBones.exe+5FC16EA: CC - int 3
KingOfBones.exe+5FC16EB: 48 8D 73 34 - lea rsi,[rbx+34]
KingOfBones.exe+5FC16EF: 4C 8D 7B 30 - lea r15,[rbx+30]
KingOfBones.exe+5FC16F3: 4C 8D 73 08 - lea r14,[rbx+08]
KingOfBones.exe+5FC16F7: 48 39 3D A2 17 91 0B - cmp [KingOfBones.exe+118D2EA0],rdi
KingOfBones.exe+5FC16FE: 75 26 - jne KingOfBones.exe+5FC1726
KingOfBones.exe+5FC1700: 4C 8D 0D D5 7A F7 07 - lea r9,[KingOfBones.exe+DF391DC]
KingOfBones.exe+5FC1707: 41 B8 43 00 00 00 - mov r8d,00000043
KingOfBones.exe+5FC170D: 48 8D 15 0C D8 9D 08 - lea rdx,[KingOfBones.exe+E99EF20]
KingOfBones.exe+5FC1714: 48 8D 0D 3D D9 9D 08 - lea rcx,[KingOfBones.exe+E99F058]
KingOfBones.exe+5FC171B: E8 C0 34 53 FB - call KingOfBones.exe+14F4BE0
KingOfBones.exe+5FC1720: 84 C0 - test al,al
KingOfBones.exe+5FC1722: 74 02 - je KingOfBones.exe+5FC1726
KingOfBones.exe+5FC1724: 90 - nop
KingOfBones.exe+5FC1725: CC - int 3
// ---------- INJECTING HERE ----------
KingOfBones.exe+5FC1726: 48 8B 05 73 17 91 0B - mov rax,[KingOfBones.exe+118D2EA0]
// ---------- DONE INJECTING ----------
KingOfBones.exe+5FC172D: 8B 0E - mov ecx,[rsi]
KingOfBones.exe+5FC172F: 4C 8B A0 50 02 00 00 - mov r12,[rax+00000250]
KingOfBones.exe+5FC1736: 85 C9 - test ecx,ecx
KingOfBones.exe+5FC1738: 74 34 - je KingOfBones.exe+5FC176E
KingOfBones.exe+5FC173A: 4C 63 6B 30 - movsxd r13,dword ptr [rbx+30]
KingOfBones.exe+5FC173E: 48 8B 13 - mov rdx,[rbx]
KingOfBones.exe+5FC1741: 49 8B C5 - mov rax,r13
KingOfBones.exe+5FC1744: 48 03 C0 - add rax,rax
KingOfBones.exe+5FC1747: 4C 63 44 C2 04 - movsxd r8,dword ptr [rdx+rax*8+04]
KingOfBones.exe+5FC174C: 8D 41 FF - lea eax,[rcx-01]
KingOfBones.exe+5FC174F: 45 89 07 - mov [r15],r8d
KingOfBones.exe+5FC1752: 89 06 - mov [rsi],eax
KingOfBones.exe+5FC1754: 85 C0 - test eax,eax
KingOfBones.exe+5FC1756: 0F 84 57 01 00 00 - je KingOfBones.exe+5FC18B3
KingOfBones.exe+5FC175C: 49 8B C0 - mov rax,r8
KingOfBones.exe+5FC175F: 48 03 C0 - add rax,rax
KingOfBones.exe+5FC1762: C7 04 C2 FF FF FF FF - mov [rdx+rax*8],FFFFFFFF
KingOfBones.exe+5FC1769: E9 45 01 00 00 - jmp KingOfBones.exe+5FC18B3
KingOfBones.exe+5FC176E: 44 8B 6B 08 - mov r13d,[rbx+08]
KingOfBones.exe+5FC1772: 41 8D 45 01 - lea eax,[r13+01]
}
18
"Player"
0000FF
Auto Assembler Script
{$lua}
if syntaxcheck then return end
[ENABLE]
ArenaManagerOffsetCE = allocateMemory(0x4)
registerSymbol('ArenaManagerOff', ArenaManagerOffsetCE)
isMaxHealth = allocateMemory(0x4)
registerSymbol('MaxHealth',isMaxHealth)
isMaxStamina = allocateMemory(0x4)
registerSymbol('MaxStamina',isMaxStamina)
isNoStun = allocateMemory(0x4)
registerSymbol('NoStun',isNoStun)
isMaxChargingPower = allocateMemory(0x4)
registerSymbol('MaxChargingPower',isMaxChargingPower)
isQuickRagdoll = allocateMemory(0x4)
registerSymbol('QuickRagdoll',isQuickRagdoll)
isNoAttackCooldown = allocateMemory(0x4)
registerSymbol('NoAttackCooldown',isNoAttackCooldown)
FeaturesTimer = createTimer()
FeaturesTimer.setInterval(10)
FeaturesTimer.onTimer = function(features_F)
local world = readPointer('GWORLD') -- KingOfBones.exe+118D2EA0
if not world then return disable("World not found") end
local OwningGameInstance = readPointer(world + 0x1E0)
if OwningGameInstance == 0 or OwningGameInstance == nil then goto skip end
local CurrentMapKey = readByte(OwningGameInstance + 0x358)
local ArenaManagerOffset = getArenaManagerOffsetA(CurrentMapKey)
WriteInteger('ArenaManagerOff', ArenaManagerOffset)
local ULocalPlayerArray = readPointer(OwningGameInstance + 0x38)
if ULocalPlayerArray == 0 or ULocalPlayerArray == nil then goto skip end
local ULocalPlayer = readPointer(ULocalPlayerArray + 0x0)
if ULocalPlayer == 0 or ULocalPlayer == nil then goto skip end
local APlayerController = readPointer(ULocalPlayer + 0x30)
if APlayerController == 0 or APlayerController == nil then goto skip end
local AcknowledgedPawn = readPointer(APlayerController + 0x360)
if AcknowledgedPawn == 0 or AcknowledgedPawn == nil then goto skip end
isMaxHealthValue = readInteger('MaxHealth')
isMaxStaminaValue = readInteger('MaxStamina')
isNoStunValue = readInteger('NoStun')
isMaxChargingPowerValue = readInteger('MaxChargingPower')
isQuickRagdollValue = readInteger('QuickRagdoll')
isNoAttackCooldownValue = readInteger('NoAttackCooldown')
local UBPC_Vitals_C = readPointer(AcknowledgedPawn + 0x6F8)
if isMaxHealthValue == 1 then
MaxHealth = readDouble(UBPC_Vitals_C + 0x160)
writeDouble(UBPC_Vitals_C + 0x168, MaxHealth)
end
if isMaxStaminaValue == 1 then
writeDouble(UBPC_Vitals_C + 0xB0,1)
end
if isNoStunValue == 1 then
writeDouble(UBPC_Vitals_C + 0x218,0)
end
if isMaxChargingPowerValue == 1 then
writeDouble(AcknowledgedPawn + 0xE50,1)
end
if isQuickRagdollValue == 1 then
writeDouble(AcknowledgedPawn + 0xDA8,0)
end
if isNoAttackCooldownValue == 1 then
writeByte(AcknowledgedPawn + 0xE24,0)
end
::skip::
end
function getArenaManagerOffsetA(CurrentMapKey)
if CurrentMapKey == 0 then return 0x248 end
if CurrentMapKey == 1 then return 0x2C8 end
if CurrentMapKey == 2 then return 0x148 end
if CurrentMapKey == 4 then return 0x2D8 end
if CurrentMapKey == 6 then return 0x3E0 end
if CurrentMapKey == 3 then return 0x148 end
if CurrentMapKey == 8 then return 0x190 end
if CurrentMapKey == 7 then return 0x2F0 end
return 0x248
end
function disable(Message)
FeaturesTimer.destroy()
memrec.Active = false
if Message then error(Message) end
end
[DISABLE]
disable()
unregisterSymbol('MaxHealth')
deAlloc(isMaxHealth)
unregisterSymbol('MaxStamina')
deAlloc(isMaxStamina)
unregisterSymbol('NoStun')
deAlloc(isNoStun)
unregisterSymbol('MaxChargingPower')
deAlloc(isMaxChargingPower)
unregisterSymbol('QuickRagdoll')
deAlloc(isQuickRagdoll)
unregisterSymbol('NoAttackCooldown')
deAlloc(isNoAttackCooldown)
unregisterSymbol('ArenaManagerOff')
deAlloc(ArenaManagerOffsetCE)
49
"Scripts"
800000
1
19
"Inf Health"
8080FF
Auto Assembler Script
[ENABLE]
MaxStamina:
dd 1
[DISABLE]
MaxStamina:
dd 0
20
"Inf Stamina"
8080FF
Auto Assembler Script
[ENABLE]
MaxHealth:
dd 1
[DISABLE]
MaxHealth:
dd 0
21
"No Stun"
8080FF
Auto Assembler Script
[ENABLE]
NoStun:
dd 1
[DISABLE]
NoStun:
dd 0
22
"Inf Charge Power"
8080FF
Auto Assembler Script
[ENABLE]
MaxChargingPower:
dd 1
[DISABLE]
MaxChargingPower:
dd 0
23
"Quick Ragdoll"
8080FF
Auto Assembler Script
[ENABLE]
QuickRagdoll:
dd 1
[DISABLE]
QuickRagdoll:
dd 0
24
"No Attack Cooldown"
8080FF
Auto Assembler Script
[ENABLE]
NoAttackCooldown:
dd 1
[DISABLE]
NoAttackCooldown:
dd 0
1
"CurrentHealth"
0
Double
GWORLD
168
6F8
360
30
0
38
1E0
0
"Stamina"
0
Double
GWORLD
B0
6F8
360
30
0
38
1E0
2
"CurrentStunAmount"
0
Double
GWORLD
218
6F8
360
30
0
38
1E0
5
"ChargingPower"
0
Double
GWORLD
E50
360
30
0
38
1E0
10
"RagdollRecoverTime"
0
Double
GWORLD
DA8
360
30
0
38
1E0
6
"AttackOnCooldown"
0
Byte
GWORLD
E24
360
30
0
38
1E0
7
"WalkSpeed"
0
Double
GWORLD
918
360
30
0
38
1E0
8
"RunSpeed"
0
Double
GWORLD
920
360
30
0
38
1E0
11
"AgeProgression"
0
Double
GWORLD
8F0
360
30
0
38
1E0
9
"CurrentExperience"
0
4 Bytes
GWORLD
928
360
30
0
38
1E0
4
"Level"
0
4 Bytes
GWORLD
1F8
6F8
360
30
0
38
1E0
25
"DamageMult1"
0
Double
GWORLD
18
A30
360
30
0
38
1E0
27
"DamageMult2"
0
Double
GWORLD
58
A30
360
30
0
38
1E0
28
"DamageMult3"
0
Double
GWORLD
98
A30
360
30
0
38
1E0
29
"DamageMult4"
0
Double
GWORLD
D8
A30
360
30
0
38
1E0
57
"Select"
FF8000
1
56
"CurrentDinosaur"
27:albertosaurus
19:allosaurus
11:ankylosaurus
33:carcharodontosaurus
14:carnotaurus
17:deinocheirus
25:deinonnychus
16:dilphosaurus
6:dimetrodon
26:dryosaurus
21:edmonotosaurus
15:giganotosaurus
20:iguanodon
32:mammoth
7:pachycephalosaurus
8:parasaurolophus
22:protoceratops
31:sabertoothed tiger
28:sarcosuchus
13:skorpiovenator
12:spinosaurus
10:stegosaurus
9:styracosaurus
18:suchomimus
23:shantungosaurus
1:compsognathus
0:tyrannosaurus rex
3:triceratops
2:velociraptor
4:yangchuansaurus
0
Byte
GWORLD
3C0
1E0
58
"CurrentMapKey"
0:Shoreside
1:GrassLands
2:RedWoods
4:Cascades
6:Snowfall
3:Bonegluch
8:Infrenus
7:Darkside
9:Random
0
Byte
GWORLD
358
1E0
64
"CurrentMode"
0:KING OF THE HILL
1:ASCENSION
2:ONSLAUGHT
3:Spectate
4:ARCADE
5:Training
0
Byte
GWORLD
52
3B0
1E0
60
" IsDaytime"
1:on
0:off
0
Byte
GWORLD
418
1E0
61
" RandomMap"
1:on
0:off
0
Byte
GWORLD
419
1E0
62
"SettingBloodEnabled"
1:on
0:off
0
Byte
GWORLD
3F8
1E0
63
"SettingDismembermentEnabled"
1:on
0:off
0
Byte
GWORLD
3F9
1E0
17
"Flags"
FF8000
1
3
"Invincibility"
0
Byte
GWORLD
249
6F8
360
30
0
38
1E0
35
"Match"
FF8000
1
87
"Onslaught"
800080
1
46
"CurrentWave"
0
4 Bytes
GWORLD
350
[ArenaManagerOff]
A0
30
88
"King Of The Hill"
800080
1
47
"CapturesCompleted"
0
Byte
GWORLD
33C
[ArenaManagerOff]
A0
30
48
"CompletionCount"
0
4 Bytes
GWORLD
338
[ArenaManagerOff]
A0
30
15
"Other NPCS Features"
0000FF
Auto Assembler Script
{$lua}
if syntaxcheck then return end
[ENABLE]
OtherDinoTimer = createTimer()
OtherDinoTimer.setInterval(100)
OtherDinoTimer.onTimer = function(OtherDino_F)
local world = readPointer('GWORLD')
if not world then disableNPCS("World not found") end
if world == 0 or world == nil then
goto continue
end
local OwningGameInstance = readPointer(world + 0x1E0)
if OwningGameInstance == 0 or OwningGameInstance == nil then goto continue end
local CurrentMapKey = readByte(OwningGameInstance + 0x358)
local ArenaManagerOffset = getArenaManagerOffset(CurrentMapKey)
local ULocalPlayerArray = readPointer(OwningGameInstance + 0x38)
if ULocalPlayerArray == 0 or ULocalPlayerArray == nil then goto continue end
local ULocalPlayer = readPointer(ULocalPlayerArray + 0x0)
if ULocalPlayer == 0 or ULocalPlayer == nil then goto continue end
local APlayerController = readPointer(ULocalPlayer + 0x30)
if APlayerController == 0 or APlayerController == nil then goto continue end
local AcknowledgedPawn = readPointer(APlayerController + 0x360)
if AcknowledgedPawn == 0 or AcknowledgedPawn == nil then goto continue end
local level = readPointer(world + 0x30)
if level == 0 or level == nil then
goto continue
end
local actorArray = readPointer(level + 0xA0)
if actorArray == 0 or actorArray == nil then
goto continue
end
local ArenaManager = readPointer(actorArray + ArenaManagerOffset)
--print(ArenaManager)
if ArenaManager == 0 or ArenaManager == nil then
goto continue
end
local actorCount = readInteger(level + 0xA8)
--findArenaManager(actorArray, actorCount)
findAAIC_AIController_C(actorArray, ArenaManager, actorCount)
findNPCDino(actorArray, actorCount)
::continue::
end
function getArenaManagerOffset(CurrentMapKey)
if CurrentMapKey == 0 then return 0x248 end
if CurrentMapKey == 1 then return 0x2C8 end
if CurrentMapKey == 2 then return 0x148 end
if CurrentMapKey == 4 then return 0x2D8 end
if CurrentMapKey == 6 then return 0x3E0 end
if CurrentMapKey == 3 then return 0x148 end
if CurrentMapKey == 8 then return 0x190 end
if CurrentMapKey == 7 then return 0x2F0 end
return 0x248
end
function findAAIC_AIController_C(actorArray, ArenaManager, actorCount)
local offset = 0x0
for i = 0, actorCount do
local Actor = readPointer(actorArray + offset)
if Actor ~= 0 and Actor ~= nil then
if readPointer(Actor + 0x4C0) == ArenaManager then
local AIController_C = Actor
if AIController_C ~= 0 and AIController_C ~= nil then
ManageAIFeatures(AIController_C)
end
end
end
offset = offset + 0x8
end
end
function findSpawnerActor(actorArray, actorCount)
local offset = 0x0
for i = 0, actorCount do
local Actor = readPointer(actorArray + offset)
if Actor ~= 0 and Actor ~= nil then
local SpawnedDinoNum = readFloat(Actor + 0x318)
if SpawnedDinoNum == 1 then
print(offset)
end
end
offset = offset + 0x8
end
end
function findArenaManager(actorArray, actorCount)
local offset = 0x0
for i = 0, actorCount do
local Actor = readPointer(actorArray + offset)
if Actor ~= 0 and Actor ~= nil then
local WaveNum = readInteger(Actor + 0x350)
if WaveNum == 4 then
print(offset)
end
end
offset = offset + 0x8
end
end
function findNPCDino(actorArray, actorCount)
local offset = 0x0
for i = 0, actorCount do
local Actor = readPointer(actorArray + offset)
if Actor ~= 0 and Actor ~= nil then
local Instigator = readPointer(Actor + 0x188)
if Instigator ~= 0 and Instigator ~= nil then
local UBPC_Vitals_C = readPointer(Instigator + 0x6F8)
if UBPC_Vitals_C ~= 0 and UBPC_Vitals_C ~= nil then
if readByte(UBPC_Vitals_C + 0x1D0) == 1 then
if readDouble(UBPC_Vitals_C + 0x168) > 1 and readDouble(UBPC_Vitals_C + 0x168) < 99999999 then
ManageVitalFeatures(UBPC_Vitals_C)
end
end
end
end
end
offset = offset + 0x8
end
end
function disableNPCS(Message)
OtherDinoTimer.destroy()
memrec.Active = false
if Message then error(Message) end
end
function ManageVitalFeatures(UBPC_Vitals_C)
isInstantKill = readInteger('kill')
isNoStam = readInteger('fuckstamina')
isInstantStun = readInteger('stunspeedrun')
if isInstantKill and isInstantKill == 1 then
writeDouble(UBPC_Vitals_C + 0x168, 0)
end
if isNoStam and isNoStam == 1 then
writeDouble(UBPC_Vitals_C + 0xB0, 0)
end
if isInstantStun and isInstantStun == 1 then
if readDouble(UBPC_Vitals_C + 0x218) < readDouble(UBPC_Vitals_C + 0x220) then
writeDouble(UBPC_Vitals_C + 0x218, readDouble(UBPC_Vitals_C + 0x220))
end
end
end
function ManageAIFeatures(AIController_C)
-- print(AIController_C)
-- fullAccess(AIController_C, 0x128)
isNoSeen = readInteger('blind')
isNoHear = readInteger('depth')
if isNoSeen and isNoSeen == 1 then
writeQword(AIController_C + 0x420, 0) -- AlertTarget
writeDouble(AIController_C + 0x418, 0) -- AlertAmount
writeByte(AIController_C + 0x438, 0) -- TargetSeen
writeByte(AIController_C + 0x43B, 0) -- FocusedOnTarget
end
if isNoHear and isNoHear == 1 then
writeDouble(AIController_C + 0x430, 0) -- HearingRange
end
end
--[[local actorArray = readPointer(level + 0xA0)
offset = 0x0
for i = 0, 1000 do
local Actor = readPointer(actorArray + offset)
local Instigator = readPointer(Actor + 0x188)
if Instigator ~= 0 and Instigator ~= nil then
local UBPC_Vitals_C = readPointer(Instigator + 0x6F8)
if UBPC_Vitals_C ~= 0 and UBPC_Vitals_C ~= nil then
if readByte(UBPC_Vitals_C + 0x1D0) == 1 then
if readDouble(UBPC_Vitals_C + 0x168) ~= 0 then
writeDouble(UBPC_Vitals_C + 0x168,1)
end
end
end
end
offset = offset + 0x8
end]]
[DISABLE]
disableNPCS()
30
"Instant Kill"
8080FF
Auto Assembler Script
[ENABLE]
alloc(kill,4)
registersymbol(kill)
kill:
dd 1
[DISABLE]
kill:
dd 0
dealloc(kill,4)
unregistersymbol(kill)
31
"NoStamina"
8080FF
Auto Assembler Script
[ENABLE]
alloc(fuckstamina,4)
registersymbol(fuckstamina)
fuckstamina:
dd 1
[DISABLE]
fuckstamina:
dd 0
dealloc(fuckstamina,4)
unregistersymbol(fuckstamina)
32
"Instant Stun"
8080FF
Auto Assembler Script
[ENABLE]
alloc(stunspeedrun,4)
registersymbol(stunspeedrun)
stunspeedrun:
dd 1
[DISABLE]
stunspeedrun:
dd 0
dealloc(stunspeedrun,4)
unregistersymbol(stunspeedrun)
42
"Blind Enemy"
8080FF
Auto Assembler Script
[ENABLE]
alloc(blind,4)
registersymbol(blind)
blind:
dd 1
[DISABLE]
blind:
dd 0
dealloc(blind,4)
unregistersymbol(blind)
43
"Enemy Cant Hear"
8080FF
Auto Assembler Script
[ENABLE]
alloc(depth,4)
registersymbol(depth)
depth:
dd 1
[DISABLE]
depth:
dd 0
dealloc(depth,4)
unregistersymbol(depth)
65
"SpawnFeatures"
0000FF
Auto Assembler Script
{$lua}
if syntaxcheck then return end
[ENABLE]
dinoList = {["albertosaurus"] = 27,
["allosaurus"] = 19,
["ankylosaurus"] = 11,
["carcharodontosaurus"] = 33,
["carnotaurus"] = 14,
["deinocheirus"] = 17,
["deinonnychus"] = 25,
["dilphosaurus"] = 16,
["dimetrodon"] = 6,
["dryosaurus"] = 26,
["edmonotosaurus"] = 21,
["giganotosaurus"] = 15,
["iguanodon"] = 20,
["mammoth"] = 32,
["pachycephalosaurus"] = 7,
["parasaurolophus"] = 8,
["protoceratops"] = 22,
["sabertoothed tiger"] = 31,
["sarcosuchus"] = 28,
["skorpiovenator"] = 13,
["spinosaurus"] = 12,
["stegosaurus"] = 10,
["styracosaurus"] = 9,
["suchomimus"] = 18,
["shantungosaurus"] = 23,
["compsognathus"] = 1,
["tyrannosaurus rex"] = 0,
["triceratops"] = 3,
["velociraptor"] = 2,
["yangchuansaurus"] = 4
}
dinoSkinAmountList = {[27] = 5,
[19] = 5,
[11] = 5,
[33] = 4,
[14] = 4,
[17] = 5,
[25] = 5,
[16] = 5,
[6] = 4,
[26] = 5,
[21] = 5,
[15] = 5,
[20] = 5,
[32] = 1,
[7] = 3,
[8] = 5,
[22] = 5,
[31] = 4,
[28] = 5,
[12] = 4,
[13] = 5,
[10] = 5,
[9] = 5,
[18] = 5,
[23] = 5,
[1] = 4,
[0] = 4,
[3] = 5,
[2] = 4,
[4] = 5
}
ArcadeList = {}
SpawnListTimer = createTimer()
SpawnListTimer.setInterval(100)
SpawnListTimer.onTimer = function(features_F)
local DropDownDinoString = ConvertLuaTableToDropDownString(dinoList)
local OnOffDropDownList = "1:on\n0:off"
local TeamDropDownList = "0:BLUE\n1:RED\n2:YELLOW\n3:GREEN\n4:SPECTATE"
local world = readPointer('GWORLD') -- KingOfBones.exe+118D2EA0
if not world then return disableSL("World not found") end
local OwningGameInstance = readPointer(world + 0x1E0)
if OwningGameInstance == 0 or OwningGameInstance == nil then goto skipSP end
local CurrentMode = readPointer(OwningGameInstance + 0x3B0)
--
--local SpawnListOffset = getSpawnListOffset(CurrentModeKey)
local randAscension = readInteger('randomAscension')
if randAscension and randAscension == 1 then
local SpawnListAscOffset = 0x3E8
local SpawnListAscSizeOffset = SpawnListAscOffset + 0x8
local SpawnListAsc = readPointer(OwningGameInstance + SpawnListAscOffset)
local SpawnSizeAsc = readInteger(OwningGameInstance + SpawnListAscSizeOffset)
randomizeAscension(SpawnListAsc, SpawnSizeAsc)
writeInteger('randomAscension', 0)
memrec.Child[0].Child[0].Active = false
end
if CurrentMode == 0 or CurrentMode == nil then goto skipSP end
local CurrentModeKey = readByte(CurrentMode + 0x52)
local KingOfTheHillSpawner = readInteger('KOHSpawner')
if KingOfTheHillSpawner and KingOfTheHillSpawner == 1 then
if CurrentModeKey ~= 0 then goto KOHskip end
local CrazyRandom = readInteger('KOHCrazy')
local SpeciesData = readByte('KOHSpecies')
local AmountData = readInteger('KOHAmount')
local SkinData = readInteger('KOHSkin')
if CrazyRandom and CrazyRandom == 1 then
if SpeciesData then memrec.Child[1].Child[0].Child[0].Active = false end
if AmountData then memrec.Child[1].Child[0].Child[1].Active = false end
if SkinData then memrec.Child[1].Child[0].Child[2].Active = false end
end
local CurrentMapKey = readByte(OwningGameInstance + 0x358)
local ArenaManagerOffset = getArenaManagerOffsetB(CurrentMapKey)
local level = readPointer(world + 0x30)
if level == 0 or level == nil then goto KOHskip end
local actorArray = readPointer(level + 0xA0)
if actorArray == 0 or actorArray == nil then goto KOHskip end
local ArenaManager = readPointer(actorArray + ArenaManagerOffset)
if ArenaManager == 0 or ArenaManager == nil then goto KOHskip end
local SpawnQueueListSize = readInteger(ArenaManager + 0x328)
if SpawnQueueListSize == 0 then goto KOHskip end
local SpawnQueueList = readPointer(ArenaManager + 0x320)
if SpawnQueueList == 0 or SpawnQueueList == nil then goto KOHskip end
--print(SpawnQueueList)
if CrazyRandom and CrazyRandom == 1 then
local listKOHCrazy = ConvertLuaTableToLuaList(dinoList)
local index, randomCrazyId = getRandomDinoId(listKOHCrazy)
local randomCrazyAmount = math.random(1, 31) -- change this to test computer
local randomCrazySkin = getRandomDinoSkin(dinoSkinAmountList[randomCrazyId])
writeByte(SpawnQueueList + 0x4, randomCrazyId)
writeInteger(SpawnQueueList + 0x8, randomCrazySkin)
writeInteger(SpawnQueueList + 0xC, randomCrazyAmount)
goto KOHskip
end
if SpeciesData then
local listKOHR = ConvertLuaTableToLuaList(dinoList)
local index = getIndex(listKOHR, SpeciesData)
if type(listKOHR[index]) ~= "nil" then
writeByte(SpawnQueueList + 0x4, SpeciesData)
else
writeByte('KOHSpecies', 0)
end
end
if AmountData then
if AmountData > 0 then
writeInteger(SpawnQueueList + 0xC, AmountData)
else
writeInteger('KOHAmount', 1)
end
end
if SkinData then
local SpawnSpecies = readByte(SpawnQueueList + 0x4)
if SkinData < dinoSkinAmountList[SpawnSpecies] and SkinData >= 0 then
writeInteger(SpawnQueueList + 0x8, SkinData)
else
writeInteger('KOHSkin', 0)
end
end
::KOHskip::
end
local ArcadeParent = memrec[3]
local ActivatorCrazyRecord = ArcadeParent.Child[0]
local ActivatorRecord = ArcadeParent.Child[1]
local ArcadeParentRecord = ActivatorRecord.Child[0]
if ArcadeParent.Active == false then
ActivatorCrazyRecord.Active = false
ActivatorRecord.Active = false
DeleteMemrec(ArcadeParentRecord)
end
local ArcadeCrazySpawner = readInteger('ArcadeCrazy')
local ArcadeSpawnData = readInteger('ArcadeData')
if ArcadeSpawnData and ArcadeSpawnData == 1 then
if CurrentModeKey ~= 4 then
DeleteMemrec(ArcadeParentRecord)
goto Askip
end
local SpawnListArcadeOffset = 0x400
local SpawnListArcadeSizeOffset = SpawnListArcadeOffset + 0x8
local SpawnListArcade = readPointer(OwningGameInstance + SpawnListArcadeOffset)
if SpawnListArcade == 0 or SpawnListArcade == nil then
DeleteMemrec(ArcadeParentRecord)
goto Askip
end
local SpawnSizeArcade = readInteger(OwningGameInstance + SpawnListArcadeSizeOffset)
if SpawnSizeArcade == 0 then
DeleteMemrec(ArcadeParentRecord)
goto Askip
end
DeleteMemrec(ArcadeParentRecord)
OrganizeData(ArcadeParentRecord, SpawnListArcade, SpawnSizeArcade, DropDownDinoString, TeamDropDownList, OnOffDropDownList)
ActivatorRecord.Active = false
::Askip::
end
if ArcadeCrazySpawner and ArcadeCrazySpawner == 1 then
if CurrentModeKey ~= 4 then goto Askip2 end
local SpawnListArcadeOffset = 0x400
local SpawnListArcadeSizeOffset = SpawnListArcadeOffset + 0x8
local SpawnListArcade = readPointer(OwningGameInstance + SpawnListArcadeOffset)
if SpawnListArcade == 0 or SpawnListArcade == nil then goto Askip2 end
local SpawnSizeArcade = readInteger(OwningGameInstance + SpawnListArcadeSizeOffset)
if SpawnSizeArcade == 0 then goto Askip2 end
RandomizeArcadeData(SpawnListArcade, SpawnSizeArcade)
ActivatorCrazyRecord.Active = false
::Askip2::
end
local SpectateParent = memrec[4]
local SpectateCrazyRecord = SpectateParent.Child[0]
local SpectateRecord = SpectateParent.Child[1]
local SpectateParentRecord = SpectateRecord.Child[0]
if SpectateParent.Active == false then
SpectateCrazyRecord.Active = false
SpectateRecord.Active = false
DeleteMemrec(SpectateParentRecord)
end
local SpectateCrazySpawner = readInteger('SpectateCrazy')
local SpectateSpawnData = readInteger('SpectateData')
if SpectateSpawnData and SpectateSpawnData == 1 then
if CurrentModeKey ~= 3 then
DeleteMemrec(SpectateParentRecord)
goto Sskip
end
local SpawnListSpectateOffset = 0x3C8
local SpawnListSpectateSizeOffset = SpawnListSpectateOffset + 0x8
local SpawnListSpectate = readPointer(OwningGameInstance + SpawnListSpectateOffset)
if SpawnListSpectate == 0 or SpawnListSpectate == nil then
DeleteMemrec(SpectateParentRecord)
goto Sskip
end
local SpawnSizeSpectate = readInteger(OwningGameInstance + SpawnListSpectateSizeOffset)
if SpawnSizeSpectate == 0 then
DeleteMemrec(SpectateParentRecord)
goto Sskip
end
DeleteMemrec(SpectateParentRecord)
OrganizeData(SpectateParentRecord, SpawnListSpectate, SpawnSizeSpectate, DropDownDinoString, TeamDropDownList, OnOffDropDownList)
SpectateRecord.Active = false
::Sskip::
end
if SpectateCrazySpawner and SpectateCrazySpawner == 1 then
if CurrentModeKey ~= 3 then goto Sskip2 end
local SpawnListSpectateOffset = 0x3C8
local SpawnListSpectateSizeOffset = SpawnListSpectateOffset + 0x8
local SpawnListSpectate = readPointer(OwningGameInstance + SpawnListSpectateOffset)
if SpawnListSpectate == 0 or SpawnListSpectate == nil then goto Sskip2 end
local SpawnSizeSpectate = readInteger(OwningGameInstance + SpawnListSpectateSizeOffset)
if SpawnSizeSpectate == 0 then goto Sskip2 end
RandomizeSpectateData(SpawnListSpectate, SpawnSizeSpectate)
SpectateCrazyRecord.Active = false
::Sskip2::
end
::skipSP::
end
function RandomizeSpectateData(SpawnList, SpawnSize)
local OffsetBase = 0x0
local VariableList = ConvertLuaTableToLuaList(dinoList)
for i = 1, SpawnSize do
local Team = SpawnList + OffsetBase
local Species = SpawnList + OffsetBase + 0x4
local Texture = SpawnList + OffsetBase + 0x8
local SpawnCount = SpawnList + OffsetBase + 0xC
local RandomEntrance = SpawnList + OffsetBase + 0x10
local randomTeam = math.random(0, 3)
local Index, randomCrazyId = getRandomDinoId(VariableList)
local randomCrazySkin = getRandomDinoSkin(dinoSkinAmountList[randomCrazyId])
local randomCrazyAmount = math.random(1, 21) -- change this to test computer
local israndomEntrance = math.random(0,1)
writeInteger(Team, randomTeam)
writeByte(Species, randomCrazyId)
writeInteger(Texture, randomCrazySkin)
writeInteger(SpawnCount, randomCrazyAmount)
writeByte(RandomEntrance, israndomEntrance)
OffsetBase = OffsetBase + 0x14
end
end
function ConvertLuaTableToDropDownString(LuaTable)
local DropDownString = ""
for k,v in pairs(LuaTable) do
DropDownString = DropDownString .. v .. ":" .. k .. "\n"
end
return DropDownString
end
function RandomizeArcadeData(SpawnListArcade, SpawnSizeArcade)
local ArcadeOffsetBase = 0x0
local VariableList = ConvertLuaTableToLuaList(dinoList)
for i = 1, SpawnSizeArcade do
local ArcSpecies = SpawnListArcade + ArcadeOffsetBase + 0x4
local ArcTexture = SpawnListArcade + ArcadeOffsetBase + 0x8
local ArcSpawnCount = SpawnListArcade + ArcadeOffsetBase + 0xC
local ArcRandomEntrance = SpawnListArcade + ArcadeOffsetBase + 0x10
local Index, randomCrazyId = getRandomDinoId(VariableList)
local randomCrazySkin = getRandomDinoSkin(dinoSkinAmountList[randomCrazyId])
local randomCrazyAmount = math.random(1, 51) -- change this to test computer
local israndomEntrance = math.random(0,1)
writeByte(ArcSpecies, randomCrazyId)
writeInteger(ArcTexture, randomCrazySkin)
writeInteger(ArcSpawnCount, randomCrazyAmount)
writeByte(ArcRandomEntrance, israndomEntrance)
ArcadeOffsetBase = ArcadeOffsetBase + 0x14
end
end
function OrganizeData(ParentRecord, SpawnList, SpawnSize, DropDownDinoString, TeamDropDownList, OnOffDropDownList)
local InvdinoList = invertTable(dinoList)
local offsetBase = 0x0
for i = 1, SpawnSize do
local Team = SpawnList + offsetBase
local Species = SpawnList + offsetBase + 0x4
local Texture = SpawnList + offsetBase + 0x8
local SpawnCount = SpawnList + offsetBase + 0xC
local RandomEntrance = SpawnList + offsetBase + 0x10
local DinoName = InvdinoList[readByte(Species)] .. "_" .. i
local DinoMemRec = AddMemoryRecord(ParentRecord, Species, vtByte, DinoName, false)
addDD(DinoMemRec, DropDownDinoString)
local DinoTeamMemRec = AddMemoryRecord(DinoMemRec, Team, vtDword, "Team", false)
addDD(DinoTeamMemRec, TeamDropDownList)
AddMemoryRecord(DinoMemRec, Texture, vtDword, "TextureIndex", false)
AddMemoryRecord(DinoMemRec, SpawnCount, vtDword, "SpawnCount", false)
local DinoEntranceMemRec = AddMemoryRecord(DinoMemRec, RandomEntrance, vtByte, "isRandomEntrance", false)
addDD(DinoEntranceMemRec, OnOffDropDownList)
offsetBase = offsetBase + 0x14
end
end
function invertTable(original)
local inverted = {}
for key, value in pairs(original) do
inverted[value] = key
end
return inverted
end
function randomizeAscension(SpawnListAsc, SpawnSizeAsc)
local AscBaseOff = 0x0
local VariableList = ConvertLuaTableToLuaList(dinoList)
for i = 1, SpawnSizeAsc do
local Index, randID = getRandomDinoId(VariableList)
if Index and randID then
table.remove(VariableList, Index)
--local DinoSkinAmount = dinoSkinAmountList[randID]
--local DinoSkin = getRandomDinoSkin(DinoSkinAmount)
writeByte(SpawnListAsc + AscBaseOff + 0x4, randID)
--writeInteger(SpawnListAsc + AscBaseOff + 0x8, DinoSkin)
end
AscBaseOff = AscBaseOff + 0x14
end
end
function getIndex(list, targetValue)
for i, value in ipairs(list) do
if value == targetValue then
return i -- Returns the index (e.g., 1, 2, 3...)
end
end
return nil -- Returns nil if the value isn't in the list
end
function ConvertLuaTableToLuaList(DinolistA)
local values = {}
for _, value in pairs(DinolistA) do
table.insert(values, value)
end
return values
end
function getRandomDinoSkin(DinoSkinAmount)
if DinoSkinAmount > 1 then
return math.random(DinoSkinAmount)
end
return 0
end
function getRandomDinoId(values)
if #values > 0 then
local index = math.random(#values)
return index, values[index]
end
return nil, nil
end
function getArenaManagerOffsetB(CurrentMapKey)
if CurrentMapKey == 0 then return 0x248 end
if CurrentMapKey == 1 then return 0x2C8 end
if CurrentMapKey == 2 then return 0x148 end
if CurrentMapKey == 4 then return 0x2D8 end
if CurrentMapKey == 6 then return 0x3E0 end
if CurrentMapKey == 3 then return 0x148 end
if CurrentMapKey == 8 then return 0x190 end
if CurrentMapKey == 7 then return 0x2F0 end
return 0x248
end
function addDD(entry, str)
entry.DropDownList.Text = str
entry.DropDownReadOnly = true
entry.DropDownDescriptionOnly = true
entry.DisplayAsDropDownListItem = true
end
function DeleteMemrec(MR)
local memreclist = getMemrecChildList(MR)
for k,v in pairs(memreclist) do
if v~= nil then memoryrecord_delete(v) end
end
end
function getMemrecChildList(MR)
local memrecList = {}
for i = 0, MR.Count do
if MR.Child[i] ~= nil then
local child = MR.Child[i]
memrecList[i] = child
end
end
return memrecList
end
function AddMemoryRecord(V_MemoryRecord, V_Address, V_Type, V_Description, V_isHex)
al=getAddressList()
local newMR=al.createMemoryRecord();
newMR.Description= V_Description
newMR.Address= V_Address
newMR.Type= V_Type
newMR.ShowAsHex = V_isHex
if V_MemoryRecord ~= nil then
newMR.Parent= V_MemoryRecord
end
return newMR
end
function disableSL(Message)
SpawnListTimer.destroy()
memrec.Active = false
if Message then error(Message) end
end
[DISABLE]
disableSL()
66
"Ascension(Before Game)"
FF00FF
1
67
"Randomize"
008080
Auto Assembler Script
[ENABLE]
alloc(randomAscension,4)
registersymbol(randomAscension)
randomAscension:
dd 1
[DISABLE]
randomAscension:
dd 0
dealloc(randomAscension,4)
unregistersymbol(randomAscension)
68
"King Of The Hill(In Game)"
FF00FF
1
79
"ActivateSpawner"
8080FF
Auto Assembler Script
[ENABLE]
alloc(KOHSpawner,4)
registersymbol(KOHSpawner)
KOHSpawner:
dd 1
[DISABLE]
KOHSpawner:
dd 0
unregistersymbol(KOHSpawner)
dealloc(KOHSpawner,4)
74
"Species Spawn Replace"
008080
Auto Assembler Script
[ENABLE]
alloc(KOHSpecies,1)
registersymbol(KOHSpecies)
KOHSpecies:
db 00
[DISABLE]
unregistersymbol(KOHSpecies)
dealloc(KOHSpecies,1)
76
"Queued Species"
27:albertosaurus
19:allosaurus
11:ankylosaurus
33:carcharodontosaurus
14:carnotaurus
17:deinocheirus
25:deinonnychus
16:dilphosaurus
6:dimetrodon
26:dryosaurus
21:edmonotosaurus
15:giganotosaurus
20:iguanodon
32:mammoth
7:pachycephalosaurus
8:parasaurolophus
22:protoceratops
31:sabertoothed tiger
28:sarcosuchus
13:skorpiovenator
12:spinosaurus
10:stegosaurus
9:styracosaurus
18:suchomimus
23:shantungosaurus
1:compsognathus
0:tyrannosaurus rex
3:triceratops
2:velociraptor
4:yangchuansaurus
0
Byte
KOHSpecies
73
"Amount Spawn Replace"
008080
Auto Assembler Script
[ENABLE]
alloc(KOHAmount,4)
registersymbol(KOHAmount)
KOHAmount:
dd 1
[DISABLE]
unregistersymbol(KOHAmount)
dealloc(KOHAmount,4)
77
"Queued Amount"
0
4 Bytes
KOHAmount
75
"Skin Spawn Replace(0-AmountOfSkins)"
008080
Auto Assembler Script
[ENABLE]
alloc(KOHSkin,4)
registersymbol(KOHSkin)
KOHSkin:
dd 0
[DISABLE]
unregistersymbol(KOHSkin)
dealloc(KOHSkin,4)
78
"Queued Skin"
0
4 Bytes
KOHSkin
72
"Crazy Randomize"
008080
Auto Assembler Script
[ENABLE]
alloc(KOHCrazy,4)
registersymbol(KOHCrazy)
KOHCrazy:
dd 1
[DISABLE]
KOHCrazy:
dd 0
dealloc(KOHCrazy,4)
unregistersymbol(KOHCrazy)
80
"Onslaught(After Seeing Red Start Game)"
FF00FF
1
81
"Species"
27:albertosaurus
19:allosaurus
11:ankylosaurus
33:carcharodontosaurus
14:carnotaurus
17:deinocheirus
25:deinonnychus
16:dilphosaurus
6:dimetrodon
26:dryosaurus
21:edmonotosaurus
15:giganotosaurus
20:iguanodon
32:mammoth
7:pachycephalosaurus
8:parasaurolophus
22:protoceratops
31:sabertoothed tiger
28:sarcosuchus
13:skorpiovenator
12:spinosaurus
10:stegosaurus
9:styracosaurus
18:suchomimus
23:shantungosaurus
1:compsognathus
0:tyrannosaurus rex
3:triceratops
2:velociraptor
4:yangchuansaurus
0
Byte
GWORLD
4
3C8
1E0
82
"TextureIndex"
0
4 Bytes
GWORLD
8
3C8
1E0
83
"SpawnCount"
0
4 Bytes
GWORLD
C
3C8
1E0
84
"RandomEntrance"
0
Byte
GWORLD
10
3C8
1E0
85
"Arcade(During Load of The Game)"
FF00FF
1
90
"Crazy Spawn Changer"
8080FF
Auto Assembler Script
[ENABLE]
alloc(ArcadeCrazy,4)
registersymbol(ArcadeCrazy)
ArcadeCrazy:
dd 1
[DISABLE]
ArcadeCrazy:
dd 0
dealloc(ArcadeCrazy,4)
unregistersymbol(ArcadeCrazy)
86
"GetSpawnData"
8080FF
Auto Assembler Script
[ENABLE]
alloc(ArcadeData,4)
registersymbol(ArcadeData)
ArcadeData:
dd 1
[DISABLE]
ArcadeData:
dd 0
unregistersymbol(ArcadeData)
dealloc(ArcadeData,4)
89
"List"
1
91
"Spectate(After Seeing Red Start Game)"
FF00FF
1
92
"Crazy Spawn Changer"
8080FF
Auto Assembler Script
[ENABLE]
alloc(SpectateCrazy,4)
registersymbol(SpectateCrazy)
SpectateCrazy:
dd 1
[DISABLE]
SpectateCrazy:
dd 0
dealloc(SpectateCrazy,4)
unregistersymbol(SpectateCrazy)
93
"GetSpawnData"
8080FF
Auto Assembler Script
[ENABLE]
alloc(SpectateData,4)
registersymbol(SpectateData)
SpectateData:
dd 1
[DISABLE]
SpectateData:
dd 0
unregistersymbol(SpectateData)
dealloc(SpectateData,4)
94
"List"
1
ArenaManagerOff
24EA3A70000
MaxHealth
24EA3BD0000
MaxStamina
24EB56E0000
NoStun
24EC38D0000
MaxChargingPower
24EC51B0000
QuickRagdoll
24EC51F0000
NoAttackCooldown
24EC5290000
+310 second player
+400 player
??? needs to find more