Commit 509ac958 authored by HidarimeYume's avatar HidarimeYume

fetch

parents 18c60991 5814fa2c
...@@ -19,7 +19,7 @@ function cm.tgf1(c) ...@@ -19,7 +19,7 @@ function cm.tgf1(c)
return c:IsAbleToRemove() and not c:IsPublic() return c:IsAbleToRemove() and not c:IsPublic()
end end
function cm.tgf2(c) function cm.tgf2(c)
return (c:IsSetCard(0x3fd5) or c:IsSetCard(0xfd6)) and c:IsType(TYPE_SPELL+TYPE_TRAP) and not c:IsCode(m) and c:IsAbleToHand() return (c:IsSetCard(0x3fd5) or c:IsSetCard(0xfd6)) and not c:IsCode(m) and c:IsAbleToHand()
end end
function cm.tgf3(g) function cm.tgf3(g)
return aux.dncheck(g) and g:IsExists(Card.IsSetCard,1,nil,0xfd6) and g:IsExists(Card.IsSetCard,1,nil,0x3fd5) return aux.dncheck(g) and g:IsExists(Card.IsSetCard,1,nil,0xfd6) and g:IsExists(Card.IsSetCard,1,nil,0x3fd5)
......
...@@ -18,8 +18,8 @@ function cm.initial_effect(c) ...@@ -18,8 +18,8 @@ function cm.initial_effect(c)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetTarget(cm.dmtg) e2:SetTarget(cm.damtg)
e2:SetOperation(cm.dmop) e2:SetOperation(cm.damop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1)) e3:SetDescription(aux.Stringid(m,1))
...@@ -53,12 +53,12 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -53,12 +53,12 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
end end
function cm.dmtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,tp,0) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,tp,0)
end end
function cm.dmop(e,tp,eg,ep,ev,re,r,rp) function cm.damop(e,tp,eg,ep,ev,re,r,rp)
local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Damage(p,math.floor(Duel.GetLP(p)/2),REASON_EFFECT) Duel.Damage(p,math.floor(Duel.GetLP(p)/2),REASON_EFFECT)
end end
......
...@@ -10,7 +10,7 @@ function c71400034.initial_effect(c) ...@@ -10,7 +10,7 @@ function c71400034.initial_effect(c)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_FZONE) e1:SetRange(LOCATION_FZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e:SetDescription(aux.Stringid(71400034,0)) e1:SetDescription(aux.Stringid(71400034,0))
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetTarget(c71400034.tg1) e1:SetTarget(c71400034.tg1)
e1:SetOperation(c71400034.op1) e1:SetOperation(c71400034.op1)
......
...@@ -55,8 +55,8 @@ function c71400066.limit(c) ...@@ -55,8 +55,8 @@ function c71400066.limit(c)
end end
end end
function c71400066.op1(e,tp,eg,ep,ev,re,r,rp) function c71400066.op1(e,tp,eg,ep,ev,re,r,rp)
if Duel.CheckLPCost(tc:GetControler(),1000) then if Duel.CheckLPCost(tp,1000) then
Duel.PayLPCost(tc:GetControler(),1000) Duel.PayLPCost(tp,1000)
else else
return return
end end
...@@ -88,8 +88,8 @@ function c71400066.tg1a(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -88,8 +88,8 @@ function c71400066.tg1a(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end end
end end
function c71400066.op1a(e,tp,eg,ep,ev,re,r,rp) function c71400066.op1a(e,tp,eg,ep,ev,re,r,rp)
if Duel.CheckLPCost(tc:GetControler(),1000) then if Duel.CheckLPCost(tp,1000) then
Duel.PayLPCost(tc:GetControler(),1000) Duel.PayLPCost(tp,1000)
else else
return return
end end
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment