最新传奇一条龙国王系统脚本_传奇一条龙代理的玩法

(@@InPutString @@InPutInteger )

[@main]

<蜀国总统信息/SCOLOR=221>：<战绩最高/@>的可以登基总统宝座！<[退位让贤]/@退位让贤>

===========================================================

蜀国当前就任的总统：<$STR(A64)> 好评率:<$STR(A72)>% <低于50%部分总统权利禁用>

当前等级为：<$STR(A62)>

当前战绩为：<$STR(A61)>

今日贡献：<$STR(A63)> <贡献度说明/@贡献说明1> <如何做总统/@做总统>

如果你的<个人实力/@实力>有<2项>超过了总统，你就可以<争夺总统宝座/AUTOCOLOR=250,253,254>

<夺取总统宝座/@夺取总统宝座> <领取总统龙珠/@领取总统专用物品> <总统至高权利/@总统至高权利>

[@贡献说明1]

#act

MESSAGEBOX 向国家捐款（国家使者），可以获得相应数量的贡献度!贡献度按天计算，每天0点重新计算！！

[@实力]

#say

=========================总统实力==========================

当前等级为：<$STR(A62)> 当前战绩为：<$STR(A61)> 今日贡献：<$STR(A63)>

=========================个人实力==========================

当前等级为：<$LEVEL> 当前战绩为：<$GAMEPOINT> 今日贡献：<$HUMAN(JUAN)>

[@退位让贤]

#CALL [总统让位蜀国.txt] @蜀国让位

[@领取总统专用物品]

#IF

IsKing 3

#ACT

GOTO @领取物品

#ELSESAY

对不起你不是蜀王总统!

[@领取物品]

尊敬的总统:

<领取总统龙珠需要,2W元宝+500点战绩/SCOLOR=251>

说明:<宝石不可以修理，可以触发1.6倍攻击属性/SCOLOR=254>

<确定领取/@确定领取><★━━━━★/AUTOCOLOR=250,253,254,241><确定领取/@确定领取>

[@确定领取]

IsKing 1

CheckGAMEPOINT > 499

CHECKGAMEGOLD > 19999

GAMEPOINT - 500

GAMEGOLD - 20000

give 总统龙珠 1

SENDMSG 1 恭喜： 蜀国总统[%s]成功领取总统龙珠！

对不起你不是总统，或者你没有2W元宝和500点战绩

[@做总统]

当前无总统状态，只要是上将官员并且有1000点战绩你就能做总统

只要上将官的战绩超过了总统就可以抢夺总统王位

要是你是款爷的并且还是上将官的话，只要花点元宝就能抢夺王位

总统能带上总统专属宝石！并且发挥1.6倍的攻击

并能享受只有总统才有的权利，心动了吗，那就行动吧

[@夺取总统宝座]

-----------------------------------------------------------

当前国家可用国库资金：<$NATIONGOLD>元

<争夺总统/@夺取总统宝座2> 我的战绩比总统的战绩多，我觉得我有资格。

<夺取总统/@夺取总统> 我要花20000元宝来领导国家。

[@夺取总统宝座2]

CheckNational 3

#ELSEACT

MESSAGEBOX 您不是蜀国人，不能争夺总统宝座。

BREAK

#if

IsKing

MESSAGEBOX 您现在已经是总统了。

break

;-----------------------------------------------------------------------

CheckNationRankLevel > 8

MOV S99 <$NATIONKING>

#elseact

messagebox 对不起，你不是上将军衔!

EQUAL S99

GOTO @无总统

CHECKGAMEPOINT > <$STR(A61)>

CHECKLEVELEX > <$STR(A62)>

MOV A36 <$STR(A64)>

ChangeKing 3

MOV A61 <$GAMEPOINT>

MOV A62 <$LEVEL>

MOV A63 <$HUMAN(JUAN)>

MOV A64 <$USERNAME>

MOV A72 <$ARM>

ChangeNationPro 2 - 20000

ChangeNationPro 2 + 50

SetOnTimer 3 60

GuildNoticeMsg 245 255 恭喜<$USERNAME>成为蜀国新的总统,在<$USERNAME>的领导下，蜀国会强大无比!

GOTO @清除精英

close

goto @夺取总统宝座2a

;=====================================增加无总统操作开始=======================

[@无总统]

CHECKGAMEPOINT > 999

GAMEPOINT - 1000

goto @清除精英

messagebox 对不起，你的战绩不够1000点

;=====================================增加无总统操作结束=======================

;=====================================增加元宝夺取总统操作开始=======================

[@夺取总统]

#elseACT

messagebox 你的元宝不够20000，不能夺取！

