Skip to content

Y
ygopro-scripts
Commit 75a987fa authored by nekrozar's avatar nekrozar Committed by DailyShana
Browse files
Options

fix Dark Sanctuary (#481)

parent 16ce4895
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
c16625614.lua
View file @ 75a987fa
...@@ -47,13 +47,13 @@ end ...@@ -47,13 +47,13 @@ end
function c16625614.dbop(e,tp,eg,ep,ev,re,r,rp) function c16625614.dbop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
local ids={31893528,67287533,94772232,30170981} local ids={31893528,67287533,94772232,30170981}
local id=ids[c:GetFlagEffect(94212438)+1] local id=ids[c:GetFlagEffect(94212438)+1]
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(94212438,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(94212438,1))
local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,id) local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,id)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc and Duel.IsPlayerCanSpecialSummonMonster(tp,id,0,0x11,0,0,1,RACE_FIEND,ATTRIBUTE_DARK,POS_FACEUP,tp,181) if tc and Duel.IsPlayerCanSpecialSummonMonster(tp,id,0,0x11,0,0,1,RACE_FIEND,ATTRIBUTE_DARK,POS_FACEUP,tp,181)
and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.SelectYesNo(tp,aux.Stringid(16625614,0)) then and Duel.SelectYesNo(tp,aux.Stringid(16625614,0)) then
tc:AddMonsterAttribute(TYPE_NORMAL,ATTRIBUTE_DARK,RACE_FIEND,1,0,0) tc:AddMonsterAttribute(TYPE_NORMAL,ATTRIBUTE_DARK,RACE_FIEND,1,0,0)
Duel.SpecialSummonStep(tc,181,tp,tp,true,false,POS_FACEUP) Duel.SpecialSummonStep(tc,181,tp,tp,true,false,POS_FACEUP)
...@@ -75,7 +75,7 @@ function c16625614.dbop(e,tp,eg,ep,ev,re,r,rp) ...@@ -75,7 +75,7 @@ function c16625614.dbop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e8) tc:RegisterEffect(e8)
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
c:RegisterFlagEffect(94212438,RESET_EVENT+0x1fe0000,0,0) c:RegisterFlagEffect(94212438,RESET_EVENT+0x1fe0000,0,0)
elseif tc then elseif tc and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
c:RegisterFlagEffect(94212438,RESET_EVENT+0x1fe0000,0,0) c:RegisterFlagEffect(94212438,RESET_EVENT+0x1fe0000,0,0)
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