fix

expansions/script/c23100078.lua

@@ -43,13 +43,13 @@ function c23100078.tkcost(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function c23100078.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsPlayerCanSpecialSummonMonster(tp,24400046,0,TYPES_TOKEN_MONSTER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,24400046,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
 	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end
 function c23100078.tkop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
-		or not Duel.IsPlayerCanSpecialSummonMonster(tp,23100106,0,TYPES_TOKEN_MONSTER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) then return end
+		or not Duel.IsPlayerCanSpecialSummonMonster(tp,23100106,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) then return end
 	local token=Duel.CreateToken(tp,23100106)
 	Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
 end

expansions/script/c23100081.lua

@@ -42,13 +42,13 @@ function c23100081.atkval(e)
 end
 function c23100081.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsPlayerCanSpecialSummonMonster(tp,23100106,0,TYPES_TOKEN_MONSTER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,23100106,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
 	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end
 function c23100081.tkop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
-		or not Duel.IsPlayerCanSpecialSummonMonster(tp,23100106,0,TYPES_TOKEN_MONSTER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) then return end
+		or not Duel.IsPlayerCanSpecialSummonMonster(tp,23100106,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,0,1000,1,RACE_MACHINE,ATTRIBUTE_EARTH) then return end
 	local token=Duel.CreateToken(tp,23100106)
 	Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
 end

expansions/script/c61200206.lua

@@ -167,6 +167,6 @@ function s.op5(e,tp,eg,ep,ev,re,r,rp)
     if g:GetCount()>0 then
         Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
         local sg=g:Select(tp,1,1,nil)
-        sg:SendtoDeck(tp,2,REASON_EFFECT)
+        Duel.SendtoDeck(sg,tp,2,REASON_EFFECT)
     end
 end
\ No newline at end of file

expansions/script/c61200502.lua

@@ -111,7 +111,7 @@ function s.op3(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
 	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
 	if tg:GetCount()>0 then
-		if tg:GetClassCount(s.f4)==3 then
+		if tg:GetClassCount(s.f4)==1 and tg:GetClassCount(Card.GetCode)==3 then
             local g1=Duel.GetMatchingGroup(s.f5,tp,LOCATION_DECK,0,nil)
             local sg1=g1:RandomSelect(tp,1)
             Duel.SendtoHand(sg1,tp,REASON_EFFECT)