| (@@InPutString) [@MAIN] <$STR(A2)> <$STR(A3)> <$STR(A4)> <$STR(A5)> <$STR(A6)> <$STR(A7)> <$STR(A8)> <$STR(A9)> 每发表一次留言需求80万金币<确定发表留言/@@InPutString20>，只显示8条留言。 [@InPutString20] #IF EQUAL S20 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 GOTO @MAIN BREAK #IF Checkgold 800000 #ACT take 金币 800000 MOV S3 < INC S3 <$USERNAME> INC S3 /AUTOCOLOR= GetRandomName ..QuestDiary变量色彩.txt S30 INC S3 <$STR(S30)> INC S3 >说：< INC S3 <$STR(S20)> INC S3 /AUTOCOLOR= GetRandomName ..QuestDiary变量色彩.txt S30 INC S3 <$STR(S30)> INC S3 > MOV A9 <$STR(A8)> MOV A8 <$STR(A7)> MOV A7 <$STR(A6)> MOV A6 <$STR(A5)> MOV A5 <$STR(A4)> MOV A4 <$STR(A3)> MOV A3 <$STR(A2)> MOV A2 <$STR(S3)> MOV S3 MOV S20 MOV S20 GOTO @MAIN BREAK #ELSEACT Messagebox [失败]：发表留言需求80万金币。 GOTO @MAIN BREAK |
