導航:首頁 > 操作系統 > 單片機搶答器代碼

單片機搶答器代碼

發布時間:2022-09-13 07:09:52

㈠ AT89C51單片機8路搶答器的代碼怎麼寫,急用,求解答

#include<reg51.h>
#defineucharunsignedchar
uchartable[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f};
sbitrstkey=P2^2;
sbitspeaker=P2^0;
voiddelay(uchara)
{
uchari,j;
for(i=0;i<a;i++)
for(j=0;j<120;j++);
}
main()
{
uchari,key;
P2=0xff;
while(1)
{
i=0;
P1=table[i];
while(1)
{
key=P3;
if(key!=0)break;
}
switch(key)
{
case0x01:i=1;break;
case0x02:i=2;break;
case0x04:i=3;break;
case0x08:i=4;break;
case0x10:i=5;break;
case0x20:i=6;break;
case0x40:i=7;break;
case0x80:i=8;break;
default:break;
}
P1=table[i];//顯示按下搶答器的號
P0=key;//顯示按下鍵號的LED
while(1)
{
if(rstkey==0)break;//主持人按下復位鍵則重新開始
speaker=~speaker;//否則蜂鳴器報警
delay(250);
}
}
}

㈡ 急求最簡單的單片機4人搶答器c51程序

;以下是以前做的八路搶答器程序,你參考一下。
ORG 0000H
JMP BEGIN
ORG 0030H
TABLE: ; 共陰極數碼管顯示代碼表
DB 3FH,06H,5BH,4FH,66H ;12345
DB 6DH,7DH,07H,7FH ;6789
DELAY: MOV R5,#20
LOOP4: MOV R6,#50H ;延時20X20ms
LOOP5: MOV R7,#100
DJNZ R7,$
DJNZ R6,LOOP5
DJNZ R5,LOOP4
RET
;---------------------------------------
BEGIN: MOV P2,#0FFH ;P2口置高電平,准備接收信號
MOV R4,#0
MOV A,R4 ;R4位標志值送A寄存器
AGAIN: MOV DPTR,#TABLE
MOVC A,@A+DPTR
MOV P1,A
LOOP1: MOV A,P3 ; 接收p3口的搶答信號
CPL A
JZ LOOP1
LOOP2: RRC A ;有人搶答信號則逐次移動判斷哪一位搶答
INC R4
JNC LOOP2
;********************
MOV A,R4
MOVC A,@A+DPTR ;找到相應位顯示代碼
MOV P1,A
LEDDIS:
MOV A,#0FFH
CLR C
LEDDIS1:
RLC A
DJNZ R4,LEDDIS1
MOV P0,A
LOOP3: JNB P2.2,BEGIN ;若主持人按下復位信號鍵,則轉向主程序
CPL P2.0 ;若沒按復位信號鍵,則通過p2.2口給出高低信號驅動蜂鳴器
LCALL DELAY ;調用延時子程序
SJMP LOOP3 ;p2.2口反復間隔0.4s變化,驅動蜂鳴器
END

㈢ 大哥,有沒有4路單片機搶答器 匯編語言

;8路單片機搶答器 匯編語言,可以參考一下

;============= 八路搶答器程序 ===============

OK EQU 20H ;搶答開始標志位

RING EQU 22H ;響鈴標志位

DATA0 EQU 36H ;搶答按鍵口數據存放地址

ORG 0000H

AJMP MAIN

ORG 0003H

AJMP INTT0

ORG 000BH

AJMP T0INT

ORG 001BH

AJMP T1INT

ORG 0040H

MAIN: MOV R1,#20 ;初設搶答時間為20s

MOV R2,#30 ;初設答題時間為30s

mov 38h,#60 ;啟用錦囊時間從60s倒計時

MOV TMOD,#11H ;設置未定時器/模式1

MOV TH0,#0F0H

MOV TL0,#0FFH ;越高發聲頻率越高,越尖

MOV TH1,#3CH

