【正文】 T0run 。????? mov infrad , 10100101b 。 Send code mov r5, 5 mov Psetect, 0feh mov p1, 00h clr clr clr psok clr Fiveok mov r3, 02h mov Hrec , 00h mov Psnb, 00 mov Psnb+1, 00 mov Psnb+2, 00 retExtrain: clr tr1 。 Stop T1 clr ie1 。 clr Extra interupt flag mov 23h, th1 mov 24h, tl1 mov th1, 00h mov tl1, 00h Setb Hint setb tr1 cpl 。cpl ret Sendcar: jnb iscode, carrier 。 if iscode==0 then send carrier else send code jnb isguidecode, isone clr isguidecode clr mov th0, high(62535) mov tl0, low(62535) setb tr0 setb t0run jmp Quit isone: jnb isozcode, zerocode clr mov th0, high(63850) mov tl0, low(63850) setb tr0 setb t0run jmp Quit zerocode: clr mov th0, high(64575) mov tl0, low(64575) setb tr0 setb t0run jmp Quit Carrier: jnb ie1, nointe acall extrain nointe: nop nop nop nop nop nop nop nop nop nop cpl djnz r7, carrier mov r7, 43 setb iscode clr Quit: ret Findcode: 。setb sendover jnb iscode, Findquit jb isguidecode, Findquit mov a, infrad rlc a mov isozcode,c mov a, infrad rl a mov infrad, a djnz r6, findquit mov infrad ,10100101b mov r6, 5 clr sendover djnz r3, Findquit Setb Fiveok mov r3, 02h clr PSok mov a, psetect rr a mov Psetect ,a jb , acc6_2 setb clr clr jmp Findquit acc6_2: jb , acc5_2 clr setb clr jmp Findquit acc5_2: clr clr setb mov psetect, 0feh Findquit: retCalculate: 。cpl 。??? mov a, 23h cjne a, 05h, $+3 jc Zcode cjne a, 08h, $+3 jnc Gcode setb Codebit cpl 。???? jmp Codeturn Gcode: cjne a, 12, $+3 jnc Calquit cjne a, 10, $+3 cpl jnc Codini 。???? jmp Calquit Zcode: cjne a, 03h, $+3 jc Calquit clr codebit cpl 。???? Codeturn: mov c, codebit mov a, Coderec rlc a mov Coderec, a djnz r5, Calquit mov a, Coderec cjne a,00001010b, Clrp 。jb ,calquit 。cpl inc Hrec jnb Fiveok, Calquit 。 clr Fiveok 。cpl mov a, Hrec cjne a,2, $+3 mov Hrec, 00 jc clrp 。cjne a, 2,$+3 。jc Clrp setb Psok jmp Calquit Clrp: clr Psok jmp Calquit codini: mov r5,4 mov Coderec, 00 。cpl Calquit: ret P1out: mov a, Psetect rl a 。jb Psok , p1set jb ,acc6 。clr mov a, Psnb anl a, 11000000b mov b, a mov c ,psok mov a, Psnb rrc a mov Psnb, a mov c, Psok mov a, b jc Stok cjne a, 00h,p1oquit clr jmp P1oquit Stok: cjne a, 0c0h, P1oquit Setb jmp P1oquit acc6: jb , acc5 mov a, Psnb+1 anl a, 11100000b mov b, a mov c ,psok mov a, Psnb+1 rrc a mov Psnb+1, a mov c, Psok mov a, b jc Stok_1 cjne a, 00h,p1oquit clr jmp P1oquit Stok_1: cjne a, 0e0h, P1oquit Setb jmp P1oquit acc5: jb , P1oquit mov a, Psnb+2 anl a, 11100000b mov b, a mov c ,psok mov a, Psnb+2 rrc a mov Psnb+2, a mov c, Psok mov a, b jc Stok_2 cjne a, 00h,p1oquit clr jmp P1oquit Stok_2: cjne a, 0e0h, P1oquit Setb 。jmp P1oquit P1oquit: ret end infcord data 23h 。the data which wait to send at the address lowbit bit 00h 。 Is it the low voltage station Iscodebit bit 01h 。 Is it the code