A:=AMOUNT/V/100;
?VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5);
?QQ:=EMA(((VARA/10)+EMA(A,13)),0);
?行情線:=MA(A,1);
?重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
?【操盤線】:EMA(((SLOPE(C,21)*20)+C),55),COLORYELLOW,LINETHICK4;
?【黃金線】:IF(重心>=【操盤線】,【操盤線】,DRAWNULL),COLORRED,LINETHICK2;
?【空倉線】:IF(重心<【操盤線】,【操盤線】,DRAWNULL),COLORCYAN,LINETHICK2;
?DRAWTEXT(ISLASTBAR,【操盤線】,'操盤線】',COLORRED;

?變:EMA(CLOSE,5),LINETHICK1,COLORYELLOW;
?金:IF(變>REF(變,1),變,DRAWNULL),COLORRED,LINETHICK1;
?空:IF(變<REF(變,1),變,DRAWNULL),COLORGREEN,LINETHICK1;
?DRAWTEXT(ISLASTBAR,變,'雷達線】',COLORRED;
?{頂底信號}
?DA:=(EMA(H,1)+EMA(L,1)+EMA(H,1)+EMA(H,1))/4;
?DB:=EMA(REF(HHV(H,25),1),2),COLORGREEN,LINETHICK1;
?{DRAWTEXT(CROSS(DB,DA),DB,'險',COLORGREEN,LINETHICK1;}
?DRAWTEXT(CROSS(DA,【操盤線】),【操盤線】,'',COLORWHITE,LINETHICK1;
?{漲跌停顯示}
?漲停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
?STICKLINE(漲停,O,C,1,0),COLORYELLOW;
?ZDF:=(C-REF(C,1))/REF(C,1)*100;
?STICKLINE(ZDF<-9.9,O,C,1,0),COLORBLUE;

?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);
?買１:=VAR10;
?買２:=(VAR11+VAR13+VAR15+VAR17);
?賣１:=(VAR12+VAR14+VAR16+VAR18);
?B:IF(買１>0 OR 買２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
?S:IF(賣１>0,HIGH*1.01,DRAWNULL),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:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF;
?DRAWTEXT(CROSS(S,賣１),S,'空',COLORWHITE,LINETHICK1;
?DRAWTEXT(CROSS(B,買１),B,'多',COLORRED,LINETHICK1;
? 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);
?警告燈:IF(TJ,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORCYAN;
?PL:=BARSLAST(TJ);
?支撐:IF(BARSLAST(TJ1),
?REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLOREA91B5;
?壓力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORYELLOW;
?TJ_2:=LOW>REF(REF(LOW,TS),PL);
?DRAWTEXT(ISLASTBAR,壓力,'力',COLORYELLOW;
?DRAWTEXT(ISLASTBAR,支撐,'撐',COLOREA91B5;

?

?來源:程序化99

?

?來源: www.weiqiv.net.cn

老師 我想把它用在分鐘周期上? 怎么能在分鐘圖上也帶支撐和壓力線？謝謝老師

?

?

老師 你改這個指標? 大小周期都沒有 支撐壓力線?? 分鐘沒有 小時也沒有 日周都沒有。老師你剛才說的之字換向函數? 我不知到怎么改。您幫我改一下。