MOV TL1,#0B0H ;50ms為一次溢出中斷

SETB EA

SETB ET0

SETB ET1 ;允許二個中斷,T0/T1

CLR OK

CLR RING

SETB TR1

SETB TR0 ;一開始就運行定時器,以開始顯示FFF.如果想重新計數,重置TH1/TL1就可以了

;=============查詢程序============

START: MOV DATA0,#0FFH ;初始化

MOV R5,#0BH

MOV R4,#0BH

MOV R3,#0BH

ACALL DISPLAY ;未開始搶答時候顯示FFF

JNB P3.3,SELSUB0

JNB P3.4,TZ3 ;倒計時調整

JB P3.0,NEXT

ACALL DELAY

JB P3.0,NEXT ;去抖動,如果"開始鍵"按下就向下執行,否者跳到非法搶答查詢

SETB EX0 ;開放INT0

ACALL BARK ;按鍵發聲

MOV A,R1

MOV R6,A ;送R1->R6,因為R1中保存了搶答時間

SETB OK ;搶答標志位,在使用錦囊時用作判斷是搶答倒計時還是回答倒計時

MOV R3,#0AH ;搶答只顯示計時,滅號數

AJMP COUNT ;進入倒計時程序,"查詢有效搶答的程序"在COUNT裡面

NEXT: JNB P1.0,FALSE1

JNB P1.1,FALSE2

JNB P1.2,FALSE3

JNB P1.3,FALSE4

JNB P1.4,FALSE5

JNB P1.5,FALSE6

JNB P1.6,TZ1

JNB P1.7,TZ2

AJMP START

TZ1: AJMP FALSE7

TZ2: AJMP FALSE8

TZ3: AJMP SELSUB1

;=========非法搶答處理程序============

FALSE1: MOV R3,#01H

AJMP ERROR

FALSE2: MOV R3,#02H

AJMP ERROR

FALSE3: MOV R3,#03H

AJMP ERROR

FALSE4: MOV R3,#04H

AJMP ERROR

FALSE5: MOV R3,#05H

AJMP ERROR

FALSE6: MOV R3,#06H

AJMP ERROR

FALSE7: MOV R3,#07H

AJMP ERROR

FALSE8: MOV R3,#08H

AJMP ERROR

;======SELSUB0(搶答時間R1調整程序)========

SELSUB0: MOV A,R1

MOV B,#0AH

DIV AB

MOV R5,A

MOV R4,B

MOV R3,#0AH

ACALL DISPLAY ;先在兩個時間LED上顯示R1

JNB P3.5,INC0 ;P3.5為+1s鍵,如按下跳到INCO

JNB P3.6,DEC0 ;P3.6為-1s鍵,如按下跳到DECO

JNB P3.1,BACK0 ;P3.1為確定鍵,如按下跳到BACKO

AJMP SELSUB0

INC0: MOV A,R1

CJNE A,#63H,ADD0 ;如果不是99,R2加1,如果加到99,R1就置0,重新加起。

MOV R1,#00H

ACALL DELAY1

AJMP SELSUB0

ADD0: INC R1

ACALL DELAY1

AJMP SELSUB0

DEC0: MOV A,R1

JZ SETR1 ;如果R1為0, R1就置99,

DEC R1

ACALL DELAY1

AJMP SELSUB0

SETR1: MOV R1,#63H

ACALL DELAY1

AJMP SELSUB0

BACK0: AJMP START

;========SELSUB1(回答時間R2調整程序)========

SELSUB1: MOV A,R2

MOV B,#0AH

DIV AB

MOV R5,A

MOV R4,B

MOV R3,#0AH

ACALL DISPLAY

JNB P3.5,INC1

JNB P3.6,DEC1

JNB P3.1,BACK1

AJMP SELSUB1

INC1: MOV A,R2

CJNE A,#63H,ADD1

MOV R2,#00H

ACALL DELAY1

AJMP SELSUB1

