รบกวนช่วยเขียนสคริป เกี่ยวกับ การ send เลขแบบออโต้หน่อยสิครับ

ผมอยากได้ ประมาณว่า เราสร้าง input สัก 1 ช่อง สมมติเราพิมเลข 100 ละเราสร้าง hotkey เช่นเป็น F1 แล้วให้แบบ เรากด F1 ครั้งแรก คือพืม 100 ครั้งที่สองพิม 101 ครั้ง 3 พิม 102 กดครั้งแต่ไปก็พิม 103 104 105 ไปเรื่อยๆ  รบกวนหน่อยนะครับ

สร้าง form + input ด้วย Koda
กำหนด hotkey
ประกาศตัวแปร แบบ global เพื่ออ้างอิงถึงได้จากทุก ๆ ที่ (function)

สร้าง function
ตรวจสอบตัวแปรที่ประกาศ ถ้ายังไม่มีค่าให้เท่ากับ 100 มิฉะนั้น +1
เอาค่าจากตัวแปรใส่ใน input

* รบกวนพยายามด้วยตัวเองมากกว่านี้ครับ

ลองเอาไป Apply ดูครับ  

Code:

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $first = 0, $num
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Running Number", 156, 95, -1, -1)
$Input1 = GUICtrlCreateInput("", 16, 16, 121, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_NUMBER))
$Label1 = GUICtrlCreateLabel("Press F1", 56, 56, 44, 17)
GUISetState(@SW_SHOW)
HotKeySet("{F1}", "num")
#EndRegion ### END Koda GUI section ###

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

Func num()
 If GUICtrlRead($Input1) = "" Then
 ToolTip("Input field is blank!!")
 Sleep(600)
 ToolTip("")
 Else
 If Not ProcessExists("notepad.exe") Then Run("notepad.exe")
 WinWaitActive("[CLASS:Notepad]")
 If $first = 0 Then
 $num = GUICtrlRead($Input1)
 $first = 1
 EndIf
 Send($num & @CRLF)
 $num += 1
 EndIf
EndFunc