请选择 进入手机版 | 继续访问电脑版

6n论坛

 找回密码
立即注册

QQ登录

只需一步,快速开始

查看: 774|回复: 0

GOM钻石卡牌系统脚本,GOM传奇一条龙开区时黄金卡牌奖励脚本

[复制链接]

 成长值: 1011659

644

主题

644

帖子

12万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
121809

推广达人宣传达人灌水之王突出贡献优秀版主论坛元老

QQ
发表于 2020-12-23 11:42:16 | 显示全部楼层 |阅读模式

                               
登录/注册后可看大图


[@钻石系统]
{
#act
CALCVAR HUMAN 塔层数 + 1
SAVEVAR HUMAN 塔层数 ..\QuestDiary\塔数据\当前层数.txt
goto @塔更新
goto @奖励_0a



[@奖励_0a]
#act
;goto @醉仙阁天数
MOV S$排行奖励一 真·轩辕宝箱3个
MOV S$排行奖励二 真·轩辕宝箱2个
MOV S$排行奖励三 真·轩辕宝箱1个
SendCenterMsg 245 0 醉仙阁任务完成,请选择您需要的奖励~!使用酒鬼币还可额外获得一个黄金卡牌奖励! 5 30 @不执行
Mov S$卡牌备注 255#卡牌按编号数(1-4)号为通关奖励卡牌(免费选择一个)!
Inc S$卡牌备注 ^151#卡牌按编号数(5-8)号为通关黄金卡牌(100酒鬼币可打开一个)!
Inc S$卡牌备注 ^151#卡牌按编号数(9-12)号为通关钻石卡牌(1000酒鬼币可打开一个)!

MOV S$奖励卡牌 255#卡牌类型:奖励卡牌
INC S$奖励卡牌 ^255#[点击获得卡牌背后的奖励]
MOV S$黄金卡牌 151#卡牌类型:奖励黄金
INC S$黄金卡牌 ^151#奖励极品几率是奖励卡牌的两倍!
INC S$黄金卡牌 ^151#点击获取卡牌背后的奖励,收费100酒鬼币!
MOV S$钻石卡牌 151#卡牌类型:奖励黄金
INC S$钻石卡牌 ^151#奖励极品几率是黄金卡牌的十倍!
INC S$钻石卡牌 ^151#点击获取钻石卡牌背后的奖励,收费1000酒鬼币!



Mov S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
Mov S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示

Mov S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示



Mov S$奖励卡牌显示文字一
Mov S$奖励卡牌显示文字二
Mov S$奖励卡牌显示文字三
Mov S$奖励卡牌显示文字四
Mov S$黄金卡牌显示文字一
Mov S$黄金卡牌显示文字二
Mov S$黄金卡牌显示文字三
Mov S$黄金卡牌显示文字四

Mov S$钻石卡牌显示文字一
Mov S$钻石卡牌显示文字二
Mov S$钻石卡牌显示文字三
Mov S$钻石卡牌显示文字四


goto @奖励_aa

[@奖励_aa]
#act
OPENMERCHANTBIGDLG 17 467 1 4 0 -100 0
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1
SetStringBlank  12 1




#say
\ \ \ \ \ \
\                                
\                                
\
\
\\ \
\                               {                              /FCOLOR=222}
\ \ \ \ \ \ \
\                               {                              /FCOLOR=151}
\ \ \ \ \ \ \
\                               {                              /FCOLOR=151}


[@卡牌奖励_0a]
#act
MOV S$奖励卡牌 249#很遗憾您没有选择此卡牌
Mov S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
give  1
Mov S$奖励卡牌显示文字一
Mov S$奖励卡牌显示文字二
Mov S$奖励卡牌显示文字三
Mov S$奖励卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层获得奖励:{|245:0:1}
goto @奖励_aa

[@卡牌奖励_0b]
#act
MOV S$奖励卡牌 249#很遗憾您没有选择此卡牌
Mov S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
give  1
Mov S$奖励卡牌显示文字一
Mov S$奖励卡牌显示文字二
Mov S$奖励卡牌显示文字三
Mov S$奖励卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层获得奖励:{|245:0:1}
goto @奖励_aa

[@卡牌奖励_0c]
#act
MOV S$奖励卡牌 249#很遗憾您没有选择此卡牌
Mov S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
give  1
Mov S$奖励卡牌显示文字一
Mov S$奖励卡牌显示文字二
Mov S$奖励卡牌显示文字三
Mov S$奖励卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层获得奖励:{|245:0:1}
goto @奖励_aa

[@卡牌奖励_0d]
#act
MOV S$奖励卡牌 249#很遗憾您没有选择此卡牌
Mov S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示
Inc S$奖励卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励给.txt
give  1
Mov S$奖励卡牌显示文字一
Mov S$奖励卡牌显示文字二
Mov S$奖励卡牌显示文字三
Mov S$奖励卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层获得奖励:{|245:0:1}
goto @奖励_aa



[@黄金奖励_0d]
#if
CHECKCREDITPOINT < 100
#act
messagebox 您的酒鬼币不足100..请充值!
break
#if
CHECKLEVELEX > 0
#act
MOV S$黄金卡牌 151#很遗憾您没有选择此卡牌
Mov S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示

#if
CHECKLEVELEX > 0
#act
CREDITPOINT - 100
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金给.txt
give  1
Mov S$黄金卡牌显示文字一
Mov S$黄金卡牌显示文字二
Mov S$黄金卡牌显示文字三
Mov S$黄金卡牌显示文字四
GetListString ..\QuestDiary\塔数据\黄金牌子\.txt 0 N1
inc N1 1
AddTextListEx ..\QuestDiary\塔数据\黄金牌子\.txt  0
SENDMSG 1 {|255:0:1}在战神塔第层开启{黄金卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa


[@黄金奖励_0c]
#if
CHECKCREDITPOINT < 100
#act
messagebox 您的酒鬼币不足100..请充值!
break
#if
CHECKLEVELEX > 0
#act
MOV S$黄金卡牌 151#很遗憾您没有选择此卡牌
Mov S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示


#if
CHECKLEVELEX > 0
#act
CREDITPOINT - 100
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
give  1
Mov S$黄金卡牌显示文字一
Mov S$黄金卡牌显示文字二
Mov S$黄金卡牌显示文字三
Mov S$黄金卡牌显示文字四
GetListString ..\QuestDiary\塔数据\黄金牌子\.txt 0 N1
inc N1 1
AddTextListEx ..\QuestDiary\塔数据\黄金牌子\.txt  0
SENDMSG 1 {|255:0:1}在战神塔第层开启{黄金卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa




[@黄金奖励_0b]
#if
CHECKCREDITPOINT < 100
#act
messagebox 您的酒鬼币不足100..请充值!
break
#if
CHECKLEVELEX > 0
#act
MOV S$黄金卡牌 151#很遗憾您没有选择此卡牌
Mov S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示


#if
CHECKLEVELEX > 0
#act
CREDITPOINT - 100
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
give  1
Mov S$黄金卡牌显示文字一
Mov S$黄金卡牌显示文字二
Mov S$黄金卡牌显示文字三
Mov S$黄金卡牌显示文字四
GetListString ..\QuestDiary\塔数据\黄金牌子\.txt 0 N1
inc N1 1
AddTextListEx ..\QuestDiary\塔数据\黄金牌子\.txt  0
SENDMSG 1 {|255:0:1}在战神塔第层开启{黄金卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa
goto @p_aiming
goto @p_qingli


[@黄金奖励_0a]
#if
CHECKCREDITPOINT < 100
#act
messagebox 您的酒鬼币不足100..请充值!
break
#if
CHECKLEVELEX > 0
#act
MOV S$黄金卡牌 151#很遗憾您没有选择此卡牌
Mov S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示
Inc S$黄金卡牌显示


#if
CHECKLEVELEX > 0
#act
CREDITPOINT - 100
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励黄金显示.txt
give  1
Mov S$黄金卡牌显示文字一
Mov S$黄金卡牌显示文字二
Mov S$黄金卡牌显示文字三
Mov S$黄金卡牌显示文字四
GetListString ..\QuestDiary\塔数据\黄金牌子\.txt 0 N1
inc N1 1
AddTextListEx ..\QuestDiary\塔数据\黄金牌子\.txt  0
SENDMSG 1 {|255:0:1}在战神塔第层开启{黄金卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa










[@钻石奖励_04]
#if
CHECKCREDITPOINT > 1000
#act
CREDITPOINT - 1000
#ELSEACT
messagebox 你酒鬼币不足!
BREAK

#if
CHECKLEVELEX > 0
#act
MOV S$钻石卡牌 151#很遗憾您没有选择此卡牌
Mov S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示

#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石给.txt
give  1
Mov S$钻石卡牌显示文字一
Mov S$钻石卡牌显示文字二
Mov S$钻石卡牌显示文字三
Mov S$钻石卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层开启{钻石卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa


[@钻石奖励_03]
#if
CHECKCREDITPOINT > 1000
#act
CREDITPOINT - 1000
#ELSEACT
messagebox 你酒鬼币不足!
BREAK

#if
CHECKLEVELEX > 0
#act
MOV S$钻石卡牌 151#很遗憾您没有选择此卡牌
Mov S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
give  1
Mov S$钻石卡牌显示文字一
Mov S$钻石卡牌显示文字二
Mov S$钻石卡牌显示文字三
Mov S$钻石卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层开启{钻石卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa




[@钻石奖励_02]
#if
CHECKCREDITPOINT > 1000
#act
CREDITPOINT - 1000
#ELSEACT
messagebox 你酒鬼币不足!
BREAK

#if
CHECKLEVELEX > 0
#act
MOV S$钻石卡牌 151#很遗憾您没有选择此卡牌
Mov S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
give  1
Mov S$钻石卡牌显示文字一
Mov S$钻石卡牌显示文字二
Mov S$钻石卡牌显示文字三
Mov S$钻石卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层开启{钻石卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa



[@钻石奖励_01]
#if
CHECKCREDITPOINT > 1000
#act
CREDITPOINT - 1000
#ELSEACT
messagebox 你酒鬼币不足!
BREAK

#if
CHECKLEVELEX > 0
#act
MOV S$钻石卡牌 151#很遗憾您没有选择此卡牌
Mov S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示
Inc S$钻石卡牌显示


#if
CHECKLEVELEX > 0
#act
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石给.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
GETRANDOMLINETEXT ..\QuestDiary\卡牌系统\卡牌奖励钻石显示.txt
give  1
Mov S$钻石卡牌显示文字一
Mov S$钻石卡牌显示文字二
Mov S$钻石卡牌显示文字三
Mov S$钻石卡牌显示文字四
SENDMSG 1 {|255:0:1}在战神塔第层开启{钻石卡牌|151:0:1}获得奖励:{|245:0:1}
goto @奖励_aa
}


来源:网络
免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|小黑屋|sixn

GMT+8, 2024-2-26 06:48 , Processed in 0.130056 second(s), 28 queries .

Powered by 6N论坛 X3.4

© 免责声明:本站所有资源均来至网络,仅供学习交流,严禁用于商业用途,请于24小时内删除!

快速回复 返回顶部 返回列表