资源描述:
《单片机C51实验书上所有程序代码.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、EX5101ORG0000HLJMPSTARTORG0030HSTART:MOVA,#01HLOOP:MOVP1,A;累加器内容输出到P1口MOVR0,#0FFHDE1:MOVR1,#0FFH;延时DE2:DJNZR1,DE2DJNZR0,DE1RLASJMPLOOPENDEX5102ORG0000HLJMPSTARTORG0030HSTART:ORLP1,#0FHLOOP:MOVA,P1CPLASWAPAORLA,#0FHMOVP1,ASJMPLOOPENDEX5103ORG0000HBEGIN:LJMPSTA
2、RTORG0030HSTART:MOVB,#01LOOP:MOVDPTR,#0A000HMOVXA,@DPTRCJNEA,#0FFH,OUTMOVA,BRLAMOVB,AMOVR6,#0FFHDE:MOVR7,#0FFHDJNZR7,$DJNZR6,DEMOVDPTR,#0B000HMOVX@DPTR,ASJMPLOOPOUT:MOVR6,#0FFHDE1:MOVR7,#0FFHDJNZR7,$DJNZR6,DE1MOVDPTR,#0B000HMOVX@DPTR,AMOVR6,#0FFHDE2:MOVR7,#0F
3、FHDJNZR7,$DJNZR6,DE2MOVA,#00HMOVX@DPTR,AMOVDPTR,#0A000HMOVXA,@DPTRCJNEA,#0FFH,OUTSJMPLOOPENDEX5104ORG0000HBEGIN:LJMPSTART;ORG0013HLJMPINT_P;ORG0030HSTART:MOVP1,#0FFHSETBIT1MOVA,#01HMOVIE,#BLOOP:MOVDPTR,#0B000HMOVX@DPTR,AINCAMOVR6,#0FFHDE1:MOVR7,#0FFHDE2:DJNZR
4、7,DE2DJNZR6,DE1SJMPLOOP;INT_P:MOVA,P1RETI;ENDEX5105H_TIMEEQU03CHL_TIMEEQU0B0H;ORG0000HLJMPSTART;ORG000BHLJMPT0_INT;ORG0030HSTART:MOVR0,#0AHMOVR1,#0ANLTMOD,#0F0HORLTMOD,#01HMOVTH0,#H_TIMEMOVTL0,#L_TIMEORLIE,#82HSETBTR0MOVDPTR,#D_TABLP1:MOVA,R1MOVCA,@A+DPTRMOVP
5、1,ACJNER0,#0,LP1MOVR0,#0AHINCR1CJNER1,#8,SK1MOVR1,#0movr0,#0AHSK1:SJMPLP1;T0_INT:CLRTR0DECR0MOVTH0,#H_TIMEMOVTL0,#L_TIMESETBTR0RETID_TAB:DB03H,0CH,30H,0C0HDB0FH,0F0H,0FFH,00HENDEX5106ORG0000HBEGIN:LJMPSTART;ORG0030HSTART:MOVA,#82HMOVDPTR,#0FF2BH;8255控制口MOVX@D
6、PTR,AMOVB,#01H;LOOP:MOVDPTR,#0FF29H;portbMOVXA,@DPTR;从portb输入ANLA,#0FFHCJNEA,#00H,SK1MOVA,BRLAMOVB,ASK1:MOVDPTR,#0FF2AH;portCMOVX@DPTR,A;输出到portCMOVR7,#0FFHDE:MOVR6,#80HDJNZR6,$DJNZR7,DESJMPLOOPENDEX5107DISBUFEQU30HBUFEQU20HSECBUFEQU21HMINBUFEQU22HHOURBUFEQU2
7、3HP_CONEQU0FF20HPORT_AEQU0FF21HPORT_BEQU0FF22H;ORG0000HLJMPSTART;ORG000BHLJMPCLOCK;ORG0030HSTART:MOVSP,#60HMOVDPTR,#P_CONMOVA,#03HMOVX@DPTR,A;MOVA,#00HMOVR1,#06HMOVR0,#DISBUFLP1:MOV@R0,AINCR0DJNZR1,LP1;ANLTMOD,#0F0HORLTMOD,#01HMOVTL0,#0B0HMOVTH0,#3CH;MOVBUF,#
8、00HMOVSECBUF,#00HMOVMINBUF,#59HMOVHOURBUF,#23HSETBTR0SETBET0SETBEA;DISP1:MOVR0,#DISBUFMOVA,SECBUFANLA,#0FHMOV@R0,AINCR0MOVA,SECBUFSWAPAANLA,#0FHMOV@R0,AINCR0;MOVA,MINBUFANLA,#0FHMOV@R0,AI