كاربر فعال


    كاربر مهمان


درباره وب سايت


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


برای عضویت در وب سایت روی لینک زیر کلیک کنید :

عضویت در وب سایت

برای طرح سوالات و پیشنهادات خود می توانید نظر خود را از طریق فرم پایین صفحات ارسال کنید و یا از طریق ایمیل با ما در میان بگذارید .همچنين مي توانيد به تالار گفتمان به آدرس زير مراجعه كنيد :

تالار گفتمان


لينك به ما


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







پيوندها


>>>اف سي پرسپوليس
>>>كسب درآمد اينترنتي ( درآمدزايي آسان و واقعي از طريق اينترنت )
>>>تالار گفتمان
>>>وب سایت افشین رشیدی
>>>وبلاگ بزرگ منچستر
>>>پول * پول * پول
>>>Astronomy
>>>شعرای یمانی
>>>اخبار سپاهان
>>>خريد و فروش اينترنتي (كمترين قيمتها )
>>>امیرحسین
>>>برنامه نویسی
>>>بهترین آهنگ های روز
>>>دريافت پول به ازاي هر كليك
>>>پایگاه آموزش
>>>جديدترين كليپ هاي موبايل
>>>دانلود ، سرگرمی ، مطالب جالب و خواندنی
>>>ارزان سراي اينترنتي
>>>Abtarang
>>>سرمست ترین
>>>سینما و رپ ایرانی
>>>!:: دنیـای عـکس و مـوزیک ::!
>>>عشق ، احساس ، زندگی
>>>فقط چند دقیقه
>>>Iranian-IT
>>>مهندسان برق
>>>مروارید درون
>>>آموزشکده کامپیوتر
>>>جونه من 18- نیان تو
>>>سلول زنده
>>>گيتار
>>>best download
>>>جک و SMS
>>>کلیپ ( جدید - 2008 ) و عکس و رینگتون و اس ام اس
>>>ورود ممنوع
>>>وبلاگ تخصصی کامپیوتر
>>>گروه شبکه پرشین بلاگ - پویا کوشنده
>>>خبرهای روز IT
>>>قفل سکوت
>>>دنیای کامپیوتر
>>>بیا تو مجانی اطلاعات بگیر
>>>برترین اخبار و مقالات رایانه
>>>فدا خانوم رو ببین چه کرده
>>>دابل-کلیک، مرکز آموزش کامپیوتر و اینترنت ایرانیان
>>>قاسم پرسپولیسی
>>>يه سايت توپ براي همه ي سليقه ها
>>>عکس داغ
>>>تجارت الكترونيك
>>>hossein
>>>تفریح>جک>ترفند>مطالب عاشقانه>هرچیکه بخوای
>>>وب سایت تفریحی طوطیا
>>>کرمانشاه نیوز
>>>computer-world20
>>>هنر رزمي فونگ پاي چي وو كونگ فو
>>>AIOS - All In One Site
>>>ROYAYE KHIS
>>>بانک مقالات فارسی
>>>قاسم روني
>>>طراحی وب سایت
>>>عکسهای جدید ایرانی



               WWW.BARNAMENEVISI.SOMEE.COM


         + پرسش و پاسخ (63)

         + پيشنهاد و انتقاد (14)

         + تبادل لينك (44)

         + متفرقه (20)



نام : وبلاگ

 

 

 

ایمیل : hesabdarb@yahoo.com  

 

 

 

موضوع : وبلاگ

 

 

 

متن نظر  :  سلام نحوه قرار دادن فایل power pointدروبلاگ رو برام توضیح میدین

 ---------------------------------------------------------------------------------------------

نام : مرتضي

 

 

 

موضوع : آشنايي با طراحي و مشخصات ساختار فايل

 

 

 

متن نظر  :  آشنايي با طراحي و مشخصات ساختار فايل

 ---------------------------------------------------------------------------------------------

