Merge pull request #160 from nekrozar/patch-2

add Ultimate Gem God setcode

c12644061.lua

@@ -35,9 +35,8 @@ function c12644061.initial_effect(c)
 end
 function c12644061.discon(e,tp,eg,ep,ev,re,r,rp)
 	local a=Duel.GetAttacker()
-	local code=a:GetCode()
 	local at=Duel.GetAttackTarget()
-	return at and (code==79856792 or code==79407975)
+	return at and a:IsSetCard(0x2034)
 end
 function c12644061.disop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetAttackTarget()

c14469229.lua

@@ -24,7 +24,7 @@ function c14469229.initial_effect(c)
 end
 function c14469229.indfilter(c,tp)
 	return c:IsFaceup() and c:IsControler(tp) and c:IsOnField() and c:IsReason(REASON_EFFECT)
-		and (c:IsSetCard(0x1034) or (c:IsLocation(LOCATION_MZONE) and (c:IsCode(79407975) or c:IsCode(79856792))))
+		and (c:IsSetCard(0x1034) or (c:IsLocation(LOCATION_MZONE) and c:IsSetCard(0x2034)))
 end
 function c14469229.indtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return eg:IsExists(c14469229.indfilter,1,nil,tp) end

c63806265.lua

@@ -20,8 +20,7 @@ function c63806265.condition(e,tp,eg,ep,ev,re,r,rp)
 	return ct>6
 end
 function c63806265.filter(c,e,tp)
-	local code=c:GetCode()
-	return (code==79856792 or code==79407975) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
+	return c:IsSetCard(0x2034) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
 end
 function c63806265.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0

c7617253.lua

@@ -31,8 +31,7 @@ function c7617253.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	Duel.SetTargetCard(tg)
 end
 function c7617253.filter(c)
-	local code=c:GetCode()
-	return (code==79856792 or code==79407975) and c:IsAbleToHand()
+	return c:IsSetCard(0x2034) and c:IsAbleToHand()
 end
 function c7617253.activate(e,tp,eg,ep,ev,re,r,rp)
 	local tg=Duel.GetAttacker()

c86346643.lua

@@ -2,13 +2,13 @@
 function c86346643.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
-	aux.AddFusionProcCodeFun(c,89943723,c86346643.fusfilter,1,false,false)
+	aux.AddFusionProcCodeFun(c,89943723,aux.FilterBoolFunction(Card.IsSetCard,0x2034),1,false,false)
 	--spsummon condition
 	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(c86346643.splimit)
+	e1:SetValue(aux.fuslimit)
 	c:RegisterEffect(e1)
 	--to deck
 	local e2=Effect.CreateEffect(c)
@@ -42,13 +42,6 @@ function c86346643.initial_effect(c)
 	e4:SetOperation(c86346643.tdop3)
 	c:RegisterEffect(e4)
 end
-function c86346643.splimit(e,se,sp,st)
-	return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
-end
-function c86346643.fusfilter(c)
-	local code=c:GetCode()
-	return code==79856792 or code==79407975
-end
 function c86346643.cfilter1(c)
 	return c:IsAbleToGraveAsCost()
 end