把通达信主升浪改成飞狐好用的
2020/1/12 18:18:04
公式编写说明：
{专捕主升浪通达信}顶:=85;中:=50;底:=20;VAR1:=HHV(HIGH,9)-LLV(LOW,9);VAR2:=HHV(HIGH,9)-CLOSE;VAR3:=CLOSE-LLV(LOW,9);VAR4:=VAR2/VAR1*100-70;VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;VAR6:=(2*CLOSE+HIGH+LOW)/4;VAR7:=SMA(VAR3/VAR1*100,3,1);VAR8:=LLV(LOW,34);VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);VARA:=IF(VAR9>100,VAR9-100,0);VARB:=HHV(HIGH,34);AA:= VARA*2;BB:= EMA((VAR6-VAR8)/(VARB-VAR8)*100,13);VARC:=EMA(0.667*REF(BB,1)+0.333*BB,2);CC:SMA(VAR5,20,1),COLORRED;CC1:SMA(CC,5,1),COLORGREEN;STICKLINE(CC>CC1,CC,CC1,1,0),COLORRED;STICKLINE(CC1>CC,CC,CC1,1,0),COLORGREEN;出击:IF((CROSS(CC,CC1) AND (CC1 < 顶) ),80,0),COLORRED;{跑}DRAWICON(CC < REF(CC,1) AND REF(CC,1) < REF(CC,2) AND CC > CC1,100,2);DRAWICON(CROSS(CC1,CC),100,15);OK1:EMA(CLOSE,6)-EMA(CLOSE,12);OK2:EMA(OK1,3);OK:(EMA(CLOSE,6)-EMA(CLOSE,12))*1,COLORSTICK;T1:=(C-REF(C,1))/REF(C,1)*100>=0.09;T2:=OK1>OK2;T3:=T1 AND T2 ;●坚定持有:IF( T3>0,0,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK2;
公式源码示例：
顶:=85;
中:=50;
底:=20;
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VARA:=IF(VAR9>100,VAR9-100,0);
VARB:=HHV(HIGH,34);
AA:= VARA*2;
BB:= EMA((VAR6-VAR8)/(VARB-VAR8)*100,13);
VARC:=EMA(0.667*REF(BB,1)+0.333*BB,2);
CC:SMA(VAR5,20,1),COLORRED;
CC1:SMA(CC,5,1),COLORGREEN;
STICKLINE(CC>CC1,CC,CC1,1,0),COLORRED;
STICKLINE(CC1>CC,CC,CC1,1,0),COLORGREEN;
出击:IF((CROSS(CC,CC1) AND (CC1 < 顶) ),80,0),COLORRED;
{跑}
DRAWICON(CC < REF(CC,1) AND REF(CC,1) < REF(CC,2) AND CC >
CC1,100,2);
DRAWICON(CROSS(CC1,CC),100,15);
OK1:EMA(CLOSE,6)-EMA(CLOSE,12);
OK2:EMA(OK1,3);
OK:(EMA(CLOSE,6)-EMA(CLOSE,12))*1,COLORSTICK;
T1:=(C-REF(C,1))/REF(C,1)*100>=0.09;
T2:=OK1>OK2;
T3:=T1 AND T2 ;
坚定持有:PARTLINE( T3>0,0),CIRCLEDOT,COLORRED,LINETHICK2;
看 股吧公式 www. kanguba.com
其它股票公式列表
