آموزش کد: بازی حدس عدد (با راهنمایی هوشمند)

یک بازی کامل حدس عدد: برنامه در شروع یک عدد مخفی بین ۱ تا 50 با Rnd انتخاب می‌کند (فقط بار اول چون داخل If FirstTime است) و کاربر با هر حدس در btnCheck یکی از سه مسیر را می‌بیند: برد با نمایش تعداد تلاش‌ها، راهنمایی «برو بالاتر» یا راهنمایی «عدد کوچک‌تری انتخاب کن». زنجیره If / Else If / Else پایه تصمیم‌گیری چندمسیره در B4A است و شمارنده tries یادتان می‌دهد متغیرهای زنده باید در Globals یا Process_Globals باشند تا با هر کلیک صفر نشوند. همین منطق پایه هر بازی حدس، آزمون و کوییز است.

بدون نیاز به کتابخانه جانبی (فقط کتابخانه‌های داخلی B4A)

این قطعه‌کد به‌صورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکراری‌نبودن بررسی شده است. برای دیدن تکه‌کدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه می‌شود.

دسته‌بندیتکه کدها
تعداد بازدید۳
تعداد فروش۰
فرمت تحویلفایل دانلودی (بعد از پرداخت آنی فعال می‌شود)
پشتیبانیتیکت پشتیبانی در پنل کاربری

ویژگی‌های کلیدی

  • کد B4A آماده استفاده
  • توضیح کامل فارسی
  • کاملاً رایگان
  • بدون کتابخانه جانبی

هنوز نظری ثبت نشده است. اولین نفر باشید!

برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال می‌شود)

B4A — کد نمونه رایگان این تکه‌کد را می‌توانید مستقیم در پروژه بیسیک۴اندروید استفاده کنید
Sub Process_Globals
    Private secretNumber As Int
    Private tries As Int
End Sub

Sub Activity_Create(FirstTime As Boolean)
    If FirstTime Then
        ' عدد مخفی بین ۱ تا 50
        secretNumber = Rnd(1, 51)
        tries = 0
    End If
End Sub

Sub btnCheck_Click
    Dim guess As Int = edtInput.Text
    tries = tries + 1
    
    If guess = secretNumber Then
        lblMsg.Text = "آفرین! در " & tries & " تلاش درست حدس زدی"
    Else If guess < secretNumber Then
        lblMsg.Text = "برو بالاتر"
    Else
        lblMsg.Text = "عدد کوچک‌تری انتخاب کن"
    End If
End Sub
تخصصی بیسیک۴اندرویدسورس‌کد آمادهآموزش گام‌به‌گامکتابخانه‌های کاربردیتحویل آنی بعد از پرداختپشتیبانی واقعی ۲۴/۷بروزرسانی رایگان+۹۶۵ محصول فعال