diff --git a/dbgbf1215.lua b/dbgbf1215.lua new file mode 100644 index 0000000..8d8e253 --- /dev/null +++ b/dbgbf1215.lua @@ -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") +