Advertisement
Guest User

Untitled

a guest
Dec 16th, 2017
76
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.13 KB | None | 0 0
  1. --Overlay Network Surfer
  2. --Custom card by DoomZero
  3. function c21021817.initial_effect(c)
  4.     c:EnableReviveLimit()
  5.     --link summon
  6.     aux.AddLinkProcedure(c,nil,2,2)
  7.     --give an xyz monster a level equal to its rank
  8.     local e1=Effect.CreateEffect(c)
  9.     e1:SetType(EFFECT_TYPE_FIELD)
  10.     e1:SetRange(LOCATION_MZONE)
  11.     e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
  12.     --e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
  13.     --e1:SetCountLimit(1)       --testing
  14.     e1:SetTarget(c21021817.xyztg)
  15.     e1:SetOperation(c21021817.xyzop)
  16.     c:RegisterEffect(e1)
  17. end
  18. function c21021817.xyztg(e,c)
  19.     return e:GetHandler():GetLinkedGroup():IsContains(c) and c:IsType(TYPE_XYZ)
  20. end
  21. function c21021817.xyzop(e,tp,eg,ep,ev,re,r,rp)
  22.     if not e:GetHandler():IsRelateToEffect(e) then return end
  23.     local tc=Duel.GetFirstTarget()
  24.     if tc:IsRelateToEffect(e) and tc:IsFaceup() then
  25.         local e2=Effect.CreateEffect(e:GetHandler())
  26.         e2:SetType(EFFECT_TYPE_SINGLE)
  27.         e2:SetCode(EFFECT_RANK_LEVEL_S)
  28.         e2:SetValue(c21021817.xyzlv)
  29.         e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
  30.         tc:RegisterEffect(e2)
  31.     end
  32. end
  33. function c21021817.xyzlv(e,c,rc)
  34.     return c:GetRank()
  35. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement