رفع ایراد در برنامه های Bascom - Protus

[mapmap]

سلام
بنده یه کمک از شما دوستان خواستم که در خصوص ADC چن تا مثال بزنید
دوستان زحمت کشیدن چن تا نمونه برام گذاشتن که تو اجرای این نمونه ها مشکل دارم
دوباره مجبور شدم شماها رو زحمت بدم و مشکل منو برام روشن کنید
ممنون
این برنامه :
$regfile "m32def.dat"
$crystal = 8000000 '\
Config Lcd = 16 * 2
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Lcdpin = Pin , Db4 = Pinb.2 , Db5 = Pinb.3 , Db6 = Pinb.4 , Db7 = Pinb.5 , _
E = Pinb.0 , Rs = Pinb.1
Cls
Dim A2d As Word
Up:
Do
A2d = Getadc(0)
Locate 1 , 1
Lcd A2d
Loop
End

و اینم عکس :



قبلا" از کمکتون متشکرم
بدرود

[ATA.Mega64]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

دوست عزیز مدار و برنامه شما چندتا مشکل کوچولو داره. :agree:

در شماتیکت اولا باید پایه VDD در LCDو AREF و AVCC در میکروتو به VCC وصل کنی تا شماتیکت درست کار کنه.

و در برنامه میکرو هم به نظر من اگه مقدار REFRENCE رو INTRNAL تغییر بدی بهتره.
موفق باشی

[mapmap]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

از راهنماییتون ممنونم
دستورات شما رو اجرا کردم اما دوباره نشد!!!!
چـــــــــــــــــــــــــــــــــــرا؟؟؟ :sad: :surprised: :cry: :cry2:

[ATA.Mega64]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

