相關標簽:

 

CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');


看到一些朋友喜歡，將優化后的戰無不勝的公式－－－頂底雷達送給大家，飛狐、分析家、大智慧通用。
源碼---
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
頂部雷達:CROSS(80,RSI)*30,LINETHICK2 ,colorgreen;
DRAWTEXT(CROSS(80,RSI),30,'見頂 '),colorgreen;
Varb:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
Varc:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
Vard:=BARSCOUNT(CLOSE);
底部雷達:(Varb< 20 AND Varc< 25 AND Vard> 50)*30,linethick2, colorff9933;
DRAWTEXT(CROSS(100,底部雷達) ,20,'底 '),linethick1,COLORF00FF0;
主力:EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2),linethick2 ,COLORRED;
散戶:EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7),linethick2 ,COLORWHITE;
DRAWTEXT(CROSS(主力,散戶) AND 主力<-10,-20,'升'),color00ccff;
DRAWICON(CROSS(主力,散戶) AND 主力<-10 AND 散戶>REF(散戶,1)OR CROSS(主力,散戶) AND 散戶<-35 ,-15,1);
DRAWTEXT(CROSS(18,RSI)AND 散戶<-20 AND 底部雷達 ,25,'底 '),linethick1, COLORF00FF0;
MAV:=(2*C+H+L)/4;
Var1:=LLV(LOW,4);
Var2:=HHV(HIGH,7);
SK:=EMA((MAV-Var1)/(Var2-Var1)*100,13);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,2);
持倉:STICKLINE(SK> SD,6,0,1,0) ,linethick3, COLORYELLOW;
空倉:STICKLINE(SK< SD,6,0,1,0) ,linethick3, color009900;
正負量比:12*(winner(c)-winner(o)) ,linethick2 ,colorstick;
時空分裂點:STICKLINE(100*v/capital>= 3 and 100*v/capital<7,100*v/capital,15,7,0),linethick2, COLORff3399;
STICKLINE(100*v/capital>= 7,100*v/capital,6,2,0),linethick2 ,COLORRED;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');