mopempoe

expansions/script/c10700220.lua

@@ -58,7 +58,7 @@ function c10700220.lkop(e,tp,eg,ep,ev,re,r,rp)
 	Debug.Message("我的名字是……肚子饿得咕咕叫的佩可莉姆！")
 end
 function c10700220.dircon(e)
-	return e:GetHandler():GetMutualLinkedGroupCount()==0
+	return e:GetHandler():GetMutualLinkedGroupCount()>0
 end
 function c10700220.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)

expansions/script/c10700239.lua

@@ -56,7 +56,7 @@ function c10700239.initial_effect(c)
 	c:RegisterEffect(e6) 
 end
 function c10700239.eqlimit(e,c)
-	return c:IsSetCard(0x3a01)
+	return c:IsSetCard(0x7c1)
 end
 function c10700239.filter(c)
 	return c:IsFaceup() and c:IsSetCard(0x7c1)

expansions/script/c12048052.lua

@@ -9,8 +9,8 @@ function cm.initial_effect(c)
 	e1:SetCode(EFFECT_SPSUMMON_PROC)
 	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetCondition(cm.spcon1)
-	e1:SetOperation(cm.spop1)
+	e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.spop)
 	c:RegisterEffect(e1)
 	--equip
 	local e1=Effect.CreateEffect(c)

expansions/script/c14801766.lua

@@ -43,7 +43,7 @@ function cm.initial_effect(c)
     e5:SetCategory(CATEGORY_COUNTER)
     e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
     e5:SetCode(EVENT_PHASE+PHASE_STANDBY)
-    e5:SetRange(LOCATION_SZONE)
+    e5:SetRange(LOCATION_MZONE)
     e5:SetCountLimit(1)
     e5:SetCondition(cm.ctcon)
     e5:SetTarget(cm.cttg2)

expansions/script/c15000060.lua

@@ -171,9 +171,9 @@ function c15000060.scop(e,tp,eg,ep,ev,re,r,rp)
 				bc:ResetFlagEffect(15000061)
 				bc=ccg:GetNext()
 			end
+			if x1==10 and x2~=10 then x1=0 end
+			if x2==10 and x1~=10 then x2=0 end
 			if x1==10 and x2==10 then x2=0 end
-			if x1==10 and not x2==10 then x1=0 end
-			if x2==10 and not x1==10 then x2=0 end
 			local x=(x1*10)+x2
 			if x>=sc or eg:IsExists(c15000060.sc2filter,1,nil,tp) then
 				if x<95 then

expansions/script/c17061990.lua

@@ -24,7 +24,7 @@ function cm.initial_effect(c)
 	--atkup
 	local e3=Effect.CreateEffect(c)
 	e3:SetDescription(aux.Stringid(17061990,0))
-	e3:SetCategory(CATEGORY_ATKCHANGE)
+	e3:SetCategory(CATEGORY_DESTROY+CATEGORY_TOGRAVE)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
@@ -69,16 +69,7 @@ function cm.initial_effect(c)
 	local e8=e7:Clone()
 	e8:SetCode(EFFECT_UNRELEASABLE_NONSUM)
 	c:RegisterEffect(e8)
-	--scale change
-	local e10=Effect.CreateEffect(c)
-	e10:SetDescription(aux.Stringid(47558785,0))
-	e10:SetCategory(CATEGORY_DICE)
-	e10:SetType(EFFECT_TYPE_IGNITION)
-	e10:SetRange(LOCATION_EXTRA)
-	e10:SetCountLimit(1)
-	e10:SetTarget(cm.pentg)
-	e10:SetOperation(cm.penop)
-	c:RegisterEffect(e10)
+	
 end
 function cm.ovfilter(c)
 	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FAIRY) and c:IsType(TYPE_XYZ) and c:GetOverlayCount()==5
@@ -134,20 +125,11 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetCode(EFFECT_UPDATE_LSCALE)
 	e1:SetValue(-eg:GetCount())
-	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 	c:RegisterEffect(e1)
 	local e2=e1:Clone()
 	e2:SetCode(EFFECT_UPDATE_RSCALE)
 	c:RegisterEffect(e2)
 	Duel.SetLP(1-tp,Duel.GetLP(1-tp)-eg:GetCount()*1500)
 end
-function cm.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
-end
-function cm.penop(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) then
-		Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
-	end
-end
+

expansions/script/c26812004.lua

@@ -70,7 +70,7 @@ function cm.tsop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e1:SetCode(EFFECT_CANNOT_ACTIVATE)
 	e1:SetTargetRange(0,1)
-	e1:SetCondition(cm.actcon)\
+	e1:SetCondition(cm.actcon)
 	e1:SetValue(1)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)

expansions/script/c33400202.lua

@@ -8,8 +8,8 @@ function c33400202.initial_effect(c)
 	e1:SetCountLimit(1,33400202)
 	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetCondition(c33400202.condition)
