大智慧五里头3主图源码

以下是大智慧五里头3主图源码

N1:=5;
 N2:=8;
 N3:=13;
 LC:=REF(CLOSE,1);
 RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
 RSI2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;
 RSI3:=SMA(MAX(CLOSE-LC,0),N3,1)/SMA(ABS(CLOSE-LC),N3,1)*100;
 {DRAWICON(CROSS(RSI1,20),20,10);}
 WLT11:=CROSS(RSI1,RSI2);
 WLT22:=COUNT(WLT11,20)=2;
 {DRAWICON(FILTER(WLT22 AND RSI1<50,5),RSI2,1);
 DRAWICON(CROSS(RSI1,RSI2) AND RSI1<50,RSI2,1);}
 DRAWICON(CROSS(80,RSI1) AND RSI1<REF(RSI1,1),80,2);
 FILLRGN(RSI1,RSI2,RSI1<RSI2,RGB(0,0,250));
 FILLRGN(RSI1,RSI2,RSI1>RSI2,RGB(250,0,0)),COLORRED;
 STICKLINE(CROSS(RSI1,20) AND (CROSS(RSI1,RSI2) AND RSI1<50),20,0,4,0 ),COLOR000099;
 STICKLINE(CROSS(RSI1,20) AND (CROSS(RSI1,RSI2) AND RSI1<50),20,0,3,0 ),COLOR0000BB;
 STICKLINE(CROSS(RSI1,20) AND (CROSS(RSI1,RSI2) AND RSI1<50),20,0,1.5,0 ),COLOR0000DD;
 STICKLINE(CROSS(RSI1,20) AND (CROSS(RSI1,RSI2) AND RSI1<50),20,0,0.3,0 ),COLOR0000FF;
 VAR2:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
 VAR3:=SMA(SMA(VAR2,3,1),3,1)/28.57;
 VAR4:=EMA(VAR3,5);
操盘:=3*VAR3-2*VAR4;
 D1:=CROSS(操盘,VAR3) AND VAR3<2.1 AND C>O;
 STICKLINE(D1,20,0,4,0),COLOR008888;
 STICKLINE(D1,20,0,3,0),COLOR00AAAA;
 STICKLINE(D1,20,0,2,0),COLOR00CCCC;
 STICKLINE(D1,20,0,1,0),COLOR00EEEE;
 STICKLINE(D1,20,0,0.3,0),COLOR00FFFF;
 DRAWTEXT(D1,41,’全’),COLORFFFFFF;
 DRAWTEXT(D1,35,’仓’),COLORFFFFFF;
 N:=14;M:=6;
 TR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
 HD :=HIGH-REF(HIGH,1);
 LD :=REF(LOW,1)-LOW;
 DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);
 DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);
 PDI:=DMP*100/TR;
 MDI:=DMM*100/TR;
 ADX:EMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
 ADXR:EMA(ADX,M);
 FILLRGN(ADX,ADXR,ADX<ADXR,RGB(0,250,0)),colorBLUE;
 FILLRGN(ADX,ADXR,ADX>ADXR,RGB(250,250,0)),Culor0098FF;
主升:PDI,COLOR0000FF,LINETHICK1;
主跌:MDI,COLORFFFFFF,LINETHICK1;
天:80,COLOR00FF00,POINTDOT,LINETHICK3;
地:20,COLORFF00FF,POINTDOT,LINETHICK3;
 TJJ:=主升>20 AND ADX>ADXR;
 TJ11:=主升>20 AND ADX<ADXR;
 TJ22:=主升<=20 AND ADX>ADXR;
 TJ33:=主升<=20 AND ADX<ADXR;
 STICKLINE(TJJ,主升,20,0.1,0),COLORRED;
 STICKLINE(TJ11,主升,20,0.1,0),COLORDDDD00;
 STICKLINE(TJ22,主升,20,0.1,0),COLORDD00DD;
 STICKLINE(TJ33,主升,20,0.1,0),COLOR00DD00;
 STICKLINE(CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR,20,10,4,0),COLOR990099;
 STICKLINE(CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR,20,10,2,0),COLORBB00BB;
 STICKLINE(CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR,20,10,1,0),COLORDD00DD;
 STICKLINE(CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR,20,10,0.5,0),COLORDD00FF;
 {DRAWICON(CROSS(ADX,ADXR) AND 主跌<20,20,23);}
 D2:=CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR;
 D33:=COUNT(D1 OR D2,3)>=2;
 D66:=D1 AND D2;

{DRAWICON(FILTER(D33,5),0,23);
 DRAWICON(FILTER(D66,5),0,23);};