QQ登录

只需一步,快速开始

查看: 735|回复: 0
打印 上一主题 下一主题

ad0820程序

[复制链接]
跳转到指定楼层
1#
发表于 2010-2-25 11:42:19 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
这是我自己编的程序 不晓得对不对 请大家帮我看哈 有么问题
' K7 G# c/ d. U$ K- G/ z0 J程序代码:
: E( k! n0 Y& D! e+ r$ \. ?//ICC-AVR application builder : 2009-07-20 9:29:54
8 J1 t9 I0 |: ?# H" m) T1 K' Z. r// Target : M16
5 [7 p' H# d% Z4 f8 g// Crystal: 8.0000Mhz
+ i- U! T/ U- l#include <iom16v.h>! R- {& U! P% d7 E9 a- k3 H$ m
#include <macros.h>/ f: g8 O5 Y: G; s+ l- _9 ~
//#include <delay.h>   K6 g0 h4 f6 R* `0 B
#define uint unsigned int" @- }$ x& Z# O3 x$ U! g( v
#define uchar unsigned char
1 t& V7 m' ~: n3 Funsigned char Table[11]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x79};
5 T0 ^  e2 D  i- O# T7 i5 K3 [8 tunsigned char Data[4]={0,};int getdata;7 N2 J: w" p! J1 K7 @0 @' [
int a;
4 s% q" [: V+ a/ n5 |void DelayMs (unsigned int i)//延时函数
! }1 N* U1 e' W4 J{ , k, Q* I; E9 L+ _# e% X* i
unsigned int j;+ K4 r0 V0 U- U$ a. n. [5 ]" [
for (;i!=0;i--)
: K, W4 }/ Z& F2 X, Q' l7 M$ A for (j=50;j!=0;j--);( ]/ N! ~7 E; V
}4 n; R  V9 d1 h1 ~* V0 Y: b$ D
void delay_us() //延时子程序
  A- \. e7 k, |# |# ^{
