#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=z:\trix\autoit\aphphv0007.kxf

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;Main Window size
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$Form1_1 = GUICreate("Tabbed Notebook Dialog", 472, 563, 199, 121)
GUISetIcon("D:\005.ico")
$PageControl1 = GUICtrlCreateTab(8, 8, 444, 504)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$Scripting = GUICtrlCreateTabItem("Scripting")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;Tab 3: Scriplting
;;8 questions
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;Question #1
;Tone Alert Used
GUIStartGroup()
$Radio1pos = GUICtrlCreateRadio("", 304, 256, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio1neg = GUICtrlCreateRadio("", 232, 256, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #2
;Sunstar 3 Digit Unit
GUIStartGroup()
$Radio2pos = GUICtrlCreateRadio("", 304, 290, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio2neg = GUICtrlCreateRadio("", 232, 290, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #3
;Repeat 3 digit Init
GUIStartGroup()
$Radio3pos = GUICtrlCreateRadio("", 304, 320, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio3neg = GUICtrlCreateRadio("", 232, 320, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #4
;Location
GUIStartGroup()
$Radio4pos = GUICtrlCreateRadio("", 304, 350, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio4neg = GUICtrlCreateRadio("", 232, 350, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #5
;Cross Street
GUIStartGroup()
$Radio5pos = GUICtrlCreateRadio("", 304, 380, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio5neg = GUICtrlCreateRadio("", 232, 380, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #6
;Map Grid
GUIStartGroup()
$Radio6pos = GUICtrlCreateRadio("", 304, 410, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio6neg = GUICtrlCreateRadio("", 232, 410, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #7
;SS Tac Channel
GUIStartGroup()
$Radio7pos = GUICtrlCreateRadio("", 304, 440, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio7neg = GUICtrlCreateRadio("", 232, 440, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Question #8
;Info Out of order
GUIStartGroup()
$Radio8pos = GUICtrlCreateRadio("", 304, 470, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Radio8neg = GUICtrlCreateRadio("", 232, 470, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



GUICtrlCreateInput("", 72, 80, 97, 24)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")

;Unit Number
$Unit = GUICtrlCreateInput("", 240, 80, 73, 24)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")

;Incodent Number
$Incodent = GUICtrlCreateInput("", 344, 144, 97, 24)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")

;Time of examination
$Time = GUICtrlCreateInput("", 72, 112, 89, 24)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")

;Name of person being examined
$Name = GUICtrlCreateInput("", 232, 112, 89, 24)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;List of test Examiners
;; "Bob Lanoue|Eric Fayad|Ken Warner|Misty McBride|Ron Shiner"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$List1 = GUICtrlCreateList("", 340, 33, 100, 102)
GUICtrlSetData(-1, "Bob Lanoue|Eric Fayad|Ken Warner|Misty McBride|Ron Shiner")
GUICtrlSetFont(-1, 10, 800, 0, "Arial")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Text Boxes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$Label1 = GUICtrlCreateLabel("Date:", 16, 72, 54, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Arial Narrow")
$Label2 = GUICtrlCreateLabel("UNIT:", 176, 80, 56, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Arial Narrow")
$Label3 = GUICtrlCreateLabel("Channel A QA", 80, 32, 209, 47)
GUICtrlSetFont(-1, 28, 800, 0, "Arial Narrow")
$Label4 = GUICtrlCreateLabel("Time:", 16, 104, 57, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Arial Narrow")
$Label5 = GUICtrlCreateLabel("Name:", 168, 112, 65, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Arial Narrow")
$Label6 = GUICtrlCreateLabel("Scripting", 144, 160, 130, 46)
GUICtrlSetFont(-1, 26, 800, 0, "Arial Narrow")
$Tone = GUICtrlCreateLabel("Tone AlertUsed", 48, 248, 121, 27)
GUICtrlSetFont(-1, 14, 800, 0, "Arial Narrow")
$Label9 = GUICtrlCreateLabel("Sunstar 3 Digit Unit#", 48, 280, 175, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label11 = GUICtrlCreateLabel("Repeat 3 Didit Unit#", 48, 312, 173, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label12 = GUICtrlCreateLabel("Location", 48, 344, 76, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label13 = GUICtrlCreateLabel("Cross Street", 48, 376, 111, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label14 = GUICtrlCreateLabel("Map Grid", 48, 408, 81, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label15 = GUICtrlCreateLabel("SS tac Channel", 48, 440, 134, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label16 = GUICtrlCreateLabel("Info out of Order", 48, 472, 144, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label17 = GUICtrlCreateLabel("Started:                     YES        NO", 32, 208, 304, 28)
GUICtrlSetFont(-1, 16, 400, 0, "Arial Rounded MT Bold")
$Label7 = GUICtrlCreateLabel("Incident", 280, 144, 65, 27)
GUICtrlSetFont(-1, 14, 800, 0, "Arial Narrow")
$TabSheet2 = GUICtrlCreateTabItem("Customer Service")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Tab3
;;; 3 questions: triple radio
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; Tab2 Question #1
;Displayed Servcie Attitude
GUIStartGroup()
$RadioCS1pos = GUICtrlCreateRadio("", 272, 112, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RadioCS1neut = GUICtrlCreateRadio("", 352, 112, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RadioCS1neg = GUICtrlCreateRadio("", 424, 112, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
; Tab2 Question #2
;Used Correct Volume or Tone
GUIStartGroup()
$RadioCS2pos = GUICtrlCreateRadio("", 272, 144, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RadioCS2neut = GUICtrlCreateRadio("", 352, 144, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RadioCS2neg = GUICtrlCreateRadio("", 424, 144, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
; Tab2 Question #3
;Used Prohibited Behavior
GUIStartGroup()
$RadioCS3pos = GUICtrlCreateRadio("", 272, 176, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RadioCS3neut = GUICtrlCreateRadio("", 352, 176, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RadioCS3neg = GUICtrlCreateRadio("", 424, 176, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;Text box area
$Label8 = GUICtrlCreateLabel("Customer Service", 136, 48, 154, 29)
GUICtrlSetFont(-1, 16, 800, 0, "Arial Narrow")
$Label10 = GUICtrlCreateLabel("CORRECT      MINOR       INCORRECT", 248, 88, 198, 20)
GUICtrlSetFont(-1, 10, 800, 0, "Arial Narrow")
$Label18 = GUICtrlCreateLabel("Displayed Service Attitued", 16, 112, 226, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label19 = GUICtrlCreateLabel("Used Correct Volume / Tone", 16, 144, 246, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
$Label20 = GUICtrlCreateLabel("Used Prohibited Behavior", 16, 176, 219, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Arial")
GUICtrlCreateEdit("", 16, 432, 425, 73)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label21 = GUICtrlCreateLabel("Customer Service notes:", 16, 400, 234, 26)
GUICtrlSetFont(-1, 14, 800, 0, "Arial")
$TabSheet3 = GUICtrlCreateTabItem("Notes")
GUICtrlCreateEdit("", 32, 104, 369, 377)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label22 = GUICtrlCreateLabel("Overall Notes, Concerns", 32, 40, 281, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Arial")
$Label23 = GUICtrlCreateLabel("Employee will see this on threir reprot card", 32, 72, 210, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("&Submit", 222, 520, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("&Cancel", 302, 520, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("&Help", 384, 520, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd