GEE引擎复古装备开孔-新人可以直接使用
说明,特别简单的一个脚本脚本说明:补丁直接使用登录器自带NewopUI.Pakwil资源 NewopUI.Pak编号为0
(@buy @sell @repair )
%100
+5
+6
+43
[@MAIN]
欢迎, 您想要些什么?我们这里有许多便宜锋利的剑. 请您挑选.\
根据这个城堡的主人<$LORD>的命令,\
我们特别对<$OWNERGUILD>的成员提供20%的折扣\ \
<买/@buy> 武器 \
<卖/@sell> 武器 武器 <开槽/@开槽>\
<修理/@repair>武器\ \
<退出/@exit>
[@开槽]
#ACT
mov N$孔数 0
goto @开槽2
break
[@开槽2]
#act
ReadConfigFileItem ..\QuestDiary\强化系统\装备打孔.txt 装备打孔 <$STR(N$孔数)> <$STR(S$打孔配置)>
EXTRACTSTRING ■ <$STR(S$打孔配置)> <$STR(N$开孔钻)> <$STR(N$金币)> <$STR(N$成功概率)> <$STR(S$展示成功概率)> <$STR(S$孔位展示)>
#say
\你好,你是要为你的武器打造凹槽吗?不过好像需要开孔钻\
\最多可以为你的武器开凿六个可以镶嵌宝石的凹槽\
\ \
\所需条件： \
<text:需要金币：:40:10/scolor=255><text:<$STR(N$金币)>:40:10/scolor=210>\
<text:需开孔钻：:40:10/scolor=255><text:<$STR(N$开孔钻)>:40:10/scolor=210>\
<text:成功几率：:40:10/scolor=255><text:<$STR(S$展示成功概率)>:40:10/scolor=210>\
\<ITEMBOX:0:0:1549:280:113:1:1:*:210#放入装备><ITEMBOX:1:0:1549:340:113:1:1:46:210#放入开孔钻>\
\ <开槽/@开孔><退出/@exit>\
\<$STR(S$孔位展示)>\
[@ItemIntoBox1]
#IF
not EQUAL <$BOXITEM.NAME> 开孔钻
#ACT
ReturnBoxItem 1
messagebox <[错误]/SCOLOR=249>\\你需要放入的是<开孔钻>.
[@ItemIntoBox0]
#IF
checkFluteCount boxitem0 = 0
#ACT
mov <$STR(N$孔数)> 0
goto @开槽2
break
#IF
checkFluteCount boxitem0 = 1
#ACT
mov <$STR(N$孔数)> 1
goto @开槽2
break
#IF
checkFluteCount boxitem0 = 2
#ACT
mov <$STR(N$孔数)> 2
goto @开槽2
break
#IF
checkFluteCount boxitem0 = 3
#ACT
mov <$STR(N$孔数)> 3
goto @开槽2
break
#IF
checkFluteCount boxitem0 = 4
#ACT
mov <$STR(N$孔数)> 4
goto @开槽2
break
#IF
checkFluteCount boxitem0 = 5
#ACT
mov <$STR(N$孔数)> 5
goto @开槽2
break
#IF
CheckFluteCount boxitem0 = 6
#act
ReturnBoxItem 0
ReturnBoxItem 1
MESSAGEBOX <[错误]/SCOLOR=249>\\装备已经六个槽位,无法继续开槽!
break
[@ItemOutBox0]
#ACT
mov <$STR(N$孔数)> 0
goto @开槽2
break
[@开孔]
#IF
CheckFluteCount boxitem0 < 6
CheckGold <$STR(N$金币)>
CheckBoxItemCount 1 <$STR(N$开孔钻)>
EQUAL <$BOXITEM.NAME> 开孔钻
#ACT
goto @开孔2
#ELSEACT
messagebox <[错误]/SCOLOR=249>\\1.你可能没有放入武器或者开孔钻\\2.武器已经六个槽位,无法继续开槽\\3.金币或开孔钻不足
break
[@开孔2]
#IF
randomEX <$STR(N$成功概率)> 100
#ACT
inc <$STR(N$孔数)> 1
SETFLUTECOUNT boxitem0 <$STR(N$孔数)>
take 金币 <$STR(N$金币)>
DelBoxItem 1 <$STR(N$开孔钻)>
messagebox<[恭喜]/SCOLOR=250>\\成功增加一个槽位!
goto @开槽2
#ELSEACT
take 金币 <$STR(N$金币)>
DelBoxItem 1 <$STR(N$开孔钻)>
messagebox <[失败]/SCOLOR=249>\\槽位没有增加!
break
[@buy]
不要担心我这里武器的数量,请您尽量慢慢挑选您需要的武器.\ \
<返回/@Main>
[@sell]
放下你要卖的武器.\ \
<返回/@Main>
[@repair]
想修理武器吗? 你想修理哪个?\ \
<返回/@Main>
[~@repair]
看起来完全修好了？还有要修理的吗？\ \
<返回/@Main>
木剑 50 10
乌木剑 50 10
匕首 50 10
青铜剑 50 10
铁剑 50 10
短剑 50 10
鹤嘴锄 50 10
青铜斧 50 10
八荒 50 10
半月 50 10
海魂 50 10
凌风 50 10
破魂 50 10
斩马刀 50 10
偃月 50 10
降魔 50 10
修罗 50 10
凝霜 50 10[装备打孔]
;孔数=需开孔钻，需金币，成功概率，展示成功概率，孔位展示
0=1■10000■70■70%■
1=2■20000■60■60%■<Img:1180:0:200:-95>
2=3■30000■50■50%■<Img:1180:0:200:-95>\<Img:1180:0:200:-95>
3=4■40000■40■40%■<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>
4=5■50000■30■30%■<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>
5=6■60000■20■20%■<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>
6=7■70000■10■10%■<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>\<Img:1180:0:200:-95>脚本好像有问题
成功概率太高了
请在[@开孔2]的ELSEACT下面添加goto @开槽2 一段即可在别人的脚本基础上修改
不卖金币了
打包脚本在此
欢迎大家来到传奇单机版论坛，有资源的朋友可发点东西到论坛赚取金币和大家交流资源呀
既然你诚信诚意的推荐了，那我就勉为其难的看看吧！奇速论坛不走平凡路。
LZ是天才，鉴定完毕 GEE引擎复古装备开孔-新人可以直接使用 学习一下.. EE引擎复古装备开孔-新人可以直接使用 111111111111111111111111111111111111111 GEE引擎复古装备开孔-新人可以直接使用 感谢分享哦
这么好的东西,感谢无私分享(省了自己去版本里扒)!