ADD1: INC R2

ACALL DELAY1

AJMP SELSUB1

DEC1: MOV A,R2

JZ SETR2

DEC R2

ACALL DELAY1

AJMP SELSUB1

SETR2: MOV R2,#63H

ACALL DELAY1

AJMP SELSUB1

BACK1: AJMP START

REPEAT:MOV A,38h

MOV R6,A

CLR RING ;當倒計時進入最後5秒的時候

;======倒計時程序(搶答倒計時和回答倒計時都跳到改程序)=========

COUNT: MOV R0,#00H ;重置定時器中斷次數

MOV TH1,#3CH

MOV TL1,#0B0H ;重置定時器

RECOUNT:MOV A,R6 ;R6保存了倒計時的時間,之前先將搶答時間或回答時間給R6

MOV B,#0AH

DIV AB ;除十分出個位/十位

MOV 30H,A ;十位存於(30H)

MOV 31H,B ;個位存於(31H)

MOV R5,30H ;取十位

MOV R4,31H ;取個位

MOV A,R6

SUBB A,#07H

JNC LARGER ;大於5s跳到LARGER,小於等於5s會提醒

MOV A,R0

CJNE A,#0AH,FULL ;1s中0.5s向下運行

CLR RING

AJMP CHECK

FULL: CJNE A,#14H,CHECK ;下面是1s的情況,響並顯示號數並清R0,重新計

SETB RING

MOV A,R6

JZ QUIT ;計時完畢

MOV R0,#00H

DEC R6 ;一秒標志減1

AJMP CHECK

LARGER: MOV A,R0

CJNE A,#14H,CHECK ;如果1s向下運行,否者跳到查"停/顯示"

DEC R6 ;計時一秒R6自動減1

MOV R0,#00H

CHECK: JNB P3.1,QUIT;如按下停止鍵退出

JNB OK,CHECKK ;只在回答倒計時才有效

AJMP NEXTT

CHECKK:JNB P3.0,REPEAT ;判斷是否使用錦囊

NEXTT:

ACALL DISPLAY

JB OK,ACCOUT;如果是搶答倒計時,如是則查詢搶答,否者跳過查詢繼續倒數(這里起到鎖搶答作用)

AJMP RECOUNT

ACCOUT:MOV A,DATA0

JNB ACC.0,TRUE1

JNB ACC.1,TRUE2

JNB ACC.2,TRUE3

JNB ACC.3,TRUE4

JNB ACC.4,TRUE5

JNB ACC.5,TRUE6

JNB ACC.6,TZ7

JNB ACC.7,TZ8

AJMP RECOUNT

TZ7: AJMP TRUE7

TZ8: AJMP TRUE8

QUIT: CLR OK ;如果按下了"停止鍵"執行的程序

CLR RING

AJMP START

;============正常搶答處理程序=============

TRUE1: ACALL BARK

MOV A,R2

MOV R6,A ;搶答時間R2送R6

MOV R3,#01H

CLR OK ;因為答題的計時不再查詢搶答,所以就鎖了搶答

AJMP COUNT

TRUE2:ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#02H

CLR OK

AJMP COUNT

TRUE3:ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#03H

CLR OK

AJMP COUNT

TRUE4:ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#04H

CLR OK

AJMP COUNT

TRUE5: ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#05H

CLR OK

AJMP COUNT

TRUE6: ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#06H

CLR OK

AJMP COUNT

TRUE7: ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#07H

CLR OK

AJMP COUNT

TRUE8: ACALL BARK

MOV A,R2

MOV R6,A

MOV R3,#08H

CLR OK

AJMP COUNT

;=============犯規搶答程序================

ERROR: MOV R0,#00H

MOV TH1,#3CH

MOV TL1,#0B0H

MOV 34H,R3 ;犯規號數暫存與(34H)

HERE: MOV A,R0

CJNE A,#06H,FLASH ;0.3s向下運行->滅並停響

CLR RING

MOV R3,#0AH

MOV R4,#0AH

MOV R5,#0AH ;三燈全滅

AJMP CHECK1

FLASH: CJNE A,#0CH,CHECK1 ;下面是0.8s的情況,響並顯示號數並清R0,重新計

SETB RING

MOV R0,#00H

MOV R3,34H ;取回號數

MOV R5,#0BH

MOV R4,#0BH ;顯示FF和號數

AJMP CHECK1

CHECK1: JNB P3.1,QUIT1

ACALL DISPLAY

AJMP HERE

QUIT1: CLR RING

CLR OK

AJMP START

;==============顯示程序================

DISPLAY:MOV DPTR,#DAT1 ;查表顯示程序,利用P0口做段選碼口輸出/P2低三位做位選碼輸出,

MOV A,R3

MOVC A,@A+DPTR

MOV P2,#0feH

MOV P0,A

ACALL DELAY

MOV DPTR,#DAT2

MOV A,R5

MOVC A,@A+DPTR

MOV P2,#0fdH

MOV P0,A

ACALL DELAY

MOV A,R4

MOVC A,@A+DPTR

MOV P2,#0fbH

MOV P0,A

ACALL DELAY

RET

DAT1:DB 00h,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh,00H,71H

;"滅","1","2","3","4","5","6","7","8","9","滅","F"

DAT2:DB 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh,00H,71H

;第一個為零,其他與上相同,因為十位如果為零顯示熄滅

;============加減時間延時(起到不會按下就加N個數)=============

DELAY1: MOV 35H,#08H

LOOP0: ACALL DISPLAY

DJNZ 35H,LOOP0

RET

;=============延時(顯示和去抖動用到)==================

DELAY: MOV 32H,#12H

LOOP: MOV 33H,#0AFH

LOOP1: DJNZ 33H,LOOP1

DJNZ 32H,LOOP

RET

;==============發聲程序=========================

BARK: SETB RING

ACALL DELAY1

ACALL DELAY1

CLR RING ;按鍵發聲

RET

;==============TO溢出中斷(響鈴程序)==================

T0INT: MOV TH0,#0ECH

MOV TL0,#0FFH

JNB RING,OUT;

CPL P3.7 ;RING標志位為1時候P3.7口不斷取反使喇叭發出一定頻率的聲音

OUT: RETI

;==============T1溢出中斷(計時程序)=================

T1INT: MOV TH1,#3CH

MOV TL1,#0B0H

INC R0

RETI

;===============INTT0中斷服務程序=================

INTT0:MOV DATA0,P1

CLR EX0

RETI

㈣ 用AT89C51單片機設計8路搶答器,求代碼,急用

#include<reg51.h>
#defineucharunsignedchar
uchartable[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f};
sbitrstkey=P2^2;
sbitspeaker=P2^0;
voiddelay()//延時約400毫秒
{
uchari,j;
for(i=0;i<200;i++)
for(j=0;j<250;j++);
}
main()
{
uchari,key;
P2=0xff;
while(1)
{
i=0;
P1=table[i];
while(1)
{
key=P3;
if(key!=0)break;
}
switch(key)
{
case0x01:i=1;break;
case0x02:i=2;break;
case0x04:i=3;break;
case0x08:i=4;break;
case0x10:i=5;break;
case0x20:i=6;break;
case0x40:i=7;break;
case0x80:i=8;break;
default:break;
}
P1=table[i];//顯示按下搶答器的號
P0=key;//顯示按下鍵號的LED
while(1)
{
if(rstkey==0)break;//主持人按下復位鍵則重新開始
speaker=~speaker;//否則蜂鳴器報警
delay();
}
}
}

㈤ 求51單片機的8路搶答器,在普中開發板上實現

單片機源程序如下:

#include<reg51.h>
#define uchar unsigned char
#define uint unsigned int
#define WHO P0
sbit player1=P1^0;
sbit player2=P1^1;
sbit player3=P1^2;
sbit player4=P1^3;
sbit Ensure=P3^7;
sbit beep=P1^6;
sbit LSA=P3^2;
sbit LSB=P3^3;
sbit LSC=P3^4;
uchar state=0;
uchar ssec=0;
uchar table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};
uchar OUT[]={0x71,0x77,0x38,0x38};
void delay(uint time)
{
uint x,y ;
for(x=time;x>0;x--)
for(y=130;y>0;y--);
}
void Delay2(uint i)
{
while(i--);
}
void Show(uchar content[])
{
uchar i;
for(i=0;i<4;i++)
{
switch(i) //位選,選擇點亮的數碼管,
{
case(0):
LSA=0;LSB=0;LSC=0; break;//顯示第0位
case(1):
LSA=1;LSB=0;LSC=0; break;//顯示第1位
case(2):
LSA=0;LSB=1;LSC=0; break;//顯示第2位
case(3):
LSA=1;LSB=1;LSC=0; break;//顯示第3位
}
P2=content[i];//發送段碼
Delay2(100); //間隔一段時間掃描
P2=0x00;//消隱
}
}
void InitTimer0(void)
{
TMOD = 0x01;
TH0 = 0x0D8;
TL0 = 0x0F0;
EA = 1;
ET0 = 1;
TR0 = 1;
}
void main()
{
Ensure=1;
while(1)
{
if(player1==0) //玩家1進入搶答狀態
{
delay(10); //延時,按鍵消抖
if(player1==0) //再次判斷是否進入搶答狀態
{
if(state==0) //前方無人搶答狀態
{
InitTimer0();
state=1; //將搶答狀態置為1,防止其他玩家搶答
while(!player1) //搶答成功,蜂鳴器發聲
{
beep=~beep;
delay(1);
}
WHO=table[1]; //數碼管顯示搶答成功的玩家編號
}
}
}
if(player2==0) //以下結構類似於玩家1
{
delay(10);
if(player2==0)
{
if(state==0)
{
InitTimer0();
state=1;
while(!player2)
{
beep=~beep;
delay(1);
}
WHO=table[2];
}
}
}
if(player3==0)
{
delay(10);
if(player3==0)
{
if(state==0)
{
InitTimer0();
state=1;
while(!player3)
{
beep=~beep;
delay(1);
}
WHO=table[3];
}
}
}
if(player4==0)
{
delay(10);
if(player4==0)
{
if(state==0)
{
InitTimer0();
state=1;
while(!player4)
{
beep=~beep;
delay(1);
}
WHO=table[4];
}
}
}
}
}
void Timer0() interrupt 1
{
TH0=(65536-45872)/255; //給定時器賦初值,定時50ms
TL0=(65536-45872)%255;
ssec++;
if(Ensure)
{
if(ssec>=100) //5s
{
EA=0;
while(1)
Show(OUT);
}
}
else
{
delay(10);
if(Ensure==0)
{
while(!Ensure);
Ensure=0;
if(ssec>=100)
{
EA=0;
}
}
}
}

㈥ 求proteus單片機c語言程序代碼,四路搶答器

能把問題描述清楚看來程序實現對你來說不成問題,我用偽代碼給你寫出來你自己補充完整即可。
void main()
{
unsigned char key,cont;
bit flag = 0;
初始化IO口;\\關閉紅燈點亮綠燈,數碼管顯示0
while(1)
{
key = P1&0xF;
if(key!=0xF)
{
/*按下的按鍵相應綠燈關閉*/
LED_G1 = (bit)(key&0x1);
LED_G2 = (bit)(key&0x2);
LED_G3 = (bit)(key&0x4);
LED_G4 = (bit)(key&0x8);
/*按下的按鍵相應紅色LED閃爍*/
for(cont=0;cont<5;cont++)
{
LED_R1 = (~LED_G1)|flag;
LED_R2 = (~LED_G2)|flag;
LED_R3= (~LED_G3)|flag;
LED_R4 = (~LED_G4)|flag;
Delay();//延時
flag = ~flag;
}
關閉所有紅色LED並開啟所有綠色LED;
}
}
}

