Because the old trial and error method doesn't bring me further anymore I want to ask for help ^^'

I want to make a normal spell card which can speciel summon monster from a certain archetype, when these cards are either in your graveyard or banished, after you paid 1000 lifepoints.  (It just worked if I only mentioned 1 location -___-)

The next card I want to make is also a normal spellcard which allows you to pay a multiple amount of 1000 lifepoints to draw 1 card after each 1000 life you paid.

Hope somebody can help me, because I'm still a noob at scripting XD

can you post what you have done so far

Well, whilst I'd say that you could base the script on Return from the Different Dimension by editing the cost, limiting it to only you and then adding the filter to it... 

Sadly enough, I have no idea about the last ._.

function c23557835.initial_effect(c)
--activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c23557835.cost)
e1:SetTarget(c23557835.tg)
e1:SetOperation(c23557835.op)
c:RegisterEffect(e1)
end
function c23557835.filter(c,e,tp)
return c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c23557835.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c23557835.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return
(Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c23557835.filter,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,1,nil,e,tp)) or
(Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c23557835.filter,tp,0,LOCATION_REMOVED+LOCATION_GRAVE,1,nil,e,1-tp))
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,2,LOCATION_REMOVED+LOCATION_GRAVE)
end
function c23557835.op(e,tp,eg,ep,ev,re,r,rp)
local count=0
local ft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft1>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c23557835.filter,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,ft1,ft1,nil,e,tp)
if g:GetCount()>0 then
local tc=g:GetFirst()
while tc do
Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
tc=g:GetNext()
count=count+1
end
end
end
if count>0 then Duel.SpecialSummonComplete() end
end

Like I said, I don't know how archetypes work, so yeah... sorry^^°

I used D.D.R Different Dimension Reincarnation and Monster Reborn as a base.

This is my latest try but it can only summon my monster from the grave:

