;;;QQ:67762207
[@NPC_Main]
{
#ACT
LoadValue A1 "PlayerParam\富豪旗.ini" [RICH] [NOTICE]
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]
LoadValue D0 "PlayerParam\富豪旗.ini" [RICH] [JF]
#IF
!EQUAL A0 ""
#SAY
{FCOLOR/14}<$OUTPUT(A0)>{FCOLOR/12}玩家花费了{ FCOLOR/13}<$OUTPUT(D0)>积分{FCOLOR/12}占领了本旗帜\
旗帜主人留言如下：\\
{FCOLOR/10}<$OUTPUT(A1)>{FCOLOR/12}\\

<旗帜主人留言/@旗帜主人留言>\
<旗帜主人更换旗帜外观/@旗帜主人更换旗帜外观>\
<旗帜主人更换旗帜颜色/@旗帜主人更换旗帜颜色>\\
<我要占领这面旗帜/@我要占领这面旗帜>    <占领说明/@占领说明>\



#ELSESAY
__据我所知，这里的人都是穷人....\\
__<我要占领这面旗帜/@我要占领这面旗帜>    <占领说明/@占领说明>\

[@旗帜主人更换旗帜外观]
#ACT
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]


#IF
EQUAL A0 %USERNAME
#SAY
请选择旗帜样式。 \\
<0号/@FLAGnum(0)> , <1号/@FLAGnum(1)> , <2号/@FLAGnum(2)>\
<3号/@FLAGnum(3)> , <4号/@FLAGnum(4)> , <5号/@FLAGnum(5)>\
<6号/@FLAGnum(6)> , <7号/@FLAGnum(7)> , <8号/@FLAGnum(8)>\
<9号/@FLAGnum(9)> , <10号/@FLAGnum(10)> , <11号/@FLAGnum(11)>\


[@FLAGnum()]
#ACT
mov D0 %ARG(1)
loadValue D1 "PlayerParam\富豪旗.ini" [旗子设定] [红]
loadValue D2 "PlayerParam\富豪旗.ini" [旗子设定] [绿]
loadValue D3 "PlayerParam\富豪旗.ini" [旗子设定] [蓝]
saveValue "PlayerParam\富豪旗.ini" [旗子设定] [样式] %D0
TestFlag %D0 %D1 %D2 %D3
#SAY
样式更换完毕.\\
<关闭/@exit>


[@旗帜主人更换旗帜颜色]
#ACT
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]


#IF
EQUAL A0 %USERNAME
#ACT
loadValue D0 "PlayerParam\富豪旗.ini" [旗子设定] [样式]
movr D1 16
movr D2 16
movr D3 16
saveValue "PlayerParam\富豪旗.ini" [旗子设定] [红] %D1
saveValue "PlayerParam\富豪旗.ini" [旗子设定] [绿] %D2
saveValue "PlayerParam\富豪旗.ini" [旗子设定] [蓝] %D3
TestFlag %D0 %D1 %D2 %D3
#SAY
颜色更换完毕.\\
<再换/@旗帜主人更换旗帜颜色>\

[@占领说明]
#IF
#SAY
使用比旗帜主人多出10积分便可占领该旗帜\
前任旗帜主人的积分将不会被返还\
每月1号19:00整,旗帜主人将获得与当时旗帜占领费同等的积分奖励\
旗帜每30分钟会向外广播主人的留言\\


[@旗帜主人留言]
#ACT
LoadValue A1 "PlayerParam\富豪旗.ini" [RICH] [NOTICE]
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]
LoadValue D0 "PlayerParam\富豪旗.ini" [RICH] [JF]

#IF
EQUAL A0 %USERNAME
#SAY
请您善用本留言功能\
禁止发布任何有关政治,色情,暴力内容\
禁止使用本功能对区服进行诬蔑,抨击\
禁止发布有关物价,装备的虚假信息\
本服GM保留删除您的留言,且不作出解释的权力\
使用本留言功能均视为默认同意以上规则\\

<点此输入您要留言的内容/@@输入内容>\

#ELSESAY
只有旗帜的主人才可以留言.\\
<我要占领这面旗帜/@我要占领这面旗帜>    <占领说明/@占领说明>\

[@@输入内容]
#IF
#ACT
mov A1 %INPUTSTR
Savevalue "PlayerParam\富豪旗.ini" [RICH] [NOTICE] %A1
formatstr "富豪旗主人--伟大的勇士『%s』留言:%s" %USERNAME,%A1
linemsg [grobal] "<$OUTPUT(A9)>"
#SAY
您的留言:\\
<$OUTPUT(A1)>\\
已保存.\



[@我要占领这面旗帜]
#ACT
LoadValue A1 "PlayerParam\富豪旗.ini" [RICH] [NOTICE]
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]
LoadValue D0 "PlayerParam\富豪旗.ini" [RICH] [JF]

#say
{FCOLOR/14}<$OUTPUT(A7)>{FCOLOR/12}大侠使用了{FCOLOR/10} <$OUTPUT(D0)> {FCOLOR/12}积分证明了他是世界上{FCOLOR/13}最富有{FCOLOR/12}的人.\
除非你比他多出10积分，我才相信你是世界上{FCOLOR/13}最富有\
最NB{FCOLOR/12}的人.\\\
<我出积分/@jfputout>\
<偶是穷人/@exit>

[@jfputout]
#ACT
LoadValue A1 "PlayerParam\富豪旗.ini" [RICH] [NOTICE]
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]
LoadValue D0 "PlayerParam\富豪旗.ini" [RICH] [JF]

#if
inc D0 10
checkcmd checkuserjf %D0
#act
actcmd SETuserJF - %D0
SaveValue "PlayerParam\富豪旗.ini" [RICH] [JF] %D0
SaveValue "PlayerParam\富豪旗.ini" [RICH] [NAME] %USERNAME

FORMATSTR "%S,%s,%s," 1 402 143
ADDSTR A9 %NPCNAME
MOV A8 %A9
FORMATSTR "%S的旗帜" %USERNAME
NPCNAMECHG %A8 %A9
FORMATSTR "%S,%s,%s," 1 400 145
ADDSTR A9 %NPCNAME
MOV A8 %A9
FORMATSTR "%S的旗帜" %USERNAME
NPCNAMECHG %A8 %A9
FORMATSTR "%S,%s,%s," 1 398 147
ADDSTR A9 %NPCNAME
MOV A8 %A9
FORMATSTR "%S的旗帜" %USERNAME
NPCNAMECHG %A8 %A9


#say
这个神话大陆果然英雄辈出！\
我{FCOLOR/13}尊敬的主人{FCOLOR/12}，您用了{FCOLOR/10} <$OUTPUT(D0)> {FCOLOR/12}积分，站在了世界的首位……\\
从今天起我将为您效力{FCOLOR/14}:){FCOLOR/12}\\\

<关 闭/@exit>
#ELSESAY
你也没积分啊，等你有了积分再来吧！！！

[@_Startup]
#IF
#ACT
loadValue D1 "PlayerParam\富豪旗.ini" [旗子设定] [红]
loadValue D2 "PlayerParam\富豪旗.ini" [旗子设定] [绿]
loadValue D3 "PlayerParam\富豪旗.ini" [旗子设定] [蓝]
loadValue D0 "PlayerParam\富豪旗.ini" [旗子设定] [样式]
TestFlag %D0 %D1 %D2 %D3


LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]
FORMATSTR "%S,%s,%s," 1 402 143
ADDSTR A9 %NPCNAME
MOV A8 %A9
FORMATSTR "%S的旗帜" %A0
NPCNAMECHG %A8 %A9
FORMATSTR "%S,%s,%s," 1 400 145
ADDSTR A9 %NPCNAME
MOV A8 %A9
FORMATSTR "%S的旗帜" %A0
NPCNAMECHG %A8 %A9
FORMATSTR "%S,%s,%s," 1 398 147
ADDSTR A9 %NPCNAME
MOV A8 %A9
FORMATSTR "%S的旗帜" %A0
NPCNAMECHG %A8 %A9


#IF
#ACT
LoadValue A1 "PlayerParam\富豪旗.ini" [RICH] [NOTICE]
LoadValue A0 "PlayerParam\富豪旗.ini" [RICH] [NAME]
#IF
!EQUAL A1 ""
#ACT
;;Speak "%A1"
formatstr "富豪旗主人--伟大的勇士『%s』留言:%s" %A0,%A1
linemsg [grobal] "<$OUTPUT(A9)>"
#ELSEACT
Speak "主人还未留言."


#IF
#ACT
Delaygoto [Grobal] 1200 @_Startup

}
;;;QQ:67762207
