支持赞助诗风博客TG官方群
开启辅助访问      

传世单机社区

 找回密码
 立即注册
https://www.wooolc.com
传世单机社区»论坛 › 传世单机 ╃ 分享交流 › 脚本交流 › 【AFT4】拾取触发大极品完整脚本(新手向)
1234下一页
返回列表 发新帖
查看: 6670|回复: 31

[AFT脚本] 【AFT4】拾取触发大极品完整脚本(新手向)

[复制链接]
橙子

升级   100%

发表于 2019-3-22 10:54:59 | 显示全部楼层 |阅读模式

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要 登录 才可以下载或查看，没有账号？立即注册

x
主要功能：实现1星可以随机获取1个属性位升级，星星越高，获得升级的属性位就越多，最高可以达到5星！
注意事项：拾取的装备要进行补全更新和调整。
需改动的位置：
1、按以下路径创建3个文本文件，并在里面添加相应内容，如果没有自行新建文件夹即可。
Mirserver\mir200\Envir\QuestDiary\大极品功能
  • 文件名为：掉落广播.txt、防具位置.txt、武器位置.txt
  • 掉落广播.txt的内容设置为怪物掉落的物品，例如：
        法神羽衣
        玄珠靴子
        神武战甲
        神武战袍
        天玄道袍
        逍遥无极扇
  • 防具位置.txt的内容设置如下：
        0
        1
        2
        3
        4
        80
        81
        82
        83
        84
        1
        2
        3
        2
        3
        4
        80
        83
        81
        82
        4
        2
        1
        84
        3
        84
  • 武器位置.txt的内容设置如下：
        2
        3
        5
        3
        1
        7
        84
        3
        5
        2
        1
        0
        82
        0
        84
        83
        82
        7
        5
        3
        2
        1
        0
        0
        1
        2
        3
        5
        7
        82
        83
        84
