feat(combat): 몬스터 랜덤 구성·랜덤 행동·덱 오염(AddCard)·map01 로스터 (P14-3)

- 구성 랜덤화: BuildMonsters를 그룹별 수집 후 노드 타입별 추첨
  (일반 1~3 / 엘리트 1+일반0~2 / 보스 1, MAX_MONSTERS=4 내)
- 행동 랜덤화: EnemyActStep 순차(round-robin) → 정의된 intent 중 math.random 선택
  (스폰 시 시작 intent도 랜덤, sim-balance.mjs 미러 동기화)
- StS2식 덱 오염: AddCard intent 신규 — 저주 카드(Wound/Burn)를 버린 더미에 추가
  · Wound=사용불가 사석, Burn=사용불가+턴종료 피해2(EndPlayerTurn 처리)
  · PlayCard unplayable 가드, CardPool class 필터로 보상/상점 자동 제외
  · luaIntentsArray(card/count)·luaCardsTable(unplayable/curse/endTurnDamage) 직렬화
- map01 인카운터: 일반 5종(주황/초록/빨강달팽이/파랑/돼지) + 엘리트1 + 보스1, 우측 포메이션
  · enemies.json red_snail/stump 신규, blue_mushroom/mushmom에 AddCard intent
  · gen-map-encounters 레이아웃 맵별 분기 + 풀 인덱싱 일반화
- 막 배율 0.6→0.45(5막 기준 완화). sim 테스트 35/35 통과(신규 3 포함). 산출물 재생성

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>

tools/deck/gen-slaydeck.mjs

@@ -90,8 +90,10 @@ function luaPotionsTable(potions) {
 
 function luaIntentsArray(intents) {
   return '{ ' + intents.map((it) => {
-    const fields = [`kind = ${luaStr(it.kind)}`, `value = ${it.value}`];
+    const fields = [`kind = ${luaStr(it.kind)}`, `value = ${it.value != null ? it.value : 0}`];
     if (it.effect != null) fields.push(`effect = ${luaStr(it.effect)}`);
+    if (it.card != null) fields.push(`card = ${luaStr(it.card)}`);
+    if (it.count != null) fields.push(`count = ${it.count}`);
     return `{ ${fields.join(', ')} }`;
   }).join(', ') + ' }';
 }
@@ -131,6 +133,9 @@ function luaCardsTable(cards) {
     if (c.heal != null) fields.push(`heal = ${c.heal}`);
     if (c.poison != null) fields.push(`poison = ${c.poison}`);
     if (c.aoe === true) fields.push('aoe = true');
+    if (c.unplayable === true) fields.push('unplayable = true');
+    if (c.curse === true) fields.push('curse = true');
+    if (c.endTurnDamage != null) fields.push(`endTurnDamage = ${c.endTurnDamage}`);
     if (c.image != null) fields.push(`image = ${luaStr(c.image)}`);
     return `\t${id} = { ${fields.join(', ')} },`;
   });
@@ -2761,37 +2766,64 @@ for i = 1, #reg do
 		reg[i].entity:SetVisible(false)
 	end
 end
-local list = {}
+local byGroup = {}
 for i = 1, #reg do
 	local r = reg[i]
-	if r.entity ~= nil and isvalid(r.entity) and r.group == g and (r.map == nil or r.map == "" or pmap == "" or r.map == pmap) then
+	if r.entity ~= nil and isvalid(r.entity) and (r.map == nil or r.map == "" or pmap == "" or r.map == pmap) then
+		local gg = r.group
+		if gg == nil or gg == "" then gg = "combat" end
+		if byGroup[gg] == nil then byGroup[gg] = {} end
 		local x = 0
 		if r.entity.TransformComponent ~= nil then
 			x = r.entity.TransformComponent.WorldPosition.x
 		end
-		table.insert(list, { entity = r.entity, enemyId = r.enemyId, x = x })
+		table.insert(byGroup[gg], { entity = r.entity, enemyId = r.enemyId, x = x })
 	end
 end
-table.sort(list, function(a, b) return a.x < b.x end)
+-- 노드 타입별 랜덤 구성: 일반 1~3 / 엘리트 1+일반0~2 / 보스 1
+local chosen = {}
+local function takeFrom(key, k)
+	local src = byGroup[key] or {}
+	local pool = {}
+	for i = 1, #src do pool[i] = src[i] end
+	self:Shuffle(pool)
+	local taken = 0
+	for i = 1, #pool do
+		if taken >= k then break end
+		table.insert(chosen, pool[i])
+		taken = taken + 1
+	end
+end
+if g == "boss" then
+	takeFrom("boss", 1)
+elseif g == "elite" then
+	takeFrom("elite", 1)
+	takeFrom("combat", math.random(0, 2))
+else
+	takeFrom("combat", math.random(1, 3))
+end
+if #chosen == 0 then takeFrom(g, 1) end
+if #chosen == 0 then takeFrom("combat", 1) end
+table.sort(chosen, function(a, b) return a.x < b.x end)
 local mult = 1 + (self.Floor - 1) * 0.45
 if g == "elite" or g == "boss" then
 	mult = mult + self:AscEliteBonus()
 end
