游戏王残局简化版

c0.lua at [d3d985a9a1]
Login

c0.lua at [d3d985a9a1]

File script/c0.lua artifact 6afd3b635f part of check-in d3d985a9a1


str = {}
fun = {}

str["Debug.ReloadFieldBegin"] = Debug.ReloadFieldBegin

Debug.ReloadFieldBegin = function(str_1, str_2)
  str["不洗牌"] = str_1 & DUEL_PSEUDO_SHUFFLE
  str["无BP"] = str_1 & DUEL_ATTACK_FIRST_TURN

  if str_2 then
    if str_2 == 3 then
    str["规则"] = "大师3 "
    elseif str_2 == 4 then
      str["规则"] = "新大师 "
    elseif str_2 == 5 then
      str["规则"] = "大师2020 "
      end
  else
    str["规则"] = "大师2020 "
    end
  str["Debug.ReloadFieldBegin"](str_1, str_2)
  end

fun["通关邀请"] = function()
  local effect_1
  effect_1 = Effect.GlobalEffect()
  effect_1:SetType(EFFECT_TYPE_FIELD
    + EFFECT_TYPE_CONTINUOUS)
  effect_1:SetCode(EVENT_DAMAGE)
  function cache_1()
    cache_1 = Duel.GetLP(1)
    if cache_1 <= 0 then
      cache_1 = true
    else
      cache_1 = false
      end
    return cache_1
    end
  effect_1:SetCondition(cache_1)
  function cache_1()
    Debug.ShowHint("残局群181175613")
    return
    end
  effect_1:SetOperation(cache_1)

  Duel.RegisterEffect(effect_1
    , 0)
  end

fun["是否效果卡"] = function(card)

  cache_1 = Card.IsType(card, TYPE_SPELL)
  cache_2 = Card.IsType(card, TYPE_TRAP)
  cache_3 = Card.IsType(card, TYPE_EFFECT)

  if cache_1
  or cache_2
  or cache_3 then
    return true
    end
  cache_1 = Card.IsType(card, TYPE_PENDULUM)

  if cache_1 then
    cache_1 = Card.IsCode(card, 28363749)
    cache_2 = Card.IsCode(card, 19474136)
    cache_3 = Card.IsCode(card, 17390179)
    cache_4 = Card.IsCode(card, 83980492)
    if cache_1
    or cache_2
    or cache_3
    or cache_4 then
    else
      return true
      end
    end

  return false
  end

fun["开局说明"] = function()
  if str["开局说明吗"] == 1 then
    return
  else
    str["开局说明吗"] = 1
    end

  cache_1 = 0
  cache_1 = cache_1 + LOCATION_DECK
  cache_1 = cache_1 + LOCATION_HAND
  cache_1 = cache_1 + LOCATION_MZONE
  cache_1 = cache_1 + LOCATION_SZONE
  cache_1 = cache_1 + LOCATION_GRAVE
  cache_1 = cache_1 + LOCATION_REMOVED
  cache_1 = cache_1 + LOCATION_EXTRA

  str["这个残局的效果卡数量"] = Duel.GetMatchingGroupCount(fun["是否效果卡"],0,cache_1,cache_1,nil)

  cache_1 = Duel.GetOverlayGroup(0, LOCATION_MZONE, LOCATION_MZONE)

  for k in aux.Next(cache_1) do
    cache_1 = fun["是否效果卡"](k)
    if cache_1 then
      str["这个残局的效果卡数量"] = str["这个残局的效果卡数量"] + 1
      end
    end

  str["开局说明"] =""

  str["开局说明"] = str["开局说明"] .. str["这个残局的效果卡数量"]
  str["开局说明"] = str["开局说明"] .. "卡 "

  str["开局说明"] = str["开局说明"] .. str["规则"]

  if str["不洗牌"] == 0 then
  else
    str["开局说明"] = str["开局说明"] .. "伪洗牌 "
    end
  if str["无BP"] == 0 then
    str["开局说明"] = str["开局说明"] .. "无BP "
    end

  if str["开局添加手卡"] then
    str["开局说明"] = str["开局说明"] .. "选"
    str["开局说明"] = str["开局说明"] .. str["开局添加手卡"]
    str["开局说明"] = str["开局说明"] .. "卡 "
    end

  if str["禁格"] then
    str["开局说明"] = str["开局说明"] .. "禁"
    str["开局说明"] = str["开局说明"] .. str["禁格"]
    str["开局说明"] = str["开局说明"] .. "格 "
    end

  Debug.ShowHint(str["开局说明"])
  fun["通关邀请"]()
  end

fun["开局添加手卡"] = function(str_1)
  str["开局添加手卡"] = str_1
  effect_1 = Effect.GlobalEffect()
  effect_1:SetType(EFFECT_TYPE_FIELD
    + EFFECT_TYPE_CONTINUOUS)
  effect_1:SetCode(EVENT_ADJUST)
  effect_1:SetCountLimit(1)
  function cache_1()
    if str["已添加手卡"] == 1 then
      return false
    else
      str["已添加手卡"] = 1
      return true
      end

    end
  effect_1:SetCondition(cache_1)
  function cache_1(effect_event
    , player_who_activate_the_effect)

    str["玩家选定的卡"] = Duel.SelectMatchingCard(player_who_activate_the_effect
       , Card.IsAbleToHand
       , player_who_activate_the_effect
       , LOCATION_DECK
       , 0
       , str_1
       , str_1
       , nil)
    Duel.SendtoHand(str["玩家选定的卡"]
      , nil
      , REASON_RULE)
    end
  effect_1:SetOperation(cache_1)
  Duel.RegisterEffect(effect_1
    , 0)
  fun["开局说明"]()
  end

fun["禁格"] = function(str_1)
  str["禁格"] = str_1
  effect_1 = Effect.GlobalEffect()
  effect_1:SetType(EFFECT_TYPE_FIELD)
  effect_1:SetCode(EFFECT_USE_EXTRA_MZONE)
  effect_1:SetValue(str_1)
  Duel.RegisterEffect(effect_1,0)
  end

fun["印卡"] = function(str_1)
  str["印卡"] = 1

  local n = 0

  effect_1 = Effect.CreateEffect()
  effect_1:SetType(EFFECT_TYPE_SINGLE)
  effect_1:SetProperty(EFFECT_FLAG_BOTH_SIDE
    + EFFECT_FLAG_UNCOPYABLE
    + EFFECT_FLAG_CANNOT_NEGATE
    + EFFECT_FLAG_CANNOT_DISABLE)
  cache_1 = function()
    Duel.SetChainLimit(aux.FALSE)
    end
  effect_1:SetTarget(cache_1)
  effect_1:SetRange(LOCATION_EXTRA)
  function print_hand()
    announce_card = Duel.AnnounceCard()
    end

function print_hand(e,tp,eg,ep,ev,re,r,rp)
  local ac=Duel.AnnounceCard(tp)
  local c=Duel.CreateToken(tp,ac)
  if n<2 then
    Duel.SendtoHand(c,nil,REASON_RULE)
    Duel.ShuffleHand(tp)
    n=n+1
  else
    if n==10 then
      Debug.ShowHint("印卡过多,审判降临!")
      Duel.SetLP(0,0)
    else
      n=n+1
      Duel.Remove(c,POS_FACEUP,REASON_RULE)
      Duel.SendtoDeck(c,tp,0,REASON_RULE)
    end
  end
end

local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_BOTH_SIDE)
e1:SetRange(LOCATION_EXTRA)
e1:SetOperation(print_hand)
c:RegisterEffect(e1)
  end