143
"Cheats"
1
144
"Player"
1
10
"PlayerManager"
1
0
Double
"GameAssembly.dll"+03BFF308
0
80
40
B8
A0
B0
240
80
"Stats"
1
0
Double
+50
0
209
"Health"
0
Float
+8
211
"CurrentPosX"
0
Float
+84
212
"CurrentPosY"
0
Float
+88
213
"CurrentPosZ"
0
Float
+8C
187
"TP Player"
1
0
Double
+128
0
188
"PendingTP"
0
Byte
+90
189
"PendingTPPosx"
0
Float
+94
190
"PendingTPPosy"
0
Float
+98
191
"PendingTPPosz"
0
Float
+9C
192
"PendingTPRotx"
0
Float
+A0
193
"PendingTPRoty"
0
Float
+A4
194
"PendingTPRotz"
0
Float
+A8
195
"PendingTPRotw"
0
Float
+AC
210
"Godmode"
0
Byte
+3F8
47
"Stamina"
0
Float
+90
74
"LookingAtAngle"
0
Float
+384
75
"MaxLookDistance"
0
Float
+388
76
"Stunned"
0
Byte
+39D
77
"OnFire"
0
Byte
+39E
54
"Damaged"
0
Byte
+100
55
"Dead"
0
Byte
+130
56
"_downed"
0
Byte
+131
58
"TimeDetected?"
0
Float
+158
59
"CompletelyDetected"
0
Byte
+188
61
"DetectionMeter"
0
Float
+1A8
50
"InventoryManager"
1
0
Double
+B8
0
205
"Pistol/FlamethrowerAmmo (freeze at 5)"
0
4 Bytes
+190
20
217
"Revolver/ShotgunAmmo (freeze at 4)"
0
4 Bytes
+190
24
177
"CanShoot"
0
Byte
+158
175
"GunJammed"
0
Byte
+5D0
178
"Recoil"
1
0
Double
+150
0
179
"No description"
0
Float
+38
180
"No description"
0
Float
+3C
181
"No description"
0
Float
+40
183
"CamShake"
1
0
Double
+148
0
184
"Intensity"
0
Float
+20
185
"Duration"
0
Float
+28
186
"UsesDuration"
0
Byte
+24
51
"Paused"
0
Byte
+D0
52
"CanPause"
0
Byte
+E8
53
"DisablePauseDuringFinalChase"
0
Byte
+E9
57
"_pauseDownedTimer"
0
Byte
+132
60
"InsideVent"
0
Byte
+189
62
"LocalTimeSpentOutside"
0
Float
+1B4
63
"TimeSpentOutside"
0
Float
+1B8
64
"Finished"
0
Byte
+238
65
"Stuck"
0
Byte
+248
66
"StuckOnAKey"
0
Byte
+249
67
"Scent"
0
Float
+24C
68
"TimeUntilCanHeal"
0
Float
+268
69
"MaxAmountOfStucks"
0
Float
+338
70
"CurAmountOfStucks"
0
Float
+33C
71
"GottenUnstuck"
0
Byte
+350
72
"CantGetStuck"
0
Byte
+370
73
"Inside"
0
Byte
+381
81
"AmountOfVotes"
0
4 Bytes
+40C
82
"StoryModeValues"
1
0
Double
+418
84
"CompletingDay"
0
Byte
+420
83
"InForest"
0
Byte
+430
145
"Store"
1
97
"StoreManager"
1
0
Double
"GameAssembly.dll"+03E89BA8
0
0
B8
108
18
858
80
147
"Hygiene"
0
Float
+128
148
"Stock"
0
Float
+12C
149
"Rating"
0
Float
+130
150
"BeingChased"
0
Byte
+1C0
151
"DoppelsLetThrough"
0
4 Bytes
+1C4
152
"DiffusersActivated"
0
4 Bytes
+1C8
153
"SecondsLeft"
0
4 Bytes
+208
154
"AlreadyCompleted"
0
Byte
+440
155
"AmountOfCompletions"
0
4 Bytes
+444
156
"Quota"
0
Float
+460
146
"ActualRevenue"
0
Float
+468
157
"QuestionCooldown"
0
Float
+4A8
158
"MaxQuestionCooldown"
0
Float
+4AC
159
"AllowedToSpawnBrowsingNPCs"
0
Byte
+540
160
"ActiveCustomerCount"
0
4 Bytes
+544
161
"TodayWasSetDayObj"
0
Byte
+580
162
"EveryoneCompleted"
0
Byte
+581
163
"EndOfDayFakeout"
0
Byte
+582
164
"IfDieThenCompleteDay"
0
Byte
+583
165
"AlreadyStarted"
0
Byte
+590
166
"HuntHappened"
0
Byte
+610
167
"EligibleForHuntAchievement"
0
Byte
+611
168
"HuntAlreadyEndedToday"
0
Byte
+612
169
"AlreadyDone"
0
Byte
+630
46
"Backup PTRs"
1
89
"Plr Ptrs"
1
11
"pointerscan result"
Double
"GameAssembly.dll"+03C36938
0
160
88
20
B8
78
58
12
"pointerscan result"
Double
"GameAssembly.dll"+03D0C480
0
B0
E0
88
98
40
B8
13
"pointerscan result"
Double
"GameAssembly.dll"+03D2AA10
0
B0
E0
88
98
10
B8
14
"pointerscan result"
Double
"GameAssembly.dll"+03D2AA10
0
160
88
20
340
300
90
15
"pointerscan result"
Double
"UnityPlayer.dll"+01F6C0E0
0
3C0
0
18
B0
B8
98
16
"pointerscan result"
Double
"UnityPlayer.dll"+01F2BC58
0
3C0
0
18
110
100
90
17
"pointerscan result"
Double
"UnityPlayer.dll"+01F6C0E0
0
3C0
0
18
148
40
98
18
"pointerscan result"
Double
"UnityPlayer.dll"+01F6C0E0
0
3C0
0
18
C8
E8
98
19
"pointerscan result"
Double
"UnityPlayer.dll"+01F6C0E0
0
3C0
0
18
38
B8
90
20
"pointerscan result"
Double
"UnityPlayer.dll"+01F2BC58
0
3C0
0
18
98
100
98
21
"pointerscan result"
Double
"UnityPlayer.dll"+01F2BC58
0
3C0
0
18
80
160
90
22
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
80
40
B8
98
270
23
"pointerscan result"
Double
"GameAssembly.dll"+03BF0208
0
80
40
B8
A0
278
A8
24
"pointerscan result"
Double
"GameAssembly.dll"+03C36B00
0
B0
E0
90
10
B8
90
25
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
B0
E0
90
40
B8
48
26
"pointerscan result"
Double
"GameAssembly.dll"+03D0C480
0
80
40
B8
350
560
4A0
27
"pointerscan result"
Double
"GameAssembly.dll"+03BF0208
0
80
40
B8
350
560
100
28
"pointerscan result"
Double
"GameAssembly.dll"+03D0C480
0
80
40
B8
350
418
3E0
29
"pointerscan result"
Double
"GameAssembly.dll"+03D2AA10
0
80
10
B8
310
210
C8
30
"pointerscan result"
Double
"GameAssembly.dll"+03D2AA10
0
80
10
B8
310
48
5A8
31
"pointerscan result"
Double
"GameAssembly.dll"+03C36B00
0
80
10
B8
310
570
90
32
"pointerscan result"
Double
"GameAssembly.dll"+03BFBF68
0
80
0
258
1F8
48
1D0
33
"pointerscan result"
Double
"GameAssembly.dll"+03C38008
0
80
0
258
1F8
1C0
1C8
34
"pointerscan result"
Double
"GameAssembly.dll"+03C1C340
0
80
0
258
1F8
68
38
35
"pointerscan result"
Double
"UnityPlayer.dll"+01F49B18
0
0
50
158
0
3A0
0
36
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
0
18
10
80
40
B8
37
"pointerscan result"
Double
"UnityPlayer.dll"+01F6C0E0
0
D8
3D0
0
68
90
38
"pointerscan result"
Double
"GameAssembly.dll"+03D0C480
0
D8
90
40
B8
40
78
39
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
D8
90
40
B8
90
320
40
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
D8
90
40
B8
98
270
41
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
D8
90
40
B8
B0
2E0
42
"pointerscan result"
Double
"GameAssembly.dll"+03D2AA10
0
D8
90
10
B8
418
410
43
"pointerscan result"
Double
"GameAssembly.dll"+03BE2638
0
D8
90
0
B8
50
98
44
"pointerscan result"
Double
"GameAssembly.dll"+03BFF308
0
E8
1E0
D8
90
40
B8
45
"pointerscan result"
Double
"GameAssembly.dll"+03D0C480
0
E8
1E0
D8
90
40
B8
142
"Store Ptrs"
1
98
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C356C0
0
0
238
1F8
1C8
110
1C0
99
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C75778
0
0
238
40
F0
448
100
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C36A58
0
0
238
F8
108
2A0
1C0
101
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
78
1D0
0
A0
102
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
40
78
458
98
103
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
78
D0
3F8
98
104
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
D0
2B0
70
80
107
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03BEF940
0
80
0
B8
20
278
C8
108
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
20
B8
98
78
109
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
20
100
C8
111
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
40
48
128
2C0
112
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
40
48
D0
2B0
113
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
40
78
190
98
114
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03E89BA8
0
0
B8
1D0
FF8
80
115
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03E89BA8
0
0
B8
1D0
FF0
80
116
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C25538
0
0
B8
20
398
98
50
117
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C25538
0
0
B8
180
430
C8
50
118
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
180
3E8
98
119
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03BEF8A8
0
0
B8
C0
A0
128
2D0
120
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03BEA418
0
0
B8
C0
A0
128
2D0
121
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C67070
0
0
B8
C0
A0
128
390
122
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C3A600
0
0
B8
100
A0
78
3D0
123
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C69938
0
0
B8
100
A0
20
450
124
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C17368
0
0
B8
100
A0
20
280
125
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03BFF610
0
0
B8
100
A0
20
280
126
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03D3BBA0
0
80
80
B8
60
200
50
127
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C331F8
0
80
80
B8
40
268
128
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C331F8
0
80
80
B8
40
98
218
131
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
78
1F8
C8
48
132
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C67070
0
0
B8
E0
A0
20
3A0
133
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C67B50
0
0
B8
E0
A0
20
460
134
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C69938
0
0
B8
E0
A0
D0
390
135
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C67B50
0
0
B8
E0
A0
D0
340
136
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
48
D0
110
98
137
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
48
D0
160
C8
138
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C06150
0
0
B8
48
128
118
98
139
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C308D0
0
80
20
B8
40
1F8
60
140
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C308D0
0
80
20
B8
1C0
48
60
141
"pointerscan result"
1
0
Double
"GameAssembly.dll"+03C41C58
0
80
20
B8
1C0
10
A0
199
"Customer Identifier (no gas/special)"
Auto Assembler Script
{$lua}
if syntaxcheck then return end
DC = DC or {}
DC.POLL_MS = 1000
DC.RESCAN_MS = 30000
DC.CURDAY = { todaysNpcs = 0xa8 }
DC.NAME_OFF = 0x38
DC.NAME_MODE = 'inline'
local function plausible(p) return p and p > 0x10000 and p < 0x7fffffffffff end
DC.plausible = plausible
function DC.byte(a)
if not a then return nil end
local b = readBytes(a, 1, true)
return b and b[1]
end
function DC.list(p)
local out = {}
if not plausible(p) then return out end
local items = readPointer(p + 0x10)
local size = readInteger(p + 0x18)
if not plausible(items) or not size or size < 0 or size > 4096 then return out end
for i = 0, size - 1 do out[#out + 1] = readPointer(items + 0x20 + i * 8) end
return out
end
function DC.class(n) return mono_findClass('', n) or mono_findClass(nil, n) end
function DC.singleton(class, off)
if not (class and DC.domain) then return nil end
local base = mono_class_getStaticFieldAddress(DC.domain, class)
if not base then return nil end
return readPointer(base + (off or 0))
end
function DC.addr(a)
if type(a) == 'number' then return a end
if type(a) == 'string' then return tonumber((a:gsub('^0[xX]', ''):gsub('%s', '')), 16) end
return nil
end
DC._fcache = DC._fcache or {}
function DC.fieldsOf(cn)
if DC._fcache[cn] then return DC._fcache[cn] end
local c = DC.class(cn)
if not c then return nil end
local out, seen, cc, depth = {}, {}, c, 0
while cc and depth < 12 do
local ok, fs = pcall(mono_class_enumFields, cc)
if ok and fs then
for _, f in ipairs(fs) do
if f.name and not seen[f.name] and not f.isStatic then
seen[f.name] = true
out[#out + 1] = { name = f.name, offset = f.offset }
end
end
end
local ok2, p = pcall(mono_class_getParent, cc)
cc = ok2 and p or nil
depth = depth + 1
end
table.sort(out, function(a, b) return (a.offset or 0) < (b.offset or 0) end)
DC._fcache[cn] = out
return out
end
function DC.dumpClass(cn)
local f = DC.fieldsOf(cn)
if not f then print('class not found: ' .. tostring(cn)); return end
print(('='):rep(64))
print('class ' .. cn .. ' (' .. #f .. ' fields)')
for _, e in ipairs(f) do
print(string.format(' %-6s %s', string.format('%X', e.offset or 0), e.name))
end
end
function DC.dumpObj(a, cn)
local addr = DC.addr(a)
if not plausible(addr) then print('bad address'); return end
cn = cn or 'Npc'
local f = DC.fieldsOf(cn)
if not f then print('unknown class ' .. tostring(cn)); return end
print(('='):rep(64))
print(string.format('%s @ %X name=%s', cn, addr, tostring(DC.assetName(addr))))
for _, e in ipairs(f) do
local at = addr + (e.offset or 0)
local ptr = readPointer(at)
local i, b = readInteger(at) or 0, DC.byte(at)
local val
if plausible(ptr) then
local sub = DC.assetName(ptr)
val = string.format('-> %X%s', ptr, sub and (' "' .. sub .. '"') or '')
else
val = tostring(i) .. ((b and b <= 1) and (' (bool ' .. tostring(b ~= 0) .. ')') or '')
end
print(string.format(' %-6s %-32s %s', string.format('%X', e.offset or 0), e.name, val))
end
end
local function asciiAt(a)
if not plausible(a) then return nil end
local ok, s = pcall(readString, a, 48, false)
if not ok or not s then return nil end
if #s < 2 or #s > 48 then return nil end
if s:find('[^%w%s%.%-]') then return nil end
if not s:find('%a') then return nil end
return s
end
function DC.validName(s)
if not s then return false end
if #s < 4 then return false end
if not s:find('^%u') then return false end
if s:find('[_%.]') then return false end
return true
end
function DC.native(obj)
if not plausible(obj) then return nil end
local n = readPointer(obj + 0x10)
return plausible(n) and n or nil
end
local function nameTry(obj, off, mode)
local nat = DC.native(obj)
if not nat then return nil end
if mode == 'inline' then return asciiAt(nat + off) end
return asciiAt(readPointer(nat + off))
end
function DC.assetName(obj)
return nameTry(obj, DC.NAME_OFF, DC.NAME_MODE)
end
function DC.label(obj, i)
return DC.assetName(obj) or string.format('#%s @ %X', tostring(i or '?'), obj)
end
function DC.names()
local pool = DC.todaysNpcs()
if #pool == 0 then print('[doppel] no Npcs to calibrate against'); return end
local best
for _, mode in ipairs({ 'inline', 'ptr' }) do
for off = 0, 0x100, 8 do
local got, seen, distinct = 0, {}, 0
for _, o in ipairs(pool) do
local s = nameTry(o, off, mode)
if s then
got = got + 1
if not seen[s] then seen[s] = true; distinct = distinct + 1 end
end
end
if got == #pool then
local score = distinct * 100 + got
if not best or score > best.score then
best = { off = off, mode = mode, score = score, distinct = distinct }
end
end
end
end
if best then
DC.NAME_OFF, DC.NAME_MODE = best.off, best.mode
print(string.format('[doppel] names: native+%X (%s), %d distinct of %d',
best.off, best.mode, best.distinct, #pool))
else
print('[doppel] no name offset found; raw probe of sample 1:')
local nat = DC.native(pool[1])
for off = 0, 0x100, 8 do
local a, b = asciiAt(nat + off), asciiAt(readPointer(nat + off))
if a or b then print(string.format(' +%02X inline=%-24s ptr=%s', off, tostring(a), tostring(b))) end
end
end
end
function DC.flagOffset()
if DC._flagOff then return DC._flagOff, DC._flagName end
for _, e in ipairs(DC.fieldsOf('Npc') or {}) do
if e.name:lower():find('doppel', 1, true) then
DC._flagOff, DC._flagName = e.offset, e.name
return DC._flagOff, DC._flagName
end
end
end
function DC.isDoppel(npc)
local off = DC.flagOffset()
if not off then return nil end
local b = DC.byte(npc + off)
return b ~= nil and b ~= 0
end
function DC.todaysNpcs()
local cd = DC.singleton(DC.class('CurrentDayManager'))
if cd and cd ~= 0 then
local lp = readPointer(cd + DC.CURDAY.todaysNpcs)
if plausible(lp) then
local l = DC.list(lp)
if #l > 0 then
DC._roster, DC._listPtr = l, lp
if not DC._vt then DC._vt = readPointer(l[1]) end
end
end
end
return DC._roster or {}, DC._listPtr
end
function DC.looksLikeNpc(a)
if not plausible(a) then return false end
if readPointer(a) ~= DC._vt then return false end
if not DC.native(a) then return false end
local off = DC.flagOffset()
if off then
local b = DC.byte(a + off)
if b == nil or b > 1 then return false end
end
return DC.validName(DC.assetName(a))
end
function DC.sweep(verbose)
DC.todaysNpcs()
if not plausible(DC._vt) then return nil, 'no Npc vtable cached (need a live day once)' end
local scan = createMemScan()
local ok = pcall(function()
scan.firstScan(soExactValue, vtQword, rtTruncated,
string.format('%X', DC._vt), nil, 0x0, 0x7fffffffffff,
'*X*C*W', fsmAligned, '8', true, true, false, false)
scan.waitTillDone()
end)
if not ok then scan.destroy(); return nil, 'scan failed' end
local fl = createFoundList(scan); fl.initialize()
local raw, found, seen = fl.Count, {}, {}
for i = 0, fl.Count - 1 do
local a = tonumber(fl.Address[i], 16)
if a and not seen[a] and DC.looksLikeNpc(a) then
seen[a] = true; found[#found + 1] = a
end
end
fl.destroy(); scan.destroy()
if verbose then
print(string.format('[doppel] vtable %X: %d raw hits, %d passed validation',
DC._vt, raw, #found))
end
DC._swept, DC._rawHits = found, raw
return found
end
function DC.diag()
DC.todaysNpcs()
print(string.format(' roster entries : %d', #(DC._roster or {})))
print(string.format(' cached vtable : %s', DC._vt and string.format('%X', DC._vt) or 'nil'))
local off, nm = DC.flagOffset()
print(string.format(' flag : %s @ +%s', tostring(nm), off and string.format('%X', off) or '?'))
print(string.format(' name : native+%X (%s)', DC.NAME_OFF, DC.NAME_MODE))
if DC._roster and DC._roster[1] then
local a = DC._roster[1]
print(string.format(' sample %X: vt=%s native=%s name=%s passes=%s',
a, string.format('%X', readPointer(a) or 0), tostring(DC.native(a)),
tostring(DC.assetName(a)), tostring(DC.looksLikeNpc(a))))
end
DC.sweep(true)
end
DC.MANAGERS = {
'CurrentDayManager', 'EventManager', 'EndlessGenerationManager',
'NuisanceCustomerManager', 'NPCFolder', 'HuntManager', 'StoryModeManager',
'EndOfDayReport', 'EODReportValues', 'CurrentDayManager',
}
function DC.npcCollection(p)
if not plausible(p) then return nil end
local out
local len = readInteger(p + 0x18)
if len and len > 0 and len < 1024 then
local probe, good = math.min(len, 32), 0
for i = 0, probe - 1 do
if DC.looksLikeNpc(readPointer(p + 0x20 + i * 8)) then good = good + 1 end
end
if good > 0 and good >= probe * 0.5 then
out = {}
for i = 0, len - 1 do
local e = readPointer(p + 0x20 + i * 8)
if DC.looksLikeNpc(e) then out[#out + 1] = e end
end
return out, 'array'
end
end
local items, size = readPointer(p + 0x10), readInteger(p + 0x18)
if plausible(items) and size and size > 0 and size < 1024 then
local probe, good = math.min(size, 32), 0
for i = 0, probe - 1 do
if DC.looksLikeNpc(readPointer(items + 0x20 + i * 8)) then good = good + 1 end
end
if good > 0 and good >= probe * 0.5 then
out = {}
for i = 0, size - 1 do
local e = readPointer(items + 0x20 + i * 8)
if DC.looksLikeNpc(e) then out[#out + 1] = e end
end
return out, 'list'
end
end
return nil
end
function DC.pools(verbose)
local found, seenObj = {}, {}
local function inspect(obj, label, depth)
if not plausible(obj) or seenObj[obj] or depth > 2 then return end
seenObj[obj] = true
for _, e in ipairs(DC.fieldsOf(label) or {}) do
local p = readPointer(obj + (e.offset or 0))
if plausible(p) then
local members, kind = DC.npcCollection(p)
if members and #members > 0 then
found[#found + 1] = { where = label .. '.' .. e.name, kind = kind, npcs = members }
end
end
end
end
for _, cn in ipairs(DC.MANAGERS) do
local cls = DC.class(cn)
if cls then
for _, so in ipairs({ 0x0, 0x8 }) do
local inst = DC.singleton(cls, so)
if plausible(inst) and not seenObj[inst] then
inspect(inst, cn, 1)
end
end
end
end
local cd = DC.singleton(DC.class('CurrentDayManager'))
if plausible(cd) then
for _, e in ipairs(DC.fieldsOf('CurrentDayManager') or {}) do
local p = readPointer(cd + (e.offset or 0))
if plausible(p) and e.name:lower():find('gen') then
inspect(p, 'EndlessGenerationManager', 2)
end
end
end
if verbose then
print(('='):rep(64))
print('Npc POOLS FOUND')
print(('-'):rep(64))
if #found == 0 then print(' none -- managers may not be initialised yet') end
for _, f in ipairs(found) do
print(string.format(' %-46s %-6s %d', f.where, f.kind, #f.npcs))
end
end
DC._pools = found
return found
end
function DC.lineup()
local pools = DC.pools()
local seen, rows = {}, {}
for _, f in ipairs(pools) do
for _, n in ipairs(f.npcs) do
local nm = DC.assetName(n)
if DC.validName(nm) and not seen[nm] then
seen[nm] = true
rows[#rows + 1] = { nm = nm, d = DC.isDoppel(n), src = f.where }
end
end
end
table.sort(rows, function(a, b)
if a.d ~= b.d then return a.d end
return a.nm < b.nm
end)
local off, fname = DC.flagOffset()
print(('='):rep(64))
print(string.format("TODAY'S LINEUP (%d across %d pools) [%s @ +%X]",
#rows, #pools, tostring(fname), off or 0))
print(('-'):rep(64))
local d = 0
for _, r in ipairs(rows) do
if r.d then d = d + 1 end
print(string.format(' %-32s %-22s %s', r.nm,
r.d and '** DOPPELGANGER **' or 'human', r.src))
end
print(('-'):rep(64))
print(string.format(' %d doppelganger(s) of %d', d, #rows))
if #pools <= 1 then
print(' only one pool found -- run DC.pools(true), or DC.dumpClass("CurrentDayManager")')
end
return rows
end
function DC.buildCatalog(force)
if DC._cat and not force then return DC._cat end
local swept = DC.sweep() or {}
local roster = DC.todaysNpcs()
local isSched = {}
for _, n in ipairs(roster) do isSched[n] = true end
local byName, order = {}, {}
local function add(a, sched)
local nm = DC.assetName(a)
if not DC.validName(nm) then return end
if byName[nm] then
if sched then byName[nm].sched = true end
return
end
byName[nm] = { nm = nm, addr = a, d = DC.isDoppel(a), sched = sched }
order[#order + 1] = nm
end
for _, n in ipairs(roster) do add(n, true) end
for _, n in ipairs(swept) do add(n, isSched[n] or false) end
table.sort(order)
local cat = {}
for _, nm in ipairs(order) do cat[#cat + 1] = byName[nm] end
DC._cat = cat
return cat
end
local function row(r)
return string.format(' %-34s %-22s %s', r.nm,
r.d and '** DOPPELGANGER **' or 'human',
r.sched and 'scheduled' or '')
end
function DC.all()
local cat = DC.buildCatalog(true)
local roster = DC.todaysNpcs()
local off, fname = DC.flagOffset()
print(('='):rep(64))
print(string.format("TODAY'S LINEUP (%d) [%s @ +%X]", #roster, tostring(fname), off or 0))
print(('-'):rep(64))
local d = 0
for i, n in ipairs(roster) do
local isD = DC.isDoppel(n)
if isD then d = d + 1 end
print(string.format(' %d. %-30s %s', i, DC.label(n, i),
isD and '** DOPPELGANGER **' or 'human'))
end
print(('-'):rep(64))
print(string.format(' %d doppelganger(s) scheduled | %d Npcs in catalog', d, #cat))
print(' DC.find("norbert") to look anyone up | DC.catalog() for the lot')
DC._lastSweep = os.time()
DC._count = #roster
end
function DC.find(q)
if type(q) ~= 'string' or #q == 0 then print('usage: DC.find("norbert")'); return end
local cat = DC.buildCatalog()
local ql, hits = q:lower(), 0
print(('='):rep(64))
for _, r in ipairs(cat) do
if r.nm:lower():find(ql, 1, true) then hits = hits + 1; print(row(r)) end
end
if hits == 0 then print(' no Npc matching "' .. q .. '"') end
print(('-'):rep(64))
end
function DC.catalog(doppelsOnly)
local cat = DC.buildCatalog()
print(('='):rep(64))
print(string.format('Npc CATALOG (%d)%s', #cat, doppelsOnly and ' -- doppelgangers only' or ''))
print(('-'):rep(64))
local d = 0
for _, r in ipairs(cat) do
if r.d then d = d + 1 end
if not doppelsOnly or r.d then print(row(r)) end
end
print(('-'):rep(64))
print(string.format(' %d doppelganger(s) of %d', d, #cat))
end
function DC.doppels() DC.catalog(true) end
function DC.key()
local npcs = DC.todaysNpcs()
if #npcs == 0 then print('[doppel] no active roster'); return end
local off, fname = DC.flagOffset()
print(('='):rep(64))
print(string.format("TODAY'S ROSTER (%d) [%s @ +%X]", #npcs, tostring(fname), off or 0))
print(('-'):rep(64))
local d = 0
for i, n in ipairs(npcs) do
local isD = DC.isDoppel(n)
if isD then d = d + 1 end
print(string.format(' %d. %-30s %s', i, DC.label(n, i),
isD and '** DOPPELGANGER **' or 'human'))
end
print(('-'):rep(64))
print(string.format(' %d doppelganger(s) of %d scheduled', d, #npcs))
end
function DC.npc(i)
if type(i) ~= 'number' then print('usage: DC.npc(1)'); return end
local npcs = DC.todaysNpcs()
if not npcs[i] then print('no entry ' .. i); return end
DC.dumpObj(npcs[i], 'Npc')
end
function DC.monoReady()
local d = mono_enumDomains()
if not d or #d == 0 then return false end
DC.domain = d[1]
return DC.class('CurrentDayManager') ~= nil and DC.class('Npc') ~= nil
end
function DC.bringUpMono(timeoutMs)
local pid = getOpenedProcessID()
if not pid or pid == 0 then return false, 'not attached to a process' end
if type(mono_enumDomains) ~= 'function' then return false, 'Mono Lua API unavailable' end
local waited, step = 0, 300
timeoutMs = timeoutMs or 15000
while waited < timeoutMs do
pcall(LaunchMonoDataCollector)
if DC.monoReady() then return true end
sleep(step); waited = waited + step
if waited % 3000 == 0 then print(string.format('[doppel] waiting on mono... %ds', waited / 1000)) end
end
return false, 'mono collector not injected after ' .. (timeoutMs / 1000) .. 's -- run CE as admin'
end
[ENABLE]
if DC.timer then DC.timer.destroy(); DC.timer = nil end
DC._fcache, DC._flagOff, DC._flagName = {}, nil, nil
DC._swept, DC._count, DC._lastSweep = nil, 0, 0
local ok, err = DC.bringUpMono(15000)
if not ok then print('[doppel] ' .. tostring(err)); error(tostring(err)) end
print('[doppel] mono ready')
pcall(function()
DC.todaysNpcs()
DC.names()
DC.buildCatalog(true)
DC.pools(true)
DC.lineup()
end)
DC.timer = createTimer(nil, false)
DC.timer.Interval = DC.POLL_MS
DC.timer.OnTimer = function()
local good, e = pcall(function()
local _, lp = DC.todaysNpcs()
if lp and lp ~= DC._prevList then DC._prevList = lp; DC.all(); return end
if DC.RESCAN_MS > 0 and (os.time() - (DC._lastSweep or 0)) * 1000 >= DC.RESCAN_MS then
local before = DC._count or 0
DC._lastSweep = os.time()
local s = DC.sweep() or {}
local total = #(DC._roster or {})
for _, n in ipairs(s) do
local dup = false
for _, r in ipairs(DC._roster or {}) do if r == n then dup = true; break end end
if not dup then total = total + 1 end
end
if total ~= before then DC.all() end
end
end)
if not good then print('[doppel] tick: ' .. tostring(e)) end
end
DC.timer.Enabled = true
[DISABLE]
if DC and DC.timer then
DC.timer.Enabled = false
DC.timer.destroy()
DC.timer = nil
end
if DC then DC._prevList = nil end
print('[doppel] disarmed')