mirrors2/hk4e
1
0
Fork 0
mirror of https://github.com/FlourishingWorld/hk4e.git synced 2026-02-23 14:32:27 +08:00
Code Issues Packages Projects Releases Wiki Activity

添加配置表

Browse Source
This commit is contained in:
flswld
2022-11-30 00:00:20 +08:00
parent f70a890338
commit d7f3f3b866
33382 changed files with 8476601 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

761
gdconf/game_data_config/lua/common/AsterBig.lua Normal file
View File

@@ -0,0 +1,761 @@
--[[
setmetatable(_ENV,{__index=function() return{} end})
local stage_def = {
[1] = {
--根据阶段创建的group,在阶段group中标记
[1] = {2,3,4,5},
[2] = {2,3,4,5},
[3] = {2,3,4,5},
[4] = {2,3,4,5}
},
[2] = {
[1] = {2,3,4,5},
[2] = {2,3,4,5},
[3] = {2,3,4,5},
[4] = {2,3,4,5}
},
[3] = {
[1] = {2,3,4,5},
[2] = {2,3,4,5},
[3] = {2,3,4,5},
[4] = {2,3,4,5}
},
}
--根据progress对应的monster_tide,配在主group中
local tide_defs = {
[1] = {
[0] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[1] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[2] = {suite={},weight={}},
[3] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[4] = {suite={2,3,4,5},weight={20,20,20,20,20}}
},
[2] = {
[0] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[1] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[2] = {suite={},weight={}},
[3] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[4] = {suite={2,3,4,5},weight={20,20,20,20,20}}
},
[3] = {
[0] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[1] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[2] = {suite={},weight={}},
[3] = {suite={2,3,4,5},weight={20,20,20,20,20}},
[4] = {suite={2,3,4,5},weight={20,20,20,20,20}}
},
}
--monster_tide的启动参数,配在主group中
local tide_suite_config = {
[2] = {total=10,min=2,max=4,next=3,delay=10},
[3] = {total=10,min=2,max=4,next=4,delay=10},
[4] = {total=10,min=2,max=4,next=5,delay=10},
[5] = {total=10,min=2,max=4,next=6,delay=10}
}
--配在及时group中
local timer_def = {
[1] = {
--根据时间创建的group
[1] = {2,3,4,5},
[2] = {2,3,4,5},
[3] = {2,3,4,5},
[4] = {2,3,4,5}
},
[2] = {
[1] = {2,3,4,5},
[2] = {2,3,4,5},
[3] = {2,3,4,5},
[4] = {2,3,4,5}
},
[3] = {
[1] = {2,3,4,5},
[2] = {2,3,4,5},
[3] = {2,3,4,5},
[4] = {2,3,4,5}
}
}
local progress_def = {
["normal"] = {0,1500,3000,4500,6500},
["hard"] = {0,1500,3000,4500,6500},
["nightmare"] = {0,1500,3000,4500,6500}
}
local defs = {
--group_main
gadget_aster = 413001,
gadget_reward = 123456,
score_ratio = {normal=1,hard=0.75,nightmare=0.5},
difficulty_weight = {normal=75,hard=20,nightmare=5},
--group_stage
--group_clear
aster_timer = {60,120,180,240,300},
clear_delay = 30
}--]]
local play = {
PlayType = 2,
PlayId = 2,
player_energy = "AVATAR_ASTER_SCORE", --global_value
radius = 10,
monster_tide = 426,
group_main = 133001413,
group_timer = 133001426,
group_stage = 133001427,
group_gadget = 133001498,
energy_str = "AVATAR_ASTER_SCORE", --uid_value
difficulty = "difficulty",
ratio_energy = {"ASTER_ENERGY_RATIO",2},
ratio_progress = {"ASTER_PROGRESS_RATIO",2},
op_radius = 10
}
local extra_triggers = {
[play.group_main] = {
--活动准备阶段
["Battle_State"] = { config_id = 8000001, name = "Battle_State", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_STATE, source = "", condition = "condition_battle_state", action = "action_battle_state", trigger_count = 0 },
--战斗结束
["Battle_Result"] = { config_id = 8000002, name = "Battle_Result", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_RESULT, source = "", condition = "", action = "action_battle_result", trigger_count = 0 },
--角色充能处理
["Monster_Die_Before_Leave_Scene"] = { config_id = 8000003, name = "Monster_Die_Before_Leave_Scene", event = EventType.EVENT_MONSTER_DIE_BEFORE_LEAVE_SCENE, source = "", condition = "condition_monster_die_before_leave_scene", action = "action_monster_die_before_leave_scene", trigger_count = 0 },
--战斗阶段响应
["Battle_State_Change"] = { config_id = 8000004, name = "Battle_State_Change", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_STAGE_CHANGE, source = "", condition = "", action = "action_battle_stage_change", trigger_count = 0 },
--怪物潮管理与切换
["Monster_Tide_Over"] = { config_id = 8000005, name = "Monster_Tide", event = EventType.EVENT_MONSTER_TIDE_OVER, source = "", condition = "", action = "action_monster_tide_over", trigger_count = 0 },
["Timer_Delay"] = { config_id = 8000006, name = "Timer_Delay", event = EventType.EVENT_TIMER_EVENT, source = "next_tide_delay", condition = "", action = "action_timer_delay", trigger_count = 0 },
["Battle_Interrupt"] = { config_id = 8000007, name = "Battle_Interrupt", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_INTERRUPT, source = "", condition = "", action = "action_battle_interrupt", trigger_count = 0},
--1.3版本修复内容
--处理1.1版本数据未清理的大陨石
["Group_Load"] = { config_id = 8000100, name = "Group_Load", event = EventType.EVENT_GROUP_LOAD, source = "", condition = "", action = "action_group_load", trigger_count = 0 }
},
[play.group_timer] = {
--活动准备阶段
["Battle_State"] = { config_id = 8000008, name = "Battle_State", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_STATE, source = "", condition = "condition_battle_state", action = "action_battle_state", trigger_count = 0 },
--角色充能处理
["Monster_Die_Before_Leave_Scene"] = { config_id = 8000009, name = "Monster_Die_Before_Leave_Scene", event = EventType.EVENT_MONSTER_DIE_BEFORE_LEAVE_SCENE, source = "", condition = "condition_monster_die_before_leave_scene", action = "action_monster_die_before_leave_scene", trigger_count = 0 },
--战斗结束
["Battle_Result"] = { config_id = 8000010, name = "Battle_Result", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_RESULT, source = "", condition = "", action = "action_battle_result", trigger_count = 0 },
--计时处理
["Timer_Summon"] = { config_id = 8000011, name = "Timer_Summon", event = EventType.EVENT_TIMER_EVENT, source = "aster_timer", condition = "", action = "action_timer_summon", trigger_count = 0 }
},
[play.group_stage] = {
--角色充能处理
["Monster_Die_Before_Leave_Scene"] = { config_id = 8000012, name = "Monster_Die_Before_Leave_Scene", event = EventType.EVENT_MONSTER_DIE_BEFORE_LEAVE_SCENE, source = "", condition = "condition_monster_die_before_leave_scene", action = "action_monster_die_before_leave_scene", trigger_count = 0 },
--战斗结束
["Battle_Result"] = { config_id = 8000013, name = "Battle_Result", event = EventType.EVENT_SCENE_MP_PLAY_BATTLE_RESULT, source = "", condition = "", action = "action_battle_result", trigger_count = 0 },
["Any_Monster_Die"] = { config_id = 8000014, name = "Any_Monster_Die", event = EventType.EVENT_ANY_MONSTER_DIE, source = "", condition = "condition_any_monster_die", action = "action_any_monster_die", trigger_count = 0 }
}
}
--%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
--1.3修复内容
function action_group_load(context, evt)
--1.6改为注册及之后，动态group不允许使用setDead，也不需要维持这段逻辑
--[[for i,v in ipairs(suites) do
ScriptLib.RemoveExtraGroupSuite(context, play.group_main, i)
end
ScriptLib.SetGroupDead(context, play.group_main)--]]
return 0
end
--%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function LF_Initialize_Group(triggers, suites, group_id)
--[[if group_id == play.group_main then
for k,v in pairs(extra_triggers[group_id]) do
table.insert(triggers, v)
table.insert(suites[init_config.suite].triggers, v.name)
end
else
for k,v in pairs(extra_triggers[group_id]) do
-- Triggers 是个数组，不是map
table.insert(triggers, v)
for p,q in pairs(suites) do
if p ~= init_config.suite or v.name ~= "Any_Monster_Die" then
table.insert(q.triggers, v.name)
end
end
-- 所以不能 triggers[k] = v
end
end--]]
for k,v in pairs(extra_triggers[group_id]) do
table.insert(triggers, v)
table.insert(suites[init_config.suite].triggers, v.name)
end
end
function UpdateAsterInterrupt(context)
local u_list = ScriptLib.GetSceneUidList(context)
for i,v in ipairs(u_list) do
if v == context.uid then
ScriptLib.ScenePlayBattleUidOp(context, play.group_main, defs.gadget_aster, {v}, 0, "random_buff_aster", {}, {}, 6, 0)
return 0
end
end
end
function UpdateAsterProgress(context)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local D = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, play.difficulty)
ratio = LF_Get_Extra_Energy_Ratio(context, host)
--获取玩家当前能量
local uid = context.uid
local energy = ScriptLib.GetTeamAbilityFloatValue(context, uid, play.energy_str)
local progress = math.ceil(energy * ratio)
--将当前能量写入uid_value
local old_progress = ScriptLib.GetScenePlayBattleUidValue(context, 0, uid, play.energy_str)
ScriptLib.PrintContextLog(context, "## uid:"..uid.." | energy:"..progress.." | old_energy:"..old_progress)
ScriptLib.SetScenePlayBattleUidValue(context, 0, uid, play.energy_str, old_progress + progress)
--通知ability可以清掉自己的能量计数
--ScriptLib.GadgetPlayUidOp(context, 0, 0, {uid}, 1, "clear_energy", {})
ScriptLib.AddTeamEntityGlobalFloatValue(context, {uid}, play.player_energy, -1*energy)
--增加玩法总进度
ScriptLib.AddScenePlayBattleProgress(context, 133001413, progress * LF_Get_Extra_Progress_Ratio(context, host))
return 0
end
function LF_Get_Extra_Energy_Ratio(context, host)
local ratio_ = 1
--if true == LF_Is_Near_Op_Uid(context, host, play.ratio_energy[1]) then
if 1 == ScriptLib.GetTeamAbilityFloatValue(context, context.source_entity_id, play.ratio_energy[1]) then
ratio_ = play.ratio_energy[2]
end
ScriptLib.PrintContextLog(context, "## ASTER_LOG : Extra_Energy_Ratio -> "..ratio_)
return ratio_
end
function LF_Get_Extra_Progress_Ratio(context, host)
local ratio_ = 1
--if true == LF_Is_Near_Op_Uid(context, host, play.ratio_progress[1]) then
if 1 == ScriptLib.GetTeamAbilityFloatValue(context, context.source_entity_id, play.ratio_progress[1]) then
ratio_ = play.ratio_progress[2]
end
ScriptLib.PrintContextLog(context, "## ASTER_LOG : Extra_Progress_Ratio -> "..ratio_)
return ratio_
end
function LF_Is_Near_Op_Uid(context, host, str)
local target = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "Op_Uid")
if target == 0 or 0 == ScriptLib.GetTeamAbilityFloatValue(context, target, str)then
return false
end
local target_Eid = ScriptLib.GetAvatarEntityIdByUid(context, target)
if target_Eid == 0 then
return false
end
--本人的直接返回
if target_Eid == context.source_entity_id then
return true
end
local pos1 = ScriptLib.GetPosByEntityId(context, target_Eid)
local pos2 = ScriptLib.GetPosByEntityId(context, context.source_entity_id)
if play.op_radius < LF_Calculate_Distance(context, pos1, pos2) then
return false
end
return true
end
function LF_Calculate_Distance(context, pos1, pos2)
local distance = math.sqrt(math.pow(pos1.x-pos2.x,2)+math.pow(pos1.y-pos2.y,2)+math.pow(pos1.z-pos2.z,2))
ScriptLib.PrintContextLog(context, "## ASTER_LOG : op_distance -> "..distance)
return distance
end
-------------------------------------------------
function condition_battle_state(context, evt)
if defs.group_id == play.group_main then
ScriptLib.PrintContextLog(context, "## ASTER_LOG: battle_state : param1->"..evt.param1.." | param2->"..evt.param2.." | param3->"..evt.param3)
end
if evt.param1 == play.PlayType and evt.param2 == play.PlayId then
return true
end
return false
end
function action_battle_state(context, evt)
--BATTLE_PREPARE
if evt.param3 == 2 and defs.group_id == play.group_main then
LF_Battle_Prepare(context, evt)
--BATTLE_READY
elseif evt.param3 == 3 and defs.group_id == play.group_main then
LF_Battle_Ready(context, evt)
--BATTLE_PRESTART
elseif evt.param3 == 4 and defs.group_id == play.group_main then
LF_Battle_Prestart(context, evt)
--BATTLE_START
elseif evt.param3 == 5 then
LF_Battle_Start(context, evt)
--[[--BATTLE_STOP
elseif evt.param3 == 6 then
LF_Battle_Stop(context, evt)--]]
elseif defs.group_id == play.group_main then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : Invalid Battle State")
return -1
end
return 0
end
function action_battle_stage_change(context, evt)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : battle_stage_change : old_stage->"..evt.param1.." | cur_stage->"..evt.param2.." | final_stage->"..evt.param3)
if evt.param2 == evt.param3 then
return 0
end
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "stage_ptr", evt.param2)
LF_Uid_Op(context, evt.param2)
--阶段转换时一定要停当前tide
LF_Modify_Gadget_Group(context, evt.param2)
local r = ScriptLib.KillMonsterTide(context, play.group_main, play.monster_tide)
ScriptLib.CancelGroupTimerEvent(context, play.group_main, "next_tide_delay")
local s = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "tide_ptr")
ScriptLib.PrintContextLog(context, "## ASTER_LOG : remove_suite_over_stage -> "..s.." | kill_tide_result -> "..r)
--清理tide_monster
if s ~= 0 then
ScriptLib.RemoveExtraGroupSuite(context, play.group_main, s)
end
--清理stage_monster
local prev_stage_suite = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "prev_stage_suite")
if prev_stage_suite ~= 0 then
ScriptLib.RemoveExtraGroupSuite(context, play.group_stage, prev_stage_suite)
end
ScriptLib.ExecuteGroupLua(context, play.group_stage, "LF_Find_Stage_Suite", {evt.param2,host})
return 0
end
function action_battle_result(context, evt)
if evt.param3 == 1 then
LF_Battle_Win(context, evt)
elseif evt.param3 == 0 then
LF_Battle_Lose(context, evt)
end
return 0
end
function condition_monster_die_before_leave_scene(context, evt)
--如果monster没有分就return了
if monsters[evt.param1].kill_score > 0 then
return true
end
return false
end
function action_monster_die_before_leave_scene(context, evt)
--判断附近玩家,并增加对应分数
--local uid_list = ScriptLib.GetSurroundUidList(context, evt.param1, play.radius)
local uid_list = ScriptLib.GetSceneUidList(context)
if #uid_list == 0 then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : None Near Players")
return -1
end
--通知客户端执行加分,考虑到客户端可能断线,这个分数服务器自己不记录
local score_ = monsters[evt.param1].kill_score
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local ratio_ = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "ratio_ptr")
ScriptLib.PrintContextLog(context, "## ASTER_LOG : monster->"..evt.param1.." | score->"..score_.." | ratio->"..ratio_)
ScriptLib.AddTeamEntityGlobalFloatValue(context, uid_list, play.player_energy, score_ * ratio_)
return 0
end
function action_timer_summon(context, evt)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local D = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, play.difficulty)
local timer_ptr = ScriptLib.GetScenePlayBattleUidValue(context, 0, host,"timer_ptr")
ScriptLib.PrintContextLog(context, "## ASTER_LOG : timer_event \"aster_timer\" -> "..defs.aster_timer[timer_ptr])
ScriptLib.PrintContextLog(context, "## ASTER_LOG : cur_timer_ptr -> "..timer_ptr)
math.randomseed(ScriptLib.GetServerTime(context) + timer_ptr)
local Timer = timer_def[D][timer_ptr][math.random(1,#timer_def[D][timer_ptr])]
if #suites[Timer].monsters > 0 then
ScriptLib.ShowTemplateReminder(context, 110, {0,0})
end
if defs.aster_timer[timer_ptr+1] == nil then
ScriptLib.PrintContextLog(context, "## ASTER_LOG : aster_timer_end")
return -1
end
--设置下一招怪阶段
ScriptLib.CreateGroupTimerEvent(context, play.group_timer, "aster_timer", defs.aster_timer[timer_ptr+1] - defs.aster_timer[timer_ptr])
--ScriptLib.CreateGroupTimerEvent(context, play.group_timer, "clear_delay", defs.clear_delay)
--召唤当前波次的怪物
--ScriptLib.PauseAutoMonsterTide(context, play.group_main, play.monster_tide)
--ScriptLib.RefreshGroup(context, {group_id = play.group_timer, suite = timer_def[D][timer_ptr][math.random(1,#timer_def[D][timer_ptr])]})
ScriptLib.AddExtraGroupSuite(context, play.group_timer, Timer)
ScriptLib.SetScenePlayBattleUidValue(context, 0, host,"timer_ptr", timer_ptr + 1)
--ScriptLib.SetScenePlayBattleUidValue(context, 0, host,"prev_timer_suite", Timer)
return 0
end
function action_monster_tide_over(context, evt)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : Monster_Tide_Over : tide_index->"..evt.source_name.." | status->"..evt.param2)
local tide_ptr = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "tide_ptr")
--自动结束,计算下一个tide,如果只有一个会选自己
local new_tide_ptr = tide_suite_config[tide_ptr].next
if new_tide_ptr == nil then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : INVALID_CIRCLE_TIDE_PTR -> "..tide_ptr)
return -1
end
ScriptLib.CreateGroupTimerEvent(context, play.group_main, "next_tide_delay", tide_suite_config[tide_ptr].delay)
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "tide_ptr", new_tide_ptr)
return 0
end
function action_timer_delay(context, evt)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
--继续创建下个tide
local tide_ptr = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "tide_ptr")
ScriptLib.PrintContextLog(context, "## ASTER_LOG : timer_delay_tide -> "..tide_ptr)
ScriptLib.AutoMonsterTide(context, play.monster_tide, play.group_main, suites[tide_ptr].monsters, tide_suite_config[tide_ptr].total, tide_suite_config[tide_ptr].min, tide_suite_config[tide_ptr].max)
return 0
end
function action_battle_interrupt(context, evt)
ScriptLib.SetGadgetEnableInteract(context, play.group_main, defs.gadget_aster, true)
return 0
end
function condition_any_monster_die(context, evt)
if 0 == ScriptLib.GetGroupMonsterCount(context) then
return true
end
return false
end
function action_any_monster_die(context, evt)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local stage = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "stage_ptr")
ScriptLib.ExecuteGroupLua(context, play.group_main, "LF_Modify_Monster_Tide", {stage,host})
return 0
end
---------------------------------------
--/*************************************/
---------------------------------------
function LF_Battle_Prepare(context, evt)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Prepare")
ScriptLib.PrintLog("================VERSION 76=========================")
--关闭大陨石交互
ScriptLib.SetGadgetEnableInteract(context, play.group_main, defs.gadget_aster, false)
return 0
end
function LF_Battle_Ready(context, evt)
--ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Ready")
--随机难度
local D_str = LF_Random_Play_Difficulty(context, evt)
local D_num = 0
if D_str == "normal" then
D_num = 1
elseif D_str == "hard" then
D_num = 2
elseif D_str == "nightmare" then
D_num = 3
elseif D_str == "easy" then
D_num = 4
end
--启用playEntity
LF_Attach_Ability(context, evt, D_num, D_str)
--开启大陨石玩法
ScriptLib.PrestartScenePlayBattle(context, {duration = 600,start_cd = 10,progress_stage = progress_def[D_str], group_id = play.group_main, mode = D_num + 200})
--写入难度
LF_Set_Battle_Difficulty(context, evt, D_num)
--生成Buff序列
LF_Init_Uid_Op_Buff(context, evt)--]]
return 0
end
function LF_Battle_Prestart(context, evt)
--3秒倒计时提醒
ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Prestart")
--[[--随机难度
LF_Random_Play_Difficulty(context, evt)
--生成Buff序列
LF_Init_Uid_Op_Buff(context, evt)--]]
return 0
end
function LF_Battle_Start(context, evt)
--ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Start")
--正式开始
if defs.group_id == play.group_main then
--启动起始tide
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
LF_Modify_Gadget_Group(context, 0)
LF_Modify_Monster_Tide(context, context, 0, host, 0)
elseif defs.group_id == play.group_timer then
--启动timer_group计时器
LF_Set_Timer(context, evt)
end
return 0
end
--[[function LF_Battle_Stop(context, evt)
--结束
ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Stop")
return 0
end--]]
function LF_Battle_Win(context, evt)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Win")
if defs.group_id == play.group_main then
ScriptLib.KillMonsterTide(context, play.group_main, play.monster_tide)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local circle = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "circle_ptr")
ScriptLib.KillExtraGroupSuite(context, play.group_gadget, circle)
ScriptLib.CancelGroupTimerEvent(context, play.group_main, "next_tide_delay")
local s = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "tide_ptr")
ScriptLib.RemoveExtraGroupSuite(context, play.group_main, s)
ScriptLib.CreateScenePlayGeneralRewardGadget(context, {group_id = play.group_main, config_id = defs.gadget_reward})
ScriptLib.SetGadgetEnableInteract(context, play.group_main, defs.gadget_aster, true)
ScriptLib.SetGadgetStateByConfigId(context, defs.gadget_aster, 0)
elseif defs.group_id == play.group_stage then
ScriptLib.RefreshGroup(context, {group_id = defs.group_id, suite = 1})
elseif defs.group_id == play.group_timer then
ScriptLib.RefreshGroup(context, {group_id = defs.group_id, suite = 1})
ScriptLib.CancelGroupTimerEvent(context, play.group_timer, "aster_timer")
--ScriptLib.CancelGroupTimerEvent(context, play.group_timer, "clear_delay")
end
return 0
end
function LF_Battle_Lose(context, evt)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Battle_Lose")
if defs.group_id == play.group_main then
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local circle = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "circle_ptr")
ScriptLib.KillExtraGroupSuite(context, play.group_gadget, circle)
ScriptLib.CancelGroupTimerEvent(context, play.group_main, "next_tide_delay")
ScriptLib.KillMonsterTide(context, play.group_main, play.monster_tide)
local s = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "tide_ptr")
ScriptLib.RemoveExtraGroupSuite(context, play.group_main, s)
ScriptLib.SetGadgetEnableInteract(context, play.group_main, defs.gadget_aster, true)
ScriptLib.SetGadgetStateByConfigId(context, defs.gadget_aster, 0)
elseif defs.group_id == play.group_stage then
ScriptLib.RefreshGroup(context, {group_id = defs.group_id, suite = 1})
elseif defs.group_id == play.group_timer then
ScriptLib.RefreshGroup(context, {group_id = defs.group_id, suite = 1})
ScriptLib.CancelGroupTimerEvent(context, play.group_timer, "aster_timer")
--ScriptLib.CancelGroupTimerEvent(context, play.group_timer, "clear_delay")
end
return 0
end
function LF_Find_Stage_Suite(context, prev_context, param1, param2, param3)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : Find_Stage_Suite : stage->"..param1.." | host->"..param2)
local stage = param1
local host = param2
local D = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, play.difficulty)
--用于定义阶段转换,影响stage对应group的逻辑
local stage_suite_arr = stage_def[D][stage]
if stage_suite_arr == nil or #stage_suite_arr == 0 then
ScriptLib.PrintContextLog(context, "## ASTER_LOG : None Stage Suite")
ScriptLib.ExecuteGroupLua(context, play.group_main, "LF_Modify_Monster_Tide", {stage,host})
return 0
else
math.randomseed(ScriptLib.GetServerTime(context) + stage)
local stage_suite = stage_suite_arr[math.random(1,#stage_suite_arr)]
ScriptLib.ExecuteGroupLua(context, play.group_main, "LF_Handle_Stage_Change", {stage,stage_suite})
end
return 0
end
function LF_Modify_Monster_Tide(context, prev_context, param1, param2, param3)
local stage = param1
local host = param2
ScriptLib.PrintContextLog(context, "## ASTER_LOG : modify_monster_tide : cur_stage->"..stage)
local D = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, play.difficulty)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : show difficulty ->"..D)
if #tide_defs[D][stage].suite == 0 then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : no_monster_tide_begin")
return -1
elseif #tide_defs[D][stage].suite ~= #tide_defs[D][stage].weight then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : Invalid Monster Tide Config")
return -1
end
local tide_ptr = LF_Handle_Random_Weight(context, stage, tide_defs[D], "suite")
--根据tide预设值创建tide
if tide_ptr > 0 then
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "tide_ptr", tide_ptr)
ScriptLib.AutoMonsterTide(context, play.monster_tide, play.group_main, suites[tide_ptr].monsters, tide_suite_config[tide_ptr].total, tide_suite_config[tide_ptr].min, tide_suite_config[tide_ptr].max)
else
return -1
end
return 0
end
function LF_Handle_Random_Weight(context, stage, table, name)
math.randomseed(ScriptLib.GetServerTime(context) + stage)
local weight_sum = 0
for i,v in ipairs(table[stage].weight) do
weight_sum = weight_sum + v
end
if weight_sum == 0 then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : Weight Is Zero")
return -1
end
local weight_ran = math.random(1,weight_sum)
for i,v in ipairs(table[stage].weight) do
weight_ran = weight_ran - v
if weight_ran <= 0 then
return table[stage][name][i]
end
end
return -1
end
function LF_Attach_Ability(context, evt, num, str)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : LF_Attach_Ability")
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
ScriptLib.SetScenePlayBattlePlayTeamEntityGadgetId(context, play.group_main, 70370000 + num)
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "ratio_ptr", defs.score_ratio[str])
return 0
end
function LF_Random_Play_Difficulty(context, evt)
---[[
local M = ScriptLib.GetGroupVariableValue(context, "GM_Mode")
if M == 1 then
return "normal"
elseif M == 2 then
return "hard"
elseif M == 3 then
return "nightmare"
elseif M == 4 then
return "easy"
end
--]]
if 1 == ScriptLib.GetScenePlayBattleType(context, play.group_main) then
return "easy"
end
local max_difficulty = 0
for k,v in pairs(defs.difficulty_weight) do
max_difficulty = max_difficulty + v
end
math.randomseed(ScriptLib.GetServerTime(context) + evt.param1 + evt.param2)
local ran_difficulty = math.random(1,max_difficulty)
for k,v in pairs(defs.difficulty_weight) do
ran_difficulty = ran_difficulty - v
if ran_difficulty <= 0 then
return k
end
end
return 0
end
function LF_Set_Battle_Difficulty(context, evt, difficulty)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
ScriptLib.PrintContextLog(context, "## ASTER_LOG ： Set_Initial_Difficulty->"..difficulty)
--ScriptLib.ShowTemplateReminder(context, 100 + difficulty, {0,0})
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, play.difficulty, difficulty)
return 0
end
function LF_Handle_Stage_Change(context, prev_context, param1, param2, param3)
local stage = param1
local suite = param2
ScriptLib.PrintContextLog(context, "## ASTER_LOG : handle_stage_change : stage->"..stage.." | suite->"..suite)
--处理progress阶段转换的逻辑
if #suites[suite].monsters == 0 then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : Invalid Monster Suite->"..suite)
return -1
end
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
ScriptLib.AddExtraGroupSuite(context, play.group_stage, suite)
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "prev_stage_suite", suite)
--ScriptLib.ShowTemplateReminder(context, 109, {0,0})
return 0
end
function LF_Uid_Op(context, stage)
--用于处理点名逻辑
local buff_type = LF_Get_Uid_Op_Buff(context, stage)
local uid_list = LF_Get_Uid_Op_Target(context, buff_type)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
--[[if #uid_list == 0 then
ScriptLib.PrintContextLog(context, "## ASTER_ERR : Invalid Op Uid List")
return -1
end--]]
ScriptLib.PrintContextLog(context, "## ASTER_LOG : random_buff -> "..buff_type)
if buff_type == 3 or buff_type == 5 then
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "Op_Uid", uid_list[1])
else
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "Op_Uid", 0)
end
ScriptLib.ScenePlayBattleUidOp(context, play.group_main, defs.gadget_aster, uid_list, buff_type, "random_buff_aster", {}, {}, buff_type, 30)
return 0
end
function LF_Init_Uid_Op_Buff(context, evt)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local D = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, play.difficulty)
--初始化点名buff栈,栈的深度要掐头去尾
local buff_stack = 0
for i,v in ipairs(buff_def[D]) do
local buff_ = LF_Handle_Random_Weight(context, i, buff_def[D], "buff")
buff_stack = buff_stack + math.pow(10,i-1)*buff_
end
if buff_stack > 0 then
ScriptLib.PrintContextLog(context, "## ASTER_LOG : buff_stack -> "..buff_stack)
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "buff_stack", buff_stack)
else
ScriptLib.PrintContextLog(context, "## ASTER_ERR : buff_stack_error")
end
return 0
end
function LF_Get_Uid_Op_Buff(context, stage)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local buff_stack = ScriptLib.GetScenePlayBattleUidValue(context, 0, host,"buff_stack")
return buff_stack//math.pow(10,stage-1)%10
end
function LF_Get_Uid_Op_Target(context, buff_type)
--点名返回的目标
local user = ScriptLib.GetSceneUidList(context)
local list = {}
math.randomseed(ScriptLib.GetServerTime(context) + buff_type)
--if buff_type == 1 or buff_type == 2 then
list[1] = user[math.random(1,#user)]
ScriptLib.PrintContextLog(context, "## ASTER_LOG : uid_op_target -> "..list[1])
--end
return list
end
function LF_Set_Timer(context, evt)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : set_timer \"aster_timer\"-> "..defs.aster_timer[1])
ScriptLib.CreateGroupTimerEvent(context, play.group_timer, "aster_timer", defs.aster_timer[1])
ScriptLib.SetScenePlayBattleUidValue(context, 0, host,"timer_ptr", 1)
return 0
end
function LF_Modify_Gadget_Group(context, stage)
ScriptLib.PrintContextLog(context, "## ASTER_LOG : modify_gadget_group | stage -> "..stage)
local host = ScriptLib.GetScenePlayBattleHostUid(context, 0)
local D = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, play.difficulty)
if circle_type_defs[D] == 1 then
--交分台锁位置
ScriptLib.SetGadgetStateByConfigId(context, defs.gadget_aster, 202)
elseif circle_type_defs[D] == 2 then
--交分台换位置
ScriptLib.SetGadgetStateByConfigId(context, defs.gadget_aster, 201)
end
if stage == 0 then
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "circle_ptr", tide_defs[D][stage].circle)
ScriptLib.AddExtraGroupSuite(context, play.group_gadget, tide_defs[D][stage].circle)
elseif circle_type_defs[D] == 1 then
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "circle_ptr", tide_defs[D][stage].circle)
local prev_stage = ScriptLib.GetScenePlayBattleUidValue(context, 0, host, "prev_stage")
ScriptLib.KillExtraGroupSuite(context, play.group_gadget, tide_defs[D][prev_stage].circle)
ScriptLib.AddExtraGroupSuite(context, play.group_gadget, tide_defs[D][stage].circle)
end
ScriptLib.SetScenePlayBattleUidValue(context, 0, host, "prev_stage", stage)
return 0
end
LF_Initialize_Group(triggers, suites, defs.group_id)