红鹰论坛

 找回密码
 立即注册
查看: 1198|回复: 5

传奇军团争霸脚本

[复制链接]
 成长值: 13235

6576

主题

266

回帖

3万

积分

论坛管理员

Rank: 17Rank: 17Rank: 17Rank: 17Rank: 17

积分
39622

推广达人宣传达人突出贡献优秀版主荣誉管理论坛元老

发表于 2013-12-27 14:25:01 | 显示全部楼层 |阅读模式
今天润芒论坛又给大家带来了独家开发的军团争霸脚本实例,不懂的朋友一定不能错过哦,这里主要以弑魔军团与神影军团为例,每个军团有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




上一篇:传奇新区活动介绍脚本
下一篇:传奇军团联盟脚本
请认真回贴,发垃圾贴,一律做封号处理。请到小黑屋申请解封.站长QQ:18341427QQ群:85527291
回复

举报

1

主题

309

回帖

423

积分

二级GM

Rank: 3Rank: 3

积分
423
发表于 2014-1-15 19:42:16 | 显示全部楼层
很不错

1

主题

202

回帖

327

积分

二级GM

Rank: 3Rank: 3

积分
327
发表于 2014-1-15 19:38:16 | 显示全部楼层
楼主是超人

1

主题

187

回帖

320

积分

二级GM

Rank: 3Rank: 3

积分
320
发表于 2014-1-15 19:05:09 | 显示全部楼层
好帖就是要顶

1

主题

451

回帖

531

积分

三级GM

Rank: 4

积分
531
发表于 2014-1-15 19:13:54 | 显示全部楼层
难得一见的好帖

1

主题

67

回帖

206

积分

二级GM

Rank: 3Rank: 3

积分
206
发表于 2014-1-15 18:57:00 | 显示全部楼层
很好哦
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

新手推荐上一条 /1 下一条

传奇服务端|传奇一条龙|站点地图|手机版|gm基地|红鹰论坛 ( 冀ICP备2023015431号-1 )|网站地图

GMT+8, 2024-11-26 09:18

Powered by 传奇版本 X3.4

本站于2013年2月28日成立,至今运行: 天。本站所有资源均来自网络,严禁商业使用,请于24小时内删除!
快速回复 返回顶部 返回列表