27 / 47 page

ST7920
C2.0c
27/47
2001/10/18
8051 串列資料傳輸示範程式
串列資料傳輸示範程式
串列資料傳輸示範程式
串列資料傳輸示範程式
;--------------------------------------------------------------
;
Write data from A into INSTRUCTION Register
;--------------------------------------------------------------
WRINS:
SETB
CS
SETB
SID
; SID = 1
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.7
; SID = A.7
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.6
; SID = A.6
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.5
; SID = A.5
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.4
; SID = A.4
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.3
; SID = A.3
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.2
; SID = A.2
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.1
; SID = A.1
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.0
; SID = A.0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
CS
CALL
DLY8
RET
;-------------------------------------------------
;
Write data from A into DATA Register
;-------------------------------------------------
WRDATA:
SETB
CS
SETB
SID
; SID = 1
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SID
; SID = 1
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.7
; SID = A.7
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.6
; SID = A.6
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.5
; SID = A.5
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.4
; SID = A.4
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.3
; SID = A.3
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.2
; SID = A.2
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.1
; SID = A.1
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
MOVBIT
SID, A.0
; SID = A.0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
SID
; SID = 0
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
SETB
SCLK
; READ DATA FROM SID
CLR
SCLK
CLR
CS
CALL
DLY8
RET