2、在QFunction-0.txt中的[@拾取触发]标签添加脚本：
文件路径：Mirserver\mir200\Envir\market_def\QFunction-0.txt

  1. <font size="2">#IF
  2. EQUAL $PARAM(23) 1
  3. CHECKVARLIST $PARAM(22) ..\QuestDiary\大极品功能\掉落广播.txt
  4. #ACT
  5. SENDMSG 0 (*)勇士「%s」在<$MAPNAME>(<$X>,<$Y>)爆出：<$PARAM(22)>，我们一起恭喜他！
  6. #IF
  7. RANDOM 5
  8. #ACT
  9. MOVR P20 60
  10. #IF
  11. EQUAL $PARAM(23) 1
  12. EQUAL $ItemExN.$PARAM(21).Stdmode 5
  13. #ACT
  14. GOTO @wqupdateA
  15. #elaseact
  16. #IF
  17. EQUAL $PARAM(23) 1
  18. EQUAL $ItemExN.$PARAM(21).Stdmode 10
  19. #ACT
  20. goto @zbupdateB
  21. #elaseact
  22. #IF
  23. EQUAL $PARAM(23) 1
  24. EQUAL $ItemExN.$PARAM(21).Stdmode 11
  25. #ACT
  26. goto @zbupdateB
  27. #elaseact
  28. #IF
  29. EQUAL $PARAM(23) 1
  30. EQUAL $ItemExN.$PARAM(21).Stdmode 15
  31. #ACT
  32. goto @zbupdateB
  33. #elaseact
  34. #IF
  35. EQUAL $PARAM(23) 1
  36. EQUAL $ItemExN.$PARAM(21).Stdmode 20
  37. #ACT
  38. goto @zbupdateB
  39. #elaseact
  40. #IF
  41. EQUAL $PARAM(23) 1
  42. EQUAL $ItemExN.$PARAM(21).Stdmode 22
  43. #ACT
  44. goto @zbupdateB
  45. #elaseact
  46. #IF
  47. EQUAL $PARAM(23) 1
  48. EQUAL $ItemExN.$PARAM(21).Stdmode 26
  49. #ACT
  50. goto @zbupdateB
  51. #elaseact
  52. #IF
  53. EQUAL $PARAM(23) 1
  54. EQUAL $ItemExN.$PARAM(21).Stdmode 58
  55. #ACT
  56. goto @zbupdateB
  57. #elaseact
  58. #IF
  59. EQUAL $PARAM(23) 1
  60. EQUAL $ItemExN.$PARAM(21).Stdmode 81
  61. #ACT
  62. goto @zbupdateB
  63. break

  65. [@wqupdateA]
  66. #IF
  67. LARGE P20 57
  68. #ACT
  69. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S1
  70. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S2
  71. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S3
  72. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S4
  73. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S5
  74. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 5
  75. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 5
  76. UpgradeUserItemEx $PARAM(21) <$Str(S3)> + 5
  77. UpgradeUserItemEx $PARAM(21) <$Str(S4)> + 5
  78. UpgradeUserItemEx $PARAM(21) <$Str(S5)> + 5
  79. UpgradeUserItemEx $PARAM(21) 9 = 5
  80. MOV P20 0
  81. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得至尊五星武器『<$PARAM(22)>』！！
  82. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得至尊五星武器『<$PARAM(22)>』！！
  83. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得至尊五星武器『<$PARAM(22)>』！！
  84. break
  85. #IF
  86. LARGE P20 54
  87. SMALL P20 58
  88. #act
  89. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S1
  90. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S2
  91. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S3
  92. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S4
  93. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 4
  94. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 4
  95. UpgradeUserItemEx $PARAM(21) <$Str(S3)> + 4
  96. UpgradeUserItemEx $PARAM(21) <$Str(S4)> + 4
  97. UpgradeUserItemEx $PARAM(21) 9 = 4
  98. MOV P20 0
  99. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得王者四星武器『<$PARAM(22)>』！！
  100. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得王者四星武器『<$PARAM(22)>』！！
  101. break
  102. #IF
  103. LARGE P20 49
  104. SMALL P20 55
  105. #act
  106. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S1
  107. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S2
  108. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S3
  109. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 3
  110. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 3
  111. UpgradeUserItemEx $PARAM(21) <$Str(S3)> + 3
  112. UpgradeUserItemEx $PARAM(21) 9 = 3
  113. MOV P20 0
  114. SENDMSG 14 {<$USERNAME>}在%m(%x，%y)地图击杀怪物获得三星武器『<$PARAM(22)>』，让我们一起恭喜他吧！
  115. break
  116. #IF
  117. LARGE P20 25
  118. SMALL P20 50
  119. #act
  120. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S1
  121. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S2
  122. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 2
  123. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 2
  124. UpgradeUserItemEx $PARAM(21) 9 = 2
  125. MOV P20 0
  126. SENDMSG 14 {<$USERNAME>}在%m(%x，%y)地图击杀怪物获得二星武器『<$PARAM(22)>』，让我们一起恭喜他吧！
  127. break
  128. #if
  129. #IF
  130. LARGE P20 0
  131. SMALL P20 26
  132. #act
  133. ReadRandomStr ..\QuestDiary\大极品功能\武器位置.txt S1
  134. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 1
  135. UpgradeUserItemEx $PARAM(21) 9 = 1
  136. MOV P20 0
  137. SENDMSG 14 {<$USERNAME>}在%m(%x，%y)地图击杀怪物获得一星武器『<$PARAM(22)>』，让我们一起恭喜他吧！
  138. break

  140. [@zbupdateB]
  141. #IF
  142. LARGE P20 57
  143. #act
  144. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S1
  145. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S2
  146. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S3
  147. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S4
  148. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S5
  149. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 5
  150. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 5
  151. UpgradeUserItemEx $PARAM(21) <$Str(S3)> + 5
  152. UpgradeUserItemEx $PARAM(21) <$Str(S4)> + 5
  153. UpgradeUserItemEx $PARAM(21) <$Str(S5)> + 5
  154. UpgradeUserItemEx $PARAM(21) 9 = 5
  155. MOV P20 0
  156. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得至尊五星装备『<$PARAM(22)>』！！
  157. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得至尊五星装备『<$PARAM(22)>』！！
  158. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得至尊五星装备『<$PARAM(22)>』！！
  159. break
  160. #IF
  161. LARGE P20 54
  162. SMALL P20 58
  163. #act
  164. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S1
  165. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S2
  166. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S3
  167. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S4
  168. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 4
  169. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 4
  170. UpgradeUserItemEx $PARAM(21) <$Str(S3)> + 4
  171. UpgradeUserItemEx $PARAM(21) <$Str(S4)> + 4
  172. UpgradeUserItemEx $PARAM(21) 9 = 4
  173. MOV P20 0
  174. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得王者四星装备『<$PARAM(22)>』！！
  175. SENDMSG 14 恭喜{<$USERNAME>}在%m(%x，%y)地图击杀怪物获得王者四星装备『<$PARAM(22)>』！！
  176. break
  177. #IF
  178. LARGE P20 49
  179. SMALL P20 55
  180. #act
  181. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S1
  182. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S2
  183. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S3
  184. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 3
  185. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 3
  186. UpgradeUserItemEx $PARAM(21) <$Str(S3)> + 3
  187. UpgradeUserItemEx $PARAM(21) 9 = 3
  188. MOV P20 0
  189. SENDMSG 14 {<$USERNAME>}在%m(%x，%y)地图击杀怪物获得三星装备『<$PARAM(22)>』，让我们一起恭喜他吧！
  190. break
  191. #IF
  192. LARGE P20 25
  193. SMALL P20 50
  194. #act
  195. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S1
  196. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S2
  197. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 2
  198. UpgradeUserItemEx $PARAM(21) <$Str(S2)> + 2
  199. UpgradeUserItemEx $PARAM(21) 9 = 2
  200. MOV P20 0
  201. SENDMSG 14 {<$USERNAME>}在%m(%x，%y)地图击杀怪物获得二星装备『<$PARAM(22)>』，让我们一起恭喜他吧！
  202. break
  203. #IF
  204. LARGE P20 0
  205. SMALL P20 26
  206. #act
  207. ReadRandomStr ..\QuestDiary\大极品功能\防具位置.txt S1
  208. UpgradeUserItemEx $PARAM(21) <$Str(S1)> + 1
  209. UpgradeUserItemEx $PARAM(21) 9 = 1
  210. MOV P20 0
  211. SENDMSG 14 {<$USERNAME>}在%m(%x，%y)地图击杀怪物获得一星装备『<$PARAM(22)>』，让我们一起恭喜他吧！
  212. break</font>
复制代码


回复

使用道具 举报

传世小英雄

升级   18.7%

发表于 2019-3-24 10:53:29 | 显示全部楼层
帮帮顶顶！！

回复 支持 反对

使用道具 举报

传世小英雄

升级   18.7%

发表于 2019-3-24 11:03:53 | 显示全部楼层
路过，支持一下啦

回复 支持 反对

使用道具 举报

likai1999

升级   0%

发表于 2019-3-24 13:25:13 | 显示全部楼层
AFT3能支持不？？？？

回复 支持 反对

使用道具 举报

橙子

升级   100%

 楼主| 发表于 2019-3-24 20:22:31 | 显示全部楼层
likai1999 发表于 2019-3-24 13:25
AFT3能支持不？？？？

没试过，应该可以。

回复 支持 反对

使用道具 举报

嗨佩奇

升级   88.2%

发表于 2019-4-1 08:27:30 | 显示全部楼层
你还是这么喜欢用GOTO啊。这个脚本不能再优化一下了吗？

回复 支持 反对

使用道具 举报

橙子

升级   100%

 楼主| 发表于 2019-4-1 10:40:44 | 显示全部楼层
嗨佩奇 发表于 2019-4-1 08:27
你还是这么喜欢用GOTO啊。这个脚本不能再优化一下了吗？

这是我之前写的，不知道goto的弊端，已经不用AFT了，改彩虹端了。

回复 支持 反对

使用道具 举报

yuanjiankeji

升级   71.33%

发表于 2019-4-4 18:04:35 | 显示全部楼层
帮忙看看。。。行不行

回复 支持 反对

使用道具 举报

502049332

升级   31.5%

发表于 2019-9-2 19:25:28 | 显示全部楼层
膜拜了，复制试试！

回复 支持 反对

使用道具 举报

chq_1129

升级   7.7%

发表于 2019-10-9 15:00:33 | 显示全部楼层
本帖最后由 chq_1129 于 2019-10-10 07:43 编辑

这个东西是什么鬼~还不能改，改完就不播报了~完了还得把刚捡完的装备丢地上在拣起来才播报~

QQ图片20191009223308.png
回复 支持 反对

使用道具 举报

下一页 »
1234下一页
返回列表 发新帖
懒得打字嘛，点击右侧快捷回复
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

■1、请认真发帖，禁止回复纯表情，纯数字等无意义的内容！帖子内容不要太简单!
■2、提倡文明上网，净化网络环境！抵制低俗不良违法有害信息。
■3、如果你对主帖作者的帖子不屑一顾的话，请勿回帖。谢谢合作！
关闭

站长推荐 上一条 /1 下一条

传奇世界单机版|传世服务端|传世版本|关于我们|小黑屋|手机版| 传世单机社区 |网站地图

GMT+8, 2025-4-29 17:15 , Processed in 0.085384 second(s), 24 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 2001-2018 Comsenz Inc.

快速回复 返回顶部 返回列表