نام Somayeh-sa :

 

 

 

ایمیل :  Hosseinisomayeh@yahoo.com   

 

 

 

موضوعU-Learning :

 

 

 

متن نظر  :  با سلام. لطفا بگین U-Learningچیست و چه کاربردی دارد؟

---------------------------------------------------------------------------------------------

نام Somayeh-sa :

 

 

 

ایمیل :  Hosseinisomayeh@yahoo.com   

 

 

 

موضوعTeleWork :

 

 

 

متن نظر  :  سلام دوستان،لطفا در مورد TeleWork راهنماییم کنید،اگر مطلبی دارین یا سایتی میشناسین ممنون میشم کمکم کنین.

 

---------------------------------------------------------------------------------------------

نام : مدیر در پاسخ به فرناز پرتو        

 

 

 

ایمیل :afshinrashidi@yahoo.com  

 

 

 

وب سایت  :  barnamenevisi.somee.com

 

 

 

موضوع : جاوا

 

 

 

متن نظر  :  سلام . پاسخ شما در قسمت Java در منوی سمت راست وجود دارد : در قسمت آرایه ها در جاوا مباحث مربوط به آرایه ها وجود دارد و در قسمت جاوا را بشناسیم از حلقه های تکرار و . . . استفاده شده است .

---------------------------------------------------------------------------------------------

نام : فرناز پرتو

 

 

 

ایمیل : f_farnaz80@yahoo.com 

 

 

 

موضوع : جاوا

 

 

 

متن نظر  :  نحوه استفاده از ارايه و ركوردومجموعه و ليست -دستورات انتساب -دستورات شرطي وحلقه ها - تعريف زير برنامه از شما خواهشمند هستم جوابم را سريع ارسال فرماييد.با تشكر

 

 

---------------------------------------------------------------------------------------------

نام : مدیر در پاسخ به محدثه

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

متن نظر  :  البته بقیه رو هم کار میکنم ولی ویژوال بیسیک - ASP به نظر خودم بهترم

 

 

 

 ---------------------------------------------------------------------------------------------

نام : محدثه

 

 

 

ایمیل :    mohadesejahrooomi

 

 

 

متن نظر  :  برنامه نویسی پایتون چیست ؟

 

 

---------------------------------------------------------------------------------------------

نام : مدیر در پاسخ به   googoo

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوع : بازگرداندن فايلها

 

 

 

متن نظر  :  با استفاده از نرم افزارهای File Recovery می توان فایلهایی که حذف شده اند را برگرداند . برای مثال برنامه های زیر این کار را انجام می دهند : Smart Flash Recovery - Zero Assumption Recovery - NT File Recovery - Data Doctor Recovery و  ...

 

 

 

 ---------------------------------------------------------------------------------------------

نام : مدیر در پاسخ به     sasan

 

 

 

ایمیل :   afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوع : فارسي نويسي در پي اچ پي

 

 

 

متن نظر  :  در پي اچ پی فارسی می توان نوشت ولی در حالت عادی هنگام نمایش صفحه به جای حروف فارسی علامتهای عجیب مثل علامت سوال و . . . نشان داده می شود که برای درست کردن آن از قطعه کد HTML زیر در بالای صفحه استفاده کنید :

 

<META http-equiv=Content-Type content="text/html; charset=utf-8”>

 

 

 

 ---------------------------------------------------------------------------------------------

نام : مدیر در پاسخ به حمید باقری

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوع txt  : 

 

 

 

متن نظر  :  فایل موجود مثلا با نام name.txt را ابتدا برای خواندن و نوشتن باز می کنید :

 

File *fp;

 

 fp=open("name.txt","r"+);

 

بعد هم قسمت هایی از فایل که می خواهید تغییر دهید را ویرایش کنید .برای اینکه به قسمت مورد نظر بروید می توانید از دستورهای Ftell و Fseek استفاده کنید .

 

 

 

 ---------------------------------------------------------------------------------------------

نام : مدیر در پاسخ به رقیه صفاری

 

 

 

ایمیل :   afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوعSQL Serve : 

 

 

 

متن نظر  :  آموزش گام به گام SQL Server قبلا در وب سایت قرار گرفته است . در منوی سمت راست به قسمت SQL Server بروید و فایل موجود را داونلود کنید . قبلا لازم است که در وب سایت ثبت نام کنید .

 

 

 

 ---------------------------------------------------------------------------------------------

نام : مريم

 

 

 

ایمیل :  raha_kimya@yahoo.com   

 

 

 

موضوع  C#  : 

 

 

 

متن نظر  :  برنامه اي تحت C# كه اضلاع مثلث را ازورودي بگيرد. مساحت و محيط آنرا حساب كندو بررسي كند مثلث متساوي الساقين هستن و همچنين اينكه قانون فيثاغورت را برروي آن بررسي كند

 

 

---------------------------------------------------------------------------------------------

نام   googoo  : 

 

 

 

ایمیل :  googoo.zarin@yahoo.com    

 

 

 

متن نظر  :  چطوری میشه پوشه ای رو که به خاطر نصب ویندوز حذف شده رو برگردوند

---------------------------------------------------------------------------------------------

نام : آزيتا

 

 

 

ایمیل :    asazitaaf1@yahoo.com

 

 

 

موضوع : crystalreport  در   asp.net 

 

 

 

متن نظر  :  سلام لطفا طریقه ایجاد کردنش را برای من بنویسید

---------------------------------------------------------------------------------------------

نام : رقيه صفاري

 

 

 

ایمیل : zari_saffari@yahoo.com    

 

 

 

موضوع : ارسال آموزش sql server

 

 

 

متن نظر  :  باسلام لطفا" اموزش گام به گام sql server را ارسال نماييد.

---------------------------------------------------------------------------------------------

نام : حمید

 

 

 

ایمیل    :    hamidb2020@yahoo.com

 

 

 

موضوع : تغییر txt

 

 

 

متن نظر  :  بازم سلام در مورد تغییر قایلهای text در هر نرم افزاری که میشه کار کرد اشکال نداره فقط کار کنه ممنون

---------------------------------------------------------------------------------------------

نام : حمید

 

 

 

ایمیل    :    hamidb2020@yahoo.com

 

 

 

موضوع : تغییر txt

 

 

 

متن نظر  :  سلام چطور برنامه ای بنویسم که یک قسمت ار فایل textرا عوض کونم در c واقعاً لازم دارم ممنون

 ---------------------------------------------------------------------------------------------

نام : ساسان

 

 

 

ایمیل : asasan66@yahoo.com   

 

 

 

موضوع : فارسی نوک

 

 

 

متن نظر  :  چطوری و با چه دستوری می توان در پی اج پی فارسی نوشت؟ نصب فارسی نوک 2 farsinuke چه فایده ای دارد ایا اگر ان را نصب کنم می توان در پی اج پی فارسی نوشت ؟

 ---------------------------------------------------------------------------------------------

نام : کامران

 

 

 

ایمیل :     kamranfarzam@yahoo.com

 

 

 

وب سایت  :  karimfarzam.blogfa.com

 

 

 

موضوع : برنامه نویسی  c++

 

 

 

متن نظر  :  طرح سوالات

 ---------------------------------------------------------------------------------------------

نام : اهورا

 

 

 

ایمیل :      msh241384@yahoo.com 

 

 

 

موضوع : برنامه به زبان   ++c

 

 

 

متن نظر  :  صف و توابع مربوط به آن را پیاده سازی کنیدبه گونه ای که امکان درج و حذف کاراکتر وجود داشته باشد این برنامه ابتدا 10کاراکتر از کاربر دریافت کند سپس 2 تای آنها را حذف و درخروجی نمایش دهد

 ---------------------------------------------------------------------------------------------