* ]: ?9 Y2 a, n6 O9 n ;
* A. t8 s; z: K' Z$ j //while(--t);' h8 Q5 f) T1 ?" X8 @
}9 D: P% l% Y6 k9 [+ i
void dly(unsigned int t)
) [3 {7 B+ [! I. ]/ X{ ! @+ c3 z3 `, Q. e* p8 m, V
;8 k$ {/ ^/ g! y: F6 v& C+ |
}5 `, M6 k9 ]$ d: B6 M
void port_init(void), ]0 \# s7 J; |
{
" f( m9 i" F  k) I9 r PORTA = 0xFF;$ G% Q% ]5 N+ m  S! q8 o, F
DDRA = 0x00;
6 V6 L! m' X2 ~; v4 {9 U/ v$ f. }# u PORTB = 0xFb;7 g& b, \; x& O$ n5 E  T- w
DDRB = 0xFB;
: u5 q3 C- U% n* X7 N& \1 E PORTC = 0xfF;* e& k0 u- A( F2 ]( p2 B
DDRC = 0xfF;
$ }6 t2 r$ M  U/ f2 s PORTD = 0xFF;1 @) ?9 H4 u  U
DDRD = 0xFF;
7 |0 c8 _, V* O8 H8 \! Z6 q7 `( `+ j}) W+ L0 s; x" x
void Display(unsigned char *p)
1 K/ u( {; E- x{
# n2 ]- J/ ^3 m' j. M unsigned sel=0x01,i; 6 R  @: g' q+ [- o$ M# V" P& H
for(i=0;i<4;i++)
. x& e3 R& |* }# l { ' R6 b1 _, t  O/ f6 N5 V4 I, Q
PORTC=~sel;
% a* s0 O+ f: ^0 v& i( g PORTD=Table[p[3-i]];% A2 V; k! l+ u+ z  {
DelayMs(1);* W/ F" e1 N! z- V, x
sel=sel<<1;0 t+ z0 H: K& ^3 |$ H2 T: S$ S
}- B! p: W# A* X" _( S- q
}
+ T  B& E6 a/ X1 Xvoid xiangshi( int x)//led显示子程序
& t7 P3 ]# \: ]/ w {
7 G1 }( U& A5 b; Z Data[3]=x/1000;
' `7 Y" c+ ~# F9 _- P% i( G Data[2]=x%1000/100;1 F9 E4 K1 r& C. ]7 ]2 S8 z8 y2 L
Data[1]=x%100/10; & Q# F8 [1 }4 c6 b
Data[0]=x%10;
8 i1 }6 c, Z$ ^8 \  C }
: k) _- o9 I6 T1 i#pragma interrupt_handler jishi:10+ V8 C: v3 K( o# J, W+ x0 m# k
void jishi()
6 i# B" P8 O: M5 U. N& g& r. K{  _8 i  r& Y- `: c& W2 y* u$ T9 P
a++;
* g) e' s/ ?$ Z$ Q: y' f1 m a%=100000;
; d/ h7 E4 [0 c) W' }}
, ]* E0 _5 i# D! [- wvoid time()2 z3 @2 N' k" f
{! K5 v( W  H; T. f. L
TCCR1B=0X01;8 u1 x) g  u' Y
TCNT1H=0X7f;
9 K! ]- Z) K) q) u7 F( y9 G/ ? TCNT1L=0X9f;* D' l# Y$ N7 j( @6 S3 ]/ m
TIMSK|=BIT(2);
& R6 G5 m: }5 X  E SREG|=BIT(7);
+ ?; W* Y) ?3 x$ i$ w: ], ?: d}; L) U+ b" e& N9 O
void time0()! S+ q' C  R. G' i! o- x. p
{
# h& t& x3 q1 ~6 m4 x6 j7 @ TCCR0=0X04;$ x0 i# P7 z4 f. z
//OCR0=0XFF;% V) c0 u7 O8 B; j0 ~9 N
TCNT0=0X00;
- v- f+ I# T2 k; d TIMSK=BIT(1);
( T/ F* [4 E1 h SREG|=BIT(7);# ]6 f. n" r* I" k/ U  u
}
9 w* Q, i/ ^/ T* d9 Avoid main()) @  m( Z' _+ R
{
( i" l/ @+ q- @ port_init();
" D! z+ x6 ~  p time0(); - q0 y7 Y" D/ p
//time();# i2 D1 P) ~7 X0 \/ ]4 u
while(1)' M8 K* |7 N# l5 N! r2 i9 A
{ 5 a4 s5 U* D% C3 C
//PORTB&=0XFE;
) i$ a# R1 B% e, ?! ~! P- ~/ D //delay_us();
3 b- G8 J, o. _5 ^. m //PORTB|=0X01; 3 F4 O1 O% u- K: J
// getdata=PINA;
1 ^, d* ?2 N1 n& P7 j( l // }//从P2口读取数据// ) d) G8 f# C' t- |; Z3 a* H; n: L
// PORTB&=~BIT(1);//RD=1 使ADC输出数据
# v1 ~) v# l: R5 ^9 d( K xiangshi(a);7 k& {5 T' C( @( M+ w: K' F
Display(Data); //显示// ! t  W; b3 x; r
}
/ S7 n; A& D. C6 q* \8 T% D% o}
- ]2 O4 ]- g# H$ P, D  z8 d' r2 A( SADC0820.rar
) Y0 _, i3 H+ m) P7 V! E9 BtlC0820.part1.rar# @7 |5 T) R9 ~  D9 P
tlC0820.part2.rar
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 转播转播 分享分享 分享淘帖 顶 踩
内乡社区网免责声明:本文来源于网络、媒体投稿和用户自行发帖,与内乡社区网无关。其原创性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。如果本文内容有侵犯你的权益,请发送信息至702079960@qq.com,我们会及时处理。点击进入客服处理点击进入客服处理
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|内乡社区网 ( 豫ICP备12007913号-2 

GMT+8, 2025-2-23 18:10

Discuz! X3.3

© 2001-2018 Comsenz Inc.

快速回复 返回顶部 返回列表