骑马与砍杀中文站论坛

标题: 简单的agent飞行实现，步兵骑兵皆可 [打印本页]

---

作者: 杰喵喵    时间: 2023-2-7 22:13
标题: 简单的agent飞行实现，步兵骑兵皆可


简单的agent飞行实现，步兵骑兵皆可，代码简单没有修改原本战团AI,十分傻瓜
一、理论指导：
1.【未写完】打败引擎硬核-关于骑砍各系统飞行等复杂位移功能实现与互相辅助 - MOD制作技术区 - 骑马与砍杀中文站论坛 - Powered by Discuz! (mountblade.com.cn)

2.自行百度或知乎"世界坐标系"与"自身坐标系的"相关知识。
3.改代码存在很多不足，请看下面大佬说明。

二、涉及核心函数:
1.(agent_set_no_dynamics, ":agent_no", 1),#设置是否飞行，0不飞行，1飞行
2.(position_has_line_of_sight_to_position, pos51, pos52)#两个点之间是否拥有直线视线，是否存在遮挡物
3.(agent_get_look_position, pos52, ":agent_no")#获取agent当前视角坐标pos
4. (agent_get_animation,":animation",":agent_no",0),#0读取agent的下身动作 1上半身
5.(agent_ai_get_num_cached_enemies, ":num", ":agent_no"), (agent_ai_get_cached_enemy, ":enemies", ":agent_no", ":index")#参考下面代码组合使用，读取agent最近的敌人
6.agent_ai_get_move_target、agent_ai_get_look_target#获得agent移向的目标或者观察的目标
7.(agent_set_position, ":agent_no", pos51),#强制移动agent
8. (agent_get_team,":agent_team",":agent_no"),(agent_get_division, ":agent_division", ":agent_no"), (team_get_movement_order, ":movement_order", ":agent_team", ":agent_division"),#组合获得agent的队伍移动命令

三、代码思路：
1.直接通过agent的当前动作来强制位移，不涉及修改原来的骑砍AI；
2.根据实际效果，因(agent_set_no_dynamics, ":agent_no", 1),会造成穿模异常，当飞行agent接近目标agent，如果目标agent是地面需要取消飞行状态，目标agent是飞行状态则限制agent前进。
3.通过读取agent_is_in_line_of_sight来判断场景阻挡，通过判断飞行agent的周围其他agent来判断是否有其他敌方agent阻挡。

四、代码
（一）、script部分

1. #检查agent是是飞行单位
   
2.    ("cf_agent_is_fly", [
   
3.     (store_script_param, ":agent_no", 1),
   
4.    
   
5.     (gt,":agent_no",-1),
   
6.     (agent_slot_ge,":agent_no",slot_agent_fly,1),
   
7.     ]),
   
8.    
   
9.     #检查agent是不是飞行单位
   
10.    ("cf_agent_is_no_fly", [
    
11.     (store_script_param, ":agent_no", 1),
    
12.    
    
13.     (gt,":agent_no",-1),
    
14.     (neg|agent_slot_ge,":agent_no",slot_agent_fly,1),
    
15.     ]),
    
16.    
    
17. 
    
18.    
    
19.    
    
20. #判断agent前方是否有其他agent阻挡
    
21. ("cf_agent_go_forward_be_hindered_from_other_agent",
    
22. [
    
23.   (store_script_param, ":agent_no", 1),
    
24.   (store_script_param, ":is_run", 2),
    
25. 
    
26.   (gt,":agent_no",-1),
    
27.   (agent_is_alive,":agent_no"),
    
28.   (agent_is_human,":agent_no"),
    
29.   (agent_get_team,":team",":agent_no"),
    
30.   (init_position,pos30),
    
31.   (agent_get_position,pos30,":agent_no"),
    
32.   (agent_get_horse,":horse",":agent_no"),
    
33.   (assign,":radius_fixed_point",200),
    
34.   (assign,":z_value_p",150),
    
35.   (try_begin),
    
36.     (gt,":horse",-1),
    
37.     (assign,":z_value_p",300),
    
38.   (try_end),
    
39.   (store_mul,":z_value_n",":z_value_p",-1),
    
40. 
    
41.   (assign,":be_hindered",0),
    
42.   (try_for_agents,":other_agent",pos30,":radius_fixed_point"),
    
43.       (eq,":be_hindered",0),
    
44.       (neq,":other_agent",":agent_no"),
    
45.       (agent_is_alive,":other_agent"),
    
46.       (agent_is_human,":other_agent"),
    
47.       (agent_get_team,":other_team",":other_agent"),
    
48.       (teams_are_enemies,":other_team",":team"),
    
49.      
    
50.       (agent_get_horse,":other_agent_horse",":other_agent"),
    
51.       (assign,":x_value_p",30),
    
52. 
    
53.       (assign,":distance_value",50),
    
54.       (try_begin),
    
55.          (gt,":other_agent_horse",-1),
    
56.          (assign,":x_value_p",100),
    
57.          (assign,":distance_value",100),
    
58.       (try_end),
    
59.       (store_mul,":x_value_n",":x_value_p",-1),
    
60.       #骑马加上马头和人的距离
    
61.       (try_begin),
    
62.          (gt,":horse",-1),
    
63.          (val_add,":distance_value",100),
    
64.       (try_end),
    
65.       
    
66.       (init_position,pos31),
    
67.       (agent_get_position,pos31,":other_agent"),
    
68.       (get_distance_between_positions,":distance",pos31,pos30),
    
69.       (init_position,pos32),
    
70.       (position_transform_position_to_local,pos32,pos30,pos31),
    
71.       (position_get_x,":x_0",pos32),
    
72.       (position_get_y,":y_0",pos32),
    
73.       (position_get_z,":z_0",pos32),
    
74.       (gt,":y_0",0),
    
75.       (le,":distance",":distance_value"),
    
76.       (is_between,":z_0",":z_value_n",":z_value_p"),
    
77.       (is_between,":x_0",":x_value_n",":x_value_p"),
    
78.       (assign,":be_hindered",1),
    
79.   (try_end),
    
80.   
    
81.   (eq,":be_hindered",":is_run"),
    
82. 
    
83.   ]
    
84.   ),  
    
