Chuơng trình tự động tính toán trên máy tính bỏ túi - autoit code

; Hiển thị message thông báo chương trình tự tính toán 2 x 4 x 8 x 16
Local $answer = MsgBox(4, "AutoIt Example (English Only)", "This script will run the calculator and type in 2 x 4 x 8 x 16 and then quit.  Run?")
; Kiểm tra câu trả lời của người dùng
; Nếu người dùng chọn No (7) thì thoát
If $answer = 7 Then
    MsgBox(0, "AutoIt", "OK.  Bye!")
    Exit
EndIf
; Khởi động chương trình máy tính bỏ túi
Run("calc.exe")
; Đợi cho đến khi cửa sổ chương trình được active. Nó có title là Calculator/
WinWaitActive("Calculator")
; Giả lập việc gõ phím 2*4*8*16=
; Sử dụng AutoItSetOption để làm giảm tốc độ gõ phím để ta có thể quan sát được
AutoItSetOption("SendKeyDelay", 400)
Send("2*4*8*16=")
Sleep(2000)
; Thoát chương trình
WinClose("Calculator")
; Đợi chương trình kết thúc
WinWaitClose("Calculator")
; Kết thúc!