节约吃药成本终极大法mush版练讨价还价robot

风起云涌(fqyy@tj) · 发表于 2017-5-31 11:35:26

本帖最后由 fqyy@tj 于 2018-6-17 18:50 编辑

lua路径下创建个trade.lua复制下面代码贴入
shujian.lua加入：
require "trade"
create_alias_s('testbuy','testbuy','tradePro')

进游戏输入testbuy 自动开始练讨价还价了。

------------by fqyy 20170529------------------------
local shopRoomList = {"襄阳城小吃店","襄阳城鲜鱼店","襄阳城江湖客栈","襄阳城猪肉店","襄阳城天香楼","襄阳城烧饼铺","襄阳城包子铺","襄阳城药材铺","襄阳城成衣铺","襄阳城杂货铺","长安城兵器铺","长安城聚豪酒楼","长安城裁缝铺","长安城杂货铺","长安城水果店","长安城花店","长安城茶馆","长安城珠宝行","扬州城茶馆","扬州城乐器店","扬州城药铺","扬州城小吃店","苏州城春在楼","苏州城春在楼","苏州城立春堂","苏州城打铁铺","苏州城茶馆","杭州城天香楼","杭州城万年春","杭州城杂货铺","福州城酒馆","福州城药铺","福州城杂货铺","福州城茶楼","福州城吉祥客栈","佛山烧饼摊","佛山铁匠铺","佛山杂货店","佛山英雄楼","大理城杂货铺","大理城花店","大理城裁缝店","大理城绸缎庄"}
local foodList = {
["baozi"]=true,
["mi fan"]=true,
["huasheng"]=true,
["doufu"]=true,
["kao ya"]=true,
["yue bing"]=true,
["jitui"]=true,
}
local waterList = {
["jiu dai"]=true,
["jiudai"]=true,
["cha hu"]=true,
}
local tbankList = {
["大理城"]="大理钱庄",
["襄阳城"]="宝龙斋",
["长安城"]="钱庄",
["扬州城"]="天阁斋",
["苏州城"]="聚宝斋",
["杭州城"]="金华斋",
["福州城"]="通宝斋",
}
local nowRoom
local shopRoomListLength=1
local buyNow=1
while shopRoomList[shopRoomListLength]~=nil
do
shopRoomListLength=shopRoomListLength+1
end
function tradePro()
nowRoom=0
shoppingGoNext()
end
function checkShopList()
if shoplist~=nil and shoplist[buyNow]~=nil then
exe("#5(drop "..shoplist[buyNow]..')')
end
DeleteTriggerGroup("shoplist")
create_trigger_t('shoplist1',"^(> )*\\D*目前出售以下货物：",'','checkshoplistStart')
create_trigger_t('shoplist2',"^┃(\\D*)\\((\\D*)\\)\\D*一文铜钱\\D*",'','checkObjId')
create_trigger_t('shoplist3','^(> )*你把 "action" 设定为 "检查商店商品" 成功完成。,'','checkshoplistOver')
create_trigger_t('shoplist4','^(> )*什么?','','checkshoplistError')
SetTriggerOption("shoplist1","group","shoplist")
SetTriggerOption("shoplist2","group","shoplist")
SetTriggerOption("shoplist3","group","shoplist")
SetTriggerOption("shoplist4","group","shoplist")
EnableTriggerGroup("shoplist",false)
EnableTrigger("shoplist1",true)
EnableTrigger("shoplist4",true)
shoplist={}
buyNow=1
exe("list")
exe('alias action 检查商店商品')
end
function checkshoplistError()
EnableTriggerGroup("shoplist",false)
DeleteTriggerGroup("shoplist")
shoppingWaitGoNext()
end
function checkshoplistStart()
EnableTriggerGroup("shoplist",true)
end
function checkObjId(n,l,w)
print("物品ID："..w[2])
table.insert(shoplist,string.lower(w[2]))
end
function checkshoplistOver()
EnableTriggerGroup("shoplist",false)
DeleteTriggerGroup("shoplist")
startShopping()
end
function startShopping()
DeleteTriggerGroup("shopping")
create_trigger_t('shopping1',"^(> )*\\D*说道：「你想买的东西我这里没有。」",'','shoppingNext')
create_trigger_t('shopping2',"^(> )*哟，抱歉啊，我这儿正忙着呢……您请稍候。",'','shoppingWait')
create_trigger_t('shopping3','^(> )*你以(\\D*)的价格从\\D*那里买下了\\D*','','shoppingWait')
create_trigger_t('shopping4','^(> )*\\D*说道：「穷光蛋，一边呆着去！」','','shoppingGoBank')
create_trigger_t('shopping5','^(> )*地上已经那么多东西了，你想干嘛？','','shoppingWaitGoNext')
create_trigger_t('shopping6','^(> )*什么?','','shoppingWaitGoNext')
SetTriggerOption("shopping1","group","shopping")
SetTriggerOption("shopping2","group","shopping")
SetTriggerOption("shopping3","group","shopping")
SetTriggerOption("shopping4","group","shopping")
SetTriggerOption("shopping5","group","shopping")
SetTriggerOption("shopping6","group","shopping")
EnableTriggerGroup("shopping",true)
shoppingContinue()
end
function shoppingContinue()
if buyNow~=nil and shoplist[buyNow]~=nil then
exe("buy "..shoplist[buyNow])
if foodList[shoplist[buyNow]] then
exe("eat "..shoplist[buyNow])
end
if waterList[shoplist[buyNow]] then
exe("drink "..shoplist[buyNow])
end
exe("drop "..shoplist[buyNow])
else
shoppingGoNext()
end
end
function shoppingNext()
buyNow=buyNow+1
shoppingContinue()
end
function shoppingWait(n,l,w)
--print(w[2])
if w[2]~=nil and string.find(w[2],"黄金") then
shoppingGoNext()
else
wait.make(function()
wait.time(1.3)
return shoppingContinue()
end)
end
end
function shoppingWaitGoNext()
EnableTriggerGroup("shopping",false)
wait.make(function()
wait.time(3)
return shoppingGoNext()
end)
end
function shoppingGoNext()
DeleteTriggerGroup("shopping")
if nowRoom<shopRoomListLength then
nowRoom=nowRoom+1
else
nowRoom=1
end
if shopRoomList[nowRoom]~=nil then
local tmparea,tmproom = locateroom(shopRoomList[nowRoom])
if tmparea~=nil and tmproom~=nil then
go(checkShopList,tmparea,tmproom)
else
print('商店地点列表出错：没有这个房间')
end
else
wait.make(function()
wait.time(1)
return shoppingGoNext()
end)
end
end
function shoppingGoBank()
local tmparea,tmproom = locateroom(shopRoomList[nowRoom])
if tmparea~=nil and tmproom~=nil then
if tbankList[tmparea]~=nil then
go(shoppingBackBank,tmparea,tbankList[tmparea])
else
shoppingGoNext()
end
else
print('当前地图出错：无法去银行取钱')
end
end
function shoppingBackBank()
exe("qu 50 gold")
local tmparea,tmproom = locateroom(shopRoomList[nowRoom])
if tmparea~=nil and tmproom~=nil then
go(shoppingContinue,tmparea,tmproom)
else
print('当前地图出错：无法返回商店')
end
end

复制代码

招财猫(holycat@tj) · 发表于 2017-5-31 11:41:59

我碰到你不停地在那里买各种颜色的鱼。。。还以为养了猫呢。。。

本狂(modman@tj) · 发表于 2017-5-31 12:18:58

这个也要练啊？

垃圾虫(zerg@tj) · 发表于 2017-5-31 12:31:14

新人们遭罪了，大理再也买不到吃的了，巡城号没法练了

风起云涌(fqyy@tj) · 发表于 2017-5-31 12:38:28

这么重要的技能，怎么能不练嘛

讨价还价 (trade) - 心领神会 140/ 519

药铺 -
这是一家药铺，一股浓浓的药味让你几欲窒息，那是从药柜上的几百个小
抽屉里散发出来的。药店掌柜独自坐在茶几旁，独自喝着茶，看也不看你一眼。
一名小伙计站在柜台后招呼着顾客。柜台上贴着一张发黄的纸片。
这里唯一的出口是 west。
  少林派第三十五代弟子「赶路中」渡帝(Dudi)
  类似爱情「赶路中」默言(Wdmy)
  药店掌柜(Yaodian zhanggui)
> 现在是书剑戊寅年十月九日未时正。
您参与游戏的主机北京时间是星期三 2017-五月-31 12:29:08
            悉尼时间是星期三 2017-五月-31 14:29:08
   奥克兰、惠灵顿时间是星期三 2017-五月-31 16:29:08
   温哥华、洛杉矶时间是星期二 2017-五月-30 21:29:08 (夏令时间)
      多伦多、纽约时间是星期三 2017-五月-31 00:29:08 (夏令时间)
柏林、罗马、巴黎时间是星期三 2017-五月-31 06:29:08 (夏令时间)
贵宾系统提示：您目前不是贵宾，如何成为贵宾请看( help vip )。
贵宾生效时间：您没有贵宾生效时间记录。
你共有贵宾累计时间：二十天十四小时九分五十七秒。
> 你现在不忙。
> Ok.
> Ok.
> 你身上带着十三件东西(负重 3.57%)：
  六锭黄金(Gold)
  二十四两白银(Silver)
  五十一文铜钱(Coin)
□背囊(Bei Nang)
□布履(Shoes)
□白色圣衣(Cloth)
□龙凤玉佩(Jade)
□翡翠玉镯(Bangle)
□黄金头饰(Headgear)
□白金指环(Ring)
□紫晶项链(Necklace)
  一柄天灵赤霞刀(Good blade)
  一柄极品神通匕(Shentong dagger)
> 哟，抱歉啊，我这儿正忙着呢……您请稍候。
> 你身上携带物品的别称如下(右方)：
1: 极品神通匕 = shentong dagger, shentong, bishou, dagger
2: 天灵赤霞刀 = good blade, dao, blade
3: 背囊 = bei Nang, nang, bag
4: 布履 = shoes
5: 白色圣衣 = cloth
6: 黄金 = gold, gold_money
7: 白银 = silver, silver_money
8: 铜钱 = coin, coins, coin_money
9: 龙凤玉佩 = jade
10: 翡翠玉镯 = bangle
11: 黄金头饰 = headgear
12: 白金指环 = ring
13: 紫晶项链 = necklace
> 你身上带着十三件东西(负重 3.57%)：
  六锭黄金(Gold)
  二十四两白银(Silver)
  五十一文铜钱(Coin)
□背囊(Bei Nang)
□布履(Shoes)
□白色圣衣(Cloth)
□龙凤玉佩(Jade)
□翡翠玉镯(Bangle)
□黄金头饰(Headgear)
□白金指环(Ring)
□紫晶项链(Necklace)
  一柄天灵赤霞刀(Good blade)
  一柄极品神通匕(Shentong dagger)
> 你目前已经拥有了二件私有装备：天灵赤霞刀,极品神通匕。
> 你把 "action" 设定为 "检查包裹" 成功完成。
> 你已准备有一种技能了。
> 药铺 -
这是一家药铺，一股浓浓的药味让你几欲窒息，那是从药柜上的几百个小
抽屉里散发出来的。药店掌柜独自坐在茶几旁，独自喝着茶，看也不看你一眼。
一名小伙计站在柜台后招呼着顾客。柜台上贴着一张发黄的纸片。
这里唯一的出口是 west。
  少林派第三十五代弟子「赶路中」渡帝(Dudi)
  药店掌柜(Yaodian zhanggui)
> 药店掌柜目前出售以下货物：
┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
┃  货  物                         价  格                         库存/总量 ┃
┣━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┫
┃养精丹(Yangjing dan)       二十五两白银又二十五文铜钱          999/ 999 ┃
┃补气丸(Buqi wan)             二十五两白银又二十五文铜钱          999/ 999 ┃
┃续精丹(Xujing dan)          二十五两白银又二十五文铜钱          999/ 999 ┃
┃内息丸(Neixi wan)          二十五两白银又二十五文铜钱          999/ 999 ┃
┃金疮药(Jinchuang yao)       二十五两白银又二十五文铜钱          999/ 999 ┃
┃疗精丹(Liaojing dan)       二十五两白银又二十五文铜钱          999/ 999 ┃
┃正气丹(Zhengqi dan)          五十两白银又五十文铜钱             999/ 999 ┃
┃邪气丸(Xieqi wan)          五十两白银又五十文铜钱             999/ 999 ┃
┃延年养精丹(Yannian dan)    一锭黄金又一两白银                999/ 999 ┃
┃茯苓补气丸(Fuling wan)       一锭黄金又一两白银                999/ 999 ┃
┃当归续精丹(Danggui dan)    一锭黄金又一两白银                999/ 999 ┃
┃川贝内息丸(Chuanbei wan)    二锭黄金又六十四两白银又六十二文铜钱 837/ 999 ┃
┃蝉蜕金疮药(Chantui yao)    一锭黄金又四十九两白银又四十八文铜钱 951/ 999 ┃
┃活血疗精丹(Huoxue dan)       一锭黄金又一两白银                999/ 999 ┃
┃解毒丸(Jiedu wan)          一锭黄金又一两白银                999/ 999 ┃
┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛
> 【谣言】某人：有人带着星月菩提在天龙寺一带出现！
你想买的东西我这里没有。
> 您的资料已经自动保存好了。
你以二锭黄金又六十四两白银又六十二文铜钱的价格从药店掌柜那里买下了一颗川贝内息丸。
你背囊已经不能容纳更多的川贝内息丸了。
> 药店掌柜四顾着说道：「你们需不需要学习炼丹技术？可以向我学习啊，学费么.....嘿嘿」

注意！你将要放弃全部讨价还价(trade) ，确定吗？[Y|N] >
你放弃了讨价还价。

[暂存讯息]
什么?

[暂存讯息显示完毕]
> 你以三锭黄金又二两白银又四十五文铜钱的价格从药店掌柜那里买下了一颗川贝内息丸。
你的「讨价还价」进步了！
你背囊已经不能容纳更多的川贝内息丸了。

唐伯虎(haichao@tj) · 发表于 2017-5-31 12:41:25

好，会过日子的男人首选

风起云涌(fqyy@tj) · 发表于 2017-5-31 12:53:01

zerg@tj 发表于 2017-5-31 12:31
新人们遭罪了，大理再也买不到吃的了，巡城号没法练了

其实我没把新人买吃的的房间加到购买列表里啊，

这个我是考虑过的。

垃圾虫(zerg@tj) · 发表于 2017-5-31 13:07:49

fqyy@tj 发表于 2017-5-31 12:53
其实我没把新人买吃的的房间加到购买列表里啊，
这个我是考虑过的。

"大理城云雪楼","大理城风味小吃店","大理城茶馆",
巡城都是在这里买吃的

风起云涌(fqyy@tj) · 发表于 2017-5-31 13:14:48

zerg@tj 发表于 2017-5-31 13:07
"大理城云雪楼","大理城风味小吃店","大理城茶馆",
巡城都是在这里买吃的

哦哦，大概是测试时候这么想的忘记删除了。已修正！

宿醉(sin@tj) · 发表于 2017-5-31 15:58:15

现在连讨价还价都要练了，天啊

账号		自动登录	找回密码
密码			注册

节约吃药成本终极大法mush版练讨价还价robot

本帖子中包含更多资源

浏览过的版块