查看单个帖子
旧 2011-09-12   #13
wormsking
中级会员
级别:2 | 在线时长:29小时 | 升级还需:1小时级别:2 | 在线时长:29小时 | 升级还需:1小时
 
wormsking 的头像
 
注册: 08年07月03日
帖子: 139
声望力: 19
声望: 14 wormsking 闻道则喜
现金:104两梁山币
资产:304两梁山币
致谢数: 0
获感谢文章数:0
获会员感谢数:0
回复: MUSH417 xlqy各门派综合机器人

function OnDownShaqi()
blocked = 0
cmdSender:Add("hp;i;@120;s;w;w;w;set no_teach dowhat")
end

function OnSetGohb()
EnableTriggerGroup("ask_hb", true)
g_AfterFly="remove all;"..g_unwield_all..";jiali none;enchant 0;e;s;s;ask xiao sheng about cancel;ask xiao sheng about baobiao;ask xiao sheng about hubiao"
g_FlyTo="changan"
EnableTriggerGroup("fly", true)
cmdSender:Add("fly changan")
end

function OnSetGomp()
EnableTriggerGroup("ask_mp",true)
g_AfterFly = go_master
g_FlyTo = mp_fly
EnableTriggerGroup("fly", true)
cmdSender:Add("fly "..g_FlyTo)
end

function OnSetAskmp()
EnableTriggerGroup("ask_mp",true)
cmdSender:Add("remove all;"..g_unwield_all..";jiali none;enchant 0;amp")
end

function OnRenwu()
if weapon_ok and armor > 12 then --检查武器和装备是否都在

--根据优先级依次判断该做什么

--找不到怪,重新找
if g_findagain == true and g_findtime < 2 and place_map[guai_place] ~= nil then
go_place()
return
end
--nt任务
if g_renwu_nt == true and can_nt == true then
cmdSender:Add("set no_teach gont")
return
end

--李靖
if g_renwu_li == true and can_li==true then
cmdSender:Add("set no_teach goli")
return
end
--护镖
if g_renwu_hb == true and can_hb==true then
cmdSender:Add("set no_teach gohb")
return
end

--if g_renwu_pj == true and can_pj==true then
-- cmdSender:Add("set no_teach gopj")
--else

--叛将
if pan_jiang_place ~= "" then
guai_place = pan_jiang_place
guai_name = pan_jiang
guai_id = pan_jiang_id

blocked = 0

g_pj_all_ok = false

g_findtime = 0
g_findagain = false

EnableTriggerGroup("ask_pj", false)

renwu = "叛将"
cmdSender:Add("wimpy 30;set last_action quit")
place_id()
go_place()
return
end

--门派
if g_renwu_mp == true and can_mp==true then
cmdSender:Add("set no_teach gomp")
return
end

--逃犯
if g_renwu_tf == true and can_tf==true then
cmdSender:Add("set no_teach gotf")
return
end

--袁天罡任务
if g_renwu_yuan == true and can_yuan==true then
cmdSender:Add("set no_teach goy")
return
end

--开封任务
if g_renwu_kf == true and can_kf==true then
cmdSender:Add("set no_teach gokf")
return
end

--没事情做了
Note("nothing to do,waiting 5 secs")
--if nowat~="changan" then
-- nowat="changan"
-- cmdSender:Add("@10;fly changan")
--end
--cmdSender:Add("@50;set no_teach dowhat")
cmdSender:Add("@10;set no_teach godz")
else
Note("武器或装备不全啦!准备退出(30秒后)...")
cmdSender:Add("s;e;put ren shen;put ling zhi;put jinchuang yao;put hunyuan dan;put renshen guo;put rose;put zhou;put map;put map;@100;quit;");
end
end

function OnDudijingDie()
if guai_place == "毒敌山" then
cmdSender:Add("@20;hp;kill yao jing")
end
end

function OnBlockedByXinmo(name, output, wildcards)
EnableTriggerGroup("xinmo", false)
xinmo_name = wildcards[1]
EnableTriggerGroup("killxinmo", true)
EnableTriggerGroup("pfm", true)
cmdSender:Clear()
cmdSender:Add("id here")
g_xinmo_id = "a_npc"
create_timer_online("xm_pfm", 2, "", "xinmo_pfm")
--if eOK ~= IsTimer("killxinmo") then
-- create_timer("killxinmo", 1, "id here", "")
--end
--cmdSender:Add("id here")
end

