资源描述:
《基于单片机的温度计程序》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、数字温度计程序清单S1OK EQU5FHTEMPUTER EQU39HTEMPHEQU5EHTEMPL EQU5DHMS50 EQU5CHSIGN EQU5BHS1BITP1.0S2BITP1.1S3BITP1.2S4BITP1.3ORG0000HLJMPMAINORG000BHLJMP TOITORG0030HMAIN:MOVSP,#60HMOVTMOD,#01HMOVTH0,#3CHMOVTL0,#0B0HSETBET0SETBTR0SETBEAMOVTEMPH,#30MOVTEMPL,#9MOVTEM
2、PUTER,#15;温度最始值MOVS1OK,#00HMOVSIGN,#00HMOV38H,#0BHMOV37H,#0CHMOV36H,#0BHACALLDISPACALLT1S;*****************************************;主程序START:JBS1,NET1ACALLT12MSJBS1,NET1JNBS1,$INCSIGNMOVA,SIGNCJNEA,#1,TIAOACALLTIAOTLTIAO:CJNEA,#2,NET1MOVSIGN,#0ACALLTIAOTH;
3、*****************************************NET1:MOVA,S1OKCJNEA,#1,STARTMOVA,TEMPUTERSUBBA,TEMPHJNBACC.7,ALEMMOVA,TEMPUTERSUBBA,TEMPLJBACC.7,ALEMSETBP2.1ACALLWENDUACALLDISPMOVS1OK,#00HAJMPSTARTALEM:MOV36H,#0CHMOV37H,#0CHMOV38H,#0CHCLRP2.1ACALLDISPACALLT1SLCAL
4、LWENDULCALLDISPMOVS1OK,#00HSJMPSTART;*****************************************TIAOTL:MOV50H,TEMPUTERMOV37H,TEMPLACALLBIN_BCDACALLDISPACALLT12MSACALLT12MSACALLT12MSACALLT12MSMOV36H,#0AHMOV37H,#0AHMOV38H,#0AHACALLDISPACALLT12MSACALLT12MSACALLT12MSACALLT12MSJ
5、BS2,ADD1ACALLT12MSJBS2,ADD1JNBS2,$INCTEMPLMOVA,TEMPLCJNEA,#100,ADD1MOVTEMPL,#0ADD1:JBS3,ADD2ACALLT12MSJBS3,ADD2JNBS3,$DECTEMPLMOVA,TEMPLCJNEA,#00,ADD2MOVTEMPL,#100ADD2:JBS4,TIAOTLACALLT12MSJBS4,TIAOTLJNBS4,$MOVTEMPUTER,50HLJMPSTART;高位调整;*******************
6、**********************TIAOTH:MOV50H,TEMPUTERMOV37H,TEMPHACALL BIN_BCDACALL DISPACALL T12MSACALL T12MSACALL T12MSACALL T12MSMOV 36H,#0AHMOV 37H,#0AHMOV 38H,#0AHACALL DISPACALL T12MSACALL T12MSACALL T12MSACALL T12MSJB S2,ADD11ACALLT12MSJBS2,ADD11JNBS2,$INCTE
7、MPHMOVA,TEMPHCJNEA,#100,ADD11MOVTEMPH,#0ADD11:JBS3,ADD223ACALLT12MSJBS3,ADD22JNBS3,$DECTEMPHMOVA,TEMPHCJNEA,#00,ADD22MOVTEMPH,#100ADD22:JBS4,TIAOTHACALLT12MSJBS4,TIAOTHJNBS4,$MOVTEMPUTER,50HLJMPSTART;一秒定时中段;*****************************************TOIT:PUS
8、HPSWPUSHACCMOVTH0,#3CHMOVTL0,#0B0HINCMS50MOVA,MS50CJNEA,#14H,RETURNMOVS1OK,#1MOVMS50,#00HRETURN:POPACCPOPPSWRETI;*****************************************;温度总子程序;*****************************************wendu