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

314 lines
10 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
release_print("load.jhxbbgame.login")
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)
handlerequest(actor,1118,0,0,0,"")
release_print(stxt)
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,
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
-- 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
release_print(".1118.mk => ",#sMsg,sMsg)
elseif n1 == 0 then
local lcfg = { day = VarInt(actor, "U000"), mon = VarInt(actor, "U053") }
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