نام : پاسخ به  ahmad

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  : www.barnamenevisi.somee.com

 

 

 

موضوع : برنامه

 

 

 

متن نظر  :  سلام . تشكر از لطف شما . اين مدل برنامه ها رو مي تونيد تو قسمت جديدترين مطالب ( منوي سمت راست ) پيدا كنيد كه آخرين مطالب وب سايت را نمايش مي دهد . ان شا الله در آينده برنامه هاي بيشتري در وب سايت قرار مي دهيم .

 --------------------------------------------------------------------------------------------

نام : ahmad

 

 

 

ایمیل :     hmdrostami@yahoo.com

 

 

 

موضوع : سوال

 

 

 

متن نظر  :  بسمه تعالی با تشکر از شما برنامه maze خیلی جالب بود. از این مدل برنامه ها با توضیحاتشان را در سایت شما چطوری می تونم پیدا کنم ؟ ممنون

 ---------------------------------------------------------------------------------------------

نام : پاسخ به سوال مهديه

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوع : جستجو در ديتابيس

 

 

 

متن نظر  :  سلام .

 

 

 

البته اشاره نكرده ايد كه با كدام زبان برنامه نويسي باشد ولي در زبان ويژوال بيسيك براي اينكه نتايج جستجوي يك كليد را كه در Text Box وارد كردهايد را در Data Grid ببينيد مراحل زير را انجام دهيد‌:

 

 

 

1 – يك تكست باكس به فرم اضافه كنيد : Text1

 

2 – يك اي دي او به فرم اضافه كنيد : Ado1

 

3 – بر روي Ado1 كليك راست كرده و گزينه ADODC Properties‌را انتخاب كنيد . در برگه General روي Build كليك كرده گزينه Microsoft Jet 4.0 Ole DB Provider را انتخاب و Next  را بزنيد . حال با كليك بر روي دكمه … بانك اصلاعاتي خود را انتخاب كنيد و Ok را بزنيد .

 

4 – در پنجره Property Pages‌ ( همان پنجره اول ) و در تب RecordSource در كشو اول گزينه Adcmdtext را انتخاب كنيد و در command Text(Sql)   بنويسيد :

 

 

 

select * from tablename

 

 

 

البته به جاي Tablename نام جدول مورد نظر را بنويسيد و Ok را بزنيد .

 

5 – حالا يك ديتا گريد به فرم اضافه كنيد : Datagrid1 و ديتا سورس آن را به Ado1 تغير دهيد .

 

6 – يك دكمه به فرم اضافه كنيد : Command1

 

7 – حالا نوبت كد نويسي است كه البته 2 خط كد لازمه اون هم براي Command1_click‌:

 

 

 

Private Sub Command1_Click()

 

Ado1.RecordSource = "Select * from tablename where fieldname = '" + Text1.Text  + "'"

 

Ado1.Refresh

 

End Sub

 

 

 

توضيح كوتاه : به جاي tablename نام جدول و به جاي fieldname نام فيلدي كه مي خواهيد جستجو شود را وارد كنيد . پس ركوردهايي از جدول نمايش داده مي شود كه فيلد مورد نظر آن داراي مقداري باشد كه در تكست باكس وارد كرده ايم و اگرهيچ  ركوردي داراي اين مشخصات نباشد هيچ چيزي در ديتا گريد نمايش داده نمي شود . توجه كنيد كه دستور ado1.refresh حتما بايد نوشته شود در غير اين صورت جستجو انجام نمي شود . حال برنامه را اجرا كرده مشاهده ميكنيد كه ديتاگريد بر اساس كليدي كه در تكست باكس وارد كرده ايم به روز مي شود .

 

البته توضيحات رو به اين خاطر قدم به قدم گفتم تا افرادي كه با Ado و datagrid آشنايي ندارند هم بتونند از پاسخ سوال شما استفاده كنند .

 

