重心:=(收盘价+0.618*向前引用(收盘价,1)+0.382*向前引用(收盘价,1)+0.236*向前引用(收盘价,3)+0.146*向前引用(收盘价,4))/2.382;
【操盘线】:指数平滑移动平均(((线性回归斜率(收盘价,22)*20)+收盘价),55),COLORYELLOW,LINETHICK4;
【黄金线】:画分段线(重心>=【操盘线】,【操盘线】),COLORRED,LINETHICK2;
【空仓线】:画分段线(重心<【操盘线】,【操盘线】),COLORCYAN,LINETHICK2;
显示文字(是否最后周期,【操盘线】,'【操盘线】'),COLORRED;
{引:EMA(CLOSE,2),LINETHICK1,COLORMAGENTA;
探:MA(CLOSE,5),LINETHICK1;}
变:指数平滑移动平均(收盘价,5),LINETHICK1,COLORYELLOW;
金:画分段线(变>向前引用(变,1),变),COLORRED,LINETHICK1;
空:画分段线(变<向前引用(变,1),变),COLORGREEN,LINETHICK1;
显示文字(是否最后周期,变,'【雷达线】'),COLORRED;
{顶底信号}
DA:=(指数平滑移动平均(最高价,1)+指数平滑移动平均(最低价,1)+指数平滑移动平均(最高价,1)+指数平滑移动平均(最高价,1))/4;
DB:=指数平滑移动平均(向前引用(最高值(最高价,25),1),2),COLORGREEN,LINETHICK1;
{DRAWTEXT(CROSS(DB,DA),DB,'←险'),COLORGREEN,LINETHICK1;}
显示文字(交叉函数(DA,【操盘线】),【操盘线】,'B'),COLORWHITE,LINETHICK1;
TJ:=收盘价>开盘价 or 收盘价=开盘价 and 收盘价>向前引用(收盘价,1);
画柱线(TJ,收盘价,开盘价,7,0),COLOR000045;
画柱线(TJ,收盘价,开盘价,6,0),COLOR000065;
画柱线(TJ,收盘价,开盘价,5,0),COLOR000085;
画柱线(TJ,收盘价,开盘价,4,0),COLOR0000A5;
画柱线(TJ,收盘价,开盘价,3,0),COLOR0000C5;
画柱线(TJ,收盘价,开盘价,2,0),COLOR0000E5;
画柱线(TJ,最高价,最低价,1,0),COLOR0000F5;
画柱线(求逻辑非(TJ),收盘价,开盘价,7,0),COLOR353500;
画柱线(求逻辑非(TJ),收盘价,开盘价,6,0),COLOR454500;
画柱线(求逻辑非(TJ),收盘价,开盘价,5,0),COLOR555500;
画柱线(求逻辑非(TJ),收盘价,开盘价,4,0),COLOR656500;
画柱线(求逻辑非(TJ),收盘价,开盘价,3,0),COLOR757500;
画柱线(求逻辑非(TJ),收盘价,开盘价,2,0),COLOR858500;
画柱线(求逻辑非(TJ),最高价,最低价,1,0),COLOR959500;VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买1:=VAR10;
买2:=(VAR11+VAR13+VAR15+VAR17);
卖1:=(VAR12+VAR14+VAR16+VAR18);
B:PARTLINE(买1>0 OR 买2>0,LOW*0.99),CROSSDOT,LINETHICK3,COLORYELLOW;
S:PARTLINE(卖1>0,HIGH*1.01),CROSSDOT,LINETHICK3,COLORGREEN;
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
F:PARTLINE(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98),CROSSDOT,LINETHICK3,COLORFF00FF;
DRAWTEXT(CROSS(卖1>0,卖1),h*1.01,'←逃'),COLORWHITE,LINETHICK1;
DRAWTEXT(CROSS(买1>0 OR 买2>0,买1),l*0.99,'←准备'),COLORRED,LINETHICK1;
{价:}
{JC1:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
参考价1:SMA(JC1,5,1),CIRCLEDOT,COLORGREEN;
IF(C>=参考价1,参考价1,DRAWNULL),CIRCLEDOT,COLOR0000FF;}
PH:=TROUGHBARS(2,5,1);
LL:=HHV(H,PH);
TJ1:=LL=HIGH AND LL<REF(LL,1);{//=1}
TS:=SUMBARS(TJ1,2);
TJ:=PEAKBARS(2,5,1)=1 AND TS>=PH;
DRAWICON(TJ,HIGH*1.01+0.02,2);
警告灯:PARTLINE(TJ,HIGH*1.008),CROSSDOT,LINETHICK2,COLORCYAN;
PL:=BARSLAST(TJ);
支撑:PARTLINE(BARSLAST(TJ1),REF(LOW,BARSLAST(TJ1))),COLOREA91B5;
压力:PARTLINE(BARSLAST(TJ),REF(HIGH,PL)),COLORYELLOW;
TJ_2:=LOW>REF(REF(LOW,TS),PL);
DRAWTEXT(ISLASTBAR,REF(HIGH,PL),'压力'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,REF(LOW,BARSLAST(TJ1)),'支撑'),COLOREA91B5;
{DRAWICON(COUNT(TJ_2,PL+1)=1,HIGH*1.005,2);{//向下的箭头表示出局点}
{DRAWICON(BARSLAST(TJ1),REF(LOW*0.995,BARSLAST(TJ1)),1);};
|