-local n = #list
+local n = #chosen
 if n > ${MAX_MONSTERS} then n = ${MAX_MONSTERS} end
 for i = 1, n do
-	local item = list[i]
+	local item = chosen[i]
 	local e = self.Enemies[item.enemyId]
 	if e == nil then e = { name = item.enemyId, maxHp = 10, intents = { { kind = "Attack", value = 5 } } } end
 	local intents = {}
 	for k = 1, #e.intents do
-		local v = e.intents[k].value
+		local v = e.intents[k].value or 0
 		if e.intents[k].kind == "Attack" then
 			v = math.floor(v * mult * self:AscAtkMult())
 		elseif e.intents[k].kind ~= "Debuff" then
 			v = math.floor(v * mult)
 		end
-		intents[k] = { kind = e.intents[k].kind, value = v, effect = e.intents[k].effect }
+		intents[k] = { kind = e.intents[k].kind, value = v, effect = e.intents[k].effect, card = e.intents[k].card, count = e.intents[k].count }
 	end
 	local maxHp = math.floor(e.maxHp * mult * self:AscHpMult())
 	local hitClip = nil
@@ -2802,10 +2834,12 @@ for i = 1, n do
 			standClip = item.entity.StateAnimationComponent.ActionSheet["stand"]
 		end)
 	end
+	local startIdx = 1
+	if #intents > 0 then startIdx = math.random(1, #intents) end
 	self.Monsters[i] = { entity = item.entity, enemyId = item.enemyId, name = e.name,
 		hp = maxHp, maxHp = maxHp, block = 0, str = 0, weak = 0, vuln = 0, poison = 0,
 		hitClip = hitClip, standClip = standClip, motionBusy = false,
-		intents = intents, intentIdx = 1, alive = true, slot = i }
+		intents = intents, intentIdx = startIdx, alive = true, slot = i }
 	self:ReviveMonsterEntity(item.entity)
 	self:PositionMonsterSlot(i)
 end
@@ -3026,6 +3060,17 @@ self:RenderCombat()`),
     method('EndPlayerTurn', `if self.CombatOver == true or self.FxBusy == true or self.TurnBusy == true then
 	return
 end
+local burn = 0
+for bi = 1, #self.Hand do
+\tlocal hc = self.Cards[self.Hand[bi]]
+\tif hc ~= nil and hc.endTurnDamage ~= nil then burn = burn + hc.endTurnDamage end
+end
+if burn > 0 then
+\tself.PlayerHp = self.PlayerHp - burn
+\tif self.PlayerHp < 0 then self.PlayerHp = 0 end
+\tself:ShowPlayerDmgPop(burn)
+\tself:RenderCombat()
+end
 for i = 1, #self.Hand do
 \ttable.insert(self.DiscardPile, self.Hand[i])
 end
@@ -3279,6 +3324,10 @@ local c = self.Cards[cardId]
 if c == nil then
 	return
 end
+if c.unplayable == true then
+	self:Toast("사용할 수 없는 카드입니다")
+	return
+end
 if self.Energy < c.cost then
 	self:Toast("에너지가 부족합니다")
 	return
@@ -3623,11 +3672,20 @@ _TimerService:SetTimerOnce(function()
 			elseif intent.effect == "vuln" then
 				self.PlayerVuln = self.PlayerVuln + intent.value
 			end
+		elseif intent.kind == "AddCard" then
+			local cnt = intent.count or 1
+			for ci = 1, cnt do
+				table.insert(self.DiscardPile, intent.card)
+			end
+			self:RenderPiles()
+			local cn = intent.card
+			local cc = self.Cards[intent.card]
+			if cc ~= nil then cn = cc.name end
+			self:Toast(m.name .. ": " .. cn .. " 추가!")
 		end
 	end
-	m.intentIdx = m.intentIdx + 1
-	if m.intentIdx > #m.intents then
-		m.intentIdx = 1
+	if #m.intents > 0 then
+		m.intentIdx = math.random(1, #m.intents)
 	end
 	if m.weak > 0 then m.weak = m.weak - 1 end
 	if m.vuln > 0 then m.vuln = m.vuln - 1 end
@@ -3828,6 +3886,8 @@ return table.concat(parts, " ")`, [
 			elseif intent.kind == "Debuff" then
 				if intent.effect == "weak" then t = "약화 " .. tostring(intent.value) .. " 부여"
 				else t = "취약 " .. tostring(intent.value) .. " 부여" end
+			elseif intent.kind == "AddCard" then
+				t = "저주 카드 추가"
 			end
 		end
 		self:SetText(base .. "/Intent", t)
@@ -3838,6 +3898,8 @@ return table.concat(parts, " ")`, [
 				intentEntity.TextComponent.FontColor = Color(1, 0.45, 0.35, 1)
 			elseif intent.kind == "Debuff" then
 				intentEntity.TextComponent.FontColor = Color(0.8, 0.5, 1, 1)
+			elseif intent.kind == "AddCard" then
+				intentEntity.TextComponent.FontColor = Color(0.6, 0.85, 0.4, 1)
 			else
 				intentEntity.TextComponent.FontColor = Color(0.5, 0.75, 1, 1)
 			end