• 400-123-4567

    工作时间

    周一至周五:9:00-21:00

    周末及节日:9:00-18:00

  • 手机版二维码

    随时手机查素材

  • 扫描二维码

    加入官方微信群

网络广告 风险自担
趣游论坛 管理员
  • 未知地域
  • 活跃会员

  • 灌水之王

  • 突出贡献

  • 优秀版主

  • 荣誉管理

  • 论坛元老

  • 10569发帖数
  • 10561主题数
  • 0关注数
  • 2粉丝

[GEE引擎] GEE引擎附魔系统脚本,传奇私服版本添加首饰附魔的教程和范例

  [复制链接]
趣游论坛 发表于 2019-8-21 10:16:19 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
20190821100804.png

[@main]
#IF
CheckLevelEx < 400
#ACT
MessageBox 附魔系统<【400级】/FCOLOR=250>后开启!
Break
#IF
CheckLevelEx > 0
#ACT
OPENMERCHANTBIGDLG 44 9 1 4 0 -80 0 0 0 1
Goto @首饰附魔
Break



[@首饰附魔]
#IF
CheckLevelEx > 0
#ACT
Break
#SAY
<ImgEx:73:352:353:354:342:-5/@Exit><PlayImg:73:900:20:100:-80:-43:0><PlayImg:73:870:10:100:-305:-75:1>\
 \
<PlayImg:44:850:13:100:62:24:0>\
<PlayImg:44:910:10:100:131:84:0><PlayImg:44:920:13:100:29:90:0>\
<ImgEx:44:843:844:845:103:358/@立即附魔> <Text:附魔石合成:111:375/@fmshcnpc>\
 \
<ITEMBOX:0:-1:0:173:169:64:64:15,19,26,22,24,23,64,62:放入你想附魔的首饰>\
 \
;<IMG:834:44:42:-51>
 \
<Text: ↓↓温馨提示↓↓:130:182{FCOLOR=249}>\
<IMG:558:73:90:182>\
<Text: 项链的幸运会自动:130:182{FCOLOR=250}>\
<Text:转移到附魔后的项链上:130:182{FCOLOR=250}>\
<Text:50倍神力首饰方可附魔:130:182{FCOLOR=250}>\




[@fmshcnpc]
#IF
CheckLevelEx > 0
#ACT
OPENMERCHANTBIGDLG 73 267 1 4 0 -100 0 0 0 1
Break
#SAY
<ImgEx:73:352:353:354:410:-15/@Exit><PlayImg:73:2080:10:100:95:-43:0>\
 \
 \
 <为了附魔石更加保值,我们推出附魔石低阶合高阶活动/FCOLOR=253>\
 \
  <仙级附魔石:/FCOLOR=250>  <魔级附魔石*2/FCOLOR=87>     <立即合成/@fmshcnpc1>\
 \
  <尊级附魔石:/FCOLOR=250>  <仙级附魔石*2/FCOLOR=87>     <立即合成/@fmshcnpc2>\
 \
  <神级附魔石:/FCOLOR=250>  <尊级附魔石*2/FCOLOR=87>     <立即合成/@fmshcnpc3>       <返回上级/@main>\
 \



[@fmshcnpc1]
#IF
CheckItem 魔级附魔石 2
#ACT
Take 魔级附魔石 2
Give 仙级附魔石 1
LINKGIVEITEM
SetItemFrom -1 0 4
SetItemFrom -1 1 <$MapTitle>
SetItemFrom -1 2 此物品来自-附魔石合成
SetItemFrom -1 3 <$USERNAME>
updateitem -1
clearLinkItem
MessageBox 合成成功!获得一个<【仙级附魔石】/FCOLOR=250>
Break
#ELSEACT
MessageBox 合成失败!条件不足!
Break


[@fmshcnpc2]
#IF
CheckItem 仙级附魔石 2
#ACT
Take 仙级附魔石 2
Give 尊级附魔石 1
LINKGIVEITEM
SetItemFrom -1 0 4
SetItemFrom -1 1 <$MapTitle>
SetItemFrom -1 2 此物品来自-附魔石合成
SetItemFrom -1 3 <$USERNAME>
updateitem -1
clearLinkItem
MessageBox 合成成功!获得一个<【尊级附魔石】/FCOLOR=250>
Break
#ELSEACT
MessageBox 合成失败!条件不足!
Break


[@fmshcnpc3]
#IF
CheckItem 尊级附魔石 2
#ACT
Take 尊级附魔石 2
Give 神级附魔石 1
LINKGIVEITEM
SetItemFrom -1 0 4
SetItemFrom -1 1 <$MapTitle>
SetItemFrom -1 2 此物品来自-附魔石合成
SetItemFrom -1 3 <$USERNAME>
updateitem -1
clearLinkItem
MessageBox 合成成功!获得一个<【神级附魔石】/FCOLOR=250>
Break
#ELSEACT
MessageBox 合成失败!条件不足!
Break


