Gom引擎脚本-属性转移

[复制链接]
查看1479 | 回复0 | 2017-10-7 10:02:31 | 显示全部楼层 |阅读模式
[@main]
#if
#act
MOV <$STR(M70)> 0
MOV <$STR(M71)> 0
MOV <$STR(M72)> 0
MOV <$STR(M73)> 0
MOV <$STR(M74)> 0
MOV S40
MOV <$STR(M75)> 0
MOV <$STR(M76)> 0
MOV <$STR(M77)> 0
MOV <$STR(M78)> 0
MOV <$STR(M79)> 0
MOV S41
MOV S$转移元宝 1000
MOV S$极品防御  
MOV S$极品魔御  
MOV S$极品攻击  
MOV S$极品魔法  
MOV S$极品道术  


OPENMERCHANTBIGDLG 14 103 1 4 1 -100 1 493 27
goto @开始

[@开始]
#if
CheckStringlength <$STR(S40)> = 8
#act
SetStringBlank <$STR(S40)> 10 1

#if
CheckStringlength <$STR(S40)> = 6
#act
SetStringBlank <$STR(S40)> 12 1

#if
CheckStringlength <$STR(S40)> < 8
#act
SetStringBlank <$STR(S40)> 10 0


#if
large <$STR(M70)> 0
#act
MOV S$极品防御 <Img:366:14:23:-1>{<$STR(M70)>/SCOLOR=250}            <Img:380:14:22:-1>{<$STR(M75)>/SCOLOR=250}

#if
large <$STR(M71)> 0
#act
MOV S$极品魔御 <Img:367:14:23:-1>{<$STR(M71)>/SCOLOR=250}            <Img:381:14:22:-1>{<$STR(M76)>/SCOLOR=250}

#if
large <$STR(M72)> 0
#act
MOV S$极品攻击 <Img:368:14:23:-1>{<$STR(M72)>/SCOLOR=250}            <Img:382:14:22:-1>{<$STR(M77)>/SCOLOR=250}

#if
large <$STR(M73)> 0
#act
MOV S$极品魔法 <Img:369:14:23:-1>{<$STR(M73)>/SCOLOR=250}            <Img:383:14:22:-1>{<$STR(M78)>/SCOLOR=250}

#if
large <$STR(M74)> 0
#act
MOV S$极品道术 <Img:370:14:23:-1>{<$STR(M74)>/SCOLOR=250}            <Img:384:14:22:-1>{<$STR(M79)>/SCOLOR=250}


#if
#act
#say
<Img:104:14:-13:24>\
<ITEMBOX:1:14:94:85:20:42:42:10,11,15,24,26,22,23,62,64:70#请放入【极品装备】^151#暂时只支持一下装备极品转移^151#【衣服】【头盔】【手镯】^151#【戒指】【腰带】【靴子】>
<ITEMBOX:2:14:94:285:20:42:42:10,11,15,24,26,22,23,62,64:70#请放入【目标装备】^151#必须无任何属性^151#暂时只支持一下装备极品转移^151#【衣服】【头盔】【手镯】^151#【戒指】【腰带】【靴子】>\
  \   \ \   \ \   \       {<$STR(S40)> /SCOLOR=151}              {<$STR(S41)> /SCOLOR=151}\
<$STR(S$极品防御)> \
<$STR(S$极品魔御)> \
<$STR(S$极品攻击)> \
<$STR(S$极品魔法)> \
<$STR(S$极品道术)> \  \
     {<$STR(S$转移元宝)>元宝/SCOLOR=151}                <15%/SCOLOR=151>\<Img:371:14:407:-22|146#点击转移极品属性/@转移>  \
<Img:373:14:-4:-11>
  <Img:374:14:-6:-11|146#点击查看转移介绍/@转移介绍>
  <Img:376:14:-6:-11|146#点击查看转移规则/@转移规则>
  <Img:378:14:-6:-11|146#点击查看极品清洗/@清洗>
  <Img:140:14:-6:-11|146#关闭对话框/@exit> ?


[@ItemIntoBox1]
#IF
#ACT
SetUpgradeItem 1
GETITEMADDVALUE -1 0 <$STR(M70)>
GETITEMADDVALUE -1 1 <$STR(M71)>
GETITEMADDVALUE -1 2 <$STR(M72)>
GETITEMADDVALUE -1 3 <$STR(M73)>
GETITEMADDVALUE -1 4 <$STR(M74)>
GOTO @极品检测

[@极品检测]
#or
large <$STR(M70)> 1
large <$STR(M71)> 1
large <$STR(M72)> 1
large <$STR(M73)> 1
large <$STR(M74)> 1
#ACT
MOV S40 <$BOXITEM[1].NAME>
MOV S$转移元宝 2500
GOTO @开始
#elseact
GOTO @极品检测1
BREAK

