Autoit MsgBox 製作一個猜數字遊戲

kaihsin1703

#include <MsgBoxConstants.au3>

; 生成 1 到 100 之間的隨機數字
$number = Random(1, 100, 1)

; 顯示說明對話框
MsgBox($MB_OK, "猜數字遊戲", "我們生成了一個 1 到 100 之間的隨機數字，請猜一下它是多少。")

; 開始猜數字
$guess = 0
While $guess <> $number
    ; 彈出輸入框讓用戶輸入猜測的數字
    $guess = InputBox("猜數字遊戲", "請輸入你的猜測：")

    ; 檢查用戶是否取消了輸入
    If @error Then
        Exit
    EndIf

    ; 比較用戶猜測的數字和實際數字的大小關係
    If $guess < $number Then
        MsgBox($MB_OK, "猜數字遊戲", "你猜的數字太小了，請再猜一次。")
    ElseIf $guess > $number Then
        MsgBox($MB_OK, "猜數字遊戲", "你猜的數字太大了，請再猜一次。")
    EndIf
WEnd

; 猜對了，顯示恭喜對話框
MsgBox($MB_OK, "猜數字遊戲", "恭喜你猜對了！答案是：" & $number)