موفق باشيد .

---------------------------------------------------------------------------------------------

نام : مهدیه

 

 

 

ایمیل :     mahdiyehsadat@yahoo.co.in

 

 

 

موضوع : جستجو

 

 

 

متن نظر  :  سلام لطفا کمک کنید من یک کد جستجو برای دیتابیس میخوام یعنی می خوام داخل تکس باکس هرچی نوشتم اطلاعات مربوط به اون را در داخل دیتاگرید ببینم باتشکر

---------------------------------------------------------------------------------------------

نام : پاسخ به s

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوع : بازي فكر و بكر

 

 

 

متن نظر  :  سلام . لطفا در مورد بازي فكر و بكر بيشتر توضيح دهيد كه نحوه بازي چگونه است .

 ---------------------------------------------------------------------------------------------

نام s :

 

 

 

ایمیل :      www.sum_s@ymail.com    

 

 

 

موضوع : بازی فکر و بکر

 

 

 

متن نظر  :  سلام در نوشتن برنامه ی بازی فکر و بکر(یا اطلاعات دانشجویی) به زبان C به کمکتان نیاز دارم Mer30

 

 

 

 ---------------------------------------------------------------------------------------------

نام : لعبت

 

 

 

ایمیل : laduli1365@yahoo.com    

 

 

 

موضوع : برنامه نویسی

 

 

 

متن نظر  :  با سلام لطفا برنامه نویسی به زبان c++ را به صورت گام به گام اموزش دهید

 

 

 

 ---------------------------------------------------------------------------------------------

نام : الناز

 

 

 

ایمیل : elnaz.1988.tehran@yaho..com     

 

 

 

متن نظر  :  سلام دوست عزیز . وقت به خير. از وبلاگ خیلی خوبتون تشکر می کنم.. من هم برای اینکه سهم کوچکی در قدرتمند كردن و زیباتر شدن وبلاگ شما داشته باشم به شما توصیه می کنم سرچ باکس این موتور جستجوگر قدرتمند را كه قادر به جستجو به همه زبانها است به سایت خود اضافه کنید. خيلي سرچ باكس هاش خوشكله . راهنماي كامل هم به زبان فارسي داره. نمونه و کد این سرچ باکس را می توانید در سایت اصلی موتور جستجوگر ببینید. در صفحه دريافت كد مي توانيد بر روي Persian Help كليك كنيد و راهنماي فارسي آنرا ببينيد. http://www.glseek.com/meta_search_box.html صفحه در يافت كد http://www.glseek.com/fa-searchbox.html صفحه راهنماي فارسي http://www.glseek.com صفحه اصلي موتور جستجوگر

---------------------------------------------------------------------------------------------

نام : مدير در پاسخ به مساله MAZING

 

 

 

ایمیل :    afshinrashidi@yahoo.com

 

 

 

وب سایت  :  www.barnamenevisi.somee.com

 

 

 

موضوع : مساله MAZING

 

 

 

متن نظر  :  با سلام .

 

اگر بخواهيم نقشه را خود كاربر وارد كند ( يعني محل هايي كه ديوار است ) مي توانيم چند عدد را با يك حلقه For و يك دستور Scanf كه كاربر محل ديوارها را وارد مي كند دريافت كنيم :

 

For (i=0;i<=18;i++)

 

Scanf("Enter Wall Location : %d,%d",&x,&y);

 

به اين ترتيب محل ديوارها توسط كاربر وارد مي شود .

 

براي افزايش و كاهش تعداد عناصر ماتريس هم كافي است اندازه آرايه دوبعدي را تغير دهيم ( مثلا 12*12) و مقدار متغيرهايي كه قبلا 10 بوده به 11 و آنهايي كه 11 بوده به 12 تغير دهيم .

 ---------------------------------------------------------------------------------------------

نام : مساله MAZING

 

 

 