function c900000003.initial_effect(c)
--Activate to speciel from grave
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c900000003.cost)
e1:SetTarget(c900000003.target)
e1:SetOperation(c900000003.activate)
c:RegisterEffect(e1)
end
function c900000003.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c900000003.filter(c,e,tp)
return c:IsSetCard(0x3E8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c900000003.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c900000003.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c900000003.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c900000003.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function c900000003.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
end
end


I used "c:IsSetCard(0x3E8)" (3E8 is the setcode of my archetype in the hexadecimal system and stands for "1000" in our common decimal system) to declare the archetype that can summoned with this card, which work, but I cannot speciel summon banished card like I said :/

Thanks for the script VB99, but with that I can speciel summon from grave + banished cards at once
instead of speciel summon 1 monster either from my grave or if its banished


For the second card I could use Darkness of greed (pay 1000 lifepoints to draw one card) as a base, but I don't know how to make it that if you pay 5000 lifepoints, you will get 5 cards or 4000 life for 4 cards etc.  ^^°

You could try to add a +LOCATION_REMOVED after every LOCATION_GRAVE. This should let you choose I believe...

Thanks, but with that addition I can't activate this card ^^'

local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(cXXXXXXXX.cost)
e1:SetTarget(c55144522.target)
e1:SetOperation(c55144522.activate)
c:RegisterEffect(e1)
end
function c17078030.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
local lp=Duel.GetLP(tp)
local t={}
local f=math.floor((lp-1)/1000)
local l=1
while l<=f and l<=20 do
t[l]=l*1000
l=l+1
end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(17078030,0))
local announce=Duel.AnnounceNumber(tp,table.unpack(t))
Duel.PayLPCost(tp,announce)
e:GetLabelObject():SetLabel(announce)
e:GetHandler():SetHint(CHINT_NUMBER,announce)
end
function c55144522.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,GetLabel()/1000) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(GetLabel()/1000)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,GetLabel()/1000)
end
function c55144522.activate(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end

This is a script I thought up, so I can't really promise anything^^°°°

Thank you, paying life points work great, but I don't get the cards ^^

Ups, yeah, sry, my mistake, that would mean that you can choose a monster that is Banished and in your Graveyard at the same time...

Ok, let me think about it...

Hmm... maybe something like:

function c900000003.initial_effect(c)
--Activate to speciel from grave
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c900000003.cost)
e1:SetTarget(c900000003.target)
e1:SetOperation(c900000003.activate)
c:RegisterEffect(e1)
end
function c900000003.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c900000003.filter(c,e,tp)
return c:IsSetCard(0x3E8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c900000003.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c900000003.filter(chkc,e,tp) or chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c900000003.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c900000003.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) or Duel.IsExistingTarget(c900000003.filter,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c900000003.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) or g=Duel.SelectTarget(tp,c900000003.filter,tp,LOCATION_REMOVED,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function c900000003.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
end
end


You could try this, but I can't say if it really works or anything ._.

I removed the e: from my pprevious card, maybe that was the problem

could you please tell me in which line?? XD

Just copy this:

local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(cXXXXXXXX.cost)
e1:SetTarget(cXXXXXXXX.target)
e1:SetOperation(cXXXXXXXX.activate)
c:RegisterEffect(e1)
end
function cXXXXXXXX.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
local lp=Duel.GetLP(tp)
local t={}
local f=math.floor((lp-1)/1000)
local l=1
while l<=f and l<=20 do
t[l]=l*1000
l=l+1
end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(XXXXXXXX,0))
local announce=Duel.AnnounceNumber(tp,table.unpack(t))
Duel.PayLPCost(tp,announce)
e:GetLabelObject():SetLabel(announce)
e:GetHandler():SetHint(CHINT_NUMBER,announce)
end
function cXXXXXXXX.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,GetLabel()/1000) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(GetLabel()/1000)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,GetLabel()/1000)
end
function cXXXXXXXX.activate(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end

Ok, now I get an error because in line 31 the get lable is a nil value
"attemt to call global "Getlable" (a nil value)" or similar to that is what is said^^

By the way, sorry for getting still on you nerves because of that^^'

No problem, I actually need to thank you, because I can learn from the mistakes I make^^

local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(cXXXXXXXX.cost)
e1:SetTarget(cXXXXXXXX.target)
e1:SetOperation(cXXXXXXXX.activate)
c:RegisterEffect(e1)
end
function cXXXXXXXX.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
local lp=Duel.GetLP(tp)
local t={}
local f=math.floor((lp-1)/1000)
local l=1
while l<=f and l<=20 do
t[l]=l*1000
l=l+1
end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(XXXXXXXX,0))
local announce=Duel.AnnounceNumber(tp,table.unpack(t))
Duel.PayLPCost(tp,announce)
e:GetLabelObject():SetLabel(announce)
e:GetHandler():SetHint(CHINT_NUMBER,announce)
end
function cXXXXXXXX.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,e:GetLabel()/1000) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(e:GetLabel()/1000)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,e:GetLabel()/1000)
end
function cXXXXXXXX.activate(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end

Ok I'm relieved because of that ^^'

Now there is no error function, but I can't activate the card ^^°

ok, maybe I do something wrong with putting the ID:

local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c900000002.cost)
e1:SetTarget(c900000002.target)
e1:SetOperation(c900000002.activate)
c:RegisterEffect(e1)
end
function c900000002.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
local lp=Duel.GetLP(tp)
local t={}
local f=math.floor((lp-1)/1000)
local l=1
while l<=f and l<=20 do
t[l]=l*1000
l=l+1
end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(900000002,0))
local announce=Duel.AnnounceNumber(tp,table.unpack(t))
Duel.PayLPCost(tp,announce)
e:GetLabelObject():SetLabel(announce)
e:GetHandler():SetHint(CHINT_NUMBER,announce)
end
function c900000002.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,e:GetLabel()) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(e:GetLabel())
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,e:GetLabel())
end
function c900000002.activate(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end

Did I put all IDs on the right place??

no wait, if I do so, then there would be an initial error -__-

I just cant activate the card

sorry, now I have to go offline because I have training;
I will look in later sorry ^^'

ok, I'm confused ._.

Did you remember to put the function c900000002.initial_effect(c) first?

AoO wrote:

Ok I'm relieved because of that ^^'

Now there is no error function, but I can't activate the card ^^°

lol I hate silent errors like that.

Sorry for my stupidity -_________________________________________-
And I'm also sorry to say that it is now said in line 26:
"26: attempt to index a nil value"

At least one good thing I can say: I tried to attach +LOCATION_REMOVED
a 2nd time to the other card and now is working thanks to you ^^

PS: From now on I will hate them too, StormWing (the silent errors) XD

Likely means something is sending out an unreported warning instead of an error but both can go unreported by the system without a properly placed Try/Catch or being at a warning level low enough to not say anything about.

There is also something like that?? ^^'
Could you please tell me, when you have this low level warning??
Or is it this if you forgot to put "function cXXXXXXXXX.initial_effect(c)" ??

I only know that you can't activate cards if the line is missing ._.