name: Queen
card_text: 1 Tuner + 1 or more non-Tuner Plant-Type monsters
  Each player must pay 1000 LP for each monster Normal or Special Summoned from their hand, except for Plant-Type monsters.
lua: local s, id, o = GetID()
  function s.initial_effect(c)
  	--synchro summon
  	aux.AddSynchroProcedure(c, nil, aux.NonTuner(Card.IsRace, RACE_PLANT), 1)
  	c:EnableReviveLimit()
  	--cost
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_FIELD)
  	e1:SetCode(EFFECT_SUMMON_COST)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetTargetRange(LOCATION_HAND, LOCATION_HAND)
  	e1:SetTarget(s.sumtg)
  	e1:SetCost(s.ccost)
  	e1:SetOperation(s.acop)
  	c:RegisterEffect(e1)
  	local e2 = e1:Clone()
  	e2:SetCode(EFFECT_SPSUMMON_COST)
  	c:RegisterEffect(e2)
  end
  function s.sumtg(e, c)
  	return c:GetRace() ~= RACE_PLANT
  end
  function s.ccost(e, c, tp)
  	return Duel.CheckLPCost(tp, 1000)
  end
  function s.acop(e, tp, eg, ep, ev, re, r, rp)
  	Duel.PayLPCost(tp, 1000)
  end
  
  
source_text: Queen
  1 Tuner + 1 or more non-Tuner Plant-Type monsters
  Each player must pay 1000 LP for each monster Normal or Special Summoned from their hand, except for Plant-Type monsters.
target_text: -- Queen
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--synchro summon
  	aux.AddSynchroProcedure(c, nil, aux.NonTuner(Card.IsRace, RACE_PLANT), 1)
  	c:EnableReviveLimit()
  	--cost
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_FIELD)
  	e1:SetCode(EFFECT_SUMMON_COST)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetTargetRange(LOCATION_HAND, LOCATION_HAND)
  	e1:SetTarget(s.sumtg)
  	e1:SetCost(s.ccost)
  	e1:SetOperation(s.acop)
  	c:RegisterEffect(e1)
  	local e2 = e1:Clone()
  	e2:SetCode(EFFECT_SPSUMMON_COST)
  	c:RegisterEffect(e2)
  end
  function s.sumtg(e, c)
  	return c:GetRace() ~= RACE_PLANT
  end
  function s.ccost(e, c, tp)
  	return Duel.CheckLPCost(tp, 1000)
  end
  function s.acop(e, tp, eg, ep, ev, re, r, rp)
  	Duel.PayLPCost(tp, 1000)
  end
  
  