[@ItemIntoBox0]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
ReadConfigFileItem ..\QuestDiary\quyoubbs论坛\附魔\附魔数据.txt <$BOXITEM[0].NAME> 附魔首饰 <$STR(S$附魔首饰)>
ReadConfigFileItem ..\QuestDiary\quyoubbs论坛\附魔\附魔数据.txt <$BOXITEM[0].NAME> 附魔材料 <$STR(S$附魔材料)>

#OR
Equal S$附魔首饰
Equal S$附魔材料
#ACT
UNALLOWITEMINTOBOX
MessageBox 此首饰不可附魔!
Break

#IF
NOT Equal S$附魔首饰
#ACT
GetDBItemFieldValue S$附魔首饰 Idx <$STR(N$附魔首饰ID)>
Break
#SAY
<ImgEx:73:352:353:354:342:-5/@Exit>\
 \
<PlayImg:44:850:13:100:62:24:0>\
<PlayImg:44:910:10:100:131:84:0><PlayImg:44:920:13:100:29:90:0>\
<ImgEx:44:843:844:845:103:358/@立即附魔> <Text:附魔石合成:111:375/@fmshcnpc>\
 <IMG:833:44:152:130>\
<ITEMBOX:0:-1:0:173:169:64:64:15,19,26,22,24,23,64,62:放入你想附魔的首饰>\
 <PlayImg:44:870:13:100:125:160:0>\
 <Text:附魔材料::100:238{FCOLOR=149}><Text:<$STR(S$附魔材料)> x 10:100:238{FCOLOR=146}>\
 <Text:成功几率::100:238{FCOLOR=149}><Text:100%:100:238{FCOLOR=250}>\
 \
 \
 \
<ItemShow:<$STR(N$附魔首饰ID)>:0:160:88:0>




















[@ItemOutBox0]
#IF
CheckLevelEx > 0
#ACT
Goto @首饰附魔
Break


[@立即附魔]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
Mov M11 0
ReadConfigFileItem ..\QuestDiary\quyoubbs论坛\附魔\附魔数据.txt <$BOXITEM[0].NAME> 附魔首饰 <$STR(S$附魔首饰)>
ReadConfigFileItem ..\QuestDiary\quyoubbs论坛\附魔\附魔数据.txt <$BOXITEM[0].NAME> 附魔材料 <$STR(S$附魔材料)>


#OR
Equal <$BOXITEM[0].NAME>
Equal S$附魔首饰
Equal S$附魔材料
#ACT
Break

#IF
NOT CheckItem <$STR(S$附魔材料)>  10
#ACT
MessageBox 附魔失败:你没有足够的附魔材料!
Break

;#IF
;CheckItem <$STR(S$附魔材料)>  10
;random 2
;#ACT
;Take <$STR(S$附魔材料)>  10
;MessageBox <非常抱歉,附魔失败……/FCOLOR=149>
;Break

#IF
Equal <$BOXITEM[0].STDMODE> 19
#ACT
SetUpgradeItem 0
GETITEMADDVALUE -1 1 <$STR(M11)>

#IF
CheckItem <$STR(S$附魔材料)>  10
Equal <$BOXITEM[0].STDMODE> 19
Large M11 0
#ACT
Take <$STR(S$附魔材料)>  10
DelBoxItem 0
Give <$STR(S$附魔首饰)> 1 0 <$STR(M11)> 0 0 0 0
LINKGIVEITEM
SetItemFrom -1 0 4
SetItemFrom -1 1 <$MapTitle>
SetItemFrom -1 2 此装备来自-首饰附魔
SetItemFrom -1 3 <$USERNAME>
updateitem -1
clearLinkItem
MessageBox 恭喜你附魔成功!!获得附魔首饰<【<$STR(S$附魔首饰)>】/FCOLOR=250>
Goto @首饰附魔
Break

#IF
CheckItem <$STR(S$附魔材料)>  10
#ACT
Take <$STR(S$附魔材料)>  10
DelBoxItem 0
Give <$STR(S$附魔首饰)> 1
LINKGIVEITEM
SetItemFrom -1 0 4
SetItemFrom -1 1 <$MapTitle>
SetItemFrom -1 2 此装备来自-首饰附魔
SetItemFrom -1 3 <$USERNAME>
updateitem -1
clearLinkItem
MessageBox 恭喜你附魔成功!!获得附魔首饰<【<$STR(S$附魔首饰)>】/FCOLOR=250>
Goto @首饰附魔
Break

回复

使用道具 举报

精彩评论1

yuqing 发表于 11 小时前 | 显示全部楼层
我是打酱油的
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

猜你喜欢
客服电话
1300000000

24x7小时免费咨询

  • 官方在线客服

    QQ客服:小西

    点击交谈

    QQ客服:良子

    点击交谈

    QQ客服:闵月

    点击交谈
  • 上海市虹口区海伦中心A座

  • 手机扫码查看手机版

    手机查找资源更方便

  • 扫一扫关注官方微信

    加入官方微信群

Powered by Discuz!X3.5 ©2022-2023 Comsenz Inc.河月网络设计( 赣ICP备2022008660号-4 )赣公网安备36050202000600号|网站地图