ChangeNationPro 0 + 500

gamegold - 20000

;=====================================增加元宝夺取总统操作结束=======================

[@清除变量]

ISADMIN

MOV A61 0

MOV A63 0

MOV A62 0

GOTO @MAIN

MESSAGEBOX 成功！

MESSAGEBOX 你并非管理员

[@夺取总统宝座2a]

CHECKVAR HUMAN JUAN > <$STR(A63)>

goto @夺取总统宝座2b

[@夺取总统宝座2b]

MESSAGEBOX 申请失败原因：1.你的等级没能超过总统 2.你的捐献没有超过总统 3.你的战绩没有超过总统 要继续加油喔！

;--------------------------------------------------------------------------

[@总统至高权利]

MESSAGEBOX 您不是总统，不能享受权利。

总统可以对本国成员封<国家精英>称号，国家精英得到10%的攻击

精英在得到提示后，即攻击加高10%，精英人数限定为10人

<封国家精英/@封国家精英> 册封为国家精英攻击力提高10%

<开启国战/@开启国战> 所有地图杀敌方人物可以获得战绩！

<号令天下/@公告> 召唤本国国民到总统身边。命令：<总统令>.

<赦免囚禁/@赦免囚禁> 赦免 洗红、释放本国臣民

[@赦免囚禁]

CheckNationPro 2 > 50

#CALL [总统关押蜀国.txt] @关押国民A

messagebox 作为总统<50%>好评度都没有，此功能禁用!

[@开启国战]

#SAY

总统可以开启国战功能:所有地图杀敌方人物可以获得战绩,时长15分钟

<开启条件/@1>:开启国战系统需要<100两>国库资金。

<国库资金>:<$NATIONGOLD>

<开启国战/@开启国战1>

[@开启国战1]

CheckNationPro 0 > 99

EQUAL G26 0

ChangeNationPro 0 - 100

MOV G26 15

GuildNoticeMsg 246 162 [战报]：蜀国总统[<$NATIONKING>]开启了国战,时长15分钟!

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]

MESSAGEBOX 您不是蜀国总统，不能封精英。

ISKING 3

MESSAGEBOX 您不是总统,不能设置

EQUAL A44 <$STR(S0)>

MESSAGEBOX <$STR(S0)>是总统，不能设置为精英

EQUAL A64 <$STR(S0)>

MESSAGEBOX 不能设置自己，不能设置为精英

CheckOnline <$STR(S0)>

MOV A7 <$STR(S0)>

MOV G71 0

HCALL <$STR(S0)> @精英设置3

GOTO @封国家精英

CLOSE

MESSAGEBOX <$STR(S0)>不在线，不能设置。

[@CallInPutString1]

EQUAL A44 <$STR(S1)>

MESSAGEBOX <$STR(S1)>是总统，不能设置为精英

EQUAL A64 <$STR(S1)>

CheckOnline <$STR(S1)>

MOV A7 <$STR(S1)>

MOV G71 1

HCALL <$STR(S1)> @精英设置3

MESSAGEBOX <$STR(S1)>不在线，不能设置。

[@CallInPutString2]

EQUAL A44 <$STR(S2)>

MESSAGEBOX <$STR(S2)>是总统，不能设置为精英

EQUAL A64 <$STR(S2)>

CheckOnline <$STR(S2)>

MOV A7 <$STR(S2)>

MOV G71 2

HCALL <$STR(S2)> @精英设置3

MESSAGEBOX <$STR(S2)>不在线，不能设置。

[@CallInPutString3]

EQUAL A44 <$STR(S3)>

MESSAGEBOX <$STR(S3)>是总统，不能设置为精英

EQUAL A64 <$STR(S3)>

CheckOnline <$STR(S3)>

MOV A7 <$STR(S3)>

MOV G71 3

HCALL <$STR(S3)> @精英设置2

MESSAGEBOX <$STR(S3)>不在线，不能设置。

[@CallInPutString4]

EQUAL A44 <$STR(S4)>

MESSAGEBOX <$STR(S4)>是总统，不能设置为精英

EQUAL A64 <$STR(S4)>

CheckOnline <$STR(S4)>

MOV A7 <$STR(S4)>

MOV G71 4

HCALL <$STR(S4)> @精英设置3

MESSAGEBOX <$STR(S4)>不在线，不能设置。

[@CallInPutString5]

EQUAL A44 <$STR(S5)>

MESSAGEBOX <$STR(S5)>是总统，不能设置为精英

EQUAL A64 <$STR(S5)>

CheckOnline <$STR(S5)>

MOV A7 <$STR(S5)>

MOV G71 5

HCALL <$STR(S5)> @精英设置3

