ST7920
MOV
R3,#63
R2,#2
R1,#2
CLK
;
;
;
;
;
;
;
;
;
;
;
|
|
|
|
|
|
|
|
|
|
|
CN7:
CN8:
CN9:
MOV
MOV
CLR
SETB
DJNZ
DJNZ
DJNZ
CLR
CLK
R1,CN9
R2,CN8
R3,CN7
CLK
SETB
CLR
CLK
CLK
SETB
CLK
;<---- Counter 655356
;-------------------------------;
CLR
CLK
CLK
;Counter 655357
;
;A=Y0
SETB
MOV
A,P1
A,#FDH,ERRORC
CJNE
CLR
;COMPARE Y0 DATA
;Counter 655358
;
CLK
CLK
SETB
MOV
A,P1
;A=Y1
CJNE
CLR
A,#6FH,ERRORC
;COMPARE Y1 DATA
;Counter 655359
;
CLK
SETB
MOV
CLK
A,P1
;A=Y2
CJNE
A,#B5H,ERRORC
;COMPARE Y2 DATA
CLR
CLK
;Counter 655360
SETB
MOV
CLK
;
A,P1
;A=Y3
CJNE
CLR
A,#85H,ERRORC
;COMPARE Y3 DATA
CLK
;
CLR
TT3
;IF OK CLR TT3
CALL
HCGROM
;
ERRORC:
;
CLR
TT5
;IF CGROM CHECK ERROR CLR TT5
;---------------------------------------;
;*******************************;
;*
CHECK_HCGROM
*;
;*******************************;
;*******************************;
;*
Initial setting
*;
;*******************************;
HCGROM: SETB
TT1
TT2
;
SETB
CALL
CLR
;TT1,TT2 SET HIGH (RESET)
;Wait Reset 100us
DELAY_100US
TT2
CLK
;TT2=LOW TT1=HIGH ( CHECK HCGROM)
SETB
CALL
;
;
DELAY_100US
;*******************************;
;* start counter *;
;*******************************;
MOV
MOV
R3,#9
R2,#32
R1,#32
CLK
;
;<----
N4:
N3:
N2:
MOV
CLR
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
SETB
DJNZ
DJNZ
DJNZ
CLK
R1,N2
R2,N3
R3,N4
MOV
MOV
R3,#32
R2,#31
CLK
N5:
N6:
CLR
SETB
DJNZ
DJNZ
CLK
R2,N6
R3,N5
MOV
R2,#30
V4.0
32/49
2008/08/18