[@极品检测1]
#or
large <$STR(M70)> 0
large <$STR(M71)> 0
large <$STR(M72)> 0
large <$STR(M73)> 0
large <$STR(M74)> 0
#ACT
MOV S40 <$BOXITEM[1].NAME>
MOV S$转移元宝 1000
GOTO @开始
#elseact
ReturnBoxItem 1
goto @ItemOutBox1
MESSAGEBOX \请放入【极品装备】\ \极品属性只统计【防御】【魔御】【攻击】【魔法】【道术】
BREAK



[@ItemIntoBox2]
#IF
#ACT
SetUpgradeItem 2
GETITEMADDVALUE -1 0 <$STR(M75)>
GETITEMADDVALUE -1 1 <$STR(M76)>
GETITEMADDVALUE -1 2 <$STR(M77)>
GETITEMADDVALUE -1 3 <$STR(M78)>
GETITEMADDVALUE -1 4 <$STR(M79)>
MOV S41 <$BOXITEM[2].NAME>
GOTO @普通检测

[@普通检测]
#if
small <$STR(M75)> 1
small <$STR(M76)> 1
small <$STR(M77)> 1
small <$STR(M78)> 1
small <$STR(M79)> 1
#ACT
GOTO @一号检测
#elseact
goto @ItemOutBox2
ReturnBoxItem 2
MESSAGEBOX \请放入【无属性装备】\ \属性只统计【防御】【魔御】【攻击】【魔法】【道术】
BREAK

[@一号检测]
#if
CheckBoxItemCount 1 1
#ACT
GOTO @开始
#elseact
ReturnBoxItem 2
goto @ItemOutBox2
MESSAGEBOX \请放放入【极品装备】再放入【无属性装备】\ \属性只统计【防御】【魔御】【攻击】【魔法】【道术】
BREAK





[@ItemOutBox1]
#if
#ACT
MOV <$STR(M70)> 0
MOV <$STR(M71)> 0
MOV <$STR(M72)> 0
MOV <$STR(M73)> 0
MOV <$STR(M74)> 0
MOV S40
MOV S$转移元宝 1000
MOV S$极品防御  
MOV S$极品魔御  
MOV S$极品攻击  
MOV S$极品魔法  
MOV S$极品道术  
UpDateBoxItem 1
goto @开始

[@ItemOutBox2]
#if
#ACT
MOV <$STR(M75)> 0
MOV <$STR(M76)> 0
MOV <$STR(M77)> 0
MOV <$STR(M78)> 0
MOV <$STR(M79)> 0
MOV S41
UpDateBoxItem 2
goto @开始




[@转移]
#if
NOT CHECKGAMEGOLD > <$STR(S$转移元宝)>
#ACT
MESSAGEBOX \【提示】:你当前不足<$STR(S$转移元宝)>元宝!无法转移!
BREAK

#IF
RANDOM 40
#ACT
SetUpgradeItem 1
mov M75 <$STR(M70)>
mov M76 <$STR(M71)>
mov M77 <$STR(M72)>
mov M78 <$STR(M73)>
mov M79 <$STR(M74)>
goto @转移1
#ELSEACT
GameGold - <$STR(S$转移元宝)>
MESSAGEBOX \【提示】:转移失败!扣除<$STR(S$转移元宝)>元宝
BREAK

[@转移1]
#IF
#ACT
SetUpgradeItem 2
CHANGEITEMADDVALUE -1 0 = <$STR(M75)>
CHANGEITEMADDVALUE -1 1 = <$STR(M76)>
CHANGEITEMADDVALUE -1 2 = <$STR(M77)>
CHANGEITEMADDVALUE -1 3 = <$STR(M78)>
CHANGEITEMADDVALUE -1 4 = <$STR(M79)>
UpDateBoxItem 2
SendCenterMsg 0 21 极品转移∶[<$USERNAME>]将[<$BOXITEM[1].NAME>]极品属性转移至[<$BOXITEM[2].NAME>]. 1 3
;===========================还原=====================
SetUpgradeItem 1
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
UpDateBoxItem 1
ReturnBoxItem 1
ReturnBoxItem 2
goto @main
BREAK







[@转移介绍]
#if
#act
#say
   \   \   \
