{龙头定律主图源码如下}
龙头定律:MA(CLOSE,5),COLORFFFFFF, DOTLINE LINETHICK1;
DRAWSL(CURRBARSCOUNT<20 AND V>REF(V,1)*3,H,0,9999999,0),COLORWHITE,LINETHICK2;
STICKLINE(V>REF(V,1)*3,(H+L)/2,CLOSE,2,0),COLORYELLOW;
STICKLINE(V>REF(V,1)*3,O,CLOSE,1,0),COLORRED;
DRAWICON(V>REF(V,1)*3,LOW,9);
DRAWTEXT(V>REF(V,1)*3,LOW*0.98,' ↖龙头启动★'),COLORYELLOW;
{龙头定律副图源码如下}
1;LH:=100-EMA((HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100,34);
J:=EMA(LH,21);
DRAWTEXT(LH>J,1.6,'★'),COLORRED;
DRAWTEXT(LH<J,1.6,'★'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,1.6,' LHJ'),COLORYELLOW;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
DRAWTEXT(DIF>DEA,1.5,'★'),COLORRED;
DRAWTEXT(DIF<DEA,1.5,'★'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,1.5,' MACD'),COLORYELLOW;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);DRAWTEXT(K>D,1.4,'★'),COLORRED;
DRAWTEXT(K<D,1.4,'★'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,1.4,' KDJ'),COLORYELLOW;
TYP:=(HIGH LOW CLOSE)/3;
CCI:=(TYP-MA(TYP,14))*1000/(15*AVEDEV(TYP,14));
DRAWTEXT(CCI>100,1.3,'★'),COLORRED;
DRAWTEXT(CCI<100,1.3,'★'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,1.3,' CCI'),COLORYELLOW;
DRAWTEXT(C>SAR.SAR,1.2,'★'),COLORRED;
DRAWTEXT(C<SAR.SAR,1.2,'★'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,1.2,' SAR'),COLORYELLOW;
DRAWTEXT(RSI.RSI1>50,1.1,'★'),COLORRED;
DRAWTEXT(RSI.RSI1<50,1.1,'★'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,1.1,' RSI'),COLORYELLOW;
X1:=LH>J;
X2:=DIF>DEA;
X3:=K>D;X4:=CCI>100;
X5:=C>SAR.SAR;
X6:=RSI.RSI1>50;
XJ:X1 AND X2 AND X3 AND X4 AND X5 AND X6,NODRAW;
STICKLINE(1,1.7,1.8,3,1),COLOR666666;
DRAWNUMBER(1,1.77,XJ),COLORLIGRAY;
DRAWNUMBER(XJ=6,1.77,XJ),COLORMAGENTA;
DRAWNUMBER(XJ=5,1.77,XJ),COLORRED;
DRAWTEXT(ISLASTBAR=1,1.75,' 龙头定律'),COLORYELLOW;
XG:X1 AND X2 AND X3 AND X4 AND X5 AND X6,NODRAW;
