مشکل با مگا 8

[milad brave]

سلام
دئستان یه سوال گرفتن adc تو مگا 8 فرق داره با سابر مگا هااا؟؟؟
من چندین پروژه با مگا 32 و 16 انجام دادم و گرفتن adc اصلا مشکلی نبود حالا که مگا 8 برداشتم اصلا رو ال سی دی هیچی نشون نمیده
تو هر زبانی هم نوشتم نشد
بنظرتون مشکل کار کجاست؟؟
لطفا فووری جوا بدین!

$regfile = "m8def.dat"
$crystal = 1000000

Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portb.3 , Rs = Portd.7





Dim A As Word , B As Single , C As Byte

Start Adc

Q:
Do
A = Getadc(0)
B = A
B = B * 2.046
Lcd "megdar :" ; B
Waitms 150

Loop

[mahdi8866]

پاسخ : مشکل با مگا 8

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

[mahdi8866]

پاسخ : مشکل با مگا 8

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

config lcd=16*2

[milad brave]

پاسخ : مشکل با مگا 8

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

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

[milad brave]

پاسخ : مشکل با مگا 8

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

config lcd=16*2

نه بابا به اون ربطی نداره

[mahdi8866]

پاسخ : مشکل با مگا 8

این کد رو تست کن پین rs و e رو عوض کردم

$regfile = "m8def.dat"
$crystal = 1000000


Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portd.3 , Rs = Portd.4


Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc

Dim A As Word , B As Single , C As Byte




Do
A = Getadc(0)


Lcd "megdar :" ; A
Waitms 150

Loop

[milad brave]

پاسخ : مشکل با مگا 8

این کد رو تست کن پین rs و e رو عوض کردم

$regfile = "m8def.dat"
$crystal = 1000000


Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portd.3 , Rs = Portd.4


Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc

Dim A As Word , B As Single , C As Byte




Do
A = Getadc(0)


Lcd "megdar :" ; A
Waitms 150

Loop

جواب نداد اصلا ال سی دی خالیه خالیه

[mahdi8866]

پاسخ : مشکل با مگا 8

سلام
البته اینم بگم تنظیم فیوزبیت ها در خود پرتئوس مهمه ها همچنین فعال بودن تیک watch dog
میخوای یه عکس از فیوزبیت پرتئوس بذار و هم چنین مدار

[milad brave]

پاسخ : مشکل با مگا 8

سلام
البته اینم بگم تنظیم فیوزبیت ها در خود پرتئوس مهمه ها همچنین فعال بودن تیک watch dog
میخوای یه عکس از فیوزبیت پرتئوس بذار و هم چنین مدار

اینم از مدار

[mahdi8866]

پاسخ : مشکل با مگا 8

لطفا پایه 3 السی دی رو به gnd بزنید وتست کنید همچنین پایه 1 رو به gnd
و 2 رو هم به vcc درصورت احتیاط

[milad brave]

پاسخ : مشکل با مگا 8

لطفا پایه 3 السی دی رو به gnd بزنید وتست کنید همچنین پایه 1 رو به gnd
و 2 رو هم به vcc درصورت احتیاط

مهندس جان ال سی دی مشکل نداره هر چی مینویسم نشون میده فقط مقدار adcنشون نمیده

[gmaissam]

پاسخ : مشکل با مگا 8

برنامتون برا من جواب میده

[mahdi8866]

پاسخ : مشکل با مگا 8

شما بیا میکرو رو در پرتئوس عوض کن مثلا بذار atm32 ببین باز همینطوره ؟اگه درست شد احتمال داره مشکل از کتابخونه atm8 باشه
یچیز دیگه قبل اینکار ولتاژ رفرنس یا مرجع adc رو از avcc بهinternal بذار ببین چی میشه

[MohammadMers]

پاسخ : مشکل با مگا 8

داداش شما تغزیه adc رو وصل کردی؟؟

پایه 20 و 21 به +5 و 22 رو به گرند وصل کن ببین جواب میده

[milad15]

پاسخ : مشکل با مگا 8

سلام

اقا شما کلا تغذیه ال سی دی رو وصل نکردید :eek:

این پایه های ال سی رووصل کنید ببینید روشن میشه؟

1 به تغذیه مثبت
2 با یه مقاومت به تغذیه مثبت
3 به زمین