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