function OnXinmoId(name, output, wildcards)
EnableTriggerGroup("killxinmo", false)
g_xinmo_name = wildcards[1]
g_xinmo_id = wildcards[2].."_npc"
cmdSender:Add("gen "..g_xinmo_id)
create_timer_online("xm_pfm", 1, "", "xinmo_pfm")
create_trigger("xinmo_die", "\("..g_xinmo_name.."死了。\|"..g_xinmo_name.."往\.\*落荒而逃了。\|"..g_xinmo_name.."往\.\*离开。\|这里没有 "..g_xinmo_id.."。\)", "", "OnXinMoDieorEsc")
end

function OnXinMoDieorEsc()
EnableTimer("xm_pfm", false)
DeleteTimer("xm_pfm")
EnableTriggerGroup("xinmo", true)
EnableTriggerGroup("pfm", false)
cmdSender:Clear()
cmdSender:Add("surrender")
OnSetGomp()
end

function xinmo_pfm()
target_id = g_xinmo_id
g_dzing = false
g_pfmwhat = g_pfm
if cmdSender:Len() == 0 then
cmdSender:Add("exert")
end
end

function OnBlockedByUnknow()
if g_find == 0 then
cmdSender:Add("#t- find;kick;set no_teach blm")
end
end

function OnBlockByGuai()

end

function OnGuaiEscape(name, output, wildcards)
guai_esc = wildcards[1]
esc_way = wildcards[2]
if guai_esc == guai_name then
guai_escflag=true
end
end

function OnDzOff()
blocked = 0
g_dzing = true
cmdSender:Add("@10;ef;ec;hp;set no_teach dz")
end

function OnHbRobberDie()
if renwu == "护镖" then
blocked = 0
cmdSender:Add("follow robber")
end
end

function OnKKnpcDie()
if g_find == 0 then
cmdSender:Add("#t- didian;#t+ find")
pre_kk = true
cmdSender:Add("hp")

if renwu == "护镖" then
cmdSender:Add("set no_teach 护镖中")
else
cmdSender:Add("set no_teach 搜索中")
end
end
end

function OnYinwuShanyaoBusyed()
if g_find == 0 then
cmdSender:Clear()

EnableTriggerGroup("yinwu", false)
EnableTriggerGroup("find", true)
EnableTriggerGroup("yinwu_go", true)
Send(yinwu_go)
Send("surrender")

if mp == "盘丝洞" then
cmdSender:Add("@20;unwield whip")
end

if renwu == "护镖" then
cmdSender:Add("surrender;set no_teach 护镖中")
else
cmdSender:Add("surrender;set no_teach 搜索中")
end
end
end

function OnBusyKK()
cmdSender:Add("@10;kill "..kk_id)
end

function OnChanganw()
EnableTriggerGroup("changanw", false)
if g_find ~= 1 then
cmdSender:Add("jiali max;#5 break")
EnableTriggerGroup("find", true)
cmdSender:Add("set no_teach 搜索中")
end
end

function OnJjfCastSuccess(name, output, wildcards)
if wildcards[1] == nowname or wildcards[1] == myname then
g_cast_fail = "success"
end
--cmdSender:Add("nw;nw;ne;n;n")
--OnCastEscSuccess()
end

function OnWzgCastSuccess(name, output, wildcards)

g_cast_fail = "success"
if wildcards[1] == "黑气" then
mp_after_cast = "#3 north;#3 e;#3 s;se;out;open guancai;ec;ef"
return
end
if wildcards[1] == "金光" then
mp_after_cast = "w;ec;ef"
return
end

mp_after_cast = "ec;ef"

end

function OnMightCastSuccess()
g_cast_fail = "success"
--OnCastEscSuccess()
end

function OnHbReward()
EnableTriggerGroup("hbjl", false)
g_hb_success = g_hb_success + 1
UpdateStatus()

