|
本帖最后由 xiren@tj 于 2017-12-30 18:16 编辑
function Togudi()
exe('cuo shupi;cuo shupi;cuo shupi;cuo shupi;cuo shupi;cuo shupi;cuo shupi;cuo shupi;cuo shupi;bang song;pa down')
fastLocate()
return check_busy(Goyadi,1)
end
function Goyadi()
if string.find(locl.room,'谷底') then
return walk_wait()
elseif string.find(locl.room,'崖壁') then
exe("pa down")
fastLocate()
return check_busy(Goyadi,1)
end
end
function Toqiaobi()
exe('pa yabi')
fastLocate()
return check_busy(Goqiaobi,1)
end
function Goqiaobi()
if string.find(locl.room,'峭壁') then
return walk_wait()
elseif string.find(locl.room,'崖壁') then
exe("pa up")
fastLocate()
return check_busy(Goqiaobi,1)
end
end
function jqg_checkencb(job)
if job then
tmp.jqgjob = job
return checkBags(jqg_checkencb2)
end
end
function jqg_checkencb2()
if tmp.jqgjob then
check_busy(tmp.jqgjob,0.5)
end
end
function Totanan()
DeleteTriggerGroup("qqs")
create_trigger_t('qqs1','^>*\\s*你要往哪里潜?$','','qQydok')
create_trigger_t('qqs2','^>*\\s*由于重力不够,你无法继续下潜!$','','qQyderorr')
SetTriggerOption("qqs1","group","qqs")
SetTriggerOption("qqs2","group","qqs")
EnableTriggerGroup("qqs",true)
exe('#10(jian shi)')
return jqg_checkencb(totanan_checkencumbrance)
end
function totanan_checkencumbrance()
if Bag["ENCB"].value and Bag["ENCB"].value > 100 then
exe('#5(drop stone)')
jqg_checkencb(totanan_checkencumbrance)
elseif Bag["ENCB"].value > 50 then
exe('tiao tan')
return create_timer_s('gotanan',1,'qQianshui')
else
exe('#5(jian shi)')
return jqg_checkencb(totanan_checkencumbrance)
end
end
function qQianshui()
exe('qian down')
end
function qQyderorr()
dis_all()
check_halt(qQyderorrgetstone)
end
function qQyderorrgetstone()
exe('pa up;jian shi;tiao tan')
create_timer_s('gotanan',1,'qQianshui')
end
function qQydok()
DeleteTriggerGroup("qqs")
DeleteTimer('gotanan')
checkBags(qQyd_dropstone)
--return check_busy(qQyd_dropstone)
end
function qQyd_dropstone()
if not Bag["ENCB"] or not Bag["ENCB"].value then
exe('#25(drop stone)')
else
if Bag['大石块'] and Bag['大石块'].cnt then
exe('#' .. Bag['大石块'].cnt .. '(drop da shikuai)')
end
if Bag['鹅卵石'] and Bag['鹅卵石'].cnt then
exe('#' .. Bag['鹅卵石'].cnt .. '(drop e luanshi)')
end
if Bag['小石头'] and Bag['小石头'].cnt then
exe('#' .. Bag['小石头'].cnt .. '(drop xiao shitou)')
end
end
return jqg_checkencb(totanan_check_qqup_encumbrance)
end
function totanan_check_qqup_encumbrance()
if Bag["ENCB"].value and Bag["ENCB"].value < 40 then
exe('qian zuoshang')
return check_busy(qQup,1)
else
exe('#5(drop stone)')
return jqg_checkencb(totanan_check_qqup_encumbrance)
end
end
function qQup()
exe("qian up")
return check_busy(qQsover,1)
end
function qQsover()
exe("pa up")
exe("#5(drop stone)")
return walk_wait()
end
function Hgudi()
exe("#10(jian shi)")
return jqg_checkencb(Hgudi_checkencumbrance)
end
function Hgudi_checkencumbrance()
if Bag["ENCB"].value and Bag["ENCB"].value > 100 then
exe('#5(drop stone)')
return jqg_checkencb(Hgudi_checkencumbrance)
elseif Bag["ENCB"].value > 50 then
exe('tiao tan')
fastLocate()
return jqg_checkencb(Hyadi)
else
exe('#5(jian shi)')
return jqg_checkencbs(Hgudi_checkencumbrance)
end
end
function Hyadi()
if string.find(locl.room,'谷底水潭') then
if not Bag["ENCB"] or not Bag["ENCB"].value then
exe('#10(drop stone)')
end
if Bag['大石块'] and Bag['大石块'].cnt then
exe('#' .. Bag['大石块'].cnt .. '(drop da shikuai)')
end
if Bag['鹅卵石'] and Bag['鹅卵石'].cnt then
exe('#' .. Bag['鹅卵石'].cnt .. '(drop e luanshi)')
end
if Bag['小石头'] and Bag['小石头'].cnt then
exe('#' .. Bag['小石头'].cnt .. '(drop xiao shitou)')
end
checkBags()
exe('qian up')
DeleteTriggerGroup("qqs")
create_trigger_t('qqs1','^>*\\s*你要往哪里潜?$','','hhqok')
SetTriggerOption("qqs1","group","qqs")
EnableTriggerGroup("qqs",true)
create_timer_s('hyadi',1,'hQianshui')
elseif string.find(locl.room,'水底通道') or string.find(locl.room,'水潭表面') then
exe('qian down')
DeleteTriggerGroup("qqs")
create_trigger_t('qqs1','^>*\\s*你要往哪里潜?$','','hhqok')
create_trigger_t('qqs2','^>*\\s*由于重力不够,你无法继续下潜!$','','hQyderror')
SetTriggerOption("qqs1","group","qqs")
SetTriggerOption("qqs2","group","qqs")
EnableTriggerGroup("qqs",true)
fastLocate()
return jqg_checkencb(Hyadi)
end
end
function hQyderror()
dis_all()
check_halt(hQyderrorgetstone)
end
function hQyderrorgetstone()
exe('pa up;jian shi;tiao tan')
create_timer_s('hyadi',1,'Hyadi')
end
function hQianshui()
exe('qian up')
end
function hhqok()
DeleteTriggerGroup("hqs")
DeleteTimer('hyadi')
return check_halt(hhqok2)
end
function hhqok2()
exe('pa up')
return walk_wait()
end |
评分
-
1
查看全部评分
-
|