?? logic.c
字號:
#include <avr/io.h>
#include <avr/pgmspace.h>
//#include <avr/interrupt.h>
//#include <avr/signal.h>
#include "logic.h"
#define DATAIN PINA
#define DATADIR DDRA
#define DATAOUT PORTA
#define LOCKDDR DDRB
#define LOCK PORTB
#define LE 0x01
#define lock LOCK&=(~LE) //LE=0，鎖存數據
#define unlock LOCK|=LE //LE=1，數據進入單片機
#define wait while(!(UCSRA&0x80)) //等待數據
#define waitTXC while(!(UCSRA&0x40)) //等待發送完成
#define clrTXC UCSRA |= 0x04 //清除發送完成標志
const prog_uchar delay_lo[] = {0, 3, 8, 28, 88, 188, 132, 220, 196,148,52, 116,244};
// 2us,5us,10us,20us,50us,100us,200us,500us,1ms,2ms,4ms,8ms,16ms
const prog_uchar delay_hi[] = {0, 1, 1, 1, 1, 1, 2, 4, 8, 16, 32, 63, 125};
int main()
{
uint8_t ram[2048];
/****************************初始化命令************************************/
/*管腳配置*/
//DDxn 用來選擇引腳的方向。DDxn 為"1“ 時， Pxn 配置為輸出，否則配置為輸入。
//引腳配置為輸入時，若PORTxn 為"1“，上拉電阻將使能。
//如果需要關閉這個上拉電阻，可以將PORTxn 清零，或者將這個引腳配置為輸出。
DATADIR = 0x00; //數據口設置為輸入
DATAOUT = 0x00; //關閉上拉電阻
LOCKDDR = (0x00|LE); //LE設置為輸出
unlock; //LE=0;
/*UART設置*/
UCSRA = 0x00; //
UCSRB = 0x18; //發送、接收使能
UCSRC = 0x06; //8位，無校驗
UBRRH = 0;
UBRRL = 25; //波特率為38400
while(1)
{
wait; //等待觸發位數據
trig = UDR;
wait; //等待觸發使能數據
trig_en = UDR;;
wait; //等待頻率低位
fre_lo = UDR;
wait; //等待頻率高位
fre_hi = UDR;
//分辨率={lo}{hi}
//2us=0x0402;5us=0x0a02;10us=0x1402;
//20us=0x2802;50us=0x6402;100us=0xc802;
//200us=0x3203;500us=0x7d03;1ms=0xfa03;
//2ms=0x7d04;4ms=0xfa04;8ms=0x7d05;16ms=0xfa05
wait; //等待預觸發數據
pre_trig = UDR;
wait; //等待預觸發數據
pre_trig = UDR;
wait; //等待工作模式
mode = UDR;
clrTXC;
UDR = 'D';
waitTXC;
for(addr=0; addr<2048; addr++)
ram[addr] = 0;
switch(fre_hi)
{
case 2:
if(fre_lo == 0x04)
sample_num = 0;
if(fre_lo == 0x0a)
sample_num = 1;
if(fre_lo == 0x14)
sample_num = 2;
if(fre_lo == 0x28)
sample_num = 3;
if(fre_lo == 0x64)
sample_num = 4;
if(fre_lo == 0xc8)
sample_num = 5;
break;
case 3:
if(fre_lo == 0x32)
sample_num = 6;
if(fre_lo == 0x7d)
sample_num = 7;
if(fre_lo == 0xfa)
sample_num = 8;
break;
case 4:
if(fre_lo == 0x7d)
sample_num = 9;
if(fre_lo == 0xfa)
sample_num = 10;
break;
case 5:
if(fre_lo == 0x7d)
sample_num = 11;
if(fre_lo == 0xfa)
sample_num = 12;
break;
}
addr = 0;
switch(mode)
{
case 0: //普通模式
start: if(sample_num > 12)
break;
addr = 0;
if(sample_num==0) //采樣頻率2us
{
pre_trig = 8; //采樣頻率為2us時不能預觸發
addr = 1;
while(1)
{
lock;
asm("nop");
asm("nop");
temp = DATAIN;
asm("nop");
asm("nop");
unlock;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
if(trig == (temp | trig_en))
break;
}
asm("nop");
asm("nop");
ram[0] = temp;
asm("nop");
asm("nop");
while(1)
{
lock;
asm("nop");
asm("nop");
ram[addr] = DATAIN;
asm("nop");
asm("nop");
unlock;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
asm("nop");
asm("nop");
if(addr_hi==8)
break;
}
}
else if(sample_num==1) //采樣頻率為5us
{
while(1)
{
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
lock;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
temp = DATAIN;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
unlock;
if(trig == (temp | trig_en))
{
addr_trig_lo=addr_lo;
addr_trig_hi=addr_hi;
break;
}
else
{
if(addr_hi == (8 - pre_trig)) //預觸發空間
{
addr_hi=0;
}
else
{
asm("nop");
asm("nop");
asm("nop");
}
}
ram[addr]=DATAIN;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
}
asm("nop");
asm("nop");
asm("nop");
addr_lo = 0x00;
addr_hi = 8 - pre_trig;
ram[addr]=temp;
addr_lo = 0x01;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
while(1)
{
lock;
asm("nop");
asm("nop");
asm("nop");
ram[addr] = DATAIN;
asm("nop");
asm("nop");
unlock;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
asm("nop");
asm("nop");
if(addr_hi==8)
break;
time_lo=pgm_read_byte(delay_lo + 1);
time_hi=pgm_read_byte(delay_hi + 1);
while(1)
{
asm("sub r12,r16");
asm("sbc r13,r17");
asm("nop");
if(!time_hi)
break;
}
}
}
else //大于5us
{
while(1)
{
lock;
asm("nop");
asm("nop");
asm("nop");
temp = DATAIN;
asm("nop");
asm("nop");
asm("nop");
unlock;
if(trig == (temp | trig_en))
{
addr_trig_lo=addr_lo;
addr_trig_hi=addr_hi;
break;
}
else
{
if(addr_hi == (8 - pre_trig)) //預觸發空間
{
addr_hi=0;
}
else
{
asm("nop");
asm("nop");
asm("nop");
}
}
asm("nop");
asm("nop");
asm("nop");
asm("nop");
ram[addr]=DATAIN;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
time_lo=pgm_read_byte(delay_lo + sample_num);
time_hi=pgm_read_byte(delay_hi + sample_num);
while(1)
{
asm("sub r12,r16");
asm("sbc r13,r17");
asm("nop");
if(!time_hi)
break;
}
}
addr_lo = 0x00;
addr_hi = 8 - pre_trig;
ram[addr] = temp;
addr_lo = 0x01;
asm("nop");
asm("nop");
asm("nop");
asm("ldi r16,1");
asm("ldi r17,0");
while(1)
{
time_lo=pgm_read_byte(delay_lo + sample_num);
time_hi=pgm_read_byte(delay_hi + sample_num);
asm("nop");
asm("nop");
while(1)
{
asm("sub r12,r16");
asm("sbc r13,r17");
asm("nop");
if(!time_hi)
break;
}
lock;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
ram[addr] = DATAIN;
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
asm("nop");
unlock;
asm("nop");
asm("nop");
asm("nop");
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
asm("nop");
asm("nop");
for(temp=0;temp<1;temp++)
asm("nop");
if(addr_hi==8)
break;
}
}
break;
case 1: //外部時鐘，上升延
trig |= 0x01;
trig_en |= 0x01;
addr = 0;
while(1)
{
do
{
temp = DATAIN;
}
while(temp & 0x01);
do
{
temp = DATAIN;
}
while(!(temp & 0x01));
if(trig == (temp | trig_en))
{
addr_trig_lo=addr_lo;
addr_trig_hi=addr_hi;
break;
}
else
{
if(addr_hi == (8 - pre_trig)) //預觸發空間
{
addr_hi=0;
}
}
ram[addr]=temp;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
}
addr_lo = 0x00;
addr_hi = 8 - pre_trig;
ram[addr] = temp;
addr_lo = 0x01;
while(1)
{
do
{
temp = DATAIN;
}
while(temp & 0x01);
do
{
temp = DATAIN;
}
while(!(temp & 0x01));
ram[addr]=temp;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
if(addr_hi==8)
break;
}
break;
case 2: //外部時鐘，下降延
trig |= 0x01;
trig_en |= 0x01;
addr = 0;
while(1)
{
do
{
temp = DATAIN;
}
while(!(temp & 0x01));
do
{
temp = DATAIN;
}
while(temp & 0x01);
if(trig == (temp | trig_en))
{
addr_trig_lo=addr_lo;
addr_trig_hi=addr_hi;
break;
}
else
{
if(addr_hi == (8 - pre_trig)) //預觸發空間
{
addr_hi=0;
}
}
ram[addr]=temp;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
}
addr_lo = 0x00;
addr_hi = 8 - pre_trig;
ram[addr] = temp;
addr_lo = 0x01;
while(1)
{
do
{
temp = DATAIN;
}
while(!(temp & 0x01));
do
{
temp = DATAIN;
}
while(temp & 0x01);
ram[addr]=temp;
asm("ldi r16,1");
asm("ldi r17,0");
asm("add r10,r16");
asm("adc r11,r17");
if(addr_hi==8)
break;
}
break;
case 3: //外部觸發，上升延
trig = 0xff;
trig_en = 0xfe;
pre_trig = 8;
goto start;
break;
case 4: //外部觸發，下降延
trig = 0xfe;
trig_en = 0xfe;
pre_trig = 8;
goto start;
break;
case 5: //靜態模式
break;
case 7: //二進制模式
pre_trig = 8;
for(addr=0; addr<2048; addr++)
ram[addr] = addr_lo;;
break;
case 8: //AA、55模式
pre_trig = 8;
for(addr=0; addr<2048; addr++)
{
if(addr&0x01)
ram[addr] = 0x55;
else
ram[addr] = 0xaa;
}
break;
case 9: //全為0
pre_trig = 8;
for(addr=0; addr<2048; addr++)
ram[addr] = 0;
break;
}
if(pre_trig != 8) //預觸發不為0%
{
addr = addr_trig;
for(;addr<2048;)
{
clrTXC;
UDR=ram[addr];
waitTXC;
addr++;
if(addr_hi == 8 - pre_trig)
{
addr = 0;
}
if(addr == addr_trig)
{
break;
}
}
}
addr_lo = 0x00;
addr_hi = 8 - pre_trig;
for(;addr<2048;addr++)
{
clrTXC;
UDR=ram[addr];
waitTXC;
}
}
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -