No.47385
作者：赵伯忠
邮件：zhaobozhong@yahoo.com.cn
ID：15851
登陆：2次
文章数：4篇
最后登陆IP：218.73.151.176
最后登陆：2004/1/9 14:22:19
注册：2003/11/2 21:08:21
财富：115
发帖时间：2004/1/9 14:22:19
发贴者IP：218.73.151.176
标题：赵伯忠:计米器程序求教？
摘要：No.47385计米器程序求教？ 这个程序现在还存在几个问题：1、32.33H（计数值）不能清零，2、I2C不能读写（有时能
写），3、34H不能清零和加，4、30.31H（预置值）设定不能存入。以下是源程序，万望各
位大侠不惜指教，终身难忘！！！！！
SDA EQU P3.7
SCL EQU P3.6
XYBZ EQU F0
BUF EQU 30H
P_ADR EQU 00H ORG 0000H
AJMP RD24C
ORG 0001H
AJMP RD24C
ORG 001BH
AJMP TIME1
ORG 000BH
AJMP TIME
ORG 0013H
AJMP MAIN
ORG 0023H
AJMP MAIN
ORG 80H
RD24C: MOV 20H,#00H
MOV 45H,#00H
MOV 46H,#00H
MOV 47H,#00H
MOV DPTR,#P_ADR
RD24C1: CLR EA
ACALL FBZM
ACALL CSXY
JB XYBZ,RD24C1
ACALL FDPL
ACALL FJSM
INC R3
MOV A,R3
ACALL FSMW
ACALL CSXY
JB XYBZ,RD24C1
MOV R0,#BUF
MOV R2,#00H
RD24C2: MOV R1,#08H
RD24C3: SETB SCL
SETB SDA
MOV C,SDA
RLC A
CLR SCL
DJNZ R1,RD24C3
MOV @R0,A
INC R0
INC R2
CJNE R2,#05H,WW
ACALL FJSM
MOV TMOD,#16H
MOV TH1,#0BH
MOV TL1,#0DCH
MOV TH0,#01BH
MOV TL0,#01BH
MOV IP,#04H
MOV IE,#8EH
CLR TR1
SETB TR0
MOV SP,#70H
NEXT: LCALL DISP
LCALL KEY
SJMP NEXT
NOP
NOP
NOP
WW: ACALL FYD
AJMP RD24C2
FBZM: SETB SDA
SETB SCL
MOV A,DPH
CLR C
RLC A
ANL A,#0FH
ORL A,#0A0H
MOV R3,A
FSMW: CLR SDA
FSMW1: MOV R1,#08H
FSMW2: CLR SCL
RLC A
MOV SDA,C
SETB SCL
DJNZ R1,FSMW2
CLR SCL
RET
CSXY: SETB SDA
SETB SCL
CLR XYBZ
JNB SDA,CSXY1
SETB XYBZ
CSXY1: CLR SCL
RET
FYD: CLR SDA
SETB SCL
NOP
CLR SCL
SETB SDA
RET
FJSM: CLR SDA
SETB SCL
NOP
SETB SDA
RET
FDPL: MOV A,DPL
FACC: ACALL FSMW1
ACALL CSXY
RET TIME: PUSH ACC
PUSH PSW
SETB P2.7
INC 20H
MOV A,20H
CJNE A,#02H,RETI2
MOV 20H,#00H
MOV A,32H
ADD A,#01H
MOV 32H,A
CJNE A,#64H,RETI1
MOV 32H,#00H
MOV A,33H
ADD A,#01H
MOV 33H,A
CJNE A,#64H,RETI1
MOV 33H,#00H
RETI1: MOV A,33H
MOV A,30H
MOV A,31H
MOV A,32H
CJNE A,30H,RETI2
MOV A ,33H
CJNE A,31H,RETI2
CLR P2.7
MOV A,34H
ADD A,#01H
MOV 34H,A
CJNE A,#64H,RETI3
MOV 34H,#00H
LJMP RETI3
NOP RETI3: MOV 32H,#00H
MOV 33H,#00H
CLR TR0
SETB TR1
NOP
NOP RETI2: POP PSW
POP ACC
RETI
NOP
NOP DISP: MOV DPTR,#TABLE
LOOP1: MOV B,#10
MOV A,32H
DIV AB
MOV 79H,B
MOV 7AH,A
MOV B,#10
MOV A,33H
DIV AB
MOV 7BH,B
MOV 7CH,A
MOV B,#10
MOV A,34H
DIV AB
MOV 7DH,B
MOV 7EH,A
MOV A,79H
MOVC A,@A+DPTR
MOV P0,A
CLR P1.0
ACALL DELAY1
SETB P1.0
MOV A,7AH
ADD A,#0AH
MOVC A,@A+DPTR
MOV P0,A
CLR P1.1
ACALL DELAY1
SETB P1.1
MOV A,7BH
MOVC A,@A+DPTR
MOV P0,A
CLR P1.2
ACALL DELAY1
SETB P1.2
MOV A,7CH
MOVC A,@A+DPTR
MOV P0,A
CLR P1.3
ACALL DELAY1
SETB P1.3
MOV A,7DH
MOVC A,@A+DPTR
MOV P0,A
CLR P1.4
ACALL DELAY1
SETB P1.4
MOV A,7EH
MOVC A,@A+DPTR
MOV P0,A
CLR P1.5
ACALL DELAY1
SETB P1.5
RET
NOP
NOP TABLE: DB 05H,0BDH,26H,34H
DB 9CH,54H,44H,3DH
DB 04H,14H,01H,0B9H
DB 22H,30H,98H,50 ......
>>返回讨论的主题
|
导航: 老古网→ 老古论坛→XMOS公共讨论区→XMOS开源项目区→单片机程序设计→嵌入式系统→广告区域→