GEEM2引擎斩仙剑脚本，GEE传奇服务端仙器已经是超脱脚本命令

[@MAIN]
#IF
#act
goto @初始化
OPENMERCHANTBIGDLG  28  652 1 4 0 -80 1 380 1 1
goto @界面


[@界面]
#say
<text:<$str(s$斩仙剑)>:30:45{FCOLOR=215}>\
<text:<$str(s$鸢飞杳杳青云里)>:10:45{FCOLOR=215}>\
<text:<$str(s$翎震风起四方鸣)>:10:50{FCOLOR=222}>\
<text:<$str(s$游龙悠悠靠天悬)>:10:55{FCOLOR=228}>\
<text:<$str(s$仙凡两极断三生)>:10:60{FCOLOR=232}>\
<text:<$str(s$上古时代的大修士们)>:10:70{FCOLOR=245}>\
<text:<$str(s$勇往直前，身魂俱灭)>:10:75{FCOLOR=247}>\
<text:<$str(s$征蛮族--伐古妖)>:10:80{FCOLOR=248}>\
<text:<$str(s$平魔渊--戮仙人)>:10:85{FCOLOR=250}>\
<text:<$str(s$赫赫战功，惊天动地)>:10:90{FCOLOR=251}>\
<text:<$str(s$最终)>:10:95{FCOLOR=241}>\
<text:<$str(s$迎来人族的--煌煌盛世)>:10:100{FCOLOR=124}>\
<text:<$str(s$先人已逝去……)>:10:105{FCOLOR=253}>\
<text:<$str(s$领略到斩仙剑的真意)>:10:110{FCOLOR=229}>\
<text:<$str(s$才能真正体会到)>:10:115{FCOLOR=168}>\
<text:<$str(s$★☆有我无敌！☆★)>:10:120{FCOLOR=249}>\
<text:需要材料：<$str(S$仙魔名字_1)>*<$str(N$仙魔数量_1)>:180:-20{FCOLOR=150}/>\
<text:需要材料：<$str(S$仙魔名字_2)>*<$str(N$仙魔数量_2)>:180:-10{FCOLOR=150}/>\
<text:成功率：<$str(S$显示几率_1)>:220:15{FCOLOR=249}/>\
<ITEMBOX:7:1:14:260:110:56:55:22:251#斩仙剑>\
<ImgEx:44:110:111:112:215:20/@jx1>\


[@初始化]
#IF
equal  <$BOXITEM[7].NAME>  
#ACT
mov  s$斩仙剑  斩仙剑
mov  s$鸢飞杳杳青云里  鸢飞杳杳青云里
mov  s$翎震风起四方鸣  翎震风起四方鸣
mov  s$游龙悠悠靠天悬  游龙悠悠靠天悬
mov  s$仙凡两极断三生  仙凡两极断三生
mov  s$上古时代的大修士们  上古时代的大修士们
mov  s$勇往直前，身魂俱灭  勇往直前，身魂俱灭
mov  s$征蛮族--伐古妖  征蛮族--伐古妖
mov  s$平魔渊--戮仙人  平魔渊--戮仙人
mov  s$赫赫战功，惊天动地  赫赫战功，惊天动地
mov  s$最终  最终
mov  s$迎来人族的--煌煌盛世  迎来人族的--煌煌盛世
mov  s$先人已逝去……  先人已逝去……
mov  s$仙魂永流传！！  仙魂永流传！！
mov  s$领略到斩仙剑的真意  领略到斩仙剑的真意
mov  s$才能真正体会到  才能真正体会到
mov  s$★☆有我无敌！☆★  ★☆有我无敌！☆★
MOV  S$仙魔名字_1
MOV  S$仙魔名字_2
MOV  N$仙魔数量_1
MOV  N$仙魔数量_2
MOV  N$显示几率_1
MOV  N$真实几率_2

