通達信開心主圖指標公式
2020/7/10 18:25:29
HDAY:=15;
LDAY:=15;
PE:=1;
KE:=3;
CURR:=CURRBARSCOUNT;
TCH:=CONST(FINDHIGH(H,0,HDAY*10,1));
GTT:=CONST(BARSLAST(TCH=H))+1;
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1)));
BCL:=CONST(FINDLOW(L,0,LDAY*10,1));
DTT:=CONST(BARSLAST(BCL=L))+1;
SX漲L:=CONST(IF(DTT=1,L,REF(L,DTT-1)));
IM68:=((SX跌H-SX漲L)/6-(SX跌H-SX漲L)/8);
GH跌X:=SX跌H+(SX跌H-SX漲L)/8; DL漲X:=SX漲L-(SX跌H-SX漲L)/8;
STICKLINE(1=1,H,L,9,0)COLOR000000;
GTHT:=IF(DTT>GTT,DTT,GTT); R:=ABS(GTT-DTT);
DRAWBAND(IF(CURR<=GTHT+R/8,GH跌X,DRAWNULL),RGB(80,124,124),DL漲X,RGB(80,124,124));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H,DRAWNULL),RGB(8,168,168),SX跌H,RGB(8,168,168));
DRAWBAND(IF(CURR<=GTHT+R/8,SX漲L,DRAWNULL),RGB(8,168,168),SX漲L,RGB(8,168,168));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX漲L)/8,DRAWNULL),RGB(80,124,24),SX漲L+(SX跌H-SX漲L)/8,RGB(80,124,24));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX漲L)/4,DRAWNULL),RGB(0,124,154),SX漲L+(SX跌H-SX漲L)/4,RGB(0,124,154));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX漲L)*3/8,DRAWNULL),RGB(80,124,24),SX漲L+(SX跌H-SX漲L)*3/8,RGB(80,124,24));
DRAWBAND(IF(CURR<=GTHT+R/8,(SX跌H+SX漲L)/2,DRAWNULL),RGB(8,168,168),(SX跌H+SX漲L)/2,RGB(8,168,168));
DRAWTEXT(CURR=GTHT,SX漲L-IM68,' 開心?果?'),COLOR8899AA;
SX漲:=(CURR=KE+DTT)-1;
SX跌:=(CURR=KE+GTT)-1;
SX漲跌:=DRAWLINE(SX漲=0,SX漲L,SX跌=0,SX跌H,0);
SX跌漲:=DRAWLINE(SX漲=0,SX跌H,SX跌=0,SX漲L,0);
S漲跌X:=DRAWLINE(SX跌=0,SX跌H,SX漲=0,SX漲L,0);
S跌漲X:=DRAWLINE(SX跌=0,SX漲L,SX漲=0,SX跌H,0);
SX漲跌X:=IF(DTT>GTT,SX漲跌,S漲跌X);
SX跌漲X:=IF(DTT>GTT,SX跌漲,S跌漲X);
PEDAY:=IF(PE=1,0,IF(PE=2,R/2,IF(PE=3,R,IF(PE=4,R+R/2,IF(PE=5,2*R,IF(PE=6,2*R+R/2,IF(PE=7,3*R,3*R+R/2)))))));
SLXH:IF(BETWEEN(CURR,KE+DTT-PEDAY,KE+GTT-PEDAY),(SX跌H+SX漲L)/2,DRAWNULL),COLOR8E0000,LINETHICK3;
H跌X:IF(BETWEEN(CURR,KE+DTT-PEDAY,KE+GTT-PEDAY),SX跌H,DRAWNULL),COLOR8E0000,LINETHICK3;
L漲X:IF(BETWEEN(CURR,KE+DTT-PEDAY,KE+GTT-PEDAY),SX漲L,DRAWNULL),COLOR8E0000,LINETHICK3;
STICKLINE(REF(SX漲=0,PEDAY) OR REF(SX跌=0,PEDAY) OR REF(CURR=KE+ROUND((GTT+DTT)/2),PEDAY),SX跌H,SX漲L,0.1,0),COLOR8E0000;
X漲點:=IF(SX漲>SX跌,SX漲,SX跌);
X跌點:=IF(SX漲>SX跌,SX漲,SX跌);
開心1:REF(DRAWLINE(X跌點=0,SX跌H,CURR=KE+ROUND((GTT+DTT)/2),SX漲L,0),PEDAY),COLOR00FFFF;
開心2:REF(DRAWLINE(X跌點=0,(SX跌H+SX漲L)/2,CURR=KE+ROUND((GTT+DTT)/2),SX漲L,0),PEDAY),COLORFF0000,LINETHICK2;
開心3:REF(DRAWLINE(X跌點=0,SX漲L,CURR=KE+ROUND((GTT+DTT)/2),SX跌H,0),PEDAY),COLOR00FFFF;
開心4:REF(DRAWLINE(X跌點=0,SX跌H,X漲點=0,(SX跌H+SX漲L)/2,0),PEDAY),COLOR00FFFF;
開心5:REF(DRAWLINE(X跌點=0,SX漲L,X漲點=0,(SX跌H+SX漲L)/2,0),PEDAY),COLOR00FFFF;
開心6:REF(DRAWLINE(X跌點=0,(SX跌H+SX漲L)/2,CURR=KE+ROUND((GTT+DTT)/2),SX跌H,0),PEDAY),COLORFF0000,LINETHICK2;
開心7:REF(DRAWLINE(X跌點=0,(SX跌H+SX漲L)/2,X漲點=0,SX跌H,0),PEDAY),COLOR00FFFF;
開心8:REF(DRAWLINE(X跌點=0,(SX跌H+SX漲L)/2,X漲點=0,SX漲L,0),PEDAY),COLOR00FFFF;
開心9:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX漲L,X漲點=0,(SX跌H+SX漲L)/2,0),PEDAY),COLORFF0000,LINETHICK2;
開心10:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX跌H,X漲點=0,(SX跌H+SX漲L)/2,0),PEDAY),COLORFF0000,LINETHICK2;
開心11:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX跌H,X漲點=0,SX漲L,0),PEDAY),COLOR00FFFF;
開心12:REF(DRAWLINE(CURR=KE+ROUND((GTT+DTT)/2),SX漲L,X漲點=0,SX跌H,0),PEDAY),COLOR00FFFF;
開心13:REF(SX漲跌X,PEDAY),COLOR8E00E8;
開心14:REF(SX跌漲X,PEDAY),COLOR8E00E8;
IF(BETWEEN(CURR,KE+DTT,KE+GTT),SX跌H,DRAWNULL),COLOR8E0000,LINETHICK3;
IF(BETWEEN(CURR,KE+DTT,KE+GTT),SX漲L,DRAWNULL),COLOR8E0000,LINETHICK3;
STICKLINE(SX漲=0 OR SX跌=0,SX跌H,SX漲L,0.1,0),COLOR8E0000;
DRAWTEXT(CURR=KE+ROUND((GTT+DTT)/2)+5,SX跌H*0.98,'歷史區(qū)間'),COLOR8800AA;
DRAWKLINE(IF(CURR>KE,REFX(H,KE),DRAWNULL),IF(CURR>KE,REFX(O,KE),DRAWNULL),
IF(CURR>KE,REFX(L,KE),DRAWNULL),IF(CURR>KE,REFX(C,KE),DRAWNULL));
看股吧公 式 w ww.kanguba.com
其它股票公式列表
