[文华财经指标]精选止损点多级SAR信号主图指标
本指标源码用于文华财经赢顺wh6、睿期wh7软件。
//止损点多级SAR
STEP1:=2/100;
MVALUE1:=10/100;
SARLINE:=SAR(4,STEP1,MVALUE1),CIRCLEDOT;
AA:IF(SARLINE< 0,ABS(SARLINE),NULL),CIRCLEDOT,COLORCYAN;
BB:IF(SARLINE>0,SARLINE,NULL),CIRCLEDOT,COLORRED;
DRAWTEXT(CROSS(SARLINE< 0,0.5)&&COUNT(CROSS(SARLINE< 0,0.5),BARSLAST(CROSS(C>VALUEWHEN(CROSS(SARLINE< 0,0.5),AA),0.5))),AA,'高点');
CROSS(C>VALUEWHEN(CROSS(SARLINE< 0,0.5),AA),0.5)&&COUNT(CROSS(C>VALUEWHEN(CROSS(SARLINE< 0,0.5),AA),0.5),BARSLAST(CROSS(SARLINE< 0,0.5))),WORD(0,'上'),VALIGN0;
DRAWTEXT(CROSS(SARLINE>0,0.5)&&COUNT(CROSS(SARLINE>0,0.5),BARSLAST(CROSS(C< VALUEWHEN(CROSS(SARLINE>0,0.5),BB),0.5))),BB,'低点'),VALIGN0;
CROSS(C< VALUEWHEN(CROSS(SARLINE>0,0.5),BB),0.5)&&COUNT(CROSS(C< VALUEWHEN(CROSS(SARLINE>0,0.5),BB),0.5),BARSLAST(CROSS(SARLINE>0,0.5))),WORD(1,'下'),COLORGREEN;
ZBGS1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
ZBGS2:=(1-7/100)*(DMA(CLOSE,ZBGS1));
ZBGS3:=(1+7/100)*(DMA(CLOSE,ZBGS1));
ZBGS4:=MA((LOW+HIGH+CLOSE)/3,5);
ZBGS5:=MA(CLOSE,5);
ZBGS6:=ATAN((ZBGS5/REF(ZBGS5,1)-1)*100)*180/3.1416;
ZBGS7:=IF(ZBGS6>0,ZBGS6,ZBGS6);
ZBGS8:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);
ZBGS9:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
ZBGS10:=CLOSE=LLV(C,4) AND (REF(C,1)< REF(C,2) OR REF(C,1)< REF(C,3)) OR REF(C,1)=LLV(C,4) AND C< REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C< REF(C,1) OR REF(C,3)=LLV(C,4) AND C< REF(C,1) AND C< REF(C,2);
ZBGS11:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)< REF(C,4) AND C>=REF(C,1);
ZBGS12:=REF(C,1)=HHV(C,4) AND C< REF(C,2) OR (REF(C,2)=HHV(C,4) AND REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND REF(C,2)>=REF(C,4) AND C< REF(C,1);
ZBGS13:=ZBGS4>REF(ZBGS4,1) AND REF(ZBGS4,1)< REF(ZBGS4,2);
ZBGS14:=LOW< HHV(ZBGS4,13) AND HIGH>HHV(ZBGS4,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN;
ZBGS15:=ZBGS14 AND COUNT(ZBGS13,2);
ZBGS16:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
ZBGS17:=EMA(MA(C,13),13);
ZBGS18:=FILTER((LLV(ZBGS16,2)=LLV(ZBGS16,7) AND COUNT(ZBGS16< 0,2) AND CROSS(ZBGS16,MA(ZBGS16,2)))=1,5);
ZBGS19:=FILTER((HHV(ZBGS16,2)=HHV(ZBGS16,7) AND COUNT(ZBGS16>50,2) AND CROSS(MA(ZBGS16,2),ZBGS16))=1,1);
ZBGS20:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
ZBGS21:=FILTER(((CROSS(ZBGS20,0) OR CROSS(C,ZBGS17)) AND ZBGS18)=1,3);
ZBGS22:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18));
ZBGS23:=ZBGS15 AND NOT(REF(ZBGS15,1));
ZBGS24:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
ZBGS25:=SMA(ZBGS24,3,1);
ZBGS26:=SMA(ZBGS25,3,1);
ZBGS27:=3*ZBGS25-2*ZBGS26;
ZBGS28:=CROSS(ZBGS27,ZBGS26);
ZBGS29:=CROSS(ZBGS26,ZBGS27);
ZBGS30:=(ZBGS21 OR ZBGS22) AND ZBGS18;
ZBGS31:=(ZBGS21 OR ZBGS22) AND ZBGS11;
ZBGS32:=(ZBGS21 OR ZBGS22) AND ZBGS9;
ZBGS33:=(ZBGS9 AND ZBGS18) OR (ZBGS11 AND ZBGS18);
ZBGS34:=(ZBGS28 AND ZBGS11) OR (ZBGS28 AND ZBGS9) OR (ZBGS28 AND ZBGS18);
STICKLINE1(ZBGS10,OPEN,CLOSE,3,0),COLORRED;
STICKLINE1(ZBGS11,OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE1(ZBGS28,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE1(ZBGS29,OPEN,CLOSE,3,0),COLOR000099;
DRAWICON(ZBGS23,LOW-0.02,7);
DRAWICON(ZBGS30 OR ZBGS31 OR ZBGS32 OR ZBGS33 OR ZBGS34,LOW-0.01,1);
DRAWICON(ZBGS29 OR ZBGS19 OR CROSS(40,ZBGS16),HIGH+0.01,2);
DRAWLINE1(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),0),LINETHICK2;
ZBGS35:=(HIGH+LOW+CLOSE)/3;
ZBGS36:=(ZBGS35-MA(ZBGS35,14))/(0.015*AVEDEV(ZBGS35,14));
ZBGS37:=SMA(ZBGS36,3,1);
ZBGS38:=SMA(ZBGS37,3,1);
ZBGS39:=3*ZBGS37-2*ZBGS38;
ZBGS40:=EMA(ZBGS39,5);
ZBGS41:=REF(ZBGS40,1);
ZBGS42:=REF(CLOSE,1);
ZBGS43:=SMA(MAX(CLOSE-ZBGS42,0),6,1)/SMA(ABS(CLOSE-ZBGS42),6,1)*100;
ZBGS44:=(ZBGS43-50)*5,LINETHICK2,COLORYELLOW;
ZBGS45:=SMA(ZBGS44,3,1);
ZBGS46:=SMA(ZBGS45,3,1);
ZBGS47:=3*ZBGS45-2*ZBGS46;
ZBGS48:=EMA(ZBGS47,5);
ZBGS49:=REF(ZBGS48,1);
ZBGS50:=ZBGS48>ZBGS49;
ZBGS51:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
ZBGS52:=SMA(ZBGS51,3,1);
ZBGS53:=(ZBGS52-50)*5,COLORRED;
ZBGS54:=SMA(ZBGS53,3,1);
ZBGS55:=SMA(ZBGS54,3,1);
ZBGS56:=3*ZBGS54-2*ZBGS55;
ZBGS57:=EMA(ZBGS56,5);
ZBGS58:=REF(ZBGS57,1);
ZBGS59:=ZBGS50 AND NOT(REF(ZBGS50,1)) AND (ZBGS57< -100 AND ZBGS57< -100) AND ZBGS40< -100;
DRAWICON(ZBGS59,L,4),VALIGN0;
ZBGS60:=REF(ZBGS50,1)=1 AND NOT(ZBGS50) AND ZBGS40>100;
DRAWICON(ZBGS60,H,5),VALIGN2;
ZBGS61:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
ZBGS62:=SMA(ZBGS61,5,1);
ZBGS63:=SMA(ZBGS62,5,1);
ZBGS64:=3*ZBGS62-2*ZBGS63;
ZBGS65:=EMA(ZBGS64,5);
ZBGS66:=REF(ZBGS65,1);
ZBGS67:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
ZBGS68:=SMA(ZBGS67,3,1);
ZBGS69:=SMA(ZBGS68,3,1);
ZBGS70:=3*ZBGS68-2*ZBGS69;
ZBGS71:=EMA(ZBGS70,5);
ZBGS72:=REF(ZBGS71,1);
ZBGS73:=ZBGS65>ZBGS66 AND ZBGS71>ZBGS72;
ZBGS74:=ZBGS73 AND NOT(REF(ZBGS73,1)) AND (ZBGS65< 50 OR ZBGS71< 50);
ZBGS75:=REF(ZBGS73,1)=1 AND NOT(ZBGS73);
DRAWICON(ZBGS74,L-0.010,9);
DRAWICON(ZBGS75,H+0.010,10);
