vbs中，:你是猪吗？回答是则继续，回答其他则弹出关机命令。。。 要怎么写

我有一个问你是不是我儿子的.bat，如下：
echo off
title 请立即承认你是我儿子
shutdown /s /t 180 /c "请立即回答“Yes”，不然180秒后关闭计算机！不信就试试？"
echo.
set /p A=^你是我儿子吗？^:
if %A%==Yes goto D
if not %A%==No goto B
:B
echo.
echo.
set /p B=^你真的不想当我儿子吗？^:
if %B%==Yes goto D
if not %B%==No goto C
:C
echo.
echo.
set /p C=^你确实不想当我儿子吗？^:
if %C%==Yes goto D
if not %C%==No goto B
:D
echo.
echo.
shutdown /a
echo 诶，乖儿子，去吃屎吧~
echo.
echo.
pause

这个在*.txt中保存之后，要改为.bat，不是.vbs

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈"

这个是.vbs的，这个有时会被360之类的安全软件报毒，拉信任就行，但是如果你发给别人，只要他的电脑上有安全软件，就会被检测出来。

对的，\(^o^)/你是猪