85.   
    
86.   #判断agent后退是否有其他agent阻挡
    
87. ("cf_agent_go_back_be_hindered_from_other_agent",
    
88. [
    
89.   (store_script_param, ":agent_no", 1),
    
90.   (store_script_param, ":is_run", 2),
    
91. 
    
92.   (gt,":agent_no",-1),
    
93.   (agent_is_alive,":agent_no"),
    
94.   (agent_is_human,":agent_no"),
    
95.   (agent_get_team,":team",":agent_no"),
    
96.   (init_position,pos30),
    
97.   (agent_get_position,pos30,":agent_no"),
    
98.   (agent_get_horse,":horse",":agent_no"),
    
99.   (assign,":radius_fixed_point",200),
    
100.   (assign,":z_value_p",150),
     
101.   (try_begin),
     
102.     (gt,":horse",-1),
     
103.     (assign,":z_value_p",300),
     
104.   (try_end),
     
105.   (store_mul,":z_value_n",":z_value_p",-1),
     
106. 
     
107.   (assign,":be_hindered",0),
     
108.   (try_for_agents,":other_agent",pos30,":radius_fixed_point"),
     
109.       (eq,":be_hindered",0),
     
110.       (neq,":other_agent",":agent_no"),
     
111.       (agent_is_alive,":other_agent"),
     
112.       (agent_is_human,":other_agent"),
     
113.       (agent_get_team,":other_team",":other_agent"),
     
114.       (teams_are_enemies,":other_team",":team"),
     
115.       
     
116.       (agent_get_horse,":other_agent_horse",":other_agent"),
     
117.       (assign,":x_value_p",30),
     
118. 
     
119.       (assign,":distance_value",50),
     
120.       (try_begin),
     
121.          (gt,":other_agent_horse",-1),
     
122.          (assign,":x_value_p",100),
     
123.          (assign,":distance_value",100),
     
124.       (try_end),
     
125.       (store_mul,":x_value_n",":x_value_p",-1),
     
126.       
     
127.       (try_begin),
     
128.          (gt,":horse",-1),
     
129.          (val_add,":distance_value",100),
     
130.       (try_end),
     
131.       
     
132.       (init_position,pos31),
     
133.       (agent_get_position,pos31,":other_agent"),
     
134.       (get_distance_between_positions,":distance",pos31,pos30),
     
135.       (init_position,pos32),
     
136.       (position_transform_position_to_local,pos32,pos30,pos31),
     
137.       (position_get_x,":x_0",pos32),
     
138.       (position_get_y,":y_0",pos32),
     
139.       (position_get_z,":z_0",pos32),
     
140.       (lt,":y_0",0),
     
141.       (le,":distance",":distance_value"),
     
142.       (is_between,":z_0",":z_value_n",":z_value_p"),
     
143.       (is_between,":x_0",":x_value_n",":x_value_p"),
     
144.       (assign,":be_hindered",1),
     
145.   (try_end),
     
146.   
     
147.   (eq,":be_hindered",":is_run"),
     
148. 
     
149.   ]
     
150.   ),
     
151. 
     
152. #判断agent右边是否有其他agent阻挡
     
153. ("cf_agent_go_right_be_hindered_from_other_agent",
     
154. [
     
155. 
     
156.   (store_script_param, ":agent_no", 1),
     
157.   (store_script_param, ":is_run", 2),
     
158. 
     
159.   (gt,":agent_no",-1),
     
160.   (agent_is_alive,":agent_no"),
     
161.   (agent_is_human,":agent_no"),
     
162.   (agent_get_team,":team",":agent_no"),
     
163.   (init_position,pos30),
     
164.   (agent_get_position,pos30,":agent_no"),
     
165.   (agent_get_horse,":horse",":agent_no"),
     
166.   (assign,":radius_fixed_point",200),
     
167.   (assign,":z_value_p",150),
     
168.   (try_begin),
     
169.     (gt,":horse",-1),
     
170.     (assign,":z_value_p",300),
     
171.   (try_end),
     
172.   (store_mul,":z_value_n",":z_value_p",-1),
     
173. 
     
174.   (assign,":be_hindered",0),
     
175.   (try_for_agents,":other_agent",pos30,":radius_fixed_point"),
     
176.       (eq,":be_hindered",0),
     
177.       (neq,":other_agent",":agent_no"),
     
178.       (agent_is_alive,":other_agent"),
     
179.       (agent_is_human,":other_agent"),
     
180.       (agent_get_team,":other_team",":other_agent"),
     
181.       (teams_are_enemies,":other_team",":team"),
     
182.       
     
183.       (agent_get_horse,":other_agent_horse",":other_agent"),
     
184.       (assign,":y_value_p",30),
     
185. 
     
186.       (assign,":distance_value",50),
     
187.       (try_begin),
     
188.          (gt,":other_agent_horse",-1),
     
189.          (assign,":y_value_p",100),
     
190.          (assign,":distance_value",100),
     
191.       (try_end),
     
192.       (store_mul,":y_value_n",":y_value_p",-1),
     
193.       #骑马加上马头和人的距离
     
194.       (try_begin),
     
195.          (gt,":horse",-1),
     
196.          (val_add,":distance_value",100),
     
197.       (try_end),
     
198.       
     
199.       (init_position,pos31),
     
200.       (agent_get_position,pos31,":other_agent"),
     
201.       (get_distance_between_positions,":distance",pos31,pos30),
     
202.       (init_position,pos32),
     
203.       (position_transform_position_to_local,pos32,pos30,pos31),
     
204.       (position_get_x,":x_0",pos32),
     
205.       (position_get_y,":y_0",pos32),
     
206.       (position_get_z,":z_0",pos32),
     
207.       (gt,":x_0",0),
     
208.       (le,":distance",":distance_value"),
     
209.       (is_between,":z_0",":z_value_n",":z_value_p"),
     
210.       (is_between,":y_0",":y_value_n",":y_value_p"),
     
211.       (assign,":be_hindered",1),
     
212.   (try_end),
     
213.   
     
214.   (eq,":be_hindered",":is_run"),
     
215. 
     
216.   ]
     
217.   ),   
     
