[OSP][战团]下马骑兵自动上马AI代码

ggfgfgf

rt，马被砍死的骑兵附近有马的话会上马，难以测试，如有问题欢迎指教:)算是个简易的bot吧

module_misson_templates.py中开头定义
添加

cavalry_ai_dismounted_remount = (
        5, 0, 0.5, [],
          [
                (try_for_agents, ":agent"),
                        (agent_is_alive, ":agent"),
                        (agent_is_non_player, ":agent"),
                        (agent_slot_eq, ":agent", slot_agent_is_running_away, 0),
                        (agent_get_troop_id, ":troop_id", ":agent"),
                        (troop_is_guarantee_horse, ":troop_id"),
                        (agent_get_horse, ":h", ":agent"),
                        (eq, ":h", -1),                                (set_show_messages, 0),
                                (agent_get_team, ":team", ":agent"),
                                (agent_get_division, ":division", ":agent"),
                                (team_give_order, ":team", ":division", 3),
                                (set_show_messages, 1),
                (try_end),
    ])



形如

............
##############################......

pilgrim_disguise = [itm_pilgrim_hood,itm_pilgrim_disguise,itm_practice_staff, itm_throwing_daggers]
af_castle_lord = af_override_horse | af_override_weapons| af_require_civilian

#新增代码
cavalry_ai_dismounted_remount = (
        5, 0, 0.5, [],
          [
                (try_for_agents, ":agent"),
                        (agent_is_alive, ":agent"),
                        (agent_is_non_player, ":agent"),
                        (agent_slot_eq, ":agent", slot_agent_is_running_away, 0),
                        (agent_get_troop_id, ":troop_id", ":agent"),
                        (troop_is_guarantee_horse, ":troop_id"),
                        (agent_get_horse, ":h", ":agent"),
                        (eq, ":h", -1),
                                (set_show_messages, 0),
                                (agent_get_team, ":team", ":agent"),
                                (agent_get_division, ":division", ":agent"),
                                (team_give_order, ":team", ":division", 3),
                                (set_show_messages, 1),
                (try_end),
    ])
#新增代码
............

在你需要的战场触发器中添加:
cavalry_ai_dismounted_remount,

