admin 发表于 2017-7-31 08:09:30

黄金翻牌(可用于副本、抽奖、活动)!

;安装脚本后,打开《免费物品.txt》添加物品;安装脚本后,打开《收费物品.txt》添加物品
#if
#act
MOV S$免费卡牌1 <PlayImg:101:10:1:150:0:4:1:0/@免费卡牌1>
MOV S$免费卡牌2 <PlayImg:101:10:1:150:0:4:1:0/@免费卡牌2>
MOV S$免费卡牌3 <PlayImg:101:10:1:150:0:4:1:0/@免费卡牌3>
MOV S$收费卡牌1 <PlayImg:101:18:1:150:0:1:1:0/@收费卡牌1>
MOV S$收费卡牌2 <PlayImg:101:18:1:150:0:1:1:0/@收费卡牌2>
MOV S$收费卡牌3 <PlayImg:101:18:1:150:0:1:1:0/@收费卡牌3>
MOV S$免费获得1     
MOV S$免费获得2     
MOV S$免费获得3     
MOV S$免费编号1 <ItemShow:0:0:10000:0:1>
MOV S$免费编号2 <ItemShow:0:0:10000:0:1>
MOV S$免费编号3 <ItemShow:0:0:10000:0:1>
MOV S$收费编号1 <ItemShow:0:0:10000:0:1>
MOV S$收费编号2 <ItemShow:0:0:10000:0:1>
MOV S$收费编号3 <ItemShow:0:0:10000:0:1>
MOV S$收费获得1 <需要200元宝/scolor=251>
MOV S$收费获得2 <需要200元宝/scolor=251>
MOV S$收费获得3 <需要200元宝/scolor=251>
goto @卡牌界面


[@卡牌界面]
#if
#act
SetStringBlank S$收费获得1 38 1
SetStringBlank S$收费获得2 39 1
SetStringBlank S$免费获得1 26 1
SetStringBlank S$免费获得2 25 1
OPENMERCHANTBIGDLG 101 26 0 4 0 -85 1 502 42
#say
\ <IMG:27:101:8:40>
\ \ 
\                  <幸运降临>
\     <恭喜你,你被【天魔神将】幸运附体,点击/scolor=116><蓝色/scolor=254><卡牌,可抽取奖励一次/scolor=116>
\   <幸运说明/scolor=253>:<蓝色/scolor=254><卡牌只能开启一次,可以随机获得游戏内任意物品/scolor=250>
\   <幸运说明/scolor=253>:<开启/scolor=250><黄金/scolor=251><卡牌需要200元宝一次,可随机获得本服高级物品一件/scolor=250>
\   <幸运说明/scolor=253>:<【幸运附体】会在任意天魔宝藏中出现,请抓住时机哦/scolor=249>
\ 
\<$str(S$免费卡牌1)> <$str(S$免费卡牌2)> <$str(S$免费卡牌3)>
\ <$str(S$免费编号1)>          <$str(S$免费编号2)>           <$str(S$免费编号3)>
\ \ 
\    <$str(S$免费获得1)> <$str(S$免费获得2)> <$str(S$免费获得3)>
\ \ 
\<$str(S$收费卡牌1)> <$str(S$收费卡牌2)> <$str(S$收费卡牌3)>
\ <$str(S$收费编号1)>          <$str(S$收费编号2)>           <$str(S$收费编号3)>
\ \ 
\    <$str(S$收费获得1)> <$str(S$收费获得2)> <$str(S$收费获得3)>





[@免费卡牌1]
#if
#act
MOV S$免费卡牌1 <PlayImg:101:10:7:150:0:4:1:0>
MOV S$免费卡牌2 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌3 <PlayImg:101:10:1:150:0:4:1:0>
goto @卡牌界面
DELAYGOTO 3000 @免费奖励1

[@免费奖励1]
#if
#act
MOVR n$行数 32
GetListString ..\QuestDiary\功能脚本\黄金卡牌\免费物品.txt <$str(N$行数)> S$免费名称 N$物品IDX
MOV S$免费卡牌1 <PlayImg:101:17:1:150:0:4:1:0>
MOV S$免费编号1 <ItemShow:<$str(N$物品IDX)>:0:41:0:1>
MOV S$免费编号2 <ItemShow:0:0:10000:0:1>
MOV S$免费编号3 <ItemShow:0:0:10000:0:1>
MOV S$免费获得1 <$str(S$免费名称)>
MOV S$免费获得2
MOV S$免费获得3
GIVE <$str(S$免费名称)> 1
goto @卡牌界面

[@免费卡牌2]
#if
#act
MOV S$免费卡牌1 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌2 <PlayImg:101:10:7:150:0:4:1:0>
MOV S$免费卡牌3 <PlayImg:101:10:1:150:0:4:1:0>
goto @卡牌界面
DELAYGOTO 3000 @免费奖励2

