برای اینکه از یک پورت برای اتصال هر دو سون سگمنت استفاده کنی و باید کاتد مشترک سون سگمنت ها را با ترانزیستور به پینهای دیگر میکرو وصل کنی. در cod vision هم در یکwhile بی نهایت ابتدا یک متغیر برای شمارش تعریف میکنی بعد رقم های یکان ودهگان عدد را جدا میکنی واز روش تقسیم زمانی این یکان و دهگان را روی پورت سون سگمنت میریزی . اگه کد برنامه همراه فایل پروتئوس را میخواهید بگو تا براتون بذارم .
این برنامه تا 9999 را در 4 سون سگمنت می شمارد .
کد برنامه code vision :
Chip type : ATmega32
Program type : Application
Clock frequency : 1.000000 MHz
Memory model : Small
External SRAM size : 0
Data Stack size : 512
************************************************** ***/
#include <mega32.h>
#include <delay.h>
// Declare your global variables here
int count=0;
char a,b,c,d,i;
flash char sev[10] ={0X3F,0X06,0X5B,0X4F,0X66,0X6D,0X7D,0X07,0X7F,0X6 F};
void main(void)
{
// Declare your local variables here
// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
ACSR=0x80;
SFIOR=0x00;
while (1)
{
// Place your code here
a=count/1000;
b=(count%1000)/100;
c=(count%100)/10;
d=count%10;
while (i<=25)
{
PORTA=sev[a];
PORTB=0X01;
delay_ms(10);
PORTA=sev[b];
PORTB=0X02;
delay_ms(10);
PORTA=sev[c];
PORTB=0X04;
delay_ms(10);
PORTA=sev[d];
PORTB=0X08;
delay_ms(10);
i++;
};
count++;
};
};
لینک فایل عکس پروتئوس :http://persiandrive.com/40488
البته یک جای این برنامه هنوز اشکال دارد که من متوجه نشدم اگه شما فهمیدی به ما هم بگو .
PORTA=sev[b]; باید بذاری در چند خط اخیر اون را جا گزاشتی
با درود . . .
دوست عزیز ورودتون به سایت رو تبریک عرض میکنم.
ممنون از اینکه مشکل رو رفع کردید.
لطفا قبل از ارسال جواب جهت کمک به سایر دوستان به تاریخ آخرین ارسال موضوع توجه نمائید.
با سپاس
موفق باشید
درد من تنهایی نیست؛ بلکه مرگ ملتی است که گدایی را قناعت، بیعرضگی را صبر، و با تبسمی بر لب این حماقت را حکمت خداوند می نامند! "گاندی"
به دلیل وجود برخی مشکلات و بی احترامی ها این اکانت رو غیر فعال کردم. همیشه سر بلند باشید.
بدرود . . .
آموزش سون سگمنت رو قبلا خودم گذاشته بودم!
این لینکش:
http://www.eca.ir/forum2/index.php?topic=82242.msg501926#msg501926
از مقدماتی تا حرفه ای هم آموزش داده شده ...
دانلود کن امیدوارم مفید واقع بشه! :nerd: :nice:
آنچه که باعث موفقیت انسان ها می شود سخت کوشی است و نه نخبه بودن! Porsche 911 Turbo S 181.000 $ USD
جناب سعدی فرموده بودند: "بر احوال ان مرد باید گریست _ که دخلش بود نوزده، خرجش بیست!"
که اگه الان بود باید میگفت: "بود حال و احوال آن مرد زار _ که دخلش ریال است ، خرجش دلار :|"
http://www.eca.ir/forum2/index.php?topic=80472.msg489565#msg489565
http://www.eca.ir/forum2/index.php?topic=82242.msg501926#msg501926
دیدگاه