<极品属性转移介绍:/AUTOCOLOR=250>\
<1、极品属性转移不限制装备等级!/AUTOCOLOR=154>\
<2、如:攻9圣战戒指可以转移到力量戒指,力量戒指转移圣战戒指./AUTOCOLOR=154>\
<3、极品属性只统计【防御】【魔御】【攻击】【魔法】【道术】/AUTOCOLOR=154>\
<4、极品属性转移成功几率只有15%,能不能成功就完成看你的造化了./AUTOCOLOR=154>\
<5、极品属性转移失败扣取元宝,极品装备属性不清零./AUTOCOLOR=154>\
<6、每次极品属性转移需要2500元宝费用./AUTOCOLOR=154>\
<-----------------------------------------------------------------------/AUTOCOLOR=90>\
<极品属性转移注意事项:/AUTOCOLOR=250>\
<注意1:目标装备必须为空白属性,如果是极品请先清洗极品属性后再转移./SCOLOR=239>\
<注意2:必须先放入【极品装备】再放入【无属性装备】/SCOLOR=239>\
<注意3:转移成功时原始极品装备属性消失,极品属性转移到目标装备./SCOLOR=239>\
<注意4:清洗极品属性需要5000元宝费用,100%成功./SCOLOR=239>\
<注意5:清洗极品属性不限制装备类型,任何装备均可清洗./SCOLOR=239>\   \
<Img:372:14:-4:-11|146#点击查看属性转移/@开始>
  <Img:375:14:-6:-11>
  <Img:376:14:-6:-11|146#点击查看转移规则/@转移规则>
  <Img:378:14:-6:-11|146#点击查看极品清洗/@清洗>
  <Img:140:14:-6:-11|146#关闭对话框/@exit> ?

[@转移规则]
#if
#act
#say
   \   \   \
<1、转移规则:【祖玛装备】转【赤月装备】转【天之赤月装备】转【黄金赤月装备】/AUTOCOLOR=239>\
<2、鼠标转移到【装备类型名字】上方可查看该【装备类型】所包含的【装备名字】/AUTOCOLOR=239>\
<-----------------------------------------------------------------------/AUTOCOLOR=90>\
<黑铁头盔> < → /AUTOCOLOR=70> 
<赤月头盔|254#圣战头盔^254#法神头盔^254#天尊头盔> < → /AUTOCOLOR=70> 
<天之赤月头盔
|254#天之圣战头盔
^254#天之法神头盔
^254#天之天尊头盔> < → /AUTOCOLOR=70> 
<黄金赤月头盔
|254#黄金圣战头盔
^254#黄金法神头盔
^254#黄金天尊头盔>\  \
<祖玛手镯
|254#骑士手镯
^254#龙之手镯
^254#三眼手镯> < → /AUTOCOLOR=70> 
<赤月手镯
|254#圣战手镯
^254#法神手镯
^254#天尊手镯> < → /AUTOCOLOR=70> 
<天之赤月手镯
|254#天之圣战手镯
^254#天之法神手镯
^254#天之天尊手镯> < → /AUTOCOLOR=70> 
<黄金赤月手镯
|254#黄金圣战手镯
^254#黄金法神手镯
^254#黄金天尊手镯/AUTOCOLOR=249>\  \
<祖玛戒指
|254#力量戒指
^254#紫碧螺
^254#泰坦戒指> < → /AUTOCOLOR=70> 
<赤月戒指
|254#圣战戒指
^254#法神戒指
^254#天尊戒指> < → /AUTOCOLOR=70> 
<天之赤月戒指
|254#天之圣战戒指
^254#天之法神戒指
^254#天之天尊戒指> < → /AUTOCOLOR=70> 
<黄金赤月戒指
|254#黄金圣战戒指
^254#黄金法神戒指
^254#黄金天尊戒指>\  \
<祖玛腰带
|254#战士腰带
^254#法师腰带
^254#道士腰带> < → /AUTOCOLOR=70> 
<赤月腰带
|254#圣战腰带
^254#法神腰带
^254#天尊腰带> < → /AUTOCOLOR=70> 
<天之赤月腰带
|254#天之圣战腰带
^254#天之法神腰带
^254#天之天尊腰带> < → /AUTOCOLOR=70> 
<黄金赤月腰带
|254#黄金圣战腰带
^254#黄金法神腰带
^254#黄金天尊腰带>\  \
<祖玛靴子
|254#战靴
^254#法靴
^254#道靴> < → /AUTOCOLOR=70> 
<赤月靴子
|254#圣战战靴
^254#法神法靴
^254#天尊道靴> < → /AUTOCOLOR=70> 
<天之赤月靴子
|254#天之圣战战靴
^254#天之法神法靴
^254#天之天尊道靴> < → /AUTOCOLOR=70> 
<黄金赤月靴子
|254#黄金圣战战靴
^254#黄金法神法靴
^254#黄金天尊道靴>\  \
<祖玛衣服
|254#战神盔甲(男)
^254#战神盔甲(女)
^254#恶魔长袍(男)
^254#恶魔长袍(女)
^254#幽灵战衣(男)
^254#幽灵战衣(女)> < → /AUTOCOLOR=70> 
<赤月衣服
|254#天魔神甲
^254#圣战宝甲
^254#法神披风
^254#霓裳羽衣
^254#天师长袍
^254#天尊道袍> < → /AUTOCOLOR=70> 
<天之赤月衣服
|254#神甲
^254#神袍> < → /AUTOCOLOR=70> 
<黄金赤月衣服
|254#黄金战衣
^254#黄金战甲
^254#黄金魔衣
^254#黄金魔袍
^254#黄金道袍
^254#黄金道衣>\  \
<Img:372:14:-4:-11|146#点击查看属性转移/@开始>
  <Img:374:14:-6:-11|146#点击查看转移介绍/@转移介绍>
  <Img:377:14:-6:-11>
  <Img:378:14:-6:-11|146#点击查看极品清洗/@清洗>
  <Img:140:14:-6:-11|146#关闭对话框/@exit> ?

