單片機(jī)工程實(shí)踐報(bào)告樣板(20xx年6月)(編輯修改稿)
2025-05-11 02:43 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 lcall xhyan sjmp kr245 k3: lcall d1 ；調(diào)用ddd3和延時(shí)程序后跳回kr24 lcall d2 lcall d3 lcall xhyan sjmp kr245 k4: lcall d1 lcall d2 lcall d3 lcall d4 lcall xhyan ljmp kr245beepss:clr ；使蜂鳴器響260ms lcall delay setb 。 停260ms lcall delay retxhyan: mov r0,8h ；延時(shí)2sloop1: lcall delay djnz r0,loop1 ret delay:mov r6,0ffh ；延時(shí)260ms loop2:mov r7,0ffh loop3:djnz r7,loop3 djnz r6,loop2 mov r6,0ffh loop4:mov r7,0ffh loop5:djnz r7,loop5 djnz r6,loop4 retdelay10:mov r6,14h ；延時(shí)10ms loop6:mov r7,0f8h nop loop7:djnz r7,loop7 djnz r6,loop6 retsel3: clr ；選中LED第三位 setb clr ret sel7: clr ；關(guān)245 setb setb ret sel8: setb ；開245 setb setb ret d1:lcall sel3 ；顯示“1”，并響一聲 mov p0,0ch lcall beepss ret d2:lcall sel3；顯示“2”，并響一聲 mov p0,0b6h lcall beepss ret d3:lcall sel3 ；顯示“3”，并響一聲 mov p0,9eh lcall beepss ret d4:lcall sel3 ；顯示“4”，并響一聲 mov p0,0cch lcall beepss ret==============================================================================溫度監(jiān)視器程序==============================================================================****************************************************************************溫度監(jiān)視器主程序****************************************************************************adcygw1 equ 30horg 0000hsjmp mainorg 0003hsjmp int0org 000bhsjmp displayorg 0060hmian: mov tmod,02hmov th0,00hmov tl0,00h mov r0,adcygw1mov r1,6setb tr0setb et0 setb ea setb ex0lcall sjpx。調(diào)用數(shù)據(jù)排序子程序lcall qpj。調(diào)用求平均子程序lcall bdbh。調(diào)用標(biāo)度變換子程序lcall bmdh。調(diào)用代碼變換子程序lcall dmshc。調(diào)用代碼送緩存子程序sjmp main。****************************************************************************，采集數(shù)據(jù)(外部中斷子程序)。****************************************************************************int0:push a。保護(hù)現(xiàn)場(chǎng) push psw clr rs1 setb rs0 clr ea。關(guān)中斷 clr 。采集高8位 clr mov a,p1 setb anl a,0fh。屏蔽高8位中前四位 mov @r0,a。儲(chǔ)存 inc r0 clr 。采集低8位 mov a,p1 setb setb mov @r0,a inc r0 dec r1 cjne r1,0,next1 mov r0,30h mov r1,6next1:setb ea。開中斷 pop psw?；謴?fù)現(xiàn)場(chǎng) pop a reti。****************************************************************************數(shù)據(jù)排序(由小到大)。****************************************************************************sjpx:setb rs1。選1區(qū) clr rs0 mov r5,5。外循環(huán)次數(shù)stpx2:mov r0,30h。第一個(gè)數(shù)的高8位地址 mov r4,5。內(nèi)循環(huán)次數(shù)stpx1:mov a,@r0 mov r1,30h inc r0 inc r0cmp1:subb,a,@r0。比較高8位 jc cmp2。前者不大于后者，跳到CMP2 mov a,@r1。前者高8位給A xch a,@r0。交換高8位 mov @r0,a。后者高8位送到前者高8位地址中 dec r0 mov a,@r0。前者的低8位給A mov 50h,r0。前者低8位地址送到50H單元 mov r1,50h。前者低8位地址給R1 inc r0 inc r0 xch a,@r0。交換低8位 mov 50h,a。后者低8位給50H地址單元 mov @r1,50h。后者低8位送到前者低8位地址中 inc r0 sjmp endpx1cmp2:mov a,@r1。前者低8位給A mov 50h,@r0。后者低8位給50H單元 cjne a,50h,endpx1。前者不大于也不等于后者，即小于 cmp3:dec r0 mov a,@r0。前者低8位給A mov 50h,r0。前者低8位地址送到50H單元 mov r1,50h inc r0 inc r0 clr c subb a,@r0比較低8位 jc endpx1。小于跳轉(zhuǎn) mov a,@r1。前者低8位給A xch a,@r0。交換低8位 mov @e1,a。后者低8位送到前者低8位地址中 dec r0 mov a,@r0。后者高8位給A mov 50h,r0。后者高8位地址送到50H單元 mov r1,50h。后者高8位地址送R1中 dec r0 decr0 xch a,@r0。交換高8位 mov @r1,a。前者高8位送到后者低8位地址單元中 inc r0 inc r0endpx1:djnz r4,stpx1 djnz r5,stpx2 ret
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1