基于单片机涉及的太阳能充电器的汇编语言.doc

ORG0000HLJMPMAINORG000BHLJMPPWML ;PWM波输出ORG001BHLJMPTESTOUT ;检测输出LEDEQU70H ;数码管显示缓冲PWMFBIT00H ;PWM输出标志位PWM1HEQU71H ;PWM高电平缓冲PWM1LEQU72HPWM2HEQU73H ;PWM低电平缓冲PWM2LEQU74HTESTHEQU77H ;检测周期缓存TESTLEQU78HTESTVEQU79H ;输出电压检测缓冲TESTIEQU7AH ;输出电流检测缓冲PWMTEQU7BH ;PWM波周期OUTBIT02H ;功能选择TVIBIT03H ;功能选择ORG0100HMAIN:MOV A,#00HMOV LED,AMOV P1,#07FHCLR TESTVMOV PWMT,#200 ;PWM周期设为50usMOV TESTH,#0FEHMOV TESTL,#0CHLCALL DISPLAYSTART:LCALL TESTINMOV A,TESTVMOV B,#33HDIV ABJNZ NEXTMOV A,#01HNEXT:MOV B,#04HMUL AB ;乘以比例得出实际输入电压MOV B,AJNB OUT,NEXT2NEXT1:MOV A,PWMTDIV ABMOV B,LEDMUL AB ;A中为低电平周期MOV R1,AMOV A,#0FFHCLR CSUBB A,R1INC AMOV PWM2L,AMOV PWM2H,#0FFHMOV A,PWMTCLR CSUBB A,R1 ;A中为高电平周期MOV R1,AMOV A,#0FFHCLR CSUBB A,R1INC AMOV PWM1L,AMOV PWM1H,#0FFHCLR P2.0CLR P2.1CLR P2.2MOV IE,#8AH ;CPU开中断MOV TMOD,#11H ;T模式1，定时，开始输出MOV TH1,PWM2H ;TO赋值MOV TL1,PWM2LMOV TH0,TESTH ;T1赋值MOV TL0,TESTLSETB TR0SETB TR1LJMP EDNEXT2:MOV A,PWMTMOV B,#04HDIV AB ;A中为低电平周期MOV R1,AMOV A,#0FFHCLR CSUBB A,R1INC AMOV PWM2L,AMOV PWM2H,#0FFHMOV A,PWMTCLR CSUBB A,R1 ;A中为高电平周期MOV R1,AMOV A,#0FFHCLR CSUBB A,R1INC AMOV PWM1L,AMOV PWM1H,#0FFHMOV IE,#8BH ;CPU开中断MOV TMOD,#11H ;T模式1，定时，开始输出MOV TH1,PWM2H ;TO赋值MOV TL1,PWM2LMOV TH0,TESTH ;T1赋值MOV TL0,TESTLSETB TR0SETB TR1ED:AJMP EDPROTECT:CLR P1.1LJMP EDPWML:JB PWMF,PWMH ;PWM输出未完成返回CLR TR0MOV TH0,PWM2HMOV TL0,PWM2LSETB TR0SETB PWMFCLR P1.0 ;PWM输出低电平RETIPWMH:SETB P1.0CLR TR0MOV TH0,PWM1HMOV TL0,PWM1LSETB TR0 ;PWM输出高电平CLR PWMFRETITESTIN:SETB P2.0CLR P2.1CLR P2.2LCALL TESTRETTESTOUT:CLR TR1JNB TVI,STCBATEST1:LCALL TESTLCALL TESTJNB OUT,TEST2MOV A,TESTIINC AJZ PROTECTMOV DPTR,#OTVTABMOV A,LEDMOVC A,A+DPTRCLR CCJNE A,TESTV,DADALJMP RETURNDADA:JC XIAOMOV A,PWM2LADD A,#01HMOV PWM2L,AMOV A,PWM1LSUBB A,#01HMOV PWM1L,ALJMP RETURNXIAO:CLR CMOV A,PWM2LSUBB A,#01HMOV PWM2L,AMOV A,PWM1LADD A,#01HJNZ RETURNMOV PWM1L,ARETURN:MOV TH1,TESTHMOV TL1,TESTLSETB TR1RETITEST2:MOV A,#44HCJNE A,TESTV,DXIDLJMP RETURNDXID:JC DXIXMOV DPTR,#OTITABMOV A,LEDMOVC A,A+DPTRJNB OUT,TEST2CJNE A,TESTI,DADA;恒流充电LJMP RETURNDXIX:MOV A,#47HCLR CCJNE A,TESTV,DADA;恒压充电LJMP RETURNSTCBA:CLR P2.0SETB P2.1CLR P2.2LJMP TEST1TEST:CLR P2.5;A/D转换子程序SETB P2.3CLR P2.3SETB P2.4CLR P2.4JNB P2.7,$SETB P2.5JNB TVI,MOVIMOVV:MOV TESTV,P0SETB TVICLR P2.5MOV P0,#0FFHRETMOVI:MOV TESTI,P0CLR TVICLR P2.5MOV P0,#0FFHRETDL10MS:MOV R5,#07HDL0:MOV R6,#0D0HDL1:MOV R7,#19HDL2:DJNZ R7,DL2DJNZ R6,DL1DJNZ R5,DL0RETDISPLAY:MOV DPTR,#LEDTABMOV A,LEDMOVC A,A+DPTRMOV SBUF,ARETLEDTAB:D