Skip to content

Y
ygopro-2pick
Commit 7ba237a7 authored by MobiusMei's avatar MobiusMei
Browse files
Options

ver. 1.3.5 Contract with Exodia

parent 4584cef6
Hide whitespace changes
Inline Side-by-side
Showing with 116 additions and 55 deletions
2pick/pick.lua
View file @ 7ba237a7
......@@ -229,30 +229,30 @@ function Auxiliary.StartPick(e)
end
end
-- Shadoll Additional Picks
for p=0,1 do
if Duel.IsPlayerNeedToPickDeck(p) then
Duel.Hint(HINT_CARD,p,86938484)
local ng=Group.CreateGroup()
local card1=Duel.CreateToken(p,86938484)
local card2=Duel.CreateToken(p,86938484)
local card3=Duel.CreateToken(p,74822425)
local card4=Duel.CreateToken(p,19261966)
local card5=Duel.CreateToken(p,20366274)
local card6=Duel.CreateToken(p,48424886)
local card7=Duel.CreateToken(p,74009824)
local card8=Duel.CreateToken(p,94977269)
ng:AddCard(card1)
ng:AddCard(card2)
ng:AddCard(card3)
ng:AddCard(card4)
ng:AddCard(card5)
ng:AddCard(card6)
ng:AddCard(card7)
ng:AddCard(card8)
Duel.SendtoDeck(ng,nil,0,REASON_RULE)
end
end
-- -- Shadoll Additional Picks
-- for p=0,1 do
-- if Duel.IsPlayerNeedToPickDeck(p) then
-- Duel.Hint(HINT_CARD,p,86938484)
-- local ng=Group.CreateGroup()
-- local card1=Duel.CreateToken(p,86938484)
-- local card2=Duel.CreateToken(p,86938484)
-- local card3=Duel.CreateToken(p,74822425)
-- local card4=Duel.CreateToken(p,19261966)
-- local card5=Duel.CreateToken(p,20366274)
-- local card6=Duel.CreateToken(p,48424886)
-- local card7=Duel.CreateToken(p,74009824)
-- local card8=Duel.CreateToken(p,94977269)
-- ng:AddCard(card1)
-- ng:AddCard(card2)
-- ng:AddCard(card3)
-- ng:AddCard(card4)
-- ng:AddCard(card5)
-- ng:AddCard(card6)
-- ng:AddCard(card7)
-- ng:AddCard(card8)
-- Duel.SendtoDeck(ng,nil,0,REASON_RULE)
-- end
-- end
Auxiliary.SaveDeck()
for p=0,1 do
......@@ -279,10 +279,13 @@ function Auxiliary.Load2PickRule()
--Skill DrawSense Specials
Auxiliary.Load_Skill_DrawSense_Rule()
--Shadoll Event
Auxiliary.Load_Shadow_Rule()
--EVENT Grandpa's Cards
Auxiliary.Load_EVENT_Grandpas_Cards()
end
--Skill_DrawSense_Rule
function Auxiliary.Load_Skill_DrawSense_Rule()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
......@@ -309,14 +312,14 @@ function Auxiliary.Skill_DrawSense_Operation(e,tp,eg,ep,ev,re,r,rp)
if dt~=0 then
_replace_count=0
_replace_max=dt
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_DRAW_COUNT)
e1:SetTargetRange(1,0)
e1:SetReset(RESET_PHASE+PHASE_DRAW)
e1:SetValue(0)
Duel.RegisterEffect(e1,tp)
-- local e1=Effect.CreateEffect(e:GetHandler())
-- e1:SetType(EFFECT_TYPE_FIELD)
-- e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-- e1:SetCode(EFFECT_DRAW_COUNT)
-- e1:SetTargetRange(1,0)
-- e1:SetReset(RESET_PHASE+PHASE_DRAW)
-- e1:SetValue(0)
-- Duel.RegisterEffect(e1,tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
local SenseType=(Duel.AnnounceType(tp))
......@@ -329,7 +332,7 @@ function Auxiliary.Skill_DrawSense_Operation(e,tp,eg,ep,ev,re,r,rp)
Duel.ShuffleDeck(tp)
Duel.MoveSequence(tc,0)
end
Duel.Draw(tp,1,REASON_RULE)
--Duel.Draw(tp,1,REASON_RULE)
elseif (SenseType==1 and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_DECK,0,1,nil,TYPE_SPELL)) then
g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_SPELL)
local SenseCard=g:RandomSelect(tp,1)
......@@ -338,7 +341,7 @@ function Auxiliary.Skill_DrawSense_Operation(e,tp,eg,ep,ev,re,r,rp)
Duel.ShuffleDeck(tp)
Duel.MoveSequence(tc,0)
end
Duel.Draw(tp,1,REASON_RULE)
--Duel.Draw(tp,1,REASON_RULE)
elseif (SenseType==2 and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_DECK,0,1,nil,TYPE_TRAP)) then
g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_TRAP)
local SenseCard=g:RandomSelect(tp,1)
......@@ -347,40 +350,98 @@ function Auxiliary.Skill_DrawSense_Operation(e,tp,eg,ep,ev,re,r,rp)
Duel.ShuffleDeck(tp)
Duel.MoveSequence(tc,0)
end
Duel.Draw(tp,1,REASON_RULE)
--Duel.Draw(tp,1,REASON_RULE)
else
Duel.ShuffleDeck(tp)
Duel.Draw(tp,1,REASON_RULE)
--Duel.Draw(tp,1,REASON_RULE)
end
end
end
function Auxiliary.Load_Shadow_Rule()
--EVENT Grandpa's Cards
function Auxiliary.Load_EVENT_Grandpas_Cards()
local e1=Effect.GlobalEffect()
e1:SetDescription(1166)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetRange(LOCATION_EXTRA)
e1:SetCondition(Auxiliary.LinkCondition(nil,2,2,nil))
e1:SetTarget(Auxiliary.LinkTarget(nil,2,2,nil))
e1:SetOperation(Auxiliary.LinkOperation(nil,2,2,nil))
e1:SetValue(SUMMON_TYPE_LINK)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_BATTLED)
e1:SetTarget(Auxiliary.EVENT_Grandpas_Cards_Target)
e1:SetOperation(Auxiliary.EVENT_Grandpas_Cards_Operation)
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e2:SetTargetRange(LOCATION_EXTRA,LOCATION_EXTRA)
e2:SetTarget(Auxiliary.IsConstruct)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,0)
return
end
function Auxiliary.IsConstruct(e,c)
return c:IsCode(86938484)
function Auxiliary.EVENT_Grandpas_Cards_Target(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end
local bc=c:GetBattleTarget()
return bc and bc:IsStatus(STATUS_BATTLE_DESTROYED) and not bc:IsType(TYPE_TOKEN) and bc:GetLeaveFieldDest()==0
end
function Auxiliary.EVENT_Grandpas_Cards_Operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
if Duel.SelectYesNo(c.GetOwner(c),94) then
if bc:IsRelateToBattle() then
local e1=Effect.CreateEffect(c)
e1:SetCode(EFFECT_SEND_REPLACE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetTarget(Auxiliary.EVENT_Grandpas_Cards_Return_Hand_Target)
e1:SetOperation(Auxiliary.EVENT_Grandpas_Cards_Return_Hand_Operation)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE)
bc:RegisterEffect(e1)
end
-- local code=e:GetHandler():GetCode()
Exodia_announce_filter={0x40,OPCODE_ISSETCARD,OPCODE_ISCODE,OPCODE_NOT,OPCODE_AND}
local ac=Duel.AnnounceCardFilter(c.GetOwner(c),table.unpack(Exodia_announce_filter))
local Yugi_Card=Duel.CreateToken(c.GetOwner(c),ac)
Duel.SendtoHand(Yugi_Card,c.GetOwner(c),0,REASON_RULE)
end
end
function Auxiliary.EVENT_Grandpas_Cards_Return_Hand_Target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:GetDestination()==LOCATION_GRAVE and c:IsReason(REASON_BATTLE) end
return true
end
function Auxiliary.EVENT_Grandpas_Cards_Return_Hand_Operation(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(e:GetHandler(),nil,2,REASON_RULE)
end
--Shadoll Event
-- function Auxiliary.Load_Shadow_Rule()
-- local e1=Effect.GlobalEffect()
-- e1:SetDescription(1166)
-- e1:SetType(EFFECT_TYPE_FIELD)
-- e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
-- e1:SetCode(EFFECT_SPSUMMON_PROC)
-- e1:SetRange(LOCATION_EXTRA)
-- e1:SetCondition(Auxiliary.LinkCondition(nil,2,2,nil))
-- e1:SetTarget(Auxiliary.LinkTarget(nil,2,2,nil))
-- e1:SetOperation(Auxiliary.LinkOperation(nil,2,2,nil))
-- e1:SetValue(SUMMON_TYPE_LINK)
-- local e2=Effect.GlobalEffect()
-- e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
-- e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-- e2:SetTargetRange(LOCATION_EXTRA,LOCATION_EXTRA)
-- e2:SetTarget(Auxiliary.IsConstruct)
-- e2:SetLabelObject(e1)
-- Duel.RegisterEffect(e2,0)
-- return
-- end
-- function Auxiliary.IsConstruct(e,c)
-- return c:IsCode(86938484)
-- end
--DestinyDraw Rule
-- function Auxiliary.Load_Skill_DestinyDraw_Rule()
-- local e1=Effect.GlobalEffect()
......
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