218. #判断agent左边是否有其他agent阻挡
     
219. ("cf_agent_go_left_be_hindered_from_other_agent",
     
220. [
     
221.   (store_script_param, ":agent_no", 1),
     
222.   (store_script_param, ":is_run", 2),
     
223. 
     
224.   (gt,":agent_no",-1),
     
225.   (agent_is_alive,":agent_no"),
     
226.   (agent_is_human,":agent_no"),
     
227.   (agent_get_team,":team",":agent_no"),
     
228.   (init_position,pos30),
     
229.   (agent_get_position,pos30,":agent_no"),
     
230.   (agent_get_horse,":horse",":agent_no"),
     
231.   (assign,":radius_fixed_point",200),
     
232.   (assign,":z_value_p",150),
     
233.   (try_begin),
     
234.     (gt,":horse",-1),
     
235.     (assign,":z_value_p",300),
     
236.   (try_end),
     
237.   (store_mul,":z_value_n",":z_value_p",-1),
     
238. 
     
239.   (assign,":be_hindered",0),
     
240.   (try_for_agents,":other_agent",pos30,":radius_fixed_point"),
     
241.       (eq,":be_hindered",0),
     
242.       (neq,":other_agent",":agent_no"),
     
243.       (agent_is_alive,":other_agent"),
     
244.       (agent_is_human,":other_agent"),
     
245.       (agent_get_team,":other_team",":other_agent"),
     
246.       (teams_are_enemies,":other_team",":team"),
     
247.       
     
248.       (agent_get_horse,":other_agent_horse",":other_agent"),
     
249.       (assign,":y_value_p",30),
     
250. 
     
251.       (assign,":distance_value",50),
     
252.       (try_begin),
     
253.          (gt,":other_agent_horse",-1),
     
254.          (assign,":y_value_p",100),
     
255.          (assign,":distance_value",100),
     
256.       (try_end),
     
257.       (store_mul,":y_value_n",":y_value_p",-1),
     
258.       #骑马加上马头和人的距离
     
259.       (try_begin),
     
260.          (gt,":horse",-1),
     
261.          (val_add,":distance_value",100),
     
262.       (try_end),
     
263.       
     
264.       (init_position,pos31),
     
265.       (agent_get_position,pos31,":other_agent"),
     
266.       (get_distance_between_positions,":distance",pos31,pos30),
     
267.       (init_position,pos32),
     
268.       (position_transform_position_to_local,pos32,pos30,pos31),
     
269.       (position_get_x,":x_0",pos32),
     
270.       (position_get_y,":y_0",pos32),
     
271.       (position_get_z,":z_0",pos32),
     
272.       (lt,":x_0",0),
     
273.       (le,":distance",":distance_value"),
     
274.       (is_between,":z_0",":z_value_n",":z_value_p"),
     
275.       (is_between,":y_0",":y_value_n",":y_value_p"),
     
276.       (assign,":be_hindered",1),
     
277.   (try_end),
     
278.   
     
279.   (eq,":be_hindered",":is_run"),
     
280. 
     
281.   ]
     
282.   ),

复制代码

（二）module_mission_templates部分玩家使用Y进入飞行，接触地面自动接触

1. init_the_key_y = (
   
2.       
   
3.   0,0,2,[
   
4.   (key_clicked,key_y),
   
5.   (get_player_agent_no, ":player_agent"),
   
6.   (neg|agent_slot_ge,":player_agent",slot_agent_fly,1),#非飞行
   
7.   ],
   
8.        [
   
9.         (set_fixed_point_multiplier, 100),
   
10.         
    
11.         (get_player_agent_no, ":player_agent"),
    
12.         (agent_get_horse,":horse", ":player_agent"),
    
13.         (agent_get_position, pos10, ":player_agent"),   
    
14.       
    
15.         (try_begin),
    
16.             (gt,":horse",-1),
    
17.             (assign,":var_0",":horse"),
    
18.         (else_try),
    
19.             (assign,":var_0",":player_agent"),
    
20.         (try_end),        
    
21.         (position_move_z,pos10,10),
    
22.         (agent_set_slot,":player_agent",slot_agent_fly,1),#飞行
    
23.         (agent_set_no_dynamics, ":var_0", 1),
    
24.         (agent_set_position,":var_0",pos10),
    
25.         (display_message,"@player fly is on"),
    
26. 
    
27.        ]
    
28. )  
    