if g_hb_huifu_wrong then
SetLogOutput(false)
if (false == IsLogOpen()) then
OpenLog("hbhuifu.log", true)
end
local i
WriteLog(g_hbreward_huifu)
if g_hbreward_lines ~= nil then
for i = 1, 15 do
if g_hbreward_lines[i] ~= nil then
WriteLog(g_hbreward_lines[i])
end
end
end
FlushLog()
CloseLog()
end

cmdSender:Add("@80;n;n;w;set no_teach godz")
end

function OnHbHuifuWrong()
g_hb_huifu_wrong = true
end

function OnRobberOut()
if renwu == "护镖" then
blocked = 0

cmdSender:Add("wear all")

EnableTriggerGroup("pfm", true)
EnableTimer("hbpfm", true)
ResetTimer("hbpfm")
end
end

function OnNeedCancelLijing()
cmdSender:Add("ask li jing about cancel")
EnableTriggerGroup("ask_li",false)
if g_renwu_pj == true and pan_jiang_place == "" then
cmdSender:Add("#t+ ask_pj;ask danchen zi about cancel;ask danchen zi about job")
else
nowat = "lijing"
OnRenwu()
end
end

function OnNoneedCancelLijing()
EnableTriggerGroup("ask_li",false)
if g_renwu_pj == true and pan_jiang_place == "" then
cmdSender:Add("#t+ ask_pj;ask danchen zi about cancel;ask danchen zi about job")
else
nowat = "lijing"
OnRenwu()
end
end

function OnLiAnswer(name, output, wildcards)
blocked = 0

g_findtime = 0
g_findagain =false

EnableTriggerGroup("ask_li", false)
guai_name = wildcards[1]
guai_id = string.lower(wildcards[2].." "..wildcards[3])
guai_place = wildcards[4]
renwu = "李靖"
cmdSender:Clear()
cmdSender:Add("wimpy 30;set last_action quit;kquest")
place_id()
go_place()
end


function OnXueAnswer(name, output, wildcards)
blocked = 0

g_findtime = 0
g_findagain =false

EnableTriggerGroup("ask_xue", false)
guai_name = myname.."的"..wildcards[1]
guai_id = string.lower(wildcards[2])
guai_place = wildcards[3]
renwu = "逃犯"
cmdSender:Add("wimpy 30;set last_action quit n;kquest")
place_id()
go_place()
end

function OnXueNoAnswer()
blocked = 0
can_tf = false
cmdSender:Add("#t- ask_xue;@10;#5 s;set no_teach dowhat")
end

function OnDanchenziAnswer(name, output, wildcards)
blocked = 0

g_pj_all_ok = false

g_findtime = 0
g_findagain = false

EnableTriggerGroup("ask_pj", false)

guai_name = wildcards[1]
guai_id = string.lower(wildcards[2].." "..wildcards[3])
guai_place = wildcards[4]

pan_jiang = wildcards[1]
pan_jiang_id = string.lower(wildcards[2].." "..wildcards[3])
pan_jiang_place = wildcards[4]

renwu = "叛将"
cmdSender:Add("wimpy 30;set last_action quit")
place_id()
go_place()
end

function OnDanchenziNotAnswer(name, output, wildcards)
blocked = 0
can_pj = false
EnableTriggerGroup("ask_pj", false)

g_AfterFly = "set no_teach dowhat"
g_FlyTo = "changan"
EnableTriggerGroup("fly", true)

cmdSender:Add("fly changan")
end

function OnGanyingMap(name, output, wildcards)
blocked = 0

g_findtime = 0
g_findagain = false

EnableTriggerGroup("ask_pj", false)

guai_name = wildcards[1]
guai_id = string.lower(wildcards[2].." "..wildcards[3])
guai_place = wildcards[4]
renwu = "叛将完成"

pan_jiang = wildcards[1]
pan_jiang_id = string.lower(wildcards[2].." "..wildcards[3])
pan_jiang_place = wildcards[4]

--叛将
guai_place = pan_jiang_place
guai_name = pan_jiang
guai_id = pan_jiang_id

blocked = 0

g_pj_all_ok = false

