传奇NPC留言版脚本系统

传奇NPC留言版脚本系统

(@@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

QuestDiary\变量\颜色.txt 
这个颜色.txt 自己创建下 里面就属于1-255之间的数值 是文字的颜色 一个数值是一行
比如
颜色.txt里面写

1
10
50
250
30
254