29. common_player_fly = (0.0,0,0,
    
30.     [
    
31.       (get_player_agent_no, ":player_agent"),
    
32.       (agent_slot_ge, ":player_agent", slot_agent_fly, 1),
    
33.     ],
    
34.     [
    
35.     (set_fixed_point_multiplier, 100),
    
36.    
    
37.     (get_player_agent_no, ":player_agent"),
    
38.     (assign,":y_move",0),
    
39.     (assign,":x_move",0),
    
40.     (assign,":z_move",0),
    
41.     (init_position,pos5),
    
42.     #骑马的时候马与人共用速度
    
43.     (agent_get_horse, ":horse", ":player_agent"),
    
44.     (assign,":var_0",":player_agent"),
    
45.     (try_begin),
    
46.         (gt,":horse",-1),
    
47.         (assign,":var_0",":horse"),
    
48.     (try_end),   
    
49.     (agent_get_speed,pos5,":var_0"),
    
50.     (position_get_y,":y_speed",pos5),
    
51.     (position_get_x,":x_speed",pos5),
    
52.    
    
53.     (try_begin),
    
54.         (gt,":horse",-1),
    
55.         (store_div,":y_move",":y_speed",fly_y_horse_move_div),
    
56.         (store_div,":x_move",":x_speed",fly_x_horse_move_div),
    
57.     (else_try),
    
58.         (store_div,":y_move",":y_speed",fly_y_move_div),
    
59.         (store_div,":x_move",":x_speed",fly_x_move_div),
    
60.     (try_end),
    
61.    
    
62.     (init_position,pos6),
    
63.     (agent_get_look_position, pos6, ":player_agent"),
    
64.     (position_get_rotation_around_x, ":rotation_x_player", pos6),
    
65.     (try_begin),
    
66.         (key_is_down, key_v),
    
67.         (assign,":z_move",z_move_up),
    
68.     (else_try),
    
69.         (key_is_down, key_b),
    
70.         (assign,":z_move",z_move_up),
    
71.         (val_mul,":z_move",-1),
    
72.     (else_try),
    
73.         (neq,":y_move",0),
    
74.         (is_between,":rotation_x_player",1,91),#鼠标移动玩家视角向上 对着天空
    
75.         (store_div,":value", ":rotation_x_player",9),
    
76.         (val_add,":value",1),
    
77.         (store_div,":z_move",":y_move",fly_z_move_div),
    
78.         (val_mul,":z_move",":value"),
    
79.    (else_try),
    
80.         (neq,":y_move",0),
    
81.         (is_between,":rotation_x_player",270,360),#鼠标移动玩家视角向下 对着地面
    
82.         (store_sub,":value", 360,":rotation_x_player"),
    
83.         (store_div,":value", ":value",9),
    
84.         (val_add,":value",1),
    
85.         (val_mul,":value",-1),
    
86.         (store_div,":z_move",":y_move",fly_z_move_div),
    
87.         (val_mul,":z_move",":value"),
    
88.     (try_end),
    
89.    
    
90.     #其他agnt阻挡
    
91.     (assign,":be_block",0),
    
92.     (try_begin),
    
93.         (gt,":y_move",0),
    
94.         (call_script,"script_cf_agent_go_forward_be_hindered_from_other_agent",":player_agent",1),
    
95.         (assign,":be_block",1),
    
96.     (else_try),
    
97.         (lt,":y_move",0),
    
98.         (call_script,"script_cf_agent_go_back_be_hindered_from_other_agent",":player_agent",1),
    
99.         (assign,":be_block",1),
    
100.     (else_try),
     
101.         (gt,":x_move",0),
     
102.         (call_script,"script_cf_agent_go_right_be_hindered_from_other_agent",":player_agent",1),
     
103.         (assign,":be_block",1),
     
104.     (else_try),
     
105.         (lt,":x_move",0),
     
106.         (call_script,"script_cf_agent_go_left_be_hindered_from_other_agent",":player_agent",1),
     
107.         (assign,":be_block",1),
     
108.     (try_end),
     
109.     (eq,":be_block",0),
     
110.     ##
     
111.    
     
112.     (init_position,pos5),
     
113.     (agent_get_position,pos5,":var_0"),
     
114.     #限制飞行高度
     
115.     (position_get_z,":pos_z",pos5),
     
116.     (try_begin),
     
117.         (ge,":pos_z",fly_z_height_limit),
     
118.         (gt,":z_move",0),
     
119.         (assign,":z_move",0),
     
120.     (try_end),
     
121.     ##
     
122.    
     
123.     #使用武器时候Z轴不移动
     
124.     (try_begin),
     
125.         (agent_get_attack_action, ":attack_action", ":player_agent"),
     
126.         (neq, ":attack_action",0),
     
127.         (assign,":z_move",0),
     
128.     (try_end),
     
129.     ##
     
130.    
     
131.     (neq|this_or_next,":y_move",0),
     
132.     (neq|this_or_next,":x_move",0),
     
133.     (neq,":z_move",0),
     
134.     (position_move_y,pos5,":y_move"),
     
135.     (position_move_x,pos5,":x_move"),
     
136.     (position_move_z,pos5,":z_move"),
     
137. 
     
138.     (try_begin),
     
139.        (game_key_is_down,gk_move_right),
     
140.        (position_rotate_z, pos5,-1),
     
141.     (else_try),
     
142.        (game_key_is_down,gk_move_left),
     
143.        (position_rotate_z, pos5, 1),  
     
144.     (try_end),
     
145.    
     
146.     #获得地图最大限制
     
147.     (get_scene_boundaries, pos26, pos27),#左下角和右上角的点,方向朝上
     
148.     (position_get_x, ":lower_left_corner_x", pos26),
     
149.     (position_get_y, ":lower_left_corner_y", pos26),
     
150.     (position_get_x, ":upper_right_corner_x", pos27),
     
151.     (position_get_y, ":upper_right_corner_y", pos27),         
     
152.     (val_add,":lower_left_corner_x",50),
     
153.     (val_add,":lower_left_corner_y",50),
     
154.     (val_sub,":upper_right_corner_x",50),
     
155.     (val_sub,":upper_right_corner_y",50),
     
156.    
     
157.         
     
158.     #设置障碍判断pos6
     
159.     (init_position,pos6),
     
160.     (copy_position ,pos6,pos5),
     
161.     (try_begin),
     
162.         (gt,":horse",-1),
     
163.         (position_move_z, pos6, 300),
     
164.         (position_move_y, pos6, 200),
     
165.     (else_try),
     
166.         (position_move_z, pos6, 150),
     
167.         (position_move_y, pos6, 100),
     
168.     (try_end),
     
169.     #读取xy数据与对地面距离
     
170.     (position_get_x,":pos_x",pos5),
     
171.     (position_get_y,":pos_y",pos5),
     
172.     (position_get_distance_to_ground_level,":ground_level",pos5),
     
173.     (try_begin),#接触地面退出飞行
     
174.         (le,":ground_level",0),      
     
175.         (agent_set_slot,":player_agent",slot_agent_fly,0),#退出飞行
     
176.         (agent_set_no_dynamics, ":var_0", 0),
     
177.         (display_message,"@player fly is off"),
     
178.     (else_try),
     
179.         #防止飞出地图
     
180.         (gt,":pos_x",":lower_left_corner_x"),
     
181.         (lt,":pos_x",":upper_right_corner_x"),
     
182.         (gt,":pos_y",":lower_left_corner_y"),
     
183.         (lt,":pos_y",":upper_right_corner_y"),
     
184.         #判断前方障碍点
     
185.         (agent_is_in_line_of_sight,":player_agent",pos6),
     
186.         (agent_set_position,":var_0",pos5),
     
187.     (try_end),
     
188.    
     
189. ])
     