موضوع : مساله MAZING

 

 

 

متن نظر  : 

 

salam khaste nabashid mamnoon az javabetoon mishe begid age bekhaim naghsharo khode karbar bede va noghteye voroodo khoroojam khodesh moshakhas kone bayad chikar konim? badesham man mihastam naghshe matrise 12*12 bashe vali in 11*11 merc mamnoon

 

---------------------------------------------------------------------------------------------

نام : مدير در پاسخ به مساله MAZING

ایمیل :
afshinrashidi@yahoo.com

وب سایت :
www.barnamenevisi.somee.com

موضوع : مساله
MAZING

متن نظر :

با سلام
دوست عزيز برنامه را بسيار خوب نوشته بوديد ولي چند خط از برنامه اشكال داشت كه بايد به صورت زير تصحيح شود :

#include "stdio.h"
#
include "conio.h"
#define wall '='
#
define vampoz 'O'
#
define p 'x'
#
define MB_OK 1
enum Directions { Left, Right, Up, Down, None, Finished };
//______________________________---
void draw(void);
void moveright(void);
void movedown(void);
void moveup(void);
void moveleft(void);
void init(void);
int findmove(char,char);
unsigned char path[12][12];
unsigned char vpx,vpy,px,py;
void main()
//******************************
{
clrscr();
init();
draw();
getch();
while(!(px==10 && py==10))
{ switch(findmove(px,py))
{
case 0:moveright();
break;
case 1:movedown();
break;
case 2:moveup();
break;
case 3:moveleft();
break;
default: puts("ERROR");break;
}
//
switch //
clrscr();
draw();
printf("%dpx %dpy\n",px,py);
if (!(px==10 && py==10))
puts("--------------------------------------------------");
else
puts("END");
getch(); }
return; }

//****************MAIN**********************
void draw(void)
{
int i,j;
for(i=0;i<11;i++){
for(j=0;j<11;j++)
printf("%4c",path[i][j]);
printf("\n");
printf("\n");
} }

//-----------------Draw-----------------
void init(void) {
int i,j;
puts("");
for(i=0;i<11;i++)
for(j=0;j<11;j++)
path[i][j]='O';
vpx=11;px=0;
vpy=11;py=0;
path[0][0]=p;
path[0][1]=wall;
path[0][4]=wall;
path[0][9]=wall;
path[1][2]=wall;
path[1][6]=wall;
path[1][8]=wall;
path[2][2]=wall;
path[2][6]=wall;
path[3][0]=wall;
path[3][4]=wall;
path[3][6]=wall;
path[4][4]=wall;
path[4][7]=wall;
path[4][8]=wall;
path[4][3]=wall;
path[5][8]=wall;
path[6][4]=wall;
path[6][8]=wall;
path[7][0]=wall;
path[7][2]=wall;
path[vpx][vpy]=vampoz;
path[8][3]=wall;
path[8][5]=wall;
path[10][3]=wall;
path[9][4]=wall;
path[9][9]=wall;
path[11][7]=wall;
path[8][9]=wall;
path[9][7]=wall;
path[11][9]=wall; }
//---------------
Init----------------------------
void moveup() { --px; path[px][py]=p; }

//----------------Moveup--------------------------
void movedown() { ++px; path[px][py]=p; }

//-------------------------Movedown------------------------
void moveright() { ++py; path[px][py]=p; }

//-------------------Moveright------------------------
void moveleft() { --py; path[px][py]=p; }

//-----------------Moveleft-------------------------
int findmove(char ax,char ay) {
/*
Right 0 Down 1 Up 2 Left 3 */
printf("%dx %dy\n",ax,ay);
if (ax==10 && ay==10)
{++
ax;
++
ay;
return -1; }
else if(path[ax][ay+1]!=wall && (ay+1)<11)
{
puts("right");
return 0; }
else if(path[ax+1][ay]!=wall && (ax+1)<11)
{
puts("down");
return 1;
}
else if(path[ax-1][ay]!=wall && (ax-1)>-1)
{
puts("up"); return 2; }
else if(path[ax][ay-1]!=wall && (ay-1)>-1)
{
puts("left"); return 3; }
else return -1;
}//--------------------Findmove------------------

 