注意:代碼是允許有同時按下的情況,當然也可以改為不允許同時按下的情況發生,即如果發生同時按下則隨便選擇一個按鍵,這樣覺得有點不公平。

㈦ AT89C51單片機8路搶答器C語言代碼怎麼寫,急用,謝謝了

這個代碼沒有問題,我模擬過:
#include<reg51.h>
#defineucharunsignedchar
uchartable[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f};
sbitrstkey=P2^2;
sbitspeaker=P2^0;
voiddelay()//延時約400毫秒
{
uchari,j;
for(i=0;i<200;i++)
for(j=0;j<250;j++);
}
main()
{
uchari,key;
P2=0xff;
while(1)
{
i=0;
P1=table[i];
while(1)
{
key=P3;
if(key!=0)break;
}
switch(key)
{
case0x01:i=1;break;
case0x02:i=2;break;
case0x04:i=3;break;
case0x08:i=4;break;
case0x10:i=5;break;
case0x20:i=6;break;
case0x40:i=7;break;
case0x80:i=8;break;
default:break;
}
P1=table[i];//顯示按下搶答器的號
P0=key;//顯示按下鍵號的LED
while(1)
{
if(rstkey==0)break;//主持人按下復位鍵則重新開始
speaker=~speaker;//否則蜂鳴器報警
delay();
}
}
}

㈧ 求51單片機的8路搶答器,在普中開發板上實現

摘要 uchar code seg_code[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x8e,0xff};

㈨ 求一個由AT89C52單片機控制的八路搶答器的C語言程序設計

#include<reg51.h>
#define uchar unsigned char
uchar table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f};
sbit rstkey=P2^2;
sbit speaker=P2^0;
void delay()//延時約400毫秒
{
uchar i,j;
for(i=0;i<200;i++)
for(j=0;j<250;j++);
}
main()
{
uchar i,key;
P2=0xff;
while(1)
{
i=0;
P1=table[i];
while(1)
{
key=P3;
if(key!=0)break;
}
switch(key)
{
case 0x01:i=1;break;
case 0x02:i=2;break;
case 0x04:i=3;break;
case 0x08:i=4;break;
case 0x10:i=5;break;
case 0x20:i=6;break;
case 0x40:i=7;break;
case 0x80:i=8;break;
default:break;
}
P1=table[i];//顯示按下搶答器的號
P0=key;//顯示按下鍵號的LED
while(1)
{
if(rstkey==0)break;//主持人按下復位鍵則重新開始
speaker=~speaker;//否則蜂鳴器報警
delay();
}
}
}

閱讀全文

與單片機搶答器代碼相關的資料

熱點內容
冰櫃壓縮機溫度108 瀏覽:718
阿里雲郵smtp伺服器地址 瀏覽:250
解壓館認知理解 瀏覽:239
為什麼使用非官方伺服器會封號 瀏覽:9
佛山加密文檔軟體 瀏覽:813
港式5張梭哈源碼 瀏覽:241
數據中心pdf 瀏覽:524
crf源碼解析 瀏覽:853
伺服器軟體開發是什麼意思 瀏覽:941
刪除彩信android 瀏覽:862
元宵節猜燈謎h5源碼 瀏覽:69
樂培生app怎麼綁定 瀏覽:762
視頻壓縮不清楚怎麼說 瀏覽:525
加好友伺服器繁忙是怎麼回事 瀏覽:381
怎麼解綁app的支付寶賬號 瀏覽:912
ip地址伺服器不可用怎麼解決方法 瀏覽:185
為什麼軟體需要伺服器 瀏覽:64
redis操作命令大全 瀏覽:597
python字元串重復索引 瀏覽:963
為什麼香信新版本連接不上伺服器 瀏覽:52