g_findtime = 0
g_findagain = true

EnableTriggerGroup("ask_pj", false)

renwu = "叛将"
--cmdSender:Add("@50")
place_id()
--go_place()
g_FlyTo = "changan"
g_AfterFly = "set no_teach dowhat"
EnableTriggerGroup("fly", true)
cmdSender:Add("i;hp;score;@30;surrender;ec;ef;fly changan")
end

function OnLiCanceled()
blocked = 0

g_li_failure = g_li_failure + 1
UpdateStatus()
end

function OnGetSeal()
--g_sealcounts = g_sealcounts-1
cmdSender:Add("ec;ef;scribe escape on paper seal")
end

function OnSick()
needcure = true
cmdSender:Add("hp")
end

function OnGiveXiaoReceipt()
givereceipt = false

--SetLogOutput(false)
--FlushLog()
--CloseLog()

EnableTriggerGroup("itemget",false)
cmdSender:Add("huifu I am your father ")
cmdSender:Add("huifu Call my father")
cmdSender:Add("huifu Good son")
end

function OnQuit()
EnableTimer("hbpfm",false)
EnableTimer("nt_pfm",false)
EnableTimer("pfm",false)
EnableTriggerGroup("find", false)
EnableTriggerGroup("follow", false)
EnableTriggerGroup("dz", false)
EnableTriggerGroup("hbkill", false)
Connect()
end

function OnHbNoRseceipt()
givereceipt = false
SetLogOutput(false)
FlushLog()
CloseLog()
EnableTriggerGroup("hbjl",false)
cmdSender:Add("n;n;w;set no_teach dowhat")
end

function OnHbFinded()
for i = 1, 10 do
DeleteTrigger("hbmatch"..i)
end
cmdSender:Add("remove all")
g_hbmatch_times = 0
g_hb_matchs = 0

fighting = true
paperdrop = true
g_sellcounts = 0
g_givecounts = 0
g_getcounts = 0
g_selllist = {}
g_givelist = {}
g_getlist = {}
EnableTriggerGroup("find", false)
EnableTriggerGroup("hbkill", true)
end

function OnHbSayHere()
if renwu == "护镖" then
cmdSender:Add("@20;say here")
end
end

function OnAskLi()
cmdSender:Add("@30;set no_teach li_nore")
blocked = 0
end

function OnSetAskhb()
blocked = 0
can_hb = false
cmdSender:Add("@30;set no_teach xnre")
end

function OnScribeSeal()
cmdSender:Add("@30;hp;@5;ec;ef;burn seal;set no_teach cast")
end

function OnIdle()
idle = 0
end

function OnHbLogStart()
--if (false == IsLogOpen()) then
-- OpenLog("hbout.log", true)
--end
end

function OnGetReceipt()
givereceipt = true
fighting = false
g_needdz = true
g_needput = true

g_hb_huifu_wrong = false

EnableTriggerGroup("hbkill", false)
g_AfterFly = "e;s;s;#t+ hbjl;heihei xiao sheng;give receipt to xiao sheng"
g_FlyTo = "changan"
EnableTriggerGroup("fly", true)
Note("回去吧...")
cmdSender:Add("surrender;drop paper")
if g_bianid ~= "" or g_needbian == true then
cmdSender:Add("bian;@50")
else

end
renwu = "护镖完成"
cmdSender:Add("surrender;fly changan")
end

function OnConnected()
Note("connected...")
init()
cmdSender:Add("#t+ login")
cmdSender:Add("l")
end

function OnLiNotAnswered()
can_li = false
blocked = 0
cmdSender:Add("#t+ ask_li;kquest")
end

function OnSetAskli()
EnableTriggerGroup("ask_li",true)
cmdSender:Add("remove all;"..g_unwield_all..";jiali none;enchant 0;ask li jing about kill")
end

function OnSetBuybag()
cmdSender:Add("buy magic box from er;w;n;i;@10;set no_teach dowhat")
end

function OnSetBuyseal()
--g_sealcounts=g_sealcounts+80
cmdSender:Add("#80 buy seal from "..g_sealboss..";put seal in magic box;e;e;n;n;n;n;l magic box;wear;@10;set no_teach dowhat")
end

