GOM传奇服务端 传奇开区一条龙版本切割大师脚本怎么写？

admin

                               
登录/注册后可看大图

[@MAIN]
#IF
NOT CHECKUSEITEM 14
#ACT
MESSAGEBOX \提示：请先佩戴切割再来升级！
BREAK
#IF
#ACT
GetStringPos ..\QuestDiary\传奇切割\切割系统\切割装备名字列表.txt
MOV N$下级切割IDX
INC N$下级切割IDX 473
MOV N$下级切割序号
INC N$下级切割序号 1
GETLISTSTRING ..\QuestDiary\传奇切割\切割系统\切割装备名字列表.txt N$下级切割序号 S$下级切割名字
GETLISTSTRING ..\QuestDiary\传奇切割\切割系统\切割装备升级配置.txt N0 N$切割升级元宝 N$切割升级金元

#IF
NOT SMALL N0 9
#ACT
MESSAGEBOX \提示：您已经很强大了！
CLOSE
BREAK

#IF
EQUAL N$切割升级金元 0
#ACT
MOV S$切割条件显示 　　　　　　　　：{元宝/SCOLOR=70}
#ELSEACT
MOV S$切割条件显示 　　　　　　：{元宝+金元/SCOLOR=70}

#IF
#ACT
OPENMERCHANTBIGDLG 90 38 1 4 0 -80 0
#SAY
\
\ \
\ \ \ \ \ \ \ \ \
                  {/SCOLOR=254}\ \ \ \ \ \ \
\
\

[@开始晋升切割]
#IF
NOT CHECKUSEITEM 14
#ACT
MESSAGEBOX \提示：请先佩戴切割再来升级！
BREAK

#IF
#ACT
OPENMERCHANTBIGDLG 90 38 1 4 0 -80 0
GetStringPos ..\QuestDiary\传奇切割\切割系统\切割装备名字列表.txt
MOV N$下级切割IDX
INC N$下级切割IDX 473
MOV N$下级切割序号
INC N$下级切割序号 1
GETLISTSTRING ..\QuestDiary\传奇切割\切割系统\切割装备名字列表.txt N$下级切割序号 S$下级切割名字
GETLISTSTRING ..\QuestDiary\传奇切割\切割系统\切割装备升级配置.txt N0 N$切割升级元宝 N$切割升级金元

#IF
CHECKBAGSIZE 1
#ELSEACT
MESSAGEBOX \提示：必须保留1个包袱空格！
BREAK

#IF
NOT SMALL N0 9
#ACT
MESSAGEBOX \提示：您已经很强大了！
CLOSE
BREAK

#IF
CHECKGAMEGOLD <
#ACT
MESSAGEBOX \提示：元宝不够！
GOTO @MAIN
BREAK

#IF
CHECKGAMEDIAMOND <
#ACT
MESSAGEBOX \提示：金元不够！
GOTO @MAIN
BREAK

#IF
CHECKBAGSIZE 1
CHECKGAMEGOLD ?
CHECKGAMEDIAMOND ?
#ACT
GAMEGOLD -
GAMEDIAMOND -
TAKEW  1
GIVE  1
TakeOnItem  14
SendCenterMsg 0 254 恭喜玩家[]晋升【】成功！ 1 15
SendMsg 0 {系统提示ぐ|151:0:1}：恭喜玩家{|227:0:1}晋升[{|250:0:1}]成功！！
MESSAGEBOX \提示：晋升成功！
GOTO @MAIN
BREAK


来源：网络
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！