|
|
1.80蓝色风暴战神复古版
版本提供：红鹰gm论坛
官方网站：https://www.hongyingbbs.com
工具网站：http://vip.hongyingbbs.com
备用域名：http://bbs.whsfzx.com
=======================================================
以下为版本介绍
=======================================================(@@InPutString )
[@Startup]
;-------------------------------------------------------------------------------------
;此脚本段，服务器启动时执行一次
;-------------------------------------------------------------------------------------
#IF
CHECKLEVELEX > 0
#ACT
VAR Integer GLOBAL $Mrrp_元宝大帝
VAR Integer GLOBAL $Mrrp_开天教主
VAR Integer GLOBAL $Mrrp_镇天教主
VAR Integer GLOBAL $Mrrp_玄天教主
VAR Integer GLOBAL $Mrrp_宝石教主
VAR Integer GLOBAL $Mrrp_鲜花教主
#CALL [\红叶制作\胖妞赌博脚本\重要数据.txt] @胖妞全局变量声明
[@Login]
#IF
CHECKLEVELEX > 0
#ACT
VAR Integer HUMAN XV
VAR Integer HUMAN XZ
VAR Integer HUMAN CTG
VAR Integer HUMAN HJJ8
VAR Integer HUMAN HJJ9
VAR Integer HUMAN $Mrrp_JNCFSJ0
VAR Integer HUMAN $Mrrp_JNCFSJ1
VAR String HUMAN 循环怪名
VAR Integer HUMAN 循环怪数
VAR Integer HUMAN 循环杀怪
LOADVAR HUMAN 循环杀怪 ..\QuestDiary\重要数据\任务记录.txt
LOADVAR HUMAN 循环怪名 ..\QuestDiary\重要数据\任务记录.txt
LOADVAR HUMAN 循环怪数 ..\QuestDiary\重要数据\任务记录.txt
LOADVAR HUMAN XV ..\QuestDiary\王者数据\XVSave.txt
LOADVAR HUMAN XZ ..\QuestDiary\王者数据\XZSave.txt
LOADVAR HUMAN CTG ..\QuestDiary\数据文件\CTGSave.txt
LOADVAR HUMAN HJJ8 ..\QuestDiary\王者数据\HJJ8Save.txt
LOADVAR HUMAN HJJ9 ..\QuestDiary\王者数据\HJJ9Save.txt
#CALL [\登陆\登陆脚本.txt] @登陆设置
#CALL [\登陆\封号设置.txt] @封号设置
#CALL [\登陆\技能满.txt] @jiaolei
#CALL [\\红叶制作\胖妞赌博脚本\重要数据.txt] @胖妞个人变量声明
goto @盟主上线
#IF
checkjob wizard
#ACT
Gmexecute TestStatus 11 1
#IF
CHECKLEVELEX = 71
#ACT
SetIcon 3 34 -20 -3
GuildNoticeMsg 249 0 [提示]：本服71级龙之传承顶级强者【%s】上线了！
#IF
checknamelist \特色功能\禁止登陆人物.txt
#ACT
kick
#IF
ISADMIN
#ACT
GOTO @检测ip
[@检测ip]
#IF
;CHECKIPLIST ..\QuestDiary\GMIP.txt
#ACT
CHANGEMODE 1 10
CHANGEMODE 2 10
CHANGEMODE 3 10
SENDMSG 7 提示：当前在线人数:<$USERCOUNT>人.管理游戏请输入[@后台管理]!
#ELSEACT
MESSAGEBOX 找到GMIP这个文本!把你的IP写进去！本地127.0.0.1
kick
[@封杀行会]
#IF
checknamelist ..\QuestDiary\封杀\禁止登陆人物.txt
#ACT
GMEXECUTE 禁止登陆IP <$IPADDR> 1
KICK
#IF
HAVEGUILD
#ACT
#ELSEACT
BREAK
#IF
CHECKGUILDLIST ..\QuestDiary\封杀\封杀行会列表.txt
#ACT
GMEXECUTE 禁止登陆IP <$IPADDR> 1
addnamelist ..\QuestDiary\封杀\禁止登陆人物.txt
KICK
#ELSEACT
BREAK
;#IF
;#SAY
;┏━━┯━━┯━━┯━━┯━━┯━━┯━━┯━━┯━━┓\
;┊ <☆玩本传奇必看,否则后果自负☆/AUTOCOLOR=253> ┊\
;├┈┈┴┈┈┴┈┈┴┈┈┴┈┈┴┈┈┴┈┈┴┈┈┼┈┈┤\
;┊ ①本服无GM,无QQ,无客服，如在游戏上有称是客服 ┊\
;┊ 或是游戏里喊话高比例出售元宝的均为骗子请注意 ┊\
;┊ ┊\
;┊ <②本服唯一充值网站为: 登陆器上查询网站无其他网站/AUTOCOLOR=253> ┊\
;┊<游戏常识 GM或系统喊话为：红色字体/@a> <我知道了，我不是二愣子/@exit>┊\
;┗━━━━━━━━━━━━━━━━━━━━━━━┷━━┛\
#IF
CheckNameList ..\QuestDiary\通缉文本\坐监名单.txt
#ACT
SetOnTimer 16 1
[@群英提示]
#CALL [\活动专区\群英提示.txt] @群英提示A
[@抢庄开始]
#IF
LARGE N47 0
#ACT
SENDMSG 6 [赌庄胖妞]：现在开始抢庄了，庄家本钱必须超过100元宝。
SENDMSG 6 [赌庄胖妞]：现在开始抢庄了，庄家本钱必须超过100元宝。
SENDMSG 6 [赌庄胖妞]：现在开始抢庄了，庄家本钱必须超过100元宝。
SENDMSG 6 [赌庄胖妞]：现在开始抢庄了，庄家本钱必须超过100元宝。
BREAK
[@移动庄家]
#IF
EQUAL A34 <$USERNAME>
EQUAL G12 59
#ACT
MAPMOVE TXDGA 8 10
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MAPMOVE TXDGA 5 11
BREAK
[@抢庄结束]
#IF
LARGE N47 0
#ACT
SENDMSG 6 ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
SENDMSG 6 [赌庄胖妞]：抢庄已结束。现在是下注时间，押定离手了。
SENDMSG 6 ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
SENDMSG 6 庄家姓名：【<$STR(A34)>】 庄家本钱数：【<$STR(G29)>】
SENDMSG 6 ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
BREAK
[@下注开始]
#IF
LARGE N47 0
#ACT
SENDMSG 6 [赌庄胖妞]：现在开始下注了，庄家本钱共有<$STR(G29)>个元宝。
SENDMSG 6 [赌庄胖妞]：现在开始下注了，庄家本钱共有<$STR(G29)>个元宝。
SENDMSG 6 [赌庄胖妞]：现在开始下注了，庄家本钱共有<$STR(G29)>个元宝。
SENDMSG 6 [赌庄胖妞]：现在开始下注了，庄家本钱共有<$STR(G29)>个元宝。
BREAK
[@下注结束]
#IF
LARGE N47 0
LARGE N43 0
#ACT
SENDMSG 7 [提示]：本局你下注【<$STR(N43)>】元宝押【<$STR(S23)>】
SENDMSG 7 [提示]：本局你下注【<$STR(N43)>】元宝押【<$STR(S23)>】
SENDMSG 7 [提示]：本局你下注【<$STR(N43)>】元宝押【<$STR(S23)>】
SENDMSG 7 [提示]：本局你下注【<$STR(N43)>】元宝押【<$STR(S23)>】
BREAK
[@猜点开始]
#IF
LARGE N47 0
LARGE N43 0
#ACT
MOV D0 <$STR(G42)>
MOV D1 <$STR(G43)>
MOV D2 <$STR(G44)>
PLAYDICE 3 @ZZNEW
#SAY
\
╔═══════════════╗你所拥有的元宝数：【<$GAMEGOLD>】\
║┏━━━┓┏━━━┓┏━━━┓║\
║┃● ●┃┃● ●┃┃● ●┃║庄家姓名：【<$STR(A34)>】\
║┃● ●┃┃● ●┃┃● ●┃║\
║┃● ●┃┃● ●┃┃● ●┃║庄家本钱数：【<$STR(G29)>】\
║┗━━━┛┗━━━┛┗━━━┛║\
╚═══════════════╝你下注【<$STR(N43)>】元宝押【<$STR(S23)>】\
\
[@ZZNEW]
#IF
EQUAL G42 <$STR(G43)>
EQUAL G42 <$STR(G44)>
#ACT
SENDMSG 7 [赌庄胖妞]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【豹子】
SENDMSG 7 [赌庄胖妞]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【豹子】
BREAK
#IF
SMALL G45 11
#ACT
SENDMSG 7 [赌庄胖妞]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【小】
SENDMSG 7 [赌庄胖妞]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【小】
BREAK
#IF
LARGE G45 10
#ACT
SENDMSG 7 [赌庄胖妞]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【大】
SENDMSG 7 [赌庄胖妞]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【大】
BREAK
[@赌博结帐]
#IF
LARGE N47 0
EQUAL A33 豹子
EQUAL A34 <$USERNAME>
#ACT
INC G11 <$STR(G29)>
GAMEGOLD + <$STR(G11)>
GuildNoticeMsg 254 249 [赌庄胖妞]：庄家【<$USERNAME>】赢得了【<$STR(G11)>】个元宝。
BREAK
#IF
LARGE N47 0
EQUAL A33 大
EQUAL A34 <$USERNAME>
#ACT
INC G29 <$STR(G14)>
DEC G29 <$STR(G13)>
GAMEGOLD + <$STR(G29)>
GuildNoticeMsg 254 249 [赌庄胖妞]：庄家【<$USERNAME>】收回了【<$STR(G29)>】个元宝。
BREAK
#IF
LARGE N47 0
EQUAL A33 小
EQUAL A34 <$USERNAME>
#ACT
INC G29 <$STR(G13)>
DEC G29 <$STR(G14)>
GAMEGOLD + <$STR(G29)>
GuildNoticeMsg 254 249 [赌庄胖妞]：庄家【<$USERNAME>】收回了【<$STR(G29)>】个元宝。
BREAK
#IF
LARGE N47 0
EQUAL A33 豹子
LARGE N43 0
#ACT
SENDMSG 6 庄家【<$STR(A34)>】掷出了【<$STR(A33)>】，你损失了【<$STR(N43)>】个元宝注金。
MOV N43 0
MOV S23 无
BREAK
#IF
LARGE N47 0
EQUAL A33 大
EQUAL S23 大
#ACT
INC N43 <$STR(N43)>
GAMEGOLD + <$STR(N43)>
SENDMSG 6 庄家【<$STR(A34)>】掷出了【<$STR(A33)>】，你赢得了【<$STR(N43)>】个元宝注金。
MOV N43 0
MOV S23 无
BREAK
#IF
LARGE N47 0
EQUAL A33 小
EQUAL S23 小
#ACT
INC N43 <$STR(N43)>
GAMEGOLD + <$STR(N43)>
SENDMSG 6 庄家【<$STR(A34)>】掷出了【<$STR(A33)>】，你赢得了【<$STR(N43)>】个元宝注金。
MOV N43 0
MOV S23 无
BREAK
#IF
LARGE N47 0
LARGE N43 0
#ACT
SENDMSG 6 庄家【<$STR(A34)>】掷出了【<$STR(A33)>】，你损失了【<$STR(N43)>】个元宝注金。
MOV N43 0
MOV S23 无
BREAK
[@赌博清零]
#IF
LARGE N47 0
#ACT
MOV N40 0
MOV N41 0
MOV N42 0
MOV N43 0
MOV N44 0
MOV N45 0
MOV S23 无
BREAK
[@检测外援]
#IF
IsOnMap 0150
CHECKLEVELEX < 45
#ACT
SENDMSG 1 系统提示[%s]!本服禁止45级以下玩家进入皇宫内外,攻沙期间一律视为外援处理!
goto @外援处理
BREAK
[@外援处理]
#IF
random 6
#ACT
mapmove 11 182 325
BREAK
#IF
random 5
#ACT
mapmove 11 179 322
BREAK
#IF
random 4
#ACT
mapmove 11 177 325
BREAK
#IF
random 3
#ACT
mapmove 11 185 324
BREAK
#IF
random 2
#ACT
mapmove 0 331 267
BREAK
#IF
random 1
#ACT
mapmove 0 329 269
BREAK
#IF
random
#ACT
mapmove 0 327 267
BREAK
[@OnTimer1]
#IF
ISONMAP PD1
CHECKLEVELEX > 56
CHECKGAMEGOLD > 199
#ACT
GAMEGOLD - 200
CHANLeg引擎XP + 5000000
BREAK
#ELSEACT
GOTO @HUIKAA
[@HUIKAA]
#IF
CHECKLEVELEX > 56
ISONMAP PD1
#ACT
SETOFFTIMER 1
MESSAGEBOX 您的元宝数量小于200个不好意思,送您回土城,子弹带多一点在来!
MAPMOVE 3 330 333
BREAK
#ELSEACT
SETOFFTIMER 1
[@OnTimer41]
#IF
CHECKLEVELEX < 65
ISONMAP TXDGA
#ACT
CHANLeg引擎XP + 4000
BREAK
#ELSEACT
GOTO @HUIKAAb
[@HUIKAAb]
#IF
CHECKLEVELEX < 65
ISONMAP PD1
#ACT
SETOFFTIMER 1
MESSAGEBOX 您的元宝数量小于1个不好意思,送您回土城,子弹带多一点在来!
MAPMOVE 3 330 333
BREAK
#ELSEACT
SETOFFTIMER 1
[@OnTimer2]
#IF
ISONMAP PD2
CHECKLEVELEX < 60
CHECKGAMEGOLD > 149
#ACT
GAMEGOLD - 150
CHANLeg引擎XP + 1500000
BREAK
#ELSEACT
GOTO @HUIKAB
[@HUIKAB]
#IF
CHECKLEVELEX < 65
ISONMAP PD2
#ACT
SETOFFTIMER 2
MESSAGEBOX 您的元宝数量小于150个不好意思,送您回土城,子弹带多一点在来!
MAPMOVE 3 330 333
BREAK
#ELSEACT
SETOFFTIMER 2
[@OnTimer3]
#IF
ISONMAP PD3
CHECKLEVELEX < 57
CHECKGAMEGOLD > 99
#ACT
GAMEGOLD - 100
CHANLeg引擎XP + 3000000
BREAK
#ELSEACT
GOTO @计时器
[@计时器]
#IF
CHECKLEVELEX < 56
ISONMAP PD3
#ACT
SETOFFTIMER 3
MESSAGEBOX 您的元宝数量小于100个或者大于57级不好意思,送您回土城,子弹带多一点在来!
MAPMOVE 3 330 333
BREAK
#ELSEACT
SETOFFTIMER 3
[@OnTimer6]
#IF
CheckHumInRange PD44 20 23 7
CHECKLEVELEX < 62
#ACT
CHANLeg引擎XP + 10000
BREAK
#ELSEACT
GOTO @1111
[@1111]
#IF
ISONMAP PD44
#ACT
CHANLeg引擎XP + 20000
#ELSEACT
SETOFFTIMER 6
;MESSAGEBOX 您的大于62级不好意思,送您回土城,子弹带多一点在来!
;MAPMOVE 3 330 333
[@OnTimer4]
#IF
CheckHumInRange PD44 8 37 0
#ACT
CHANLeg引擎XP + 5000
break
#IF
CheckHumInRange PD44 14 39 0
#ACT
CHANLeg引擎XP + 5000
break
#IF
CheckHumInRange PD44 13 34 0
#ACT
CHANLeg引擎XP + 5000
break
#IF
CheckHumInRange PD44 20 34 0
#ACT
CHANLeg引擎XP + 5000
break
#IF
CheckHumInRange PD44 8 32 0
#ACT
CHANLeg引擎XP + 5000
break
#ELSEACT
SetOffTimer 4
break
[@OnTimer8]
#IF
check [88] 1
#ACT
CHANLeg引擎XP + 1000000
#IF
CheckHumInRange PD44 20 23 7
#ACT
CHANLeg引擎XP + 2000000
break
#IF
ISONMAP PD44
#ACT
CHANLeg引擎XP + 4000000
BREAK
#ELSEACT
GOTO @HUIKAB8
BREAK
[@HUIKAB8]
#IF
ISONMAP PD44
#ACT
SETOFFTIMER 88
SENDMSG 6 您的等级大于450级,不好意思,送您回土城,!
MAPMOVE 3 334 331
BREAK
#ELSEACT
SETOFFTIMER 2
[@风雷召唤]
#IF
HaveGuild
CheckOfGuild <$STR(A99)>
#SAY
同门师兄弟〖<$STR(A98)>〗在〖<$STR(A97)>〗遇险，需要你的紧急支援！\
你是否愿意前往，助他一臂之力呢？\ \
<为兄弟九死一生/@风雷召唤_1> <和他不熟不理他/@EXIT>\
#ACT
BREAK
#ELSEACT
BREAK
[@风雷召唤_1]
#IF
HaveGuild
CheckOfGuild <$STR(A99)>
#ACT
Gmexecute 追杀 <$STR(A98)>
BREAK
#ELSEACT
BREAK
[@OnTimer5]
#IF
ISONMAP ZJ002
CHECKGAMEGOLD > 4
#ACT
GAMEGOLD - 5
BREAK
GOTO @计时器9
[@计时器9]
#IF
ISONMAP ZJ002
#ACT
SETOFFTIMER 5
MESSAGEBOX 您的元宝数量小于5个不好意思,送您回土城,子弹带多一点在来!
MAPMOVE 3 330 333
BREAK
#ELSEACT
SETOFFTIMER 5
[@OnTimer5]
#IF
CHECKVAR HUMAN $Mrrp_JNCFSJ0 = 1
#ACT
SENDMSG 6 窒息效果恢复正常..
#IF
CHECKVAR HUMAN $Mrrp_JNCFSJ0 > 0
#ACT
HumanHP - 50
HumanMP - 50
CALCVAR HUMAN $Mrrp_JNCFSJ0 - 1
#IF
CHECKVAR HUMAN $Mrrp_JNCFSJ1 = 1
#ACT
SENDMSG 6 灼伤效果恢复正常..
#IF
CHECKVAR HUMAN $Mrrp_JNCFSJ1 > 0
#ACT
HumanHP - 50
CALCVAR HUMAN $Mrrp_JNCFSJ1 - 1
[@万年树妖]
#IF
#SAY
运钞车经过土药店，这可是必暴元宝的好机会，想去吗？\
\\『<一定要去/@杀15>』\ \
\\『<我不敢去/@exit>』\
[@杀15]
#IF
#ACT
mapmove 3 355 337
give 回城卷 1
break
[@开天送宝]
#IF
#SAY
每天一次的送宝活动又开始了,只有30分钟哦！赶紧的。\
\\『<一定要去/@杀151>』\ \
\\『<我不敢去/@exit>』\
[@杀151]
#IF
#ACT
TimeRecall 30
map xzzd
give 回城卷 1
break
;-------------------------------------------------------------------------------------------------
;╔┄┄┄┄╗
;┆酒馆赌博┆
;╚┄┄┄┄╝
;-------------------------------------------------------------------------------------------------
[@fgfgfg]
#If
CheckInMapRange TXDGA 7 12 10
check [65] 1
checknamelist ..\QuestDiary\压注名单.txt
#ACT
mov D0 <$STR(G72)>
playdice 1 @cube_cds
break
#IF
CheckInMapRange TXDGA 7 12 10
#ACT
mov D0 <$STR(G72)>
playdice 1 @dutouzi_ll
#SAY
正在投骰子。。。\ \
[@cube_cds]
#IF
checknamelist ..\QuestDiary\防止作弊.txt
#ACT
#ELSEACT
MOV N71 0
MOV N78 0
MOV N79 0
MOV N80 0
MOV N81 0
MOV N82 0
MOV N83 0
MOV N84 0
MOV N85 0
MOV N86 0
MOV N87 0
MOV N88 0
MOV N89 0
MOV N90 0
MOV N91 0
MOV N92 0
MOV N93 0
MOV n94 0
MOV N95 0
MOV N96 0
MOV N97 0
MOV N98 0
MOV N99 0
Set [65] 0
SENDMSG 6 提示：拒绝作弊
#IF
check [65] 0
#ACT
goto @dutouzi_ll
break
;-------------------大中小开始--------
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 6
LARGE N89 0
LARGE N78 2
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N78)>
inc G73 <$STR(N78)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N78)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 5
LARGE N89 0
LARGE N78 2
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N78)>
inc G73 <$STR(N78)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N78)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 4
LARGE N90 0
LARGE N79 2
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N79)>
inc G73 <$STR(N79)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N79)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 3
LARGE N90 0
LARGE N79 2
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N79)>
inc G73 <$STR(N79)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N79)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 2
LARGE N91 0
LARGE N80 2
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N80)>
inc G73 <$STR(N80)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N80)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 1
LARGE N91 0
LARGE N80 2
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N80)>
inc G73 <$STR(N80)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N80)>元宝的奖励！
goto @dutouzi_cds-lk
break
;-------------------大中小结束--------
;-------------------单双开始--------
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 6
LARGE N93 0
LARGE N82 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N82)>
inc G73 <$STR(N82)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N82)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 4
LARGE N93 0
LARGE N82 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N82)>
inc G73 <$STR(N82)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N82)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 2
LARGE N93 0
LARGE N82 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N82)>
inc G73 <$STR(N82)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N82)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 5
LARGE N92 0
LARGE N81 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N81)>
inc G73 <$STR(N81)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N81)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 3
LARGE N92 0
LARGE N81 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N81)>
inc G73 <$STR(N81)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N81)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 1
LARGE N92 0
LARGE N81 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N81)>
inc G73 <$STR(N81)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N81)>元宝的奖励！
goto @dutouzi_cds-lk
break
;-------------------单双结束--------
;-------------------点数开始--------
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 1
LARGE n94 0
LARGE N83 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N83)>
inc G73 <$STR(N83)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N83)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 2
LARGE N95 0
LARGE N84 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N84)>
inc G73 <$STR(N84)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N84)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 3
LARGE N96 0
LARGE N85 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N85)>
inc G73 <$STR(N85)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N85)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 4
LARGE N97 0
LARGE N86 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N86)>
inc G73 <$STR(N86)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N86)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 5
LARGE N98 0
LARGE N87 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N87)>
inc G73 <$STR(N87)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N87)>元宝的奖励！
goto @dutouzi_cds-lk
break
#IF
CheckInMapRange TXDGA 7 12 10
check [65] 1
equal D0 6
LARGE N99 0
LARGE N88 1
#ACT
CLEARDELAYGOTO
GameGold + <$STR(N88)>
inc G73 <$STR(N88)>
SENDMSG 6 提示：骰子点数为：<$STR(D0)>点！恭喜你中奖，你获得了<$STR(N88)>元宝的奖励！
goto @dutouzi_cds-lk
break
;-------------------点数结束--------
#ELSEACT
CLEARDELAYGOTO
Set [65] 0
mov G71 0
MOV G78 0
MOV G79 0
MOV G50 0
MOV G51 0
MOV G52 0
MOV G53 0
MOV G54 0
MOV G55 0
MOV G56 0
MOV G57 0
MOV G58 0
MOV G59 0
MOV G60 0
MOV G61 0
MOV G62 0
MOV G63 0
MOV G64 0
MOV G65 0
MOV G66 0
MOV G67 0
MOV G68 0
MOV G69 0
MOV N71 0
MOV N78 0
MOV N79 0
MOV N80 0
MOV N81 0
MOV N82 0
MOV N83 0
MOV N84 0
MOV N85 0
MOV N86 0
MOV N87 0
MOV N88 0
MOV N89 0
MOV N90 0
MOV N91 0
MOV N92 0
MOV N93 0
MOV n94 0
MOV N95 0
MOV N96 0
MOV N97 0
MOV N98 0
MOV N99 0
MOV N19 0
GOTO @dushuol
[@dushuol]
#SAY
很可惜...\
骰子的点数是<$STR(D0)> 和你猜的点数不同.\ \ \
<离 开/@exit>\
[@dutouzi_cds-lk]
#IF
check [65] 1
LARGE N78 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N78)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N79 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N79)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N80 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N80)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N81 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N81)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N82 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N82)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N83 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N83)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N84 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N84)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N85 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N85)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N86 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N86)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N87 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N87)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#IF
check [65] 1
LARGE N88 G70
#ACT
CLEARDELAYGOTO
SENDMSG 0 提示：【<$USERNAME>】在澳门赌场赢得<$STR(N88)>元宝，想要发财的快快行动！
goto @dutouzi_ll
break
#ELSEACT
CLEARDELAYGOTO
goto @dutouzi_ll
break
[@dutouzi_ll]
#ACT
Set [65] 0
mov G71 0
MOV G78 0
MOV G79 0
MOV G50 0
MOV G51 0
MOV G52 0
MOV G53 0
MOV G54 0
MOV G55 0
MOV G56 0
MOV G57 0
MOV G58 0
MOV G59 0
MOV G60 0
MOV G61 0
MOV G62 0
MOV G63 0
MOV G64 0
MOV G65 0
MOV G66 0
MOV G67 0
MOV G68 0
MOV G69 0
MOV N71 0
MOV N78 0
MOV N79 0
MOV N80 0
MOV N81 0
MOV N82 0
MOV N83 0
MOV N84 0
MOV N85 0
MOV N86 0
MOV N87 0
MOV N88 0
MOV N89 0
MOV N90 0
MOV N91 0
MOV N92 0
MOV N93 0
MOV n94 0
MOV N95 0
MOV N96 0
MOV N97 0
MOV N98 0
MOV N99 0
[@没时间了]
#IF
CheckInMapRange TXDGA 7 12 10
#ACT
SENDMSG 6 提示：拉斯维加斯还有10秒种开始摇动骰子，要下注的玩家赶快下注！
;-------------------------------------------------------------------------------------------------
;-------------------------------------------------------------------------------------------------
[@教主]
#IF
#SAY
武器教主出现在了武器之地\
杀死镇天教主将掉落大量元宝和装备。 \ \ \ \ \
<进入武器之地/@武器之地>
[@武器之地]
#if
#act
mapmove ktzd
give 回城卷轴 1
SENDMSG 1 【提示】玩家〖%s〗进入了武器之地地图激情正在等着他！！！
[@教主1]
#IF
#SAY
鲜花宝石教主出现在了鲜花宝石之地\
杀死鲜花宝石教主将掉落大量元宝和装备。 \ \ \ \ \
<进入鲜花宝石之地/@鲜花宝石之地>
[@鲜花宝石之地]
#if
#act
mapmove bsxh
give 回城卷轴 1
SENDMSG 1 【提示】玩家〖%s〗进入了鲜花宝石之地地图激情正在等着他！！！
[@夺宝奇兵]
#IF
ISONMAP DBQB1
Checkitem 宝盒 1
#ACT
MOV A42 <$USERNAME>
SENDMSG 0 〖夺宝奇兵〗：目前宝盒被%S拥有，已成功拥有[<$STR(M60)>]秒。
SENDMSG 0 〖夺宝奇兵〗：成功拥有宝盒600秒[10分钟]后他将获得宝盒中的宝物。
SENDMSG 0 〖夺宝奇兵〗：%S目前所在位置：%m的(%x：%y)
BREAK
#IF
ISONMAP DBQB1
#ACT
BREAK
#ELSEACT
TAKE 宝盒 1
BREAK
[@OnTimer0]
#IF
ISONMAP DBQB1
Checkitem 宝盒 1
EQUAL M60 600
Check [191] 1
#ACT
MOV M60 0
TAKE 宝盒 1
SET [191] 0
GetRandomText .\QuestDiary\夺宝奇兵\装备列表.txt S40
GIVE <$STR(S40)> 1
SENDMSG 0 〖%S〗获得了本届夺宝活动的胜利，获得了[<$STR(S40)>：1]
MOV A42 暂无
MOV A40 <$USERNAME>
INC A40 获得了：
INC A40 <$STR(S40)>
BREAK
#IF
ISONMAP DBQB1
Checkitem 宝盒 1
Check [191] 1
#ACT
INC M60 1
BREAK
#IF
ISONMAP DBQB1
Checkitem 宝盒 1
#ACT
SET [191] 1
SENDMSG 0 〖%S〗拾到了夺宝活动的宝盒。成功保护10分钟将可以获得宝盒内的宝物。
BREAK
#IF
ISONMAP DBQB1
Check [191] 1
#ACT
ChangePKPoint + 200
SET [190] 1
SENDMSG 0 〖%S〗违反夺宝活动的规则，将宝盒乱放，系统将其处死，并增加其200点PK值。
Kill 1
BREAK
#IF
ISONMAP DBQB1
#ACT
BREAK
#IF
Checkitem 宝盒 1
#ACT
MOV M60 0
MAPMOVE DBQB1 10 12
SENDMSG 0 〖%S〗想携带宝盒外逃，已经被系统抓回！保护宝盒时间重新清零。
BREAK
#IF
#ACT
SetOffTimer 0
BREAK
[@OnTimer7]
#ACT
SENDMSG 0 玩家〖<$USERNAME>〗携带宝盒出现在[%M][%x:%y]，宝盒藏有玩家梦寐以求的道具，只有抢到宝盒的人才有机会获得。
[@OnTimer16]
#IF
ISONMAP 0156
#ACT
#ELSEACT
MAPMOVE 0156 7 11
SETRANKLEVELNAME %s\“我罪孽深重，不得不去坐牢去了”\☆★正在享受牢狱之苦★☆
CHANGENAMECOLOR 253
MESSAGEBOX 你是逃不出去的，安心坐牢吧! !
BREAK
[@幸运九套]
#IF
CheckLuckPoint > 8
#act
SETRANKLEVELNAME %s\≮此人奸杀[<$HUMAN(HJJ8)>]条人命≯\≮被日[<$HUMAN(HJJ9)>]次≯\幸运九\
CHANGENAMECOLOR 253
[@清除天下]
#IF
#act
mov G5 0
mov G6 0
mov G7 0
mov G8 0
mov G9 0
mov G10 0
mov A0
mov A1
mov A2 0
mov A3 0
mov A4 0
mov A5 0
mov A6 0
mov A7 0
mov A8 0
mov A9 0
mov A10 0
mov A11 0
mov A12 0
mov A14 0
mov A15 0
mov A16 0
mov A18 0
mov A19 0
mov A20 0
mov A22 0
mov A23 0
mov A24 0
mov A25 0
mov A26 0
mov A27 0
mov A28 0
mov A29 0
MOV A35 暂无\天下第一男战士
MOV A36 暂无\天下第一女战士
MOV A37 暂无\天下第一男法师
MOV A38 暂无\天下第一女法师
MOV A39 暂无\天下第一男道士
MOV A40 暂无\天下第一女道士
MOV G37 0
MOV G24 0
MOV G25 0
MOV G26 0
MOV G27 0
MOV G28 0
MOV G29 0
CLEARNAMELIST ..\QuestDiary\重要数据\男道士名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\女道士名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\男战士名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\女战士名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\男法师名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\女法师名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\鉴听名单.txt
CLEARNAMELIST ..\QuestDiary\重要数据\压注名单.txt
;SENDMSG 0 天下第一每天12点更新1次.这次的天下第一将会属于谁？
BREAK
[@沙奖励]
#IF
#act
mov g372 0
CLEARNAMELIST ..\QuestDiary\重要数据\沙奖励名单.txt
BREAK
[@行会令]
#IF
HaveGuild
CheckOfGuild <$STR(A99)>
#SAY
行会掌门〖<$STR(A98)>〗在召唤全行会成员，需要你的紧急支援！\
你是否愿意前往，助他一臂之力呢？<每召唤一次1000元宝>\ \
===========================================================\ \
╔┄┄┄┄┄┄┄╗ ╔┄┄┄┄┄┄╗\
┆<马上飞到他身边/@shaneiaa1>┆ ┆<暂时不想理他/@EXIT>┆\
╚┄┄┄┄┄┄┄╝ ╚┄┄┄┄┄┄╝\
===========================================================\ \
#ACT
BREAK
#ELSEACT
BREAK
[@shaneiaa1]
#IF
HaveGuild
CheckOfGuild <$STR(A99)>
#ACT
SetOnTimer 6 3
Gmexecute 跟踪 <$STR(A98)>
GuildNoticeMsg 255 47 <$USERNAME>在行会掌门的召唤下飞到了掌门的身边!
BREAK
#ELSEACT
BREAK
[@盟主上线]
#IF
EQUAL A400 <$USERNAME>
#ACT
SETRANKLEVELNAME %s\╔═══════╗\┆【至尊☆皇帝】┆\╚═══════╝\★全属性【10-10】★\
ChangeHumAbility 1 = 10
ChangeHumAbility 2 = 10
ChangeHumAbility 3 = 10
ChangeHumAbility 4 = 10
ChangeHumAbility 5 = 10
ChangeHumAbility 6 = 10
ChangeHumAbility 7 = 10
ChangeHumAbility 8 = 10
ChangeHumAbility 9 = 10
ChangeHumAbility 10 = 10
SENDMSG 0 至尊皇帝[<$USERNAME>]上线了。
SENDMSG 0 至尊皇帝[<$USERNAME>]上线了。
GuildNoticeMsg 249 151 至尊皇帝[<$USERNAME>]上线了。
GuildNoticeMsg 249 151 至尊皇帝[<$USERNAME>]上线了。
SENDMSG 5 你的防御增加10-10点.
SENDMSG 5 你的魔御增加10-10点.
SENDMSG 5 你的攻击增加10-10点.
SENDMSG 5 你的魔法增加10-10点.
SENDMSG 5 你的道术增加10-10点
[@盟主验证]
#IF
EQUAL A400 <$USERNAME>
#ACT
ChangeHumAbility 1 - 10
ChangeHumAbility 2 - 10
ChangeHumAbility 3 - 10
ChangeHumAbility 4 - 10
ChangeHumAbility 5 - 10
ChangeHumAbility 6 - 10
ChangeHumAbility 7 - 10
ChangeHumAbility 8 - 10
ChangeHumAbility 9 - 10
ChangeHumAbility 10 - 10
SENDMSG 5 你的防御恢复正常.
SENDMSG 5 你的魔御恢复正常.
SENDMSG 5 你的攻击恢复正常.
SENDMSG 5 你的魔法恢复正常.
SENDMSG 5 你的道术恢复正常.
SENDMSG 5 你的至尊皇帝已经被别人抢了。
[@大帝]
#IF
#SAY
每天一次的送宝活动又开始了,只有30分钟哦！赶紧的。\
\\『<一定要去/@杀大帝>』\ \
\\『<我不敢去/@exit>』\
[@杀大帝]
#IF
#ACT
TimeRecall 30
mapmove ybzd
give 回城卷轴 1
break
本站使用的是网通服务器，怕电信的下载慢，把版本放在了网盘上，这里下载的版本是在网盘的下载地址。
1.80蓝色风暴战神复古【下载地址1】：http://page80.ctfile.com/fs/czg151888574
1.80蓝色风暴战神复古【下载地址2】：https://yunpan.cn/cRs5WCHYKNnNQ 访问密码 787d
1.80蓝色风暴战神复古【下载地址3】：http://pan.baidu.com/s/1nu9jTlJ
1.80蓝色风暴战神补丁【下载地址】：http://pan.baidu.com/s/1boD8cJt |
上一篇：【Leg引擎】大唐传奇1.80复古战神极品终极版本下一篇：【Leg引擎】1.80纵横靓装微变服务端
|
/1 
发表于 2016-6-6 11:38:03
