私服传奇里的公告留言脚本

发表普通留言/@@InPutString15>需要2W金币。<发布顶置留言/@@InPutString16>需要[<$STR(G52)>]元宝以上\
╔═════════════════════════════════════\
║<$STR(A52)>\
╠═════════════════════════════════════\
║<$STR(A26)>\
║<$STR(A27)>\
║<$STR(A28)>\
║<$STR(A29)>\
╚═════════════════════════════════════
[@CallInPutString15]
#if
checkgold 20000
#act
take 金币 20000
MOV A29 <$STR(A28)>
MOV A28 <$STR(A27)>
MOV A27 <$STR(A26)>
MOV A26 <$YEAR>年<$MONTH>月<$DAY>日<【/SCOLOR=254>
INC A26 <$USERNAME>
INC A26 <】/SCOLOR=254>:
INC A26 <$STR(S15)>
messagebox 您的留言发表成功！
GOTO @留言公告
#ElseAct
messagebox 抱歉，发表一条普通留言需要2W金币！
GOTO @留言公告

[@CallInPutString16]
#IF
CHECKGAMEGOLD > <$STR(G52)>
#ACT
INC G52 1
GAMEGOLD - <$STR(G52)>
MOV A52 <$YEAR>年<$MONTH>月<$DAY>日<【/SCOLOR=254>
INC A52 <$USERNAME>
INC A52 <】/SCOLOR=254>:
INC A52 <$STR(S16)>
messagebox 您的留言发表成功！
GOTO @留言公告
#ElseAct
messagebox 抱歉，发表一条顶置留言需要<$STR(G52)>元宝！
GOTO @留言公告