function OnSetBuyyao()
if g_bianid ~= "" or nowname ~= myname then
cmdSender:Add("bian;@50")
end
cmdSender:Add("#t+ yao;s;e;give shen to yaodian;give zhi to yaodian;give hunyuan dan to yaodian;give yao to yaodian;give huanhun dan to yaodian;whisper yaodian 85334527 20 shen 0 hyd "..g_dan.." dan 20 zhi "..g_yao.." yao id "..myid)
end

function OnSetDz()
blocked = 0
if g_bianid ~= "" or nowname ~= myname then
cmdSender:Add("bian;@50")
end

if g_qx_per < 90 or g_xinshen_per < 80 then
cmdSender:Add("@10;hp;set no_teach dz")
else
if fali >= (maxfali*1.5) then
if neili >= maxneili*1.5 then
EnableTriggerGroup("dz", false)
cmdSender:Add("set no_teach dzok")
else
local ddd = tonumber(maxneili*1.5 - neili)/6
if ddd < 40 then
ddd = 40
end
cmdSender:Add("dazuo "..ddd)
end
else
local mmm = tonumber(maxfali*1.5 - fali)/6
if mmm < 40 then
mmm = 40
end
cmdSender:Add("mingsi "..mmm);
end
end
end

function OnSetDzok()
g_dzing = false
g_needdz = false

if g_jldl == false then
if yy_fire == true and yy_level >=30 and (yy_water or yy_wood or yy_earth or yy_metal) then
cmdSender:Add("zsexert4")
else
if mp == "方寸山三星洞" then
cmdSender:Add("exert jldl")
end
end
end

if g_zxzx == false then
if mp == "陷空山无底洞" then
cmdSender:Add("unwield blade;unwield dagger;wield sword;perform zxzx;unwield sword")
end
end

g_AfterFly = "@10;set no_teach dowhat"
g_FlyTo = "changan"
EnableTriggerGroup("fly", true)
cmdSender:Add("fly changan")
end

function OnCheckNtOk()
EnableTriggerGroup("nt_ask", false)
nowat = "stone"
cmdSender:Add("i;@10;set no_teach renwu")
end

function OnSetGodz()
GoDz()
end


function OnSetGoli()
g_AfterFly = "#4 e;#5 n;open door;w;w;s;s;e;open door;e;n;u;set no_teach askli"
g_FlyTo = "sky"
EnableTriggerGroup("fly", true)
cmdSender:Add("fly "..g_FlyTo)
end

function OnSetGoXue()
g_AfterFly = "#4 n;#t+ ask_xue;ask xue about 逃犯"
g_FlyTo = "changan"
EnableTriggerGroup("fly", true)
cmdSender:Add("fly "..g_FlyTo)
end

function OnSetGont()
if g_mp_zheng == true then
g_AfterFly = "#t+ nt_ask;e;n;n;n;nu;enter;remove all;"..g_unwield_all..";jiali none;enchant 0;@20;newtask;answer 上下两难"

g_FlyTo = "kaifeng"
EnableTriggerGroup("fly", true)
cmdSender:Add("fly kaifeng")
else
g_AfterFly = "#t+ nt_ask;sd;sd;s;s;swim;e;e;e;n;enter;remove all;"..g_unwield_all..";jiali none;enchant 0;@20;newtask;answer 上下两难"

g_FlyTo = "putuo"
EnableTriggerGroup("fly", true)
cmdSender:Add("fly putuo")
end
end

function OnSetKaishi()
cmdSender:Add("#t+ score;score")
cmdSender:Add("#t+ special;special;@10;#t- special")
cmdSender:Add("nt;pj;i;hp")

cmdSender:Add("@20;d;drop linen;drop skirt;drop shoes;wear all;u;set no_teach dowhat")
end

function OnHbNotAnswered()
blocked = 0

EnableTriggerGroup("ask_hb", false)
cmdSender:Add("@10;n;n;w;set no_teach dowhat")
end

