مثال ساده بازی با حروف

[M-CAP7AIN 537]

• مثال ساده برای ساخت بازی های حرفی (تو این مثال طراحی خاصی به کار برده نشده فقط برای آشنایی با ساختار این سبک بازی ها پیاده شده.)

دانلود مثال 1.0  

دانلود مثال 1.1

[rezamoaser 53]

سلام فایل شما رو گرفتم عالی بود فقط اولین بار که زدمش مثلا مال رو سه بار درست میزدم میگفت شما برنده شده اید. اگر بخوام طرح شما رو ارتقا بدم و تبدیل به یه بازی کاملش کنم چطوری کاری کنم که اشتباه رو تشخیص بده یا بگه این کلمه قبلا زده شده . و یه سوال دیگه توی این مورد من برای هر مرحله ای باید یه لایوت درست کنم ؟؟  چون تعداد کلمه هاش با هم برابری نمیکنه در بعضی جاها؟؟ 

ممنون..

[rezamoaser 53]

سلام استاد میشه جواب بدید لطفا من مشکل دارم حتی مینویسمش هم انگار کار نمیکنه کپی کنم هم نمیخونه واسه خوندنش فقط توی نسخه کپی شده خودتون میشه برنامه بازی رو استفاده کرد. میشه توضیح بدید چطور و آموزشش رو بزارید ممنونتون میشم این احتمالا مشکل خیلی از افراد هست ... 

ممنون میشم توضیحات رو بگی و یا آموزش ویدیویی بزاری مرسی

[M-CAP7AIN 537]

سلام به دلیل کمبود وقت ، تایم خالی نداریم ، مختصر توضیح میدم

 

1.کلاس MC7Drawing (کاربرد کلاس : وظیفه کنترل تاچ رو پنل و نگه داری موقعیت های تاچ و رسم خط)

   - پس از رسم خط یک مقدار برگشتی از دکمه های تاچ شده برگشت داده میشه. (از این بخش میتونید عمل مقایسه رو انجام بدید ، با این کلاس کاری ندارید فقط کافیه یدونه پنل (سینی) قرار بدید ، حرف هارو تو سینی قرار بدید(دکمه ها) ، یدونه پنل دیگه روی سینی بکشید. )

SD.Initialize(Panel1 , Colors.DarkGray ,7dip)

مقادیری که کلاس دریافت میکنه ( 1. پنل (پنل رویی سینی) که روی ویو حرف ها قرار داده میشه | 2. رنگ خط | 3. پهنای خط)

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("Main")

	Button1.Tag = "س"
	Button2.Tag = "ل"
	Button3.Tag = "ا"
	Button4.Tag = "م"
	
	Button1.Text = "س"
	Button2.Text = "ل"
	Button3.Text = "ا"
	Button4.Text = "م"
	
	BCH11.Tag = "س"
	BCH12.Tag = "ل"
	BCH13.Tag = "ا"
	BCH14.Tag = "م"
	
	BCH21.Tag = "س"
	BCH22.Tag = "ا"
	BCH23.Tag = "ل"
	
	BCH31.Tag = "م"
	BCH32.Tag = "ا"
	BCH33.Tag = "ل"
	
	SD.Initialize(Panel1 , Colors.DarkGray ,7dip)
End Sub

2. تو اولین راه اندازی ویوها مقدار دهی شدن (تو تگ هر ویو حرف مورد نظر به ترتیب قرار داده شده)

 - تو این مثال به صورت استاتیک مقداردهی شده ، اگه بخوایم به صورت داینامیک یا پویا ویو هارو بسازیم ، به دیتابیس لازم داریم و گرفتن لیست کلمات از ستون دیتابیس ، جدا کردن کلمات ، ریختن کلمات داخل لیست ، گرفتن طول کلمات و ساخت ویوها (کمی پیچیدس ولی با تلاش قابل پیاده سازیه)

 

Sub Panel1_Touch (Action As Int, X As Float, Y As Float)
	SD.Panel_Touch(x, y, Action , PnlMain)
End Sub

3. کافیه یدونه پنل روی باتن کلمات قرار بدید (پنل روی سینی)، و مقادیری که موقع تاچ دریافت میشند رو به کلاس MC7Drawing بدید.

 

 

Sub PrintListSelected(Selected As List)
	Select Selected.Size
		Case 3
			If (BCH21.Tag = Selected.Get(0)) And (BCH22.Tag = Selected.Get(1)) And (BCH23.Tag = Selected.Get(2)) Then
				BCH21.Text = Selected.Get(0)
				BCH22.Text = Selected.Get(1)
				BCH23.Text = Selected.Get(2)
				Counter = Counter + 1
			Else if (BCH31.Tag = Selected.Get(0)) And (BCH32.Tag = Selected.Get(1)) And (BCH33.Tag = Selected.Get(2)) Then
				BCH31.Text = Selected.Get(0)
				BCH32.Text = Selected.Get(1)
				BCH33.Text = Selected.Get(2)
				Counter = Counter + 1
			End If
			
		Case 4
			If (BCH11.Tag = Selected.Get(0)) And (BCH12.Tag = Selected.Get(1)) And (BCH13.Tag = Selected.Get(2)) And (BCH14.Tag = Selected.Get(3)) Then
				BCH11.Text = Selected.Get(0)
				BCH12.Text = Selected.Get(1)
				BCH13.Text = Selected.Get(2)
				BCH14.Text = Selected.Get(3)
				Counter = Counter + 1
			End If
	End Select	
	
	If Counter >= 3 Then
		Msgbox("شما برنده شدید." , "اتمام بازی")
		For Each v As View In PnlKeys.GetAllViewsRecursive
			If v Is Button Then
				Dim vv As Button = v
				vv.Text = ""
			End If
		Next
		Counter = 0
	End If
	