190. 
     
191. 
     
192. 
     
193. common_agent_flying_lead_charge =  (0, 0, 0, [],
     
194. [
     
195.     #设置pos单位量尺为cm  
     
196.     (set_fixed_point_multiplier, 100),
     
197.    
     
198.     (try_for_agents, ":agent_no"),
     
199.        (agent_is_non_player,":agent_no"),
     
200.        (agent_is_human, ":agent_no"),  ##是人
     
201.        (agent_is_alive, ":agent_no"),  ##存活的
     
202.        (neg|agent_is_wounded,":agent_no"),##非击晕的
     
203.        (agent_get_troop_id,":troop_id",":agent_no"),
     
204.        (agent_get_horse,":horse", ":agent_no"),
     
205.        (agent_get_team,":agent_team",":agent_no"),
     
206.        (agent_get_division, ":agent_division", ":agent_no"),
     
207.        (team_get_movement_order, ":movement_order", ":agent_team", ":agent_division"),
     
208.         
     
209.        (assign,":agent_can_fly",0),
     
210.        (try_begin),
     
211.           (gt,":horse",-1),
     
212.           (agent_get_item_id,":item_id",":horse"),
     
213.           (eq,":item_id","itm_courser_fly"),
     
214.           (assign,":agent_can_fly",1),
     
215.        (else_try),
     
216.           (this_or_next|eq,":troop_id","trp_nord_champion_fly"),#需要设定的单位
     
217.           (eq,":troop_id","trp_swadian_sharpshooter_fly"),
     
218.           (assign,":agent_can_fly",1),
     
219.        (try_end),
     
220.       
     
221.        (eq,":agent_can_fly",1),
     
222.       
     
223.        ##强制设定目标
     
224.        (agent_ai_get_move_target,":target_agent",":agent_no"),
     
225.        (try_begin),
     
226.            (lt,":target_agent",0),
     
227.            (agent_ai_get_look_target,":target_agent",":agent_no"),
     
228.            (try_begin),
     
229.               (gt,":target_agent",-1),
     
230.               (agent_is_alive,":target_agent"),
     
231.            (else_try),
     
232.               (agent_clear_scripted_mode, ":agent_no"),
     
233.               (agent_ai_get_num_cached_enemies, ":num", ":agent_no"),
     
234.               (try_for_range,":index",0,":num"),#get target_agent
     
235.                  (store_random_in_range,":index",0,":num"),
     
236.                  (agent_ai_get_cached_enemy, reg40,":agent_no",":index"),
     
237.                  (agent_is_alive, reg40),
     
238.                  (assign,":target_agent",reg40),
     
239.                  (agent_set_look_target_agent,":agent_no",":target_agent"),
     
240.                  (assign,":num",-1),#break
     
241.               (try_end),
     
242.            (try_end),
     
243.         (try_end),
     
244.         ##
     
245. 
     
246.         #设定var_0
     
247.         (try_begin),
     
248.             (gt,":horse",-1),
     
249.             (assign,":var_0",":horse"),
     
250.         (else_try),
     
251.             (assign,":var_0",":agent_no"),
     
252.         (try_end),
     
253.         ##
     
254.         
     
255.         (try_begin),#开始飞行
     
256.             (neg|agent_slot_ge,":agent_no",slot_agent_fly,1),#非飞行
     
257.             (eq, ":movement_order", mordr_charge),
     
258.             (gt,":target_agent",-1),
     
259.             #获得目标target_agent与agent_no的距离
     
260.             (init_position,pos20),
     
261.             (agent_get_position, pos20, ":agent_no"),
     
262.             (init_position,pos21),
     
263.             (agent_get_position, pos21, ":target_agent"),
     
264.             (get_distance_between_positions,":distance_target",pos20,pos21),
     
265.             
     
266.             (try_begin),
     
267.               (gt,":horse",-1),
     
268.               (assign,":var_0",":horse"),
     
269.               (position_move_z,pos20,z_move_up),
     
270.               (assign,":distance_target_judgment",5000),
     
271.             (else_try),
     
272.               (assign,":var_0",":agent_no"),
     
273.               (position_move_z,pos20,z_move_up),
     
274.               (assign,":distance_target_judgment",2500),
     
275.             (try_end),
     
276.             #距离满足或target_agent是飞行状态则进入飞行状态
     
277.             (assign,":agent_start_fly",0),
     
278.             (try_begin),
     
279.                 (agent_slot_ge,":target_agent",slot_agent_fly,1),#飞行
     
280.                 (assign,":agent_start_fly",1),
     
281.             (else_try),
     
282.                 (gt,":distance_target",":distance_target_judgment"),
     
283.                 (assign,":agent_start_fly",1),
     
284.             (try_end),
     
285.             ##
     
286.             (eq,":agent_start_fly",1),
     
287.             (agent_set_slot,":agent_no",slot_agent_fly,1),
     
288.             (agent_set_no_dynamics, ":var_0", 1),
     
289.             (agent_set_position, ":var_0", pos20),
     
290.         (else_try),#起飞飞行
     
291.           (agent_slot_eq,":agent_no",slot_agent_fly,1),
     
292.           (init_position,pos20),
     
293.           (agent_get_position, pos20, ":agent_no"),
     
294.           (position_get_distance_to_ground_level,":ground_level",pos20),
     
295.           (try_begin),
     
296.              (le, ":ground_level",1000),
     
297.              (position_move_z,pos20,z_move_up),   
     
298.              (agent_set_position, ":var_0", pos20),
     
299.           (else_try),
     
300.              (agent_set_slot,":agent_no",slot_agent_fly,2),
     
301.           (try_end),
     
302.         (else_try),#正常飞行
     
303.           (agent_slot_eq,":agent_no",slot_agent_fly,2),
     
304.           (assign,":y_move",0),
     
305.           (assign,":x_move",0),
     
306.           (assign,":z_move",0),
     
307.          
     
308.           (init_position,pos20),
     
309.           (agent_get_speed,pos20,":var_0"),
     
310.           (position_get_y,":y_speed",pos20),
     
311.           (position_get_x,":x_speed",pos20),
     
312.           #速度
     
313.           (try_begin),
     
314.             (gt,":horse",-1),
     
315.             (val_div,":y_speed",fly_y_horse_move_div),
     
316.             (assign,":y_move",":y_speed"),
     
317.             (val_div,":x_speed",fly_x_horse_move_div),
     
318.             (assign,":x_move",":x_speed"),
     
319.           (else_try),
     
320.             (val_div,":y_speed",fly_y_move_div),
     
321.             (assign,":y_move",":y_speed"),
     
322.             (val_div,":x_speed",fly_x_move_div),
     
323.             (assign,":x_move",":x_speed"),
     
324.           (try_end),
     
325. 
     
326.           (init_position,pos20),
     
327.           (agent_get_look_position, pos20, ":agent_no"),
     
328.           (position_get_rotation_around_x, ":rotation_x", pos20),
     
329. 
     
330.           (try_begin),
     
331.                 (neq,":y_move",0),
     
332.                 (is_between,":rotation_x",1,91),#鼠标移动玩家视角向上 对着天空
     
333.                 (store_div,":value", ":rotation_x",9),
     
334.                 (val_add,":value",1),
     
335.                 (store_div,":z_move",":y_move",fly_z_move_div),
     
336.                 (val_mul,":z_move",":value"),
     
337.           (else_try),
     
338.                 (neq,":y_move",0),
     
339.                 (is_between,":rotation_x",270,360),#鼠标移动玩家视角向下 对着地面
     
340.                 (store_sub,":value", 360,":rotation_x"),
     
341.                 (store_div,":value", ":value",9),
     
342.                 (val_add,":value",1),
     
343.                 (val_mul,":value",-1),
     
344.                 (store_div,":z_move",":y_move",fly_z_move_div),
     
345.                 (val_mul,":z_move",":value"),
     
346.           (try_end),   
     
347. 
     
348.           #其他agnt阻挡
     
349.           (assign,":be_block",0),
     
350.           (try_begin),
     
351.               (gt,":y_move",0),
     
352.               (call_script,"script_cf_agent_go_forward_be_hindered_from_other_agent",":agent_no",1),
     
353.               (assign,":be_block",1),
     
354.           (else_try),
     
355.               (lt,":y_move",0),
     
356.               (call_script,"script_cf_agent_go_back_be_hindered_from_other_agent",":agent_no",1),
     
357.               (assign,":be_block",1),
     
358.           (else_try),
     
359.               (gt,":x_move",0),
     
360.               (call_script,"script_cf_agent_go_right_be_hindered_from_other_agent",":agent_no",1),
     
361.               (assign,":be_block",1),
     
362.           (else_try),
     
363.               (lt,":x_move",0),
     
364.               (call_script,"script_cf_agent_go_left_be_hindered_from_other_agent",":agent_no",1),
     
365.               (assign,":be_block",1),
     
366.          (try_end),
     
367.          (eq,":be_block",0),
     
368.          ##
     
369. 
     
370.          ##AI条件限制防止一直向下
     
371.          (try_begin),
     
372.             (gt,":y_move",0),
     
373.             (lt,":z_move",0),
     
374.             (gt,":target_agent",0),
     
375.             (neg|agent_slot_ge,":target_agent",slot_agent_fly,1),#非飞行
     
376.             (eq, ":movement_order", mordr_charge),
     
377.             #获得目标target_agent与agent_no的距离
     
378.             (init_position,pos21),
     
379.             (agent_get_position, pos21, ":target_agent"),
     
380.             (get_distance_between_positions,":distance_target",pos20,pos21),
     
381.             #对应非飞行单位根据距离下降，进入一定范围后才下降
     
382.             (try_begin),
     
383.                 (gt,":horse",0),
     
384.                 (gt,":distance_target",1500),
     
385.                 (assign,":z_move",0),
     
386.             (else_try),
     
387.                 (gt,":distance_target",750),
     
388.                 (assign,":z_move",0),
     
389.             (try_end),
     
390.           (try_end),
     
391.           ##         
     
392. 
     
393.           (neq|this_or_next,":y_move",0),
     
394.           (neq|this_or_next,":x_move",0),
     
395.           (neq,":z_move",0),
     
396.         
     
397.           (init_position,pos20),
     
398.           (agent_get_position,pos20,":var_0"),
     
399.           #限制飞行高度
     
400.           (position_get_z,":pos_z",pos20),
     
401.           (try_begin),
     
402.             (ge,":pos_z",fly_z_height_limit),
     
403.             (gt,":z_move",0),
     
404.             (assign,":z_move",0),
     
405.           (try_end),
     
406.           ##
     
407.         
     
408.           #使用武器时候Z轴不移动
     
409.           (try_begin),
     
410.             (agent_get_attack_action, ":attack_action", ":agent_no"),
     
411.             (neq, ":attack_action",0),
     
412.             (assign,":z_move",0),
     
413.           (try_end),
     
414.           ##
     
415.          
     
416.           (init_position,pos19),
     
417.           (copy_position ,pos19,pos20),
     
418.           (position_move_y,pos20,":y_move"),
     
419.           (position_move_x,pos20,":x_move"),
     
420.           (position_move_z,pos20,":z_move"),  
     
421.         
     
422.           ##骑手马的转动 读取马的动作来作为依据
     
423.           (try_begin),
     
424.             (gt,":horse",-1),
     
425.             (agent_get_animation,":animation",":horse",1),#必须是1读取上半身！！！！！！！！！
     
426.             (try_begin),
     
427.                 (eq|this_or_next,":animation","anim_horse_turn_right"),
     
428.                 (eq,":animation","anim_horse_turn_right_head"),
     
429.                 (position_rotate_z, pos20,-1),
     
430.             (else_try),
     
431.                 (eq|this_or_next,":animation","anim_horse_turn_left"),
     
432.                 (eq,":animation","anim_horse_turn_left_head"),
     
433.                 (position_rotate_z, pos20, 1),   
     
434.             (try_end),
     
435.           (try_end),
     
436.           ##
     
437. 
     
438.          #获得地图最大限制
     
439.          (init_position,pos26),
     
440.          (init_position,pos27),
     
441.          (get_scene_boundaries, pos26, pos27),#左下角和右上角的点,方向朝上
     
442.          (position_get_x, ":lower_left_corner_x", pos26),
     
443.          (position_get_y, ":lower_left_corner_y", pos26),
     
444.          (position_get_x, ":upper_right_corner_x", pos27),
     
445.          (position_get_y, ":upper_right_corner_y", pos27),         
     
446.          (val_add,":lower_left_corner_x",50),
     
447.          (val_add,":lower_left_corner_y",50),
     
448.          (val_sub,":upper_right_corner_x",50),
     
449.          (val_sub,":upper_right_corner_y",50),
     
450.    
     
451.          #设置障碍判断pos21
     
452.          (init_position,pos21),
     
453.          (copy_position ,pos21,pos20),
     
454.          (try_begin),
     
455.             (gt,":horse",-1),
     
456.             (position_move_z, pos21, 300),
     
457.             (position_move_y, pos21, 200),
     
458.          (else_try),
     
459.             (position_move_z, pos21, 150),
     
460.             (position_move_y, pos21, 100),
     
461.          (try_end),
     
462.         
     
463.          #读取xy数据与对地面距离
     
464.          (position_get_x,":pos_x",pos20),
     
465.          (position_get_y,":pos_y",pos20),
     
466.          (position_get_distance_to_ground_level,":ground_level",pos20),
     
467.          (try_begin),#接触地面退出飞行
     
468.             (le,":ground_level",0),      
     
469.             (agent_set_slot,":agent_no",slot_agent_fly,0),#退出飞行
     
470.             (agent_set_no_dynamics, ":var_0", 0),
     
471.          (else_try),#判断前方障碍点
     
472.             (neg|agent_is_in_line_of_sight,":agent_no",pos21),
     
473.             (position_move_z,pos19,10),
     
474.             (agent_set_position,":var_0",pos19),   
     
475.          (else_try),
     
476.             #防止飞出地图
     
477.             (gt,":pos_x",":lower_left_corner_x"),
     
478.             (lt,":pos_x",":upper_right_corner_x"),
     
479.             (gt,":pos_y",":lower_left_corner_y"),
     
480.             (lt,":pos_y",":upper_right_corner_y"),
     
481.             (agent_set_position,":var_0",pos20),        
     
482.          (try_end),
     
483.       (try_end),   
     
484.     (try_end),
     
485. ]
     
486. )
     

