64GM论坛 › 传奇技术脚本 › 传奇特殊装备强化系统功能脚本(Gee引擎)

抒怀1856 发表于 2024-10-7 06:52:21

传奇特殊装备强化系统功能脚本(Gee引擎)

传奇特殊装备强化系统功能脚本(Gee引擎)
[@main]
#if
#act
OPENMERCHANTBIGDLG 62 1542 1 4 0 -100 0
#say
<img:1403:62:244:22/@EXIT>\
<>\
<>                <【星辰之力】/SCOLOR=253>\
<>\
<>以<祝融锤>为媒质,激发<星辰石/SCOLOR=242>中的星辰能量。\
<>将其引入至<特殊装备/SCOLOR=250>之中\
<>可让<特殊装备/SCOLOR=250>获得星辰加\
<>\
<>       <一旦5件特殊装备形成星辰之力/SCOLOR=242>\
<>       <互相呼应，即可触发额外加成。/SCOLOR=242>\
<>
<>         <6星以上的装备可免费转移./SCOLOR=146>\
<>\
<>         <强化打造/@xz1>      <免费转移/@xz2>\


[@xz1]
#act
OPENMERCHANTBIGDLG 28 651 1 4 0 -100 0 0 0 1
goto @xz11
break

[@xz11]
#say
<text:☆★星级系统☆★星级待遇☆★星级BUFF☆★你，值得拥有★☆:10:25{AUTOCOLOR=254,251,168,191,250,70,245,249,253}>\
<text:星星系统:40:45{FCOLOR=249}>\
<text:1.除武器衣服都可升星:-20:45{FCOLOR=215}>\
<text:2.升星给超强属性:-20:45{FCOLOR=2162}>\
<text:7星以上套装还有超级BUFF:-20:45{FCOLOR=217}>\
<text:3.升星失败直接星星清零:-20:45{FCOLOR=253}>\
<text:请广大玩家慎重考虑:-20:45{FCOLOR=94}>\
<text:土豪请无视！:-20:45{FCOLOR=249}>\
<text:4.全身13件装备达到7星以上:-20:45{FCOLOR=229}>\
<text:获得称号--七星道人:-20:45{FCOLOR=229}>\
<text:称号触发2%切割:-20:45{FCOLOR=249}>\
<text:5.全身13件装备达到8星以上:-20:45{FCOLOR=229}>\
<text:获得称号--八部浮屠:-20:45{FCOLOR=229}>\
<text:称号触发4%切割:-20:45{FCOLOR=249}>\
<text:6.全身13件装备达到9星以上:-20:45{FCOLOR=229}>\
<text:获得称号--九九至尊:-20:45{FCOLOR=229}>\
<text:称号触发7%切割:-20:45{FCOLOR=249}>\
<text:7.友情提示:-20:45{FCOLOR=253}>\
<text:六星以上都可以免费转移:-20:45{FCOLOR=253}>\
<text:有能力者一定前期点满:-20:45{FCOLOR=253}>\














<IMG:1551:62:230:-20|250#打造说明^254#所需仙石<$STR(N$仙石)>^254#成功率为<$STR(N$几率)>%^151#6星之后若失败^151#则所有星星消失/@QHXZ>\
<img:1403:62:345:-355/@EXIT>\
<ITEMBOX:0:-1:1555:270:120:40:40:19,24,26,22,25,62,64,63,30,65,90,28:{请放入需要强化的装备|254}>\
<ITEMBOX:1:-1:1555:220:250:40:40:41:{请放入祝融锤|254}>\
<ITEMBOX:2:-1:1555:315:250:40:40:41:{请放入星辰石|254}>\


[@xz2]
#act
OPENMERCHANTBIGDLG 62 1554 1 4 0 -100 0
#say
<IMG:1552:62:64:81/@ZYXZ>\
<img:1403:62:189:-35/@EXIT>\
<ITEMBOX:3:62:1555:38:89:40:40:19,24,22,26,25,62,64,63,30,65,90,28:{请放入6星以上装备|254}>\
<ITEMBOX:4:62:1555:162:89:40:40:19,24,22,26,25,62,64,63,30,65,90,28:{请放入接受星辰传承的装备|254}>\



[@ItemIntoBox2]
#if
equal <$BOXITEM.NAME> 星辰石
#act
break
#elseact
returnboxitem 2
messagebox 请放入对应材料“星辰石”。
break


