name: Forced
card_text: You can activate this card when you discard from your hand. After that, each time you discard from your hand, your opponent must also discard the same number of cards from his/her hand.
lua: local s, id, o = GetID()
  function s.initial_effect(c)
  	--Activate
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_ACTIVATE)
  	e1:SetCode(EVENT_DISCARD)
  	e1:SetCondition(s.condition)
  	c:RegisterEffect(e1)
  	--handes
  	local e2 = Effect.CreateEffect(c)
  	e2:SetDescription(aux.Stringid(id, 0))
  	e2:SetCategory(CATEGORY_HANDES)
  	e2:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_F)
  	e2:SetRange(LOCATION_SZONE)
  	e2:SetCode(EVENT_DISCARD)
  	e2:SetCondition(s.condition)
  	e2:SetTarget(s.target)
  	e2:SetOperation(s.operation)
  	c:RegisterEffect(e2)
  end
  function s.cfilter(c, tp)
  	return c:IsPreviousControler(tp)
  end
  function s.condition(e, tp, eg, ep, ev, re, r, rp)
  	return eg:IsExists(s.cfilter, 1, nil, tp)
  end
  function s.target(e, tp, eg, ep, ev, re, r, rp, chk)
  	if chk == 0 then
  		return true
  	end
  	local ct = eg:FilterCount(s.cfilter, nil, tp)
  	e:SetLabel(ct)
  	Duel.SetOperationInfo(0, CATEGORY_HANDES, nil, 0, 1 - tp, ct)
  end
  function s.operation(e, tp, eg, ep, ev, re, r, rp)
  	local ct = e:GetLabel()
  	Duel.DiscardHand(1 - tp, nil, ct, ct, REASON_EFFECT + REASON_DISCARD)
  end
  
  
source_text: Forced
  You can activate this card when you discard from your hand. After that, each time you discard from your hand, your opponent must also discard the same number of cards from his/her hand.
target_text: -- Forced
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--Activate
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_ACTIVATE)
  	e1:SetCode(EVENT_DISCARD)
  	e1:SetCondition(s.condition)
  	c:RegisterEffect(e1)
  	--handes
  	local e2 = Effect.CreateEffect(c)
  	e2:SetDescription(aux.Stringid(id, 0))
  	e2:SetCategory(CATEGORY_HANDES)
  	e2:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_F)
  	e2:SetRange(LOCATION_SZONE)
  	e2:SetCode(EVENT_DISCARD)
  	e2:SetCondition(s.condition)
  	e2:SetTarget(s.target)
  	e2:SetOperation(s.operation)
  	c:RegisterEffect(e2)
  end
  function s.cfilter(c, tp)
  	return c:IsPreviousControler(tp)
  end
  function s.condition(e, tp, eg, ep, ev, re, r, rp)
  	return eg:IsExists(s.cfilter, 1, nil, tp)
  end
  function s.target(e, tp, eg, ep, ev, re, r, rp, chk)
  	if chk == 0 then
  		return true
  	end
  	local ct = eg:FilterCount(s.cfilter, nil, tp)
  	e:SetLabel(ct)
  	Duel.SetOperationInfo(0, CATEGORY_HANDES, nil, 0, 1 - tp, ct)
  end
  function s.operation(e, tp, eg, ep, ev, re, r, rp)
  	local ct = e:GetLabel()
  	Duel.DiscardHand(1 - tp, nil, ct, ct, REASON_EFFECT + REASON_DISCARD)
  end
  
  