同花顺粉进黄出副图源码

JJ:=(3*C+H+L+O)/6;
 VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
 TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1;
 LJL:=FILTER(TJ1,5);
 TJ2:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
 TP:=TJ2=1;
 STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),6,0),coloryellow;
 TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
 STFZ:=TJ3=1;
 CL:=STFZ AND TP;
 TJCL:=FILTER(CL,3);
 DRAWTEXT(LJL,L*0.99,'黄'),coloryellow;
 DRAWTEXT(LJL,L*0.95,'金'),coloryellow;
 DRAWTEXT(LJL,L*0.90,'柱'),coloryellow;
 MA7:MA(CLOSE,7),CoLor0000FF;
 MA14:MA(CLOSE,14),CoLor0096FF;
 MA25:MA(CLOSE,25),CoLor00FF99;
 MA125:MA(CLOSE,125),CoLorFF00FF;
 AAF:LLV(LOW,34),Linethick1,CoLorFFFFCC;
 BBF:MA(AAF,4),Linethick1,CoLor00FFFF;
 LC:=REF(CLOSE,1);
 RSI:=((SMA(MAX(CLOSE-LC,0),4.1,1))/(SMA(ABS(CLOSE-LC),4.1,1)))*(100);
 DRAWICON(CROSS(84,RSI),(HIGH)*(1.03),5),CoLor008000;
 DRAWICON(CROSS(RSI,11),(LOW)*(0.99),4),CoLorFF0000;
 VAR27:=REF(CLOSE,1);
 VAR28:=((SMA(MAX(CLOSE-VAR27,0),5.5,1))/(SMA(ABS(CLOSE-VAR27),6,1)))*(100);
 DRAWICON(IF(CROSS(76,VAR28),1,0),(HIGH)*(1.03),5),CoLor000080;
 DRAWTEXT(FILTER((EMA(CLOSE,60)-EMA(CLOSE,12)>0) AND ((EMA(CLOSE,12))/(LOW)>1.15),5),LOW,'☆'),Linethick7,CoLorFF00FF;
 VARA:=((AMOUNT)/(VOL))/(100);
 VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
 VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
 VARD:=DMA(VARB,(VOL)/(VARC));
 VARE:=((CLOSE-VARD)/(VARD))*(100);
 VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
 VARJ:=MA(VARE,20)+STD(VARE,20);
 BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
 AA:=SMA(VARF,3,1);
 SS:=(REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>79);
 DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>SS),(HIGH)*(1.02),'☆'),Linethick7,CoLor008000;
 VAR1:=(ZIG(3,10)<REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1)>REF(ZIG(3,10),2));
 VAR2:=(ZIG(3,10)>REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1)<REF(ZIG(3,10),2));
 STICKLINE(VAR1,CLOSE,OPEN,8,0),Linethick2,CoLor00FFFF;
 STICKLINE(VAR1,CLOSE,OPEN,3,0),Linethick2,CoLor00FFFF;
 STICKLINE(VAR1,HIGH,LOW,1,0),Linethick2,CoLor00FFFF;
 STICKLINE(VAR2,CLOSE,OPEN,8,0),Linethick2,CoLorFF00FF;
 STICKLINE(VAR2,CLOSE,OPEN,3,0),Linethick2,CoLorFF00FF;
 STICKLINE(VAR2,HIGH,LOW,1,0),Linethick2,CoLorFF00FF;
 S:=(MA(VOL,5))/(MA(VOL,60));
 A:=MA(S,5);
 BIAS:=((CLOSE-MA(CLOSE,5))/(MA(CLOSE,5)))*(100);
 F:=MA(S,121);
 RSV:=((CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45)))*(100);
 K:=SMA(RSV,15,1);
 D:=SMA(K,15,1);
 J:=(3)*(K)-(2)*(D);
 LC1:=REF(CLOSE,1);
 RSI1:=((SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1)))*(100);
 DRAWTEXT(CROSS(84,RSI),HIGH,'→ 逃顶 '),CoLor00FFFF;
 DRAWTEXT(CROSS(RSI,11),LOW,'→ 低吸 '),CoLor0000FF;
 MID:=MA(CLOSE,26);
 UPPER:=MID+(2)*(STD(CLOSE,26));
 LOWER:=MID-(2)*(STD(CLOSE,26));
 S1:=IF((J<11) AND (BIAS>(-11)) AND CROSS(S,F) AND (S-F>0.01),2,0);
 DRAWTEXT((S1=2),LOW,'→关注 '),CoLor008000;
 DRAWICON(FILTER(CROSS(S,A) AND (A<0.5) AND (J<20),13),LOW,1),CoLorFFFFFF;