Commit 4c4fe6f1 authored by nekrozar's avatar nekrozar

use Duel.AnnounceType and Duel.AnnounceCoin

parent 7dda468f
......@@ -55,7 +55,8 @@ function c15317640.rcttg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
end
function c15317640.rctop(e,tp,eg,ep,ev,re,r,rp)
local coin=Duel.SelectOption(tp,60,61)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin==res then
e:GetHandler():RemoveCounter(tp,0x1f,1,REASON_EFFECT)
......
......@@ -16,8 +16,8 @@ function c26495087.tgcon(e,tp,eg,ep,ev,re,r,rp)
end
function c26495087.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPTION)
local op=Duel.SelectOption(tp,70,71,72)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
local op=Duel.AnnounceType(tp)
e:SetLabel(op)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,1-tp,LOCATION_DECK)
end
......
......@@ -19,12 +19,13 @@ function c37313786.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
end
function c37313786.activate(e,tp,eg,ep,ev,re,r,rp)
local coin=Duel.SelectOption(tp,60,61)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin~=res then
local gc=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
Duel.Draw(tp,5-gc,REASON_EFFECT)
else
else
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
......
......@@ -50,7 +50,7 @@ function c4483989.atkop(e,tp,eg,ep,ev,re,r,rp)
local at=Duel.GetAttackTarget()
if a:IsFaceup() and a:IsRelateToEffect(e) and at:IsFaceup() and at:IsRelateToEffect(e) then
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_COIN)
local coin=Duel.SelectOption(1-tp,60,61)
local coin=Duel.AnnounceCoin(1-tp)
local res=Duel.TossCoin(1-tp,1)
if coin~=res then
Duel.ChangePosition(at,POS_FACEUP_ATTACK)
......
......@@ -22,7 +22,7 @@ function c5990062.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst()
if not tc then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
local res=Duel.SelectOption(tp,70,71,72)
local res=Duel.AnnounceType(tp)
Duel.ConfirmDecktop(tp,1)
if (res==0 and tc:IsType(TYPE_MONSTER))
or (res==1 and tc:IsType(TYPE_SPELL))
......
......@@ -25,7 +25,7 @@ function c64538655.desop(e,tp,eg,ep,ev,re,r,rp)
if c==tc then tc=Duel.GetAttacker() end
if not tc:IsRelateToBattle() then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.SelectOption(tp,60,61)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin~=res then
Duel.Destroy(tc,REASON_EFFECT)
......
--女神ヴェルダンディの導き
--Goddess Verdande's Guidance
function c64961254.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -42,7 +42,7 @@ end
function c64961254.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeck(1-tp,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
Duel.SetTargetParam(Duel.SelectOption(tp,70,71,72))
Duel.SetTargetParam(Duel.AnnounceType(tp))
end
function c64961254.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFieldGroupCount(1-tp,0,LOCATION_DECK)<=0
......
......@@ -19,7 +19,8 @@ end
function c67959180.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
local opt=Duel.SelectOption(tp,60,61)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local opt=Duel.AnnounceCoin(tp)
local coin=Duel.TossCoin(tp,1)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......
......@@ -21,8 +21,8 @@ function c71625222.destg(e,tp,eg,ep,ev,re,r,rp,chk)
end
end
function c71625222.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(71625222,1))
local coin=Duel.SelectOption(tp,60,61)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin~=res then
local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
......
......@@ -16,7 +16,8 @@ function c81172176.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
end
function c81172176.activate(e,tp,eg,ep,ev,re,r,rp)
local coin=Duel.SelectOption(tp,60,61)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin~=res then Duel.Remove(Duel.GetFieldGroup(tp,0,LOCATION_GRAVE),POS_FACEUP,REASON_EFFECT)
else Duel.DiscardDeck(tp,Duel.GetFieldGroupCount(tp,0,LOCATION_GRAVE),REASON_EFFECT) end
......
......@@ -21,7 +21,7 @@ function c82642348.destg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function c82642348.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.SelectOption(tp,60,61)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin~=res then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
......
......@@ -18,7 +18,7 @@ function c89718302.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function c89718302.damop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local coin=Duel.SelectOption(tp,60,61)
local coin=Duel.AnnounceCoin(tp)
local res=Duel.TossCoin(tp,1)
if coin~=res then
Duel.Damage(1-tp,1000,REASON_EFFECT)
......
......@@ -16,7 +16,8 @@ function c94773007.attg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
end
function c94773007.atop(e,tp,eg,ep,ev,re,r,rp)
local opt=Duel.SelectOption(tp,60,61)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local opt=Duel.AnnounceCoin(tp)
local coin=Duel.TossCoin(tp,1)
if opt==coin then
Duel.SetLP(tp,math.ceil(Duel.GetLP(tp)/2))
......
......@@ -44,7 +44,7 @@ function c96012004.coinop(e,tp,eg,ep,ev,re,r,rp)
if e:GetLabel()==0 then return end
if e:GetLabel()==2 and Duel.GetCurrentChain()~=ev+1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COIN)
local res=1-Duel.SelectOption(tp,60,61)
local res=1-Duel.AnnounceCoin(tp)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_DELAY)
......
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