#include <GUIConstants.au3>
$12 = GUICreate ("iPad", 600, 400)
HotKeySet("^v", "paste")
Hotkeyset("^c", "copy")
HotKeySet("^s", "save")
$menu = GUICtrlCreateMenu("File")
$open = GUICtrlCreateMenuItem("Open", $menu)
$save = GUICtrlCreateMenuItem("Save Ctrl + S", $menu)
$savedoc = GUICtrlCreateMenuItem("Save As .doc", $menu)
$about = GUICtrlCreateMenuItem("About", $menu)
$exit = GUICtrlCreateMenuItem("Exit", $menu)
$edit = GUICtrlCreateMenu("Edit")
$copy = GUICtrlCreateMenuItem("Copy Ctrl + C", $edit)
$paste = GUICtrlCreateMenuItem("Paste Ctrl + V", $edit)
$undo = GUICtrlCreateMenuItem("Undo Ctrl + Z", $edit)
$write = GUICtrlCreateEdit("",  5, 5, 590, 370)
GUISetState(@SW_SHOW)

HotKeySet("{TAB}", "tab")

while 1
	$sav =	GUICtrlRead($write)
	$iResult = GUIGetMsg ()
	Select
	case ($iResult = $open)
	$op = inputbox("Open", "Please type in the location of the file that you want to open or the file name if it is in the same directory")
	$ope = fileread($op)
	send($ope, $write)
	Case ($iResult = -3)
		Exit
	Case ($iresult = $savedoc)
		$input = InputBox("Save", "Please type the filename you desire")
FileWrite($input & ".doc" , $sav)
Case ($iResult = $exit)
	Exit
Case ($iResult = $save)
$input = InputBox("Save", "Please type the filename you desire")
FileWrite($input & ".txt" , $sav)
case ($iResult = $about)
	msgbox(0, "iPad", "iPad, Created by Isaac Flaum is a notepad like tool compiled using Autoit v3" & chr(13) & chr(10) & "Thanks For Trying iPad! Updates Coming Soon" & chr(13) & chr(10) & "-Isaac")
case ($iResult = $copy)
	ClipPut($sav)
Case ($iResult = $paste)
	GUICtrlSendMsg($write, "^v", 1, 1)

EndSelect
WEnd

Func tab()
send("     ", $write)
EndFunc

func save()
$input = InputBox("Save", "Please type the filename you desire")
FileWrite($input & ".txt" , $sav)
EndFunc

Func copy()
Clipput($sav)
EndFunc

Func paste()
Send(ClipGet(), $write)
EndFunc