日志补发

This commit is contained in:
qatby 2024-12-26 16:46:44 +08:00
parent b389173ce8
commit 778b5a9c7c

423
dbgbf1215.lua Normal file
View File

@ -0,0 +1,423 @@
function jhxbbgame.dbgout(...)
--release_print(...)
end
local bfuid = {
"30000000A4030000000032AD7E040000",
"52000000A7030000008067AD7E040000",
"2E000000A603000000806AAD7E040000",
"49000000A8030000000066AD7E040000",
"36000000A503000000002FAD7E040000",
"41000000B003000000006CAD7E040000",
"29000000B1030000000052AC7E040000",
"2A000000B3030000000055AC7E040000",
"5C000000B2030000000058AC7E040000",
"53000000B4030000008056AC7E040000",
"4E000000B603000000006BAC7E040000",
"3B000000B5030000008069AC7E040000",
"45000000B703000000006EAC7E040000",
"31000000B9030000000047AD7E040000",
"23000000BA030000008048AD7E040000",
"4E000000BB03000000804BAD7E040000",
"27000000B803000000806CAC7E040000",
"3F000000A3030000008030AD7E040000",
"24000000BC03000000004DAD7E040000",
"22000000BE0300000000B3AC7E040000",
"46000000BF0300000080B4AC7E040000",
"29000000C00300000000B6AC7E040000",
"3F000000C1030000008001AD7E040000",
"50000000C2030000008004AD7E040000",
"4C000000C3030000000000AD7E040000",
"5A0000004F03000000009BAC7E040000",
"5900000042030000000006AD7E040000",
"3D0000004D0300000080E7AC7E040000",
"4C000000C4030000000003AD7E040000",
"3400000040030000000068AC7E040000",
"25000000C50300000000E6AC7E040000",
"21000000C60300000000E9AC7E040000",
"54000000C70300000080EAAC7E040000",
"2D00000036030000008053AC7E040000",
"48000000C80300000000ECAC7E040000",
"32000000C903000000009EAC7E040000",
"44000000340300000000B9AC7E040000",
"26000000CB03000000809CAC7E040000",
"43000000CA0300000000A1AC7E040000",
"4D0000003903000000004AAD7E040000",
"42000000CC03000000809FAC7E040000",
"51000000CD030000008033AD7E040000",
"57000000CE030000000070AC7E040000",
"38000000CF030000008071AC7E040000",
"2F000000D0030000000073AC7E040000",
"26000000D1030000008074AC7E040000",
"46000000D2030000000076AC7E040000",
"45000000D3030000000035AD7E040000",
"3F000000D403000000005EAD7E040000",
"33000000D503000000805FAD7E040000",
"46000000D6030000000061AD7E040000",
"5B000000D7030000008062AD7E040000",
"56000000D8030000000064AD7E040000",
"3C000000D903000000006BAC7E040000",
"5D000000DB030000008030AD7E040000",
"2F000000DE030000000000AD7E040000",
"3C000000DF030000000082AC7E040000",
"3E00000066030000000069AD7E040000",
"3C000000E0030000008083AC7E040000",
"37000000E2030000008086AC7E040000",
"5E000000E3030000000088AC7E040000",
"43000000E403000000809CAC7E040000",
"4F000000E503000000006BAC7E040000",
"57000000E803000000006EAC7E040000",
"38000000E90300000080B4AC7E040000",
"57000000EA030000008001AD7E040000",
"2F000000EB030000000073AC7E040000",
"52000000EC030000000076AC7E040000",
"53000000EE030000000061AD7E040000",
"2A000000EF03000000804BAD7E040000",
"56000000F1030000008056AC7E040000",
"2A000000F2030000000055AC7E040000",
"28000000F3030000000052AC7E040000",
"49000000F6030000000082AC7E040000",
"56000000F80300000000A1AC7E040000",
"3B000000FA030000000070AC7E040000",
"27000000FC030000008071AC7E040000",
"38000000FE030000000070AC7E040000",
"33000000FF030000000076AC7E040000",
"2D0000000504000000006EAC7E040000",
"300000000F040000000000AD7E040000",
}
--[[
Sv:,7650151
:,
:,
:,
:,
:,ok
:,
:,
:,
:,
:,
:,
:,
:,
:,西
:,
:,
Sv:,7650145
:,
:,
:,
:,
:,
Sv:,7640566
:,
:,使
:,使
:,
:,
:,
Sv:,7607862
:,
:,
:,
:,
:,
:,
:,
:,
Sv:,7626943
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
:,
]]
local names = {
"骑着蜗牛去打猎",
"琪琪",
"汐饭",
"小狗",
"我认输ok",
"大刀关羽",
"完美",
"姐姐",
"妹妹",
"小猫",
"大爆",
"木木",
"小木",
"小西",
"风中的遗憾",
"华夏",
"老纳战队",
"屠夫丶",
"香烟",
"陈水灵",
"冷酷的花卷",
"發财丶哥",
"圣洁天使",
"堕落天使",
"腾龙灬独醉",
"腾龙灬龙魂",
"黑白",
"少年先疯队队长",
"今晚打老虎",
"陈君临",
"蔡徐坤的坤",
"耶横打坤坤",
"乔碧落",
"完美似一种罪",
"为爱偷人",
"玩玩",
"小狗",
"小事",
"安静",
"小易",
"云大侠",
"大暴力",
"春风不语",
"小名",
"小吴",
"张大领导",
"何处",
"红烧排骨",
"小虎",
"战歌丶",
"包子",
"小猪",
"夏天丶",
"天歌丶",
"南泽丶",
"萌炸天",
}
function jhxbbgame.readf(f)
local content = io.open(f, "r")
local tx = ""
if content then
-- tx = content:read("*all")
-- content:close()
end
return content
end
function bffffffff118821(sysobj)
-- local str = [[
-- some text,k123_abc.kfcall other text
-- ,k456_def.kfcall more text
-- ,k789_ghi.kfcall end text
-- ]]
-- str = fs
local pattern = ",k(%d+)_(.-)收到通知.kfcall" -- 定义匹配模式
local ret = {} -- 用于存储捕获到的结果
-- 处理多行文本,先按行拆分字符串
local lines = {}
local content = io.open("/wlua/1.txt", "r")
for line in content:lines() do
table.insert(lines, line)
end
release_print("-------------lines",jhxbbgame.len(lines))
local ttname = {}
for _, line in ipairs(lines) do
for key, uid in pairs(bfuid) do
local pattern2 = uid..pattern
local start_pos, end_pos, num, char_str = string.find(line, pattern2)
local bb = 0
while start_pos do
local t = ttname[num] or {}
t[char_str]=1
ttname[num] = t
table.insert(ret, {num = num, char_str = char_str}) -- 将捕获的数字和任意字符部分存入表中
bb = 1
break
--start_pos, end_pos, num, char_str = string.find(line, pattern2, end_pos + 1) -- 从上次结束位置的下一个位置继续查找
end
if bb == 1 then
break
end
--sendmail(uid, 1, "跨服活动奖励", "跨服沙巴克参与奖励", "代购币#10&绑定元宝#38888&绑定金币#5888888&书页#10#339&布料#10#339&龙玉勋章#1#339")
end
end
content:close()
for k, v in pairs(ttname) do
release_print("Sv:", k)
for kk, vv in pairs(v) do
release_print("名字:", kk)
end
end
end
function bffffffff11882(sysobj)
-- local str = [[
-- some text,k123_abc.kfcall other text
-- ,k456_def.kfcall more text
-- ,k789_ghi.kfcall end text
-- ]]
-- str = fs
local pattern = ",k(%d+)_(.-)收到通知.kfcall" -- 定义匹配模式
local ret = {} -- 用于存储捕获到的结果
-- 处理多行文本,先按行拆分字符串
local lines = {}
local content = io.open("/wlua/1.txt", "r")
for line in content:lines() do
table.insert(lines, line)
end
release_print("-------------lines",jhxbbgame.len(lines))
local ttname = {}
for _, line in ipairs(lines) do
for key, uid in pairs(bfuid) do
local pattern2 = uid..pattern
local start_pos, end_pos, num, char_str = string.find(line, pattern2)
local bb = 0
while start_pos do
local t = ttname[num] or {}
t[char_str]=1
ttname[num] = t
table.insert(ret, {num = num, char_str = char_str}) -- 将捕获的数字和任意字符部分存入表中
bb = 1
break
--start_pos, end_pos, num, char_str = string.find(line, pattern2, end_pos + 1) -- 从上次结束位置的下一个位置继续查找
end
if bb == 1 then
break
end
--sendmail(uid, 1, "跨服活动奖励", "跨服沙巴克参与奖励", "代购币#10&绑定元宝#38888&绑定金币#5888888&书页#10#339&布料#10#339&龙玉勋章#1#339")
end
end
content:close()
for k, v in pairs(ttname) do
release_print("Sv:", k)
for kk, vv in pairs(v) do
release_print("名字:", kk)
end
end
end
local cc = {7602658,
[7616428]=1,
[7650044]=1,
[7650085]=1,
[7650144]=1,
[7607862]=1,
[7626943]=1,
[7640566]=1,
[7650145]=1,
[7650151]=1,
[7650043]=1,
[7650081]=1,
[7650143]=1,
[7650149]=1,
[7659519]=1,
[7659520]=1,
[7659540]=1,
[7659558]=1,
[7669722]=1,
[7669723]=1,
[7669728]=1,
[7672348]=1,
[7678290]=1,
[7678298]=1,
[7684880]=1,
[7684889]=1,
[7687887]=1,
[7687888]=1,
[7687889]=1,
[7687890]=1}
local function bcmail(play,m,bname,i,mode)
i = i or "代购币#10&绑定元宝#38888&绑定金币#5888888&书页#10#339&布料#10#339&龙玉勋章#1#339"
iniplayvar(play, "integer", "HUMAN", m..bname)
if tonumber(getplayvar(play, m..bname)) == 0 then
release_print(getbaseinfo(play,1),"----------bcmail:", m..bname,mode)
setplayvar(play, "HUMAN", m..bname, 1, 1)
sendmail(getbaseinfo(play,2), 1, "跨服活动奖励", m, i)
end
end
function jhxbbgame.login(actor)
if (not checkkuafuserver()) then
for index, v in ipairs({1,2}) do
local k = "bf0"..v.."_"..getbaseinfo(actor, 1)
local v = jhxbbgame.GetKeyVar(actor, "A108", k)
if v and v ~= "" and v:sub(1,1) ~= "*" then
jhxbbgame.SetKeyVar(actor, "A108", k, "*"..v)
v = v:split("|")
jhxbbgame.log(actor,k,v[2])
sendmail(getbaseinfo(actor,2), 1, v[1], v[2], v[3])
end
end
local svid = tonumber(getconst(actor, "<$SERVERIDX>"))
if cc[svid] then
bcmail(actor,"泽坤的恩赐","1215补偿",nil,1)
end
end
end
function bf118(sysobj)
release_print(getplaydef(sysobj, "G19"),".11111111111bf118:"
,getbaseinfo(sysobj,2),VarInt(sysobj, "G19"),getsysvar( "G19"))
if getsysvar( "G19") ~= 611 and (not checkkuafuserver()) then
--SetVarIant(sysobj, "G19", 11119)
setsysvar("G19", 611)
release_print("-----111111111121111bf118")
-- local v = "跨服活动奖励|辉煌的凤栖寺院参与奖励!|代购币#10&绑定元宝#38888&绑定金币#5888888&书页#10#339&布料#10#339&龙玉勋章#1#339"
-- for key, n in pairs(names) do
-- local k = "bf02_"..n
-- local vv = jhxbbgame.GetKeyVar(sysobj, "A108", k)
-- if ((not vv) or vv == "") then
-- jhxbbgame.SetKeyVar(sysobj, "A108", k, v)
-- --release_print("跨服活动奖励.SetKeyVar:", k, v,"--------",vv)
-- end
-- end
local svid = tonumber(getconst(sysobj, "<$SERVERIDX>"))
if cc[svid] then
local plst = getplayerlst(1)
for key, play in pairs(plst or {}) do
bcmail(play,"泽坤的恩赐","1215补偿")
end
end
release_print("----------跨服活动奖励.dbgout:", #bfuid, jhxbbgame.len(names))
end
end
grobaldelaygoto(100, "bf118")