---------------------------------------------------------------------------------------------

نام : مساله MAZING

موضوع : مساله
MAZING

متن نظر :

 salam khaste nabashin man barnameye maze ro bezabane c neveshtam vali tooo ejrash moshkel; dare age mishe komakam konid :

#include #

include

#include

 #include

 #define wall '='

#define vampoz 'O'

#define p 'x'

#define MB_OK 1

enum Directions { Left, Right, Up, Down, None, Finished   } ;

 void draw(void);

void moveright(void);

void movedown(void);

 void moveup(void);

void moveleft(void);

 void init(void);

 int findmove(char,char);

unsigned char path[12][12];

unsigned char vpx,vpy,px,py;

//********************************

void main() {

 clrscr();

 init();

 draw();

getch();

while(px!=vpx && py!=vpy) {

switch(findmove(px,py))

{ case 0:moveright(); break;

case 1:movedown(); break;

case 2:moveup(); break;

case 3:moveleft(); break;

default: puts("ERROR"); exit(1); break; }//switch

clrscr();

draw();

printf("%dpx %dpy\n",px,py);

puts("------------------------------------");

getch();}

switch(findmove(px,py)) {

case 0:moveright(); break;

case 1:movedown(); break;

case 2:moveup(); break;

case 3:moveleft(); break;

default: puts("ERROR"); exit(1); break; }//switch

 draw();

 puts("\nEND");

getch();

return;}

//***********MAIN*****************

void draw(void) {

int i,j;

for(i=0;i<11;i++){

for(j=0;j<11;j++) printf("%4c",path[i][j]);

printf("\n");

printf("\n");}

//------------Draw---------------------------

void init(void) {

int i,j;

puts("");

for(i=0;i<11;i++)

for(j=0;j<11;j++)

path[i][j]='O';

vpx=11;

px=0;

vpy=11;

py=0;

path[0][0]=p;

path[0][1]=wall;

path[0][4]=wall;

path[0][9]=wall

; path[1][2]=wall;

path[1][6]=wall;

path[1][8]=wall

; path[2][2]=wall;

path[2][6]=wall

; path[3][0]=wall;

path[3][4]=wall;

path[3][6]=wall;

path[4][4]=wall;

path[4][7]=wall;

path[4][8]=wall;

path[4][3]=wall;

path[5][8]=wall;

 path[6][4]=wall;

path[6][8]=wall

; path[7][0]=wall;

path[7][2]=wall;

path[vpx][vpy]=vampoz;

path[8][3]=wall;

path[8][5]=wall;

path[10][3]=wall

; path[9][4]=wall;

path[9][9]=wall;

path[11][7]=wall

; path[8][9]=wall;

path[9][7]=wall;

path[11][9]=wall;

}

//-------------------Init----------------------------

void moveup() {

--px;

path[px][py]=p;

}

//--------------------Moveup--------------------------

void movedown() {

++px;

 path[px][py]=p;

}

//-----------------Movedown------------------------

void moveright() {

++py;

path[px][py]=p;

{

//------------------Moveright------------------------

void moveleft() {

--py;

path[px][py]=p;

}

//------------------Moveleft-------------------------

int findmove(char ax,char ay) { /* Right 0 Down 1 Up 2 Left 3 */

printf("%dx %dy\n",ax,ay);

if(path[ax][ay+1]!=wall)

{ puts("right"); return 0; }

else if(path[ax+1][ay]!=wall)

{ puts("down"); return 1; }

else if(path[ax-1][ay]!=wall)

{ puts("up"); return 2; }

else if(path[ax][ay-1]!=wall) {