复制代码

（三）常量部分

1. z_move_up = 10
   
2. fly_y_move_div = 10
   
3. fly_x_move_div = 10
   
4. fly_z_move_div = 4
   
5. fly_y_horse_move_div = 40
   
6. fly_x_horse_move_div = 30
   
7. fly_z_horse_move_div = 4
   
8. fly_z_height_limit = 5000
   
9. #agent是否处于飞行状态
   
10. slot_agent_fly  = 100

复制代码

（四）、效果
视频展示：
骑马与砍杀战团飞砍，是兄弟就来飞砍_哔哩哔哩bilibili_骑马与砍杀_演示
骑马与砍杀战团飞砍，是兄弟就来飞砍_哔哩哔哩bilibili_骑马与砍杀_演示

空战

野战

---

作者: vegetto    时间: 2023-2-8 12:31


1.整体位移的立体范围除了要考虑竖向限制ground level z的地面高度以外，还要考虑横向平面尺度boundary，也就是整个场景的实际范围。很多时候场景被空气墙挡住了，所以很多人不注意场景之外，即使有地形的地方是没有地形碰撞的。超出boundary的场景范围ground level不存在或者说是无穷大，这时候人向场景地形范围外飞且需要判断降落的时候，如果采用set z to ground level的方式会很快瞬到与太阳光照贴图肩并肩、天空球之外的外太空上并且落在一个隐形面板上。这时候就别想自由落体下来了。

