2.[@蜀国中变合击传奇私服大殿]
#IF
#ACT
MAPMOVEsg
break
[@退位让贤]
#CALL[国王让位蜀国.txt]@蜀国让位
[@国王介绍]
1.当前无国王状态,只要是大将军官衔并且有5000点战绩你就能做国王.
2.拥有大将军官衔,且等级战绩最高的玩家即可以争夺王位.
3.国王可以封国家精英.封皇后.封妃子.每天领取一次2倍攻击
4.想万人之上,号令群雄吗?那就加油吧
[@夺取国王]
争夺国王@夺取国王宝座2我有50级啦和战绩高于当前国王。
[@夺取国王宝座2]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国人,不能争夺国王宝座。
BREAK
#if
IsKing
#act
MESSAGEBOX您现在已经是国王了。
break
#if
CheckNationRankLevel9
#ACT
MOVS99$NATIONKING
#elseact
messagebox对不起,你不是大将军官衔!
BREAK
#IF
EQUALS99
CHECKGAMEPOINT1999
#ACT
ChangeKing3
CALCVARGLOBALMrrp_蜀国国王名字=$USERNAME
CALCVARGLOBALMrrp_蜀国国王等级=$LEVEL
CALCVARGLOBALMrrp_蜀国国王战绩=$GAMEPOINT
CALCVARGLOBALMrrp_蜀国国王登基时间=$DATETIME
SAVEVARGLOBALMrrp_蜀国国王名字..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国国王等级..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国国王战绩..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国国王登基时间..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
GAMEPOINT-2000
SetOnTimer360
GuildNoticeMsg245255恭喜$USERNAME成为蜀国新的国王,在$USERNAME的领导下,蜀国会强大无比!
goto@清除精英
#CALL[封号系统封号.txt]@封号设置
close
BREAK
#IF
EQUALS99
#ACT
messagebox你不是大将军吧或者你没有2000点战绩无法争取王位.
BREAK
#if
CHECKGAMEPOINT$GLOBAL(Mrrp_蜀国国王战绩)
CHECKLEVELEX49
CHECKGAMEPOINT1999
#ACT
ChangeKing3
CALCVARGLOBALMrrp_蜀国国王名字=$USERNAME
CALCVARGLOBALMrrp_蜀国国王等级=$LEVEL
CALCVARGLOBALMrrp_蜀国国王战绩=$GAMEPOINT
CALCVARGLOBALMrrp_蜀国国王登基时间=$DATETIME
SAVEVARGLOBALMrrp_蜀国国王名字..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国国王等级..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国国王战绩..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国国王登基时间..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
GAMEPOINT-2000
SetOnTimer360
GuildNoticeMsg245255恭喜$USERNAME成为蜀国新的国王,在$USERNAME的领导下,蜀国会强大无比!
GOTO@清除精英
#CALL[封号系统封号.txt]@封号设置
close
break
#ELSEACT
MESSAGEBOX夺取王位必须等级达到50和战绩高于当前国王.而且身上必须有2000点以上的战绩!
BREAK
[@国王权利]
#IF
IsKing3
CheckNational3
#say
1.册封皇后@@InPutString10册封为1.76秋月精品传奇手游皇后攻击力提高10%.需10W元宝当前皇后:$STR(A63)
2.册封精英@封国家精英免费册封为精英攻击力提高10%
3.国王召唤@国王召唤1@国王令可以全国召唤!攻城禁用!
4.领取双倍@国王双倍每天可享受10分钟双倍力量!
#ELSEACT
MESSAGEBOX您不是国王,不能享受权利。
BREAK
[@国王双倍]
#If
CheckNameList ..QuestDiary数据文件国王双倍.txt
#SAY
你今天已经领过了,请明天再领!
#Elseact
Goto @开始领取
Break
[@开始领取]
#act
POWERRATE200600
addnamelist..QuestDiary数据文件国王双倍.txt
GuildNoticeMsg0253恭喜蜀国国王$USERNAME成功领取每日权利双倍攻击10分钟!
GuildNoticeMsg0253恭喜蜀国国王$USERNAME成功领取每日权利双倍攻击10分钟!
close
[@封国家精英]
国家精英名额一是:$GLOBAL(Mrrp_蜀国精英一号),国王可以设置@@InPutString0
国家精英名额二是:$GLOBAL(Mrrp_蜀国精英二号),国王可以设置@@InPutString1
国家精英名额三是:$GLOBAL(Mrrp_蜀国精英三号),国王可以设置@@InPutString2
国家精英名额四是:$GLOBAL(Mrrp_蜀国精英四号),国王可以设置@@InPutString3
国家精英名额五是:$GLOBAL(Mrrp_蜀国精英五号),国王可以设置@@InPutString4
国家精英名额六是:$GLOBAL(Mrrp_蜀国精英六号),国王可以设置@@InPutString5
国家精英名额七是:$GLOBAL(Mrrp_蜀国精英七号),国王可以设置@@InPutString6
国家精英名额八是:$GLOBAL(Mrrp_蜀国精英八号),国王可以设置@@InPutString7
国家精英名额九是:$GLOBAL(Mrrp_蜀国精英九号),国王可以设置@@InPutString8
国家精英名额十是:$GLOBAL(Mrrp_蜀国精英十号),国王可以设置@@InPutString9
[@CallInPutString10]
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是蜀国国王,不能设置
BREAK
#IF
EQUALS10$USERNAME
#ACT
MESSAGEBOX不能设置自己
BREAK
#IF
S10.CheckNational3
#ELSEACT
MESSAGEBOX$STR(S10)不是蜀国成员
BREAK
#IF
EQUALA61$STR(S10)
#ACT
MESSAGEBOX$STR(S10)是本国皇妃,不能设置
break
#IF
CheckOnline$STR(S10)
#ELSEACT
MESSAGEBOX$STR(S10)不在线,不能设置。
BREAK
#IF
S10.genderwoman
#ELSEACT
MESSAGEBOX$STR(S10)不是女性,不能设置。
break
#IF
CHECKGAMEGOLD99999
#ACT
GAMEGOLD-100000
#ACT
MOVA61$STR(S10)
GuildNoticeMsg0253恭喜$STR(S10)被$NATIONNAME国王$NATIONKING封为皇后,攻击增加30%
GuildNoticeMsg0253恭喜$STR(S10)被$NATIONNAME国王$NATIONKING封为皇后,攻击增加30%
HCALL$STR(S10)@重新登记封号
#ELSEACT
MESSAGEBOX国王封皇后需要花10W元宝
[@CallInPutString11]
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是蜀国国王,不能设置
BREAK
#IF
EQUALS11$USERNAME
#ACT
MESSAGEBOX不能设置自己
BREAK
#IF
EQUALA61$STR(S11)
#ACT
MESSAGEBOX$STR(S11)是本国皇后,不能设置
break
#IF
S11.CheckNational3
#ELSEACT
MESSAGEBOX$STR(S11)不是蜀国成员
BREAK
#IF
CheckOnline$STR(S11)
#ELSEACT
MESSAGEBOX$STR(S11)不在线,不能设置。
BREAK
#IF
S11.genderwoman
#ELSEACT
MESSAGEBOX$STR(S11)不是女性,不能设置。
break
#IF
CHECKGAMEGOLD49999
#ACT
GAMEGOLD-50000
#ACT
MOVA62$STR(S11)
GuildNoticeMsg0253恭喜$STR(S11)被$NATIONNAME国王$NATIONKING封为皇妃,攻击增加20%
GuildNoticeMsg0253恭喜$STR(S11)被$NATIONNAME国王$NATIONKING封为皇妃,攻击增加20%
HCALL$STR(S11)@重新登记封号
#ELSEACT
MESSAGEBOX国王封皇妃需要花5W元宝
[@CallInPutString0]
#IF
CheckNational3
ISKING3
#ELSEACT
MESSAGEBOX您不是蜀国国王,不能封精英。
BREAK
#IF
CHECKVARGLOBALMrrp_蜀国国王名字=$STR(S0)
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline$STR(S0)
#ACT
CALCVARGLOBALMrrp_蜀国精英设置检测1=$STR(S0)
CALCVARGLOBALMrrp_蜀国精英设置检测2=0
SAVEVARGLOBALMrrp_蜀国精英设置检测1..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国精英设置检测2..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
HCALL$STR(S0)@设置蜀国精英
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX$STR(S0)不在线,不能设置。
[@CallInPutString1]
#IF
CheckNational3
ISKING3
#ELSEACT
MESSAGEBOX您不是蜀国国王,不能封精英。
BREAK
#IF
CHECKVARGLOBALMrrp_蜀国国王名字=$STR(S1)
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline$STR(S1)
#ACT
CALCVARGLOBALMrrp_蜀国精英设置检测1=$STR(S1)
CALCVARGLOBALMrrp_蜀国精英设置检测2=1
SAVEVARGLOBALMrrp_蜀国精英设置检测1..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国精英设置检测2..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
HCALL$STR(S1)@设置蜀国精英
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX$STR(S1)不在线,不能设置。
[@CallInPutString2]
#IF
CheckNational3
ISKING3
#ELSEACT
MESSAGEBOX您不是蜀国国王,不能封精英。
BREAK
#IF
CHECKVARGLOBALMrrp_蜀国国王名字=$STR(S2)
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline$STR(S2)
#ACT
CALCVARGLOBALMrrp_蜀国精英设置检测1=$STR(S2)
CALCVARGLOBALMrrp_蜀国精英设置检测2=2
SAVEVARGLOBALMrrp_蜀国精英设置检测1..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
SAVEVARGLOBALMrrp_蜀国精英设置检测2..QuestDiaryMrrp系列脚本国战系统自定义全局变量数据.txt
HCALL$STR(S2)@设置蜀国精英
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX$STR(S2)不在线,不能设置。 |