多用途无线呼叫系统的研发(毕业设计)接收程序源文件.doc

;this is

buf1 equ 20h
buf2 equ 21h
buf3 equ 22h
buf4 equ 23h

ORG 0000H
LJMP START

ORG 0003H
LJMP MINT0

ORG 000BH
LJMP TIME0

ORG 0013H
LJMP MINT1

ORG 001BH
LJMP TIME1

ORG 0100H
START: NOP
; MOV P3,#00H
MOV R0, #55h
MOV R1, #0
LOP: nop
DJNZ R0, LOP
start1: nop
clr p3.5
nop
clr it0
setb ea
setb ex0

jmp $

;;;;;中断程序
;;;;T0中断
TIME0: NOp

out: RETI

;T1中断
TIME1: NOP

retiout: RETI

;;外中断0

MINT0: NOP
mov a, p1
swap a
anl a ,#00001111b
cjne a,#00001111b,st1
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
anl a,#11110000b
mov buf1,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
swap a
anl a,#00001111b
orl a,buf1
mov buf2,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
anl a,#11110000b
mov buf3,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
swap a
anl a,#00001111b
orl a,buf1
mov buf4,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
anl a,#11110000b
cjne a,#00000000b, st
mov a,buf2
cjne a,buf4,st
setb p3.5
ljmp st

st1: nop
cjne a,#00000000b,st
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
anl a,#11110000b
mov buf1,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
swap a
anl a,#00001111b
orl a,buf1
mov buf2,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
anl a,#11110000b
mov buf3,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
swap a
anl a,#00001111b
orl a,buf1
mov buf4,a
lcall delay100ms
lcall delay10ms
lcall delay1ms
mov a,p1
anl a,#11110000b
cjne a,#11110000b, st
mov a,buf2
cjne a,buf4,st
clr p3.5

st: nop
RETI

MINT1: NOP
RETI

DELAY1: MOV R1, #0c0H
DEL11: NOP
NOP
DJNZ R1, DEL11
RET
DELAY1MS:
MOV R4,#2;延时1MS
D1: MOV R5,#248
DJNZ R5,$
DJNZ R4,D1
RET

DELAY10MS:
MOV R4,#20;延时10MS
D2: MOV R5,#248
DJNZ R5,$
DJNZ R4,D2
RET

DELAY100MS:
MOV R4,#200;延时100MS
D3: MOV R5,#248
DJNZ R5,$
DJNZ R4,D3
RET

END