Some script fixes

- Assault Sonic Warrior: Deleted an unused function.
- Elemental HERO Plasma Vice: Should also check that the target is still controlled by the opponent on resolution.
- Grave Lure: Should be considered an effect that includes sending a card from the hand to the GY, not one that adds a card from the Deck to the hand. Also, if the card is drawn in the middle of a Chain Link it should be sent to the GY after the Chain Link finishes resolving.
- Neo Kaiser Glider: The first effect wasn't actually targeting due to the lack of the targeting flag property.
- Simorgh Repulsion: Prevent a script error when there's nothing to reveal on resolution. Also, the filter for a proper Winged Beast monster to reveal was missing on resolution.
- Sinful Spoils Struggle: Prevent a script error when it's destroyed by battle. Also, it wasn't looking for cards that can be returned to the Deck on resolution.

Author: pyrQ

official/c18711696.lua

@@ -54,9 +54,6 @@ function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 		and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
 end
-function s.thfilter(c)
-	return c:IsCode(CARD_POLYMERIZATION) and c:IsAbleToHand()
-end
 function s.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:IsRelateToEffect(e) then

official/c29265962.lua

@@ -3,7 +3,7 @@
 --scripted by Naim
 local s,id=GetID()
 function s.initial_effect(c)
-	--Equip 2 monsters with the same original name as a target to that target
+	--Target 1 face-up monster you control; equip 2 monsters with the same original name as that target from your hand, Deck, and/or GY to that target as Equip Spells, and if you do, it cannot attack or be destroyed by battle while equipped with those 2 cards. You cannot Special Summon for the rest of this turn after this card resolves, except monsters with the same original Type as the targeted monster
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_EQUIP)
@@ -57,8 +57,7 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp)
 		end
 		Duel.EquipComplete()
 		if equip_success then
-			local ec1,ec2=eqg:GetFirst(),eqg:GetNext()
-			--Cannot attack while equipped with those 2 cards
+			--It cannot attack or be destroyed by battle while equipped with those 2 cards
 			local e2=Effect.CreateEffect(c)
 			e2:SetDescription(aux.Stringid(id,1))
 			e2:SetType(EFFECT_TYPE_SINGLE)
@@ -67,22 +66,22 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp)
 			e2:SetCondition(function(e) return e:GetHandler():GetEquipGroup():IsExists(function(ec) return ec:GetFlagEffectLabel(id)==fid end,2,nil) end)
 			e2:SetReset(RESET_EVENT|RESETS_STANDARD)
 			tc:RegisterEffect(e2)
-			--Cannot be destroyed by battle while equipped with those 2 cards
 			local e3=e2:Clone()
 			e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
 			e3:SetValue(1)
 			tc:RegisterEffect(e3)
 		end
 	end
 	if not e:IsHasType(EFFECT_TYPE_ACTIVATE) then return end
-	--Cannot Special Summon for the rest of this turn after this card resolves, except monsters with the same original Type as the targeted monster
+	local orig_race=tc:GetOriginalRace()
+	--You cannot Special Summon for the rest of this turn after this card resolves, except monsters with the same original Type as the targeted monster
 	local e4=Effect.CreateEffect(c)
 	e4:SetDescription(aux.Stringid(id,2))
 	e4:SetType(EFFECT_TYPE_FIELD)
 	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
 	e4:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
 	e4:SetTargetRange(1,0)
-	e4:SetTarget(function(e,c) return not c:IsOriginalRace(tc:GetOriginalRace()) end)
+	e4:SetTarget(function(e,c) return not c:IsOriginalRace(orig_race) end)
 	e4:SetReset(RESET_PHASE|PHASE_END)
 	Duel.RegisterEffect(e4,tp)
 end

official/c45885288.lua

@@ -3,18 +3,19 @@
 --Scripted by AlphaKretin
 local s,id=GetID()
 function s.initial_effect(c)
-	--special summon
+	--You can discard this card and 1 monster, then target 1 Dragon Normal Monster in your GY; Special Summon it
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,id)
+	e1:SetCountLimit(1,{id,0})
 	e1:SetCost(s.spcost)
 	e1:SetTarget(s.sptg)
 	e1:SetOperation(s.spop)
 	c:RegisterEffect(e1)
-	--atk down
+	--If this card is sent to the GY: You can make all monsters your opponent currently controls lose 500 ATK until the end of this turn
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_ATKCHANGE)
@@ -26,17 +27,13 @@ function s.initial_effect(c)
 	e2:SetOperation(s.atkop)
 	c:RegisterEffect(e2)
 end
-function s.disfilter(c)
-	return c:IsMonster() and c:IsDiscardable()
-end
 function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
