?? 工頻參數測試.c
字號:
//系統晶振為8Mhz
#include <iom128v.h>
#include <math.h>
#define data_port PORTA
//ASK=PORTE.6
#define ask (PINE&0x40)
//ANSWER=PORTE.7
#define set_answer asm("sbi 0x03,7")
#define clr_answer asm("cbi 0x03,7")
//RESTE=PORTC.3
#define set_reset asm("sbi 0x15,3")
#define clr_reset asm("cbi 0x15,3")
#define wait asm("nop\n nop")
#define ICP1 PIND4
const unsigned char table[]={0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,
0x38,0x39,0x41,0x42,0x43,0x44,0x45,0x46};
/**********************************/
float maxu,maxu0,maxi,maxi0,P,Q,G;
#define ICP1 PIND4
#define uchar unsigned char
#define uint unsigned int
uchar flag=0;//標志位
uint rise1,rise2;
uchar ov,k=0;
float t0;
unsigned char lcd_buff[6]={0,0,0,0,0,0};
/*********************************/
unsigned char t1;
unsigned long temp,j;
unsigned long max;
unsigned long mem[90];
/*********************************/
void delay_ms(unsigned char x)
{
unsigned char i,m,n,t;
for(i=0;i<=x;i++)
for(m=0;m<10;m++)
for(n=0;n<10;n++)
for(t=0;t<50;t++);
}
void ocmj_init(void)
{
MCUCR=0;
DDRA=0xff;
PORTA=0xff;
DDRE=0b10000000;
PORTE=0xff;
clr_reset;//LCD
delay_ms(1);
set_reset;
clr_answer;
delay_ms(1);
}
/**********************************************/
/*LCD */
/**********************************************/
void ocmj_write(unsigned char data)
{
while(ask!=0)
;
data_port=data;
wait;
set_answer;
wait;
while(ask==0)
;
clr_answer;
}
/**********************************************/
/* ASCII*/
/**********************************************/
void write_ASCII(unsigned type,unsigned xx,unsigned yy,unsigned data)
{
ocmj_write(type);
ocmj_write(xx+4);
ocmj_write(yy);
ocmj_write(data);
}
/**********************************************
寫漢字到LCD
**********************************************/
void hz_tran(unsigned char x,unsigned char y,unsigned char *hz_p)
{
x+=2;
while((*hz_p)!=0)
{
ocmj_write(0xf0);
ocmj_write(x);
ocmj_write(y);
ocmj_write(*hz_p-0xa0);
hz_p++;
ocmj_write(*hz_p-0xa0);
hz_p++;
if(x<0x09)
x++;
else
{
x=0x02;
y++;
}
}
}
void lcd_display(void)
{
write_ASCII(0xf9,5,32,table[lcd_buff[5]]);
write_ASCII(0xf9,6,32,table[lcd_buff[4]]);
write_ASCII(0xf9,7,32,0x2e);
write_ASCII(0xf9,8,32,table[lcd_buff[3]]);
write_ASCII(0xf9,9,32,table[lcd_buff[2]]);
write_ASCII(0xf9,10,32,table[lcd_buff[1]]);
}
void zhuanhuan(float y1)
{
unsigned int y;
y1=y1*5/1024;
y=(unsigned int)(y1*10000);
lcd_buff[5]=y/100000;
lcd_buff[4]=y%100000/10000;
lcd_buff[3]=y%10000/1000;
lcd_buff[2]=y%1000/100;
lcd_buff[1]=y%100/10;
lcd_buff[0]=y%10;
}
/**********************************************/
/* 測相位 */
/**********************************************/
#pragma interrupt_handler time1_ov:15
void time1_ov(void)
{
ov++;
}
#pragma interrupt_handler time1_capt:12
void time1_capt(void)
{
if(ICP1)
{
if(PING=0x02)
{
rise1=ICR1;
PING=0x03; //多路開關
}
else if(PING=0x03) //電流
{
rise2=ICR1;
t0=(float)((unsigned long)rise2-(unsigned long)rise1+ov*65535);//計算結果
t0=(float)(0.0025133*t0);
PING=0x00; //多路開關復位
ov=0;
}
}
}
void capt_unit(void)
{
DDRD=~(1<<4);
TCNT1=0;
TIMSK=0X24;//TC1捕獲中斷允許
TCCR1B=0x43;//TC1初始化，64分頻，上升沿觸發
}
/***************************************
數據采集
***************************************/
void timer0_init(void)
{
SREG=0x80;
TCCR0 = 0x00; //stop
ASSR = 0x00; //set async mode同步方式
TCNT0 = 0x90; //set count
TCCR0 = 0x02; //start timer 8分頻
TIMSK=0x01;
}
#pragma interrupt_handler timer0_ovf_isr:17
void timer0_ovf_isr(void)
{
ADCSRA|=(1<<ADSC);
t1++;
}
void adc_init(void)
{
SREG=0x80;
ADCSRA=0x88; //16分頻
ADMUX=0x03;
}
#pragma interrupt_handler adc:22
void adc(void)
{
if(j<90)
{
mem[j]=ADC&0x03ff;
j++;
}
else
{
TIMSK=0x00;
j=0;
}
}
void comp()
{
unsigned char i;
if(t1==90)
{
max=mem[0];
for(i=0;i<90;i++)
{
if(max<mem[i])
max=mem[i];
}
t1=0;
}
}
void shujucaiji(void)
{
unsigned char i;
ADCSRA|=(1<<ADSC);//控制和狀態寄存器，使能ADC，關閉轉換 中斷允許 32分頻
while(1)
{
comp();
TIMSK=0x01;
if(t1==0) break;
}
}
/***************************************
鍵盤子程序
***************************************/
unsigned char scan_key(void)
{
unsigned char i,temp;
DDRB=0x0f;
PORTB=0xff;
for (i=0;i<4;i++)
{
PORTB=~(1<<i); //鍵盤線掃描
delay_ms(1); //等待低電平穩定
temp=PINB&0xf0;//讀取鍵盤掃描信號,屏蔽低四位
if (temp!=0xf0)//如果有鍵按下，延時10ms消抖
{ //本程序用display代替10ms延時,
delay_ms(1); //可消除顯示抖動
temp=PINB&0xf0;//再讀鍵盤
if (temp!=0xf0)
{
temp&=0xf0;
switch (temp) //計算鍵值
{
case 0x70:temp=15-(3-i)*4;break;
case 0xb0:temp=14-(3-i)*4;break;
case 0xd0:temp=13-(3-i)*4;break;
case 0xe0:temp=12-(3-i)*4;break;
default:break;
}
return temp;
}
}
}
return 0xff;
}
/********************************/
void controlcmd_ocmj(unsigned char key11)
{ unsigned char i;
// if(key11==5)
// {
PING=0x00;
if(PING=0x00)
{ shujucaiji();
maxu=maxu0=max;
PING=0x01;
}
else if(PING=0x01) //多路開關轉換
{
shujucaiji();
maxi=maxi0=max;
PING=0x00; //多路開關回電壓位
}
// }
switch (key11)
{
case 0:
ocmj_write(0xf4);
//shujucaiji();
hz_tran(3,1,"電壓");
zhuanhuan(maxu);
lcd_display();
break;
case 1:
ocmj_write(0xf4);
//shujucaiji();
hz_tran(3,1,"電流");
zhuanhuan(maxi);
lcd_display();
break;
case 2:
ocmj_write(0xf4);
P=maxu0*maxi0*5*(float)cos(t0)/1024;
hz_tran(2,1,"有功功率");
zhuanhuan(P);
lcd_display();
break;
case 3:
ocmj_write(0xf4);
Q=maxu0*maxi0*5*(float)sin(t0)/1024;
hz_tran(2,1,"無功功率");
zhuanhuan(Q);
lcd_display();
break;
case 4:
ocmj_write(0xf4);
G=(float)(cos(t0));
hz_tran(2,1,"功率因數");
zhuanhuan(G);
lcd_display();
break;
default :break;
}
}
/***************************************
開機界面子程序
***************************************/
void jiemian(void)
{
ocmj_write(0xf4);
hz_tran(1,0,"工頻參數測試");
hz_tran(0,1,"課題組成員");
write_ASCII(0xf9,10,16,0x3a);
hz_tran(1,2,"石夢軍");
hz_tran(5,2,"張達敏");
hz_tran(0,3,"指導老師");
write_ASCII(0xf9,8,48,0x3a);
hz_tran(5,3,"張一斌");
delay_ms(200);
delay_ms(200);
ocmj_write(0xf4);
hz_tran(1,0,"按鍵功能說明");
hz_tran(0,1,"電壓");
write_ASCII(0xf9,4,16,0x20);
write_ASCII(0xf9,5,16,0x30);
hz_tran(3,1,"有效功率");
write_ASCII(0xf9,14,16,0x20);
write_ASCII(0xf9,15,16,0x32);
hz_tran(0,2,"電流");
write_ASCII(0xf9,4,32,0x20);
write_ASCII(0xf9,5,32,0x31);
hz_tran(3,2,"無功功率");
write_ASCII(0xf9,14,32,0x20);
write_ASCII(0xf9,15,32,0x33);
hz_tran(3,3,"功率因數");
write_ASCII(0xf9,14,48,0x20);
write_ASCII(0xf9,15,48,0x34);
hz_tran(0,3,"復位");
write_ASCII(0xf9,4,48,0x20);
write_ASCII(0xf9,5,48,0x35);
}
void main(void)
{
unsigned char key;
DDRG=0xff; //多路開關用G口控制
PING=0x02;
SREG=0x80;
clr_answer;
ocmj_init();
capt_unit();
timer0_init();
adc_init();
jiemian();
ADCSRA|=(1<<ADSC);//控制和狀態寄存器，使能ADC，關閉轉換 中斷允許 32分頻
while(1)
{
key=scan_key();
PING=0x02;
controlcmd_ocmj(key);
}
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -