;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@JifenRedCry]
{
#SAY
Please click {FCOLOR/10}Input Shout{FCOLOR/12} \
and then type in the box what you wish to shout.\
{FCOLOR/1}Note: You need 10,000 Gold to use this{FCOLOR/12}
<Input Shout/@@Input>\
<Leave/@Exit>

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

[@@Input]
#ACT
mov A0 %INPUTSTR
mov A8 %USERNAME
#SAY
Is this what you want to shout?\
{FCOLOR/10}<$OUTPUT(A0)>{FCOLOR/12}\\
<Yes/@StartShout>\
<No/@@Input>

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

[@StartShout]
#ACT
Delaygoto [local] 1 @StartCry
#SAY
{FCOLOR/10}Please Wait...{FCOLOR/12}\

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

[@StartCry]
#IF
CheckGold 10000
#ACT
Take Gold 10000
LoadValue A2 [Convert_Def\QuestDiary\RedShout.txt] [Master] [Msg1]
LineMsg "Grobal" %A2
CLOSE
#ELSESAY
Sorry you need {FCOLOR/1}10,000{FCOLOR/12}Gold.\
<Leave/@exit>\
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;