象棋围棋快棋赛计时器

★avr单片机C语言程序设计象棋/围棋快棋赛计时器每步棋30秒。每到25秒时，报警声提圜时间.各有3次超时机会,用完后超时判负，红灯亮起。30秒计时允许超时次数甲方甲方乙方1222Z每到25秒后，计时报警器氛定瘩噬gx凯曾g疆WWW酬曾窟黑RN3允许超时次数 30每步棋30秒。每到25秒时，报警声提圜时间.各有3次超时机会,用完后超时判负，红灯亮起。30秒计时允许超时次数甲方甲方乙方1222Z每到25秒后，计时报警器氛定瘩噬gx凯曾g疆WWW酬曾窟黑RN3允许超时次数 30秒计时::忙乙方POgOlEKFfllTIPe2*»*>WT2fWXM41Oa)FO4C5CVM«3»ns&MsoPU7GCKAR1*3«甲方乙方象棋/围棋快棋赛计时器// //程序功能：象棋/围棋快棋赛计时器〃程序说明：1、若为甲方走第一步，则乙方按下S2启动甲方计时，反之变然。// 2、每步棋限时30秒，每次计时到25秒,即发出报警声，提醒尽快落子.// 3、双方各有3次超时(即加3个30秒)机会,之后任何一步棋超时判负.〃开发平台：WmAVR20090313,Pioteus7.8〃使用芯片：ATMEGA16〃程序编写：凯里一职校机电部杨正富(KLYZXJDB_YZF)〃联系方式：Tel—E-mail:2232336734〃完成日期：2013-08-22// #iiiclude<avr/io.h>#iiiclude<util/delay.h>#iiiclude<avr/intennpt.h>#defineF_CPU4000000UL#defineINT8signedchar?rdefineINT8Uunsignedchar#defineINT16Uunsignedint变量定义INT8kO=3,kl=3; 〃甲乙双方超时倒计数INT8Un=0; //T1中断次数INT16Ut0_count=0,11_count=0; 〃甲乙双方秒计数值(0〜30)数组定义INT8USEG_CODEO[]={0x3F,0x06.0x5B.0x4F,0x66,0x6D,0x7D.0x07,0x7F,0x6F.0x00}; 〃共阴数码管段码0~9,关INT8USEG_CODE1[]={0xc0,0xf9,0xa4,0xb0.0x99.0x92,0x82,0xfB,0x80.0x90.0xff);〃共阳数码管段码0〜9,关INT8Ubuffer[]=(0.10,0,0.0,10,0,0};//*甲方余超时次数**间隔位**计时十位**计时个位*//*乙方余超时次数**间隔位**计时十位**计时个位*INT8Upostion[]=(0x01.0X02,0X04,0X08,0X10,0x20,0x40,0x80 );〃显示定位1-8报警声音子程序voidalarm(void){INT8Uj;for(j=0j<100j-H-)PORTB』(lvvPB7);_delay_us(500);}}/} ■// 时间显示(共阳数码管)与报警INT8Ui;buffer[O]=kO;buffer[2]=t0_count/10;buffer[3]=tO_count%10;buffer[O]=kO;buffer[2]=t0_count/10;buffer[3]=tO_count%10;bufier[4]=kl;buffer[6]=t1_comit/10;buffer[7]=t1_count%10;〃甲方剩余超时次数//甲方时间显示十位值//甲方时间显示个位值//乙方剩余超时次数//乙方时间显示十位值〃乙方时间显示个位值for(i=0;i<8;i++)PORTC=SEG_CODEl[buffbr[i]];PORTA=postion[i]for(i=0;i<8;i++)PORTC=SEG_CODEl[buffbr[i]];PORTA=postion[i];_delay_ms(l);PORTA=OxOO;}}〃延时ImS〃消影主程序mtmaiii(void){PORTA=OxOO;mtmaiii(void){PORTA=OxOO;DDRA=0xff;PORTB=OxOO;DDRB|=_BV(5)LBV(6)LBV(7);PORTC=OXff;DDRC=0xff;PORTD|=_BV(2)|_BV(3);DDRD&=〜_BV(2)卜_BV(3);MCUCR|=0x00;〃此处若采用MCUCRl=0X0A：GICR|=_BV(7)|_BV(6);SREG=SREG|0x80;〃初始化PAII为00000000〃PA0〜PA7设为显示位码输出〃初始化PBII为00000000设为报警指示输出〃初始化PCII为11111111//PC0-PC7设为显示段码输出//初始化PDII为11111111〃PD2,PD3设为甲乙双方键控输入//INTOINTI低电平中断卜降沿产生异步中断，上电时会触发中断，故就避开//使能INTIINTO外部中断请求//使能全局中断while(l)display_tmie();〃调用显示子程序畛while(l)display_tmie();〃调用显示子程序畛0<0)〃当超时次数余负值时,PORTB|=(1«PB5);kO=O;TCCRO=OxOO;)iRkMO){PORTB|=(1«PB6);kl=O;TCCRlB=0x00;)}}//甲红灯亮起〃显示允许超时次数为0PORTB|=(1«PB5);kO=O;TCCRO=OxOO;)iRkMO){PORTB|=(1«PB6);kl=O;TCCRlB=0x00;)}}//甲红灯亮起〃显示允许超时次数为0〃停止TO定时计数//当超时次数余负值时，红灯亮起〃乙红灯亮起〃显示允许超时次数为0〃停止T1定时计数// //INTO中断函数SIGNAL(INTO_vect)〃甲方按下S1键TCCR0=0x00;//停止TO定时计数TCNT1=65536-F_CPUJ64*1.O;TINISK|=(1«TOIE1);TCCRlB=0x03;//T1装入LOs定时初值（OxOBDC）〃使能T1定时溢出中断//启动T1定时计数（普通模式,64分频）// //INT1中断函数SIGNAL(INTl_vect)〃乙方按下S2键TCCRlB=0x00;//停止T1定时计数TCNT0=256-F_CPU/1024*0.05;TINISK|=(1«TOIEO);TCCR0=0x05;}//TO装入0.05s定时初值（0x3C）〃使能TO定时溢出中断〃启动TO定时计数（普通模式,1024分频）TO定时溢出中断服务子程序SIGNAL(TIMERO_OVF_vect)//TO定时溢出中断（0.05秒）〃重装初值〃重装初值〃乙方秒计时归0〃中断20次为1秒，〃甲方秒计时加1//中断次数归0〃计数到25秒后，报警提示//计数到30秒时，〃允许超时次数减1,//秒计数值重置0TCNT0=256-F_CPU/1024*0.05;tl_count=0;if(iri=20)ftO_count++;n=0;if(tO_count>25)alaim();if(t0_count==30)(kO--;tO_count=0:)}}T1定时溢出中断服务子程序SIGNAL(TIMERCOVF.vect)//Tl定时溢出中断