راستش من دقیقا شماتیک شمارو با برنامه شما بستم و البته تغییراتی که گفتم رو درش ایجاد کردم و به درستی کار میکرد.
حالا نمیدونم مشکل شما از کجاست.احتمالا پروتئوست مشکلی چیزی داره یا شاید پتانسیومتری که در مدارت انتخاب میکنی Active نیست.یعنی مخصوص شبیه سازی نیست.
بیشتراوقات انتخاب کردن مقدار اینترنال برای refrence بهترین گزینست.(مطمئنی که refrence رو به internal تغییر دادی؟ :NO:
راستی برای نمایش مقدار درست روی lcd باید توی حلقه لوپ دستور cls هم بزاری تا زمانی که مقدارش کمتر از 4 رقمه درست نشون بده. :NO:
الآن من جایی هستم که پروتئوس و بسکام نداره.شب که رفتم خونه یه برنامه مینویسم و با شماتیک برات میفرستم تا کارت راه بیفته.

[ATA.Mega64]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

سلام.
الوعده وفا.



اینم ساده ترین مداری که با ADC میکرو میشه بست.
پتانسیومتر و تغییر میدی ADC تغییر میکنه.فقط توی پروتئوس خطی نشون نمیده.ولی در واقعیت کاملا خطیه.
برنامش رو هم میتونی ببینی.

$regfile "m32def.dat"
$crystal = 4000000 '\
Config Lcd = 16 * 2
Config Adc = Single , Prescaler = Auto , Reference = Internal
Config Lcdpin = Pin , Db4 = Pinc.2 , Db5 = Pinc.3 , Db6 = Pinc.4 , Db7 = Pinc.5 , E = Pinc.1 , Rs = Pinc.0
Cls
Dim A2d1 As Word , A2d2 As String * 4
Cursor Off

Up:
Do
A2d1 = Getadc(0)
A2d2 = Str(a2d1)
A2d2 = Format(a2d2 , "0000&quot
Locate 1 , 1
Lcd A2d2
Loop
End

ok؟

[mapmap]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

با عرض ادب

Dr.Xylitol جون ـ از اینکه برای حل مشکلم وقت گذاشتی ممنون و امیدوار به جبرانم

راستش همه کارای شما رو عینا" انجام دادم امـــــــــــــــــــــــا نشد که نشد oo:

حالا مطمئنم که مشکل از برنامه بسکام یل پروتئوسمه :agree:

میشه بگین ورژن برنامه هاتون چنده؟؟
بسکام من 1.11.9.0
و پروتئوسم 7.6 SP4
هستش

[mapmap]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

:cry2: :angry: :angry: :angry:

[حمیدرضا رضایی]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

با عرض ادب

Dr.Xylitol جون ـ از اینکه برای حل مشکلم وقت گذاشتی ممنون و امیدوار به جبرانم

راستش همه کارای شما رو عینا" انجام دادم امـــــــــــــــــــــــا نشد که نشد oo:

حالا مطمئنم که مشکل از برنامه بسکام یل پروتئوسمه :agree:

میشه بگین ورژن برنامه هاتون چنده؟؟
بسکام من 1.11.9.0
و پروتئوسم 7.6 SP4
هستش

منم از همین ورژن ها استفاده میآکنم
فایل های پروتئوس(DSN) و بیسکام(bas وHex) پروژه رو پلود کن تا یه تستی بکنم.

[mapmap]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

پلود کردن عکس رو بلدم اما فایل رو نه
شرمنده

اما همون پروژهای صفحه قبل رو دقیقا" اجرا کردم هم برنامه خودم هم برنامه دوست نازنینم Dr.Xylitol
لطفا" منو فراموش نکنید این موضوع یه هفته اس منو اذیت میکنه!!!!!

مرازگساپس ( برعکس بخونید !!!)
:biggrin:

[حمیدرضا رضایی]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

پلود کردن عکس رو بلدم اما فایل رو نه
شرمنده

همهآی فایل ها رو زیپ کن بعد برو تو این سایت:
http://www.persiandrive.com

[mapmap]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

آقا hamid67 گل
خداشاهده این سایت رو که دادین باز نمیشه - فکر کنم ایراد از Browser منه
و چون تو این سیستم Administor نیستم نمیتونم یه Browser دیگه نصب کنم
اگه شما زحمت بکشین و اینارو با دقت بخونید متوجه میشید

این عکس پروژه ( در پروتئوس SP4 7.6
:NO:


اینم برنامه در Bascom 1.11.9.0
:NO:
$regfile "m32def.dat"
$crystal = 4000000 '\
Config Lcd = 16 * 2
Config Adc = Single , Prescaler = Auto , Reference = Internal
Config Lcdpin = Pin , Db4 = Pinc.2 , Db5 = Pinc.3 , Db6 = Pinc.4 , Db7 = Pinc.5 , E = Pinc.1 , Rs = Pinc.0
Cls
Dim A2d1 As Word , A2d2 As String * 4
Cursor Off

Up:
Do
A2d1 = Getadc(0)
A2d2 = Str(a2d1)
A2d2 = Format(a2d2 , "0000&quot
Locate 1 , 1
Lcd A2d2
Loop
End


اجرت با ادیسون
:agree:
ممنون

[ATA.Mega64]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

سلام.
ببخشید که دیر جواب دادم.یه سری مشکلات بود که نمیتونستم به سایت سر بزنم. :redface:
پروتئوس من 7.7 و بیسکام 1.11.9.8 استفاده میکنم.
اگه این ورژن ها رو داشته باشی،میتونی سورس های بسکام رو در پروتئوس دیباگ کنی و ببینی مشکل کارت از کجاست.البته اگه نرم افزار هات ایراد نداره.
دانلود بسکام ورژن 1.11.9.8
http://yazdkit.com/download/bascom_1.11.9.8-www.yazdkit.com.zip
دانلود پروتئوس ورژن 7.7SP2
http://yazdkit.com/download/pr-7.7_sp2.zip

پروتئوس رو دانلود میکنین و نصب.
برنامه رو مینویسی و کامپایل میکنی.یه فایل با پسوند .obj میسازه.
شماتیکتو توی پروتئوس میکشی و به میکرو به جای فایل hex فایل obj رو میدی.
بعد هرجای برنامه به جای play دکمه pouse رو بزنی سورس بیسکام رو باز میکنه و میتونی ببینی ایراد کارت چیه.

اگه نرم افزار مشکل نداشته باشه برنامه ایراد نداره.
بازم اگه سوالی چیزی بود بپرسی در خدمتم.
راستی درمورد توضیحات بیسکام و پروتئوس و دیباگ کردن سورس ها توی سایت www.yazdkit.com توضیح کامل داده.
یه چیز دیگه.شاید اشکال کار از اینکه سیستمت شبکست و Administrator نیستی باشه.آخه ورژنهای کرک شده اینجور نرم افزار ها توی شبکه خوب کار نمیکنن.
موفق باشی.

[حمیدرضا رضایی]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

والا من که تست میآکنم ، جواب میآده
کاش حداقل فایل Hex رو میآذاشتی

[mapmap]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

از اینکه برام وقت گذاشتی و لینکا رو برام گذاشتی ممنونم
مشکلم به کمک یه دوست دیگه تو همین سایت حل شد
مشکلم این بود که Start ADC نداشتم

سوالهای زیادی دارم اما فکر میکنم اگه بپرسم سوئ استفاده کردم
وقت طلاست
پس وقت شمارو اگه مجبور شدم میگیرم
:biggrin:
بدرود

[mohammad qc]

پاسخ : رفع ایراد در برنامه های Bascom - Protus

با سلام به دوستان
نرم افزار بسکام ورژن 1.11.9.8 را روی ویندوز سون 64 بیتی نصب کردم و کرک هم شد ولی با پروگرامر k200/k300 کار نمی کند و ارور
could not identify می دهد لطفا کمک کنید مشکل از کجاست در ضمن با ورژن 1.11.9.5 و ویندوز سون 64 بیتی دیگری نیز تست کردم اما مشکل همچنان باقی است .
باتشکر