|
|
基于51單片機(jī)和Proteus仿真的RTX51交通燈操作系統(tǒng)，包含C語言源程序及Proteus仿真電路圖，親測完全可用
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）
RTX.png (120.19 KB, 下載次數(shù): 20)
下載附件
2019-5-9 16:16 上傳
單片機(jī)源程序如下:
#include <reg52.h> /* special function register 8052 */
#include <rtx51tny.h> /* RTX-51 tiny functions & defines */
#define OLEN 8 /* size of serial transmission buffer */
unsigned char ostart; /* transmission buffer start index */
unsigned char oend; /* transmission buffer end index */
idata char outbuf[OLEN]; /* storage for transmission buffer */
unsigned char otask = 0xff; /* task number of output task */
#define ILEN 8 /* size of serial receiving buffer */
unsigned char istart; /* receiving buffer start index */
unsigned char iend; /* receiving buffer end index */
idata char inbuf[ILEN]; /* storage for receiving buffer */
unsigned char itask = 0xff; /* task number of output task */
#define CTRL_Q 0x11 /* Control+Q character code */
#define CTRL_S 0x13 /* Control+S character code */
static bit sendfull; /* flag: marks transmit buffer full */
static bit sendactive; /* flag: marks transmitter active */
static bit sendstop; /* flag: marks XOFF character */
/******************************************************************************/
/* putbuf: write a character to SBUF or transmission buffer */
/******************************************************************************/
static void putbuf (char c) {
if (!sendfull) { /* transmit only if buffer not full */
ES = 0; /* disable serial interrupt */
if (!sendactive && !sendstop) { /* if transmitter not active: */
sendactive = 1; /* transfer the first character direct */
SBUF = c; /* to SBUF to start transmission */
}
else { /* otherwize: */
outbuf[oend++ & (OLEN-1)] = c; /* transfer char to transmission buffer */
if (((oend ^ ostart) & (OLEN-1)) == 0) sendfull = 1;
} /* set flag if buffer is full */
ES = 1; /* enable serial interrupt */
}
}
/******************************************************************************/
/* putchar: interrupt controlled putchar function */
/******************************************************************************/
char putchar (char c) {
if (c == '\n') { /* expand new line character: */
while (sendfull) { /* wait for transmission buffer empty */
otask = os_running_task_id (); /* set output task number */
os_wait (K_SIG, 0, 0); /* RTX-51 call: wait for signal */
otask = 0xff; /* clear output task number */
}
putbuf (0x0D); /* send CR before LF for <new line> */
}
while (sendfull) { /* wait for transmission buffer empty */
otask = os_running_task_id (); /* set output task number */
os_wait (K_SIG, 0, 0); /* RTX-51 call: wait for signal */
otask = 0xff; /* clear output task number */
}
putbuf (c); /* send character */
return (c); /* return character: ANSI requirement */
}
/******************************************************************************/
/* _getkey: interrupt controlled _getkey */
/******************************************************************************/
char _getkey (void) {
while (iend == istart) {
itask = os_running_task_id (); /* set input task number */
os_wait (K_SIG, 0, 0); /* RTX-51 call: wait for signal */
itask = 0xff; /* clear input task number */
}
return (inbuf[istart++ & (ILEN-1)]);
}
/******************************************************************************/
/* serial: serial receiver / transmitter interrupt */
/******************************************************************************/
void serial (void) interrupt 4 using 2 { /* use registerbank 2 for interrupt */
unsigned char c;
bit start_trans = 0;
if (RI) { /* if receiver interrupt */
c = SBUF; /* read character */
RI = 0; /* clear interrupt request flag */
switch (c) { /* process character */
case CTRL_S:
sendstop = 1; /* if Control+S stop transmission */
break;
case CTRL_Q:
start_trans = sendstop; /* if Control+Q start transmission */
sendstop = 0;
break;
default: /* read all other characters into inbuf */
if (istart + ILEN != iend) {
inbuf[iend++ & (ILEN-1)] = c;
}
/* if task waiting: signal ready */
if (itask != 0xFF) isr_send_signal (itask);
break;
}
}
if (TI || start_trans) { /* if transmitter interrupt */
TI = 0; /* clear interrupt request flag */
if (ostart != oend) { /* if characters in buffer and */
if (!sendstop) { /* if not Control+S received */
SBUF = outbuf[ostart++ & (OLEN-1)]; /* transmit character */
sendfull = 0; /* clear 'sendfull' flag */
/* if task waiting: signal ready */
if (otask != 0xFF) isr_send_signal (otask);
}
}
else sendactive = 0; /* if all transmitted clear 'sendactive' */
}
}
/******************************************************************************/
/* serial_init: initialize serial interface */
/******************************************************************************/
void serial_init (void) {
// P1M1 = 0xFE; // Configure P1.0 (TxD) as Output
//
// SCON = 0x52; /* initialize UART */
// BRGR0 = 0xF0; /* 9600 baud, 8 bit, no parity, 1 stop bit */
// BRGR1 = 0x02;
// BRGCON = 0x03;
//SCON = 0x50;
//TMOD = 0x20;
//PCON = 0x00;
//TH1 = TL1 = 0xFD;
//EA = 1;
//ES = 1;
//TR1 = 1;
TMOD |= 0x20; //定時(shí)器T1工作在方式2（即自動重裝初值），定時(shí)狀態(tài)由TR1控制
TL1 = TH1 = 0xFD; //波特率為：9600
ET1 = 0; //T1用作波特率發(fā)生器，禁止T1中斷
TR1 = 1; //啟動定時(shí)器T1
SCON = 0x50; //方式1，8位UART，允許接收
PCON &= 0x7F; //波特率不倍增
ES = 0;
}
0.png (9.46 KB, 下載次數(shù): 16)
下載附件
2019-5-9 16:51 上傳
全部資料51hei下載地址：
基于51單片機(jī)和Proteus仿真的RTX51操作系統(tǒng).zip
(100.44 KB, 下載次數(shù): 43)
2019-5-9 16:14 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
評分
-
查看全部評分
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
