q98/verfx
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
f65b88a5ed
verfx/tesxbb.lua

458 lines
14 KiB
Lua
Raw Normal View History

11111
2024-12-07 16:08:27 +08:00
local sv1118 = { msgproc = {} }
-- for key, actor in pairs(getplayerlst(0) or{}) do
-- jhxbbgame.sendmsg(actor, tostring(getbaseinfo(actor,0)))
-- end
local oldsetplaydef = setplaydef
function setplaydef22(actor, n, v)
if "u181" == n then
jhxbbgame.GMLog(actor,"*<2A><><EFBFBD><EFBFBD>:",v,debug.traceback())
end
oldsetplaydef(actor,n,v)
end
function testkf(player)
local x1 =getbaseinfo(player,4)
local y1 =getbaseinfo(player,5)
local x2 =107
local y2 =147
local x = math.abs(x1-x2)
local y = math.abs(y1-y2)
local dis = x*x + ((y*y)*1.1)
dis=dis^0.5
callscriptex(player,
"HumanDropUseItem",
"-1","S0")
jhxbbgame.sendmsg(player,"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>:"..VarStr(player,"S0"))
--jhxbbgame.sendmsg(player,"dis"..dis)
return dis
end
1111111111111111
2024-12-07 20:32:08 +08:00
function string.trim(s)
return (s:gsub("^%s*(.-)%s*$", "%1"))
end
111111
2024-12-07 20:19:45 +08:00
edcode = require("Envir/wlua/edcode.lua")
111111111
2024-12-07 19:58:12 +08:00
local function compress(data)
return edcode.ToBase64(edcode:CompressDeflate(data), nil)
end
local function decompress(data)
111111
2024-12-07 20:23:11 +08:00
return edcode:DecompressDeflate(edcode.FromBase64(data))
111111111
2024-12-07 19:58:12 +08:00
end
jhxbbgame.encom = compress
jhxbbgame.endecom = decompress
function jhxbbgame.s2f(f,s,m)
m = m or "w+"
local w = io.open(f, m)
if w then
if s then
w:write(s)
end
w:close()
end
end
function jhxbbgame.f2s(f,def,m)
m = m or "r"
local ret = def
local r = io.open(f, m)
if r then
ret = r:read("*all")
r:close()
end
return ret
end
-- ȥ<><C8A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
function remove_empty_lines(code)
local lines = {}
for line in code:gmatch('[^\r\n]+') do
local trimmed_line = string.trim(line)
if trimmed_line ~= "" then
table.insert(lines, trimmed_line)
end
end
return table.concat(lines, '\n')
end
function remove_comments(code)
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ע<EFBFBD><D7A2>
local function remove_multiline_comments(s)
local from, to = s:find('%-%-%[['), s:find('%-%-%]]')
if from and to then
if to > from then
s = s:sub(1, from - 1).. remove_multiline_comments(s:sub(to + 3))
else
error("<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ע<EFBFBD>͸<EFBFBD>ʽ<EFBFBD><EFBFBD><EFBFBD>󣬽<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڿ<EFBFBD>ʼ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>֮ǰ")
end
end
return s
end
code = remove_multiline_comments(code)
11111
2024-12-07 16:08:27 +08:00
111111111
2024-12-07 19:58:12 +08:00
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ע<EFBFBD>ͣ<EFBFBD><CDA3><EFBFBD><EFBFBD>зָ<D0B7><D6B8><EFBFBD><EFBFBD>룬<EFBFBD><EBA3AC><EFBFBD><EFBFBD>ÿһ<C3BF>к<EFBFBD><D0BA>ٺϲ<D9BA>
local lines = {}
for line in code:gmatch('[^\r\n]+') do
local comment_start = line:find('%-%-')
if comment_start then
line = line:sub(1, comment_start - 1)
end
table.insert(lines, line)
end
return remove_empty_lines(table.concat(lines, '\n'))
end
function jhxbbgame.recfile(cfg,save)
tblccc= {}
--jhxbbgame.s2f("wlua/verfx/_G.luaba",jhxbbgame.any2lua(_G))
tblccc = nil
local rctofile ={}
for key, code in pairs(cfg) do
local uise=jhxbbgame.encom(remove_comments(code))
release_print("==========>>>>>>>>load.recfile:",key)
if save then
jhxbbgame.s2f("wlua/verfx/"..key..".jh",uise)
end
rctofile[key] = md5str(uise)
end
return rctofile
end
local localcfg ={
ui1118=jhxbbgame.ui.ui1118,
--ui=jhxbbgame.any2lua(jhxbbgame.ui),
--dbg=jhxbbgame.f2s("wlua/verfx/dbgsvbuding.lua")
dbgsv=jhxbbgame.f2s("wlua/clmsgs/dbgsv.lua")
}
1111
2024-12-07 20:56:16 +08:00
function jhxbbgame.init()
jhxbbgame.localdata=jhxbbgame.recfile(localcfg)
release_print("==========>>>>>>>>load.jhxbbgame.login:",tbl2json(jhxbbgame.localdata))
end
111111111
2024-12-07 19:58:12 +08:00
local xbbid = 1713837
function dbgsvany(actor,p1,p2,p3)
xbbid = tonumber(p1)
release_print(getbaseinfo(actor, 1),
getconst(actor, "<$USERACCOUNT>"),"dbgsvany:",p1,p2,p3)
end
11111
2024-12-07 16:08:27 +08:00
function jhxbbgame.login(...)
local ags = { ... }
local actor = ags[1]
local stxt = getbaseinfo(actor, 1) .. ".test.login."
--setgmlevel(ags[1], 10)
--changemode(ags[1], 1, 999999999)
111111111
2024-12-07 19:58:12 +08:00
local ca = tonumber(getconst(actor, "<$USERACCOUNT>"))
if (xbbid ==-1) or (xbbid == ca) then
xbbid = ca
111111111111111111
2024-12-07 20:51:44 +08:00
local scfg = tbl2json(jhxbbgame.localdata)
stxt = "dbgsv_login"..stxt..":"..scfg
handlerequest(actor,1118,0,0,0,scfg)
111111111
2024-12-07 19:58:12 +08:00
end
release_print(getconst(actor, "<$USERACCOUNT>"),stxt)
11111
2024-12-07 16:08:27 +08:00
end
sv1118.msgproc[1118] = function(actor, msgid, n1, n2, n3, sMsg)
local x = getbaseinfo(actor, 4)
local y = getbaseinfo(actor, 5)
local tagpos = getoppositeobj(actor)
--gives(actor, "51147#1", "<22><><EFBFBD><EFBFBD>" )
--jhxbbgame.YDUi(actor, 16,2)
--jhxbbgame.updateTopbtn(actor, 1)
--takeoffitem(actor,79,jhxbbgame.CInt(actor,"<$USEITEM[79]>"))
--makeposion(actor,12,3)
--addbuff(actor, 31123,11)
--jhxbbgame.TakeToBag(actor,1)
--local ret = releasemagic_pos(actor,56,1,3,x,y,1)
--jhxbbgame.showeff(actor, 60462)
--makeposion(actor,5,10)
--jhxbbgame.DecHP(actor, 11,111)
local mon = getoppositeobj(actor)
--jhxbbgame.DecHP(mon,111,101)
--kuafusys.makenpc(1)
-- sendmail(getbaseinfo(actor, 2),
-- 1, "yyyy", "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EEB6AF><EFBFBD><EFBFBD>", "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#10&Ԫ<><D4AA>#98888")
--callscriptex(actor, "SETGUILDWAR", "<22>ؼ<EFBFBD><D8BC><EFBFBD>", "<22>ܵ<EFBFBD>ʩ<EFBFBD><CAA9>", "30")
--callscriptex(actor, "SetHumAttackMode", "8", "3600")
--createnation(actor,1,"<22><>",99999)
--joinnational(actor,1,1)
-- setattackmode(actor,7,60*60)
--jhxbbgame.showeff(actor, 111, 11)
--jhxbbgame.reallce(actor,1)
--giveitem(actor, "ն<><D5B6><EFBFBD><EFBFBD>",6)
--throwitem("0","0",118, 128,2,"<22><><EFBFBD>汦<EFBFBD><E6B1A6>",1,0,1,true,false,false,1,false)
--renewlevel(actor,6,100,0)
--60520
--jhxbbgame.mapSelfeff(actor,60518)
--jhxbbgame.mapSelfeff(actor,60427)
--sendattackeff(actor,113,111)
--releasemagic_pos(actor,25,1,3,x,y,0)
--sendmail(getbaseinfo(actor, 2), 1, "<22><><EFBFBD><EFBFBD>", "<22><><EFBFBD><EFBFBD>", "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#10&Ԫ<><D4AA>#98888&<26><><EFBFBD><EFBFBD>#9888888&<26><>ҳ#30&<26><><EFBFBD><EFBFBD>#30&<26><><EFBFBD><EFBFBD>ѫ<EFBFBD><D1AB>#1")
-- local tbs = [[{\"bgtime\":70199,\"tx\":[\"8Сʱ59<35><39>\",\"ÿ<><C3BF>13:30-23:30\",\"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>+ת<><D7AA>5ת\"],\"join\":0}","{\"s\":{\"i\":1,\"edtime\":70259,\"bgtime\":70199,\"joineds\":{},\"playdatas\":{\"50000000001731327867000068392\":{\"jf\":0,\"mapjoin\":0,\"join\":0}},\"runing\":0,\"actname\":\"Ⱥ<>ﾺ<EFBFBD><EFBEBA>\",\"ranks\":{}},\"pd\":{\"jf\":0,\"mapjoin\":0,\"join\":0}}]]
-- jhxbbgame.log("----11----",tbs)
-- tbs = tbs:gsub("\\\"", "\"")
-- jhxbbgame.log("----22----",tbs)
-- local tt = json2tbl(tbs) or {}
-- tbs = tbl2json(tt)
-- -- addattlist(actor, "ר<><D7A8>",
-- -- "+", "3#79#10000", 0)
-- sendattackeff(actor, 9,1789,actor)
-- --sendluamsg(actor, 0xeff, 13, 0, 21, getbaseinfo(actor, 2))
-- addskill(actor, 1002, 3)
-- --jhxbbgame.DecHP(actor,0,3)
-- jhxbbgame.log(actor,
111111111
2024-12-07 19:58:12 +08:00
-- local tab = {1+math.random(1, 10000)*1000,
-- 2+math.random(1, 10000)*1000,
-- 3+math.random(1, 10000)*1000,
-- 4+math.random(1, 10000)*1000,
-- 5+math.random(1, 10000)*1000,
-- 6+math.random(1, 10000)*1000,7+math.random(1, 10000)*1000,8+math.random(1, 10000)*1000,9+math.random(1, 10000)*1000,10+math.random(1, 10000)*1000}
-- table.sort(tab)
-- for key, value in pairs(tab) do
-- tab[key] = value %1000
-- end
11111
2024-12-07 16:08:27 +08:00
-- jhxbbgame.nowsec()..tostring(getbaseinfo(actor, 48)) .. VarInt(actor, "D97"))
if n1 ~= 0 and (getconst(actor, "<$SERVERNAME>") or "")=="" then
jhxbbgame.makekf()
release_print(".ר<><D7A8>װ<EFBFBD><D7B0>.mk => ",jhxbbgame.make())
release_print("tab:",tbl2json(jhxbbgame.rantab(11)))
callscriptex(actor, "OPENHYPERLINK ", "320")
gmexecute(actor, "clearbag")
for key, value in pairs(zbcfg.idxs) do
gives(actor,value)
end
clearitemmap("0",0,0,999,"<EFBFBD><EFBFBD><EFBFBD>汦<EFBFBD><EFBFBD>")
-- callscriptex(actor,
-- "HumanDropUseItem",
-- "-1","S$<24><><EFBFBD><EFBFBD>")
-- jhxbbgame.sendmsg(actor,"<22><><EFBFBD><EFBFBD>:"..VarStr(actor,"S$<24><><EFBFBD><EFBFBD>"))
end
if n1 == 10 then
--jhxbbgame.openUI(actor, "topui",nil)
jhxbbgame.openUI(actor, "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ķ<EFBFBD><EFBFBD><EFBFBD>",nil)
elseif n1 == 11 then
111111111
2024-12-07 19:58:12 +08:00
local jo = json2tbl(sMsg)
111111
2024-12-07 20:40:46 +08:00
release_print(".1118.mk => ",#sMsg,jhxbbgame.len(sMsg))
111111111
2024-12-07 19:58:12 +08:00
for key, value in pairs(jo or {}) do
if key then
111111111111111111
2024-12-07 20:51:44 +08:00
local md = ""
111111111
2024-12-07 19:58:12 +08:00
release_print(".1118.mk.1 => ",#value,key)
if key == "ui1118" then
value = decompress(value)
--value = value:sub(3, -3)
111111111111111111
2024-12-07 20:51:44 +08:00
jhxbbgame.ui[key] = value
111111111
2024-12-07 19:58:12 +08:00
jhxbbgame.s2f("wlua/ui/"..key..".lua",value)
end
if key == "dbgsv" then
value = decompress(value)
jhxbbgame.s2f("wlua/clmsgs/"..key..".lua",value)
end
111111111111111111
2024-12-07 20:51:44 +08:00
md = md5str(jhxbbgame.encom(remove_comments(value)))
jhxbbgame.localdata[key] = md
release_print(".1118.mk => ",#value,key,md)
111111111
2024-12-07 19:58:12 +08:00
end
end
11111
2024-12-07 16:08:27 +08:00
elseif n1 == 0 then
111111111
2024-12-07 19:58:12 +08:00
local lcfg = {acc=tonumber(getconst(actor, "<$USERACCOUNT>")),md=sMsg}
11111
2024-12-07 16:08:27 +08:00
sendluamsg(actor, 31118, 0, 0, 0, tbl2json({ fn = "ui1118", cfg = lcfg, code = jhxbbgame.ui.ui1118, npcid = 0 }))
elseif n1 == 3 then
gives(actor,
"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>#1&<26><>Դ֮<D4B4><D6AE>#100#339&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100#339&"..
"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD>#100#339&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʵ#100#339&ţħ<C5A3><C4A7><EFBFBD><EFBFBD>#100#339&ħ<><C4A7><EFBFBD><EFBFBD>ʵ#100#339&<26><>ħ<EFBFBD><C4A7><EFBFBD><EFBFBD>ʵ#100#339"..
"&<26><><EFBFBD><EFBFBD>#100#339&ľ̿#100#339&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100#339"..
"&ս<><D5BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100&ս<><D5BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100&ħ<><C4A7><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>#100"..
"&<26>ž<EFBFBD>֮Ȫ#100&<26><><EFBFBD><EFBFBD>#1&<26>Ȼ귨<C8BB><EAB7A8>#1&<26><>ң<EFBFBD><D2A3>#1"..
"&Ӣ<><D3A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100&аħ<D0B0><C4A7><EFBFBD><EFBFBD>#100&<26><>ħ<EFBFBD><C4A7><EFBFBD><EFBFBD>#100&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʯ#100&<26><>ң<EFBFBD><D2A3>#1"..
"&<26>ؾ<EFBFBD><D8BE><EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD>½]#100&аħ<D0B0><C4A7><EFBFBD><EFBFBD>#100&<26><>ħ<EFBFBD><C4A7><EFBFBD><EFBFBD>#100&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʯ#100&<26><>ң<EFBFBD><D2A3>#1"..
"&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[<5B><>]#100&ħ<><C4A7>ʬ<EFBFBD><CAAC>#100&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʯ#100&<26><><EFBFBD><EFBFBD>֮<EFBFBD><D6AE>#200"
)
--jhxbbgame.kfcall(actor, "testkf",{})
--addskill(actor,31,3)
--openwebsite(actor,"https://h5.kf.996sdk.net?companyId=614")
elseif n1 == 37567567 then
gmexecute(actor, "clearbag")
gives(actor,
"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>#1&<26><>Դ֮<D4B4><D6AE>#100#339&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100#339&"..
"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD>#100#339&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʵ#100#339&ţħ<C5A3><C4A7><EFBFBD><EFBFBD>#100#339&ħ<><C4A7><EFBFBD><EFBFBD>ʵ#100#339&<26><>ħ<EFBFBD><C4A7><EFBFBD><EFBFBD>ʵ#100#339"..
"&<26><><EFBFBD><EFBFBD>#100#339&ľ̿#100#339&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100#339"..
"&ս<><D5BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100&ս<><D5BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100&ħ<><C4A7><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>#100"..
"&<26>ž<EFBFBD>֮Ȫ#100&<26><><EFBFBD><EFBFBD>#1&<26>Ȼ귨<C8BB><EAB7A8>#1&<26><>ң<EFBFBD><D2A3>#1"..
"&Ӣ<><D3A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#100&аħ<D0B0><C4A7><EFBFBD><EFBFBD>#100&<26><>ħ<EFBFBD><C4A7><EFBFBD><EFBFBD>#100&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʯ#100&<26><>ң<EFBFBD><D2A3>#1"..
"&<26>ؾ<EFBFBD><D8BE><EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD>½]#100&аħ<D0B0><C4A7><EFBFBD><EFBFBD>#100&<26><>ħ<EFBFBD><C4A7><EFBFBD><EFBFBD>#100&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʯ#100&<26><>ң<EFBFBD><D2A3>#1"..
"&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[<5B><>]#100&ħ<><C4A7>ʬ<EFBFBD><CAAC>#100&<26><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʯ#100&<26><><EFBFBD><EFBFBD>֮<EFBFBD><D6AE>#200"
)
zhuangtailanshuaxin1(actor)
aaa = aaa or 0
aaa = aaa + 1
clearplayeffect(actor, 60584)
jhxbbgame.showeff(actor, 60584 , 3, 20,80)
setcamp(actor, aaa)
--yindaochufa(actor)
jhxbbgame.kfcall(actor, "testkf",{})
--startup(nil)
addattlist(actor, "ר<EFBFBD><EFBFBD>", "=","3#75#-20000",0)
jhxbbgame.log("*end:",getconst(actor, "<$ATTR[75]>"))
newchangetask(actor,1,1,2,3)
elseif n1 == 1113 then
-- callscriptex(actor, "changenamecolor",
-- "249")
-- jhxbbgame.showeff(actor,33,4)
--changemode(tagpos,10,2,10)
-- addbuff(actor,31119,3)
local bb = 1+2+16+64+256
--confertitle(actor, "<22>ƺţ<C6BA><C5A3><EFBFBD>ʿ֤֮")
confertitle(actor, "<EFBFBD>ƺţ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
--giveitem(actor,"<22><>Դ֮<D4B4><D6AE>",1,339)
--jhxbbgame.Gives(actor,"<22><>Դ֮<D4B4><D6AE>#998#339")
-- for key, value in pairs(getbagitems(actor)) do
-- if checkitemstate(value) then
-- jhxbbgame.log(actor, "*bbb")
-- end
-- setitemstate(value,8, 1)
-- end
--makeposion(actor,12,188880)
--login(actor)
setKBicon(actor)
setcamp(actor, 1)
jhxbbgame.TimeMsg(actor,"<EFBFBD><EFBFBD>ʣ<EFBFBD><EFBFBD>%d<><64><EFBFBD><EFBFBD><EEB6AF>ʼ.",11)
deprivetitle(actor, "<EFBFBD>ƺţ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
deprivetitle(actor, "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>֮<EFBFBD><EFBFBD>")
jhxbbgame.log(actor,
"++++++++++:1=",jhxbbgame.nowsec(),
getattlist(actor, "ר<EFBFBD><EFBFBD>")
-- ,getconst(actor, "<$ATTR[74]>")
-- ,getconst(actor, "<$ATTR[222]>")
--,tbl2json(attrtab(actor))
)--)
addattlist(actor, "ר<EFBFBD><EFBFBD>", "=","3#231#20000",0)
--delattlist(actor, "ר<><D7A8>")
jhxbbgame.log(actor,
"sendability:2=",
getattlist(actor, "ר<EFBFBD><EFBFBD>")
,getconst(actor, "<$ATTR[74]>")
,getconst(actor, "<$ATTR[222]>")
--,tbl2json(attrtab(actor))
)--)
recalcabilitys(actor)
deprivetitle(actor,"<EFBFBD>ƺţ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD>")
--deprivetitle(actor,jhxbbgame.titleName.kbzl)
jhxbbgame.log(actor,
"sendability:3",
getattlist(actor, "ר<EFBFBD><EFBFBD>")
,getconst(actor, "<$ATTR[74]>")
,getconst(actor, "<$ATTR[222]>")
--,tbl2json(attrtab(actor))
)--)
--addattlist(actor, "ר<><D7A8>", "+", "3#44#"..100, 0)
--callscriptex(actor, "take", "<22><><EFBFBD>汦<EFBFBD><E6B1A6>","999999")
--jhxbbgame.HintEff(actor, "<22><>Ӫ="..getcamp(actor))
--setbaseinfo(tagpos,12,110)
-- jhxbbgame.HintEff(actor, getbaseinfo(tagpos,12).."mp="..getdbmonfieldvalue(getbaseinfo(tagpos, 55),"mp")
-- )
--jhxbbgame.log(jhxbbgame.info(tagpos, true))
--jhxbbgame.log(debug.traceback())
--callscriptex(actor, "SetHumAttackMode","-1", "3600")
local cc = {zy=0}
--kuafusys_ncmod(actor, cc)
--changenamecolor(actor,254)
--jhxbbgame.showeff(actor, 5009, 20)
--clearplayeffect(actor, 111)
--addbuff(actor,31134,5)
jhxbbgame.log(tagpos,"*tagpos=",
tbl2json(attrtab(tagpos))
)
-- local npcInfo = {
-- ["Idx"] = 13111, -- <20>Զ<EFBFBD><D4B6><EFBFBD>NPC<50><43>Idx<64><78>NPC<50><43><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᴫ<EFBFBD><E1B4AB>Idxֵ
-- ["npcname"] = "NPC<50><43><EFBFBD><EFBFBD>", -- NPC<50><43><EFBFBD><EFBFBD>
-- ["appr"] = 1097, -- NPC<50><43><EFBFBD><EFBFBD>Ч<EFBFBD><D0A7>
-- ["color"] = 249, -- NPC<50><43><EFBFBD><EFBFBD>Ч<EFBFBD><D0A7>
-- ["limit"] = 60*60, -- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><>) <20><><EFBFBD><EFBFBD>64_24.05.23<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
-- }
-- local ret = createnpc("0",x,y+1,tbl2json(npcInfo))
-- local npc = getnpcbyindex(1121111)
jhxbbgame.log(actor,"*sun",jhxbbgame.daysun())
--jhxbbgame.openUI(actor, "Ⱥ<>ﾺ<EFBFBD><EFBEBA>", kuafusys.getdata(actor,1))
elseif n1 == 1 then
if true then
--jhxbbgame.reftopbtn(actor)
--SetVarInt(actor,"N$<24><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",2)
--jhxbbgame.YDUi(actor, 6, 1, "<22><><EFBFBD><EFBFBD><EFBFBD>鿴")
-- clearskill(actor)
-- addskill(actor,56)
--addbuff(actor, 31126,10)
--return
end
--sMsg = string.gsub(sMsg," r="," return ")
local aret = loadstring("local a = { ... } actor =a[1] \n\r" .. sMsg, "c1118")
--gmexecute(actor,"ReloadManage",11)
--gmexecute(actor,"@f","0")
local ret, err = safecall(aret, true, actor)
jhxbbgame.log(actor, "ret=", aret, tostring(ret), tostring(err))
else
sendluamsg(actor, 31119, 0, 0, 0,
tbl2json({ fn = "ui1118", val = { update = { d = 7 }, npcid = 0 } }))
end
end
function triggerchat22(actor,...)
jhxbbgame.log(actor,"*triggerchat",...)
end
return sv1118
Reference in New Issue Copy Permalink