偷窥XXXx盗摄国产,九九国产热线精品

//本示例在Keil開發(fā)環(huán)境下請選擇Intel的8058芯片型號進行編譯
//若無特別說明,工作頻率一般為11.0592MHz
;#define NONE_PARITY 0 //無校驗
;#define ODD_PARITY 1 //奇校驗
;#define EVEN_PARITY 2 //偶校驗
;#define MARK_PARITY 3 //標記校驗
;#define SPACE_PARITY 4 //空白校驗
;#define PARITYBIT NONE_PARITY //定義校驗位
//-----------------------------------------
;P0M1 DATA 0x93 ; P0M1.n,P0M0.n =00--->Standard, 01--->push-pull
;P0M0 DATA 0x94 ; =10--->pure input, 11--->open drain
P1M1 DATA 0x91 ; P1M1.n,P1M0.n =00--->Standard, 01--->push-pull
P1M0 DATA 0x92 ; =10--->pure input, 11--->open drain
;P2M1 DATA 0x95 ; P2M1.n,P2M0.n =00--->Standard, 01--->push-pull
;P2M0 DATA 0x96 ; =10--->pure input, 11--->open drain
P3M1 DATA 0xB1 ; P3M1.n,P3M0.n =00--->Standard, 01--->push-pull
P3M0 DATA 0xB2 ; =10--->pure input, 11--->open drain
;P4M1 DATA 0xB3 ; P4M1.n,P4M0.n =00--->Standard, 01--->push-pull
;P4M0 DATA 0xB4 ; =10--->pure input, 11--->open drain
P5M1 DATA 0xC9 ; P5M1.n,P5M0.n =00--->Standard, 01--->push-pull
P5M0 DATA 0xCA ; =10--->pure input, 11--->open drain
P5 EQU 0C8H;
;P6M1 DATA 0xCB ; P6M1.n,P6M0.n =00--->Standard, 01--->push-pull
;P6M0 DATA 0xCC ; =10--->pure input, 11--->open drain
;P7M1 DATA 0xE1 ;
;P7M0 DATA 0xE2 ;
AUXR EQU 08EH //輔助寄存器
T2H DATA 0D6H //定時器2高8位
T2L DATA 0D7H //定時器2低8位
P_SW1 EQU 0A2H //外設功能切換寄存器1
S1_S0 EQU 40H //P_SW1.6
S1_S1 EQU 80H //P_SW1.7
BUSY BIT 20H.0 //忙標志位
//-----------------------------------------
ORG 0000H
LJMP MAIN
ORG 0023H
LJMP UART_ISR
//-----------------------------------------
ORG 0100H
MAIN:
CLR A
; MOV P0M1, A ;設置為準雙向口
; MOV P0M0, A
MOV P1M1, A ;設置為準雙向口
MOV P1M0, A
; MOV P2M1, A ;設置為準雙向口
; MOV P2M0, A
MOV P3M1, A ;設置為準雙向口
MOV P3M0, A
; MOV P4M1, A ;設置為準雙向口
; MOV P4M0, A
MOV P5M1, A ;設置為準雙向口
MOV P5M0, A
; MOV P6M1, A ;設置為準雙向口
; MOV P6M0, A
; MOV P7M1, A ;設置為準雙向口
; MOV P7M0, A
CLR BUSY;
CLR EA;
MOV SP,#3FH;
MOV A,P_SW1;
ANL A,#03FH; //S1_S0=0 S1_S1=0
MOV P_SW1,A; //(P3.0/RxD, P3.1/TxD)
//-------------------------------
MOV SCON,#50H ; //8位可變波特率
ORL AUXR,#04H ;定時器2時鐘為Fosc,即1T
ORL AUXR,#01H ;串口1選擇定時器2為波特率發(fā)生器 9600
MOV T2L,#0E0H ;設定定時初值 9600
MOV T2H,#0FEH ;設定定時初值
ORL AUXR,#10H ;啟動定時器2
SETB ES; //使能串口中斷
SETB EA;
SJMP $
TXDAT:
MOV DPTR,#TESTSTR; //發(fā)送測試字符串
MOV R4,#9;
LCALL TABS; 查表
RETI
; SJMP $
;-----------------------------------------
TESTSTR:
DB "123456789"
;/*----------------------------
;UART 中斷服務程序
;----------------------------*/
UART_ISR:
PUSH ACC;
PUSH PSW;
JNB RI,CHECKTI; //檢測RI位
CLR RI; //清除RI位
MOV A,SBUF; //P0顯示串口數(shù)據
CJNE A,#1,RXOUT;
LJMP TXDAT;
CHECKTI:
JNB TI,ISR_EXIT; //檢測TI位
CLR TI; //清除TI位
CLR BUSY; //清忙標志
ISR_EXIT:
POP PSW;
POP ACC;
RXOUT:
RETI;
;/*----------------------------
;發(fā)送串口數(shù)據
;----------------------------*/
SENDDATA:
SETB BUSY;
MOV SBUF,A; //寫數(shù)據到UART數(shù)據寄存器
JNB TI,$;
CLR TI;
RET;
;/*----------------------------
;發(fā)送字符串
//------------------------------------------------------------------------------
TABS:
DDD: CLR A;
MOVC A,@A+DPTR;
INC DPTR;
LCALL SENDDATA; //發(fā)送當前字符
DJNZ R4,DDD;
RET;
END;

復制代碼