给GM在线留言的特色功能传奇变量脚本
检测的TXT文本,大家自己在在对应目录建立
[@main]
#IF
CHECKACCOUNTLIST 特色功能GM帐号.txt
#act
#SAY
管理员:{/AUTOCOLOR=80}您好,欢迎到在线留言
1条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
2条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
3条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
4条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
5条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
6条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
7条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
#ELSEACT
goto @main0
break
[@main0]
#if
#ACT
#say
玩家:{/AUTOCOLOR=80}您好,欢迎到在线留言
1条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
2条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
3条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
4条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
5条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
6条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
7条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
[@1]
玩家:{/AUTOCOLOR=80}您好,欢迎到在线留言
8条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
9条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
10条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
[@2]
管理员:{/AUTOCOLOR=80}您好,欢迎到在线留言
8条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
9条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
10条.玩家【{/AUTOCOLOR=100}】→留言【{/AUTOCOLOR=253}】
[@InPutString65]
#IF
CheckGAMEGOLD > 999
#ACT
GmExeCute 留言
#ELSEACT
GAMEGOLD - 1000
messagebox没有1000元宝给GM留言注意!
break
[@清除留言1]
#IF
#ACT
MOV G81
MOV A100 暂无
MOV A101 暂无
MOV A102 暂无
MOV A103 暂无
MOV A104 暂无
MOV A105 暂无
MOV A106 暂无
MOV A107 暂无
MOV A108 暂无
MOV A109 暂无
MOV A110 暂无
MOV A111 暂无
MOV A112 暂无
MOV A113 暂无
MOV A114 暂无
MOV A115 暂无
MOV A116 暂无
MOV A117 暂无
MOV A118 暂无
MOV A119 暂无
CLEARNAMELIST ..QuestDiary在线留言.txt
MESSAGEBOX [成功]清理了留言!
goto @留言
break
[@InPutString5]
#IF
checknamelist ..QuestDiary在线留言.txt
#act
MESSAGEBOX [失败]:您已经留言了,请不要重留言!
break
#IF
SMALL G81 10
#ELSEACT
MESSAGEBOX [失败]:在线留言已经满了
break
#if
EQUAL A100 暂无
#ACT
INC G81 1
MOV A100
MOV A101
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A102 暂无
#ACT
INC G81 1
MOV A102
MOV A103
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A104 暂无
#ACT
INC G81 1
MOV A104
MOV A105
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A106 暂无
#ACT
INC G81 1
MOV A106
MOV A107
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A108 暂无
#ACT
INC G81 1
MOV A108
MOV A109
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A110 暂无
#ACT
INC G81 1
MOV A110
MOV A111
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A112 暂无
#ACT
INC G81 1
MOV A112
MOV A113
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @留言
break
#if
EQUAL A114 暂无
#ACT
INC G81 1
MOV A114
MOV A115
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @1
break
#if
EQUAL A116 暂无
#ACT
INC G81 1
MOV A116
MOV A117
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @1
break
#if
EQUAL A118 暂无
#ACT
INC G81 1
MOV A118
MOV A119
MESSAGEBOX [成功]:在线留言!
addnamelist ..QuestDiary在线留言.txt
goto @1
break
[@取消]
#IF
checknamelist ..QuestDiary在线留言.txt
#elseact
MESSAGEBOX [失败]:您没有留言怎么取消?
break
#IF
EQUAL A100
#act
DEC G81 1
mov A100 暂无
mov A101 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A102
#act
DEC G81 1
mov A102 暂无
mov A103 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A104
#act
DEC G81 1
mov A104 暂无
mov A105 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A106
#act
DEC G81 1
mov A106 暂无
mov A107 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A108
#act
DEC G81 1
mov A108 暂无
mov A109 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A110
#act
DEC G81 1
mov A110 暂无
mov A111 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A112
#act
DEC G81 1
mov A112 暂无
mov A113 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A114
#act
DEC G81 1
mov A114 暂无
mov A115 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A116
#act
DEC G81 1
mov A116 暂无
mov A117 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
#IF
EQUAL A118
#act
DEC G81 1
mov A118 暂无
mov A119 暂无
MESSAGEBOX [成功]:取消留言!
CLEARNAMELIST ..QuestDiary\在线留言.txt
goto @main0
break
[@IsInFilterList]
#ACT
MESSAGEBOX 输入数据中包含了非法字符,请重新编辑! |
|