*********كمك در نوشتن اين بازي********

[فاطـمه]

خودت استاد ها رو بايد بهتر بشناسي اول ترم دانشگاه باز نشده ميخواهد حالگيري كنه !! من نميدونم چرا نميره روي بانك ها كار كنه يا اصلا بره api كار كنه كه گير داده به اين برنامه !!!

بله ، حالا تا کی می خوای؟
من دارم روش کار می کنم ولی به نظر من خودتم تلاش کن
این به نفعته.

[aaaammmm87]

بله ، حالا تا کی می خوای؟
من دارم روش کار می کنم ولی به نظر من خودتم تلاش کن
این به نفعته.

هر چه زودتر بهتر!!! خودم كه الان هنگ كردم (نه به خاطر اين برنامه) .اره به نفعم كه هستاگه خودم بنويسم ولي وقتي كه شما نوشتي من هم خودم يه بار كمپايل ميكنم ميگيرم چي نوشتي

[aaaammmm87]

سلام
خودم يه همچين چيزي نوشتم ولي زياد خوب نيست

Dim l, t As Integer

Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
Picture1.Move X
Dim a As Integer
a = Picture1.Left
If Picture1.Left >= 3000 Then
Picture1.Left = a - 800
End If
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 39 And Picture1.Left < Form1.Width - Picture1.Width Then Picture1.Left = Picture1.Left + 100
If KeyCode = 37 And Picture1.Left > 0 Then Picture1.Left = Picture1.Left - 100
End Sub

Private Sub Form_Load()
Timer1.Interval = 50
Form1.Width = 10000
l = 50
t = 50
End Sub

Private Sub Timer1_Timer()
If Shape1.Left > Form1.Width - 2 * Shape1.Width Then l = -50
If Shape1.Left <= 0 Then l = 50
If Shape1.Top > Picture1.Top - Shape1.Height And (Shape1.Left > Picture1.Left And Shape1.Left < Picture1.Left + Picture1.Width) Then t = -50
If Shape1.Top <= 0 Then t = 50
If Shape1.Top > Picture1.Top Then
a = MsgBox("I am sarry")
End
End If
Shape1.Left = Shape1.Left + l
Shape1.Top = Shape1.Top + t
End Sub

[فاطـمه]

بدم نیست، بجای تنیس عکس گذاشتی؟)picture1)

[aaaammmm87]

بدم نیست، بجای تنیس عکس گذاشتی؟)picture1)

به نظرم عكس باشه جلوه گرافيكي بهتري داره .

[بهرام_62]

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

[aaaammmm87]

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

سلام
اره همين بازي !!
ولي خوب بازي هايي رو كه نوشتي يا ديگر برنامه هايي رو كه نوشتي اپلود كن بلاخره اگه من استفاده نكنم ديگر دوستان استفاده ميكنن .

[بهرام_62]

سلام
اره همين بازي !!
ولي خوب بازي هايي رو كه نوشتي يا ديگر برنامه هايي رو كه نوشتي اپلود كن بلاخره اگه من استفاده نكنم ديگر دوستان استفاده ميكنن .

حوصله ندارم
گفتم اگه نیاز داری و به دردت می خوره برات آپ کنم
ولیکی حسشو داره آپلود کنه تا بقیه نظر بدن

[aaaammmm87]

حوصله ندارم
گفتم اگه نیاز داری و به دردت می خوره برات آپ کنم
ولیکی حسشو داره آپلود کنه تا بقیه نظر بدن

خوب اگه حالا بگم به دردم ميخوره اپ ميكني !!! نه جدي ميگم !؟
چندتا شو كه خودت فكر ميكني از همه بهترن رو اپ كن

[بهرام_62]

سلام این از اولش که ی پازله که مزخرفه

این از دومیش که نسبتا قشنگه ولی ربطی به این بازی که تو گفتی ندارهولی قشنگه به نظر خورم

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

این بازی آخریه با آهنگش حجم نزدیک 10 مگابایت می شد برای همین آهنگ هاش رو آپلود نکردم
خودت یم فایل res بساز و موزیک های دلخواه خودت رو بزار توش

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