-	if chk==0 then return e:GetHandler():IsDiscardable()
-		and Duel.IsExistingMatchingCard(s.disfilter,tp,LOCATION_HAND,0,1,c) end
+	if chk==0 then return c:IsDiscardable()
+		and Duel.IsExistingMatchingCard(aux.AND(Card.IsMonster,Card.IsDiscardable),tp,LOCATION_HAND,0,1,c) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
-	local g=Duel.SelectMatchingCard(tp,s.disfilter,tp,LOCATION_HAND,0,1,1,c)
-	g:AddCard(c)
-	Duel.SendtoGrave(g,REASON_COST|REASON_DISCARD)
+	local g=Duel.SelectMatchingCard(tp,aux.AND(Card.IsMonster,Card.IsDiscardable),tp,LOCATION_HAND,0,1,1,c)
+	Duel.SendtoGrave(g+c,REASON_COST|REASON_DISCARD)
 end
 function s.spfilter(c,e,tp)
 	return c:IsRace(RACE_DRAGON) and c:IsType(TYPE_NORMAL) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
@@ -47,7 +44,7 @@ function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 		and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,0)
 end
 function s.spop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
@@ -59,10 +56,13 @@ function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
 end
 function s.atkop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
-	for tc in aux.Next(g) do
-		local e1=Effect.CreateEffect(e:GetHandler())
+	for tc in g:Iter() do
+		--All monsters your opponent currently controls lose 500 ATK until the end of this turn
+		local e1=Effect.CreateEffect(c)
 		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 		e1:SetCode(EFFECT_UPDATE_ATTACK)
 		e1:SetValue(-500)
 		e1:SetReset(RESETS_STANDARD_PHASE_END)

official/c57270476.lua

@@ -2,34 +2,49 @@
 --Grave Lure
 local s,id=GetID()
 function s.initial_effect(c)
-	Duel.EnableGlobalFlag(GLOBALFLAG_DECK_REVERSE_CHECK)
-	--Activate
+	--Turn the top card of your opponent's Deck face-up, then your opponent shuffles their Deck. When your opponent draws the face-up card, immediately send it to the Graveyard
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_TOGRAVE)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetTarget(s.target)
 	e1:SetOperation(s.activate)
+	e1:SetHintTiming(0,TIMING_STANDBY_PHASE|TIMING_MAIN_END|TIMINGS_CHECK_MONSTER_E)
 	c:RegisterEffect(e1)
 end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>0 end
+	Duel.SetPossibleOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
 end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.ConfirmDecktop(1-tp,1)
-	local g=Duel.GetDecktopGroup(1-tp,1)
-	if #g>0 then
-		local tc=g:GetFirst()
-		Duel.ShuffleDeck(1-tp)
-		tc:ReverseInDeck()
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-		e1:SetCode(EVENT_DRAW)
-		e1:SetOperation(s.tgop)
-		e1:SetReset(RESET_EVENT|(RESETS_STANDARD&~RESET_TOHAND))
-		tc:RegisterEffect(e1)
-	end
-end
-function s.tgop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
+	local opp=1-tp
+	local top_c=Duel.GetDecktopGroup(opp,1):GetFirst()
+	if not top_c then return end
+	Duel.ConfirmDecktop(opp,1)
+	top_c:ReverseInDeck()
+	Duel.ShuffleDeck(opp)
+	local c=e:GetHandler()
+	--If the opponent draws that card, it is sent to the GY
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_DRAW)
+	e1:SetOperation(
+		function()
+			if not Duel.IsChainSolving() then
+				Duel.Hint(HINT_CARD,0,id)
+				Duel.SendtoGrave(top_c,REASON_EFFECT,PLAYER_NONE,tp)
+			else
+				--If it's drawn while resolving a Chain, send it to the GY at the end of the Chain Link
+				local e2=Effect.CreateEffect(c)
+				e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+				e2:SetCode(EVENT_CHAIN_SOLVED)
+				e2:SetRange(LOCATION_HAND)
+				e2:SetOperation(function() Duel.Hint(HINT_CARD,0,id) Duel.SendtoGrave(top_c,REASON_EFFECT,PLAYER_NONE,tp) e2:Reset() end)
+				e2:SetReset(RESET_EVENT|(RESETS_STANDARD&~RESET_TOHAND)|RESET_CHAIN)
+				top_c:RegisterEffect(e2)
+			end
+		end)
+	e1:SetReset(RESET_EVENT|(RESETS_STANDARD&~RESET_TOHAND))
+	top_c:RegisterEffect(e1)
 end

official/c60493189.lua

@@ -1,52 +1,39 @@
---E・HERO プラズマヴァイスマン
+--Ｅ・ＨＥＲＯ プラズマヴァイスマン
 --Elemental HERO Plasma Vice
 local s,id=GetID()
 function s.initial_effect(c)
-	--fusion material
 	c:EnableReviveLimit()
+	--Fusion Materials: "Elemental HERO Sparkman" + "Elemental HERO Bladedge"
 	Fusion.AddProcMix(c,true,true,20721928,59793705)
-	--spsummon condition
+	c:AddMustBeFusionSummoned()
+	--If this card attacks a Defense Position monster, inflict piercing battle damage
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(aux.fuslimit)
+	e1:SetCode(EFFECT_PIERCE)
 	c:RegisterEffect(e1)
-	--pierce
+	--You can discard 1 card, then target 1 Attack Position monster your opponent controls; destroy that target
 	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetCode(EFFECT_PIERCE)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCost(Cost.Discard())
