等级: 新手上路
- 注册:
- 2021-7-17
- 曾用名:
|
DRAWCOLORKLINE(ISUP,COLORBLACK,1);//收盘价大于开盘价,绘制红色空心K线
DRAWCOLORKLINE(ISDOWN,COLORBLACK,0);//收盘价小于开盘价,绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL,COLORBLACK,1);//收盘价等于开盘价,绘制白色十字线
VV:VOL/EMA(V,30)*100,NODRAW;
TR : =MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW)),OPISTICK;
ATR : =MA(TR,15);
WBAR:= TR >= 1.8 * ATR;
NRB:=(TR/ATR) <= 0.75;
DRAWCOLORKLINE(ISUP&&WBAR,COLORRED,1);
DRAWCOLORKLINE(ISDOWN&&WBAR,COLORLIGHTGREEN,0);
DRAWCOLORKLINE(ISUP&&NRB,RGB(128,64,0),1);
DRAWCOLORKLINE(ISDOWN&&NRB,RGB(128,64,0),0);
WIDTH:=EMA(TR,30);
MAH:=EMA(C, 30) +WIDTH *2;
MAL:=EMA(C, 30) -WIDTH *2;
BW:=(C-MAL)/(MAH-MAL)*100;
DRAWCOLORKLINE(ISDOWN&&WBAR&&BW>=120,COLORBLUE,0);
DRAWCOLORKLINE(ISUP&&WBAR&&BW<=-10,COLORMAGENTA,1);
WBAR1:= TR >= ATR;
HHC: H-C<= H-(H+L)/2,NODRAW;
LLC: C-L<= (H+L)/2-L,NODRAW;
COND1:= REF(HHC,1)&&BW>=90&&WBAR1;
BW1: =H>=REF(H,1)&& L<=REF(L,1)&& LLC;
COND2: =REF(LLC,1)&&BW<=10&&WBAR1;
BW2: =H>=REF(H,1)&& L<=REF(L,1)&& HHC;
OB1:=COND1&& BW1 &&VV>=100 ;
OB2: =COND2&& BW2 &&VV>=100;
DRAWCOLORKLINE(ISUP&&BACKSET(OB1,2),COLORBLUE,1);
DRAWCOLORKLINE(ISDOWN&&BACKSET(OB1,2),COLORBLUE,0);
DRAWCOLORKLINE(ISUP&&BACKSET(OB2,2),COLORRED,1);
DRAWCOLORKLINE(ISDOWN&&BACKSET(OB2,2),COLORRED,0);
|
|