Ygopro card manager

Aster Phoenix 94

Posted on 4/11/2015, 01:54

.

Advanced Member

Group: Member

Posts: 1,305

Duel Points: 0

Status: Offline

Raga! Prima di andare a dormire, ho provato a creare un effetto, ovvero formato 2 effetti (lo special effect di photon thrusher + il power up di CB tigre topazio) e ci sono riuscito!! :clap:

Ora vorrei chiedervi come si creano Archetipi (su YGOpro CardManager) thanks

.

Aster Phoenix 94

Posted on 4/11/2015, 15:21

.

Advanced Member

Group: Member

Posts: 1,305

Duel Points: 0

Status: Offline

fuck...sulla scia dell'entusiasmo ho provato fare una cosa simile (il send dal deck + quando viene distrutto in battaglia + scegli quale effetto attivare + i 2 effetti, cioè pescare 1 o infliggere) ma niente

.

edo9300

Posted on 4/11/2015, 15:37

.

Traduttore, scripter e developer di ygopro

Group: Vecchie Glorie

Posts: 1,131

Duel Points: +105

Location: Casa mia

Status: Offline

Fammi vedere lo script ti dico dove è sbagliato

.

Aster Phoenix 94

Posted on 4/11/2015, 16:10

.

Advanced Member

Group: Member

Posts: 1,305

Duel Points: 0

Status: Offline

Uno schifo di codice sarà uscito

SPOILER (clicca per visualizzare)

CODICE

function c114000001.initial_effect(c)
--send to grave
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(114000001,0))
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetTarget(c114000001.target)
e1:SetOperation(c114000001.operation)
c:RegisterEffect(e1)

local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_ACTIVATE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EVENT_BATTLE_DESTROYED)
e2:SetCondition(c114000001.drcon)
e2:SetTarget(c114000001.target)
e2:SetOperation(c114000001.operation)
c:RegisterEffect(e2)

--draw
-- local e2=Effect.CreateEffect(c)
-- e2:SetDescription(aux.Stringid(114000001,1))
-- e2:SetCategory(CATEGORY_DRAW)
-- e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-- e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
--- e2:SetCode()

-- e2:SetTarget(c114000001.drtg)
-- e2:SetOperation(c114000001.drop)
-- c:RegisterEffect(e2)
end
function c114000001.tgfilter(c)
return c:IsLevelBelow(4) and c:IsAbleToGrave()
end
function c114000001.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c114000001.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c114000001.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c114000001.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT)
end

function c114000001.drcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE)
end
function c114000001.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT)
local op=Duel.SelectOption(tp,aux.Stringid(114000001,1),aux.Stringid(114000001,2))
e:SetLabel(op)
if op==1 then
e:SetCategory(CATEGORY_RECOVER)
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1200)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1200)
else
e:SetCategory(CATEGORY_DAMAGE)
Duel.SetTargetPlayer(1-tp)
Duel.SetTargetParam(800)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800)
end
end
function c114000001.operation(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
if e:GetLabel()==0 then
Duel.Recover(p,d,REASON_EFFECT)
else Duel.Damage(p,d,REASON_EFFECT) end
end

CITAZIONE (Aster Phoenix 94 @ 4/11/2015, 16:09)

Uno schifo di codice sarà uscito
*Per ora, invece di scegliere tra pescare ed infliggere, ho messo o RECOVERY o DAMAGE

SPOILER (clicca per visualizzare)

CODICE

function c114000001.initial_effect(c)
--send to grave
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(114000001,0))
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetTarget(c114000001.target)
e1:SetOperation(c114000001.operation)
c:RegisterEffect(e1)

local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_ACTIVATE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EVENT_BATTLE_DESTROYED)
e2:SetCondition(c114000001.drcon)
e2:SetTarget(c114000001.target)
e2:SetOperation(c114000001.operation)
c:RegisterEffect(e2)

--draw
-- local e2=Effect.CreateEffect(c)
-- e2:SetDescription(aux.Stringid(114000001,1))
-- e2:SetCategory(CATEGORY_DRAW)
-- e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-- e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
--- e2:SetCode()

-- e2:SetTarget(c114000001.drtg)
-- e2:SetOperation(c114000001.drop)
-- c:RegisterEffect(e2)
end
function c114000001.tgfilter(c)
return c:IsLevelBelow(4) and c:IsAbleToGrave()
end
function c114000001.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c114000001.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c114000001.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c114000001.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT)
end

function c114000001.drcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE)
end
function c114000001.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT)
local op=Duel.SelectOption(tp,aux.Stringid(114000001,1),aux.Stringid(114000001,2))
e:SetLabel(op)
if op==1 then
e:SetCategory(CATEGORY_RECOVER)
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1200)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1200)
else
e:SetCategory(CATEGORY_DAMAGE)
Duel.SetTargetPlayer(1-tp)
Duel.SetTargetParam(800)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800)
end
end
function c114000001.operation(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
if e:GetLabel()==0 then
Duel.Recover(p,d,REASON_EFFECT)
else Duel.Damage(p,d,REASON_EFFECT) end
end

.

Matteo Meli

Posted on 14/4/2020, 03:40

.

User deleted

Ciao ragazzi non so se vi verra notificato questo mio messaggio ma spero di si perche vorrei appunto comunicare con edo9300...vorrei in primis ringraziarti per lo script del grande leviathan ( anche se lo hai postato credo 5 anni fa ahahahaha ) funziona davvero da paura...ma ti contatto per altro...lo script di zorc necrophades...un utente lo ha creato e tu sotto hai commentato cosa faceva...be e ancora piu devastante ahahaha nel senso che tu dici in pratica che sacrificando due mostri oscurita puoi scegliere se distruggere una carta nel suo campo o nella sua mano...be sai cosa succede invece? Gli distruggi tutta la mano e tutto il campo ahahaha va be dettagli la mia richiesta e un altra pero...lui guadagna i 1000 punti d attacco per ogni mostro oscurita nel cimitero...pero servono a ben poco per il semplice motivo che quando attacca lui distrugge il mostro e infligge all avversario danno uguale all attacco del mostro distrutto...infatti se attacchi direttamente non toglie nulla nonostante abbia un notevole attacco...son certo che basterebbe andare nello script ed eliminare appunto quel genere di attacco per far si di utilizzare l attacco della carta stessa ma il punto e che non so che toccare...mi son fatto un idea ma non metto mani col rischio di rovinare tutto dato che e lo script piu lungo visto finora ahahaha pesa la bellezza di 7.41 kb ahahaha una cosa che ho notato e che l attacco che aumenta appunto per la presenza dei mostri nel cimitero dovrebbe diventare giallo e invece resta bianco e presumo succeda per via appunto dello script che lo rende inutilizzabile...ah poi dici anche che la carta nega tutti gli effetti dei mostri che il tuo avversario controlla...lo fa eccome...e lo fa talmente bene che blocca anche quello dei propri ahahaha pero presumo sia un prezzo piu che ragionevole da pagare anche perche e concepito per usare lui e chiudere il match...ti diro sono piu che soddisfatto di sto script perche e praticamente invincivile ahahaha pero se mi riesci ad aiutare nella mia richiesta oltre a ringraziarti faro si di usare sia il tuo nuovo script ( che presumo dovresti modificare qualcosa anche perche non voglio rubarti tempo ) e sia quello originale perche tanto ho creato 10 zorc ahahahahahahaha ciao edo

.

Ygopro card manager

Qualcuno sa come si usa