MA120:MA(CLOSE,120);
MA250:MA(CLOSE,250);
VARR1:=(CLOSE+HIGH+LOW)/3;
VARR2:=EMA(VARR1,10);
VARR3:=REF(VARR2,1);
黄珠买: IF(VARR2 VARR3,VARR2,DRAWNULL), POINTDOT,LINETHICK4, COLORYELLOW;
蓝珠卖: IF(VARR2 VARR3,VARR3,DRAWNULL),POINTDOT,LINETHICK4, COLORBLUE;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3K-2D;
X:=LLV(J,2)=LLV(J,8);
DRAWTEXT(crOSS(J,REF(J+0.01,1)) AND X AND J 20,LOW0.95,' 播种'),COLORRED,LINETHICK2;
DRAWICON(CROSS(J,REF(J+0.01,1)) AND X AND J 20,LOW0.95,17);
VAR1:=IF(CLOSE/REF(CLOSE,1) 1.050 AND HIGH/CLOSE 1.010 AND IF(CLOSE REF(CLOSE,1),88,0) 0, 91, 0);
DRAWTEXT(VAR1 90,LOW0.92,' 追肥'),COLORFF00FF;
DRAWICON(VAR1 90,LOW0.92,25);
VAR2:=(POW(MA(CLOSE,5),2)+MA(CLOSE,5));
VAR3:=(POW(MA(LOW,5),2)+MA(LOW,5));
VAR4:=(POW(MA(HIGH,5),2)+MA(HIGH,5));
VAR5:=(((((VAR2-LLV(VAR3,64))/(HHV(VAR4,64)-LLV(VAR3,64)))150)+65)-10);
VAR6:=((SMA(VAR5,3,1)1.5)-100);
VAR7:=SMA(VAR6,3,1);
VAR8:=((3VAR6)-(2VAR7));
VAR9:=(((HIGH+LOW)+(CLOSE2))/4);
VAR10:=EMA(VAR9,13);
VAR11:=STD(VAR9,13);
VAR12:=(((VAR9-VAR10)100)/VAR11);
VAR13:=EMA(VAR12,5);
VAR15:=((EMA(VAR13,13)+200)-100);
VAR16:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)100)/3;
DRAWTEXT(FILTER(VAR16 -9 AND VAR16 REF(VAR16,1),18),L0.9,' 抢播♂'),COLORRED,LINETHICK2;
DRAWICON(FILTER(VAR16 -9 AND VAR16 REF(VAR16,1),18),L0.9,1);
VAR17:=100-3SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))100,20,1)+2SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))100,20,1),15,1);
VAR18:=VAR8 REF(VAR17,1) AND vol REF(VOL,1) AND CLOSE REF(CLOSE,1);
大资金:=(VAR18 AND COUNT(VAR18,30)=1);
DRAWTEXT(大资金,LOW0.85,'▲大资金');
{季节变化}
AA:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
A0:=(AH-AL)/40;
B11:=L-A0;
STICKLINE((AA+0)/34=FLOOR((AA+0)/34),B11,B11-1.5A0,2,0),COLORF00FF0;
DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),B11-1A0,'季节变化'),COLORLIGREEN;
{大笔出货}
VAR22:=MA(100(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR23:=(HIGH+LOW+CLOSE)/3;
VAR24:=(VAR23-MA(VAR23,14))/(0.015AVEDEV(VAR23,14));
VAR25:=(VAR23-MA(VAR23,70))/(0.015AVEDEV(VAR23,70));
VAR26:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)100;
VAR27:=100-Abs(VAR26);
VAR28:=IF(VAR27 90,VAR27,100);
VAR29:=IF(VAR22 0,VAR22,0);
VAR30:=IF(VAR25 =200 AND VAR24 =150,15,IF(VAR25 =-200 AND VAR24 =-150,-15,VAR15))+60;
VAR31:=VAR29 48 AND VAR30 60 AND VAR28
DRAWTEXT(VAR31 AND COUNT(VAR31,30)=1,HIGH1.02,'大笔出货'),LINETHICK1,COLORFFCC66;
XXS:=MA(HIGH,5)(1+5/100);
DRAWTEXT(CROSS(XXS,C),H,' 收割'),COLORGREEN,LINETHICK1;
DRAWICON(CROSS(XXS,C),H1.05,9);
AA1:=AMOUNT/V;
BB1:=L AA10.9;
CC1:=(C-REF(C,1))/REF(C,1)100
DD1:=L MA(C,5)0.921;
EE1:=V MA(V,5)1.5;
鼠:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;
DRAWTEXT(鼠,(LOW 0.99),' 鼠'),COLOR40CCFF;
DRAWICON(鼠,(LOW 0.99),23);
VAR013:=IF(MA(CLOSE,13) REF(MA(CLOSE,13),1),MA(CLOSE,13),DRAWNULL);
DRAWTEXT((IF(CLOSE MA(CLOSE,13) AND OPEN CLOSE,-0.1,0))AND((C-REF(C,1))/(REF(C,1)) 0.061)AND (MA(CLOSE,13)=VAR013) AND (MA(CLOSE,1),MA(CLOSE,13)) AND (VOL REF(HHV(VOL,3),1)2),L0.9,'主力介入'),COLORRED;
N:=10;
T1:=CONST(HHVBARS(V,N));
T0:IF(CURRBARSCOUNT =N+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL);
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT;
DRAWTEXT(ISLASTBAR,T0,' 量能平台');
跟进:=IF(CROSS(K,D) OR CROSS(REF(K,1),REF(D,1)) OR CROSS(REF(K,2),REF(D,2)),10,0),COLORYELLOW;
RSV2:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))100;
K2:=EMA(RSV2,3);
D2:=EMA(K2,3);
J2:=(3K2-2D2);
kdj2:=REF(COUNT(J2 REF(J2,1),5) =3,1) AND REF(J2,1)
kdJ3:=J2 REF(J2,1);
反转:=IF(FILTER(KDJ2 AND KDJ3,3),50,0),COLORRED;
买:=IF(CROSS(J,2),35,0);
VAR222:=REF(LOW,1);
VAR332:=SMA(ABS(LOW-VAR222),3,1)/SMA(MAX(LOW-VAR222,0),3,1)100;
VAR442:=EMA(IF(CLOSE1.3,VAR33210,VAR332/10),3);
VAR552:=LLV(LOW,13);
VAR662:=HHV(VAR442,13);
VAR772:=IF(MA(CLOSE,34),1,0);
VAR888:=EMA(IF(LOW =VAR552,(VAR442+VAR6622)/2,0),3)/618VAR772;
VAR999:=IF(VAR888 100,100,VAR888);
吸筹:=VAR999,LINETHICK1,COLORCD7F32 ;
HH:=CONST(HHV(C,120))*1;{取现价的N日最大值}
LL:=CONST(LLV(C,120))*1;{取现价的N日最小值}
HL:=CONST(IF(CONST((HH+LL)/2) CONST(C),LL-(HH-LL)*0.4,HH+(HH-LL)*0.4));
{取叠加副图自动转换高低值,当现价小于中间值时以LL-(HH-LL)*0.2为副图自动转换高低值,反之以HH+(HH-LL)*0.2为副图自动转换高低值}
HH1:=IF(CONST((HH+LL)/2) CONST(C),HH,HL);{当现价小于中间值时以最大值为最高点,反之以HL为最高点}
LL1:=IF(CONST((HH+LL)/2) CONST(C),LL,HL);{当现价小于中间值时以最小值为最低点,反之以HL为最低点}
HLMAX:=MAX(HH1,LL1);{设定所要叠加副图比例的最大值}
HLMIN:=MIN(HH1,LL1);{设定所以叠加副图比例的最小值}
HLMN1:=(HLMAX+HLMIN)/2;{取设定所要叠加副图比例的最大最小值的中间值}
HLMN2:=HLMAX-HLMIN;{取设定所要叠加副图比例的最大最小值的差值}
HLMN3:=(100-0)/2;
HLMN4:=100-0;
(50-50)*HLMN2/100+HLMN1,COLOR555555;
{(20-50)*HLMN2/100+HLMN1,COLOR555555;
(80-50)*HLMN2/100+HLMN1,COLOR555555;}
(100-50)*HLMN2/100+HLMN1,COLOR555555;
{以上定义叠加副图坐标}
STICKLINE(吸筹,(0-50)*HLMN2/100+HLMN1,(VAR999-50)*HLMN2 /100+HLMN1,2,10),COLORFF00FF;
STICKLINE(J =0,(90-50)*HLMN2/100+HLMN1,(100-50)*HLMN2/100+HLMN1,4,0),COLORYELLOW;
IF(反转=50,(50-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORRED;
IF(买=35,(35-50)*HLMN2/100+HLMN1,(0-50)*HLMN2 /100+HLMN1),COLORYELLOW,LINETHICK1.5;
IF(跟进=10,(10-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORRED;
KZ:(K-50)*HLMN2/100+HLMN1,COLORFFFFFF;
DZ:(D-50)*HLMN2/100+HLMN1,COLOR00FFFF;
JZ:(J-50)*HLMN2/100+HLMN1,COLORMAGENTA;
KDJ_K:= KDJ.K (9,3,3);KDJ_D:= KDJ.D (9,3,3);KDJ_J:= KDJ.J (9,3,3);
买1:=CROSS(KDJ_J,0) OR (CROSS(KDJ_J,KDJ_K) AND KDJ_D
买2:=CROSS( rsi.RSI1 (6,2,2),20) OR CROSS( RSI.RSI1 (6,12,24), RSI.RSI2 (6,12,24));
买3:=CROSS( macd.DIF , MacD.DEA ) OR CROSS( MACD.MACD ,0);
买0:=买1+买2+买3;
{买:IF(买0 1,买0,0);}
DRAWICON(买0 1,L*0.98,16);