-	e1:SetOperation(c33400202.activate1)
+	e1:SetTarget(c33400202.drtg)
+	e1:SetOperation(c33400202.drop)
 	c:RegisterEffect(e1)
 	--send to grave 
 	local e2=Effect.CreateEffect(c)
@@ -25,7 +25,11 @@ end
 function c33400202.efilter(e,re)
 	return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
 end
-function c33400202.activate1(e,tp,eg,ep,ev,re,r,rp)
+function c33400202.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
+		and Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>0 end
+end
+function c33400202.drop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
 	getmetatable(e:GetHandler()).announce_filter={TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT}
 	local ac=Duel.AnnounceCard(tp,table.unpack(getmetatable(e:GetHandler()).announce_filter))

expansions/script/c33400707.lua

@@ -52,15 +52,6 @@ function cm.initial_effect(c)
 	e3:SetTarget(cm.atktg)
 	e3:SetOperation(cm.atkop)
 	c:RegisterEffect(e3)
-  --destroy
-	local e4=Effect.CreateEffect(c)
-	e4:SetCategory(CATEGORY_DESTROY)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e4:SetCode(EVENT_BATTLE_START)
-	e4:SetCondition(cm.descon)
-	e4:SetOperation(cm.desop)
-	e4:SetReset(RESET_EVENT+RESETS_STANDARD)
-	c:RegisterEffect(e4)
 end
 function cm.tgfilter(c)
 	return c:IsSetCard(0x3342) and c:IsAbleToGrave()

expansions/script/c33500006.lua

@@ -73,26 +73,25 @@ end
 function cm.thop2(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
 	if Duel.IsPlayerCanDraw(tp,1) and Duel.Draw(tp,1,REASON_EFFECT)~=0 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
-			Duel.BreakEffect()
-			local res=0
-			if c:GetLevel()<=4 then
-				res=Duel.SelectOption(tp,aux.Stringid(m,3))
+		Duel.BreakEffect()
+		local res=0
+		if c:GetLevel()<=4 then
+			res=Duel.SelectOption(tp,aux.Stringid(m,3))
+		else
+			res=Duel.SelectOption(tp,aux.Stringid(m,3),aux.Stringid(m,4))
+		end
+		if res>0 then
+			local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_UPDATE_LEVEL)
+			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			if res==1 then
+				e1:SetValue(-4)
 			else
-				res=Duel.SelectOption(tp,aux.Stringid(m,3),aux.Stringid(m,4))
-			end
-			if res>0 then
-				local e1=Effect.CreateEffect(c)
-				e1:SetType(EFFECT_TYPE_SINGLE)
-				e1:SetCode(EFFECT_UPDATE_LEVEL)
-				e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-				if res==1 then
-					e1:SetValue(-4)
-				else
-					e1:SetValue(-2)
-				end
-				e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
-				c:RegisterEffect(e1)
+				e1:SetValue(-2)
 			end
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			c:RegisterEffect(e1)
 		end
 	end
 end

expansions/script/c40009205.lua

@@ -150,7 +150,7 @@ function c40009205.atkop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.RegisterEffect(e1,tp)
 end
 function c40009205.crfilter(c)
-	return c:IsFaceup() c:IsSetCard(0xf1c) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeckAsCost()
+	return c:IsFaceup() and c:IsSetCard(0xf1c) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeckAsCost()
 end
 function c40009205.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c40009205.crfilter,tp,LOCATION_REMOVED,0,2,nil) end

expansions/script/c40009207.lua

@@ -99,7 +99,6 @@ function c40009207.tdop(e,tp,eg,ep,ev,re,r,rp)
 		local sg=g:Select(tp,1,1,nil)
 		Duel.HintSelection(sg)
 		Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
-		end
 	end
 end
 function c40009207.retcon(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c82206075.lua

@@ -40,7 +40,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		local sg=Duel.SelectMatchingCard(tp,cm.setfilter,tp,LOCATION_DECK,0,1,1,nil)
 		local tc=sg:GetFirst()  
 		if tc then  
-			if Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then
+			if Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)~=0 then
 				local e1=Effect.CreateEffect(e:GetHandler())  
 				e1:SetType(EFFECT_TYPE_SINGLE)  
 				e1:SetCode(EFFECT_CANNOT_TRIGGER)  

expansions/script/c82228633.lua

@@ -65,6 +65,6 @@ function cm.postg(e,c)
 end  
 function cm.damval(e,re,dam,r,rp,rc)  
 	if bit.band(r,REASON_BATTLE)~=0 and Duel.GetAttacker()==e:GetHandler() and e:GetHandler():GetBattleTarget()~=nil and e:GetHandler():GetBattleTarget():IsPosition(POS_DEFENSE) then  
-		return dam*4 
+		return dam*3 
 	else return dam end  
 end 
\ No newline at end of file