这是一个玩家调查脚本,我们可以调查玩家从哪里知道本游戏的,从哪里进来的等,首先我们新建一个玩家调查-3.txt,加入以下脚本,另外QuestDiary文件夹下面的对应.txt存放数据文件也要建好。
(@@InPutInteger@@InPutString)
%100
[@Main]
如果你等级达到46级,可以留QQ加入龙虎骨灰交流群。\\
请问你的QQ,必须到达46几?<点击填写/@@InPutString5>-奖励100万金币\\
需要GM服务,或者建议请留言?<点击填写/@@InPutString6>-\\
[@@InPutString6]
#If
CheckLevelEx>0
#Act
DelayGoto1~InPutString6
[~InPutString6]
#If
CheckLevelEx>0
#act
ADDTEXTLIST.\QuestDiary\问题2回答.txt<$STR(S6)>
Messagebox[提示]:感谢您的建议,祝您游戏愉快。
[@@InPutString5]
#If
CheckLevelEx>45
#Act
DelayGoto1~InPutString5
#elseact
Messagebox[提示]:等级不足46级,无法参与。
[~InPutString5]
#If
checknamelist..\QuestDiary\问题1.txt
#act
Messagebox[提示]:你已经参与过本次调查了。
#elseact
addnamelist..\QuestDiary\问题1.txt
ADDTEXTLIST.\QuestDiary\问题1回答.txt<$STR(S5)>
give金币1000000
Messagebox[提示]:感谢您的参与,奖励100万金币。
[@IsInFilterList]
#If
CheckLevelEx>0
#Act
MessageBox输入数据中包含了非法字符.请重新编辑
Goto@Main
Break
(@@InPutInteger@@InPutString)
%100
[@Main]
如果你等级达到46级,可以留QQ加入龙虎骨灰交流群。\\
请问你的QQ,必须到达46几?<点击填写/@@InPutString5>-奖励100万金币\\
需要GM服务,或者建议请留言?<点击填写/@@InPutString6>-\\
[@@InPutString6]
#If
CheckLevelEx>0
#Act
DelayGoto1~InPutString6
[~InPutString6]
#If
CheckLevelEx>0
#act
ADDTEXTLIST.\QuestDiary\问题2回答.txt<$STR(S6)>
Messagebox[提示]:感谢您的建议,祝您游戏愉快。
[@@InPutString5]
#If
CheckLevelEx>45
#Act
DelayGoto1~InPutString5
#elseact
Messagebox[提示]:等级不足46级,无法参与。
[~InPutString5]
#If
checknamelist..\QuestDiary\问题1.txt
#act
Messagebox[提示]:你已经参与过本次调查了。
#elseact
addnamelist..\QuestDiary\问题1.txt
ADDTEXTLIST.\QuestDiary\问题1回答.txt<$STR(S5)>
give金币1000000
Messagebox[提示]:感谢您的参与,奖励100万金币。
[@IsInFilterList]
#If
CheckLevelEx>0
#Act
MessageBox输入数据中包含了非法字符.请重新编辑
Goto@Main
Break

