浆糊论坛-RO小站 - Powered by Discuz! Board

require "./AI/Const.lua"
require "./AI/Util.lua"
-----------------------------
-- RO的技能常数
-----------------------------
--[[
丽芙-治癒之手 = 8001
丽芙-轻捷移动 = 8002
丽芙-脑手术 = 8003
丽芙-智力变换 = 8004(未开放)
艾咪斯可鲁-位置互换 = 8005
艾咪斯可鲁-防御力 = 8006
艾咪斯可鲁-活命之肤 = 8007
艾咪斯可鲁-血的贪求 = 8008(未开放)
飞里乐-月光 = 8009
飞里乐-横越速度 = 8010
飞里乐-紧急回避 = 8011
飞里乐-S.B.R.44 = 8012(未开放)
巴尼米乐斯-善变 = 8013
巴尼米乐斯-混乱的祈福 = 8014
巴尼米乐斯-变更指示 = 8015
巴尼米乐斯-生物爆炸 = 8016(未开放)
--]]
-----------------------------
-----------------------------
-- state
-----------------------------
IDLE_ST = 0 -- 休息(发呆)
FOLLOW_ST = 1 -- 跟随
CHASE_ST = 2 -- 追纵
ATTACK_ST = 3 -- 攻击中
MOVE_CMD_ST = 4 -- 移动
STOP_CMD_ST = 5 -- 停止
ATTACK_OBJECT_CMD_ST = 6 -- 攻击某物的状态
ATTACK_AREA_CMD_ST = 7 -- 攻击某区域
PATROL_CMD_ST = 8 -- 侦查中
HOLD_CMD_ST = 9 -- 死守中
SKILL_OBJECT_CMD_ST = 10 -- 对某物使用技能时
SKILL_AREA_CMD_ST = 11 -- 对某区域使用技能时
FOLLOW_CMD_ST = 12 -- 跟随某物
----------------------------
------------------------------------------
-- Global variable
------------------------------------------
MyState = IDLE_ST -- 最初的状态是休息
MyEnemy = 0 -- 敌人的 id
MyDestX = 0 -- 目前位置 x
MyDestY = 0 -- 目前位置 y
MyPatrolX = 0 -- 侦查目的地 x
MyPatrolY = 0 -- 侦查目的地 y
ResCmdList = List.new() -- 预约命令清单
MyID = 0 -- 生命体 id
MySkill = 0 -- 生命体技能
MySkillLevel = 0 -- 生命体技能等级
------------------------------------------
------------- command process ---------------------
function OnMOVE_CMD (x,y)
TraceAI ("OnMOVE_CMD")
if ( x == MyDestX and y == MyDestY and MOTION_MOVE == GetV(V_MOTION,MyID)) then
return --
end
local curX, curY = GetV (V_POSITION,MyID)
if (math.abs(x-curX)+math.abs(y-curY) > 15) then -- 迹瞳虽陛橾姜剪葬桧鼻桧贼 (怃帼缣怃试剪葬朝籀葬虽强晦阳侥缣)
List.pushleft (ResCmdList,{MOVE_CMD,x,y}) -- 锰楚迹瞳虽煎暧桧翕击蕨擒棻.
x = math.floor((x+curX)/2) -- 酝除虽薄戏煎试荡桧翕棻.
y = math.floor((y+curY)/2) --
end
Move (MyID,x,y)
MyState = MOVE_CMD_ST
MyDestX = x
MyDestY = y
MyEnemy = 0
MySkill = 0
end
function OnSTOP_CMD ()
TraceAI ("OnSTOP_CMD")
if (GetV(V_MOTION,MyID) ~= MOTION_STAND) then
Move (MyID,GetV(V_POSITION,MyID))
end
MyState = IDLE_ST
MyDestX = 0
MyDestY = 0
MyEnemy = 0
MySkill = 0
end
function OnATTACK_OBJECT_CMD (id)
TraceAI ("OnATTACK_OBJECT_CMD")
MySkill = 0
MyEnemy = id
MyState = CHASE_ST
end
function OnATTACK_AREA_CMD (x,y)
TraceAI ("OnATTACK_AREA_CMD")
if (x ~= MyDestX or y ~= MyDestY or MOTION_MOVE ~= GetV(V_MOTION,MyID)) then
Move (MyID,x,y)
end
MyDestX = x
MyDestY = y
MyEnemy = 0
MyState = ATTACK_AREA_CMD_ST
end
function OnPATROL_CMD (x,y)
TraceAI ("OnPATROL_CMD")
MyPatrolX , MyPatrolY = GetV (V_POSITION,MyID)
MyDestX = x
MyDestY = y
Move (MyID,x,y)
MyState = PATROL_CMD_ST
end
function OnHOLD_CMD ()
TraceAI ("OnHOLD_CMD")
MyDestX = 0
MyDestY = 0
MyEnemy = 0
MyState = HOLD_CMD_ST
end
function OnSKILL_OBJECT_CMD (level,skill,id)
TraceAI ("OnSKILL_OBJECT_CMD")
MySkillLevel = level
MySkill = skill
MyEnemy = id
MyState = CHASE_ST
end
function OnSKILL_AREA_CMD (level,skill,x,y)
TraceAI ("OnSKILL_AREA_CMD")
Move (MyID,x,y)
MyDestX = x
MyDestY = y
MySkillLevel = level
MySkill = skill
MyState = SKILL_AREA_CMD_ST
end
function OnFOLLOW_CMD ()
-- 系统接收到RO的ALT+T
if (MyState ~= FOLLOW_CMD_ST) then
MoveToOwner (MyID)
MyState = FOLLOW_CMD_ST
MyDestX, MyDestY = GetV (V_POSITION,GetV(V_OWNER,MyID))
MyEnemy = 0
MySkill = 0
TraceAI ("OnFOLLOW_CMD")
else
MyState = IDLE_ST
MyEnemy = 0
MySkill = 0
TraceAI ("FOLLOW_CMD_ST --> IDLE_ST")
end
end
function ProcessCommand (msg)
if (msg[1] == MOVE_CMD) then
OnMOVE_CMD (msg[2],msg[3])
TraceAI ("MOVE_CMD")
elseif (msg[1] == STOP_CMD) then
OnSTOP_CMD ()
TraceAI ("STOP_CMD")
elseif (msg[1] == ATTACK_OBJECT_CMD) then
OnATTACK_OBJECT_CMD (msg[2])
TraceAI ("ATTACK_OBJECT_CMD")
elseif (msg[1] == ATTACK_AREA_CMD) then
OnATTACK_AREA_CMD (msg[2],msg[3])
TraceAI ("ATTACK_AREA_CMD")
elseif (msg[1] == PATROL_CMD) then
OnPATROL_CMD (msg[2],msg[3])
TraceAI ("PATROL_CMD")
elseif (msg[1] == HOLD_CMD) then
OnHOLD_CMD ()
TraceAI ("HOLD_CMD")
elseif (msg[1] == SKILL_OBJECT_CMD) then
OnSKILL_OBJECT_CMD (msg[2],msg[3],msg[4],msg[5])
TraceAI ("SKILL_OBJECT_CMD")
elseif (msg[1] == SKILL_AREA_CMD) then
OnSKILL_AREA_CMD (msg[2],msg[3],msg[4],msg[5])
TraceAI ("SKILL_AREA_CMD")
elseif (msg[1] == FOLLOW_CMD) then
OnFOLLOW_CMD ()
TraceAI ("FOLLOW_CMD")
end
end
-------------- state process --------------------
--------------------------------------------------
-- 休息(发呆) ST
--------------------------------------------------
function OnIDLE_ST ()
TraceAI ("OnIDLE_ST")
local cmd = List.popleft(ResCmdList)
if (cmd ~= nil) then
ProcessCommand (cmd) -- 执行预约命令
return
end
local object = GetOwnerEnemy (MyID)
if (object ~= 0) then -- 取得主人的敌人ID
MyState = CHASE_ST
MyEnemy = object
TraceAI ("IDLE_ST -> CHASE_ST : MYOWNER_ATTACKED_IN")
return
end
object = GetMyEnemy (MyID)
if (object ~= 0) then -- 取得自己的敌人ID
MyState = CHASE_ST
MyEnemy = object
TraceAI ("IDLE_ST -> CHASE_ST : ATTACKED_IN")
return
end
local distance = GetDistanceFromOwner(MyID)
if ( distance > 2 or distance == -1) then -- 与主人的距离 > 2格时开始跟随
MyState = FOLLOW_ST
TraceAI ("IDLE_ST -> FOLLOW_ST")
return;
end
end
--------------------------------------------------------------
-- 没事时自动跟随主人
--------------------------------------------------------------
function OnFOLLOW_ST ()
TraceAI ("OnFOLLOW_ST")
if (GetDistanceFromOwner(MyID) <= 2) then -- DESTINATION_ARRIVED_IN
MyState = IDLE_ST
TraceAI ("FOLLOW_ST -> IDLW_ST")
return;
elseif (GetV(V_MOTION,MyID) == MOTION_STAND) then
MoveToOwner (MyID)
TraceAI ("FOLLOW_ST -> FOLLOW_ST")
return;
end
end
---------------------------------------------------------------
-- 追踪中ST
---------------------------------------------------------------
function OnCHASE_ST ()
TraceAI ("OnCHASE_ST")
if (true == IsOutOfSight(MyID,MyEnemy)) then -- IF人工生命和魔物为不可视距离
MyState = IDLE_ST
MyEnemy = 0
MyDestX, MyDestY = 0,0
TraceAI ("CHASE_ST -> IDLE_ST : ENEMY_OUTSIGHT_IN")
return
end
if (true == IsInAttackSight(MyID,MyEnemy)) then -- IF人工生命正在对目标攻击或使用技能
MyState = ATTACK_ST
TraceAI ("CHASE_ST -> ATTACK_ST : ENEMY_INATTACKSIGHT_IN")
return
end
local x, y = GetV (V_POSITION,MyEnemy)
if (MyDestX ~= x or MyDestY ~= y) then -- 改变现在的位置到目标的位置去
MyDestX, MyDestY = GetV (V_POSITION,MyEnemy);
Move (MyID,MyDestX,MyDestY)
TraceAI ("CHASE_ST -> CHASE_ST : DESTCHANGED_IN")
return
end
end
---------------------------------------------------------------
-- 攻击中 ST
---------------------------------------------------------------
function OnATTACK_ST ()
TraceAI ("OnATTACK_ST")
local HPp = GetV (V_HP,MyID) / GetV (V_MAXHP,MyID) -- HP%
local SPp = GetV (V_SP,MyID) / GetV (V_MAXSP,MyID) -- SP%
local owner = GetV (V_OWNER,MyID)
local OHPp = GetV (V_HP,owner) / GetV (V_MAXHP,owner) -- OWNER HP%
local OSPp = GetV (V_SP,owner) / GetV (V_MAXSP,owner) -- OWNER SP%
local type = GetV (V_HOMUNTYPE,MyID)
if (true == IsOutOfSight(MyID,MyEnemy)) then -- IF敌人和人工生命为不可视距离
MyState = IDLE_ST
TraceAI ("ATTACK_ST -> IDLE_ST")
return
end
if (MOTION_DEAD == GetV(V_MOTION,MyEnemy)) then -- 敌人死亡
MyState = IDLE_ST
TraceAI ("ATTACK_ST -> IDLE_ST")
return
end
if (false == IsInAttackSight(MyID,MyEnemy)) then -- 敌人逃跑时追过去
MyState = CHASE_ST
MyDestX, MyDestY = GetV (V_POSITION,MyEnemy);
Move (MyID,MyDestX,MyDestY)
TraceAI ("ATTACK_ST -> CHASE_ST : ENEMY_OUTATTACKSIGHT_IN")
return
end
if (MySkill == 0) then -- 非使用技能状态
---------------------自动使用技能区块----------------------------------------------------------
if (GetV (V_SP,MyID) >= 25) then
if (type == AMISTR or type == AMISTR_H) then
if ((OHPp <= 0.25 or HPp <= 0.25) and MOTION_ATTACK == GetV(V_MOTION,GetMyEnemy (MyID))) then
MySkill = AutoSkillSet (MyID) -- 羊
MySkillLevel = 5 -- 技能等级请自行设定
SkillObject (MyID,MySkillLevel,MySkill,owner)
TraceAI ("OnAutoSkill")
end
elseif (type == FILIR or type == FILIR_H or type == VANILMIRTH or type == VANILMIRTH_H) then
if (HPp <= 0.25 or SPp == 1) then
MySkill = AutoSkillSet (MyID) -- 飞里乐和布丁
MySkillLevel = 5 -- 技能等级请自行设定
SkillObject (MyID,MySkillLevel,MySkill,MyEnemy)
TraceAI ("OnAutoSkill")
end
end
MySkill = 0
end
-----------------------------------------------------------------------------------------------
Attack (MyID,MyEnemy)
else -- 技能使用状态
SkillObject (MyID,MySkillLevel,MySkill,MyEnemy)
TraceAI (string.format("MySkillLevel: %d,MySkill:%d",MySkillLevel,MySkill))
MySkill = 0
end
TraceAI ("ATTACK_ST -> ATTACK_ST : ENERGY_RECHARGED_IN")
return
end
----------------------------------------------------------------
-- 移动到指定位置
----------------------------------------------------------------
function OnMOVE_CMD_ST ()
TraceAI ("OnMOVE_CMD_ST")
local x, y = GetV (V_POSITION,MyID)
if (x == MyDestX and y == MyDestY) then -- 到达指定位置时
MyState = IDLE_ST -- 可改成指定ST
end
end
----------------------------------------------------------------
-- STOP (可程式)
----------------------------------------------------------------
function OnSTOP_CMD_ST ()
-- TraceAI ("OnSTOP_CMD_ST")
-- MyState = HOLD_CMD_ST
end
----------------------------------------------------------------
-- 攻击目标命令 (可程式)
----------------------------------------------------------------
function OnATTACK_OBJECT_CMD_ST ()
end
----------------------------------------------------------------
-- 区域攻击
----------------------------------------------------------------
function OnATTACK_AREA_CMD_ST ()
TraceAI ("OnATTACK_AREA_CMD_ST")
local object = GetOwnerEnemy (MyID)
if (object == 0) then
object = GetMyEnemy (MyID)
end
if (object ~= 0) then -- MYOWNER_ATTACKED_IN or ATTACKED_IN
MyState = CHASE_ST
MyEnemy = object
return
end
local x , y = GetV (V_POSITION,MyID)
if (x == MyDestX and y == MyDestY) then -- DESTARRIVED_IN
MyState = IDLE_ST
end
end
----------------------------------------------------------------
-- 侦查中
----------------------------------------------------------------
function OnPATROL_CMD_ST ()
TraceAI ("OnPATROL_CMD_ST")
local object = GetOwnerEnemy (MyID)
if (object == 0) then
object = GetMyEnemy (MyID)
end
if (object ~= 0) then -- MYOWNER_ATTACKED_IN or ATTACKED_IN
MyState = CHASE_ST
MyEnemy = object
TraceAI ("PATROL_CMD_ST -> CHASE_ST : ATTACKED_IN")
return
end
local x , y = GetV (V_POSITION,MyID)
if (x == MyDestX and y == MyDestY) then -- DESTARRIVED_IN
MyDestX = MyPatrolX
MyDestY = MyPatrolY
MyPatrolX = x
MyPatrolY = y
Move (MyID,MyDestX,MyDestY)
end
end
----------------------------------------------------------------
-- 守候(死守)..游戏中指令控制是否进入，程式不会自动进入此回圈
----------------------------------------------------------------
function OnHOLD_CMD_ST ()
TraceAI ("OnHOLD_CMD_ST")
if (MyEnemy ~= 0) then
local d = GetDistance(MyEnemy,MyID)
if (d ~= -1 and d <= GetV(V_ATTACKRANGE,MyID)) then
Attack (MyID,MyEnemy)
else
MyEnemy = 0;
end
return
end
local object = GetOwnerEnemy (MyID)
if (object == 0) then
object = GetMyEnemy (MyID)
if (object == 0) then
return
end
end
MyEnemy = object
end
----------------------------------------------------------------
-- 对物体目标使用技能(可程式)
----------------------------------------------------------------
function OnSKILL_OBJECT_CMD_ST ()
end
----------------------------------------------------------------
-- 对区域使用技能
----------------------------------------------------------------
function OnSKILL_AREA_CMD_ST ()
TraceAI ("OnSKILL_AREA_CMD_ST")
local x , y = GetV (V_POSITION,MyID)
if (GetDistance(x,y,MyDestX,MyDestY) <= GetV(V_SKILLATTACKRANGE,MyID,MySkill)) then -- DESTARRIVED_IN
SkillGround (MyID,MySkillLevel,MySkill,MyDestX,MyDestY)
MyState = IDLE_ST
MySkill = 0
end
end
----------------------------------------------------------------
-- 跟随主人(系统指令) 相当於ALT+T
----------------------------------------------------------------
function OnFOLLOW_CMD_ST ()
local object = GetOwnerEnemy (MyID)
local x, y
local SPp = GetV (V_SP,MyID) / GetV (V_MAXSP,MyID) -- SP%
local type = GetV (V_HOMUNTYPE,MyID)
if (object ~= 0) then -- 取得主人的敌人ID
MyEnemy = object
if (false == IsInAttackSight(MyID,MyEnemy)) then -- IF人工生命正在对目标攻击或使用技能
MyDestX, MyDestY = GetV (V_POSITION,MyEnemy)
Move (MyID,MyDestX,MyDestY)
return
end
if (MySkill == 0) then -- 非使用技能状态
----------------------------------自动使用技能区块---------------------------------
if (GetV (V_SP,MyID) >= 25) then
if (type == AMISTR or type == AMISTR_H) then
if ((OHPp <= 0.25 or HPp <= 0.25) and MOTION_ATTACK == GetV(V_MOTION,GetMyEnemy (MyID))) then
MySkill = AutoSkillSet (MyID) -- 羊
MySkillLevel = 5 -- 技能等级请自行设定
SkillObject (MyID,MySkillLevel,MySkill,owner)
TraceAI ("OnAutoSkill")
end
elseif (type == FILIR or type == FILIR_H or type == VANILMIRTH or type == VANILMIRTH_H) then
if (SPp == 1) then
MySkill = AutoSkillSet (MyID) -- 飞里乐和布丁
MySkillLevel = 1 -- 技能等级请自行设定
SkillObject (MyID,MySkillLevel,MySkill,MyEnemy)
TraceAI ("OnAutoSkill")
end
end
MySkill = 0
end
-----------------------------------------------------------------------------------
Attack (MyID,MyEnemy)
else -- 技能使用状态
SkillObject (MyID,MySkillLevel,MySkill,MyEnemy)
TraceAI (string.format("MySkillLevel: %d,MySkill:%d",MySkillLevel,MySkill))
MySkill = 0
end
return
end
TraceAI ("OnFOLLOW_CMD_ST")
local ownerX, ownerY, myX, myY
ownerX, ownerY = GetV (V_POSITION,GetV(V_OWNER,MyID)) -- 主人ID位置
myX, myY = GetV (V_POSITION,MyID) -- 生命体ID位置
local d = GetDistance (ownerX,ownerY,myX,myY)
if ( d <= 2) then -- 3捻桧 剪葬贼
return
end
local motion = GetV (V_MOTION,MyID)
if (motion == MOTION_MOVE) then -- 生命体为移动中时
d = GetDistance (ownerX, ownerY, MyDestX, MyDestY)
if ( d > 2 ) then -- 距离大於2格时
MoveToOwner (MyID)
MyDestX = ownerX
MyDestY = ownerY
return
end
else -- 棻艇翕蒙
MoveToOwner (MyID)
MyDestX = ownerX
MyDestY = ownerY
return
end
end
-------------------------------------------
-- 人工生命体自动依类型选择技能设定 AutoSkillSet (myid)
-------------------------------------------
function AutoSkillSet (myid)
local result = 0
local skilltype
local type = GetV (V_HOMUNTYPE,myid)
if (type == LIF or type == LIF_H) then
skilltype = 8001
elseif (type == AMISTR or type == AMISTR_H) then
skilltype = 8005
elseif (type == FILIR or type == FILIR_H) then
skilltype = 8009
elseif (type == VANILMIRTH or type == VANILMIRTH_H) then
skilltype = 8013
end
result = skilltype
return result
end
-------------------------------------------
-- 取得主人的敌人 GetOwnerEnemy(被攻击时锁定)
-------------------------------------------
function GetOwnerEnemy (myid)
local result = 0
local owner = GetV (V_OWNER,myid)
local actors = GetActors ()
local enemys = {}
local index = 1
local target
for i,v in ipairs(actors) do
if (v ~= owner and v ~= myid) then
target = GetV (V_TARGET,v)
if (target == owner) then
if (IsMonster(v) == 1) then
enemys[index] = v
index = index+1
else
local motion = GetV(V_MOTION,i)
if (motion == MOTION_ATTACK or motion == MOTION_ATTACK2) then
enemys[index] = v
index = index+1
end
end
end
end
end
local min_dis = 100
local dis
for i,v in ipairs(enemys) do
dis = GetDistance2 (myid,v)
if (dis < min_dis) then
result = v
min_dis = dis
end
end
return result
end
--[[
-------------------------------------------
-- 攻击型态选择(以生命体类型为条件) GetMyEnemy
-------------------------------------------
function GetMyEnemy (myid)
local result = 0
local type = GetV (V_HOMUNTYPE,myid)
if (type == LIF or type == LIF_H or type == AMISTR or type == AMISTR_H) then
result = GetMyEnemyA (myid)
elseif (type == FILIR or type == FILIR_H or type == VANILMIRTH or type == VANILMIRTH_H) then
result = GetMyEnemyB (myid)
end
return result
end
-------------------------------------------
-- 非主动攻击型 GetMyEnemyA
-------------------------------------------
function GetMyEnemyA (myid)
local result = 0
local owner = GetV (V_OWNER,myid)
local actors = GetActors ()
local enemys = {}
local index = 1
local target
for i,v in ipairs(actors) do
if (v ~= owner and v ~= myid) then
target = GetV (V_TARGET,v)
if (target == myid) then
enemys[index] = v
index = index+1
end
end
end
local min_dis = 100
local dis
for i,v in ipairs(enemys) do
dis = GetDistance2 (myid,v)
if (dis < min_dis) then
result = v
min_dis = dis
end
end
return result
end
--]]
-------------------------------------------
-- 主动攻击型 GetMyEnemyB
-------------------------------------------
function GetMyEnemy (myid)
local result = 0
local owner = GetV (V_OWNER,myid)
local actors = GetActors ()
local enemys = {}
local index = 1
local type
for i,v in ipairs(actors) do
if (v ~= owner and v ~= myid) then
-- 这里可以插入判断怪物属性的程式
if (1 == IsMonster(v)) then
enemys[index] = v
index = index+1
end
end
end
local min_dis = 100
local dis
for i,v in ipairs(enemys) do
dis = GetDistance2 (myid,v)
if (dis < min_dis) then
result = v
min_dis = dis
end
end
return result
end
--------------------------------------------------------------------
-- 人工AI主程式
--------------------------------------------------------------------
function AI(myid)
MyID = myid
local owner = GetV (V_OWNER,MyID)
local HPp = GetV (V_HP,MyID) / GetV (V_MAXHP,MyID) -- HP%
local OHPp = GetV (V_HP,owner) / GetV (V_MAXHP,owner) -- OWNER HP%
local type = GetV (V_HOMUNTYPE,MyID)
if (type == LIF or type == LIF_H) then
if (GetV (V_SP,MyID) >= 25) then
if (OHPp <= 0.25) then
MySkill = AutoSkillSet (MyID) -- 丽芙(对玩家)
MySkillLevel = 5 -- 技能等级请自行设定
SkillObject (MyID,MySkillLevel,MySkill,owner)
TraceAI ("OnAutoSkill")
elseif (HPp <= 0.25) then
MySkill = AutoSkillSet (MyID) -- 丽芙(对自己)
MySkillLevel = 5 -- 技能等级请自行设定
SkillObject (MyID,MySkillLevel,MySkill,MyID)
TraceAI ("OnAutoSkill")
end
end
end
local msg = GetMsg (myid) -- 立即命令
local rmsg = GetResMsg (myid) -- 预约的命令
if msg[1] == NONE_CMD then
if rmsg[1] ~= NONE_CMD then
if List.size(ResCmdList) < 15 then
List.pushright (ResCmdList,rmsg) -- 储存预约命令
end
end
else
List.clear (ResCmdList) -- 当有立即命令时，清除预约命令清单
ProcessCommand (msg) -- 执行命令
end
-- 鼻鹧籀葬
if (MyState == IDLE_ST) then
OnIDLE_ST ()
elseif (MyState == CHASE_ST) then
OnCHASE_ST ()
elseif (MyState == ATTACK_ST) then
OnATTACK_ST ()
elseif (MyState == FOLLOW_ST) then
OnFOLLOW_ST ()
elseif (MyState == MOVE_CMD_ST) then
OnMOVE_CMD_ST ()
elseif (MyState == STOP_CMD_ST) then
OnSTOP_CMD_ST ()
elseif (MyState == ATTACK_OBJECT_CMD_ST) then
OnATTACK_OBJECT_CMD_ST ()
elseif (MyState == ATTACK_AREA_CMD_ST) then
OnATTACK_AREA_CMD_ST ()
elseif (MyState == PATROL_CMD_ST) then
OnPATROL_CMD_ST ()
elseif (MyState == HOLD_CMD_ST) then
OnHOLD_CMD_ST ()
elseif (MyState == SKILL_OBJECT_CMD_ST) then
OnSKILL_OBJECT_CMD_ST ()
elseif (MyState == SKILL_AREA_CMD_ST) then
OnSKILL_AREA_CMD_ST ()
elseif (MyState == FOLLOW_CMD_ST) then
OnFOLLOW_CMD_ST ()
end
end

复制代码