传奇留言板脚本

gmbbs醉后知酒浓 · 发表于 2018-9-25 13:51:49

(@@InPutString)
[@MAIN]
<$STR(A2)>\
<$STR(A3)>\
<$STR(A4)>\
<$STR(A5)>\
<$STR(A6)>\
<$STR(A7)>\
<$STR(A8)>\
<$STR(A9)>\
每发表一次留言需要80万金币<确定发表留言[url=]/@@InPutString20[/url]>，只显示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万金币

琼勗南 · 发表于 2018-9-25 13:53:57

看起来不错

溢羔饬 · 发表于 2018-9-27 11:35:41

秀起来~

邺缘卜 · 发表于 2018-9-27 13:52:52

学习下

誊燠 · 发表于 2018-9-29 10:14:38

我也来顶一下..

沙馨香 · 发表于 2018-10-4 11:01:04

是爷们的娘们的都帮顶！大力支持

唁榕娠 · 发表于 2018-10-9 01:23:08

感恩无私的分享与奉献

劝蚱卓 · 发表于 2018-10-10 14:09:26

鄙视楼下的顶帖没我快，哈哈

韦雯华 · 发表于 2018-10-10 15:04:35

垃圾内容，路过为证。

孙云梦 · 发表于 2018-10-11 15:49:53

沙发位出租，有意请联系电话：13838384381

[精选传奇脚本] 传奇留言板脚本