源码
N:=250;
MA04:MA(CLOSE,3),COLORFF00FF;
MA21:=MA(C,21);
牛:=MA21+2*STD(C,21);
熊:=MA21-2*STD(C,21);
HRY:REF(MA04,1);
DRAWBAND(MA04,RGB(155,50,50),HRY,RGB(0,100,50));
黄底:=(SMA(HIGH,19,3) * 1);
{STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3,0),COLORFF7B00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2,0),COLORFF9C00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1.6,0),COLORFFBE00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,0.8,0),COLORFFCC00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,0.3,0),COLORFFFF00;}
{STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,3,0),COLOR0000AA;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,2,0),COLOR0000CC;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),COLOR0000DD;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,0.3,0),COLOR0000FF;}
{STICKLINE((CLOSE > OPEN),OPEN,LOW,0,0),COLOR0726CA;
STICKLINE((CLOSE > OPEN),CLOSE,HIGH,0,0),COLOR0726CA;
STICKLINE((OPEN > CLOSE),CLOSE,LOW,0,0),COLORDE9100;
STICKLINE((OPEN > CLOSE),OPEN,HIGH,0,0),COLORDE9100;}
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 黄底)) AND ((CLOSE -
REF(CLOSE,1)) > 0)),CLOSE,OPEN,4,0),COLOR009FFF;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 黄底)) AND ((CLOSE -
REF(CLOSE,1)) > 0)),CLOSE,OPEN,2,0),COLOR00B5FF;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 黄底)) AND ((CLOSE -
REF(CLOSE,1)) > 0)),CLOSE,OPEN,1,0),COLOR00E4FF;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 黄底)) AND ((CLOSE -
REF(CLOSE,1)) > 0)),OPEN,LOW,0.7,0),COLOR00FFFF;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 黄底)) AND ((CLOSE -
REF(CLOSE,1)) > 0)),CLOSE,HIGH,0.3,0),COLOR00FFFF;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND
(HIGH > 黄底)) AND (CLOSE < 黄底)),OPEN,LOW,0.3,0),COLOR00FF00;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND
(HIGH > 黄底)) AND (CLOSE < 黄底)),CLOSE,HIGH,0.3,0),COLOR00FF00;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND
(HIGH > 黄底)) AND (CLOSE < 黄底)),CLOSE,OPEN,3,0),COLOR009900;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND
(HIGH > 黄底)) AND (CLOSE < 黄底)),CLOSE,OPEN,2,0),COLOR00BB00;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND
(HIGH > 黄底)) AND (CLOSE < 黄底)),CLOSE,OPEN,1,0),COLOR00DD00;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND
(HIGH > 黄底)) AND (CLOSE < 黄底)),CLOSE,OPEN,0.3,0),COLOR00FF00;
VAR0:=SMA(MAX(C-REF(C,2),0),8,1)/SMA(ABS(C-REF(C,2)),8,1)*100;
黄金区: DRAWICON(IF(VAR0<15,15,0),LOW*0.98,1),COLORWHITE;
X1:=(C+L+H)/3;
BB5:=ATAN(EMA(X1,7)-REF(EMA(X1,7),1))*3.1416*10;
EMA3:=EMA(C,3);
DRAWTEXT(FILTER(BB5>1 AND EMA(X1,7)>REF(EMA(X1,7),1),10),
LOW*0.99,'★∠45'),COLORFFFFFF;
M1:=3;M2:=5;M3:=8;M4:=13;M5:=15;M6:=20;
MA1:=MA(C,M1);MA2:=MA(C,M2);MA3:=MA(C,M3);MA4:=MA(C,M4);
MA5:=MA(C,M5);MA6:=MA(C,M6);
PBX1:=(EXPMA(CLOSE,M1)+MA(CLOSE,M1*2)+MA(CLOSE,M1*4))/3;
PBX2:=(EXPMA(CLOSE,M2)+MA(CLOSE,M2*2)+MA(CLOSE,M2*4))/3;
PBX3:=(EXPMA(CLOSE,M3)+MA(CLOSE,M3*2)+MA(CLOSE,M3*4))/3;
PBX4:=(EXPMA(CLOSE,M4)+MA(CLOSE,M4*2)+MA(CLOSE,M4*4))/3;
PBX5:=(EXPMA(CLOSE,M5)+MA(CLOSE,M5*2)+MA(CLOSE,M5*4))/3;
PBX6:=(EXPMA(CLOSE,M6)+MA(CLOSE,M6*2)+MA(CLOSE,M6*4))/3;
AAA:=MIN(MIN(MIN(MIN(MIN(PBX1,PBX2),PBX3),PBX4),PBX5),PBX6);
BBB:=MAX(MAX(MAX(MAX(MAX(PBX1,PBX2),PBX3),PBX4),PBX5),PBX6);
选股:=OBBB;
DRAWICON(选股,LOW,23);
STICKLINE(选股,C,O,4,0)COLOR000099;
STICKLINE(选股,C,O,2,0)COLOR0000BB;
STICKLINE(选股,C,O,1,0)COLOR0000DD;
STICKLINE(选股,C,O,0.3,0)COLOR0000FF;
中:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORFF00FF,LINETHICK1;
上: BBI+3*STD(BBI,10),COLOR00FF00;
下: BBI-3*STD(BBI,10),COLOR0000FF;
安全:=MA(C,30),CIRCLEDOT,COLORFF00FF;
TJ1:=下*1.05>中 AND 中*1.05>上 AND 中>=REF(中,1) AND REF(中,1)>=REF(中,2);
TJ2:=LLV(REF(VOL,1),60);
VAR91:=REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4)+REF(V,5);
VAR92:=VAR91/5;
LB:=V/VAR92;
TJ3:=LB>2 OR VOL/REF(VOL,1)>2;
TJ4:=C
XG:=TJ1 AND TJ3 AND TJ4;
DRAWICON(XG,LOW*0.96,23);
STICKLINE(XG,C,O,4,0),COLOR990099;
STICKLINE(XG,C,O,2,0),COLORBB00BB;
STICKLINE(XG,C,O,1,0),COLORDD00DD;
STICKLINE(XG,C,O,0.3,0),COLORFF00FF;
水平面:=EMA(CLOSE,89),COLOR3399FF;
AAA0:=(3*C+H+L+O)/6;
短趋:=(8*AAA0+7*REF(AAA0,1)+6*REF(AAA0,2)+5*REF(AAA0,3)+4*REF(AAA0,4)+3*REF(AAA0,5)+2*REF(AAA0,6)+REF(AAA0,8))/36;
中趋:=(LLV(短趋,2)+LLV(短趋,4)+LLV(短趋,6))/3;
TTJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>短趋;
立桩量:=FILTER(TTJ1,5);
TTJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TTJ2=1;
TTJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法则:=TTJ3=1;
成立:=三天法则 AND 突破;
条件成立:=FILTER(成立,3);
DRAWICON(条件成立,L*0.91,1);
DRAWTEXT(条件成立,L*0.91,'立桩'),COLORFF26FF;
AA:=MA(C,N),LINETHICK2,COLOR0000FF;
BB:=REF(AA,1);
CC:=REF(AA,2);
DD:=REF(AA,3);
TJ11:=BB>CC;
TJ22:=FILTER(COUNT(CROSS(C,AA),21)>=1,21);
XGC:=TJ11 AND TJ22 ;
DRAWICON(XGC,LOW*0.96,23);
DRAWTEXT(XGC,LOW*0.99,'金')COLOR00FFFF;
DRAWTEXT(XGC,LOW*0.98,'牛')COLOR00FFFF;
AA0:=IF((CLOSE>REF(CLOSE,1)),88,0);
AB0:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (AA0>0),91,0);
DRAWTEXT(FILTER((AB0>90),34),(LOW)*(0.92),'TP');
E1:=BARSCOUNT(C);
AH:=HHV(H,250);
AL:=LLV(L,250);
B0:=(AH-AL)/40;
KB1:=H+B0;
KB2:=L-B0;
STICKLINE((E1+0)/34=FLOOR((E1+0)/34),KB2,KB2-0.8*B0,1,0),COLORYELLOW,LINETHICK3;
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),KB2-B0,'时'),COLORFFFFFF;
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),(KB2-B0)*0.96,'窗'),COLORFFFFFF;