这里以野战(lead_charge)为例


  (
    "lead_charge",mtf_battle_mode|mtf_synch_inventory,charge,
    "You lead your men to battle.",
    [
     (1,mtef_defenders|mtef_team_0,0,aif_start_alarmed,12,[]),
     (0,mtef_defenders|mtef_team_0,0,aif_start_alarmed,0,[]),
     (4,mtef_attackers|mtef_team_1,0,aif_start_alarmed,12,[]),
     (4,mtef_attackers|mtef_team_1,0,aif_start_alarmed,0,[]),
     ],
    [
      (ti_on_agent_spawn, 0, 0, [],
       [
         (store_trigger_param_1, ":agent_no"),
         (call_script, "script_agent_reassign_team", ":agent_no"),

         (assign, ":initial_courage_score", 5000),

............
      cavalry_ai_dismounted_remount,#新增代码
      common_battle_order_panel,
      common_battle_order_panel_tick,


    ],
  ),


代码注释:
cavalry_ai_dismounted_remount = (
        5, 0, 0.5, [], #每隔5秒触发一次，触发后延时0秒执行代码，执行后等待0.5秒
          [
                (try_for_agents, ":agent"), #循环遍历所有战场者
                        (agent_is_alive, ":agent"),                #战场者是活的
                        (agent_is_non_player, ":agent"),       #战场者不是玩家
                        (agent_get_class ,":class", ":agent"), #获取战场者兵种
                        (eq,":class",grc_archers),                  #是骑兵
                        (agent_get_horse, ":h", ":agent"),     #获取战场者的马
                        (neg|ge, ":h", 0),                             #马编号小于0，骑兵没有马匹,为下马骑兵，即需下达上马命令，使之上马
                                                                             #p.s.上马命令须在下达冲锋命令后下达，并须周围有无人骑的马匹
                                (agent_get_team, ":team", ":agent"),       #获取下马骑兵(战场者)队伍
                                (agent_get_division, ":division", ":agent"),#获取下马骑兵所属分组
                                (team_set_relation, ":team", 6, 1),          #设置临时队伍6与玩家队伍为友军
                                (get_player_agent_no, ":p"),                   #获取玩家战场编号
                                (team_set_leader, 6, ":p"),                      #设置临时队伍领导者为玩家
                                (agent_set_team, ":agent", 6),                #将下马骑兵设入临时队伍
                                (agent_set_division, ":agent", ":division"),#将下马骑兵设入临时分组
                                (team_give_order, 6, ":division", 0),         #向临时分组下达冲锋命令
                                (team_give_order, 6, ":division", 3),         #向临时分组下达上马命令，此段意在单独向该战场者下达命令
                               # (agent_set_team, ":agent", ":team"),       #还原战场者队伍为原先的
                               # (agent_set_division, ":agent", ":division"),#还原战场者所属分组为原先的
                (try_end),
    ])


module_system教程导航,by 心中飞翔
Module System的简单教程（完整版本？） - MOD制作资料区 - 骑马与砍杀中文站论坛 - Powered by Discuz! (mountblade.com.cn)

15653910782

这个可以，一直很想要这个

千里难行

在场景内骑兵数量大的时候，不知道会不会有明显的降帧啊

ggfgfgf

千里难行 发表于 2023-1-5 21:28
在场景内骑兵数量大的时候，不知道会不会有明显的降帧啊

不会                                        .

武安apk43

team_give_order这个操作并不需要队伍是玩家队伍，AI队伍也能生效，所以并不需要把他设置成玩家队伍再下命令；由于team_give_order这个是对整个队伍分组的命令，所以只需要设置一次命令即可。
以下是POBD代码

（点击展开 / 收起）

(2, 0, ti_once, [(store_mission_timer_a, reg0),(gt, reg0, 2)], [ #Force Cav to Stay Mounted     (set_show_messages, 0),        (try_for_range, ":team", 0, 4),                            (store_random_in_range, reg0, 0, 3),                 (team_set_slot, ":team", slot_team_decision_seed, reg0),                 (store_random_in_range, reg0, 0, 3),                 (team_set_slot, ":team", slot_team_decision_seed_2, reg0),                 (try_for_range, ":division", 0, 9),                     (store_add, ":slot", slot_team_d0_type, ":division"),                         (this_or_next|team_slot_eq, ":team", ":slot", sdt_cavalry),                         (team_slot_eq, ":team", ":slot", sdt_harcher),                         (team_get_riding_order, reg0, ":team", ":division"),                         (eq, reg0, rordr_free),                         (team_give_order, ":team", ":division", mordr_mount),                 (try_end),                        (try_end),         (set_show_messages, 1),    ]),

ggfgfgf

apk43 发表于 2023-1-6 13:19
team_give_order这个操作并不需要队伍是玩家队伍，AI队伍也能生效，所以并不需要把他设置成玩家队伍再下命 ...

这里是为了被分组的bot不会攻击玩家队伍

武安apk43

ggfgfgf 发表于 2023-1-6 16:00
这里是为了被分组的bot不会攻击玩家队伍

我理解您的意思了，你的意思是让下马的骑兵单独分队获得上马的命令而不影响组内其他人，但是如果把他们设置回原来的队伍和分组之后，临时分队的上马命令对他们还生效吗？你有没有测试？

ggfgfgf

apk43 发表于 2023-1-6 19:14
我理解您的意思了，你的意思是让下马的骑兵单独分队获得上马的命令而不影响组内其他人，但是如果把他们设 ...

所以说难以测试，但是没有自动冲锋，所以认为没为问题

武安apk43

ggfgfgf 发表于 2023-1-7 10:59
所以说难以测试，但是没有自动冲锋，所以认为没为问题

按理说他们被设置成原来的队伍分组之后，就会继续执行原来的队伍分组的命令的。

我刚刚测试了几遍，没有见到下马骑兵自动上马的现象

ggfgfgf

apk43 发表于 2023-1-7 12:16
按理说他们被设置成原来的队伍分组之后，就会继续执行原来的队伍分组的命令的。

我刚刚测试了几遍，没 ...

那请教下，有什么解决办法呢？还是直接让骑兵变成另一支队伍？呃，汉匈里就是这么单独命令士兵的，可能是命令编号错了

武安apk43

ggfgfgf 发表于 2023-1-7 13:11
呃，汉匈里就是这么单独命令士兵的，可能是命令编号错了

我才发现你把获取兵种分组搞错了，应该把
(eq,":class",grc_archers), ##这是射手
改成
(eq,":class",grc_cavalry), ##这是骑兵
而且命令编号我查了没错
mordr_mount                                = 3
尽管如此，我把它粘贴到纯净版native编译测试，还是不会自动上马。

武安apk43

我的建议是就直接开局让所有骑兵编队都获得上马的命令，就像我前面说的POBD那样。

要是执着要单独的AI，我倒是写了一个，
但是要WSE的一个操作符agent_set_horse, 测试有效，仅供参考：

（点击展开 / 收起）

no_horse_cavalry_auto_find_horse_to_mount = (1, 0, 0, [(store_mission_timer_a, reg0),(gt, reg0, 2),],         [         (set_fixed_point_multiplier, 1000),     (try_for_agents, ":agent"),                 (try_begin),                         (agent_is_active, ":agent"),                         (agent_is_human, ":agent"),                         (agent_is_alive, ":agent"),                         (agent_slot_eq, ":agent", slot_agent_is_running_away, 0),#非逃跑                                                  (agent_get_troop_id, ":troop_id", ":agent"),                         (troop_is_guarantee_horse, ":troop_id"),##这里我不用grc_cavalry判断骑兵是因为避免与下马骑兵自动分组的代码冲突                                                  (agent_get_horse, reg10, ":agent"),##下马                         (eq, reg10, -1),                                                  (agent_get_team, ":team" ,":agent"),                         (agent_get_division, ":class", ":agent"),                         (team_get_riding_order, ":rd_order", ":team", ":class"),##获取上下马命令，经过测试这个才是玩家队伍上下马的命令，但是并没有team_give_riding_order的操作符                         (eq, ":rd_order", rordr_free),                         (team_get_movement_order, ":mv_order", ":team", ":class"),##获取上下马命令，可能这是AI队伍的上下马命令？                         (neq, ":mv_order", mordr_dismount),                                                  (agent_get_position, pos20, ":agent"),                         (store_skill_level, ":riding_skill", "skl_riding", ":troop_id"),##获取骑术                         (assign, ":horse_target", -1),                         (assign, ":max_dist", 1500),                         (try_for_agents, ":horse", pos20, 1500),#以agent为中心15m范围找马，节省计算资源                                 (agent_is_alive, ":horse"),                                 (neg|agent_is_human, ":horse"),                                 (agent_get_item_id, ":horse_id", ":horse"),                                 (ge, ":horse_id", 0),                                 (agent_get_rider, ":rider", ":horse"),                                 (eq, ":rider", -1),##没有人骑的马                                 (item_get_difficulty, ":difficulty", ":horse_id"),                                 (ge, ":riding_skill", ":difficulty"),##骑术大于所需难度                                 (agent_get_position, pos21, ":horse"),                                 (get_distance_between_positions, ":dist", pos20, pos21),                                 (lt, ":dist", ":max_dist"),                                 (assign, ":max_dist", ":dist"),                                 (assign, ":horse_target", ":horse"),                         (try_end),                         (ge, ":horse_target", 0),                         (agent_stop_running_away, ":horse_target"),                         (agent_set_speed_modifier, ":horse_target", 0),##让马停下                         (agent_get_position, pos21, ":horse_target"),                         (get_distance_between_positions, ":dist", pos20, pos21),                         (try_begin),                                 (is_between, ":dist", 150, 1500),##1.5m-15m                                 (agent_set_scripted_destination, ":agent", pos21, 1),##让AI去马的位置                                 (agent_set_slot, ":agent", slot_agent_is_finding_horse, 1),                         (else_try),                                 (lt, ":dist", 150),##小于1.5m                                 (agent_set_animation, ":agent", "anim_mount_horse"),##设置AI上马动作                                 (agent_set_horse, ":agent", ":horse_target"),##WSE  设置AI的马为horse_target                                 (agent_set_speed_modifier, ":horse_target", 100),##恢复马速                                 #(display_message, "@MOUNT!"),                                 (agent_set_slot, ":agent", slot_agent_is_finding_horse, 0),                                 (agent_clear_scripted_mode, ":agent"),##清除脚本还原AI行为                                 (agent_force_rethink, ":agent"),                         (try_end),                 (else_try),                         (agent_slot_eq, ":agent", slot_agent_is_finding_horse, 1),                         (agent_clear_scripted_mode, ":agent"),                         (agent_force_rethink, ":agent"),                         (agent_set_slot, ":agent", slot_agent_is_finding_horse, 0),                 (try_end),         (try_end),    ])

w25747

武安apk43 发表于 2023-1-7 14:17
我的建议是就直接开局让所有骑兵编队都获得上马的命令，就像我前面说的POBD那样。

要是执着要单独的AI，我 ...

请问这段代码是放script.py里吗？

半世尘埃

w25747 发表于 2023-10-18 16:08
请问这段代码是放script.py里吗？

这是战场触发器，需要放到module_mission_templates里