(@@InPutString@@InPutInteger)
[@main]
<蜀国总统信息/SCOLOR=221>:<战绩最高/@>的可以登基总统宝座!<[退位让贤]/@退位让贤>\
===========================================================\
蜀国当前就任的总统:<$STR(A64)>好评率:<$STR(A72)>%<低于50%部分总统权利禁用>\
当前等级为:<$STR(A62)>\
当前战绩为:<$STR(A61)>\
今日贡献:<$STR(A63)><贡献度说明/@贡献说明1><如何做总统/@做总统>\
===========================================================\
如果你的<个人实力/@实力>有<2项>超过了总统,你就可以<争夺总统宝座/AUTOCOLOR=250253254>\
<夺取总统宝座/@夺取总统宝座><领取总统龙珠/@领取总统专用物品><总统至高权利/@总统至高权利>\
[@贡献说明1]
#act
MESSAGEBOX向国家捐款(国家使者),可以获得相应数量的贡献度!\贡献度按天计算,每天0点重新计算!!
[@实力]
#say
=========================总统实力==========================\\
当前等级为:<$STR(A62)>当前战绩为:<$STR(A61)>今日贡献:<$STR(A63)>\
=========================个人实力==========================\\
当前等级为:<$LEVEL>当前战绩为:<$GAMEPOINT>今日贡献:<$HUMAN(JUAN)>\
===========================================================\
[@退位让贤]
#CALL[\总统让位\蜀国.txt]@蜀国让位
[@领取总统专用物品]
#IF
IsKing3
#ACT
GOTO@领取物品
#ELSESAY
对不起你不是蜀王总统!
[@领取物品]
尊敬的总统:\
<领取总统龙珠需要2W元宝+500点战绩/SCOLOR=251>\
说明:<宝石不可以修理,可以触发1.6倍攻击属性/SCOLOR=254>\
\
\
<确定领取/@确定领取><★━━━━★/AUTOCOLOR=250253254241><确定领取/@确定领取>\
[@确定领取]
#IF
IsKing1
CheckGAMEPOINT>499
CHECKGAMEGOLD>19999
#ACT
GAMEPOINT-500
GAMEGOLD-20000
give总统龙珠1
SENDMSG1恭喜:蜀国总统[%s]成功领取总统龙珠!
#ELSESAY
对不起你不是总统,或者你没有2W元宝和500点战绩\
[@做总统]
当前无总统状态,只要是上将官员并且有1000点战绩你就能做总统\
只要上将官的战绩超过了总统就可以抢夺总统王位\
要是你是款爷的并且还是上将官的话,只要花点元宝就能抢夺王位\
总统能带上总统专属宝石!并且发挥1.6倍的攻击\
并能享受只有总统才有的权利,心动了吗,那就行动吧\
[@夺取总统宝座]
-----------------------------------------------------------\
当前国家可用国库资金:<$NATIONGOLD>元\
\
<争夺总统/@夺取总统宝座2>我的战绩比总统的战绩多,我觉得我有资格。\
<夺取总统/@夺取总统>我要花20000元宝来领导国家。\
\
-----------------------------------------------------------\
[@夺取总统宝座2]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国人,不能争夺总统宝座。
BREAK
#if
IsKing
#act
MESSAGEBOX您现在已经是总统了。
break
;-----------------------------------------------------------------------
#if
CheckNationRankLevel>8
#ACT
MOVS99<$NATIONKING>
#elseact
messagebox对不起,你不是上将军衔!
BREAK
#IF
EQUALS99
#ACT
GOTO@无总统
BREAK
#if
CHECKGAMEPOINT><$STR(A61)>
CHECKLEVELEX><$STR(A62)>
CheckNational3
#ACT
MOVA36<$STR(A64)>
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro2-20000
ChangeNationPro2+50
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
GOTO@清除精英
close
break
#ELSEACT
goto@夺取总统宝座2a
BREAK
;=====================================增加无总统操作开始=======================
[@无总统]
#IF
CHECKGAMEPOINT>999
CheckNational3
#ACT
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
GAMEPOINT-1000
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
goto@清除精英
close
#elseact
messagebox对不起,你的战绩不够1000点
;=====================================增加无总统操作结束=======================
;=====================================增加元宝夺取总统操作开始=======================
[@夺取总统]
#IF
CHECKGAMEGOLD>19999
#elseACT
messagebox你的元宝不够20000,不能夺取!
break
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国人,不能争夺总统宝座。
BREAK
#if
IsKing
#act
MESSAGEBOX您现在已经是总统了。
break
#if
CheckNationRankLevel>8
#ACT
MOVS99<$NATIONKING>
#elseact
messagebox对不起,你不是上将军衔!
BREAK
#IF
EQUALS99
#ACT
GOTO@无总统
BREAK
#if
CHECKGAMEGOLD>19999
CheckNational3
#ACT
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro0+500
gamegold-20000
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
goto@清除精英
close
break
;=====================================增加元宝夺取总统操作结束=======================
[@清除变量]
#IF
ISADMIN
#ACT
MOVA610
MOVA630
MOVA620
GOTO@MAIN
MESSAGEBOX成功!
#ELSEACT
MESSAGEBOX你并非管理员
[@夺取总统宝座2a]
#if
CHECKGAMEPOINT><$STR(A61)>
CHECKVARHUMANJUAN><$STR(A63)>
CheckNational3
#ACT
MOVA36<$STR(A64)>
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro2-20000
ChangeNationPro2+50
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
GOTO@清除精英
close
break
#ELSEACT
goto@夺取总统宝座2b
BREAK
[@夺取总统宝座2b]
#if
CHECKVARHUMANJUAN><$STR(A63)>
CHECKLEVELEX><$STR(A62)>
CheckNational3
#ACT
MOVA36<$STR(A64)>
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro2-20000
ChangeNationPro2+50
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
GOTO@清除精英
close
break
#ELSEACT
MESSAGEBOX申请失败原因:1.你的等级没能超过总统2.你的捐献没有超过总统3.你的战绩没有超过总统要继续加油喔!
BREAK
;--------------------------------------------------------------------------
[@总统至高权利]
#IF
IsKing3
CheckNational3
#ELSEACT
MESSAGEBOX您不是总统,不能享受权利。
BREAK
#say
总统可以对本国成员封<国家精英>称号,国家精英得到10%的攻击\\
精英在得到提示后,即攻击加高10%,精英人数限定为10人\\
<封国家精英/@封国家精英>册封为国家精英攻击力提高10%\
<开启国战/@开启国战>所有地图杀敌方人物可以获得战绩!\
<号令天下/@公告>召唤本国国民到总统身边。命令:<总统令>.\
<赦免囚禁/@赦免囚禁>赦免洗红、释放本国臣民\
[@赦免囚禁]
#IF
CheckNationPro2>50
#ACT
#CALL[\总统关押\蜀国.txt]@关押国民A
#elseact
messagebox作为总统<50%>好评度都没有,此功能禁用!
[@开启国战]
#IF
#SAY
总统可以开启国战功能:所有地图杀敌方人物可以获得战绩时长15分钟\\
<开启条件/@1>:开启国战系统需要<100两>国库资金。\\
<国库资金>:<$NATIONGOLD>\\
<开启国战/@开启国战1>
[@开启国战1]
#IF
CheckNationPro0>99
EQUALG260
#ACT
ChangeNationPro0-100
MOVG2615
GuildNoticeMsg246162[战报]:蜀国总统[<$NATIONKING>]开启了国战时长15分钟!
#elseact
messagebox现在国战还在进行中...或者国库资金不足....请稍后开启!
[@封国家精英]
国家精英名额一是:<$STR(A30)>总统可以<设置/@@InPutString0>为精英<修改/@@InPutString0>\
国家精英名额二是:<$STR(A31)>总统可以<设置/@@InPutString1>为精英<修改/@@InPutString1>\
国家精英名额三是:<$STR(A32)>总统可以<设置/@@InPutString2>为精英<修改/@@InPutString2>\
国家精英名额四是:<$STR(A33)>总统可以<设置/@@InPutString3>为精英<修改/@@InPutString3>\
国家精英名额五是:<$STR(A34)>总统可以<设置/@@InPutString4>为精英<修改/@@InPutString4>\
国家精英名额六是:<$STR(A35)>总统可以<设置/@@InPutString5>为精英<修改/@@InPutString5>\
国家精英名额七是:<$STR(A36)>总统可以<设置/@@InPutString6>为精英<修改/@@InPutString6>\
国家精英名额八是:<$STR(A37)>总统可以<设置/@@InPutString7>为精英<修改/@@InPutString7>\
国家精英名额九是:<$STR(A38)>总统可以<设置/@@InPutString8>为精英<修改/@@InPutString8>\
国家精英名额十是:<$STR(A39)>总统可以<设置/@@InPutString9>为精英<修改/@@InPutString9>\
[@CallInPutString0]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S0)>
#ACT
MESSAGEBOX<$STR(S0)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S0)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S0)>
#ACT
MOVA7<$STR(S0)>
MOVG710
HCALL<$STR(S0)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S0)>不在线,不能设置。
[@CallInPutString1]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S1)>
#ACT
MESSAGEBOX<$STR(S1)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S1)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S1)>
#ACT
MOVA7<$STR(S1)>
MOVG711
HCALL<$STR(S1)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S1)>不在线,不能设置。
[@CallInPutString2]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S2)>
#ACT
MESSAGEBOX<$STR(S2)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S2)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S2)>
#ACT
MOVA7<$STR(S2)>
MOVG712
HCALL<$STR(S2)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S2)>不在线,不能设置。
[@CallInPutString3]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S3)>
#ACT
MESSAGEBOX<$STR(S3)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S3)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S3)>
#ACT
MOVA7<$STR(S3)>
MOVG713
HCALL<$STR(S3)>@精英设置2
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S3)>不在线,不能设置。
[@CallInPutString4]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S4)>
#ACT
MESSAGEBOX<$STR(S4)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S4)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S4)>
#ACT
MOVA7<$STR(S4)>
MOVG714
HCALL<$STR(S4)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S4)>不在线,不能设置。
[@CallInPutString5]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S5)>
#ACT
MESSAGEBOX<$STR(S5)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S5)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S5)>
#ACT
MOVA7<$STR(S5)>
MOVG715
HCALL<$STR(S5)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S5)>不在线,不能设置。
[@CallInPutString6]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S6)>
#ACT
MESSAGEBOX<$STR(S6)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S6)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S6)>
#ACT
MOVA7<$STR(S6)>
MOVG716
HCALL<$STR(S6)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S6)>不在线,不能设置。
[@CallInPutString7]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S7)>
#ACT
MESSAGEBOX<$STR(S7)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S7)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S7)>
#ACT
MOVA7<$STR(S7)>
MOVG717
HCALL<$STR(S7)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S7)>不在线,不能设置。
[@CallInPutString8]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S8)>
#ACT
MESSAGEBOX<$STR(S8)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S8)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S8)>
#ACT
MOVA7<$STR(S8)>
MOVG718
HCALL<$STR(S8)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S8)>不在线,不能设置。
[@CallInPutString9]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S9)>
#ACT
MESSAGEBOX<$STR(S9)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S9)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S9)>
#ACT
MOVA7<$STR(S9)>
MOVG719
HCALL<$STR(S9)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S9)>不在线,不能设置。
[@IsInFilterList]
#ACT
MESSAGEBOX输入数据中包含了非法字符请重新编辑!
[@设置总统封号]
#if
isking1
#act
SetIcon017
SetIcon118
SetIcon219
SetIcon320
#if
isking2
#act
SetIcon021
SetIcon122
SetIcon223
SetIcon324
#if
isking3
#act
SetIcon025
SetIcon126
SetIcon227
SetIcon328
[@清除精英]
#IF
EQUALA10<$USERNAME>
#ACT
MOVA10<$STR(A35)>
#IF
EQUALA11<$USERNAME>
#ACT
MOVA11<$STR(A35)>
#IF
EQUALA12<$USERNAME>
#ACT
MOVA12<$STR(A35)>
#IF
EQUALA13<$USERNAME>
#ACT
MOVA13<$STR(A35)>
#IF
EQUALA14<$USERNAME>
#ACT
MOVA14<$STR(A35)>
#IF
EQUALA15<$USERNAME>
#ACT
MOVA15<$STR(A35)>
#IF
EQUALA16<$USERNAME>
#ACT
MOVA16<$STR(A35)>
#IF
EQUALA17<$USERNAME>
#ACT
MOVA17<$STR(A35)>
#IF
EQUALA18<$USERNAME>
#ACT
MOVA18<$STR(A35)>
#IF
EQUALA19<$USERNAME>
#ACT
MOVA19<$STR(A35)>
#IF
EQUALA20<$USERNAME>
#ACT
MOVA20<$STR(A35)>
#IF
EQUALA21<$USERNAME>
#ACT
MOVA21<$STR(A35)>
#IF
EQUALA22<$USERNAME>
#ACT
MOVA22<$STR(A35)>
#IF
EQUALA23<$USERNAME>
#ACT
MOVA23<$STR(A35)>
#IF
EQUALA24<$USERNAME>
#ACT
MOVA24<$STR(A35)>
#IF
EQUALA25<$USERNAME>
#ACT
MOVA25<$STR(A35)>
#IF
EQUALA26<$USERNAME>
#ACT
MOVA26<$STR(A35)>
#IF
EQUALA27<$USERNAME>
#ACT
MOVA27<$STR(A35)>
#IF
EQUALA28<$USERNAME>
#ACT
MOVA28<$STR(A35)>
#IF
EQUALA29<$USERNAME>
#ACT
MOVA29<$STR(A35)>
#IF
EQUALA30<$USERNAME>
#ACT
MOVA30<$STR(A35)>
#IF
EQUALA31<$USERNAME>
#ACT
MOVA31<$STR(A35)>
#IF
EQUALA22<$USERNAME>
#ACT
MOVA22<$STR(A35)>
#IF
EQUALA33<$USERNAME>
#ACT
MOVA33<$STR(A35)>
#IF
EQUALA34<$USERNAME>
#ACT
MOVA34<$STR(A35)>
#IF
EQUALA35<$USERNAME>
#ACT
MOVA35<$STR(A35)>
#IF
EQUALA36<$USERNAME>
#ACT
MOVA36<$STR(A35)>
#IF
EQUALA37<$USERNAME>
#ACT
MOVA37<$STR(A35)>
#IF
EQUALA38<$USERNAME>
#ACT
MOVA38<$STR(A35)>
#IF
EQUALA39<$USERNAME>
#ACT
MOVA39<$STR(A35)>
[@main]
<蜀国总统信息/SCOLOR=221>:<战绩最高/@>的可以登基总统宝座!<[退位让贤]/@退位让贤>\
===========================================================\
蜀国当前就任的总统:<$STR(A64)>好评率:<$STR(A72)>%<低于50%部分总统权利禁用>\
当前等级为:<$STR(A62)>\
当前战绩为:<$STR(A61)>\
今日贡献:<$STR(A63)><贡献度说明/@贡献说明1><如何做总统/@做总统>\
===========================================================\
如果你的<个人实力/@实力>有<2项>超过了总统,你就可以<争夺总统宝座/AUTOCOLOR=250253254>\
<夺取总统宝座/@夺取总统宝座><领取总统龙珠/@领取总统专用物品><总统至高权利/@总统至高权利>\
[@贡献说明1]
#act
MESSAGEBOX向国家捐款(国家使者),可以获得相应数量的贡献度!\贡献度按天计算,每天0点重新计算!!
[@实力]
#say
=========================总统实力==========================\\
当前等级为:<$STR(A62)>当前战绩为:<$STR(A61)>今日贡献:<$STR(A63)>\
=========================个人实力==========================\\
当前等级为:<$LEVEL>当前战绩为:<$GAMEPOINT>今日贡献:<$HUMAN(JUAN)>\
===========================================================\
[@退位让贤]
#CALL[\总统让位\蜀国.txt]@蜀国让位
[@领取总统专用物品]
#IF
IsKing3
#ACT
GOTO@领取物品
#ELSESAY
对不起你不是蜀王总统!
[@领取物品]
尊敬的总统:\
<领取总统龙珠需要2W元宝+500点战绩/SCOLOR=251>\
说明:<宝石不可以修理,可以触发1.6倍攻击属性/SCOLOR=254>\
\
\
<确定领取/@确定领取><★━━━━★/AUTOCOLOR=250253254241><确定领取/@确定领取>\
[@确定领取]
#IF
IsKing1
CheckGAMEPOINT>499
CHECKGAMEGOLD>19999
#ACT
GAMEPOINT-500
GAMEGOLD-20000
give总统龙珠1
SENDMSG1恭喜:蜀国总统[%s]成功领取总统龙珠!
#ELSESAY
对不起你不是总统,或者你没有2W元宝和500点战绩\
[@做总统]
当前无总统状态,只要是上将官员并且有1000点战绩你就能做总统\
只要上将官的战绩超过了总统就可以抢夺总统王位\
要是你是款爷的并且还是上将官的话,只要花点元宝就能抢夺王位\
总统能带上总统专属宝石!并且发挥1.6倍的攻击\
并能享受只有总统才有的权利,心动了吗,那就行动吧\
[@夺取总统宝座]
-----------------------------------------------------------\
当前国家可用国库资金:<$NATIONGOLD>元\
\
<争夺总统/@夺取总统宝座2>我的战绩比总统的战绩多,我觉得我有资格。\
<夺取总统/@夺取总统>我要花20000元宝来领导国家。\
\
-----------------------------------------------------------\
[@夺取总统宝座2]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国人,不能争夺总统宝座。
BREAK
#if
IsKing
#act
MESSAGEBOX您现在已经是总统了。
break
;-----------------------------------------------------------------------
#if
CheckNationRankLevel>8
#ACT
MOVS99<$NATIONKING>
#elseact
messagebox对不起,你不是上将军衔!
BREAK
#IF
EQUALS99
#ACT
GOTO@无总统
BREAK
#if
CHECKGAMEPOINT><$STR(A61)>
CHECKLEVELEX><$STR(A62)>
CheckNational3
#ACT
MOVA36<$STR(A64)>
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro2-20000
ChangeNationPro2+50
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
GOTO@清除精英
close
break
#ELSEACT
goto@夺取总统宝座2a
BREAK
;=====================================增加无总统操作开始=======================
[@无总统]
#IF
CHECKGAMEPOINT>999
CheckNational3
#ACT
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
GAMEPOINT-1000
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
goto@清除精英
close
#elseact
messagebox对不起,你的战绩不够1000点
;=====================================增加无总统操作结束=======================
;=====================================增加元宝夺取总统操作开始=======================
[@夺取总统]
#IF
CHECKGAMEGOLD>19999
#elseACT
messagebox你的元宝不够20000,不能夺取!
break
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国人,不能争夺总统宝座。
BREAK
#if
IsKing
#act
MESSAGEBOX您现在已经是总统了。
break
#if
CheckNationRankLevel>8
#ACT
MOVS99<$NATIONKING>
#elseact
messagebox对不起,你不是上将军衔!
BREAK
#IF
EQUALS99
#ACT
GOTO@无总统
BREAK
#if
CHECKGAMEGOLD>19999
CheckNational3
#ACT
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro0+500
gamegold-20000
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
goto@清除精英
close
break
;=====================================增加元宝夺取总统操作结束=======================
[@清除变量]
#IF
ISADMIN
#ACT
MOVA610
MOVA630
MOVA620
GOTO@MAIN
MESSAGEBOX成功!
#ELSEACT
MESSAGEBOX你并非管理员
[@夺取总统宝座2a]
#if
CHECKGAMEPOINT><$STR(A61)>
CHECKVARHUMANJUAN><$STR(A63)>
CheckNational3
#ACT
MOVA36<$STR(A64)>
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro2-20000
ChangeNationPro2+50
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
GOTO@清除精英
close
break
#ELSEACT
goto@夺取总统宝座2b
BREAK
[@夺取总统宝座2b]
#if
CHECKVARHUMANJUAN><$STR(A63)>
CHECKLEVELEX><$STR(A62)>
CheckNational3
#ACT
MOVA36<$STR(A64)>
ChangeKing3
MOVA61<$GAMEPOINT>
MOVA62<$LEVEL>
MOVA63<$HUMAN(JUAN)>
MOVA64<$USERNAME>
MOVA72<$ARM>
ChangeNationPro2-20000
ChangeNationPro2+50
SetOnTimer360
GuildNoticeMsg245255恭喜<$USERNAME>成为蜀国新的总统在<$USERNAME>的领导下,蜀国会强大无比!
GOTO@清除精英
close
break
#ELSEACT
MESSAGEBOX申请失败原因:1.你的等级没能超过总统2.你的捐献没有超过总统3.你的战绩没有超过总统要继续加油喔!
BREAK
;--------------------------------------------------------------------------
[@总统至高权利]
#IF
IsKing3
CheckNational3
#ELSEACT
MESSAGEBOX您不是总统,不能享受权利。
BREAK
#say
总统可以对本国成员封<国家精英>称号,国家精英得到10%的攻击\\
精英在得到提示后,即攻击加高10%,精英人数限定为10人\\
<封国家精英/@封国家精英>册封为国家精英攻击力提高10%\
<开启国战/@开启国战>所有地图杀敌方人物可以获得战绩!\
<号令天下/@公告>召唤本国国民到总统身边。命令:<总统令>.\
<赦免囚禁/@赦免囚禁>赦免洗红、释放本国臣民\
[@赦免囚禁]
#IF
CheckNationPro2>50
#ACT
#CALL[\总统关押\蜀国.txt]@关押国民A
#elseact
messagebox作为总统<50%>好评度都没有,此功能禁用!
[@开启国战]
#IF
#SAY
总统可以开启国战功能:所有地图杀敌方人物可以获得战绩时长15分钟\\
<开启条件/@1>:开启国战系统需要<100两>国库资金。\\
<国库资金>:<$NATIONGOLD>\\
<开启国战/@开启国战1>
[@开启国战1]
#IF
CheckNationPro0>99
EQUALG260
#ACT
ChangeNationPro0-100
MOVG2615
GuildNoticeMsg246162[战报]:蜀国总统[<$NATIONKING>]开启了国战时长15分钟!
#elseact
messagebox现在国战还在进行中...或者国库资金不足....请稍后开启!
[@封国家精英]
国家精英名额一是:<$STR(A30)>总统可以<设置/@@InPutString0>为精英<修改/@@InPutString0>\
国家精英名额二是:<$STR(A31)>总统可以<设置/@@InPutString1>为精英<修改/@@InPutString1>\
国家精英名额三是:<$STR(A32)>总统可以<设置/@@InPutString2>为精英<修改/@@InPutString2>\
国家精英名额四是:<$STR(A33)>总统可以<设置/@@InPutString3>为精英<修改/@@InPutString3>\
国家精英名额五是:<$STR(A34)>总统可以<设置/@@InPutString4>为精英<修改/@@InPutString4>\
国家精英名额六是:<$STR(A35)>总统可以<设置/@@InPutString5>为精英<修改/@@InPutString5>\
国家精英名额七是:<$STR(A36)>总统可以<设置/@@InPutString6>为精英<修改/@@InPutString6>\
国家精英名额八是:<$STR(A37)>总统可以<设置/@@InPutString7>为精英<修改/@@InPutString7>\
国家精英名额九是:<$STR(A38)>总统可以<设置/@@InPutString8>为精英<修改/@@InPutString8>\
国家精英名额十是:<$STR(A39)>总统可以<设置/@@InPutString9>为精英<修改/@@InPutString9>\
[@CallInPutString0]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S0)>
#ACT
MESSAGEBOX<$STR(S0)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S0)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S0)>
#ACT
MOVA7<$STR(S0)>
MOVG710
HCALL<$STR(S0)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S0)>不在线,不能设置。
[@CallInPutString1]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S1)>
#ACT
MESSAGEBOX<$STR(S1)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S1)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S1)>
#ACT
MOVA7<$STR(S1)>
MOVG711
HCALL<$STR(S1)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S1)>不在线,不能设置。
[@CallInPutString2]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S2)>
#ACT
MESSAGEBOX<$STR(S2)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S2)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S2)>
#ACT
MOVA7<$STR(S2)>
MOVG712
HCALL<$STR(S2)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S2)>不在线,不能设置。
[@CallInPutString3]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S3)>
#ACT
MESSAGEBOX<$STR(S3)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S3)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S3)>
#ACT
MOVA7<$STR(S3)>
MOVG713
HCALL<$STR(S3)>@精英设置2
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S3)>不在线,不能设置。
[@CallInPutString4]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S4)>
#ACT
MESSAGEBOX<$STR(S4)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S4)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S4)>
#ACT
MOVA7<$STR(S4)>
MOVG714
HCALL<$STR(S4)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S4)>不在线,不能设置。
[@CallInPutString5]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S5)>
#ACT
MESSAGEBOX<$STR(S5)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S5)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S5)>
#ACT
MOVA7<$STR(S5)>
MOVG715
HCALL<$STR(S5)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S5)>不在线,不能设置。
[@CallInPutString6]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S6)>
#ACT
MESSAGEBOX<$STR(S6)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S6)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S6)>
#ACT
MOVA7<$STR(S6)>
MOVG716
HCALL<$STR(S6)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S6)>不在线,不能设置。
[@CallInPutString7]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S7)>
#ACT
MESSAGEBOX<$STR(S7)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S7)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S7)>
#ACT
MOVA7<$STR(S7)>
MOVG717
HCALL<$STR(S7)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S7)>不在线,不能设置。
[@CallInPutString8]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S8)>
#ACT
MESSAGEBOX<$STR(S8)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S8)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S8)>
#ACT
MOVA7<$STR(S8)>
MOVG718
HCALL<$STR(S8)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S8)>不在线,不能设置。
[@CallInPutString9]
#IF
CheckNational3
#ELSEACT
MESSAGEBOX您不是蜀国总统,不能封精英。
BREAK
#IF
ISKING3
#ELSEACT
MESSAGEBOX您不是总统不能设置
BREAK
#IF
EQUALA44<$STR(S9)>
#ACT
MESSAGEBOX<$STR(S9)>是总统,不能设置为精英
BREAK
#IF
EQUALA64<$STR(S9)>
#ACT
MESSAGEBOX不能设置自己,不能设置为精英
BREAK
#if
CheckOnline<$STR(S9)>
#ACT
MOVA7<$STR(S9)>
MOVG719
HCALL<$STR(S9)>@精英设置3
GOTO@封国家精英
CLOSE
#ELSEACT
MESSAGEBOX<$STR(S9)>不在线,不能设置。
[@IsInFilterList]
#ACT
MESSAGEBOX输入数据中包含了非法字符请重新编辑!
[@设置总统封号]
#if
isking1
#act
SetIcon017
SetIcon118
SetIcon219
SetIcon320
#if
isking2
#act
SetIcon021
SetIcon122
SetIcon223
SetIcon324
#if
isking3
#act
SetIcon025
SetIcon126
SetIcon227
SetIcon328
[@清除精英]
#IF
EQUALA10<$USERNAME>
#ACT
MOVA10<$STR(A35)>
#IF
EQUALA11<$USERNAME>
#ACT
MOVA11<$STR(A35)>
#IF
EQUALA12<$USERNAME>
#ACT
MOVA12<$STR(A35)>
#IF
EQUALA13<$USERNAME>
#ACT
MOVA13<$STR(A35)>
#IF
EQUALA14<$USERNAME>
#ACT
MOVA14<$STR(A35)>
#IF
EQUALA15<$USERNAME>
#ACT
MOVA15<$STR(A35)>
#IF
EQUALA16<$USERNAME>
#ACT
MOVA16<$STR(A35)>
#IF
EQUALA17<$USERNAME>
#ACT
MOVA17<$STR(A35)>
#IF
EQUALA18<$USERNAME>
#ACT
MOVA18<$STR(A35)>
#IF
EQUALA19<$USERNAME>
#ACT
MOVA19<$STR(A35)>
#IF
EQUALA20<$USERNAME>
#ACT
MOVA20<$STR(A35)>
#IF
EQUALA21<$USERNAME>
#ACT
MOVA21<$STR(A35)>
#IF
EQUALA22<$USERNAME>
#ACT
MOVA22<$STR(A35)>
#IF
EQUALA23<$USERNAME>
#ACT
MOVA23<$STR(A35)>
#IF
EQUALA24<$USERNAME>
#ACT
MOVA24<$STR(A35)>
#IF
EQUALA25<$USERNAME>
#ACT
MOVA25<$STR(A35)>
#IF
EQUALA26<$USERNAME>
#ACT
MOVA26<$STR(A35)>
#IF
EQUALA27<$USERNAME>
#ACT
MOVA27<$STR(A35)>
#IF
EQUALA28<$USERNAME>
#ACT
MOVA28<$STR(A35)>
#IF
EQUALA29<$USERNAME>
#ACT
MOVA29<$STR(A35)>
#IF
EQUALA30<$USERNAME>
#ACT
MOVA30<$STR(A35)>
#IF
EQUALA31<$USERNAME>
#ACT
MOVA31<$STR(A35)>
#IF
EQUALA22<$USERNAME>
#ACT
MOVA22<$STR(A35)>
#IF
EQUALA33<$USERNAME>
#ACT
MOVA33<$STR(A35)>
#IF
EQUALA34<$USERNAME>
#ACT
MOVA34<$STR(A35)>
#IF
EQUALA35<$USERNAME>
#ACT
MOVA35<$STR(A35)>
#IF
EQUALA36<$USERNAME>
#ACT
MOVA36<$STR(A35)>
#IF
EQUALA37<$USERNAME>
#ACT
MOVA37<$STR(A35)>
#IF
EQUALA38<$USERNAME>
#ACT
MOVA38<$STR(A35)>
#IF
EQUALA39<$USERNAME>
#ACT
MOVA39<$STR(A35)>

