scl equ p3.5
sda equ p3.4
mov sp,#62h
mov r1,#30h
mov r0,#30h
mov r6,#08h
mov b,#00h
lll:acall iicstart
mov a,#10100000b
acall send
mov a,b
acall send
acall iicstart
mov a,#10100001b
acall send
acall read8
acall iicstop
mov @r0,a
inc r0
inc b
djnz r6,lll
loop:
mov a,r1
subb a,#38h
jz sss
ajmp kkk
sss:mov r1,#30h
kkk:
mov r0,#30h ;FI1256查表数据送50h--52h缓冲区
mov r2,#0feh
mov r3,#08h
read:
mov p1,r2
mov a,@r0
mov dptr,#0600h
movc a,@a+dptr
mov 50h,a
mov a,@r0
mov dptr,#0700h
movc a,@a+dptr
mov 51h,a
mov a,@r0
mov dptr,#0800h
movc a,@a+dptr
mov 52h,a
acall iicstart
mov a,#0c0h ;送5字节FI1256总体控制字
acall send
mov a,50h
acall send
mov a,51h
acall send
mov a,#8eh
acall send
mov a,52h
acall send
acall iicstop
mov a,r2
rl a
mov r2,a
inc r0
djnz r3,read
mov dptr #0900h ;显示数据送40h-43h缓冲区
mov a,@r1
movc a,@a+dptr
mov 43h,a
mov dptr #0a00h
mov a,@r1
movc a,@a+dptr
mov 42h,a
mov 41h,#02h
mov dptr #0b00h
mov a,r1
subb a,#30h
movc a,@a+dptr
mov 40h,a
mov a,40h ;显示字符
acall bytedisplay
mov a,41h
acall bytedisplay
mov a,42h
acall bytedisplay
mov a,43h
acall bytedisplay
acall key
jnb f0,loop
acall keyproc
ajmp loop ;主程序结束
k
key: ;键盘扫描子程序
clr f0
orl p3,#10001100b
mov a,p3
orl a,#01110011b
cpl a
jz k_ret
acall delay
orl p3,#10001100b
mov a,p3
orl a,#01110011b
cpl a
jz k_ret
mov b,a
setb f0
k_ret:
orl p3,#10001100b
mov a,p3
orl a,#01110011b
cpl a
jz k_ret1
ajmp k_ret
k_ret1:ret
iicstart: ;IIC总线开始信号
clr scl
nop
nop
setb sda
nop
nop
setb scl
nop
nop
clr sda
nop
nop
clr scl
nop
nop
ret
send:mov r5,#08h ;FI1256送字节子程序
senda:clr scl
rlc a
mov sda,c
nop
nop
setb scl
nop
nop
djnz r5,senda
clr scl
nop
nop
clr sda
nop
nop
setb scl
nop
nop
ret
iicstop: ;IIC总线停止信号
clr scl
nop
nop
clr sda
nop
nop
setb scl
nop
nop
setb sda
ret
bytedisplay: ;字节显示子程序
mov r4,#08h
cyc:rrc a
cpl c
setb p3.0
mov p3.1,c
clr p3.0
setb p3.0
djnz r4,cyc
ret
delay: ;延时10ms子程序
mov r7,#100
d1:mov r6,#100
djnz r6,$
djnz r7,d1
ret
read8:
mov r7,#09h
setb sda
clr a
rd:mov c,sda
rlc a
setb scl
nop
nop
clr scl
nop
nop
djnz r7,rd
ret
end
