921 lines
24 KiB
Lua
Raw Normal View History

2023-06-26 04:40:53 -07:00
--------------------------------------------------------------------------------
-- Legend Of Bijou Progress Func --
--------------------------------------------------------------------------------
-- <20><><EFBFBD><EFBFBD> <20>ʱ<EFBFBD>ȭ
function InitDungeon( Var )
cExecCheck "InitDungeon"
if Var == nil
then
return
end
-- ŷ<><C5B7> <20><><EFBFBD><EFBFBD>Ʈ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>÷<EFBFBD><C3B7>̾<EFBFBD><CCBE><EFBFBD> ù <20>α<EFBFBD><CEB1><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ٸ<EFBFBD><D9B8><EFBFBD>.
if Var["bPlayerMapLogin"] == nil
then
if Var["InitialSec"] + WAIT_PLAYER_MAP_LOGIN_SEC_MAX <= cCurrentSecond()
then
GoToFail( Var )
return
end
return
end
if Var["InitDungeon"] == nil
then
DebugLog( "Start InitDungeon" )
Var["InitDungeon"] = {}
local Doors = RegenInfo["Stuff"]
local Door1 = Doors["FirstGate"]
local Door2 = Doors["SecondGate"]
local Door3 = Doors["ThirdGate"]
-- <20><> <20><><EFBFBD><EFBFBD>
Var["Door1"] = cDoorBuild( Var["MapIndex"], Door1["Index"], Door1["x"], Door1["y"], Door1["dir"], Door1["scale"] )
Var["Door2"] = cDoorBuild( Var["MapIndex"], Door2["Index"], Door2["x"], Door2["y"], Door2["dir"], Door2["scale"] )
Var["Door3"] = cDoorBuild( Var["MapIndex"], Door3["Index"], Door3["x"], Door3["y"], Door3["dir"], Door3["scale"] )
-- <20><> <20>ݱ<EFBFBD>
cDoorAction( Var["Door1"], Door1["Block"], "open" )
cDoorAction( Var["Door2"], Door2["Block"], "open" )
cDoorAction( Var["Door3"], Door3["Block"], "open" )
-- <20>ι<EFBFBD>° <20><><EFBFBD><EFBFBD> ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>ŭ <20>ڹ<EFBFBD><DAB9><EFBFBD> <20>ɱ<EFBFBD>
Var["Door2Lock"] = #RegenInfo["Mob"]["GardenSquare"]["Kamaris"]["CoordList"]
-- <20><><EFBFBD><EFBFBD> : Į<><C4AE> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>θ<EFBFBD><CEB8><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ν<EFBFBD><CEBD><EFBFBD> <20>ϴ<EFBFBD> <20>ش<EFBFBD> <20><>ġ<EFBFBD><C4A1> ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
Var["CallBossLock"] = #RegenInfo["Mob"]["EndOfLegend"]["Kamaris"]["CoordList"]
-- <20>Ȱ<EFBFBD> <20><><EFBFBD><EFBFBD>
cMapFog( Var["MapIndex"], MapFogInfo["FogValue"], MapFogInfo["SightDistance"] )
Var["InitDungeon"]["WaitSecDuringInit"] = Var["CurSec"] + DelayTime["AfterInit"]
end
-- <20><><EFBFBD><EFBFBD> <20>ð<EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20>ܰ<EFBFBD><DCB0><EFBFBD>
if Var["InitDungeon"]["WaitSecDuringInit"] <= Var["CurSec"]
then
GoToNextStep( Var )
Var["InitDungeon"] = nil
DebugLog( "End InitDungeon" )
return
end
end
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
function CommandOfGuard( Var )
cExecCheck "CommandOfGuard"
if Var == nil
then
return
end
DebugLog( "Start CommandOfGuard" )
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], NPC_GuardChat["StartDialog"]["Index"] )
GoToNextStep( Var )
local nLimitSec = cGetKQLimitSecond( Var["MapIndex"] )
if nLimitSec == nil
then
ErrorLog( "GuideOfRoumenus::nLimitSec == nil" )
else
-- Real Kingdom Quest <20><><EFBFBD><EFBFBD> !!!!
Var["KQLimitTime"] = Var["CurSec"] + nLimitSec
-- Ÿ<≯<EFBFBD> <20><><EFBFBD><EFBFBD>!
cShowKQTimerWithLife( Var["MapIndex"], nLimitSec )
end
DebugLog( "End CommandOfGuard" )
return
end
-- <20>ذ<EFBFBD><D8B0>ü<EFBFBD><C3BC><EFBFBD> <20><>Ű<EFBFBD><C5B0> <20>ִ<EFBFBD> <20><><EFBFBD><EFBFBD>, ù<><C3B9>° <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>϶<EFBFBD>
function FirstGateAndWall( Var )
cExecCheck "FirstGateAndWall"
if Var == nil
then
return
end
if Var["FirstGateAndWall"] == nil
then
DebugLog( "Start FirstGateAndWall" )
Var["FirstGateAndWall"] = {}
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ 1 <20><>ȯ
local RegenMobGate = RegenInfo["Mob"]["FirstGateAndWall"]["FirstMobGate"]
local MobGateHandle = nil
MobGateHandle = cMobRegen_XY( Var["MapIndex"], RegenMobGate["Index"], RegenMobGate["x"], RegenMobGate["y"], RegenMobGate["dir"] )
if MobGateHandle ~= nil
then
Var["Enemy"][ MobGateHandle ] = RegenMobGate
cSetAIScript ( MainLuaScriptPath, MobGateHandle )
cAIScriptFunc( MobGateHandle, "Entrance", "MobGateRoutine" )
end
-- ù<><C3B9>° ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
local Regen1stKamaris = RegenInfo["Mob"]["FirstGateAndWall"]["FirstKamaris"]
local KamarisHandle = nil
KamarisHandle = cMobRegen_XY( Var["MapIndex"], Regen1stKamaris["Index"], Regen1stKamaris["x"], Regen1stKamaris["y"], Regen1stKamaris["dir"] )
if KamarisHandle ~= nil
then
cSetAIScript ( MainLuaScriptPath, KamarisHandle )
cAIScriptFunc( KamarisHandle, "Entrance", "TeleportKamarisRoutine" )
Var["Enemy"][ KamarisHandle ] = Regen1stKamaris
end
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>Ű<EFBFBD><C5B0> <20>ذ<EFBFBD> <20>ü<EFBFBD><C3BC><EFBFBD>
local RegenWallDefenders = RegenInfo["Mob"]["FirstGateAndWall"]["WallDefenders"]
local NumOfWallDefenders = #RegenWallDefenders["CoordList"]
local NumOfTypes = #RegenWallDefenders["IndexList"]
local AbstateInfo = RegenWallDefenders["AbstateAlways"]
Var["Enemy"]["WallDefenders"] = {}
for i = 1, NumOfWallDefenders
do
local nMobTypeNum = cRandomInt( 1, NumOfTypes )
local CurMob = RegenWallDefenders["CoordList"][ i ]
local nMobHandle = cMobRegen_XY( Var["MapIndex"], RegenWallDefenders["IndexList"][ nMobTypeNum ], CurMob["x"], CurMob["y"], RegenWallDefenders["SameDirect"] )
if nMobHandle ~= nil
then
local TempRegenTable = {}
TempRegenTable["Index"] = RegenWallDefenders["IndexList"][ nMobTypeNum ]
TempRegenTable["x"] = CurMob["x"]
TempRegenTable["y"] = CurMob["y"]
TempRegenTable["dir"] = RegenWallDefenders["SameDirect"]
TempRegenTable["bLive"] = true
-- <20>ٽ<EFBFBD> <20>ǻ츮<C7BB><ECB8AE> <20><><EFBFBD><EFBFBD> <20><EFBFBD><EBB5B5> <20><> <20><><EFBFBD><EFBFBD>
Var["Enemy"][ nMobHandle ] = TempRegenTable
Var["Enemy"]["WallDefenders"][ i ] = nMobHandle
cSetAIScript ( MainLuaScriptPath, nMobHandle )
cAIScriptFunc( nMobHandle, "Entrance", "WallDefenderRoutine" )
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̴<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̻<EFBFBD> <20><><EFBFBD><EFBFBD>
cSetAbstate( nMobHandle, AbstateInfo["Index"], AbstateInfo["Strength"], AbstateInfo["KeepTime"] )
else
DebugLog( "FirstGateAndWall::Gen WallDefenders::nMobHandle is nil.(when i="..i..")" )
end
end
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̴<EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ݴ<EFBFBD> <20><><EFBFBD><EFBFBD>
local RegenChargers = RegenInfo["Mob"]["FirstGateAndWall"]["Chargers"]
local NumOfChargers = #RegenInfo["Mob"]["FirstGateAndWall"]["Chargers"]
local AbstateInfo = RegenChargers["AbstateBeforeOpening1stGate"]
Var["Enemy"]["FirstChargers"] = {}
for i = 1, NumOfChargers
do
local nChargerHandle = cMobRegen_XY( Var["MapIndex"], RegenChargers["Index"], RegenChargers[ i ]["x"], RegenChargers[ i ]["y"], RegenChargers["SameDirect"] )
if nChargerHandle ~= nil
then
Var["Enemy"]["FirstChargers"][ i ] = nChargerHandle
cSetAbstate( nChargerHandle, AbstateInfo["Index"], AbstateInfo["Strength"], AbstateInfo["KeepTime"] )
else
Var["Enemy"]["FirstChargers"][ i ] = -1
end
end
-- 1<><31>° <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
cDoorAction( Var["Door1"], RegenInfo["Stuff"]["FirstGate"]["Block"], "close" )
Var["FirstGateAndWall"]["bMobGateDamaged"] = false
Var["FirstGateAndWall"]["bMobGateLive"] = true
Var["FirstGateAndWall"]["bMobGateOpened"] = false
Var["FirstGateAndWall"]["MobRevivalInterval"] = Var["CurSec"] + DelayTime["WallDefenderRevivalInterval"]
Var["FirstGateAndWall"]["StartStep_N_DoorOpenGap"] = Var["CurSec"] + DelayTime["StartStep_N_DoorOpenGap"]
end
-- <20><><EFBFBD><EFBFBD> <20>ð<EFBFBD><C3B0><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>Ű<EFBFBD><C5B0> <20>ذ<EFBFBD> <20>ü<EFBFBD> <20>ǻ츮<C7BB><ECB8AE>
if Var["FirstGateAndWall"]["MobRevivalInterval"] <= Var["CurSec"]
then
-- <20><><EFBFBD><EFBFBD> <20><>Ȱ <20>ð<EFBFBD> <20><><EFBFBD><EFBFBD>
Var["FirstGateAndWall"]["MobRevivalInterval"] = Var["CurSec"] + DelayTime["WallDefenderRevivalInterval"]
-- <20><><EFBFBD><EFBFBD> <20>ذ<EFBFBD> <20>ü<EFBFBD> <20><>Ȱ
local NumOfWallDefenders = #RegenInfo["Mob"]["FirstGateAndWall"]["WallDefenders"]["CoordList"]
local AbstateInfo = RegenInfo["Mob"]["FirstGateAndWall"]["WallDefenders"]["AbstateAlways"]
for i = 1, NumOfWallDefenders
do
local nCurHandle = Var["Enemy"]["WallDefenders"][ i ]
local CurRegen = Var["Enemy"][ nCurHandle ]
if CurRegen ~= nil
then
if CurRegen["bLive"] == false
then
local nNewHandle = cMobRegen_XY( Var["MapIndex"], CurRegen["Index"], CurRegen["x"], CurRegen["y"], CurRegen["dir"] )
if nNewHandle ~= nil
then
local TempRegenTable = {}
TempRegenTable["Index"] = CurRegen["Index"]
TempRegenTable["x"] = CurRegen["x"]
TempRegenTable["y"] = CurRegen["y"]
TempRegenTable["dir"] = CurRegen["dir"]
TempRegenTable["bLive"] = true
-- <20>׾<EFBFBD><D7BE><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20>޸<EFBFBD><DEB8><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["Enemy"][ nCurHandle ] = nil
-- <20>ٽ<EFBFBD> <20><> <20><> <20><> <20><><EFBFBD><EFBFBD> <20>޸<EFBFBD><DEB8><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["Enemy"][ nNewHandle ] = TempRegenTable
Var["Enemy"]["WallDefenders"][ i ] = nNewHandle
cSetAIScript ( MainLuaScriptPath, nNewHandle )
cAIScriptFunc( nNewHandle, "Entrance", "WallDefenderRoutine" )
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̴<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̻<EFBFBD> <20><><EFBFBD><EFBFBD>
cSetAbstate( nNewHandle, AbstateInfo["Index"], AbstateInfo["Strength"], AbstateInfo["KeepTime"] )
end
end
end
end -- for <20><>
end -- if<69><66> : Var["FirstGateAndWall"]["MobRevivalInterval"] <= Var["CurSec"] //
local bEndCondition = false
-- <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ð<EFBFBD> <20><> <20><><EFBFBD>ݴ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̻<EFBFBD> <20><><EFBFBD><EFBFBD> - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ְ<EFBFBD> <20>ϱ<EFBFBD> & <20><><EFBFBD><EFBFBD> <20>ܰ<EFBFBD><DCB0><EFBFBD>
if Var["FirstGateAndWall"]["bMobGateLive"] == false
then
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ 1 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if Var["FirstGateAndWall"]["bMobGateOpened"] == false
then
if Var["FirstGateAndWall"]["StartStep_N_DoorOpenGap"] <= Var["CurSec"]
then
cDoorAction( Var["Door1"], RegenInfo["Stuff"]["FirstGate"]["Block"], "open" )
Var["FirstGateAndWall"]["bMobGateOpened"] = true
end
end
if Var["FirstGateAndWall"]["WaitSecAfterOpeningGate"] == nil
then
Var["FirstGateAndWall"]["WaitSecAfterOpeningGate"] = Var["CurSec"] + DelayTime["GapGateOpenAndChargerAbstateReset"]
end
if Var["FirstGateAndWall"]["WaitSecAfterOpeningGate"] <= Var["CurSec"]
then
local RegenChargers = RegenInfo["Mob"]["FirstGateAndWall"]["Chargers"]
local NumOfChargers = #RegenInfo["Mob"]["FirstGateAndWall"]["Chargers"]
for i = 1, NumOfChargers
do
local nChargerHandle = Var["Enemy"]["FirstChargers"][ i ]
if nChargerHandle ~= nil and nChargerHandle ~= -1
then
cResetAbstate( nChargerHandle, RegenChargers["AbstateBeforeOpening1stGate"]["Index"] )
end
end
bEndCondition = true
end
end
-- Fail Case : <20><><EFBFBD><EFBFBD> <20><> Ȥ<><C8A4> <20>÷<EFBFBD><C3B7>̾ <20>ƹ<EFBFBD><C6B9><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if cObjectCount( Var["MapIndex"], ObjectType["Player"] ) <= 0
then
GoToFail( Var )
Var["FirstGateAndWall"] = nil
return
end
-- Fail Case : Ÿ<><C5B8> <20><><EFBFBD><EFBFBD>
if IsKQTimeOver( Var ) == true
then
GoToFail( Var )
Var["FirstGateAndWall"] = nil
return
end
-- Next Case : <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 3<><33> <20><> <20><><EFBFBD>ݴ<EFBFBD> <20><><EFBFBD><EFBFBD> <20>̻<EFBFBD><CCBB><EFBFBD> <20><><EFBFBD><EFBFBD> <20>Ǿ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ִ<EFBFBD> <20><><EFBFBD><EFBFBD>
if bEndCondition == true
then
GoToNextStep( Var )
Var["FirstGateAndWall"] = nil
DebugLog( "End FirstGateAndWall" )
return
end
end
-- <20><20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> : 5<><35><EFBFBD><EFBFBD> ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ı<EFBFBD><C4B1>϶<EFBFBD>
function GardenSquare( Var )
cExecCheck "GardenSquare"
if Var == nil
then
return
end
if Var["GardenSquare"] == nil
then
DebugLog( "Start GardenSquare" )
Var["GardenSquare"] = {}
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ 2 <20><>ȯ
local RegenMobGate = RegenInfo["Mob"]["GardenSquare"]["SecondMobGate"]
local MobGateHandle = nil
MobGateHandle = cMobRegen_XY( Var["MapIndex"], RegenMobGate["Index"], RegenMobGate["x"], RegenMobGate["y"], RegenMobGate["dir"] )
if MobGateHandle ~= nil
then
Var["Enemy"][ MobGateHandle ] = RegenMobGate
Var["Enemy"]["Door2Mob"] = MobGateHandle
cSetAIScript ( MainLuaScriptPath, MobGateHandle )
cAIScriptFunc( MobGateHandle, "Entrance", "MobGateRoutine" )
cAIScriptFunc( MobGateHandle, "NPCClick", "MobGateClick" )
end
-- ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 5<><35> -- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>Ѿ<D1BE><EEB0A1> <20><><EFBFBD><EFBFBD> <20>ڹ<EFBFBD><DAB9><20>ϳ<EFBFBD><CFB3><EFBFBD> Ǯ<><C7AE>
local RegenKamaris = RegenInfo["Mob"]["GardenSquare"]["Kamaris"]
local RegenKamarisCoord = RegenInfo["Mob"]["GardenSquare"]["Kamaris"]["CoordList"]
local NumOfKamaris = #RegenInfo["Mob"]["GardenSquare"]["Kamaris"]["CoordList"]
for i = 1, NumOfKamaris
do
local KamarisHandle = nil
KamarisHandle = cMobRegen_XY( Var["MapIndex"], RegenKamaris["Index"], RegenKamarisCoord[ i ]["x"], RegenKamarisCoord[ i ]["y"], RegenKamaris["SameDirect"] )
if KamarisHandle ~= nil
then
Var["Enemy"][ KamarisHandle ] = { Index = RegenKamaris["Index"], x = RegenKamarisCoord[ i ]["x"], y = RegenKamarisCoord[ i ]["y"], dir = RegenKamaris["SameDirect"] }
cSetAIScript ( MainLuaScriptPath, KamarisHandle )
cAIScriptFunc( KamarisHandle, "Entrance", "GardenKamarisRoutine" )
end
end
-- <20><> <20>׷<EFBFBD> <20><>
local RegenGroup = RegenInfo["Group"]["GardenSquare"]
local NumOfGroup = #RegenInfo["Group"]["GardenSquare"]
for i = 1, NumOfGroup
do
cGroupRegenInstance( Var["MapIndex"], RegenInfo["Group"]["GardenSquare"][ i ] )
end
-- 2<><32>° <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
cDoorAction( Var["Door2"], RegenInfo["Stuff"]["SecondGate"]["Block"], "close" )
Var["GardenSquare"]["bGateOpen"] = false
end
-- Fail Case : <20><><EFBFBD><EFBFBD> <20><> Ȥ<><C8A4> <20>÷<EFBFBD><C3B7>̾ <20>ƹ<EFBFBD><C6B9><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if cObjectCount( Var["MapIndex"], ObjectType["Player"] ) <= 0
then
GoToFail( Var )
Var["GardenSquare"] = nil
return
end
-- Fail Case : Ÿ<><C5B8> <20><><EFBFBD><EFBFBD>
if IsKQTimeOver( Var ) == true
then
GoToFail( Var )
Var["GardenSquare"] = nil
return
end
-- Next Case : <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if Var["GardenSquare"]["bGateOpen"] == true
then
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], NPC_GuardChat["Destroy5KamarisDialog"]["Index"] )
GoToNextStep( Var )
Var["GardenSquare"] = nil
DebugLog( "End GardenSquare" )
return
end
end
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> : 2<><32><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><20>Ѿ<EFBFBD> <20><><EFBFBD><EFBFBD> <20>ν<EFBFBD><CEBD><EFBFBD>
function FinalGate( Var )
cExecCheck "FinalGate"
if Var == nil
then
return
end
if Var["FinalGate"] == nil
then
DebugLog( "Start FinalGate" )
Var["FinalGate"] = {}
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ 3 <20><>ȯ - <20>̰<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ؾ<EFBFBD><D8BE><EFBFBD>
local RegenMobGate = RegenInfo["Mob"]["FinalGate"]["ThirdMobGate"]
local MobGateHandle = nil
MobGateHandle = cMobRegen_XY( Var["MapIndex"], RegenMobGate["Index"], RegenMobGate["x"], RegenMobGate["y"], RegenMobGate["dir"] )
if MobGateHandle ~= nil
then
Var["Enemy"][ MobGateHandle ] = RegenMobGate
Var["Enemy"]["Door3Mob"] = MobGateHandle
cSetAIScript ( MainLuaScriptPath, MobGateHandle )
cAIScriptFunc( MobGateHandle, "Entrance", "MobGateRoutine" )
end
-- ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 2<><32> -- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
local RegenBijou = RegenInfo["Mob"]["FinalGate"]["BijouOfDarknesss"]
local RegenBijouCoord = RegenInfo["Mob"]["FinalGate"]["BijouOfDarknesss"]["CoordList"]
local NumOfBijou = #RegenInfo["Mob"]["FinalGate"]["BijouOfDarknesss"]["CoordList"]
for i = 1, NumOfBijou
do
cMobRegen_XY( Var["MapIndex"], RegenBijou["Index"], RegenBijouCoord[ i ]["x"], RegenBijouCoord[ i ]["y"], RegenBijou["SameDirect"] )
end
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̴<EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ݴ<EFBFBD> <20><><EFBFBD><EFBFBD>
local RegenChargers = RegenInfo["Mob"]["FinalGate"]["Chargers"]
local NumOfChargers = #RegenInfo["Mob"]["FinalGate"]["Chargers"]
local AbstateInfo = RegenChargers["AbstateBeforeOpening2stGate"]
Var["Enemy"]["SecondChargers"] = {}
for i = 1, NumOfChargers
do
local nChargerHandle = cMobRegen_XY( Var["MapIndex"], RegenChargers["Index"], RegenChargers[ i ]["x"], RegenChargers[ i ]["y"], RegenChargers["SameDirect"] )
if nChargerHandle ~= nil
then
Var["Enemy"]["SecondChargers"][ i ] = nChargerHandle
cSetAbstate( nChargerHandle, AbstateInfo["Index"], AbstateInfo["Strength"], AbstateInfo["KeepTime"] )
else
Var["Enemy"]["SecondChargers"][ i ] = -1
end
end
-- 3<><33>° <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
cDoorAction( Var["Door3"], RegenInfo["Stuff"]["ThirdGate"]["Block"], "close" )
Var["FinalGate"]["bMobGateLive"] = true
Var["FinalGate"]["bMobGateOpened"] = false
Var["FinalGate"]["StartStep_N_DoorOpenGap"] = Var["CurSec"] + DelayTime["StartStep_N_DoorOpenGap"]
end
local bEndCondition = false
-- <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ð<EFBFBD> <20><> <20><><EFBFBD>ݴ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>̻<EFBFBD> <20><><EFBFBD><EFBFBD> - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ְ<EFBFBD> <20>ϱ<EFBFBD> & <20><><EFBFBD><EFBFBD> <20>ܰ<EFBFBD><DCB0><EFBFBD>
if Var["FinalGate"]["bMobGateLive"] == false
then
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ 3 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if Var["FinalGate"]["bMobGateOpened"] == false
then
if Var["FinalGate"]["StartStep_N_DoorOpenGap"] <= Var["CurSec"]
then
cDoorAction( Var["Door3"], RegenInfo["Stuff"]["ThirdGate"]["Block"], "open" )
Var["FinalGate"]["bMobGateOpened"] = true
end
end
if Var["FinalGate"]["WaitSecAfterOpeningGate"] == nil
then
Var["FinalGate"]["WaitSecAfterOpeningGate"] = Var["CurSec"] + DelayTime["GapGateOpenAndChargerAbstateReset"]
end
if Var["FinalGate"]["WaitSecAfterOpeningGate"] <= Var["CurSec"]
then
local RegenChargers = RegenInfo["Mob"]["FinalGate"]["Chargers"]
local NumOfChargers = #RegenInfo["Mob"]["FinalGate"]["Chargers"]
for i = 1, NumOfChargers
do
local nChargerHandle = Var["Enemy"]["SecondChargers"][ i ]
if nChargerHandle ~= nil and nChargerHandle ~= -1
then
cResetAbstate( nChargerHandle, RegenChargers["AbstateBeforeOpening2stGate"]["Index"] )
end
end
bEndCondition = true
end
end
-- Fail Case : <20><><EFBFBD><EFBFBD> <20><> Ȥ<><C8A4> <20>÷<EFBFBD><C3B7>̾ <20>ƹ<EFBFBD><C6B9><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if cObjectCount( Var["MapIndex"], ObjectType["Player"] ) <= 0
then
GoToFail( Var )
Var["FinalGate"] = nil
return
end
-- Fail Case : Ÿ<><C5B8> <20><><EFBFBD><EFBFBD>
if IsKQTimeOver( Var ) == true
then
GoToFail( Var )
Var["FinalGate"] = nil
return
end
-- Next Case : <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 3<><33> <20><> <20><><EFBFBD>ݴ<EFBFBD> <20><><EFBFBD><EFBFBD> <20>̻<EFBFBD><CCBB><EFBFBD> <20><><EFBFBD><EFBFBD> <20>Ǿ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20>ִ<EFBFBD> <20><><EFBFBD><EFBFBD>
if bEndCondition == true
then
GoToNextStep( Var )
Var["FinalGate"] = nil
DebugLog( "End FinalGate" )
return
end
end
-- Į<>ݿ<EFBFBD><DDBF><EFBFBD><EFBFBD><EFBFBD> <20>ִ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ı<EFBFBD> <20>ϰ<EFBFBD> Į<><C4AE> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>߷<EFBFBD><DFB7><EFBFBD>
function EndOfLegend( Var )
cExecCheck "EndOfLegend"
if Var == nil
then
return
end
if Var["EndOfLegend"] == nil
then
DebugLog( "Start EndOfLegend" )
Var["EndOfLegend"] = {}
-- ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 4<><34> -- Į<><C4AE> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>ȯ<EFBFBD>ϱ<EFBFBD> <20><><EFBFBD>ؼ<EFBFBD><D8BC><EFBFBD> 4<><34><EFBFBD><EFBFBD> ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ı<EFBFBD><C4B1>Ǿ<EFBFBD><C7BE><EFBFBD> <20><>
local RegenKamaris = RegenInfo["Mob"]["EndOfLegend"]["Kamaris"]
local RegenKamarisCoord = RegenInfo["Mob"]["EndOfLegend"]["Kamaris"]["CoordList"]
local NumOfKamaris = #RegenInfo["Mob"]["EndOfLegend"]["Kamaris"]["CoordList"]
for i = 1, NumOfKamaris
do
local KamarisHandle = nil
KamarisHandle = cMobRegen_XY( Var["MapIndex"], RegenKamaris["Index"], RegenKamarisCoord[ i ]["x"], RegenKamarisCoord[ i ]["y"], RegenKamaris["SameDirect"] )
if KamarisHandle ~= nil
then
Var["Enemy"][ KamarisHandle ] = { Index = RegenKamaris["Index"], x = RegenKamarisCoord[ i ]["x"], y = RegenKamarisCoord[ i ]["y"], dir = RegenKamaris["SameDirect"] }
cSetAIScript ( MainLuaScriptPath, KamarisHandle )
cAIScriptFunc( KamarisHandle, "Entrance", "GardenKamarisRoutine" )
end
end
-- <20><> <20>׷<EFBFBD> <20><>
local RegenGroup = RegenInfo["Group"]["EndOfLegend"]
local NumOfGroup = #RegenInfo["Group"]["EndOfLegend"]
for i = 1, NumOfGroup
do
cGroupRegenInstance( Var["MapIndex"], RegenInfo["Group"]["EndOfLegend"][ i ] )
end
Var["EndOfLegend"]["bBossDied"] = false
Var["EndOfLegend"]["DialogStepNo"] = 1
Var["EndOfLegend"]["DialogStepSec"] = Var["CurSec"] + DelayTime["GapBeforeBossSquareDialog"]
end
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>Ʈ<EFBFBD><C6AE> <20>˷<EFBFBD><CBB7><EFBFBD>
if Var["EndOfLegend"]["DialogStepNo"] <= #NPC_GuardChat["BeforeBossSquareDialog"]
then
if Var["EndOfLegend"]["DialogStepSec"] <= Var["CurSec"]
then
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], NPC_GuardChat["BeforeBossSquareDialog"][ Var["EndOfLegend"]["DialogStepNo"] ]["Index"] )
Var["EndOfLegend"]["DialogStepSec"] = Var["CurSec"] + DelayTime["GapBeforeBossSquareDialog"]
Var["EndOfLegend"]["DialogStepNo"] = Var["EndOfLegend"]["DialogStepNo"] + 1
end
end
-- ī<><C4AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>ȯ
if Var["CallBossLock"] == 0
then
-- <20>ѹ<EFBFBD><D1B9><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ǵ<EFBFBD><C7B5><EFBFBD> <20>ʱ<EFBFBD>ȭ <20><>Ŵ
Var["CallBossLock"] = nil
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], NPC_GuardChat["BossAppearedDialog"]["Index"] )
local RegenBoss = RegenInfo["Mob"]["EndOfLegend"]["KalBanObet"]
local BossHandle = cMobRegen_XY( Var["MapIndex"], RegenBoss["Index"], RegenBoss["x"], RegenBoss["y"], RegenBoss["dir"] )
if BossHandle ~= nil
then
Var["Enemy"][ BossHandle ] = RegenBoss
cSetAIScript ( MainLuaScriptPath, BossHandle )
cAIScriptFunc( BossHandle, "Entrance", "BossRoutine" )
end
end
-- Fail Case : <20><><EFBFBD><EFBFBD> <20><> Ȥ<><C8A4> <20>÷<EFBFBD><C3B7>̾ <20>ƹ<EFBFBD><C6B9><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if cObjectCount( Var["MapIndex"], ObjectType["Player"] ) <= 0
then
GoToFail( Var )
Var["EndOfLegend"] = nil
return
end
-- Fail Case : Ÿ<><C5B8> <20><><EFBFBD><EFBFBD>
if IsKQTimeOver( Var ) == true
then
GoToFail( Var )
Var["EndOfLegend"] = nil
return
end
-- Success Case : <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><><C4AE> <20><><EFBFBD><EFBFBD>)
if Var["EndOfLegend"]["bBossDied"] == true
then
GoToSuccess( Var )
Var["EndOfLegend"] = nil
DebugLog( "End EndOfLegend" )
return
end
end
-- ŷ<><C5B7> <20><><EFBFBD><EFBFBD>Ʈ Ŭ<><C5AC><EFBFBD><EFBFBD>
function QuestSuccess( Var )
cExecCheck "QuestSuccess"
if Var == nil
then
return
end
if Var["QuestSuccess"] == nil
then
DebugLog( "Start QuestSuccess" )
-- Success <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
cVanishTimer( Var["MapIndex"] )
cQuestResult( Var["MapIndex"], "Success" )
-- <20>÷<EFBFBD><C3B7>̾<CCBE><EEBFA1> Ŭ<><C5AC><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ֱ<EFBFBD>
cReward( Var["MapIndex"], "KQ" )
-- Quest Mob Kill <20><><EFBFBD><EFBFBD>.
cQuestMobKill_AllInMap( Var["MapIndex"], QuestMobKillInfo["QuestID"], QuestMobKillInfo["MobIndex"], QuestMobKillInfo["MaxKillCount"] )
Var["QuestSuccess"] = {}
Var["QuestSuccess"]["SuccessStepSec"] = Var["CurSec"]
Var["QuestSuccess"]["SuccessStepNo"] = 1
end
-- <20><><EFBFBD><EFBFBD>â<EFBFBD><C3A2><EFBFBD><EFBFBD> <20>޼<EFBFBD><DEBC><EFBFBD>
if Var["QuestSuccess"]["SuccessStepNo"] <= #NPC_GuardChat["CongratulateSuccessDialog"]
then
if Var["QuestSuccess"]["SuccessStepSec"] <= Var["CurSec"]
then
local GuardDialog = NPC_GuardChat["CongratulateSuccessDialog"]
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], GuardDialog[ Var["QuestSuccess"]["SuccessStepNo"] ]["Index"] )
Var["QuestSuccess"]["SuccessStepNo"] = Var["QuestSuccess"]["SuccessStepNo"] + 1 -- go to next dialog
Var["QuestSuccess"]["SuccessStepSec"] = Var["CurSec"] + DelayTime["GapSuccessDialog"] -- set time for changing step
end
return
end
-- <20><><EFBFBD>̾<EFBFBD><CCBE>α<EFBFBD> <20><>
if Var["QuestSuccess"]["SuccessStepNo"] > #NPC_GuardChat["CongratulateSuccessDialog"]
then
if Var["QuestSuccess"]["SuccessStepSec"] <= Var["CurSec"]
then
GoToNextStep( Var )
Var["QuestSuccess"] = nil
DebugLog( "End QuestSuccess" )
end
end
end
-- ŷ<><C5B7> <20><><EFBFBD><EFBFBD>Ʈ <20><><EFBFBD><EFBFBD>
function QuestFailed( Var )
cExecCheck "QuestFailed"
if Var == nil
then
return
end
DebugLog( "Start QuestFailed" )
Var["QuestFailed"] = {}
-- Fail <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
cVanishTimer( Var["MapIndex"] )
cQuestResult( Var["MapIndex"], "Fail" )
GoToNextStep( Var )
DebugLog( "End QuestFailed" )
end
-- <20><>ȯ
function ReturnToHome( Var )
cExecCheck "ReturnToHome"
if Var == nil
then
return
end
if Var["ReturnToHome"] == nil
then
DebugLog( "Start ReturnToHome" )
Var["ReturnToHome"] = {}
Var["ReturnToHome"]["ReturnStepSec"] = Var["CurSec"]
if Var["QuestFailed"] == nil
then
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Var["ReturnToHome"]["ReturnStepNo"] = 1
else
-- <20><><EFBFBD>н<EFBFBD>
Var["ReturnToHome"]["ReturnStepNo"] = #NoticeInfo["KQReturn"]
Var["QuestFailed"] = nil
end
end
-- Return : return notice substep
if Var["ReturnToHome"]["ReturnStepNo"] <= #NoticeInfo["KQReturn"]
then
if Var["ReturnToHome"]["ReturnStepSec"] <= Var["CurSec"]
then
-- Notice of Escape
if NoticeInfo["KQReturn"][ Var["ReturnToHome"]["ReturnStepNo"] ]["Index"] ~= nil
then
cNotice( Var["MapIndex"], NoticeInfo["ScriptFileName"], NoticeInfo["KQReturn"][ Var["ReturnToHome"]["ReturnStepNo"] ]["Index"] )
end
-- Go To Next Notice
Var["ReturnToHome"]["ReturnStepNo"] = Var["ReturnToHome"]["ReturnStepNo"] + 1
Var["ReturnToHome"]["ReturnStepSec"] = Var["CurSec"] + DelayTime["GapKQReturnNotice"]
end
return
end
-- Return : linkto substep
if Var["ReturnToHome"]["ReturnStepNo"] > #NoticeInfo["KQReturn"]
then
if Var["ReturnToHome"]["ReturnStepSec"] <= Var["CurSec"]
then
--Finish_KQ
cLinkToAll( Var["MapIndex"], LinkInfo["ReturnMap"]["MapIndex"], LinkInfo["ReturnMap"]["x"], LinkInfo["ReturnMap"]["y"] )
GoToNextStep( Var )
Var["ReturnToHome"] = nil
if cEndOfKingdomQuest( Var["MapIndex"] ) == nil
then
ErrorLog( "ReturnToHome::Function cEndOfKingdomQuest failed" )
end
DebugLog( "End ReturnToHome" )
end
return
end
end
-- <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>Լ<EFBFBD> <20><><EFBFBD><EFBFBD>Ʈ
KQ_StepsList =
{
{ Function = InitDungeon, Name = "InitDungeon", },
{ Function = CommandOfGuard, Name = "CommandOfGuard", },
{ Function = FirstGateAndWall, Name = "FirstGateAndWall", },
{ Function = GardenSquare, Name = "GardenSquare", },
{ Function = FinalGate, Name = "FinalGate", },
{ Function = EndOfLegend, Name = "EndOfLegend", },
{ Function = QuestSuccess, Name = "QuestSuccess", },
{ Function = QuestFailed, Name = "QuestFailed", },
{ Function = ReturnToHome, Name = "ReturnToHome", },
}
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>Ʈ
KQ_StepsIndexList =
{
}
for index, funcValue in pairs ( KQ_StepsList )
do
KQ_StepsIndexList[ funcValue["Name"] ] = index
end