Commit 6ce8c52c authored by POLYMER's avatar POLYMER

fix

parent 3f354a23
This diff is collapsed.
--精灵胶囊 --精灵胶囊
local cm, m, o = GetID() local cm, m, o = GetID()
if not Duel.LoadScript and loadfile then if not Duel.LoadScript and loadfile then
function Duel.LoadScript(str) function Duel.LoadScript(str)
require_list = require_list or {} require_list = require_list or {}
str = "expansions/script/" .. str str = "expansions/script/" .. str
if not require_list[str] then if not require_list[str] then
if string.find(str, "%.") then if string.find(str, "%.") then
require_list[str] = loadfile(str) require_list[str] = loadfile(str)
else else
require_list[str] = loadfile(str .. ".lua") require_list[str] = loadfile(str .. ".lua")
end end
pcall(require_list[str]) pcall(require_list[str])
end end
return require_list[str] return require_list[str]
end end
end end
Duel.LoadScript("c16670000.lua") Duel.LoadScript("c16670000.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
local e1 = Effect.CreateEffect(c) local e1 = Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_EQUIP) e1:SetCategory(CATEGORY_EQUIP)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_HAND + LOCATION_SZONE) e1:SetRange(LOCATION_HAND + LOCATION_SZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET + EFFECT_FLAG_CONTINUOUS_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET + EFFECT_FLAG_CONTINUOUS_TARGET + EFFECT_FLAG_SET_AVAILABLE)
e1:SetCondition(function(e, tp, eg, ep, ev, re, r, rp) e1:SetCondition(function(e, tp, eg, ep, ev, re, r, rp)
return not Duel.IsExistingMatchingCard(nil, tp, LOCATION_MZONE, 0, 1, nil) or local c = e:GetHandler()
Duel.IsExistingMatchingCard(function(c) return (c:IsLocation(LOCATION_HAND) and
return c:IsType(TYPE_EQUIP) and c:IsFaceup() (not Duel.IsExistingMatchingCard(nil, tp, LOCATION_MZONE, 0, 1, nil) or
end, tp, LOCATION_SZONE, 0, 1, nil) Duel.IsExistingMatchingCard(function(c)
end) return c:IsType(TYPE_EQUIP) and c:IsFaceup()
e1:SetTarget(function(e, tp, eg, ep, ev, re, r, rp, chk, chkc) end, tp, LOCATION_SZONE, 0, 1, nil))) or
local c = e:GetHandler() (not c:IsLocation(LOCATION_HAND) and Duel.IsMainPhase() and Duel.IsTurnPlayer(tp))
local func = function(c) end)
return (c:IsLocation(LOCATION_MZONE) or e1:SetTarget(function(e, tp, eg, ep, ev, re, r, rp, chk, chkc)
c:IsLocation(LOCATION_SZONE)) and c:IsType(TYPE_SPELL + TYPE_TRAP) and c:IsFaceup() local c = e:GetHandler()
end local func = function(c)
if chkc then return (c:IsLocation(LOCATION_MZONE) or
return func(chkc) c:IsLocation(LOCATION_SZONE)) and c:IsType(TYPE_SPELL + TYPE_TRAP) and c:IsFaceup()
end end
if chk == 0 then if chkc then
return Duel.IsExistingTarget(func, tp, LOCATION_MZONE + LOCATION_SZONE, return func(chkc)
LOCATION_MZONE + LOCATION_SZONE, 1, nil) end
end if chk == 0 then
Duel.Hint(HINT_SELECTMSG, tp, HINTMSG_EQUIP) return Duel.IsExistingTarget(func, tp, LOCATION_MZONE + LOCATION_SZONE,
Duel.SelectTarget(tp, func, tp, LOCATION_MZONE + LOCATION_SZONE, LOCATION_MZONE + LOCATION_SZONE, 1, 1, c) --aux.ExceptThisCard(e) LOCATION_MZONE + LOCATION_SZONE, 1, nil)
Duel.SetOperationInfo(0, CATEGORY_EQUIP, e:GetHandler(), 1, 0, 0) end
end) Duel.Hint(HINT_SELECTMSG, tp, HINTMSG_EQUIP)
e1:SetOperation(function(e, tp, eg, ep, ev, re, r, rp) Duel.SelectTarget(tp, func, tp, LOCATION_MZONE + LOCATION_SZONE, LOCATION_MZONE + LOCATION_SZONE, 1, 1, c) --aux.ExceptThisCard(e)
local c = e:GetHandler() Duel.SetOperationInfo(0, CATEGORY_EQUIP, e:GetHandler(), 1, 0, 0)
local tc = Duel.GetFirstTarget() end)
if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then e1:SetOperation(function(e, tp, eg, ep, ev, re, r, rp)
it.CopyEquip(tp, c, tc) local c = e:GetHandler()
end local tc = Duel.GetFirstTarget()
end) if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
c:RegisterEffect(e1) it.CopyEquip(tp, c, tc)
it.EmulateSZONE(c, e1) end
end)
c:RegisterEffect(e1)
it.EmulateSZONE(c, e1)
local e29 = Effect.CreateEffect(c) local e29 = Effect.CreateEffect(c)
e29:SetType(EFFECT_TYPE_EQUIP) e29:SetType(EFFECT_TYPE_EQUIP)
e29:SetCode(EFFECT_DISABLE) e29:SetCode(EFFECT_DISABLE)
c:RegisterEffect(e29) c:RegisterEffect(e29)
local e2 = Effect.CreateEffect(c) local e2 = Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_EQUIP) e2:SetType(EFFECT_TYPE_EQUIP)
e2:SetCode(EFFECT_DISABLE_EFFECT) e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET) -- e2:SetValue(RESET_TURN_SET)
c:RegisterEffect(e2) c:RegisterEffect(e2)
-- local e4 = Effect.CreateEffect(c)
-- e4:SetDescription(aux.Stringid(m, 1))
-- e4:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS)
-- e4:SetCode(EVENT_DESTROYED)
-- e4:SetCondition(cm.setcon)
-- e4:SetOperation(cm.setop)
-- c:RegisterEffect(e4)
local e11 = Effect.CreateEffect(c) local e11 = Effect.CreateEffect(c)
e11:SetDescription(aux.Stringid(m, 0)) e11:SetDescription(aux.Stringid(m, 0))
e11:SetCategory(CATEGORY_SPECIAL_SUMMON) e11:SetCategory(CATEGORY_SPECIAL_SUMMON)
e11:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_F) e11:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_F)
e11:SetProperty(EFFECT_FLAG_DELAY) e11:SetProperty(EFFECT_FLAG_DELAY)
e11:SetRange(0xfff) e11:SetRange(0xfff)
e11:SetCode(EVENT_EQUIP) e11:SetCode(EVENT_EQUIP)
e11:SetTarget(cm.sptg) e11:SetTarget(cm.sptg)
e11:SetOperation(cm.spop) e11:SetOperation(cm.spop)
c:RegisterEffect(e11) c:RegisterEffect(e11)
end end
function cm.setcon(e, tp, eg, ep, ev, re, r, rp)
return e:GetHandler():IsReason(REASON_LOST_TARGET)
and not e:GetHandler():GetPreviousEquipTarget():IsLocation(LOCATION_ONFIELD + LOCATION_OVERLAY)
end
function cm.setop(e, tp, eg, ep, ev, re, r, rp)
local c = e:GetHandler()
-- 创立一个永续效果,下个回合的准备阶段将卡号为m的卡加入手卡
local e = Effect.CreateEffect(c)
e:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
e:SetCode(EVENT_PHASE + PHASE_STANDBY)
e:SetCountLimit(1)
e:SetCondition(function(e, tp, eg, ep, ev, re, r, rp)
return Duel.GetTurnCount() ~= e:GetLabel()
end)
e:SetOperation(function(e, tp, eg, ep, ev, re, r, rp)
local g = Duel.GetMatchingGroup(Card.IsCode, tp, LOCATION_GRAVE + LOCATION_REMOVED, 0, nil, m)
if #g > 0 then
local tc = g:GetFirst()
Duel.SendtoHand(tc, tp, REASON_EFFECT)
Duel.ConfirmCards(1 - tp, tc)
Duel.ShuffleHand(tp)
end
e:Reset()
end)
e:SetLabel(Duel.GetTurnCount())
e:SetReset(RESET_PHASE + PHASE_STANDBY)
Duel.RegisterEffect(e, tp)
end
function cm.filter(c, ec) function cm.filter(c, ec)
return c == ec --c:GetEquipTarget() == ec and c:IsType(TYPE_SPELL + TYPE_TRAP) return c == ec --c:GetEquipTarget() == ec and c:IsType(TYPE_SPELL + TYPE_TRAP)
end end
function cm.sptg(e, tp, eg, ep, ev, re, r, rp, chk) function cm.sptg(e, tp, eg, ep, ev, re, r, rp, chk)
local c = e:GetHandler() local c = e:GetHandler()
local dg = eg:Filter(cm.filter, nil, e:GetHandler()) local dg = eg:Filter(cm.filter, nil, e:GetHandler())
local kx, zzx, sxx, zzjc, sxjc, zzl = it.sxbl() local kx, zzx, sxx, zzjc, sxjc, zzl = it.sxbl()
local tc2 = c:GetPreviousEquipTarget() local tc2 = c:GetPreviousEquipTarget()
if chk == 0 then return #dg > 0 and zzx > 0 and tc2 ~= nil and Duel.GetLocationCount(1 - tp, LOCATION_MZONE) > 0 end if chk == 0 then return #dg > 0 and zzx > 0 and tc2 ~= nil and Duel.GetLocationCount(1 - tp, LOCATION_MZONE) > 0 end
local zz, sx, lv = it.sxblx(tp, kx, zzx, sxx, zzl) local zz, sx, lv = it.sxblx(tp, kx, zzx, sxx, zzl)
e:SetLabel(zz, sx, lv) e:SetLabel(zz, sx, lv)
Duel.SetOperationInfo(0, CATEGORY_SPECIAL_SUMMON, tc2, 1, 0, 0) Duel.SetOperationInfo(0, CATEGORY_SPECIAL_SUMMON, tc2, 1, 0, 0)
end end
function cm.spop(e, tp, eg, ep, ev, re, r, rp) function cm.spop(e, tp, eg, ep, ev, re, r, rp)
local c = e:GetHandler() local c = e:GetHandler()
local zz, sx, lv = e:GetLabel() local zz, sx, lv = e:GetLabel()
local tc = c:GetPreviousEquipTarget() local tc = c:GetPreviousEquipTarget()
if not Duel.IsPlayerCanSpecialSummonMonster(tp, tc:GetCode(), 0, TYPE_NORMAL + TYPE_MONSTER, 0, 0, lv, zz, sx) then return end if not Duel.IsPlayerCanSpecialSummonMonster(tp, tc:GetCode(), 0, TYPE_NORMAL + TYPE_MONSTER, 0, 0, lv, zz, sx) then return end
it.AddMonsterate(tc, TYPE_NORMAL + TYPE_MONSTER, sx, zz, lv, 0, 0) it.AddMonsterate(tc, TYPE_NORMAL + TYPE_MONSTER, sx, zz, lv, 0, 0)
Duel.SpecialSummonStep(tc, 0, tp, 1 - tp, true, false, POS_FACEUP_ATTACK) Duel.SpecialSummonStep(tc, 0, tp, 1 - tp, true, false, POS_FACEUP_ATTACK)
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
end end
\ No newline at end of file
--存在之间 --存在之间
--V1.0.0.1 --V1.0.1.2
local m = 16670000 local m = 16670000
it = it or {} it = it or {}
it.diyai = { "AI_Nf.ydk", "AI_TheDreamLand.ydk", "AI_best-friend.ydk", "AI_stars.ydk", "AI_Tianjuelong.ydk", it.diyai = { "AI_Nf.ydk", "AI_TheDreamLand.ydk", "AI_best-friend.ydk", "AI_stars.ydk", "AI_Tianjuelong.ydk",
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment