传奇版本军团争霸脚本
GM016论坛又给大家带来了独家开发的军团争霸脚本实例，不懂的朋友一定不能错过哦，这里主要以弑魔军团与神影军团为例，每个军团有9个职位到达一定职位可以领取奖励等等，在游戏里加入军团争霸就是为了增加游戏的乐趣。好吧下面我们一起来看脚本编写实例吧。[@军团说明1]
{
军团总共分为五级,以“★”为标记,每一颗星代表一级.通过每周六\
的军团争霸可以提升军团等级,在争霸地图杀死圣龙的军团为获胜方\
军团等级提升1级,另一方军团等级降1级!军团每提升1级该军团玩家\
杀怪经验都会有所提高!每个军团有9个职位,到达一定职位可以领取\
相应俸禄,职位越高俸禄越高!!军团争霸中抢夺到"军团信物"后双击\
信物可以提升职位.!!!!!!\
注意：军团争霸时有大量装备爆出，时间为每周星期六13：10\
}
[@查看天职1]
{
所属军团：弑魔军团\
军团等级：级\
阵亡次数：次\
杀敌人数：人\
╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗\
┆一级：列兵┆ ┆二级：排长┆ ┆三级：连长┆\
┆四级：营长┆ ┆五级：团长┆ ┆六级：旅长┆\
┆七级：师长┆ ┆八级：军长┆ ┆领袖：司令┆\
╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝\
}
[@查看修职1]
{
所属军团：神影军团\
军团等级：级\
阵亡次数：次\
杀敌人数：人\
╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗\
┆一级：列兵┆ ┆二级：排长┆ ┆三级：连长┆\
┆四级：营长┆ ┆五级：团长┆ ┆六级：旅长┆\
┆七级：师长┆ ┆八级：军长┆ ┆领袖：司令┆\
╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝\
}
[@敌对神影1]
{
敌对军团：神影军团\
敌对等级：级\
阵亡次数：次\
杀敌人数：人\
╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗\
┆一级：列兵┆ ┆二级：排长┆ ┆三级：连长┆\
┆四级：营长┆ ┆五级：团长┆ ┆六级：旅长┆\
┆七级：师长┆ ┆八级：军长┆ ┆领袖：司令┆\
╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝\
}
[@敌对弑魔1]
{
敌对军团：弑魔军团\
敌对等级：级\
阵亡次数：次\
杀敌人数：人\
╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗ ╔┄┄┄┄┄╗\
┆一级：列兵┆ ┆二级：排长┆ ┆三级：连长┆\
┆四级：营长┆ ┆五级：团长┆ ┆六级：旅长┆\
┆七级：师长┆ ┆八级：军长┆ ┆领袖：司令┆\
╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝ ╚┄┄┄┄┄╝\
}
[@军团战争1]
{
#IF
CHECKLEVELEX 』┆『』┆『』┆\
┆『』┆『』┆『』┆\
┆『』┆『』┆『』┆\
┆『』┆『』┆『』┆\
┆『』┆『』┆『』┆\
┆『』┆『』┆『』┆┄┄┄┄┄┄╗\
┆『』┆『』┆『』┆〖〗┆\
╚┄┄┄┄┄┄╩┄┄┄┄┄┄╩┄┄┄┄┄┄╩┄┄┄┄┄┄╝\
[@时间]
#ACT
Gmexecute 查看时间
GOTO @相关指令
[@加会]
#ACT
Gmexecute 加入门派
GOTO @相关指令
[@私聊]
#ACT
Gmexecute 拒绝私聊
GOTO @相关指令
[@群聊]
#ACT
Gmexecute 拒绝组队聊天
GOTO @相关指令
[@交易]
#ACT
Gmexecute 允许交易
GOTO @相关指令
[@退会]
#ACT
Gmexecute 退出门派
GOTO @相关指令
[@行聊]
#ACT
Gmexecute 拒绝行会聊天
GOTO @相关指令
[@合一]
#ACT
Gmexecute 允许天地合一
GOTO @相关指令
[@禁行]
#ACT
Gmexecute 允许行会合一
GOTO @相关指令
[@行合]
#ACT
Gmexecute 行会合一
GOTO @相关指令
[@禁合]
#ACT
Gmexecute 允许天地合一
GOTO @相关指令
[@夫坐]
#ACT
Gmexecute 查询伴侣
GOTO @相关指令
[@师坐]
#ACT
Gmexecute 查询师徒
GOTO @相关指令
[@夫传]
#ACT
Gmexecute 夫妻传送
GOTO @相关指令
[@允夫]
#ACT
Gmexecute 允许夫妻传送
GOTO @相关指令
[@师传]
#ACT
Gmexecute 师徒传送
GOTO @相关指令
[@允师]
#ACT
Gmexecute 允许师徒传送
GOTO @相关指令
[@修密]
#ACT
Gmexecute 修改密码
GOTO @相关指令
[@设密]
#ACT
Gmexecute 设置密码
GOTO @相关指令
[@锁仓]
#ACT
Gmexecute 锁定
GOTO @相关指令
[@开仓]
#ACT
Gmexecute 仓库开锁
GOTO @相关指令
}
[@俸禄弑魔1]
{
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek sun
#act
goto @弑魔sunchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek mon
#act
goto @弑魔monchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek tue
#act
goto @弑魔tuechenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek wed
#act
goto @弑魔wedchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek thu
#act
goto @弑魔thuchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek fri
#act
goto @弑魔frichenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek sat
#act
goto @弑魔satchenw02
#ELSEACT
SENDMSG 6 只有1级以上的官员才能领取俸禄！
goto @Member
break
[@弑魔satchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD +4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD+ 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD+ 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@弑魔frichenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD+ 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@弑魔thuchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@弑魔wedchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取传奇开私服大师手册：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@弑魔tuechenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD+ 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@弑魔monchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@弑魔sunchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔国王.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔8级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔7级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔6级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔5级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔4级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔3级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\弑魔2级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
}
[@俸禄神影1]
{
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek sun
#act
goto @神影sunchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek mon
#act
goto @神影monchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek tue
#act
goto @神影tuechenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek wed
#act
goto @神影wedchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek thu
#act
goto @神影thuchenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek fri
#act
goto @神影frichenw02
break
#if
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek sat
#act
goto @神影satchenw02
#ELSEACT
SENDMSG 6 只有1级以上的官员才能领取俸禄！
goto @Member
break
[@神影satchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek sat
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@神影frichenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek fri
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@神影thuchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek thu
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@神影wedchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek wed
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@神影tuechenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek tue
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@神影monchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek mon
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
[@神影sunchenw02]
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影国王.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 4
give 金币 400000
SENDMSG 6 领取俸禄：声望+4 金币40万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影8级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 4
SENDMSG 6 领取俸禄：声望+4
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影7级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 3
give 金币 300000
SENDMSG 6 领取俸禄：声望+3 金币30万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影6级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 3
SENDMSG 6 领取俸禄：声望+3
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影5级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 2
give 金币 200000
SENDMSG 6 领取俸禄：声望+2 金币20万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影4级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 2
SENDMSG 6 领取俸禄：声望+2
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影3级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 1
give 金币 100000
SENDMSG 6 领取俸禄：声望+1 金币10万
goto @Member
break
#IF
checknamelist ..\QuestDiary\荣誉\军团功能\神影2级.txt
dayofweek sun
check 0
#act
reset 7
set 1
GAMEGOLD + 1
SENDMSG 6 领取俸禄：声望+1
goto @Member
break
#ELSEACT
SENDMSG 6 你好象今天已经领过了啊，怎么，还想再领？
goto @Member
页:
[1]