73 lines
1.1 KiB
Lua
73 lines
1.1 KiB
Lua
|
require("common")
|
|||
|
|
|
|||
|
|
|
|||
|
|
KarenMemBlock = {}
|
|||
|
|
|
|||
|
|
function AdlFH_Karen( Handle, MapIndex )
|
|||
|
|
cExecCheck "AdlFH_Karen"
|
|||
|
|
|
|||
|
|
local Var = KarenMemBlock[Handle]
|
|||
|
|
|
|||
|
|
if cIsObjectDead( Handle ) then -- <20><EFBFBD><D7BE><EFBFBD>
|
|||
|
|
|
|||
|
|
cAIScriptSet( Handle ) -- <20><>ũ<EFBFBD><C5A9>Ʈ <20><><EFBFBD><EFBFBD>
|
|||
|
|
KarenMemBlock[Handle] = nil -- <20><EFBFBD><DEB8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
return ReturnAI.END
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
|
|||
|
|
if Var == nil then
|
|||
|
|
KarenMemBlock[Handle] = {}
|
|||
|
|
|
|||
|
|
Var = KarenMemBlock[Handle]
|
|||
|
|
|
|||
|
|
Var.Handle = Handle
|
|||
|
|
Var.MapIndex = MapIndex
|
|||
|
|
|
|||
|
|
Var.ActChk = cCurrentSecond()
|
|||
|
|
Var.StepFunc = KarenDummy
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
|
|||
|
|
return Var.StepFunc( Var )
|
|||
|
|
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
|
|||
|
|
function KarenDummy( Var )
|
|||
|
|
|
|||
|
|
local CurSec = cCurrentSecond()
|
|||
|
|
|
|||
|
|
if Var.ActChk > CurSec then
|
|||
|
|
return ReturnAI.END
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
Var.ActChk = CurSec + 1
|
|||
|
|
|
|||
|
|
-- ī<><C4AB> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̻<EFBFBD><CCBB><EFBFBD> <20>ƴ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> HPȸ<50><C8B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ó<><C3B3> - 4/20
|
|||
|
|
local CurHP, MaxHP = cObjectHP( Var.Handle )
|
|||
|
|
|
|||
|
|
cHeal( Var.Handle, MaxHP )
|
|||
|
|
|
|||
|
|
-- ī<><C4AB> -> <20>̱<CCB1> <20><><EFBFBD><EFBFBD><EFBFBD>ٴ<EFBFBD>
|
|||
|
|
local Field = InstanceField[Var.MapIndex]
|
|||
|
|
|
|||
|
|
|
|||
|
|
-- ī<><C4AB> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ϵ<EFBFBD><CFB5><EFBFBD> <20>ٽ<EFBFBD> <20><><EFBFBD><EFBFBD> 5/3
|
|||
|
|
|
|||
|
|
if Field == nil then
|
|||
|
|
return ReturnAI.END
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
if Field.Eglack == nil then
|
|||
|
|
return ReturnAI.END
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
|
|||
|
|
cFollow( Var.Handle, Field.Eglack, 150, 9999 )
|
|||
|
|
|
|||
|
|
|
|||
|
|
return ReturnAI.END
|
|||
|
|
end
|