;ӿű

;: ⺰ûзǷַ,
;      ķǷַΪӲеĹб
;      ʹýűʱִвеĴʽ
;ʽ: FilterCharacter <$str(S22)>


;: Ƿɹ
;ʽ: CrossServeronline

;: Ϳ
;ʽ: SendCrossMsg Ϣ


[@main]

ÿϢȡ2000Ԫãʾ20롣\ \

<Ҫ/@@InPutString22> 





[@InPutString22]
#if
CheckStringlength <$str(S22)> > 50
#act
messagebox ַ25()ڡ
break
;-------------------------------------
#if
FilterCharacter <$str(S22)>
#act
messagebox ͵ݰǷַ
break
;-------------------------------------
#if
checkgamegold < 1999
#act
messagebox ûǮ߱ȥ
break
;-------------------------------------
#IF
CrossServeronline
#ACT
gamegold - 2000
SendCrossMsg <$str(S22)>
sendmsg 6 [ʾ]:ݷͳɹ...
break
#elseact
messagebox ݲãԺԡ