[@jx1]
#IF
Equal <$BOXITEM[7].NAME>
#ACT
MESSAGEBOX 错误操作,请将斩仙剑以上仙剑放入框内！
BREAK


#IF
NOT CHECKITEM  <$STR(S$仙魔名字_1)>  <$STR(N$仙魔数量_1)>
#ACT
MESSAGEBOX 物品<$STR(S$仙魔名字_1)>数量少于<$STR(N$仙魔数量_1)>
BREAK

#IF
NOT CHECKITEM  <$STR(S$仙魔名字_2)>  <$STR(N$仙魔数量_2)>
#ACT
MESSAGEBOX 物品<$STR(S$仙魔名字_2)>数量少于<$STR(N$仙魔数量_2>
BREAK

#IF
NOT Equal <$BOXITEM[7].NAME>
CHECKITEM  <$STR(S$仙魔名字_1)>  <$STR(N$仙魔数量_1)>
CHECKITEM  <$STR(S$仙魔名字_2)>  <$STR(N$仙魔数量_2)>
RANDOM <$STR(N$真实几率_2)>
#ACT
TAKE  <$STR(S$仙魔名字_1)>  <$STR(N$仙魔数量_1)>
TAKE  <$STR(S$仙魔名字_2)>  <$STR(N$仙魔数量_2)>
DelBoxItem 7
GIVE  <$STR(S$升级后物品)> 1
sendmsg 0 玩家[<$username>]升级装备<$STR(S$升级后物品)>成功
CLOSEMERCHANTBIGDLG
#ELSEACT
TAKE  <$STR(S$仙魔名字_1)>  <$STR(N$仙魔数量_1)>
TAKE  <$STR(S$仙魔名字_2)>  <$STR(N$仙魔数量_2)>
ReturnBoxItem  7
CLOSEMERCHANTBIGDLG
MESSAGEBOX 觉醒失败！脸要不要再洗洗？？大兄弟!扣除你的材料！！
CLOSEMERCHANTBIGDLG
BREAK


[@ItemIntoBox7]
#IF
EQUAL <$BOXITEM[7].NAME>  山海残界[超脱]
#ACT
ReturnBoxItem  7
MESSAGEBOX   你的仙器已经是超脱了！！
BREAK

#IF
CHECKTEXTLIST ..\QuestDiary\斩仙剑\物品名字.txt <$BOXITEM[7].NAME>
#act
goto @取配置
GOTO @界面
#elseact
ReturnBoxItem  7
messagebox  该装备不允许觉醒！乱点没收了哦！！
BREAK



[@取配置]
#IF
CHECKTEXTLIST ..\QuestDiary\斩仙剑\物品名字.txt <$BOXITEM[7].NAME>
#ACT
ReadConfigFileItem ..\QuestDiary\斩仙剑\配置表.txt 升级需求 <$BOXITEM[7].NAME> <$STR(S$升级配置)>
EXTRACTSTRING  =  <$STR(S$升级配置)>  S$仙魔名字_1   N$仙魔数量_1  S$仙魔名字_2  N$仙魔数量_2   S$显示几率_1   N$真实几率_2  S$升级后物品

版权声明

1、本站所有内容均由互联网收集整理、网友上传，仅供大家参考、学习研究使用，不存在任何商业目的与商业用途。

2、论坛的所有内容都不保证其准确性，完整性，有效性，因本站内容因误导等因素而造成的损失本站不承担连带责任。

3、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则：为了学习和研究软件内含的设计思想和原理，通过安装、显示、传输或者存储软件等方式使用软件的，可以不经软件著作权人许可，若有用户需要商用本站资源，请务必联系版权方购买正版授权！

比较全的传奇脚本分享网站，站长辛苦了。

谢谢楼主！

这个帖子不回对不起自己！

喜欢这里的东西，方便又好用！

感谢站长分享传奇脚本，让我学习到很多知识。

喜欢这里的东西，方便又好用！

这东西我收了！

喜欢这里的东西，方便又好用！

下次在来看脚本