sigonasr2/SigFiesta
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
SigFiesta/LuaScript/ID/IyzelTower/Functions/Progress.lua

424 lines
11 KiB
Lua
Raw Normal View History

Private server state setup
2023-06-26 04:40:53 -07:00
--------------------------------------------------------------------------------
-- Tower Of Iyzel Progress Func --
--------------------------------------------------------------------------------
-- <20><><EFBFBD><EFBFBD> <20>ʱ<EFBFBD>ȭ
function InitDungeon( Var )
cExecCheck "InitDungeon"
if Var == nil
then
return
end
-- <20>ν<EFBFBD><CEBD>Ͻ<EFBFBD> <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"] = {}
-- <20><> <20><><EFBFBD>̿<EFBFBD> <20>ִ<EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
for i = 0, 17
do
local DoorTableIndex = nil
if i < 10
then
DoorTableIndex = "Door0"..i
else
DoorTableIndex = "Door"..i
end
local CurRegenDoor = RegenInfo["Stuff"][ DoorTableIndex ]
if CurRegenDoor ~= nil
then
local nCurDoorHandle = cDoorBuild( Var["MapIndex"], CurRegenDoor["Index"], CurRegenDoor["x"], CurRegenDoor["y"], CurRegenDoor["dir"], CurRegenDoor["scale"] )
if nCurDoorHandle ~= nil
then
cDoorAction( nCurDoorHandle , CurRegenDoor["Block"], "close" )
-- <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["Door"][ nCurDoorHandle ] = CurRegenDoor
-- <20>ڵ<EFBFBD> <20><><EFBFBD><EFBFBD> : <20><><EFBFBD>ٿ<EFBFBD><D9BF><EFBFBD><EFBFBD><EFBFBD>
Var["Door"..(i+1) ] = nCurDoorHandle
end
end
end
-- <20>Ա<EFBFBD><D4B1><EFBFBD> <20>ⱸ<EFBFBD><E2B1B8><EFBFBD><EFBFBD>Ʈ <20><><EFBFBD><EFBFBD>
local RegenExitGate = RegenInfo["Stuff"]["ExitGate"]
local nExitGateHandle = cDoorBuild( Var["MapIndex"], RegenExitGate["Index"], RegenExitGate["x"], RegenExitGate["y"], RegenExitGate["dir"], RegenExitGate["scale"] )
if nExitGateHandle ~= nil
then
if cSetAIScript ( MainLuaScriptPath, nExitGateHandle ) == nil
then
ErrorLog( "InitDungeon::cSetAIScript ( MainLuaScriptPath, nExitGateHandle ) == nil" )
end
if cAIScriptFunc( nExitGateHandle, "NPCClick", "ExitGateClick" ) == nil
then
ErrorLog( "InitDungeon::cAIScriptFunc( nExitGateHandle, \"NPCClick\", \"ExitGateClick\" ) == nil" )
end
end
-- <20><><EFBFBD><EFBFBD><EFBFBD>ð<EFBFBD> <20><><EFBFBD><EFBFBD>
Var["InitDungeon"]["WaitSecDuringInit"] = Var["CurSec"] + DelayTime["AfterInit"]
end
-- <20><><EFBFBD><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
-- 1~19 <20><>° <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
function EachFloor( Var )
cExecCheck "EachFloor"
if Var == nil
then
return
end
if Var["EachFloor"] == nil
then
Var["EachFloor"] = {}
end
-- <20>ܰ<EFBFBD> <20><>ȣ <20><><EFBFBD><EFBFBD>
if Var["EachFloor"]["StepNumber"] == nil
then
Var["EachFloor"]["StepNumber"] = 1
end
-- <20>ܰ<EFBFBD><DCB0≯<EFBFBD> <20>޾ƿ<DEBE><C6BF><EFBFBD>
local CurStepNo = Var["EachFloor"]["StepNumber"] -- ex) 1
local CurStep = StepNameTable[ CurStepNo ] -- ex) Floor01
-- <20><> <20>ܰ<EFBFBD> <20>ʱ<EFBFBD> <20><><EFBFBD><EFBFBD>
if Var["EachFloor"..CurStepNo ] == nil
then
DebugLog( "Start EachFloor "..CurStepNo )
Var["EachFloor"..CurStepNo ] = {}
-- <20><> <20>׷<EFBFBD> <20><>
local CurStepRegen = RegenInfo["Group"][ CurStep ]
for i = 1, #CurStepRegen
do
cGroupRegenInstance( Var["MapIndex"], CurStepRegen[i] )
end
-- <20><><EFBFBD><EFBFBD> <20><>( <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Only : 4, 9, 13, 19 <20><> )
if RegenInfo["Mob"][ CurStep ] ~= nil
then
local RegenBoss = nil
local BossHandle = nil
for MobName, MobRegenInfo in pairs ( RegenInfo["Mob"][ CurStep ] )
do
RegenBoss = MobRegenInfo
BossHandle = cMobRegen_XY( Var["MapIndex"], RegenBoss["Index"], RegenBoss["x"], RegenBoss["y"], RegenBoss["dir"] )
end
if BossHandle ~= nil
then
Var["Enemy"][ BossHandle ] = RegenBoss
Var["EachFloor"..CurStepNo ]["BossHandle"] = BossHandle
Var["RoutineTime"][ BossHandle ] = cCurrentSecond()
cSetAIScript ( MainLuaScriptPath, BossHandle )
cAIScriptFunc( BossHandle, "Entrance", "BossRoutine" )
end
end
-- <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20>ܰ<EFBFBD> <20><><EFBFBD>п<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["EachFloor"..CurStepNo ]["StartDialogStepSec"] = Var["CurSec"]
Var["EachFloor"..CurStepNo ]["StartDialogStepNo"] = 1
Var["EachFloor"..CurStepNo ]["ClearDialogStepSec"] = Var["CurSec"]
Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"] = 1
Var["EachFloor"..CurStepNo ]["BossBattleDialogStepSec"] = Var["CurSec"]
Var["EachFloor"..CurStepNo ]["BossBattleDialogStepNo"] = 1
-- <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["EachFloor"..CurStepNo ]["bStartDialogEnd"] = false
Var["EachFloor"..CurStepNo ]["bClearDialogEnd"] = false
Var["EachFloor"..CurStepNo ]["bBossBattleDialogEnd"] = false
-- <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["EachFloor"..CurStepNo ]["bMobEliminated"] = false
Var["EachFloor"..CurStepNo ]["WaitMobGenSec"] = Var["CurSec"] + DelayTime["WaitAfterGenMob"]
end
-- <20>ش<EFBFBD> <20>ܰ<EFBFBD> <20><><EFBFBD>۽<EFBFBD><DBBD><EFBFBD> <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD>
if NPC_GuardChat["StartDialog"][ CurStep ] ~= nil
then
if Var["EachFloor"..CurStepNo ]["bStartDialogEnd"] == false
then
if Var["EachFloor"..CurStepNo ]["StartDialogStepNo"] <= #NPC_GuardChat["StartDialog"][ CurStep ]
then
if Var["EachFloor"..CurStepNo ]["StartDialogStepSec"] <= Var["CurSec"]
then
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], NPC_GuardChat["StartDialog"][ CurStep ][ Var["EachFloor"..CurStepNo ]["StartDialogStepNo"] ]["Index"] )
DebugLog( "EachFloor"..CurStepNo.."::Index("..NPC_GuardChat["StartDialog"][ CurStep ][ Var["EachFloor"..CurStepNo ]["StartDialogStepNo"] ]["Index"].."), StepNo("..Var["EachFloor"..CurStepNo ]["StartDialogStepNo"]..")" )
Var["EachFloor"..CurStepNo ]["StartDialogStepNo"] = Var["EachFloor"..CurStepNo ]["StartDialogStepNo"] + 1
Var["EachFloor"..CurStepNo ]["StartDialogStepSec"] = Var["CurSec"] + DelayTime["GapDialog"]
end
-- <20>ش<EFBFBD> <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> Ÿ<>̹<EFBFBD><CCB9><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ٸ<EFBFBD><D9B8><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ɱ<EFBFBD>
return
else
-- <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["EachFloor"..CurStepNo ]["bStartDialogEnd"] = true
end
end
else
-- <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20><>ü<EFBFBD><C3BC> <20><><EFBFBD><EFBFBD> <20><>
Var["EachFloor"..CurStepNo ]["bStartDialogEnd"] = true
end
-- <20><> <20><><EFBFBD><EFBFBD>üũ
if Var["EachFloor"..CurStepNo ]["bMobEliminated"] == false
then
if Var["EachFloor"..CurStepNo ]["WaitMobGenSec"] <= Var["CurSec"]
then
if cObjectCount( Var["MapIndex"], ObjectType["Mob"] ) <= 0
then
Var["EachFloor"..CurStepNo ]["bMobEliminated"] = true
end
end
return
else
-- <20>ش<EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD> <20><>
-- Ŭ<><C5AC><EFBFBD><EFBFBD> <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD>
if NPC_GuardChat["ClearDialog"][ CurStep ] ~= nil
then
if Var["EachFloor"..CurStepNo ]["bClearDialogEnd"] == false
then
if Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"] <= #NPC_GuardChat["ClearDialog"][ CurStep ]
then
if Var["EachFloor"..CurStepNo ]["ClearDialogStepSec"] <= Var["CurSec"]
then
cMobDialog( Var["MapIndex"], NPC_GuardChat["SpeakerIndex"], NPC_GuardChat["ScriptFileName"], NPC_GuardChat["ClearDialog"][ CurStep ][ Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"] ]["Index"] )
DebugLog( "EachFloor"..CurStepNo.."::Index("..NPC_GuardChat["ClearDialog"][ CurStep ][ Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"] ]["Index"].."), StepNo("..Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"]..")" )
Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"] = Var["EachFloor"..CurStepNo ]["ClearDialogStepNo"] + 1
Var["EachFloor"..CurStepNo ]["ClearDialogStepSec"] = Var["CurSec"] + DelayTime["GapDialog"]
end
-- <20>ش<EFBFBD> <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> Ÿ<>̹<EFBFBD><CCB9><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ٸ<EFBFBD><D9B8><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ɱ<EFBFBD>
return
else
-- <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20><><EFBFBD><EFBFBD>
Var["EachFloor"..CurStepNo ]["bClearDialogEnd"] = true
end
end
else
-- <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20><>ü<EFBFBD><C3BC> <20><><EFBFBD><EFBFBD> <20><>
Var["EachFloor"..CurStepNo ]["bClearDialogEnd"] = true
end
end
-- Next Case : <20>ش<EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><> Ŭ<><C5AC><EFBFBD><EFBFBD> <20><><EFBFBD>̽<EFBFBD><CCBD><EFBFBD> <20><><EFBFBD>ο<EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD>̽<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϸ<EFBFBD>.
if Var["EachFloor"..CurStepNo ]["WaitMobGenSec"] <= Var["CurSec"]
then
if Var["EachFloor"..CurStepNo ]["bClearDialogEnd"] == true
then
-- <20>ش<EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD> <20><>Ȳ<EFBFBD><C8B2> <20>ƴѰ<C6B4><D1B0><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ܰ<EFBFBD><DCB0><EFBFBD> <20>Ѿ<D1BE><EEB0A1> <20>ʴ´<CAB4>.
if Var["EachFloor"..CurStepNo ]["bMobEliminated"] ~= true
then
return
end
-- Ŭ<><C5AC><EFBFBD><EFBFBD> <20>׼<EFBFBD>
if Var["Door"..CurStepNo ] ~= nil
then
cDoorAction( Var["Door"..CurStepNo ], Var["Door"][ Var["Door"..CurStepNo ] ]["Block"], "open" )
end
-- <20><><EFBFBD><EFBFBD> <20>ܰ<EFBFBD><DCB0><EFBFBD>
Var["EachFloor"..CurStepNo ] = nil
Var["EachFloor"]["StepNumber"] = CurStepNo + 1
DebugLog( "End EachFloor "..CurStepNo )
-- <20><><EFBFBD><EFBFBD> <20><> Ŭ<><C5AC><EFBFBD><EFBFBD> <20><>
if Var["EachFloor"]["StepNumber"] > #StepNameTable
then
Var["EachFloor"] = nil
GoToSuccess( Var )
return
end
return
end
end
end
-- ŷ<><C5B7> <20><><EFBFBD><EFBFBD>Ʈ Ŭ<><C5AC><EFBFBD><EFBFBD> : ID <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
function QuestSuccess( Var )
cExecCheck "QuestSuccess"
if Var == nil
then
return
end
DebugLog( "Start QuestSuccess" )
-- Quest Mob Kill <20><><EFBFBD><EFBFBD>.
cQuestMobKill_AllInMap( Var["MapIndex"], QuestMobKillInfo["QuestID"], QuestMobKillInfo["MobIndex"], QuestMobKillInfo["MaxKillCount"] )
GoToNextStep( Var )
DebugLog( "End QuestSuccess" )
end
-- ŷ<><C5B7> <20><><EFBFBD><EFBFBD>Ʈ <20><><EFBFBD><EFBFBD> : ID <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
function QuestFailed( Var )
cExecCheck "QuestFailed"
if Var == nil
then
return
end
DebugLog( "Start QuestFailed" )
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"]["ReturnStepNo"] = 1
Var["ReturnToHome"]["ReturnStepSec"] = Var["CurSec"]
Var["ReturnToHome"]["ReturnNoticeIndex"] = "IDReturn"
end
local sReturnNoticeIndex = Var["ReturnToHome"]["ReturnNoticeIndex"]
-- Return : return notice substep
if Var["ReturnToHome"]["ReturnStepNo"] <= #NoticeInfo[ sReturnNoticeIndex ]
then
if Var["ReturnToHome"]["ReturnStepSec"] <= Var["CurSec"]
then
-- Notice of Escape
if NoticeInfo[ sReturnNoticeIndex ][ Var["ReturnToHome"]["ReturnStepNo"] ]["Index"] ~= nil
then
cNotice( Var["MapIndex"], NoticeInfo["ScriptFileName"], NoticeInfo[ sReturnNoticeIndex ][ Var["ReturnToHome"]["ReturnStepNo"] ]["Index"] )
end
-- Go To Next Notice
Var["ReturnToHome"]["ReturnStepNo"] = Var["ReturnToHome"]["ReturnStepNo"] + 1
Var["ReturnToHome"]["ReturnStepSec"] = Var["CurSec"] + DelayTime["GapIDReturnNotice"]
end
return
end
-- Return : linkto substep
if Var["ReturnToHome"]["ReturnStepNo"] > #NoticeInfo[ sReturnNoticeIndex ]
then
if Var["ReturnToHome"]["ReturnStepSec"] <= Var["CurSec"]
then
--Finish_ID
cLinkToAll( Var["MapIndex"], LinkInfo["ReturnMapOnClear"]["MapIndex"], LinkInfo["ReturnMapOnClear"]["x"], LinkInfo["ReturnMapOnClear"]["y"] )
GoToNextStep( Var )
Var["ReturnToHome"] = nil
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>Ʈ
ID_StepsList =
{
{ Function = InitDungeon, Name = "InitDungeon", },
{ Function = EachFloor, Name = "EachFloor", },
{ Function = QuestSuccess, Name = "QuestSuccess", },
{ Function = QuestFailed, Name = "QuestFailed", },
{ Function = ReturnToHome, Name = "ReturnToHome", },
}
-- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>Ʈ
ID_StepsIndexList =
{
}
for index, funcValue in pairs ( ID_StepsList )
do
ID_StepsIndexList[ funcValue["Name"] ] = index
end
Reference in New Issue Copy Permalink