End Sub

4. این متد مقدار برگشتی از تاچ هست که موقع اتمام تاچ(سینی) به این کلاس ارسال میشه (تو این بخش عمل مقایسه انجام میشه)

 

 

 

 

برای درک کامل این مثال :

1. اول لیوت رو باز کنید تمامی ترکیب بندی ویوها رو بررسی کنید (کی ، چی ، کجا قرار داره)
2. فقط کافیه اکتیویتی main رو بررسی کنید با کلاس MC7Drawing فعلا کاری نداشته باشید(این کلاس برای راحتی کار ، هرچندتا کلمات رو که داخل سینی باشه تشخیص میده).
3. اصول کار تاچ میکنید روی سینی ، لیست کلمات تاچ شده به ترتیب با لیست برمیگرده.

 

 

خوبه ساده پیدا سازی شده.

موفق باشید.

[rezamoaser 53]

عالیه استاد عالی توضیح دادین فقط یه سوال کوچولوی دیگه وقتی مثلا من سلام رو میکشم برنامه به جای اعمالش روی قسمت ها میزنه از برنامه خارج شود . نمیدونم مین رو چیکارش کنم که بفرسته درست به mc چون نمیفرسته فک کنم اخطار میده که از برنامه خارج شوید 

[M-CAP7AIN 537]

در 18 دقیقه قبل، rezamoaser گفته است :

عالیه استاد عالی توضیح دادین فقط یه سوال کوچولوی دیگه وقتی مثلا من سلام رو میکشم برنامه به جای اعمالش روی قسمت ها میزنه از برنامه خارج شود . نمیدونم مین رو چیکارش کنم که بفرسته درست به mc چون نمیفرسته فک کنم اخطار میده که از برنامه خارج شوید 

همون مثال رو پیوست کنید یا تلگرام بفرستید

[rezamoaser 53]

در 11 ساعت قبل، M-CAP7AIN گفته است :

همون مثال رو پیوست کنید یا تلگرام بفرستید

سلام استاد خواستم یه بازی درست کنم اما اصلا اینو زیاد روش وقت صرف نکردم اما پنل که شما درست کردی رو برای مثال یکی از اون سه بازی قرار دادم تاچ میکنه ولی نمیفرسته راستش حتی با کد نویسی خودمم نتونستم درستش کنم برای همین مال شما رو پنل و لایوت رو کپی کردم و قرار دادم بازم این مشکلی رو که داره نشون میده راستی استاد قسمت اول یعنی حدس کلمه این کد بندی رو گذاشتم الان برنامه رو میفرستم اگر خواستید کد هاشو لطفا ایدی تلگرامتون رو بدید چون من تو صفحتون ندیدمش

http://s8.picofile.com/file/8357883876/app2.apk.html

[M-CAP7AIN 537]

در 12 ساعت قبل، rezamoaser گفته است :

سلام استاد خواستم یه بازی درست کنم اما اصلا اینو زیاد روش وقت صرف نکردم اما پنل که شما درست کردی رو برای مثال یکی از اون سه بازی قرار دادم تاچ میکنه ولی نمیفرسته راستش حتی با کد نویسی خودمم نتونستم درستش کنم برای همین مال شما رو پنل و لایوت رو کپی کردم و قرار دادم بازم این مشکلی رو که داره نشون میده راستی استاد قسمت اول یعنی حدس کلمه این کد بندی رو گذاشتم الان برنامه رو میفرستم اگر خواستید کد هاشو لطفا ایدی تلگرامتون رو بدید چون من تو صفحتون ندیدمش

http://s8.picofile.com/file/8357883876/app2.apk.html

کلاس رو بروز کردم ، مشکل شما با مقدار برگشتیه لیسته که مقدار دهی نشده ، کلاس جدید رو جایگزین کنید.(از پست اول دانلود کنید)

 

همیشه لاگ رو موقع خطاها بررسی کنید ، (برنامه نویسی == دیباگ)

[rezamoaser 53]

مرسی استاد یه دنیا ممنونتم واقعا دمت گرم

یه چیزی اگر بخوام بخشش های سوالش رو زیاد کنم باید دیتابس استفاده کنم تا متن ها رو بگیره ؟؟ .. 

راستی بابت کمکتون ممنون انشالله سرفراز باشید 

اگر مشکلی بود باز توضیح میدم مرسی