传奇之家 - 传奇开区一条龙服务网站

当前位置:传奇之家 > 开区脚本 > > 详细页面

传奇装备注灵脚本命令注灵可以获得隐藏属性百

传奇装备注灵脚本命令注灵可以获得隐藏属性百

传奇装备注灵脚本命令注灵可以获得隐藏属性百

作者:传奇之家类别:开区脚本

更新:2022-05-07查看次数:143

   [@MAIN]

   #IF

   #ACT

   MOV S$当前注灵装备名称 无

   MOV S$当前注灵装备价格 无

   #IF

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   #ACT

   MOV S$当前注灵装备名称 <$BOXITEM[0].NAME>

   MOV S$当前注灵装备价格 50000灵石

  
;脚本来自冰点传说单职业传奇版本

   #IF

   #SAY

   {特殊装备 注灵可以获得隐藏属性百分比加成!/SCOLOR=253}\

   {放入 特殊装备 会提示相关信息/SCOLOR=254}\

   <ITEMBOX:0:boxitem0:250:100:60:40:40:*:254#1.放入[特殊装备]>\

   <ITEMBOX:1:boxitem0:250:200:60:40:40:*:254#2.放入[注灵神石*1个]>\

   <PlayImgEx:114:1046:30:100:0:62:-36:1>\

   <PlayImgEx:114:1046:30:100:0:162:-52:1>\

   <Text:当前注灵物品:<$STR(S$当前注灵装备名称)>:10:10{FCOLOR=250}>\

   <Text:当前注灵价格:<$STR(S$当前注灵装备价格)>:10:10{FCOLOR=250}>\ \

   {[/SCOLOR=250}<开始注灵/@开始特殊注灵>{]/SCOLOR=250} {提示:注灵过程中 请勿重复点击 或 进行其他操作/SCOLOR=249}\

   [@ItemOutBox0]

   #IF

   #ACT

   GOTO @MAIN

   BREAK

   [@ItemIntoBox0]

   #IF

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   #ACT

   GOTO @MAIN

   #ELSEACT

   ReturnBoxItem 0

   MESSAGEBOX {操作失败:/SCOLOR=249}这件装备无法注灵...

   BREAK

   [@开始特殊注灵]

   #IF

   NOT CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   Equal <$BOXITEM[0].NAME>

   #ACT

   MESSAGEBOX 操作失败:你放入的物品无法注灵.

   BREAK

   #IF

   NOT Equal <$BOXITEM[1].NAME> 注灵神石

   #ACT

   MESSAGEBOX 操作失败:请放入[注灵神石*1个]

   BREAK

   #IF

   RANDOM 20

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   Equal <$BOXITEM[1].NAME> 注灵神石

   CHECKGAMEGOLD > 49999

   #ACT

   SetUpgradeItem 0

   SetUpgradeItem 1

   SCREENEFFECT 0 25 219 1740 11 1 100 0 0 1

   DelBoxItem 1 1

   GAMEGOLD - 50000

   MOVR N$特殊注灵防御 30 101

   MOVR N$特殊注灵魔御 30 101

   MOVR N$特殊注灵攻击 30 101

   MOVR N$特殊注灵生命 30 101

   SetCustomItemText boxitem0 <Img:441:7:0:0>

   SetCustomItemTextColor boxitem0 146

   SetCustomItemAbil boxitem0 0 0 146

   SetCustomItemAbil boxitem0 1 0 146

   SetCustomItemAbil boxitem0 2 0 146

   SetCustomItemAbil boxitem0 3 0 146

   SetCustomItemAbil boxitem0 0 1 1

   SetCustomItemAbil boxitem0 1 1 2

   SetCustomItemAbil boxitem0 2 1 3

   SetCustomItemAbil boxitem0 3 1 6

   SetCustomItemAbil boxitem0 0 2 0

   SetCustomItemAbil boxitem0 1 2 1

   SetCustomItemAbil boxitem0 2 2 2

   SetCustomItemAbil boxitem0 3 2 3

   SetCustomItemAbil boxitem0 0 3 1

   SetCustomItemAbil boxitem0 1 3 1

   SetCustomItemAbil boxitem0 2 3 1

   SetCustomItemAbil boxitem0 3 3 1

   SetCustomItemValue boxitem0 0 = <$STR(N$特殊注灵防御)>

   SetCustomItemValue boxitem0 1 = <$STR(N$特殊注灵魔御)>

   SetCustomItemValue boxitem0 2 = <$STR(N$特殊注灵攻击)>

   SetCustomItemValue boxitem0 3 = <$STR(N$特殊注灵生命)>

   UpdateItem boxitem0

   BREAK

   #IF

   RANDOM 15

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   Equal <$BOXITEM[1].NAME> 注灵神石

   CHECKGAMEGOLD > 49999

   #ACT

   SetUpgradeItem 0

   SetUpgradeItem 1

   SCREENEFFECT 0 25 219 1740 11 1 100 0 0 1

   DelBoxItem 1 1

   GAMEGOLD - 50000

   MOVR N$特殊注灵防御 30 81

   MOVR N$特殊注灵魔御 30 81

   MOVR N$特殊注灵攻击 30 81

   MOVR N$特殊注灵生命 30 81

   SetCustomItemText boxitem0 <Img:441:7:0:0>

   SetCustomItemTextColor boxitem0 146

   SetCustomItemAbil boxitem0 0 0 146

   SetCustomItemAbil boxitem0 1 0 146

   SetCustomItemAbil boxitem0 2 0 146

   SetCustomItemAbil boxitem0 3 0 146

   SetCustomItemAbil boxitem0 0 1 1

   SetCustomItemAbil boxitem0 1 1 2

   SetCustomItemAbil boxitem0 2 1 3

   SetCustomItemAbil boxitem0 3 1 6

   SetCustomItemAbil boxitem0 0 2 0

   SetCustomItemAbil boxitem0 1 2 1

   SetCustomItemAbil boxitem0 2 2 2

   SetCustomItemAbil boxitem0 3 2 3

   SetCustomItemAbil boxitem0 0 3 1

   SetCustomItemAbil boxitem0 1 3 1

   SetCustomItemAbil boxitem0 2 3 1

   SetCustomItemAbil boxitem0 3 3 1

   SetCustomItemValue boxitem0 0 = <$STR(N$特殊注灵防御)>

   SetCustomItemValue boxitem0 1 = <$STR(N$特殊注灵魔御)>

   SetCustomItemValue boxitem0 2 = <$STR(N$特殊注灵攻击)>

   SetCustomItemValue boxitem0 3 = <$STR(N$特殊注灵生命)>

   UpdateItem boxitem0

   BREAK

   #IF

   RANDOM 10

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   Equal <$BOXITEM[1].NAME> 注灵神石

   CHECKGAMEGOLD > 49999

   #ACT

   SetUpgradeItem 0

   SetUpgradeItem 1

   SCREENEFFECT 0 25 219 1740 11 1 100 0 0 1

   DelBoxItem 1 1

   GAMEGOLD - 50000

   MOVR N$特殊注灵防御 20 61

   MOVR N$特殊注灵魔御 20 61

   MOVR N$特殊注灵攻击 20 61

   MOVR N$特殊注灵生命 20 61

   SetCustomItemText boxitem0 <Img:441:7:0:0>

   SetCustomItemTextColor boxitem0 146

   SetCustomItemAbil boxitem0 0 0 146

   SetCustomItemAbil boxitem0 1 0 146

   SetCustomItemAbil boxitem0 2 0 146

   SetCustomItemAbil boxitem0 3 0 146

   SetCustomItemAbil boxitem0 0 1 1

   SetCustomItemAbil boxitem0 1 1 2

   SetCustomItemAbil boxitem0 2 1 3

   SetCustomItemAbil boxitem0 3 1 6

   SetCustomItemAbil boxitem0 0 2 0

   SetCustomItemAbil boxitem0 1 2 1

   SetCustomItemAbil boxitem0 2 2 2

   SetCustomItemAbil boxitem0 3 2 3

   SetCustomItemAbil boxitem0 0 3 1

   SetCustomItemAbil boxitem0 1 3 1

   SetCustomItemAbil boxitem0 2 3 1

   SetCustomItemAbil boxitem0 3 3 1

   SetCustomItemValue boxitem0 0 = <$STR(N$特殊注灵防御)>

   SetCustomItemValue boxitem0 1 = <$STR(N$特殊注灵魔御)>

   SetCustomItemValue boxitem0 2 = <$STR(N$特殊注灵攻击)>

   SetCustomItemValue boxitem0 3 = <$STR(N$特殊注灵生命)>

   UpdateItem boxitem0

   BREAK

   #IF

   RANDOM 5

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   Equal <$BOXITEM[1].NAME> 注灵神石

   CHECKGAMEGOLD > 49999

   #ACT

   SetUpgradeItem 0

   SetUpgradeItem 1

   SCREENEFFECT 0 25 219 1740 11 1 100 0 0 1

   DelBoxItem 1 1

   GAMEGOLD - 50000

   MOVR N$特殊注灵防御 10 41

   MOVR N$特殊注灵魔御 10 41

   MOVR N$特殊注灵攻击 10 41

   MOVR N$特殊注灵生命 10 41

   SetCustomItemText boxitem0 <Img:441:7:0:0>

   SetCustomItemTextColor boxitem0 146

   SetCustomItemAbil boxitem0 0 0 146

   SetCustomItemAbil boxitem0 1 0 146

   SetCustomItemAbil boxitem0 2 0 146

   SetCustomItemAbil boxitem0 3 0 146

   SetCustomItemAbil boxitem0 0 1 1

   SetCustomItemAbil boxitem0 1 1 2

   SetCustomItemAbil boxitem0 2 1 3

   SetCustomItemAbil boxitem0 3 1 6

   SetCustomItemAbil boxitem0 0 2 0

   SetCustomItemAbil boxitem0 1 2 1

   SetCustomItemAbil boxitem0 2 2 2

   SetCustomItemAbil boxitem0 3 2 3

   SetCustomItemAbil boxitem0 0 3 1

   SetCustomItemAbil boxitem0 1 3 1

   SetCustomItemAbil boxitem0 2 3 1

   SetCustomItemAbil boxitem0 3 3 1

   SetCustomItemValue boxitem0 0 = <$STR(N$特殊注灵防御)>

   SetCustomItemValue boxitem0 1 = <$STR(N$特殊注灵魔御)>

   SetCustomItemValue boxitem0 2 = <$STR(N$特殊注灵攻击)>

   SetCustomItemValue boxitem0 3 = <$STR(N$特殊注灵生命)>

   UpdateItem boxitem0

   BREAK

   #IF

   CHECKTEXTLIST ..\QuestDiary\小心同学\新鉴定\特殊装备注灵列表.txt <$BOXITEM[0].NAME>

   Equal <$BOXITEM[1].NAME> 注灵神石

   CHECKGAMEGOLD > 49999

   #ACT

   SetUpgradeItem 0

   SetUpgradeItem 1

   SCREENEFFECT 0 25 219 1740 11 1 100 0 0 1

   DelBoxItem 1 1

   GAMEGOLD - 50000

   MOVR N$特殊注灵防御 1 21

   MOVR N$特殊注灵魔御 1 21

   MOVR N$特殊注灵攻击 1 21

   MOVR N$特殊注灵生命 1 21

   SetCustomItemText boxitem0 <Img:441:7:0:0>

   SetCustomItemTextColor boxitem0 146

   SetCustomItemAbil boxitem0 0 0 146

   SetCustomItemAbil boxitem0 1 0 146

   SetCustomItemAbil boxitem0 2 0 146

   SetCustomItemAbil boxitem0 3 0 146

   SetCustomItemAbil boxitem0 0 1 1

   SetCustomItemAbil boxitem0 1 1 2

   SetCustomItemAbil boxitem0 2 1 3

   SetCustomItemAbil boxitem0 3 1 6

   SetCustomItemAbil boxitem0 0 2 0

   SetCustomItemAbil boxitem0 1 2 1

   SetCustomItemAbil boxitem0 2 2 2

   SetCustomItemAbil boxitem0 3 2 3

   SetCustomItemAbil boxitem0 0 3 1

   SetCustomItemAbil boxitem0 1 3 1

   SetCustomItemAbil boxitem0 2 3 1

   SetCustomItemAbil boxitem0 3 3 1

   SetCustomItemValue boxitem0 0 = <$STR(N$特殊注灵防御)>

   SetCustomItemValue boxitem0 1 = <$STR(N$特殊注灵魔御)>

   SetCustomItemValue boxitem0 2 = <$STR(N$特殊注灵攻击)>

   SetCustomItemValue boxitem0 3 = <$STR(N$特殊注灵生命)>

   UpdateItem boxitem0

   BREAK

   #ELSEACT

   ReturnBoxItem 0

   ReturnBoxItem 1

   MESSAGEBOX {操作失败:/SCOLOR=249}条件不足...

   BREAK