;安装脚本后,打开《收费物品.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 @卡牌界面