仓位主图指标 (源码)

AA:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
BB:=(DYNAINFO(5)<0.01 DYNAINFO(6)<0.01);
DD:=IF(BB,1,(AA<(DYNAINFO(5)+0.01) && AA>(DYNAINFO(6)-0.01)));
CB:=IF(DD,AMOUNT/VOL/100,(HIGH+LOW+OPEN+2*CLOSE)/5);T1:IF(DD,0.01*EXPMA(AMOUNT,3)/EXPMA(VOL,3),EMA((H+L+O+2*C)/5,3));
T2:IF(DD,0.01*EXPMA(AMOUNT,9)/EXPMA(VOL,9),EMA((H+L+O+2*C)/5,9));
T3:IF(DD,0.01*EXPMA(AMOUNT,17)/EXPMA(VOL,17),EMA((H+L+O+2*C)/5,17));
R:=IF(C>350,34,21);
A9:=ABS(CB-MA(CB,R))/MA(CB,R),NODRAW;
JJ:=IF(C>350,DMA(CB,A9)*0.97,DMA(CB,A9));
AAA:=SAR(13,2,20);
操盘线:IF(C>350,MA(T1,3),EMA((T1+T2)/2,2)),LINETHICK2,COLORWHITE;
GW:=IF((C>操盘线 AND C<JJ) OR (C>JJ AND C<操盘线),1,0);
持股1:=IF(GW=0 AND C>操盘线,C,DRAWNULL);
观望1:=IF(GW=1,C,DRAWNULL);
持币1:=IF(GW=0 AND C<操盘线,C,DRAWNULL);
{www.gpxiazai.com 股票软件下载网_最新股票指标公式}
仓位%:IF(持股1=C AND C>REF(C,1)*1.035,100,IF(持股1=C AND C>=REF(C,1) AND
C<REF(C,1)*1.035,85,IF(持股1=C AND C<=REF(C,1),75,IF(观望1=C AND C>=REF(C,1)*1.025,50,
IF(观望1=C AND C<REF(C,1)*1.025,35,IF(持币1=C AND C>REF(C,1)*1.02,20,
IF(持币1=C AND C<REF(C,1)*1.02 AND C>REF(C,1),10,0))))))),COLOR0099FF,NODRAW;
系数:=VOL/MA(VOL,21);
TB1:=IF(系数>1.5,1,0);
TB2:=IF(系数>1.2 AND 系数<1.5,1,0);
TB3:=IF(系数>=1.0 AND 系数<1.2,1,0);
TS1:=IF(系数<0.995,1 AND 系数>0.8,0);
TS2:=IF(系数<0.8 AND 系数>0.5,1,0);
TS3:=IF(系数<0.5,1,0);
放量1:STICKLINE(TB1=1,O,C,0.8,0),COLORRED;
放量2:STICKLINE(TB2=1,O,C,0.8,0),COLORFF00FF;
放量3:STICKLINE(TB3=1 ,O,C,0.8,0),COLOR0099FF;
缩量1:STICKLINE(TS1=1,O,C,0.8,1),COLORYELLOW;
缩量2:STICKLINE(TS2=1,O,C,0.8,1),COLORBLUE;
缩量3:STICKLINE(TS3=1,O,C,0.8,1),COLORGREEN;
上轨:JJ*1.12,COLORLIBLUE,LINETHICK2;
中轨:JJ,COLORLIGRAY,LINETHICK2;
下轨:JJ*0.88,COLORLICYAN,LINETHICK2;
持股线:IF(C>=AAA,操盘线,DRAWNULL),LINETHICK2,COLORLIRED;
持币线:IF(C<AAA,操盘线,DRAWNULL),LINETHICK2,COLORGREEN;
曙光初现:=BACKSET(REF(C,1)/REF(O,1)<0.97 AND C/O>1.03 AND O<REF(C,1) AND C>REF(C,1),2);
STICKLINE(曙光初现,L,H,0.5,0),COLORWHITE;
R1:=EMA(EMA(CLOSE,9),6);
控盘:=(R1-REF(R1,1))/REF(R1,1)*500;
R2:=100*WINNER(CLOSE*0.95);
拉升钱袋:DRAWICON(((C>O OR C>REF(C,1)*1.05) AND R2>45
AND COST(80)<CLOSE AND 控盘>0 AND 控盘>REF(控盘,1) AND C>REF(C,1)),L*0.96,9);
粘合上穿:=MAX(MAX(T1,T2),T3)/MIN(MIN(T1,T2),T3)<1.025 AND CROSS(T1,MAX(T2,T3));
DRAWTEXT(粘合上穿 AND (T1+T2+T3)>REF(T1+T2+T3,1),L*0.97,'注意'),COLOR0099FF;