;****************************************************************************** ; SED1335 CONTROLLER ;****************************************************************************** NEXT REG P2.1 E_SED REG P3.0 ;sed1330 R_W_SED REG P3.7 ;sed1330 CS REG P3.1 ;sed1330 A0 REG P3.4 ;sed1330 RST REG P3.6 ;sed1330 SEL REG P3.5 ;sed1330 STP REG P2.0 S_S REG P2.1 FX EQU 7FH ;text x dot size FX+1 FY EQU 7EH ;text y dot size FY+1 CR EQU 7DH ;character return APL-1 TC_P EQU 7CH ;fram purse 12MHz>=[(TC_P)*9+1]*L_F*70Hz L_F EQU 7BH ;y duty L_F+1 APL EQU 7AH ;number of text per line SAD_2L EQU 79H ;set address of layer 2 low SAD_2H EQU 78H ;set address of layer 2 high BCD EQU 77H ;delay time set MAX_COL EQU 320 ;MAX COLUMN(SEGMENT) MAX_ROW EQU 240 ;MAX ROW(COMMON) ;****************************************************************************** ORG 0H ; ;sed1330 reset MOV FX,#87H MOV FY,#07H MOV CR,#MAX_COL / 8 - 1 ; MOV TC_P,#86 MOV TC_P,#66 MOV L_F,#MAX_ROW - 1 MOV APL,#MAX_COL / 8 MOV SAD_2L,#60H MOV SAD_2H,#09H CALL DELAY1 START: SETB SEL CLR RST NOP NOP NOP NOP NOP SETB RST NOP NOP ;****************************************************************************** SYSTEM_SET: MOV A,#40H CALL COM_W CALL DELAY1 MOV A,#40H CALL COM_W MOV A,#30H CALL DATA_W MOV A,FX ;FX CALL DATA_W MOV A,FY ;FY CALL DATA_W MOV A,CR ;CR CALL DATA_W MOV A,TC_P ;TC/R CALL DATA_W MOV A,L_F ;L/F CALL DATA_W MOV A,APL ;APL CALL DATA_W MOV A,#00H ;APH CALL DATA_W ;****************************************************************************** SCROLL: MOV A,#44H CALL COM_W MOV A,#00H CALL DATA_W MOV A,#00H CALL DATA_W MOV A,L_F CALL DATA_W MOV A,SAD_2L CALL DATA_W MOV A,SAD_2H CALL DATA_W MOV A,L_F CALL DATA_W MOV A,#00H CALL DATA_W MOV A,#00H CALL DATA_W MOV A,#00H CALL DATA_W MOV A,#00H CALL DATA_W ;****************************************************************************** POWERSAVE: ; MOV A,#53H ; CALL COM_W ;; MOV A,#01H ; CALL DATA_W ;****************************************************************************** HDOT_SCR: MOV A,#5AH CALL COM_W MOV A,#00H ;NO SCROLL CALL DATA_W ;****************************************************************************** OVERLAY: MOV A,#5BH CALL COM_W MOV A,#00H ;GRAPHIC & OR CALL DATA_W ;****************************************************************************** CSR_FORM: MOV A,#5DH CALL COM_W MOV A,#07H CALL DATA_W MOV A,#87H CALL DATA_W ;****************************************************************************** CSR_DIR: MOV A,#4CH CALL COM_W CALL CL1 CALL CL2 ;****************************************************************************** DISP_ON: MOV A,#59H CALL COM_W MOV A,#14H CALL DATA_W ;****************************************************************************** ; ALL_ON ;****************************************************************************** ALL_ON: CALL POS2 MOV A,#42H CALL COM_W MOV R0,#MAX_ROW LL1: MOV R1,#MAX_COL / 8 LL2: MOV A,#FFH CALL DATA_W DJNZ R1,LL2 DJNZ R0,LL1 CALL DELAY CALL STP_SC ;****************************************************************************** ;SHOW TEXT SHOW: CALL POS11 MOV A,#42H CALL COM_W MOV R1,#MAX_ROW / 8 - 2 CHAR00: MOV A,#' ' MOV R0,#2 CHAR0: CALL DATA_W DJNZ R0,CHAR0 MOV A,#'0' MOV R0,#10 CHAR1: CALL DATA_W INC A DJNZ R0,CHAR1 MOV A,#'A' MOV R0,#MAX_COL / 8 - 4 - 10 CHAR2: CALL DATA_W INC A DJNZ R0,CHAR2 MOV A,#' ' MOV R0,#2 CHAR3: CALL DATA_W DJNZ R0,CHAR3 DJNZ R1,CHAR00 CALL POS2 MOV A,#42H CALL COM_W MOV R1,#MAX_COL / 8 MOV A,#0FFH FRAME01: CALL DATA_W DJNZ R1,FRAME01 MOV R1,#MAX_ROW - 2 FRAME03: MOV A,#80H CALL DATA_W MOV R0,#MAX_COL / 8 - 2 XRL A,A FRAME02: CALL DATA_W DJNZ R0,FRAME02 MOV A,#00000001B CALL DATA_W DJNZ R1,FRAME03 MOV R1,#MAX_COL / 8 MOV A,#0FFH FRAME04: CALL DATA_W DJNZ R1,FRAME04 CALL DELAY CALL STP_SC CALL CL1 ;****************************************************************************** ; VERTICAL LINE ;****************************************************************************** CALL POS2 MOV A,#42H CALL COM_W MOV R0,#MAX_ROW LL5: MOV R1,#MAX_COL / 8 LL6: MOV A,#55H CALL DATA_W DJNZ R1,LL6 DJNZ R0,LL5 CALL DELAY CALL STP_SC ;****************************************************************************** ; 2*CROSS DOT ;****************************************************************************** CALL POS2 MOV A,#42H CALL COM_W MOV R0,#MAX_ROW / 4 LL15: MOV R1,#2 LL16: MOV R2,#MAX_COL / 8 LL17: MOV A,#CCH CALL DATA_W DJNZ R2,LL17 DJNZ R1,LL16 MOV R1,#2 LL18: MOV R2,#MAX_COL / 8 LL19: MOV A,#33H CALL DATA_W DJNZ R2,LL19 DJNZ R1,LL18 DJNZ R0,LL15 CALL DELAY CALL STP_SC ;****************************************************************************** ; 1*CROSS DOT ;****************************************************************************** CALL POS2 MOV A,#42H CALL COM_W MOV DPTR,#SHOW_HOR MOV R0,#14 LL7: MOV R1,#MAX_COL / 8 LL8: XRL A,A MOVC A,@A+DPTR CALL DATA_W INC DPTR DJNZ R1,LL8 DJNZ R0,LL7 MOV DPTR,#SHOW_VER MOV R0,#113 LL9: MOV R1,#3 LL10: XRL A,A MOVC A,@A+DPTR CALL DATA_W INC DPTR DJNZ R1,LL10 MOV R1,#37 LL11: MOV A,#AAH CALL DATA_W DJNZ R1,LL11 MOV R1,#3 LL12: XRL A,A MOVC A,@A+DPTR CALL DATA_W INC DPTR DJNZ R1,LL12 MOV R1,#37 LL13: MOV A,#55H CALL DATA_W DJNZ R1,LL13 DJNZ R0,LL9 CALL DELAY CALL STP_SC LJMP ALL_ON ;****************************************************************************** ;sed1330 funtion COM_W: MOV P1,A SETB A0 CLR CS CLR R_W_SED NOP SETB R_W_SED SETB CS RET ;****************************************************************************** DATA_W: MOV P1,A CLR A0 CLR CS CLR R_W_SED NOP SETB R_W_SED SETB CS RET ;****************************************************************************** ;CLEAR LAYER 1 CL1: CALL POS1 MOV A,#42H CALL COM_W MOV R0,#30 L1: MOV R1,APL L2: MOV A,#00H CALL DATA_W DJNZ R1,L2 DJNZ R0,L1 RET ;****************************************************************************** ;CLEAR LAYER 2 CL2: CALL POS2 MOV A,#42H CALL COM_W MOV R0,#240 L3: MOV R1,APL L4: MOV A,#0H CALL DATA_W DJNZ R1,L4 DJNZ R0,L3 RET ;****************************************************************************** ;POSITION 1 POS1: MOV A,#46H CALL COM_W MOV A,#00H CALL DATA_W MOV A,#00H CALL DATA_W RET ;****************************************************************************** ;POSITION 1 SHIFT 30 POS11: MOV A,#46H CALL COM_W MOV A,#MAX_COL / 8 CALL DATA_W MOV A,#00H CALL DATA_W RET ;****************************************************************************** ;POSITION 2 POS2: MOV A,#46H CALL COM_W MOV A,SAD_2L CALL DATA_W MOV A,SAD_2H CALL DATA_W RET ;******************************************************************************* ; Procedure of step by step and scan ;******************************************************************************* STP_SC: MOV C,S_S JC STEP RET STEP: MOV C,STP MOV R5,#0FH LOPE: MOV R6,#0FFH LOPD: DJNZ R6,LOPD DJNZ R5,LOPE JNB S_S,LOUT JNC STEP LOUT: RET ;******************************************************************************* ; BCD DELAY TIME SELECT ;******************************************************************************* CBCD: MOV P0,#00H PUSH A MOV A,P0 ANL A,#0FH RL A RL A MOV BCD,A POP A RET ;******************************************************************************* DELAY: CALL CBCD MOV R4,BCD LOPC: MOV R5,#40 LOPB: MOV R6,#250 LOPA: DJNZ R6,LOPA DJNZ R5,LOPB DJNZ R4,LOPC RET ;******************************************************************************** DELAY1: MOV R4,#0 DJNZ R4,$ RET ;******************************************************************************* SHOW_VER: DB 0C2h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,0F1h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,0C2h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,0F1h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,0C2h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,0F1h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,0C2h,0AAh,0AAh,000h,000h,005h DB 000h,000h,00Ah,000h,01Dh,0C5h,000h,011h DB 04Ah,0F0h,01Dh,045h,000h,005h,04Ah,000h DB 01Dh,0C5h,000h,000h,00Ah,000h,000h,005h DB 0C2h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,0F1h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,0C2h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,0F1h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,0C2h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,0F1h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,0C2h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,0F1h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 0C2h,0AAh,0AAh,000h,000h,005h,000h,000h DB 00Ah,000h,05Dh,0C5h,000h,055h,04Ah,0F0h DB 055h,045h,000h,055h,04Ah,000h,05Dh,0C5h DB 000h,000h,00Ah,000h,000h,005h,0C2h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,0F1h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,0C2h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,0F1h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,0C2h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,0F1h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 0C2h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,0F1h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,0C2h,0AAh DB 0AAh,000h,000h,005h,000h,000h,00Ah,000h DB 05Dh,0C5h,000h,051h,04Ah,0F0h,05Dh,045h DB 000h,045h,04Ah,000h,05Dh,0C5h,000h,000h DB 00Ah,000h,000h,005h,0C2h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,0F1h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,0C2h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,0F1h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 0C2h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,0F1h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,0C2h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,0F1h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,0C2h,0AAh,0AAh,000h DB 000h,005h,000h,000h,00Ah,001h,0DDh,0C5h DB 000h,055h,04Ah,0F1h,0D5h,045h,001h,015h DB 04Ah,001h,0DDh,0C5h,000h,000h,00Ah,000h DB 000h,005h,0C2h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,0F1h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 0C2h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,0F1h DB 055h,055h,002h,0AAh,0AAh,001h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,0C2h,0AAh DB 0AAh,001h,055h,055h,002h,0AAh,0AAh,001h DB 055h,055h,002h,0AAh,0AAh,0F1h,055h,055h DB 002h,0AAh,0AAh,001h,055h,055h,002h,0AAh DB 0AAh,001h,055h,055h,0C2h,0AAh,0AAh,055h DB 055h,055h,0AAh,0AAh,0AAh,055h,055h,055h DB 0AAh,0AAh,0AAh,055h,055h,055h SHOW_HOR: DB 008h,042h,010h,084h,021h,008h,042h,010h DB 084h,021h,008h,042h,010h,084h,021h,008h DB 042h,010h,084h,021h,008h,042h,010h,084h DB 021h,008h,042h,010h,084h,021h,008h,042h DB 010h,084h,021h,008h,042h,010h,084h,02Ah DB 008h,042h,010h,084h,021h,008h,042h,010h DB 084h,021h,008h,042h,010h,084h,021h,008h DB 042h,010h,084h,021h,008h,042h,010h,084h DB 021h,008h,042h,010h,084h,021h,008h,042h DB 010h,084h,021h,008h,042h,010h,084h,035h DB 000h,040h,010h,004h,001h,000h,040h,010h DB 004h,001h,000h,040h,010h,004h,001h,000h DB 040h,010h,004h,001h,000h,040h,010h,084h DB 001h,000h,040h,010h,004h,001h,000h,040h DB 010h,004h,021h,000h,040h,010h,004h,00Ah DB 000h,040h,010h,004h,001h,000h,040h,010h DB 004h,001h,000h,040h,010h,004h,001h,000h DB 040h,010h,004h,001h,000h,040h,010h,004h DB 001h,000h,040h,010h,004h,001h,000h,040h DB 010h,004h,001h,000h,040h,010h,004h,015h DB 0C0h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,00Ah DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,000h DB 000h,000h,000h,000h,000h,000h,000h,015h DB 002h,0AAh,0AAh,0AAh,0AAh,0A0h,000h,0AAh DB 0AAh,0AAh,0AAh,0A8h,000h,00Ah,0AAh,0AAh DB 0AAh,0AAh,000h,002h,0AAh,0AAh,0AAh,0AAh DB 000h,000h,0AAh,0AAh,0AAh,0AAh,080h,000h DB 02Ah,0AAh,0AAh,0AAh,0A0h,000h,00Ah,0AAh DB 001h,055h,055h,055h,055h,043h,0B8h,055h DB 055h,055h,055h,050h,0BBh,085h,055h,055h DB 055h,054h,02Eh,0E1h,055h,055h,055h,054h DB 03Bh,0B8h,055h,055h,055h,055h,00Eh,0EEh DB 015h,055h,055h,055h,043h,0BBh,085h,055h DB 002h,0AAh,0AAh,0AAh,0AAh,0A2h,028h,0AAh DB 0AAh,0AAh,0AAh,0A8h,0AAh,08Ah,0AAh,0AAh DB 0AAh,0AAh,028h,0A2h,0AAh,0AAh,0AAh,0AAh DB 00Ah,0A8h,0AAh,0AAh,0AAh,0AAh,082h,08Ah DB 02Ah,0AAh,0AAh,0AAh,0A0h,0AAh,08Ah,0AAh DB 0F1h,055h,055h,055h,055h,043h,0A8h,055h DB 055h,055h,055h,050h,0AAh,085h,055h,055h DB 055h,054h,02Eh,0A1h,055h,055h,055h,054h DB 03Ah,0A8h,055h,055h,055h,055h,00Eh,0EAh DB 015h,055h,055h,055h,043h,0AAh,085h,055h DB 002h,0AAh,0AAh,0AAh,0AAh,0A0h,0A8h,0AAh DB 0AAh,0AAh,0AAh,0A8h,0AAh,08Ah,0AAh,0AAh DB 0AAh,0AAh,022h,0A2h,0AAh,0AAh,0AAh,0AAh DB 022h,0A8h,0AAh,0AAh,0AAh,0AAh,088h,02Ah DB 02Ah,0AAh,0AAh,0AAh,0A0h,0AAh,08Ah,0AAh DB 001h,055h,055h,055h,055h,043h,0B8h,055h DB 055h,055h,055h,050h,0BBh,085h,055h,055h DB 055h,054h,02Eh,0E1h,055h,055h,055h,054h DB 03Bh,0B8h,055h,055h,055h,055h,00Eh,0EEh DB 015h,055h,055h,055h,043h,0BBh,085h,055h DB 002h,0AAh,0AAh,0AAh,0AAh,0A0h,000h,0AAh DB 0AAh,0AAh,0AAh,0A8h,000h,00Ah,0AAh,0AAh DB 0AAh,0AAh,000h,002h,0AAh,0AAh,0AAh,0AAh DB 000h,000h,0AAh,0AAh,0AAh,0AAh,080h,000h DB 02Ah,0AAh,0AAh,0AAh,0A0h,000h,00Ah,0AAh DB 001h,055h,055h,055h,055h,040h,000h,055h DB 055h,055h,055h,050h,000h,005h,055h,055h DB 055h,054h,000h,001h,055h,055h,055h,054h DB 000h,000h,055h,055h,055h,055h,000h,000h DB 015h,055h,055h,055h,040h,000h,005h,055h END