Dialog not showing up?

So I'm making a dialog so you can rob a place, but when I test it the dialog is not showing. I bet I am doing something wrong but Idk...

What i'm trying to do is script a dialog to rob a place.[basic of it]

local Dialog1 = Instance.new("Dialog", workspace.John.Head) -- in ze head, start.
local Dialog2 = Instance.new("DialogChoice", Dialog1) -- passive (already done with)
local Dialog3 = Instance.new("DialogChoice", Dialog1) -- mean
local Dialog4 = Instance.new("DialogChoice", Dialog3) -- in mean, nicer. (already done)
local Dialog5 = Instance.new("DialogChoice", Dialog3) -- in mean terrible
local Dialog6 = Instance.new("DialogChoice", Dialog5) -- in terrible, rob
local Dialog7 = Instance.new("DialogChoice", Dialog6) -- in rob, robstart

--Setting up stuff...
Dialog1.DialogTone = "Neutral"
Dialog1.DialogPurpose = "Shop"
Dialog1.ConversationDistance = 25
Dialog1.InUse = false
Dialog1.Name = "Start"
--Acually starting it..
Dialog1.InitialPrompt = "Hello! Welcome to John's Shop! How may I help you?"
Dialog1.GoodbyeDialog = "Ok, have a nice day!"

-------
--Dialog 2 = Passive (done)
--Setting up stuff...
Dialog2.Name = "Passive"
--Acually starting it..
Dialog2.UserDialog = "I would like to buy something."
Dialog2.ResponceDialog = "Ok, great!"

-------
--Dialog 3 = Mean
--Setting up stuff...
Dialog3.Name = "Mean"
--Acually starting it..
Dialog3.UserDialog = "..."
Dialog3.ResponceDialog = "Uh, ok. Are you looking to shot?"

--------
--Dialog 4 = Nicer
--Setting up stuff...
Dialog4.Name = "Nicer"
--Acually starting it..
Dialog4.UserDialog = "Yes."
Dialog4.ResponceDialog = "Ok!"

--------
--Dialog 5 = Terrible
--Setting up stuff...
Dialog5.Name = "Terrible"
--Acually starting it..
Dialog5.UserDialog = "No, i'm not!"
Dialog5.ResponceDialog = "Ok, no need to get hostile buddy"

--------
--Dialog 6 = Rob
--Setting up stuff...
Dialog6.Name = "Rob"
--Acually starting it..
Dialog6.UserDialog = "I want some money"
Dialog6.ResponceDialog = "What?"

--------
--Dialog 7 = Robstart
--Setting up stuff...
Dialog7.Name = "Robstart"
--Acually starting it..
Dialog7.UserDialog = "Give me all your money! (Rob)"
Dialog7.ResponceDialog = "Police, help!"

I know I could make the code smaller, buttttt idk