代码比较多。工作人员需要时间慢慢处理。
先给第一个段的:
1.
AA:=EMA(C,5) > EMA(C,19);
BB:=EMA(C,5) < EMA(C,19);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
//本为阴线,变阳线,红色,实心
STICKLINE(AA AND C<=O,C,O,10,0,COLORRED); //画K线为阳线(柱体部分)
DRAWLINE(AA AND C<=O,L,AA AND C<=O,H,COLORRED); //画K线为阳线(上下影线部分)
//本为阳线,变阴线,青色,空心
STICKLINE(BB AND C>=O,C,O,10,1,COLORCYAN); //画K线为阴线(柱体部分)
DRAWLINE(BB AND C>=O,H,BB AND C>=O,C,COLORCYAN);//画K线为阴线(上影线部分)
DRAWLINE(BB AND C>=O,O,BB AND C>=O,L,COLORCYAN);//画K线为阴线(下影线部分)
//矛盾处画白色实体K线,阳线空心,阴线实心
STICKLINE(BB AND CC AND C>=O,C,O,10,1,COLORWHITE); //画K线为阳线(柱体部分)
DRAWLINE(BB AND CC AND C>=O,H,BB AND CC AND C>=O,C,COLORWHITE);//画K线为阳线(上影线部分)
DRAWLINE(BB AND CC AND C>=O,O,BB AND CC AND C>=O,L,COLORWHITE);//画K线为阳线(下影线部分)
STICKLINE(BB AND CC AND C<O,C,O,10,0,COLORWHITE); //画K线为阴线(柱体部分)
DRAWLINE(BB AND CC AND C<O,L,BB AND CC AND C<O,H,COLORWHITE); //画K线为阴线(上下影线部分)
//矛盾处画白色实体K线
STICKLINE(AA AND CC1 AND C>=O,C,O,10,1,COLORWHITE); //画K线为阳线(柱体部分)
DRAWLINE(AA AND CC1 AND C>=O,H,AA AND CC1 AND C>=O,C,COLORWHITE);//画K线为阳线(上影线部分)
DRAWLINE(AA AND CC1 AND C>=O,O,AA AND CC1 AND C>=O,L,COLORWHITE);//画K线为阳线(下影线部分)
STICKLINE(AA AND CC1 AND C<O,C,O,10,0,COLORWHITE); //画K线为阴线(柱体部分)
DRAWLINE(AA AND CC1 AND C<O,L,AA AND CC1 AND C<O,H,COLORWHITE); //画K线为阴线(上下影线部分)
//操盘线
趋势线:EMA(EMA(C,10),10),NODRAW;
red:if(趋势线>=REF(趋势线,1),趋势线,drawnull),colorred,LINETHICK2;//均线上升时为红色,否则为蓝色
blue:if(趋势线<REF(趋势线,1),趋势线,drawnull),COLORBLUE,LINETHICK2;//均线上升时为红色,否则为蓝色
DRAWGBK((AA>BB),RGB(64,0,0),RGB(128,0,0),0);//上涨
DRAWGBK((AA<BB),RGB(0,128,0),RGB(0,64,0),0);//下跌