留言系统元宝版

admin

留言系统元宝版

(@@InPutString @@InPutInteger ) [@main]    ，，。 [@发表] 欢迎光临公告栏系统，你的元宝      〖〗〖〗〖〗〖〗   dedecms.com 〖〗〖〗〖〗〖〗   〖〗 [@竞价1] 一号位置的当前竞价是:元宝.      [@CallInPutString30] #IF EQUAL S30 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S0 < INC S0   INC S0 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S20 INC S0   INC S0 >< INC S0   INC S0 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S20  织梦好，好织梦 INC S0   INC S0 > Inc I0   MOV A30   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价2] 二号位置的当前竞价是:元宝.      [@CallInPutString31] #IF EQUAL S31 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S1 < INC S1   INC S1 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S20 INC S1   INC S1 >< INC S1   INC S1 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S20  织梦好，好织梦 INC S1   INC S1 > Inc I1   MOV A31   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价3] 三号位置的当前竞价是:元宝.      [@CallInPutString32] #IF EQUAL S32 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S2 < INC S2   INC S2 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S22 INC S2   INC S2 >< INC S2   INC S2 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S22  本文来自织梦 INC S2   INC S2 > Inc I2   MOV A32   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价4] 四号位置的当前竞价是:元宝.      [@CallInPutString33] #IF EQUAL S33 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S3 < INC S3   INC S3 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S23 INC S3   INC S3 >< INC S3   INC S3 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S23  copyright dedecms INC S3   INC S3 > Inc I3   MOV A33   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价5] 五号位置的当前竞价是:元宝.      [@CallInPutString34] #IF EQUAL S34 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S4 < INC S4   INC S4 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S24 INC S4   INC S4 >< INC S4   INC S4 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S24  内容来自dedecms INC S4   INC S4 > Inc I4   MOV A34   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价6] 六号位置的当前竞价是:元宝.      [@CallInPutString35] #IF EQUAL S35 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S5 < INC S5   INC S5 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S25 INC S5   INC S5 >< INC S5   INC S5 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S25  织梦好，好织梦 INC S5   INC S5 > Inc I5   MOV A35   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价7] 七号位置的当前竞价是:元宝.      [@CallInPutString36] #IF EQUAL S36 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S6 < INC S6   INC S6 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S26 INC S6   INC S6 >< INC S6   INC S6 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S26  织梦好，好织梦 INC S6   INC S6 > Inc I6   MOV A36   goto @main #Elsesay 抱歉,你的元宝不足.    [@竞价8] 八号位置的当前竞价是:元宝.      [@CallInPutString37] #IF EQUAL S37 #ACT Messagebox [失败]：请输入所要发表的文字。不能发空消息。 goto @main BREAK #If CHECKGAMEGOLD >   #Act GAMEGOLD -   MOV S7 < INC S7   INC S7 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S27 INC S7   INC S7 >< INC S7   INC S7 /SCOLOR= GetRandomText .QuestDiary变量颜色.txt S27  dedecms.com INC S7   INC S7 > Inc I7   MOV A37   goto @main #Elsesay 抱歉,你的元宝不足.    每使用一次需要的元宝数增加一倍。直到服务器重启或把变量清零。如和其它变量有冲突。请自行修改。