通达信极品量 K形态解盘指标公式

{极品量 K形态解盘}

DRAWGBK(C>0,RGB(10,100,0),RGB(25,15,0),0,' ',0);

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));

MTIME:=MOD(FROMOPEN,TOTAL);

CTIME:=IF(MTIME<0.5,TOTAL,MTIME);

VVOL:IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0 || SETCODE=1),VVOL,0,-1,-1),COLOR00C0C0;

成交量:VOL,POINTDOT,COLORYELLOW;

AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+ (CLOSE-LOW)),VOL /2)),POINTDOT,COLORRED;

主卖:=IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,AA* (HIGH-LOW),VOL /2)),COLORCYAN,POINTDOT;

STICKLINE(C>=REF(C,1) ,0,VOL,2.2,1),COLORRED;

STICKLINE(C<REF(C,1),0,VOL,2.2,1),COLORCYAN;

STICKLINE(主买>0,0,主买,2.2,0),COLORRED;

资金异动:=VOL/MA(VOL,55)*100,COLORYELLOW;

STICKLINE(主卖>0,0,主卖,0.8,0),COLORCYAN;

STICKLINE(资金异动>100 ,0,VOL,0.1,0),COLORYELLOW;

成交量比%:主买/VOL*100,COLORWHITE,NODRAW;

换:VOL/CAPITAL*100,POINTDOT COLORMAGENTA;

五换:=SUM(换,5),COLORYELLOW;

十换:=SUM(换,10),COLORGREEN;

二十换:=SUM(换,20),COLORFFFFFF;

三十换:=SUM(换,30),COLORYELLOW;

A股:=CAPITAL/1000000,LINETHICK0,COLORWHITE;

启:=MA(V,5)COLORMAGENTA,LINETHICK2;

洗:=MA(V,35)COLORGREEN,LINETHICK2;

异:=MA(V,135)COLORLIBLUE,LINETHICK2;

DRAWTEXT(CROSS(启,洗)AND V>洗 AND V>异 AND 洗<异,V,'★'),COLORMAGENTA;

DRAWTEXT(CROSS(启,异)AND V>异 AND V>异 AND 洗<异,V,'★'),COLORYELLOW;

T00:=STRCAT('智能诊断：',EXTERNSTR(0,12));

DRAWTEXT_FIX(1,0,0.01,0,T00)COLORFFFFFF;

{K线形态解盘}

TT:=240/FROMOPEN;

比:=TT;

J12:=(HIGH - ((HIGH - LOW) / 3));

J23:=(LOW + ((HIGH - LOW) / 3));

T1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)

< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));

T2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1)

> REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02

AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2)),1,0));

T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));

T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));

T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)

< REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));

T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1)

> REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2)),1,0));

T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >

3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));

T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >

3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));

T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >

3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));

T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >

3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));

T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96

AND CLOSE<REF(OPEN,1)

AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04

AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1))),1,0));

T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97

AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1)),1,0));

T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03

AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1)),1,0));

T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04

AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND

MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)

> MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));

T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04

AND CLOSE=OPEN AND

CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)

,REF(OPEN,1))),1,0));

T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));

T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)

-REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));

T18{大阳烛}:=CONST(IF((CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018),1,0));

T19{三个白武士}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)

>REF(OPEN,1) AND CLOSE>OPEN

AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1)),1,0));

T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN

AND CLOSE/OPEN<0.98),1,0));

T21{孕育线}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)

[1] [2] [3]  下一页