2.ai和玩家在启闭no dynamic状态时需要区别处理会有一些不一样的bug。因为这个操作很冷门，所以官方并没有把它处理的很好。无论是开启和关闭，引擎内部在是否高空需要自由落体和降落地面的判断还是会一直运行，然后高空突然关闭no dynamic时概率性一瞬间冲突使系统误认为已经落地，产生非dynamic影响的滞空bug。这时候无论你再怎么dynamic启闭都回归不了自由落体，特别的有时靠近地面将落地的时候会永久的卡死在地面一点，相当于零高度滞空，这时候不附加判断的话只能等下次如果不影响重启飞行的情况下重启位移，经典案例就是贴吧有的人把攻城车的踏板给抽掉那在踏板上的人就可能不会掉下来。所以要优化位移模式(比如尽量避免用一个非瞬间性的条件持续设置dynamic为某值，这种在取值需要瞬间变化的时候极容易系统冲突产生如上bug等等处理不细说。)和异常位移情况自检判断。玩家其实也会出现这种情况但比较少，因为这个bug也和动作是否允许位移的特性冲突有关，玩家比AI能做的动作和行为更多，所以说不太容易受这种bug影响，可以开关闭自如，只考虑位移。总体上人数越多、高度越高、关闭前的位移幅度较小或者偏上升趋势时、以及关闭前的动作切换这些情况共同决定了这种滞空bug容易出现的程度。

3.in sight这种适合地平面运动关系碰撞判断手段，不太适合立体空间移动模式，因为像高楼林立的场景，六向位移会和障碍物的不规则表面比如有凹凸形状的孔洞和凹槽，一旦贴合没有高强度的碰撞检测就很容易穿膜，lookpos只能防御来自于视线吻合的位移方向的障碍物判断，如果产生了其他方向与视线或者碰撞检测方向角度相差较大的位移，单个in sight或是其他单方向的检测手段并不足以来支持限制改变位移的碰撞需求。所以针对不同的对象碰撞检测往往会使用很多复合，且光光处理好飞行的人与各种prop类型的障碍物完美避免穿入（穿模部分可以不强求，但不能穿入且回不来）就需要消耗大量的性能。