+	e2:SetTarget(s.destg)
+	e2:SetOperation(s.desop)
 	c:RegisterEffect(e2)
-	--destroy
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(id,0))
-	e3:SetCategory(CATEGORY_DESTROY)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetCost(s.descost)
-	e3:SetTarget(s.destg)
-	e3:SetOperation(s.desop)
-	c:RegisterEffect(e3)
 end
 s.material_setcode={SET_HERO,SET_ELEMENTAL_HERO}
-function s.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
-	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST|REASON_DISCARD)
-end
-function s.filter(c)
-	return c:IsAttackPos()
-end
 function s.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and s.filter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(s.filter,tp,0,LOCATION_MZONE,1,nil) end
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and chkc:IsAttackPos() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsAttackPos,tp,0,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectTarget(tp,s.filter,tp,0,LOCATION_MZONE,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+	local g=Duel.SelectTarget(tp,Card.IsAttackPos,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,tp,0)
 end
 function s.desop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
-	if tc and tc:IsAttackPos() and tc:IsRelateToEffect(e) then
+	if tc:IsRelateToEffect(e) and tc:IsAttackPos() and tc:IsControler(1-tp) then
 		Duel.Destroy(tc,REASON_EFFECT)
 	end
 end

official/c64002884.lua

@@ -3,59 +3,55 @@
 --scripted by Larry126
 local s,id=GetID()
 function s.initial_effect(c)
-	--Activate
+	--Discard 1 Winged Beast monster; return all cards in your opponent's Spell & Trap Zones to the hand
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetCountLimit(1,id,EFFECT_COUNT_CODE_OATH)
-	e1:SetCost(s.cost)
+	e1:SetCost(Cost.Discard(function(c) return c:IsRace(RACE_WINGEDBEAST) end))
 	e1:SetTarget(s.target)
 	e1:SetOperation(s.activate)
 	c:RegisterEffect(e1)
-	--Level down
+	--You can banish this card from your GY; reveal 1 Winged Beast monster in your hand, and if you do, reduce the Levels of monsters in your hand with that name by 1 for the rest of this turn (even after they are Summoned)
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,1))
+	e2:SetCategory(CATEGORY_LVCHANGE)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_GRAVE)
 	e2:SetCost(Cost.SelfBanish)
 	e2:SetTarget(s.lvtg)
 	e2:SetOperation(s.lvop)
 	c:RegisterEffect(e2)
 end
-function s.costfilter(c)
-	return c:IsRace(RACE_WINGEDBEAST) and c:IsMonster() and c:IsDiscardable()
-end
-function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
-	Duel.DiscardHand(tp,s.costfilter,1,1,REASON_COST|REASON_DISCARD,nil)
-end
-function s.filter(c)
-	return c:GetSequence()<5 and c:IsAbleToHand()
-end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,0,LOCATION_SZONE,1,e:GetHandler()) end
-	local sg=Duel.GetMatchingGroup(s.filter,tp,0,LOCATION_SZONE,e:GetHandler())
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,sg,#sg,0,0)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,0,LOCATION_STZONE,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,1-tp,LOCATION_STZONE)
 end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
-	local sg=Duel.GetMatchingGroup(s.filter,tp,0,LOCATION_SZONE,e:GetHandler())
-	Duel.SendtoHand(sg,nil,REASON_EFFECT)
+	local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,0,LOCATION_STZONE,nil)
+	if #g>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+	end
 end
 function s.lvfilter(c)
-	return c:IsRace(RACE_WINGEDBEAST) and c:IsMonster() and c:IsLevelAbove(2) and not c:IsPublic()
+	return c:IsRace(RACE_WINGEDBEAST) and c:IsLevelAbove(2) and not c:IsPublic()
 end
 function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(s.lvfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
-end
-function s.afilter(c,code)
-	return c:IsCode(code)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.lvfilter,tp,LOCATION_HAND,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_LVCHANGE,nil,1,tp,LOCATION_HAND)
 end
 function s.lvop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
-	local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_HAND,0,1,1,nil)
-	Duel.ConfirmCards(1-tp,g)
+	local sc=Duel.SelectMatchingCard(tp,s.lvfilter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
+	if not sc then return end
+	Duel.ConfirmCards(1-tp,sc)
 	Duel.ShuffleHand(tp)
-	local hg=Duel.GetMatchingGroup(s.afilter,tp,LOCATION_HAND,0,nil,g:GetFirst():GetCode()):ForEach(function(tc) tc:UpdateLevel(-1,RESET_EVENT|(RESETS_STANDARD_PHASE_END&~RESET_TOFIELD),e:GetHandler()) end)
+	local c=e:GetHandler()
+	local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,nil,sc:GetCode())
+	for hc in g:Iter() do
+		--Reduce the Levels of monsters in your hand with that name by 1 for the rest of this turn (even after they are Summoned)
+		hc:UpdateLevel(-1,RESET_EVENT|(RESETS_STANDARD_PHASE_END&~RESET_TOFIELD),c)
+	end
 end