1
|
[@发起假人登录]
|
2
|
;--RobotManage.txt [@10秒触发]调用
|
3
|
#if
|
4
|
checkDummyCount < g$假人_登录上限
|
5
|
#act
|
6
|
dummyLogon <$str(a$假人_登录地图)> <$str(a$假人_登录坐标X)> <$str(a$假人_登录坐标X)> 1
|
7
|
|
8
|
[@执行假人登录]
|
9
|
;--QManage.txt [@login]调用
|
10
|
#act
|
11
|
setDummyConfigFileName ..\QuestDiary\调试模块\假人\新人配置.txt
|
12
|
loadDummyConfigfile
|
13
|
|
14
|
;--创建表--
|
15
|
#if
|
16
|
not tbl_exist 登录假人表
|
17
|
#act
|
18
|
tbl_create_global 登录假人表 关键字 假人名称
|
19
|
tbl_add 登录假人表 <$userName> <$userName>
|
20
|
tbl_save 登录假人表
|
21
|
goto @新登假人配置
|
22
|
|
23
|
;--保存新登录假人--
|
24
|
#if
|
25
|
not tbl_has_key 登录假人表 <$userName>
|
26
|
#act
|
27
|
tbl_add 登录假人表 <$userName> <$userName>
|
28
|
tbl_save 登录假人表
|
29
|
goto @新登假人配置
|
30
|
|
31
|
#if
|
32
|
tbl_has_key 登录假人表 <$userName>
|
33
|
#act
|
34
|
;--todo--登录过的假人
|
35
|
|
36
|
#if
|
37
|
#act
|
38
|
goto @假人下图处理
|
39
|
|
40
|
|
41
|
[@新登假人配置]
|
42
|
#if
|
43
|
#act
|
44
|
;--处理新假人装备
|
45
|
;--请根据版本自行调整
|
46
|
mov s$key 1
|
47
|
goto @假人换装
|
48
|
|
49
|
|
50
|
[@假人下图处理]
|
51
|
;--根据“假人等级地图对应表”下图
|
52
|
;举例
|
53
|
;0<lv<=10 地图1
|
54
|
;10<lv<=20 地图2
|
55
|
;20<lv<=30 地图3
|
56
|
;...
|
57
|
;**假人等级遍历上表,
|
58
|
; 是否不大于等级上限
|
59
|
#if tbl 假人等级地图对应表 s$key
|
60
|
small <$level> <$tbl(假人等级地图对应表,s$key,等级上限)>
|
61
|
#act
|
62
|
map <$tbl(假人等级地图对应表,s$key,地图编号)>
|
63
|
gotoNow
|
64
|
#elseAct
|
65
|
map <$tbl(假人等级地图对应表,s$key,地图编号)>
|
66
|
gotoNow
|
67
|
|
68
|
|
69
|
[@获得物品触发]
|
70
|
;--todo--处理假人出图逻辑
|
71
|
;--qf [@pickUpItemEX]
|
72
|
#if
|
73
|
;背包满了
|
74
|
checkBagSize 2
|
75
|
#act
|
76
|
goto @假人主动回城处理
|
77
|
|
78
|
|
79
|
[@假人被真人击处理]
|
80
|
;--todo--处理假人被击逻辑
|
81
|
;**被击触发器,
|
82
|
; 检查被真人攻击
|
83
|
;假人血量低于40%
|
84
|
;50%几率回城
|
85
|
;50%几率逃跑
|
86
|
#if
|
87
|
not checkHpPer < 40
|
88
|
#act
|
89
|
break
|
90
|
|
91
|
#if
|
92
|
checkCurrTargetRace = 0
|
93
|
checkHPPer < 40
|
94
|
#act
|
95
|
movR n1 0 1
|
96
|
#if
|
97
|
equal n1 0
|
98
|
#act
|
99
|
gotoNow
|
100
|
delayGoto 20000 @假人挂机
|
101
|
|
102
|
#if
|
103
|
equal n1 1
|
104
|
#act
|
105
|
gohome
|
106
|
|
107
|
[@假人挂机]
|
108
|
#act
|
109
|
dummyStart
|
110
|
|
111
|
|
112
|
[@假人死亡处理]
|
113
|
#if
|
114
|
#act
|
115
|
;--todo--处理假人死亡逻辑
|
116
|
realive 100 1
|
117
|
gohome
|
118
|
|
119
|
;主城随便逛逛
|
120
|
gotoNow
|
121
|
|
122
|
goto @假人下图处理
|
123
|
|
124
|
|
125
|
[@假人主动回城处理]
|
126
|
#if
|
127
|
#act
|
128
|
gohome
|
129
|
;--todo--处理假人主动回城逻辑
|
130
|
;执行清理背包,
|
131
|
gmExeCute clearBag self
|
132
|
|
133
|
;执行假人升级
|
134
|
#if
|
135
|
#act
|
136
|
goto @假人升级处理
|
137
|
|
138
|
;主城随便逛逛
|
139
|
gotoNow
|
140
|
|
141
|
goto @假人下图处理
|
142
|
|
143
|
|
144
|
[@假人升级处理]
|
145
|
#if
|
146
|
large <$rankingLevel> 10
|
147
|
#act
|
148
|
;--todo--处理假人升级逻辑
|
149
|
movR n1 1 5
|
150
|
changeLevel + n1
|
151
|
|
152
|
delayGoto 500 @假人升级处理
|
153
|
#elseAct
|
154
|
;--根据升级后等级,穿戴对应装备
|
155
|
;--换装前后清空一下背包
|
156
|
gmExeCute clearBag self
|
157
|
goto @假人升级换装
|
158
|
gmExeCute clearBag self
|
159
|
|
160
|
|
161
|
[@假人升级换装]
|
162
|
#if tbl 假人等级地图对应表 s$key
|
163
|
small <$level> <$tbl(假人等级地图对应表,s$key,等级上限)>
|
164
|
#act
|
165
|
goto @假人换装
|
166
|
#elseAct
|
167
|
goto @假人换装
|
168
|
|
169
|
|
170
|
[@假人换装]
|
171
|
#if
|
172
|
#act
|
173
|
give <$tbl(假人等级地图对应表,s$key,衣服)> 1
|
174
|
give <$tbl(假人等级地图对应表,s$key,武器)> 1
|
175
|
give <$tbl(假人等级地图对应表,s$key,项链)> 1
|
176
|
give <$tbl(假人等级地图对应表,s$key,头盔)> 1
|
177
|
give <$tbl(假人等级地图对应表,s$key,左镯)> 1
|
178
|
give <$tbl(假人等级地图对应表,s$key,右镯)> 1
|
179
|
give <$tbl(假人等级地图对应表,s$key,左戒)> 1
|
180
|
give <$tbl(假人等级地图对应表,s$key,右戒)> 1
|
181
|
give <$tbl(假人等级地图对应表,s$key,腰带)> 1
|
182
|
give <$tbl(假人等级地图对应表,s$key,靴子)> 1
|
183
|
|
184
|
takeOnItem <$tbl(假人等级地图对应表,s$key,衣服)> 0
|
185
|
takeOnItem <$tbl(假人等级地图对应表,s$key,武器)> 1
|
186
|
takeOnItem <$tbl(假人等级地图对应表,s$key,项链)> 3
|
187
|
takeOnItem <$tbl(假人等级地图对应表,s$key,头盔)> 4
|
188
|
takeOnItem <$tbl(假人等级地图对应表,s$key,左镯)> 5
|
189
|
takeOnItem <$tbl(假人等级地图对应表,s$key,右镯)> 6
|
190
|
takeOnItem <$tbl(假人等级地图对应表,s$key,左戒)> 7
|
191
|
takeOnItem <$tbl(假人等级地图对应表,s$key,右戒)> 8
|
192
|
takeOnItem <$tbl(假人等级地图对应表,s$key,腰带)> 10
|
193
|
takeOnItem <$tbl(假人等级地图对应表,s$key,靴子)> 11
|
194
|
|
195
|
;--假人扩展背包页
|
196
|
#if
|
197
|
equal s$key 2
|
198
|
#act
|
199
|
setBagOpen 2 1
|
200
|
|
201
|
#if
|
202
|
equal s$key 3
|
203
|
#act
|
204
|
setBagOpen 3 1
|
205
|
|
206
|
#if
|
207
|
equal s$key 4
|
208
|
#act
|
209
|
setBagOpen 4 1
|