RO利用人工生命体AI寻找唯一魔物

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20

function FindUniqueMonsterType()
    local typeCount = {}
    local actors = GetActors()
    for i, v in ipairs(actors) do
        if IsMonster(v) == 1 then
            if GetV(V_MOTION, v) ~= MOTION_DEAD then
                local monsterType = GetV(V_HOMUNTYPE, v)
                if monsterType ~= 0 then
                    if MyAvoid[monsterType] == nil then
                        typeCount[monsterType] = (typeCount[monsterType] or 0) + 1
                    end
                end
            end
        end
    end
    for typeID, count in pairs(typeCount) do
        if count == 1 then return typeID end
    end
    return 0
end

1
2
3

IDLE_ST → (扫描到唯一怪) → UNIQUE_HUNT_LOCKED_ST → CHASE_ST → ATTACK_ST
  ↑                                                              |
  └──────────── (目标死亡 → 清除锁定) ────────────────────────────┘

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14

-- 修复前
if (MOTION_DEAD == GetV(V_MOTION,MyEnemy)) then
    MyState = GetUniqueHuntReturnState()  -- 返回 LOCKED_ST!
    ...
end

-- 修复后
if (MOTION_DEAD == GetV(V_MOTION,MyEnemy)) then
    if UniqueHuntTargetType ~= 0 then
        UniqueHuntTargetType = 0      -- 清除锁定
    end
    MyState = IDLE_ST                  -- 回 IDLE 重新扫描
    ...
end

1
2
3
4
5
6
7

-- 修复前
if (object~=0 and object ~= MyEnemy and MyState~=FOLLOW_ST) then
    MyState=CHASE_ST  -- 覆盖!
end

-- 修复后
if (object~=0 and object ~= MyEnemy and MyState~=FOLLOW_ST and MyState~=UNIQUE_HUNT_LOCKED_ST) then

1

if (MyState ~=FOLLOW_ST and MyState~=UNIQUE_HUNT_LOCKED_ST and dist2owner > GetMoveBounds()) then

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14

-- 修复前
if UniqueHuntAuto == 1 and UniqueHuntTargetType == 0 then  -- 有锁就跳过
    ...
end

-- 修复后
if UniqueHuntAuto == 1 then
    -- 如果已有残留锁定，先清除再重新扫描
    if UniqueHuntTargetType ~= 0 then
        UniqueHuntTargetType = 0
    end
    local autoType = FindUniqueMonsterType()
    ...
end

1

AI/USER_AI/AI_main.lua:2591: attempt to call global 'GetSOwnerSecondaryBuffSkill' (a nil value)

1
2
3

function GetSOwnerSecondaryBuffSkill(myid)
    return 0,0,0  -- 无技能，不执行任何操作
end

 1
 2
 3
 4
 5
 6
 7
 8
 9
10

UNIQUE_HUNT: AUTO-LOCKED type 1002
OnUNIQUE_HUNT_LOCKED_ST - hunting type 1002
UNIQUE_HUNT: Found target 150540094 dist=19
OnCHASE_ST
AdjustStandPoint() FAILED ...
CHASE_ST -> IDLE_ST : Cannot attack this target, GetStandPoint() reports that all cells around it are occupied.
OnIDLE_ST
UNIQUE_HUNT: Stale lock reset, re-scanning
UNIQUE_HUNT: AUTO-LOCKED type 1002
... (无限循环)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17

GetActors() 视野 ≈ 18-20 格
    │
    ▼
FindUniqueMonsterType() 能看到目标 ✓
    │
    ▼
第一层: GetMoveBounds()
  StationaryMoveBounds = 14  ← 主人静止时离主距离不能超过 14 格
  MobileMoveBounds = 9       ← 主人移动时离主距离不能超过 9 格
    │
    ▼
第二层: Move() 函数硬编码
  if dis2owner > 14 then return  ← 不改成 20 上面改了也没用
    │
    ▼
第三层: OnMOVE_CMD / OnMOVE_CMD_ST
  if > 15 then → 视为无效指令

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22

                ┌─ 自动扫描发现唯一怪 ──┐
                │  或 Alt+T 手动锁定     │
                ▼                       │
         UNIQUE_HUNT_LOCKED_ST ◄───────┘
                │
         ┌──────┴──────┐
         ▼              ▼
    目标存在        目标不存在
         │              │
         ▼              ▼
    CHASE_ST      BetterMoveToOwner
         │          (跟随主人等待)
    ┌───┴───┐
    ▼       ▼
攻击范围  超出范围
    │       │
    ▼       ▼
ATTACK_ST CHASE_ST 继续靠近
    │
    ├── 目标死亡 → UniqueHuntTargetType=0 → IDLE_ST → 重新扫描
    ├── 目标丢失 → UNIQUE_HUNT_LOCKED_ST（继续等待）
    └── 不可达(StandPoint失败) → 日志记录 + UNIQUE_HUNT_LOCKED_ST

1

UniqueHuntAuto = 1  -- 1=自动触发（默认），0=仅 Alt+T 手动

1

MyAvoid[怪物类型ID] = 1  -- 唯一猎手不会锁定这种怪