--function onfindstart()
-- guai_yinshen = 0
-- guai_escflag = false
-- blocked = 0
-- g_find = 0
-- go_sp = 0
-- go_npc_sp = 0
-- mp_powerup()
-- if g_find == 1 then
-- EnableTriggerGroup("follow", true)
-- cmdSender:Add("follow "..guai_id)
-- else
-- if renwu == "护镖" then
-- cmdSender:Add("unset brief")
-- cmdSender:Add("unset brief_all")
-- xpath:Hb()
-- cmdSender:Add("set no_teach 护镖中")
-- else
-- cmdSender:Add("set no_teach 搜索中")
-- end
-- end
--end

function OnHbNotHere()
g_find = 0
cmdSender:Add("set no_teach 护镖中")
end

function OnHbAnswer()
blocked = 0

EnableTriggerGroup("ask_hb", false)
renwu = "护镖"
cmdSender:Clear()
cmdSender:Add("wimpy 30;@50;n;n;l paper")
end

function OnGetYaoOk(name, output, wildcards)
if wildcards[1] == g_yaodian_name then
g_needyao = false
cmdSender:Add("#t- yao;@10;w;n;set no_teach dowhat")
end
end

function OnYaoFail(name, output, wildcards)
if wildcards[1] == g_yaodian_name then
g_needyao = true
cmdSender:Add("#t- yao;w;bian;@50;n;set no_teach dowhat")
end
end

function OnStartCheckSet()
armor = 0
weapon_axe = false
weapon_spear = false
weapon_sword = false
weapon_fork = false
weapon_stick = false
weapon_dagger = false
weapon_blade = false
weapon_xiao = false
weapon_rake = false
weapon_hammer = false
weapon_ling = false
weapon_muqin = false
weapon_whip = false

g_checkset = 0

g_gold = 0
g_silver = 0
g_coin = 0
g_map_penglai = 0
g_map_xueshan = 0
g_tenthousand_cash = 0
g_thousand_cash = 0

g_rose = 0

g_bishuizhou = 0

g_zhi_counts = 0
g_shen_counts = 0
g_dan_counts = 0
g_yao_counts = 0

g_item_list = {}
g_item_counts = 0
g_item_current = 0

g_needbag = true
end

--^(◇| )\(\S+) \((\S+)\)\s+
--^(◇| )\(\S+) \(\S+ (\S+)\)\s+

function OnItemSellOrGive(name, output, wildcards)
if g_checkset == 1 then

local itemget = wildcards[2]
local id = wildcards[3]
if id == "flower" then
return
end

if string.find(itemget, "鳄鱼") or
string.find(itemget, "黑木") or
string.find(itemget, "青铜") or
string.find(itemget, "牛皮") or
string.find(itemget, "蟒皮") or
string.find(itemget, "玛瑙") or
string.find(itemget, "珍珠") or
string.find(itemget, "精钢") or
string.find(itemget, "纯银") or
string.find(itemget, "玄铁") or
string.find(itemget, "猎豹") or
string.find(itemget, "雄狮") or
string.find(itemget, "翡翠") or
string.find(itemget, "乌金") or
string.find(itemget, "琥珀") then

g_item_counts = g_item_counts + 1
g_item_list[g_item_counts] = {id, "sell"}
else
g_item_counts = g_item_counts + 1
g_item_list[g_item_counts] = {id, "give"}
end
end
end

function ProcessNextItem()
if g_item_current <= g_item_counts and g_item_list[g_item_current] ~= nil then
if g_item_list[g_item_current][2] == "sell" then
cmdSender:Add("sell "..g_item_list[g_item_current][1])
else
cmdSender:Add("give "..g_give_dami_id.." "..g_item_list[g_item_current][1])
end
else
cmdSender:Add("#t- proc_item;i;u;@10;set no_teach dowhat")
end
end

function OnSellorGiveItem()
g_item_current = g_item_current + 1
ProcessNextItem()
end

function OnGiveItemFail()
--g_item_list[g_item_current] = string.gsub(g_item_list[g_item_current], "give", "sell")
--g_item_list[g_item_current] = string.gsub(g_item_list[g_item_current], " to qlb", "")
cmdSender:Add("sell "..g_item_list[g_item_current][1])
end