[@ItemIntoBox1]
#if
equal <$BOXITEM.NAME> 祝融锤
#act
break
#elseact
returnboxitem 1
messagebox 请放入对应材料“祝融锤”。
break


[@ItemIntoBox0]
#IF
CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
#ACT
MESSAGEBOX 当前装备不允许强化！！！！
ReturnBoxItem 0
BREAK

#act
SetUpgradeItem 0
MOV N$星数 0
MOV N$星攻 0

#if
CheckUpgradeCountboxitem0 = 0
#act
MOV N$仙石 100
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 1
MOV N$星攻 10
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 1
#act
MOV N$仙石 200
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 2
MOV N$星攻 20
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 2
#act
MOV N$仙石 300
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 3
MOV N$星攻 30
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 3
#act
MOV N$仙石 400
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 4
MOV N$星攻 40
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 4
#act
MOV N$仙石 500
MOV N$几率 80
MOV N$真几率 2
MOV N$星数 5
MOV N$星攻 50
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 5
#act
MOV N$仙石 600
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 6
MOV N$星攻 60
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 6
#act
MOV N$仙石 700
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 7
MOV N$星攻 77
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 7
#act
MOV N$仙石 800
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 8
MOV N$星攻 99
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 8
#act
MOV N$仙石 1000
MOV N$几率 50
MOV N$真几率 3
MOV N$星数 9
MOV N$星攻 199
goto @xz11
break

#if
CheckUpgradeCountboxitem0 = 9
#act
messagebox 本件装备已经达到9星，无法继续注入星辰！！
returnboxitem 0
break





[@QHXZ]
#IF
EQUAL <$BOXITEM.NAME>
#act
MESSAGEBOX 先放装备，别瞎JB乱按！
break

#IF
#act
SetUpgradeItem 0


#if
CheckUpgradeCountboxitem0 = 0
#act
MOV N$仙石 100
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 1
MOV N$星攻 10

#if
CheckUpgradeCountboxitem0 = 1
#act
MOV N$仙石 200
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 2
MOV N$星攻 20

#if
CheckUpgradeCountboxitem0 = 2
#act
MOV N$仙石 300
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 3
MOV N$星攻 30


#if
CheckUpgradeCountboxitem0 = 3
#act
MOV N$仙石 400
MOV N$几率 100
MOV N$真几率 1
MOV N$星数 4
MOV N$星攻 40


#if
CheckUpgradeCountboxitem0 = 4
#act
MOV N$仙石 500
MOV N$几率 80
MOV N$真几率 2
MOV N$星数 5
MOV N$星攻 50


#if
CheckUpgradeCountboxitem0 = 5
#act
MOV N$仙石 600
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 6
MOV N$星攻 60


#if
CheckUpgradeCountboxitem0 = 6
#act
MOV N$仙石 700
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 7
MOV N$星攻 77


#if
CheckUpgradeCountboxitem0 = 7
#act
MOV N$仙石 800
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 8
MOV N$星攻 99


#if
CheckUpgradeCountboxitem0 = 8
#act
MOV N$仙石 1000
MOV N$几率 50
MOV N$真几率 2
MOV N$星数 9
MOV N$星攻 199

#if
CheckUpgradeCountboxitem0 = 9
#act
messagebox 本件装备已经达到9星，无法继续注入星辰！！
returnboxitem 0
break



#or
not CheckBoxItemCount 1 1
not CheckBoxItemCount 2 1
#act
messagebox 请放入材料！
break

#if
checkgamegold < <$STR(N$仙石)>
#act
messagebox 你的仙石不足！
break

#if
LARGE N$仙石 0
LARGE N$真几率 0
CheckBoxItemCount 1 1
CheckBoxItemCount 2 1
#act
DelBoxItem 1 1
DelBoxItem 2 1


#if
random <$STR(N$真几率)>
CheckBoxItemCount 1 1
CheckBoxItemCount 2 1
LARGE N$仙石 0
LARGE N$真几率 0
#act
gamegold - <$STR(N$仙石)>
CHANGEITEMADDVALUE boxitem0 2 = <$STR(N$星攻)>
CHANGEITEMADDVALUE boxitem0 3 = <$STR(N$星攻)>
CHANGEITEMADDVALUE boxitem0 4 = <$STR(N$星攻)>
ChangeItemUpgradeCount boxitem0 = <$STR(N$星数)>
UpdateItemboxitem0
goto @ItemIntoBox0
sendmsg7 [成功]：您的装备注入了星辰之力。
break