[@清洗]
#if
#act
#say
   \   \   \
          <ITEMBOX:5:14:94:85:20:42:42:5,6,10,11,15,20,21,22,24,26,22,23,62,64:70#请放入【极品装备】^151#暂时只支持一下装备清洗极品^151#【武器】【衣服】【头盔】【手镯】^151#【项链】【戒指】【腰带】【靴子】>\  \   \   \   \
            <Img:389:14:22:-1>\   \
                  <5000元宝/AUTOCOLOR=151><Img:387:14:-110:-1>\   \
                  <100%/AUTOCOLOR=151><Img:388:14:-86:-1>\   \
<清洗【武器】【项链】极品属性时【幸运】【诅咒】【准确】等等属性将会被悉数清洗/AUTOCOLOR=254,251,168,191,250,70,245,249,253>   \
                  <Img:385:14:-2:0|146#点击清洗极品属性!/@清洗属性>\   \   \
<Img:372:14:-4:-11|146#点击查看属性转移/@开始>
  <Img:374:14:-6:-11|146#点击查看转移介绍/@转移介绍>
  <Img:376:14:-6:-11|146#点击查看转移规则/@转移规则>
  <Img:379:14:-6:-11>
  <Img:140:14:-6:-11|146#关闭对话框/@exit> ?

[@ItemIntoBox5]
#IF
#ACT
SetUpgradeItem 5
GETITEMADDVALUE -1 0 <$STR(M70)>
GETITEMADDVALUE -1 1 <$STR(M71)>
GETITEMADDVALUE -1 2 <$STR(M72)>
GETITEMADDVALUE -1 3 <$STR(M73)>
GETITEMADDVALUE -1 4 <$STR(M74)>
GOTO @清洗检测

[@清洗检测]
#or
large <$STR(M70)> 0
large <$STR(M71)> 0
large <$STR(M72)> 0
large <$STR(M73)> 0
large <$STR(M74)> 0
#ACT
goto @清洗
#ELSEACT
ReturnBoxItem 5
MESSAGEBOX \请放入【极品装备】
BREAK




[@清洗属性]
#if
NOT CHECKGAMEGOLD > 4999
#ACT
MESSAGEBOX 错误:清洗极品属性需要5000元宝
BREAK

#IF
CheckBoxItemCount 5 1
#ACT
goto @清洗属性1
#ELSEACT
MESSAGEBOX 错误:请放入极品装备!
BREAK


[@清洗属性1]
#if
#ACT
SetUpgradeItem 5
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
CHANGEITEMADDVALUE -1 5 = 0
CHANGEITEMADDVALUE -1 8 = 0
CHANGEITEMADDVALUE -1 9 = 0
CHANGEITEMADDVALUE -1 10 = 0
CHANGEITEMADDVALUE -1 11 = 0
CHANGEITEMADDVALUE -1 12 = 0
CHANGEITEMADDVALUE -1 13 = 0
UpDateBoxItem 5
goto @清洗
BREAK







;===========================================洗练未用===============================


[@洗练]
#IF
CHECKGAMEGOLD > 39999
#ACT
GAMEGOLD - 40000
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
UpDateBoxItem 3
GetRandomText ..\QuestDiary\游戏触发\洗练抽取\属性抽取.txt S86
GetRandomText ..\QuestDiary\游戏触发\洗练抽取\类别抽取.txt S85
CHANGEITEMADDVALUE -1 <$STR(S85)> = <$STR(N85)>
UpDateBoxItem 3
SendCenterMsg 151 253 [<$USERNAME>]将装备[<$BOXITEM[3].NAME>]的属性进行重组,得到更加强大的属性  1 4
SendCenterMsg 146 0 [<$USERNAME>]将装备[<$BOXITEM[3].NAME>]的属性进行重组,得到更加强大的属性  1 3
GOTO @ItemIntoBox3
BREAK
#ELSEACT
MESSAGEBOX 对不起,你没有4万元宝






回复

使用道具 举报

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

本版积分规则