不过，一个最偷懒的方式就是就像汽车一样设置较大的自动刹车距离，避免出现需要贴合障碍物摩蹭的情况。位移碰撞事件不要拆分多个触发器和太高或太低触发间隔，就像汽车刹车一样，有制动距离，因为运动的主动控制延迟因素影响很大，比如你以50的速度时检测碰撞停止或许从视觉暂留看立即停住了，但是以500的速度本以为按照触发写的本意可以在碰撞前紧贴着停下，但是实际上检测到碰撞的瞬间又持续触发多前进了一两百距离，因为本身各个碰撞检测手段有一点极短的反馈时间，微观上同一个触发时刻检测到的碰撞略滞后于此时的位移坐标。而人体在空中面对建筑物就像蚂蚁一样，可以忽略自身碰撞轮廓的各向尺寸，灵活的点对固定的物的碰撞自然要求比较高，而船体庞然大物但相对于自身体型的速度不快，碰撞检测强度就低一些但是对自身碰撞轮廓的范围又要有所判定。所以体型特征、速度越高，需要贴障碍不穿的碰撞检测强度越大。

4，no dynamic为1状态受到连续攻击，特别是远程攻击的时候，容易概率性把动画锁死在受到攻击动画的固定帧上，然后后续进行一些动作的时候，比如说攻击也会一直固定在一个动作姿势上无法系统自发的切换其他动作。所以也要进行异常动作自检。不过这种情况高度越低越容易出现。

5.对于骨骼动作判断位移，注意虽然正常情况nodynamic开启为1后升空还是可以按照地面的wasd采用步行动画等等，但是在某些情况下比如飞行状态启动前的动作以及受击恢复和主动跳跃时，下半身动作会被锁死在jump的loop动作阶段，除非自由落地解除或强制动作，然而默认的步行动作优先级不足以强制覆盖跳跃。所以出现这种情况位移就只有movez了，或许你可以说是抛砖引玉以后引用飞行动作，但加自定义其他动作位移ai行为就也不是由系统动画动作行为来控制了，所以不推荐基础动作行为指导位移，玩家靠按键，ai靠视角目标和逻辑（也就是各种行为变量slot化，在目标相对有指引的情况下，根据想要达成的目标概率化和变量slot化行为并构造触发时间和持续的时间，再根据受限条件改变各行为slot量取值，就像编写主动带cd技能一样处理，把前后左右上下的不同方向飞行等等行为当成不同的主动技能然后进行条件组合）。


比如你的左右walk步行动作的位移控制对于玩家来说是可以用，但是对于ai其实并没有多少用处。像游戏的左右位移，一部分类ad按键一样面向朝前但是左右脚交叉横向步行，但是也可以是w前进和视角转弯配合{像一些格斗游戏比如黑神话就是ad键直接整个身体向wasd对应方向转过去，骑砍是要保证镜头往面向，不同游戏不同处理），对于在高空的ai来说，ai想要去左边的地方更倾向于采用前进动作配合原地视角转弯的行为，就算有左右脚步行持续时间也较小，产生的位移忽略不计，就像骑砍原地防御挥剑也可以原地转弯一样，面朝前的左右位移行为一般游戏只用于游走打量或闪开攻击，真正到跑到目标去打人，晃动身子W前进才是最常见的行为。


6.玩家和ai最好分开写，因为且不说玩家和ai能够主动做的行为数量有很大差别，其次如果玩家和ai的飞行都以高标准处理比如碰撞的问题，性能耗不住，如果都以低标准bug处理会很多。打个比方，ai如果只针对要打人和其他单一明确的目标事件，基本不会像玩家一样瞎走，而玩家说不定突发奇想主动往墙上蹭蹭洞里钻钻，然后我第一点说的地图边界外飞飞，干些无关战斗等正常玩法的事。如果ai我们遇到碰撞可以老远检测让其转弯，那对于玩家如果不让玩家蹭墙钻洞，老远限制运动还以为有空气墙呢。所以对于ai的软限制到玩家身上就要改多上几道硬性限制。因此，玩家和ai的行为事件最好拆开分析，哪怕是其他事件通用，位移和碰撞还有主动动作技能事件这些最好拆开，一个用高端一个用低配。

---

作者: 杰喵喵    时间: 2023-2-8 21:57

vegetto 发表于 2023-2-8 12:31
1.整体位移的立体范围除了要考虑竖向限制ground level z的地面高度以外，还要考虑横向平面尺度boundary，也 ...

感谢大佬指点，骑砍MOD制作深似海，受教了

---

作者: 战争傀儡阿格兰    时间: 2023-2-10 09:35
皇牌空战——代号M&B

---

作者: 阳光肥宅    时间: 2023-2-12 14:16
支持支持，搂主加油

---

作者: Asterl    时间: 2023-2-12 19:51
写这么多LZ辛苦了，学代码基础是啥，不知道要学会PY的哪些才能看懂LZ的代码，我也想飞啊，记得以前有个飞龙MOD做的很粗糙但是可以拿来YY的，代码不会郁闷

---

作者: 杰喵喵    时间: 2023-2-15 20:10

Asterl 发表于 2023-2-12 19:51
写这么多LZ辛苦了，学代码基础是啥，不知道要学会PY的哪些才能看懂LZ的代码，我也想飞啊，记得以前有个飞龙 ...

B站很多学习编程视频，多写。

---

作者: Asterl    时间: 2023-2-17 21:54

杰喵喵 发表于 2023-2-15 20:10
B站很多学习编程视频，多写。

好的，谢谢推荐，我去试试，不知道我除了会新建种族外还能学会啥…

---

欢迎光临 骑马与砍杀中文站论坛 (https://bbs.mountblade.com.cn/)

Powered by Discuz! X3.4