#if
#act
CHANGEITEMADDVALUE boxitem0 2 = 0
CHANGEITEMADDVALUE boxitem0 3 = 0
CHANGEITEMADDVALUE boxitem0 4 = 0
ChangeItemUpgradeCount boxitem0 = 0
UpdateItemboxitem0
goto @ItemIntoBox0
sendmsg6 [很遗憾]：您的装备失去了星辰之力。
break















[@ZYXZ]
#IF
CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
#ACT
MESSAGEBOX 当前装备不允许转移！！！！
ReturnBoxItem 3
BREAK


#IF
CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
#ACT
MESSAGEBOX 当前装备不允许转移！！！！
ReturnBoxItem 4
BREAK



#OR
EQUAL <$BOXITEM.NAME>
EQUAL <$BOXITEM.NAME>
#act
MESSAGEBOX 先放装备，别瞎JB乱按！
break

#if
NOT CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
NOT CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
NOT EQUAL <$BOXITEM.NAME>
NOT EQUAL <$BOXITEM.NAME>
CheckBoxItemCount 3 1
CheckBoxItemCount 4 1
#act
SetUpgradeItem 3
CHANGEITEMADDVALUE boxitem3 2 = 0
CHANGEITEMADDVALUE boxitem3 3 = 0
CHANGEITEMADDVALUE boxitem3 4 = 0
ChangeItemUpgradeCount boxitem3 = 0
UpdateItemboxitem3
SetUpgradeItem 4
CHANGEITEMADDVALUE boxitem4 2 = <$STR(N$星攻)>
CHANGEITEMADDVALUE boxitem4 3 = <$STR(N$星攻)>
CHANGEITEMADDVALUE boxitem4 4 = <$STR(N$星攻)>
ChangeItemUpgradeCount boxitem4 = <$STR(N$星数)>
UpdateItemboxitem4
returnboxitem 3
returnboxitem 4
sendmsg 7[提示]：转移完成.
break








[@ItemIntoBox3]
#IF
CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
#ACT
MESSAGEBOX 当前装备不允许转移！！！！
ReturnBoxItem 3
BREAK


#act
SetUpgradeItem 3

#if
CheckUpgradeCount boxitem3 < 6
#act
ReturnBoxItem 3
messagebox 该装备未达到6星程度，无法转移！
break

#if
CheckUpgradeCountboxitem3 = 6
#act
MOV N$星数 6
MOV N$星攻 60
break

#if
CheckUpgradeCountboxitem3 = 7
#act
MOV N$星数 7
MOV N$星攻 77
break

#if
CheckUpgradeCountboxitem3 = 8
#act
MOV N$星数 8
MOV N$星攻 99
break

#if
CheckUpgradeCountboxitem3 = 9
#act
MOV N$星数 9
MOV N$星攻 199
break


[@ItemIntoBox4]
#IF
CHECKTEXTLIST ..\QuestDiary\不允许强化.txt <$BOXITEM.NAME>
#ACT
MESSAGEBOX 当前装备不允许转移！！！！
ReturnBoxItem 4
BREAK



[@ItemOutBox0]
#if
#act
MOV N$仙石 0
MOV N$几率 0
MOV N$真几率 0
MOV N$星数 0
MOV N$星攻 0
ReturnBoxItem 1
ReturnBoxItem 2
goto @main


[@ItemOutBox3]
#if
#act
MOV N$星数 0
MOV N$星攻 0
ReturnBoxItem 3
ReturnBoxItem 4
goto @main


[@ItemOutBox4]
#if
#act
MOV N$星数 0
MOV N$星攻 0
ReturnBoxItem 3
ReturnBoxItem 4
goto @main

异界神兵 发表于 2024-10-7 07:12:42

传奇论坛里面相对来说比较好的一个！

仙诡迷失 发表于 2024-10-7 07:19:20

这东西我收了！

硬汉归来 发表于 2024-10-7 09:36:19

传奇论坛里面相对来说比较好的一个！

烈火合击 发表于 2024-10-7 11:59:57

谢谢.脚本收到.很好用

幻想大陆 发表于 2024-10-7 16:57:09

谢谢楼主！

道盾合击 发表于 2024-10-7 17:06:13

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

逍遥微变 发表于 2024-10-7 18:06:06

这东西我收了！

专属合击 发表于 2024-10-7 20:09:07

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

金币传奇 发表于 2024-10-7 21:18:09

很专业的很全面的gm论坛

查看完整版本: 传奇特殊装备强化系统功能脚本(Gee引擎)