请教STC15单片机串口4的发送数据的程序问题

I_believe

如题，只发一次就不发了。单片机代码如下：
" w6 e, V0 c. k# u
) e$ G/ q# V7 `void serial_port4_initial(){

" k. p, q5 K' U" ^  {2 e        S4CON = 0x10;                //8位数据,可变波特率
% g" G( R. y: O# p, H  e        S4CON |= 0x40;                //串口4选择定时器4为波特率发生器
        T4T3M &= 0xDF;                //定时器时钟12T模式
# ]. P/ v- c" a( d        T4L = 0xDD;                //设置定时初始值
  s( e* I) B1 I  R        T4H = 0xFF;                //设置定时初始值
/ ?* x) b+ m! ^  B: h        T4T3M |= 0x80;                //定时器4开始计时
1 g1 k+ u3 x+ W5 u
3 `7 E* h4 {4 g) y* M        IE2 |= 0x10;         //ES4 = 1;
        P_SW2=0x04;         //串口2、3、4的位置
: w+ L3 D: k' D  n& M1 R7 ]$ Z        EA = 1;
+ J* B* l# x  o$ C4 H& m
! J  C& P- n& L9 m& c! M}
+ {( k- B6 A$ Q. F6 A4 [6 O
7 ~& p! t7 ~/ n, n! d3 R
# ?( w+ {+ L+ c1 M4 k* t) h- R" Evoid send_UART4(uchar dat)
{
( h" D! C- |- ]5 N7 `         uchar temp = 0;
        

        S4CON = S4CON & 0xfd;  //S4TI = 0;

% E  z2 r2 Z1 F2 @8 K. z) n# H                S4BUF = dat;
5 J. |) T% F3 V0 h7 d                do
                {
                        temp = S4CON;
" r$ e) S2 l8 Y) D9 @7 K+ J0 r                        temp = temp & 0x02;                //temp=S2TI
" j5 I! T# f9 p  `" N+ {: m7 z  R                }while(temp == 0);
                S4CON = S4CON & 0xfd;            //S4TI = 0;
' f  z6 O( w* ]% N' i$ X        

, o% W2 T" e7 u8 d. l( s+ `. y}
) R; d5 X- Y3 D3 c4 n
( z; V# D/ s5 C主函数：
* M6 C' Z' s$ j+ L1 D$ Mserial_port4_initial();
        while(1)
; V. \! e& T/ Q- Q3 p) j+ u* v. C        {        
; q3 Z) e7 o7 G0 X. Q

) Z" d  D" Y" T# s1 ]# u! U) m                delayms(500);
2 V# |# q. j* C4 M        
                send_UART4(0X28);
, M" W1 _! u$ _' x, U" d               
        }        
意思是500毫秒发一次，结果发一次就不发了。  
& `" v. ~2 L+ @: c7 |

duhe3hfu

看下delayms函数，可能是这个函数的问题

we_happiness

定义运算，要加";"号于结尾
$ r. |9 a0 c; \! k! l#define  UART4_INT_DISABLE() IE2 &= ~(1<<4);        //允许串口3中断

elephant_

既然串口用了中断,就不用再在发送函数中等待发送完成
因为,一旦发送完成,优先是进入中断的,我不知道中断触发后,不清除中断标志位(S4TI),程序会不会是一直卡在中断中
6 s; K. Q: y0 Y) P8 X个人感觉就是因为S4TI没有清除,而你又开了中断,所以,程序是发送一次之后,中断触发了,就一直卡在中断中出不来了
推荐增加一个中断标志位,然后在中断触发后清除
) \3 r7 H5 k" [% t4 I2 y& l' r) _while(busy);busy=1;S4BUF = dat;

busy在串口中断触发后,在中断中清除,并清除S4TI
这样可以提高中断的效率