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")