function OnGiveInfo(name, output, wildcards)
if (wildcards[1] == g_give_dami_name) then
g_item_current = g_item_current + 1
ProcessNextItem()
end
end

function OnSellInfo()
g_item_current = g_item_current + 1
ProcessNextItem()
end

function OnSellItemFail()
--g_item_list[g_item_current] = string.gsub(g_item_list[g_item_current], "sell", "drop")
-- cmdSender:Add(g_item_list[g_item_current])
cmdSender:Add("drop "..g_item_list[g_item_current][1])
g_item_current = g_item_current + 1
ProcessNextItem()
end

function OnSellItemBinded()
g_item_current = g_item_current + 1
ProcessNextItem()
end

function OnCheckEnd()
g_checkset = g_checkset + 1
if (g_checkset == 2) then
g_checkset = 0

if (g_bishuizhou == 1) then
g_needbsz = false
else
g_needbsz = true
end

if g_map_xueshan == 1 and g_map_penglai == 1 then
g_needmap = false
else
g_needmap = true
end
if g_renwu_nt == true then
if g_zhi_counts < 20 or g_shen_counts < 20 or g_dan_counts < 80 or g_yao_counts < 200 then
g_needyao = true
--g_needyao
else
g_needyao = false
end
else
if g_zhi_counts < 20 or g_shen_counts < 20 or g_dan_counts < 30 or g_yao_counts < 30 then
g_needyao = true
--g_needyao
else
g_needyao = false
end
end

--Note(g_yao_counts)
--Note(g_dan_counts)
--Note(g_shen_counts)
--Note(g_zhi_counts)

-- g_needbag = true
-- g_needyao = true
end

local i
for i = 1, g_item_counts do
Note(g_item_list[i][2].." "..g_item_list[i][1])
end

if mp == "幻世勇者" then
if weapon_axe and weapon_sword and weapon_dagger then
weapon_ok = true
Note("weapon ok")
else
weapon_ok = false
Note("weapon not ok")
end
return
end
if mp == "幻世魔导" then
if weapon_staff and weapon_sword and weapon_dagger then
weapon_ok = true
Note("weapon ok")
else
weapon_ok = false
Note("weapon not ok")
end
return
end
if mp == "东海龙宫" then
if weapon_fork and weapon_dagger then
weapon_ok = true
Note("weapon ok")
else
weapon_ok = false
Note("weapon not ok")
end
return
end
if mp == "蜀山剑派" then
if weapon_sword and weapon_dagger then
weapon_ok = true
else
weapon_ok = false
end
return
end
if mp == "将军府" then
if weapon_axe and weapon_spear and weapon_dagger then
weapon_ok = true
else
weapon_ok = false
end
return
end
if mp == "方寸山三星洞" then
if weapon_stick and weapon_sword and weapon_dagger then
weapon_ok = true
else
weapon_ok = false
end
return
end

if mp == "五庄观" then
if weapon_sword and weapon_xiao and weapon_dagger and weapon_blade then
weapon_ok = true
else
weapon_ok = false
end
return
end

if mp == "神农谷" then
if weapon_ling and weapon_hammer and weapon_dagger and weapon_rake then
weapon_ok = true
else
weapon_ok = false
end
return
end

if mp == "月宫" then
if weapon_sword and weapon_dagger and weapon_whip then
weapon_ok = true
else
weapon_ok = false
end
return
end

if mp == "南海普陀山" then
if weapon_staff and weapon_hammer and weapon_dagger then
weapon_ok = true
else
weapon_ok = false
end
return
end

if mp == "陷空山无底洞" then
if weapon_blade and weapon_sword and weapon_dagger then
weapon_ok = true
else
weapon_ok = false
end
return
end

if mp == "盘丝洞" then
if weapon_muqin and weapon_sword and weapon_dagger and weapon_whip then
weapon_ok = true
else
weapon_ok = false
end
return
end

end

function OnSeeSealBoss()
g_sealboss="boss"
end

function OnLoginAtKz()
g_after_back_taibai = "look"
cmdSender:Add("set brief;w;ec;ef;#t+ taibai;accept tai bai")
end
wormsking 当前离线  
回复时引用此帖