本篇收录 3 节1,403 字与表格内容
查看本篇的全部关联 使用前，先确认这些设置
- 填写me、可收款的cid、eq钱装列表，核对柜台和两个坐标。
- heft=45只用于拿不动的清理分支；普通卖物循环不是以45为终止条件。
来源脚本供研究参考，未在当前游戏环境运行验证。
01用途与执行流程
在等待点监听回家祈求消息，捡卖一个钱坑的尸体，并可向名单中的收租人交出身上金币。
- 在6,46等待，收到回家消息后到6,42点柜台。
- 先按cc列表loop8拾取，再对剩余尸体greedy规划路线，持续sell 1直到不可卖。
- 拿不动时清理负重，按eq向me交物再出售；收到收租口令，仅当发话者在cid中才give %g。
02这份代码的适用限制
03完整代码
107 行原文
%var cc
(5,10)
(5,8)
(5,9)
(6,10)
(5,11)
(5,12)
(4,11)
(4,10)
(4,9)
#周圍8格座標,不用改
%var me
#自己的id
%var cid
#收租人id 如果需要收租自動給錢的話這裡填收錢者的id
#收租口令在最下面%public_bc裡 自己改
%var heft
45
#初始負重
%var eq
lance
cloak
vest
shield
#錢坑裝備名稱
%var pos0
6,46
#等待座標
%var pos
6,42
#錢坑中心座標
%scene begin
run %vpos0 5
30:wait:wait
%bc wait
call:money:%*祈求神把%*帶回愛的小屋%*
########撿賣屍體,以下不用更改########
%scene money
loadmapvar corpse c
loop5
1:click_bc:@&click 櫃檯(counter)
endloop
run %vpos
loop8
#-撿周圍8格-#
remove c %vcc
1:get_bc:get ALL_ITEM_IN %vcc
::%icc
call sell
endloop
#-貪心-#
greedy c d
foreach d
run %vd
loadround c e
foreach e
remove c %ve
1:get_bc:get ALL_ITEM_IN %ve
call sell
loop
loop
clearmapvar corpse
return
########賣裝備########
%scene sell
do(true)
0.4:sell_bc:sell 1
enddo
return
########清理負重########
%scene clean
if (%heft > heft)
loop5
1:click_bc:@&click 櫃檯(counter)
endloop
do(true)
0.4::give %ieq to %vme
0.4:sell_bc:sell 1
enddo
endif
return
%scene purify
if (%m < mp)
0.4::purify %ve
endif
return
%bc click_bc
break:0.5:這是一張生意場所經常使用來記帳的櫃檯。
%bc get_bc
retry:0.5:你上一個動作沒有%*
next:0.5:這裡沒有任何東%*
next:0.5:你撿起%*
retry:0.5:你現在不能拿這具屍體的東西。
call:clean:你拿不動%*
%bc sell_bc
break:0.5:你不能把這個東西賣%*
break:0.5:what ?
break:0.5:你無法與你視線範圍外的商店進行交易 ...
%public_bc
call:donate:%b%+(%$)告訴你 : %*收租了%*
%scene donate
priority
wait1
if (%1 in cid)
0.4::give %g to %1
endif
return↗来源与版本
飞梦／17KOK、渔夫与2001年典藏版出现数值或机制冲突时，以飞梦所记相应服务器的后续有效规则为正文依据；同站更新按明确生效日期处理。旧规则保留年代与服别，未明日期的差异就近说明；原资料对照用于追溯。