GOM引擎调查玩家从哪个发布站进入游戏的脚本制作教程

2 [0 W2 {  v4 Y9 R
: J9 ~) _) \" o, k/ L) o这是一个玩家调查脚本，我们可以调查玩家从哪里知道本游戏的，从哪里进来的等，首先我们新建一个玩家调查-3.txt，加入以下脚本，另外QuestDiary文件夹下面的对应.txt存放数据文件也要建好。
. ^3 ^1 u2 P+ P0 c0 c' I

. n' c2 f0 t! P(@@InPutInteger, @@InPutString)
%100
[@Main]
% V! q. R6 n/ a6 t如果你等级达到46级，可以留QQ加入龙虎骨灰交流群。\ \
请问你的QQ，必须到达46几？    <点击填写/@@InPutString5> - 奖励100万金币\ \
) m' m8 t' q0 w需要GM服务，或者建议请留言？         <点击填写/@@InPutString6>- \ \
[@@InPutString6]
' Y8 H$ d2 x, D! e' i* Z#If
9 D5 b  Q" R# ~- F4 S( _CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutString6
[~InPutString6]
- t3 V' \& H& P" E#If
; Z) l+ I% m& n6 `1 w& PCheckLevelEx > 0
8 h4 m- O8 G/ i4 W#act
9 k3 z% C, r* N' X; |. bADDTEXTLIST .\QuestDiary\问题2回答.txt <$STR(S6)>
Messagebox [提示]:感谢您的建议，祝您游戏愉快。
% W& P3 `* w9 q# G[@@InPutString5]
#If
CheckLevelEx > 45
#Act
DelayGoto 1 ~InPutString5
#elseact
Messagebox [提示]:等级不足46级，无法参与。
[~InPutString5]
#If
& X- q2 ~: j6 e  B+ xchecknamelist ..\QuestDiary\问题1.txt
#act
$ a& p/ K6 I. @4 n2 {Messagebox [提示]:你已经参与过本次调查了。
#elseact
' z8 z, q3 ]) l& L' Uaddnamelist ..\QuestDiary\问题1.txt
ADDTEXTLIST .\QuestDiary\问题1回答.txt <$STR(S5)>
: }0 j# _5 W) T7 \7 `" c) }7 T) Z, @+ jgive 金币 1000000
, n+ W' @0 Z  T! A2 S$ y$ u% UMessagebox [提示]:感谢您的参与，奖励100万金币。
; u0 w8 N; H1 J9 k! K[@IsInFilterList]
#If
CheckLevelEx > 0
2 `; p0 ~: N  Q#Act
- x. ^9 k( L# q6 h* l) W4 S& \2 WMessageBox 输入数据中包含了非法字符.请重新编辑
Goto @Main
5 N1 t8 C* b4 o0 M: u: R8 [Break