MESSAGEBOX <$STR(S5)>不在线，不能设置。

[@CallInPutString6]

EQUAL A44 <$STR(S6)>

MESSAGEBOX <$STR(S6)>是总统，不能设置为精英

EQUAL A64 <$STR(S6)>

CheckOnline <$STR(S6)>

MOV A7 <$STR(S6)>

MOV G71 6

HCALL <$STR(S6)> @精英设置3

MESSAGEBOX <$STR(S6)>不在线，不能设置。

[@CallInPutString7]

EQUAL A44 <$STR(S7)>

MESSAGEBOX <$STR(S7)>是总统，不能设置为精英

EQUAL A64 <$STR(S7)>

CheckOnline <$STR(S7)>

MOV A7 <$STR(S7)>

MOV G71 7

HCALL <$STR(S7)> @精英设置3

MESSAGEBOX <$STR(S7)>不在线，不能设置。

[@CallInPutString8]

EQUAL A44 <$STR(S8)>

MESSAGEBOX <$STR(S8)>是总统，不能设置为精英

EQUAL A64 <$STR(S8)>

CheckOnline <$STR(S8)>

MOV A7 <$STR(S8)>

MOV G71 8

HCALL <$STR(S8)> @精英设置3

MESSAGEBOX <$STR(S8)>不在线，不能设置。

[@CallInPutString9]

EQUAL A44 <$STR(S9)>

MESSAGEBOX <$STR(S9)>是总统，不能设置为精英

EQUAL A64 <$STR(S9)>

CheckOnline <$STR(S9)>

MOV A7 <$STR(S9)>

MOV G71 9

HCALL <$STR(S9)> @精英设置3

MESSAGEBOX <$STR(S9)>不在线，不能设置。

[@IsInFilterList]

MESSAGEBOX 输入数据中包含了非法字符,请重新编辑!

[@设置总统封号]

isking 1

SetIcon 0 17

SetIcon 1 18

SetIcon 2 19

SetIcon 3 20

isking 2

SetIcon 0 21

SetIcon 1 22

SetIcon 2 23

SetIcon 3 24

isking 3

SetIcon 0 25

SetIcon 1 26

SetIcon 2 27

SetIcon 3 28

[@清除精英]

EQUAL A10 <$USERNAME>

MOV A10 <$STR(A35)>

EQUAL A11 <$USERNAME>

MOV A11 <$STR(A35)>

EQUAL A12 <$USERNAME>

MOV A12 <$STR(A35)>

EQUAL A13 <$USERNAME>

MOV A13 <$STR(A35)>

EQUAL A14 <$USERNAME>

MOV A14 <$STR(A35)>

EQUAL A15 <$USERNAME>

MOV A15 <$STR(A35)>

EQUAL A16 <$USERNAME>

MOV A16 <$STR(A35)>

EQUAL A17 <$USERNAME>

MOV A17 <$STR(A35)>

EQUAL A18 <$USERNAME>

MOV A18 <$STR(A35)>

EQUAL A19 <$USERNAME>

MOV A19 <$STR(A35)>

EQUAL A20 <$USERNAME>

MOV A20 <$STR(A35)>

EQUAL A21 <$USERNAME>

MOV A21 <$STR(A35)>

EQUAL A22 <$USERNAME>

MOV A22 <$STR(A35)>

EQUAL A23 <$USERNAME>

MOV A23 <$STR(A35)>

EQUAL A24 <$USERNAME>

MOV A24 <$STR(A35)>

EQUAL A25 <$USERNAME>

MOV A25 <$STR(A35)>

EQUAL A26 <$USERNAME>

MOV A26 <$STR(A35)>

EQUAL A27 <$USERNAME>

MOV A27 <$STR(A35)>

EQUAL A28 <$USERNAME>

MOV A28 <$STR(A35)>

EQUAL A29 <$USERNAME>

MOV A29 <$STR(A35)>

EQUAL A30 <$USERNAME>

MOV A30 <$STR(A35)>

EQUAL A31 <$USERNAME>

MOV A31 <$STR(A35)>

EQUAL A33 <$USERNAME>

MOV A33 <$STR(A35)>

EQUAL A34 <$USERNAME>

MOV A34 <$STR(A35)>

EQUAL A35 <$USERNAME>

MOV A35 <$STR(A35)>

EQUAL A36 <$USERNAME>

MOV A36 <$STR(A35)>

EQUAL A37 <$USERNAME>

MOV A37 <$STR(A35)>

EQUAL A38 <$USERNAME>

MOV A38 <$STR(A35)>

EQUAL A39 <$USERNAME>

MOV A39 <$STR(A35)>