[@免费奖励2]
#if
#act
MOVR n$行数 32
GetListString ..\QuestDiary\功能脚本\黄金卡牌\免费物品.txt <$str(N$行数)> S$免费名称 N$物品IDX
MOV S$免费卡牌1 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌2 <PlayImg:101:17:1:150:0:4:1:0>
MOV S$免费卡牌3 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费编号1 <ItemShow:0:0:10000:0:1>
MOV S$免费编号2 <ItemShow:<$str(N$物品IDX)>:0:41:0:1>
MOV S$免费编号3 <ItemShow:0:0:10000:0:1>
MOV S$免费获得1
MOV S$免费获得2 <$str(S$免费名称)>
MOV S$免费获得3
GIVE <$str(S$免费名称)> 1
goto @卡牌界面

[@免费卡牌3]
#if
#act
MOV S$免费卡牌1 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌2 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌3 <PlayImg:101:10:7:150:0:4:1:0>
goto @卡牌界面
DELAYGOTO 3000 @免费奖励3

[@免费奖励3]
#if
#act
MOVR n$行数 32
GetListString ..\QuestDiary\功能脚本\黄金卡牌\免费物品.txt <$str(N$行数)> S$免费名称 N$物品IDX
MOV S$免费卡牌1 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌2 <PlayImg:101:10:1:150:0:4:1:0>
MOV S$免费卡牌3 <PlayImg:101:17:1:150:0:4:1:0>
MOV S$免费编号1 <ItemShow:0:0:10000:0:1>
MOV S$免费编号2 <ItemShow:0:0:10000:0:1>
MOV S$免费编号3 <ItemShow:<$str(N$物品IDX)>:0:41:0:1>
MOV S$免费获得1
MOV S$免费获得2
MOV S$免费获得3 <$str(S$免费名称)>
GIVE <$str(S$免费名称)> 1
goto @卡牌界面

[@收费卡牌1]
#if
checkgamegold < 200
#act
MessageBox [操作失败]:您元宝少于200,无法翻取卡牌
break

#if
#act
MOV S$收费卡牌1 <PlayImg:101:18:7:150:0:1:1:0>
MOV S$收费获得1 {     /scolor=251}
goto @卡牌界面
DELAYGOTO 3000 @收费奖励1

[@收费奖励1]
#if
#act
gamegold - 200
MOVR n$行数 32
GetListString ..\QuestDiary\功能脚本\黄金卡牌\收费物品.txt <$str(N$行数)> S$收费名称 N$物品IDX
MOV S$收费卡牌1 <PlayImg:101:25:1:150:0:1:1:0>
MOV S$收费编号1 <ItemShow:<$str(N$物品IDX)>:0:41:0:1>
MOV S$收费获得1 {<$str(S$收费名称)>/scolor=251}
GIVE <$str(S$收费名称)> 1
goto @卡牌界面


[@收费卡牌2]
#if
checkgamegold < 200
#act
MessageBox [操作失败]:您元宝少于200,无法翻取卡牌
break

#if
#act
MOV S$收费卡牌2 <PlayImg:101:18:7:150:0:1:1:0>
MOV S$收费获得2 {     /scolor=251}
goto @卡牌界面
DELAYGOTO 3000 @收费奖励2

[@收费奖励2]
#if
#act
gamegold - 200
MOVR n$行数 32
GetListString ..\QuestDiary\功能脚本\黄金卡牌\收费物品.txt <$str(N$行数)> S$收费名称 N$物品IDX
MOV S$收费卡牌2 <PlayImg:101:25:1:150:0:1:1:0>
MOV S$收费编号2 <ItemShow:<$str(N$物品IDX)>:0:41:0:1>
MOV S$收费获得2 {<$str(S$收费名称)>/scolor=251}
GIVE <$str(S$收费名称)> 1
goto @卡牌界面


[@收费卡牌3]
#if
checkgamegold < 200
#act
MessageBox [操作失败]:您元宝少于200,无法翻取卡牌
break

#if
#act
MOV S$收费卡牌3 <PlayImg:101:18:7:150:0:1:1:0>
MOV S$收费获得3 {     /scolor=251}
goto @卡牌界面
DELAYGOTO 3000 @收费奖励3
[@收费奖励3]
#if
#act
gamegold - 200
MOVR n$行数 32
GetListString ..\QuestDiary\功能脚本\黄金卡牌\收费物品.txt <$str(N$行数)> S$收费名称 N$物品IDX
MOV S$收费卡牌3 <PlayImg:101:25:1:150:0:1:1:0>
MOV S$收费编号3 <ItemShow:<$str(N$物品IDX)>:0:41:0:1>
MOV S$收费获得3 {<$str(S$收费名称)>/scolor=251}
GIVE <$str(S$收费名称)> 1
goto @卡牌界面


goodsnowv 发表于 2017-7-31 13:37:38

正需要,支持楼主大人了!

haozhizhu 发表于 2017-8-2 08:31:08

666666666666666666666

许先生 发表于 2017-8-2 20:00:25

666666666666666666666666

wangzuoyi 发表于 2017-8-14 12:29:28

正需要,支持楼主大人了!

炽火凌之寒 发表于 2018-7-28 19:17:43

珍惜生命,果断回帖。
页: [1]
查看完整版本: 黄金翻牌(可用于副本、抽奖、活动)!