call write
jjj btfss PORTB,0
goto back1
clrf flag4
MOVlw b’01010101’
MOVwf portc
goto jjj
;
back1 goto main
;=========== 写子程序 ============
write
clrf PORTC ;//////表示进入写状态
;
bsf STATUS,RP1
bsf STATUS,RP0 ;/bank4
btfsc EECON1,WR ;WR=0上一次写完成
goto $-1
bcf STATUS,RP0
bcf STATUS,RP1 ;/bank0
MOVf ADDR,W
bsf STATUS,RP1 ;/bank2
MOVwf EEADR ;ADDR-->EEADR
bcf STATUS,RP1 ;/bank0
MOVf NUM,W
bsf STATUS,RP1 ;/bank2
MOVwf EEDATA ;VALU-->EEDATA
bsf STATUS,RP0 ;/bank3
bcf EECON1,EEPGD ;选定EEPROM为访问对象
bsf EECON1,WREN ;开放写操作使能控制位
bcf INTCON,GIE ;
;
MOVlw 55h ;“5指令序列”
MOVwf EECON2
MOVlw 0aah
MOVwf EECON2
bsf EECON1,WR ;启动写操作
;
btfsc EECON1,WR
goto $-1 ;等待写操作成
bsf INTCON,GIE
bcf EECON1,WREN
bcf STATUS,RP0
bcf STATUS,RP1 ;bank0
incf ADDR,1
;
MOVlw 0x0f ;////
MOVwf PORTC
return
;================================
end
上一页 [1] [2] [3] [4] [5] [6]
本文关键字：程序 ERROR PIC单片机，单片机-工控设备 - PIC单片机
