會員中心
會員注冊現在將一個實際編制的、帶有調整時間功能的算盤碼新型時鐘程序發布。硬件電路由于只有一個三基色LED和一個按鍵開關，就不貼出了。所選MCU主要是利用其內置的RTCC。
單個按鍵開關有短按和長按兩種用法。在正常報時狀態，短按無作用，長按可以進入調時狀態。進入調時狀態后，按照十小時、小時、十分、分的順序依次調整。每次短按鍵循環進行增量步進，長按鍵進入下一檔位，4種都調完最后一次長按鍵就回到正常報時狀態。在調整狀態，調整“小時”和“分鐘”時用白色和藍色分別顯示，白色表示正在調整的檔位，藍色則表示不調整的檔位。例如，在調整到第三檔的時候，第一個拍發的數碼是白色，表示“十分”，第二個拍發的數碼是藍色，表示“分”，在這個檔位短按鍵只調整白色的“十分”，不調整藍色的“分”。
/*-------------------------------------------------------------------
編譯器：MCC18 V3.40
日期:2011 0924
版本:V1.1
功能：用過去在Pic16論壇上發布過的算盤碼編碼格式，在pic18f26j13的RTCC上實現可以
用兩位碼和光色來表示小時與分鐘的新型時鐘。
前一位碼的光色表示“十小時”，碼型表示“小時”。后一位碼的光色表示“十分鐘”，碼型表示“分鐘”。
光色表示的數值依照“藍，綠，黃，紅，青，紫”依次表示“0，1，2，3，4，5”。
碼型以長短發光表示，以“劃”表示發光時間略長，“點”表示發光時間很短。以下從0--9的碼型分別為
劃劃，點，點點，點點點，點點點點，劃，劃點，劃點點，劃點點點，劃點點點點。
用較短的停頓區分前后碼，用較長的停頓表示分組。
例如，21點整，表示為“黃點，藍劃劃”
修改時鐘，要長按唯一的按鍵，直到發出持續的白光（白里泛紫），松鍵就用白光點劃表示等待修改的位，用藍光點劃表示不修改的位。
修改狀態連續發出的兩個碼型，前面一組表示十小時和小時，后面一組表示十分鐘和分鐘。每次修改時，先修改十小時位，再修改小時位。
此時顯示的兩個碼前面是十小時，后面是小時。前碼白光后碼藍光時修改十小時，通過短按鍵循環改變該位的值，修改完畢長按鍵就轉入后位修改，
這時是前碼藍光，后碼白光，同樣是循環改變，完成這組后長按就進入十分鐘和分鐘修改。后一組的修改過程和結束方式同前。
長按鍵要看到一組兩個碼完整顯示再松手，才能保證進入下一步。
修改完成后會自動保存到RTCC，繼續正常發光報時任務。
硬件電路非常簡單，除去主振蕩器12m和實時鐘晶體32768Hz外，只有程序最前部鍵定義連接的一個按鍵和一個三基色led。其它均按MCU手冊要求配電容電阻即可。
特別聲明，本算盤碼的編碼方式，修改時鐘方式和整個程序屬于本人原創，可基于個人研究目的進行引用和復制，但不得作為商業用途使用。
-------------------------------------------------------------------*/
#include <P18f26j13.h>
#define Key PORTCbits.RC2
#define LEDR TRISBbits.TRISB2 //紅led
#define LEDG TRISBbits.TRISB0 //綠led
#define LEDB TRISBbits.TRISB3 //藍led
void main (void);
void InterruptHandlerHigh (void);
unsigned char *ppptr;
static const unsigned int morse_code[12]={0xee00,0x8000,0xa000,0xa800,0xaa00,0xe000,0xe800,0xea00,
0xea80,0xeaa0,0x0000,0x0000}; //算盤碼碼型
static const unsigned char code_lenth[12]={0x0c,0x06,0x08,0x0a,0x0c,0x08,0x0a,0x0c,0x0f,0x11,0x0a,0x0a};
//算盤碼碼長
unsigned int *morse_ptr;
unsigned char *code_lenth_ptr;
static unsigned char morse_lenth;
static unsigned int timing_code[4]={0x0000,0xaa00,0x0000,0x0000}; //輪流拍發的碼型存放位置
static unsigned char timing_code_lenth[4]={0x05,0x05,0x00,0x05}; //輪流拍發的碼長存放位置
unsigned char tens_or_ones;
unsigned char colour,minus;
unsigned char key_pules,key_count;
static unsigned long key_status=0xffffffff; //存儲按鍵歷史的變量，每次中斷存一位，為0表示長按鍵
unsigned char key_down,key_up,last_key; //表征按鍵按下、抬起的變量
unsigned char t=0;
unsigned char minut_colour,minut;
unsigned char hour,hour_colour;
unsigned char in_hour=1; //區別小時和分鐘的變量
unsigned int temp;
unsigned int temperature; //測試的變量名，沒有改正
unsigned char Rtimehi[4]={0x0,0x09,0x1,0x54},Rtimelo[4]={0x11,0x11,0x15,0x30}; //保存RTCC日期時間的兩組變量
//***************主函數*****************
void main()
{
unsigned char i,j;
//**********RC2作為按鍵使用初始化**********************
ANCON1bits.PCFG11=1; //RC2作為數字IO，不給ADC
TRISCbits.TRISC2=1; //輸入，接Key
//*************************RTCC初始化*******************
T1GCON=0;
T1CON=0X8B; //允許tmr1的振蕩器
RTCCFG=0X07;
RTCCAL=0X0; //校準值
PADCFG1=0X02; //輸出秒時鐘
_asm movlw 0x55 _endasm
_asm movwf EECON2,0 _endasm
_asm movlw 0xAA _endasm
_asm movwf EECON2,0 _endasm
_asm bsf RTCCFG,5,1 _endasm //開啟寫入
RTCCFGbits.RTCEN=1;
RTCCFG|=0x03; //置指針為0b11
while (RTCCFGbits.RTCSYNC); //等待不忙
for (i=0;i<4;i++) //讀
{
Rtimelo[i]=RTCVALL;
Rtimehi[i]=RTCVALH;
}
//****************TIMERS*******************
T0CON=0X84; //定時器， 分頻
INTCONbits.T0IE=1;
T5CON=0X3F; //1/4Fosc,1:8 prescale,T1OSC, 16 bits WR,enabled
T5GCON=0; //no gate
PIE5bits.TMR5IE=1;
//*****************中斷開啟***************
INTCONbits.PEIE=1;
INTCONbits.GIE=1;
//****************按鍵相關設置*************
morse_ptr=timing_code;
code_lenth_ptr=timing_code_lenth;
t=timing_code_lenth[1];
temp=timing_code[1];
key_up=0; //缺省為按鍵抬起狀態
key_down=0;
last_key=1;
//**************************主循環************************
while(1)
{
RTCCFG|=0x03; //置指針為0b11
Rtimelo[0]=RTCVALL; //讀年
Rtimehi[0]=RTCVALH; //讀空
Rtimelo[1]=RTCVALL; //讀日
Rtimehi[1]=RTCVALH; //讀月
Rtimelo[2]=RTCVALL; //讀小時
Rtimehi[2]=RTCVALH; //讀星期
Rtimelo[3]=RTCVALL; //讀秒
Rtimehi[3]=RTCVALH; //讀分
hour_colour=Rtimelo[2]>>4; //十小時顏色
hour=Rtimelo[2]&0x0f; //小時
minut_colour=Rtimehi[3]>>4; //十分顏色
minut=Rtimehi[3]&0x0f; //分鐘
timing_code[1]=morse_code[hour]; //小時的碼型
timing_code_lenth[1]=code_lenth[hour]; //小時的碼長
timing_code[2]=morse_code[minut]; //分的碼型
timing_code_lenth[2]=code_lenth[minut]; //分的碼長
//以下為修改時鐘的鍵操作部分
if (key_status==0)
{
hour_colour=6; //白色光
minut_colour=0;
for (i=0;i<3;i++)
timing_code[i]=0xffff; //全長劃，表示進入調整時鐘模式
while (key_status==0);
for (i=0;i<3;i++)
timing_code[i]=0;
while (key_status) //一次長按鍵之前，修改十小時值
{
timing_code[1]=morse_code[Rtimelo[2]>>4]; //十小時
timing_code_lenth[1]=code_lenth[Rtimelo[2]>>4];
timing_code[2]=morse_code[Rtimelo[2]&0x0f]; //小時
timing_code_lenth[2]=code_lenth[Rtimelo[2]&0x0f];
if (key_up==1) //如果發現短時間按鍵的抬鍵信號
{
Rtimelo[2]+=0x10; //步進十小時
key_up=0; //清除短時間按鍵標志
}
if (Rtimelo[2]>0x23)
Rtimelo[2]=0;
}
while (key_status==0) key_up=0; //防止一次按鍵連續動作
hour_colour=0; //lan色光
minut_colour=6; //白色光
while (key_status) //一次長按鍵之前，修改小時值
{
timing_code[1]=morse_code[Rtimelo[2]>>4]; //十小時
timing_code_lenth[1]=code_lenth[Rtimelo[2]>>4];
timing_code[2]=morse_code[Rtimelo[2]&0x0f]; //小時
timing_code_lenth[2]=code_lenth[Rtimelo[2]&0x0f];
if (key_up==1) //如果發現短時間按鍵的抬鍵信號
{
Rtimelo[2]++; //步進小時
key_up=0; //清除短時間按鍵標志
}
if (Rtimelo[2]>0x23) //總小時數若大于23，則小時個位置0
Rtimelo[2]=0x20;
if ((Rtimelo[2]&0x0f)>9) //小時值若大于9
Rtimelo[2]&=0xf0; //修改為0
}
while (key_status==0) key_up=0; //防止一次按鍵連續動作
//以下修改分鐘
hour_colour=6; //白色光
minut_colour=0; //藍色光
while (key_status) //一次長按鍵之前，修改十分鐘值
{
timing_code[1]=morse_code[Rtimehi[3]>>4]; //十分鐘
timing_code_lenth[1]=code_lenth[Rtimehi[3]>>4];
timing_code[2]=morse_code[Rtimehi[3]&0x0f]; //分鐘
timing_code_lenth[2]=code_lenth[Rtimehi[3]&0x0f];
if (key_up==1) //如果發現短時間按鍵的抬鍵信號
{
Rtimehi[3]+=0x10; //步進十分鐘
key_up=0; //清除短時間按鍵標志
}
if (Rtimehi[3]>0x59) //總fen數若大于59，則十分鐘位置0
Rtimehi[3]&=0x0f;
}
while (key_status==0) key_up=0; //防止一次按鍵連續動作
hour_colour=0; //藍色光
minut_colour=6; //白色光
bwhile (key_status) //一次長按鍵之前，修改分鐘值
{
timing_code[1]=morse_code[Rtimehi[3]>>4]; //十分鐘
timing_code_lenth[1]=code_lenth[Rtimehi[3]>>4];
timing_code[2]=morse_code[Rtimehi[3]&0x0f]; //分鐘
timing_code_lenth[2]=code_lenth[Rtimehi[3]&0x0f];
if (key_up==1) //如果發現短時間按鍵的抬鍵信號
{
Rtimehi[3]++; //步進分鐘
key_up=0; //清除短時間按鍵標志
}
if ((Rtimehi[3]&0x0f)>9) //fen數個位若大于9，則分鐘位置0
Rtimehi[3]=Rtimehi[3]&0xf0;
}
while (key_status==0) key_up=0; //防止一次按鍵連續動作
//寫入RTCC
RTCCFG|=0x03; //置指針為0b11
while (RTCCFGbits.RTCSYNC); //等待不忙
for (i=0;i<4;i++) //寫
{
RTCVALL=Rtimelo[i];
RTCVALH=Rtimehi[i];
}
}
//到達MAIN最后部分
}
}
//----------------------------------------------------------------------------
// High priority interrupt vector
#pragma code InterruptVectorHigh = 0x08
void InterruptVectorHigh (void)
{
_asm
goto InterruptHandlerHigh //jump to interrupt routine
_endasm
}
//----------------------------------------------------------------------------
// High priority interrupt routine
#pragma code
#pragma interrupt InterruptHandlerHigh
void
InterruptHandlerHigh ()
{
if (INTCONbits.TMR0IF)
{ //check for TMR0 overflow
INTCONbits.TMR0IF = 0; //clear interrupt flag
TMR0H=0X20; //略加快點劃速率
TMR0L=0;
if ((t<=0)|t>25)
{
if (morse_ptr>&timing_code[2])
{
morse_ptr=timing_code;
code_lenth_ptr=timing_code_lenth;
}
else
{
morse_ptr++;
code_lenth_ptr++;
}
if (morse_ptr>(&timing_code[1])) //小時在1，分在2，據此決定in_hour
in_hour=0;
else
in_hour=1;
if (in_hour==0) //十分鐘顏色
{
if (minut_colour==0) //藍
{
LEDG=1;
LEDR=1;
LEDB=0;
}
else if (minut_colour==1) //綠
{
LEDG=0;
LEDR=1;
LEDB=1;
}
else if (minut_colour==2) //黃
{
LEDG=0;
LEDR=0;
LEDB=1;
}
else if (minut_colour==3) //紅
{
LEDG=1;
LEDR=0;
LEDB=1;
}
else if (minut_colour==4) //青
{
LEDG=0;
LEDR=1;
LEDB=0;
}
else if (minut_colour==5) //紫
{
LEDG=1;
LEDR=0;
LEDB=0;
}
else //白
{
LEDG=0;
LEDR=0;
LEDB=0;
}
}
else //十小時顏色
{
if (hour_colour==0) //藍
{
LEDG=1;
LEDR=1;
LEDB=0;
}
else if (hour_colour==1) //綠
{
LEDG=0;
LEDR=1;
LEDB=1;
}
else if (hour_colour==2) //黃
{
LEDG=0;
LEDR=0;
LEDB=1;
}
else if (hour_colour==3) //紅
{
LEDG=1;
LEDR=0;
LEDB=1;
}
else if (hour_colour==4) //青
{
LEDG=0;
LEDR=1;
LEDB=0;
}
else if (hour_colour==5) //紫
{
LEDG=1;
LEDR=0;
LEDB=0;
}
else //白
{
LEDG=0;
LEDR=0;
LEDB=0;
}
}
temp=*morse_ptr; //取得指針位置的值
t=*code_lenth_ptr; //同上
}
else
{
t--;
}
if ((temp&0x8000)==0) //這段是拍發算盤碼的執行部分
LATB = LATB|0b00001101;
else
LATB = LATB&0b1110010;
temp=temp<<1;
}
else if (PIR5bits.TMR5IF) //該定時器用來識別按鍵動作
{
PIR5bits.TMR5IF = 0; //clear interrupt flag
if (key_down==1&last_key==1) //只有下鍵后才進入判斷
{
if (key_status) //在沒有全0序列情況下
if (Key==1) //確認抬鍵
{
key_up=1;
key_down=0;
}
}
else if (last_key==0)
{
if (Key==0)
{
key_down=1; //確認下鍵
key_up=0;
}
}
last_key=Key; //當前鍵值賦予舊鍵值
key_status=key_status<<1; //鍵狀態左移1位
key_status|=Key; //末位置Key的值
}
}
返回頂部
刷新頁面
下到頁底