追风主图,源码分享(通达信公式 主图 源码 测试图)

[复制链接]
查看58 | 回复0 | 2022-6-27 16:04:04 | 显示全部楼层 |阅读模式
追风: MA(C,5 ),COLORGREEN,LINETHICK3; 
追风_: IF(追风>=REF(追风,1),追风,DRAWNULL),COLORRED,LINETHICK3;
J:=IF(BARSCOUNT(C)>=10,10,BARSCOUNT(C));
STICKLINE(C>=MA(C,J),MA(C,J),REF(MA(C,J),1),5,0),COLORYELLOW;
STICKLINE(C<MA(C,J),MA(C,J),REF(MA(C,J),1),5,0),COLORBLUE;
M:=IF(BARSCOUNT(C)>=45,45,BARSCOUNT(C));
STICKLINE(C>=MA(C,M),MA(C,M),REF(MA(C,M),1),5,0),COLORYELLOW;
STICKLINE(C<MA(C,M),MA(C,M),REF(MA(C,M),1),5,0),COLORBLUE;
高:=REF(HHV(H,80),3);
低:=REF(LLV(L,80),3);
顶点:REFDATE(高,DATE),COLORGREEN,LINETHICK2;
低点:REFDATE(低,DATE),COLORRED,LINETHICK2;  
DRAWTEXT(ISLASTBAR,顶点,'阻力'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,低点,'支撑'),COLOREA91B5; 
收盘:C,COLORMAGENTA,NODRAW; 
{追雄风主图}
日均价:=(C*3+H+L+O)/6;
SA:=EMA(日均价,5)*2-MA(日均价,5);
修正:=SMA(SMA(EMA(日均价,5)*2-MA(日均价,5),3,1),3,1);
补偿:=FLOOR(((修正-MA(修正,5))/MA(修正,5)*100));
雄风1:=SMA(SMA((EMA(SA,(5+ABS(补偿)))),2,1),2,1);
ZF:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
STICKLINE((C>雄风1) ,HIGH,LOW,0,1 ),COLORRED;
STICKLINE((C>雄风1) ,OPEN,CLOSE,3,0 ),COLOR000055;
STICKLINE((C>雄风1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;
STICKLINE((C>雄风1) ,OPEN,CLOSE,2.1,0 ),COLOR000099;
STICKLINE((C>雄风1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB;
STICKLINE((C>雄风1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD;
STICKLINE((C>雄风1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF;
STICKLINE((C<雄风1) ,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE((C<雄风1) ,OPEN,CLOSE,3,0 ),COLOR990000;
STICKLINE((C<雄风1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE((C<雄风1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;
STICKLINE((C<雄风1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;
STICKLINE((C<雄风1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;
STICKLINE((C<雄风1) ,OPEN,CLOSE,0.3,0 ),COLORCYAN;
STICKLINE((OPEN>CLOSE),CLOSE,OPEN,0,0),COLORCYAN;
STICKLINE((OPEN<CLOSE),CLOSE,OPEN,0,0),COLORRED; 
STICKLINE((ZF>9) ,HIGH,LOW,0,1 ),COLORMAGENTA;
STICKLINE((ZF>9) ,OPEN,CLOSE,3,0 ),COLOR550055;
STICKLINE((ZF>9) ,OPEN,CLOSE,2.7,0 ),COLOR550055;
STICKLINE((ZF>9) ,OPEN,CLOSE,2.1,0 ),COLOR880088;
STICKLINE((ZF>9) ,OPEN,CLOSE,1.5,0 ),COLORAA00AA;
STICKLINE((ZF>9) ,OPEN,CLOSE,0.9,0 ),COLORCC00CC;
STICKLINE((ZF>9) ,OPEN,CLOSE,0.3,0 ),COLOREE00EE;
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K:=EMA(R,3);
D:=EMA(K,3);
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 > 0.35),6,65);
VARB1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
VARA1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
获利盘:=(WINNER(CLOSE))*(100);
获利线:=FORCAST(获利盘,7);
线:=(FORCAST(VARA1,7))*((DATE < 20070110));
满仓:=((线 > REF(线,1)) AND (线 < 25) AND (COUNT((线 > REF(线,1)),5) = 1) AND IF((N = 6),(获利盘 < 60),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0));
DRAWTEXT(满仓,LOW*0.99,'满仓'),COLORRED;
轻仓:=IF((获利盘 >= 60) AND (线 > REF(线,1)) AND (REF(线,1) < 20) AND (线 < 40) AND (COUNT((线 > REF(线,1)),5) = 1) AND (REF(N,1) = 6),1,0);
DRAWTEXT(轻仓,LOW*0.99,'轻仓'),COLORYELLOW; 
进一:=CROSS(线,D) AND (D > 30) AND (D > REF(D,1)) AND (D < 80);
进二:=CROSS(线,获利线) AND (D > 30) AND (获利线 > 25) AND (D > REF(D,1));
低进:=IF(进一 AND (D > 获利线),进二,进一);
DRAWTEXT(低进,LOW*0.98,'低进'),COLORRED;
DRAWTEXT(进二,LOW*0.99,'高进'),COLORGRAY;
狂喜:=(CROSS(VARB1,(-2)));
DRAWTEXT(狂喜,(LOW*0.99),'要涨停'),COLORYELLOW;
恐慌:=(VARB1 < -99); {分析家公式网}
DRAWTEXT(恐慌,(LOW*0.98),'恐慌'),COLORWHITE;
半仓:=(CROSS(VARB1,(-94)) AND (COUNT(恐慌,5) > 0) AND (N = REF(N,1)) AND IF((N = 6),(获利盘 < 60),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0));
DRAWTEXT(半仓,LOW*0.99,'半仓'),COLORWHITE;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; 
DRAWICON(FILTER(VAR19=1,5),(LOW * 0.98),7); 
DRAWICON(FILTER(VAR1A=1,5),(HIGH * 1.02),8);   
XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04));
DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW * 1.01),'●买点');
XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100);
XL3:=CROSS(XL2,(0 - 20));
DRAWTEXT((XL3 > 0),(LOW * 1.01),'●绝对底部');
JK:=BARSCOUNT(CLOSE);
AH:=HHV(HIGH,200);
AL:=LLV(LOW,200);
B0:=(AH-AL)/40;
B1:=HIGH+B0;
B2:=LOW-B0;
DRAWTEXT((JK+0)/34=FLOOR((JK+0)/34),B2-2.2*B0*-0.60,'★窗,变盘'),COLORRED;
DRAWTEXT(C>=MA(C,J) AND CURRBARSCOUNT=1 AND PERIOD=5,MA(C,J),' 黄s持股 (短线)'),COLORYELLOW;
DRAWTEXT(C<MA(C,J) AND CURRBARSCOUNT=1 AND PERIOD=5,MA(C,J),' 蓝色持币 (短线)'),COLORFF9933;  
DRAWTEXT(C>=MA(C,M) AND CURRBARSCOUNT=1 AND PERIOD=5,MA(C,M),' 黄s

202112271482857515.rar

6.55 KB, 下载次数: 0

售价: 4 金钱  [记录]  [购买]

202112271482857515.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则