#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.14.2
 Author:         myName

 Script Function:
	Template AutoIt script.1

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

;#include <image.au3>
#include "ImageSearch.au3"
#include <MsgBoxConstants.au3>


AutoItSetOption('MouseCoordMode', 0)

HotKeySet('e', 'Exception')

HotKeySet('`', 'ExitScript')

sleep(3000)

Global $s0 = 50, $s1 = 500, $s2 = 200, $s3 = 300, $s4 = 400, $s5 = 500, $s8 = 800
Global $sec = 1000, $min = 60000, $hour = 360000

Local $i = 1, $j = 1, $k = 1
Local $WorkToDo = 0

Global $LocInputTimer = 2000, $StoryStepTimer = 2000, $ReachLocTimer = 5 *$sec


While 1
   Local $WorkToDo = InputBox("WorkList", "What you want to run", "Notepad", "", _
									- 1, -1, 0, 0)
   MsgBox($MB_SYSTEMMODAL, "", $WorkToDo) ; Display the result.

   If $WorkToDo = Notepad Then
	  MsgBox($MB_SYSTEMMODAL, "", $WorkToDo) ; Display the result.
	  Notepad()
   ElseIf $WorkToDo = PowerPoint Then
	  MsgBox($MB_SYSTEMMODAL, "", $WorkToDo) ; Display the result.
	  PowerPoint()
   ElseIf $WorkToDo = Word Then
	  MsgBox($MB_SYSTEMMODAL, "", $WorkToDo) ; Display the result.
	  Word()

   ElseIf $WorkToDo = Load_Data Then
	  MsgBox($MB_SYSTEMMODAL, "", $WorkToDo) ; Display the result.
	  La_Pucelle_d_Orleans()


   ElseIf $WorkToDo = Mozilla Then
	  MsgBox($MB_SYSTEMMODAL, "", $WorkToDo) ; Display the result.
	  Mozilla()

   Else
	  Sleep(300)
   EndIf
WEnd


Func Notepad()
   Local $iPID = Run("notepad.exe", "", @SW_SHOWMAXIMIZED)

   ; Wait 10 seconds for the Notepad window to appear.
   WinWait("[CLASS:Notepad]", "", 10)
   ; Wait for 2 seconds.
   Sleep(2000)

   ; Close the Notepad process using the PID returned by Run.
   ProcessClose($iPID)

EndFunc

Func Mozilla()


EndFunc

Func PowerPoint()


EndFunc

Func Word()


EndFunc

Func Load_Data()


EndFunc


Func ExitScript()
   Exit
EndFunc