in my VBScript I got the following error

Script: C:\Users\*****_2\Desktop\GHOST.vbs
Line: 61
Char 14
Error Syntax error
Code 800A03EA
Source Microsoft VBScriptm compilation error

and here is the code:

X=MsgBox("Hello.",0+16,"GHOST")

X=MsgBox("I am the Ghost in the code.",0+16,"GHOST")

X=MsgBox("I can be your best freind...",0+16,"GHOST")

X=MsgBox("Or your worst enemy",0+16,"GHOST")

X=MsgBox("now do as I command",0+16,"GHOST")

X=MsgBox("you will not see me again...",0+16,"GHOST")

X=MsgBox("no trace will be left behind",0+16,"GHOST")

X=MsgBox("except for your memories...",0+16,"GHOST")

X=MsgBox("let's play Minecraft",0+16,"GHOST")

Dim objShell

Set objShell = WScript.CreateObject( "WScript.Shell" )

objShell.Run("Minecraft")

Set objShell = Nothing

wscript.sleep 500

X=MsgBox("play.",0+16,"GHOST")

X=MsgBox("are you finished?",4+32,"GHOST")

if x=6 then

msgbox "good.",0+16,"GHOST"

elseif x=7 then

msgbox "then keep playing.",0+16,"GHOST"

end if

X=MsgBox("let me ask you a few questions...",0+16,"GHOST")

a=inputbox("what is your name?")

b=inputbox("how is your day?")

MsgBox"your name is "+a

MsgBox"and your day was "+b

X=MsgBox("it was nice, "+a,0+16,"GHOST")

X=MsgBox("but i must go",0+16,"GHOST")

X=MsgBox("goodbye",4+16,"GHOST")

If x=6 Then

Set objShell=

shell.Run"%windir%\system32\shutdown.exe -s -t 60"

Set objFSO = CreateObject( "Scripting.FileSystemObject" )

objFSO.DeleteFile WScript.ScriptFullName

WScript.Quit

Elseif x=7 then

Msgbox"I HATE YOU",0+16,"GHOST"

End If



please help. thank you.