$Version = "Version 1.0"
$System = CreateObject("Kixtart.System")
Break on
If Not $System
  $ = MessageBox("KiXforms Not Initiated. This Script Will Now Close.", "Error", 16)
  Quit()
EndIf
$Form1 = $System.Form()
$Form1.Text = "Window " + $Version
$Form1.BackColor = Green
$Form1.Size = 600, 400
$Form1.SysMenu = 0
$Form2Button = $Form1.Controls.button("Button")
$Form2Button.Width = 120
$Form2Button.Height = 50
$Form2Button.Text = "GoTo_Window_1"
$Form2Button.Top = 10
$Form2Button.Left = 10
$Form2Button.OnClick = "SwitchForms('GoTo_Window_1')"
$Form3Button = $Form1.Controls.button("Button")
$Form3Button.Width = 120
$Form3Button.Height = 50
$Form3Button.Text = "GoTo_Window_2"
$Form3Button.Top = 65
$Form3Button.Left = 10
$Form3Button.OnClick = "SwitchForms('GoTo_Window_2')"
$Form4Button = $Form1.Controls.button("Button")
$Form4Button.Width = 120
$Form4Button.Height = 50
$Form4Button.Text = "GoTo_Window_3"
$Form4Button.Top = 120
$Form4Button.Left = 10
$Form4Button.OnClick = "SwitchForms('GoTo_Window_3')"
$Form1QuitButton = $Form1.Controls.button("Button")
$Form1QuitButton.Width = 120
$Form1QuitButton.Height = 50
$Form1QuitButton.Text = "Exit"
$Form1QuitButton.Top = 285
$Form1QuitButton.Left = 10
$Form1QuitButton.OnClick = "ExitForms()"
$Form1.Center
$Form1.Show()
CreateForm2()
CreateForm3()
CreateForm4()
$Running = 1
While $Running = 1
  $Nul = Execute($Form1.DoEvents())
  $Nul = Execute($Form2.DoEvents())
  $Nul = Execute($Form3.DoEvents())
  $Nul = Execute($Form4.DoEvents())
Loop
Exit 0
;======================WINDOW_1==========================
Function CreateForm2()
  $Form2 = $System.Form()  
  $Form2.Text = "GoTo_Window_1 " + $Version
  $Form2.BackColor = Green
  $Form2.Size = 600, 400
  $Form2.SysMenu = 0
    
  $Form2BackButton = $Form2.Controls.button("Button")
  $Form2BackButton.Width = 120
  $Form2BackButton.Height = 50
  $Form2BackButton.Text = "Back"
  $Form2BackButton.Top = 10
  $Form2BackButton.Left = 10
  $Form2BackButton.OnClick = "SwitchForms('Back')"
    
  $Form2QuitButton = $Form2.Controls.button("Button")
  $Form2QuitButton.Width = 120
  $Form2QuitButton.Height = 50
  $Form2QuitButton.Text = "Exit"
  $Form2QuitButton.Top = 285 
  $Form2QuitButton.Left = 10
  $Form2QuitButton.OnClick = "ExitForms()"
    
EndFunction
;======================WINDOW_2============================
Function CreateForm3()
  $Form3 = $System.Form()  
  $Form3.Text = "GoTo_Window_2 " + $Version
  $Form3.BackColor = Green
  $Form3.Size = 600, 400
  $Form3.SysMenu = 0
      
  $Form3BackButton = $Form3.Controls.button("Button")
  $Form3BackButton.Width = 120
  $Form3BackButton.Height = 50
  $Form3BackButton.Text = "Back"
  $Form3BackButton.Top = 10
  $Form3BackButton.Left = 10
  $Form3BackButton.OnClick = "SwitchForms('Back')"
  
  $Form3QuitButton = $Form3.Controls.button("Button")
  $Form3QuitButton.Width = 120
  $Form3QuitButton.Height = 50
  $Form3QuitButton.Text = "Exit"
  $Form3QuitButton.Top = 285 
  $Form3QuitButton.Left = 10
  $Form3QuitButton.OnClick = "ExitForms()"
    
EndFunction
;======================WINDOW_3============================
Function CreateForm4()
  $Form4 = $System.Form()  
  $Form4.Text = "GoTo_Window_3 " + $Version
  $Form4.BackColor = Green
  $Form4.Size = 600, 400
  $Form4.SysMenu = 0
      
  $Form4BackButton = $Form4.Controls.button("Button")
  $Form4BackButton.Width = 120
  $Form4BackButton.Height = 50
  $Form4BackButton.Text = "Back"
  $Form4BackButton.Top = 10
  $Form4BackButton.Left = 10
  $Form4BackButton.OnClick = "SwitchForms('Back')"
  
  $Form4QuitButton = $Form4.Controls.button("Button")
  $Form4QuitButton.Width = 120
  $Form4QuitButton.Height = 50
  $Form4QuitButton.Text = "Exit"
  $Form4QuitButton.Top = 285 
  $Form4QuitButton.Left = 10
  $Form4QuitButton.OnClick = "ExitForms()"
    
EndFunction
Function SwitchForms($FormName)
  Select
    Case $FormName = "Back"
      $Form2.Hide
      $Form3.Hide
      $Form4.Hide
      $Form1.Center
      $Form1.Show()
    Case $FormName = "GoTo_Window_1"
      $Form1.Hide
      $Form2.Center
      $Form2.Show()
    Case $FormName = "GoTo_Window_2"
      $Form1.Hide
      $Form3.Center
      $Form3.Show()
    Case $FormName = "GoTo_Window_3"
      $Form1.Hide
      $Form4.Center
      $Form4.Show()
  EndSelect
EndFunction
Function ExitForms()
  $Running = 0  
  Quit()
EndFunction