股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[飞狐] 预测、均线、波浪、买卖提示一个都不少


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2023-10-25 10:47:09

预测、均线、波浪、买卖提示一个都不能少,五里头首发飞狐主图!!大家捧场哦!!
原码奉献:


{N:1,100,5}{时间:71068,1,80000}
{DRAWBKBMP(C>=MA(C,5),'sun');
DRAWBKBMP(C<=MA(C,5),'4786');
DRAWBKBMP(C>=MA(C,20),'sun2');
DRAWBKBMP(C<=MA(C,20),'moon');
DRAWBKBMP(C>=MA(C,250),'sun01');}
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
AA10:MA(CLOSE,3),COLOR0000FF;
AA12:MA(CLOSE,5),COLOR0000FF;
BB10:=((ATAN((AA10-REF(AA10,1)))*3.1416)*10);
BB12:=((ATAN((AA12-REF(AA12,1)))*3.1416)*10);
MA13:=MA(CLOSE,13);
fillrgn(AA10>aa12,aa10,aa12),coloryellow;
fillrgn(aa10<AA12,aa10,aa12),colorgreen;
趋势:EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42),POINTDOT,COLORFF00FF,LINETHICK4;
STICKLINE(CLOSE>REF(CLOSE,1),HIGH,LOW,0,1),COLORRED;
STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,7.8,0),COLOR000077;
STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,5.7,0),COLOR000099;
STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,4.1,0),COLOR0000AA;
STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,2.5,0),COLOR0000BB;
STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,1.9,0),COLOR0000DD;
STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,0.8,0),COLOR0000FF;
STICKLINE(CLOSE=REF(CLOSE,1),HIGH,LOW,0,1),COLORWHITE;
STICKLINE(CLOSE=REF(CLOSE,1),OPEN,CLOSE,7.8,0),COLOR777777;
STICKLINE(CLOSE=REF(CLOSE,1),OPEN,CLOSE,5.7,0),COLOR999999;
STICKLINE(CLOSE=REF(CLOSE,1),OPEN,CLOSE,4.1,0),COLORAAAAAA;
STICKLINE(CLOSE=REF(CLOSE,1),OPEN,CLOSE,2.5,0),COLORBBBBBB;
STICKLINE(CLOSE=REF(CLOSE,1),OPEN,CLOSE,1.9,0),COLORDDDDDD;
STICKLINE(CLOSE=REF(CLOSE,1),OPEN,CLOSE,0.8,0),COLORFFFFFF;
STICKLINE(CLOSE<REF(CLOSE,1),HIGH,LOW,0,1),COLORCYAN;
STICKLINE(CLOSE<REF(CLOSE,1),OPEN,CLOSE,7.8,0),COLOR990000;
STICKLINE(CLOSE<REF(CLOSE,1),OPEN,CLOSE,5.7,0),COLORCC0000;
STICKLINE(CLOSE<REF(CLOSE,1),OPEN,CLOSE,4.1,0),COLORFF4400;
STICKLINE(CLOSE<REF(CLOSE,1),OPEN,CLOSE,2.5,0),COLORFF8800;
STICKLINE(CLOSE<REF(CLOSE,1),OPEN,CLOSE,1.9,0),COLORFFCC00;
STICKLINE(CLOSE<REF(CLOSE,1),OPEN,CLOSE,0.8,0),COLORCYAN;
X1:=(C+L+H)/3;BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);DRAWTEXT(FILTER(BB13>1ANDEMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,'∠45上升'),COLORWHITE;
压力:MA(REF(HHV(C,30),1),2),COLOR00FF00;
支撑:MA(REF(LLV(C,30),1),2),COLOR0000FF;
AA1:=AMOUNT/V;BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;
FF1:=BB1ANDCC1ANDDD1ANDEE1;DRAWTEXT(FF1,(LOW*0.99),'鼠'),COLOR4080FF;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑马线:=EMA(A51,5);A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
DRAWTEXT(CROSS(趋势线,0)AND黑马线<40,(HIGH*0.97),'▲大马'),COLORYELLOW;
LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100);
FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);
STICKLINE(CROSS(88,RSI),O,C,2.9,0),COLOR113311;
STICKLINE(CROSS(FF,MA15),O,C,2.9,0),COLOR00FFFF;
VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*25;
注意买:=IF((VAR4<10),80,100);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J<0,10,0);BDDD:=LLV(J,2)=LLV(J,8);
买入:=IF(CROSS(J,REF(J+0.01,1))ANDBDDDANDJ<20,30,0);
DRAWTEXT(买入AND注意买=100AND超跌=0,LOW,'B'),COLOR8000FF;
MTM:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=IF(LLV(DX,2)=LLV(DX,7)ANDCOUNT(DX<0,2)ANDCROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'拉'),COLOR0000FF;
GET:ZIG(3,N),COLORYELLOW;
PL5:=ZIG(3,5);
EN1:=ZIG(3,5)>REF(ZIG(3,5),1)ANDREF(ZIG(3,5),1)<=REF(ZIG(3,5),2)ANDREF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
EX1:=ZIG(3,5)<REF(ZIG(3,5),1)ANDREF(ZIG(3,5),1)>=REF(ZIG(3,5),2)ANDREF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
PL10:=ZIG(3,10);
EN2:=ZIG(3,10)>REF(ZIG(3,10),1)ANDREF(ZIG(3,10),1)<=REF(ZIG(3,10),2)ANDREF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
EX2:=ZIG(3,10)<REF(ZIG(3,10),1)ANDREF(ZIG(3,10),1)>=REF(ZIG(3,10),2)ANDREF(ZIG(3,10),2)>=REF(ZIG(3,10),3);
PL20:=ZIG(3,20);
EN3:=ZIG(3,20)>REF(ZIG(3,20),1)ANDREF(ZIG(3,20),1)<=REF(ZIG(3,20),2)ANDREF(ZIG(3,20),2)<=REF(ZIG(3,20),3);
EX3:=ZIG(3,20)<REF(ZIG(3,20),1)ANDREF(ZIG(3,20),1)>=REF(ZIG(3,20),2)ANDREF(ZIG(3,20),2)>=REF(ZIG(3,20),3);
PL40:=ZIG(3,40);
走强1:=BARSLAST(PL5<REF(PL5,1));
走弱1:=BARSLAST(PL5>REF(PL5,1));
走强2:=BARSLAST(PL10<REF(PL10,1));
走弱2:=BARSLAST(PL10>REF(PL10,1));
走强3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN1ANDDTJZ5=1,L*0.95,'(A)'),COLORFFFF00;
DRAWTEXT(EX1ANDDTJD5=2,H*1.02,'(B)'),COLORFF00FF;
DRAWTEXT(EN2ANDZTJZ5=1,L*0.95,'(C)'),COLOR0000FF;
DRAWTEXT(EX1ANDPL10>REF(PL10,1)ANDZTJD5=1,H*1.02,'⑴'),COLOR0000FF;
DRAWTEXT(EN1ANDPL10>REF(PL10,1)ANDZTJZ5=2,L*0.98,'⑵'),COLOR0000FF;
DRAWTEXT(EX1ANDPL10>REF(PL10,1)ANDZTJZ5=2,H*1.02,'⑶'),COLOR0000FF;
DRAWTEXT(EN1ANDPL10>REF(PL10,1)ANDZTJZ5=3,L*0.98,'⑷'),COLOR0000FF;
DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=1,H*1.02,'⑸'),COLOR0000FF;
DRAWTEXT(EN2ANDDTJZ10=1,L*0.93,'Ⅰ'),COLORFF00FF;
DRAWTEXT(EX2ANDDTJD10=2,H*1.01,'Ⅱ'),COLORFFFF00;
DRAWTEXT(EN3ANDZTJZ10=1,L*0.93,'Ⅲ'),COLOR0000FF;
DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=1,H*1.06,'①'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2ANDPL20>REF(PL20,1)ANDZTJZ10=2,L*0.94,'②'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2,H*1.06,'③'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2ANDPL20>REF(PL20,1)ANDZTJZ10=3,L*0.94,'④'),LINETHICK3,COLOR00FFFF;
HH:=HIGH;LL:=LOW;OO:=OPEN;CC:=CLOSE;
<%
vh=ffl.vardata("hh")
vl=ffl.vardata("ll")
vo=ffl.vardata("oo")
vc=ffl.vardata("cc")
last=ubound(vh)
iflast<101then
b=last+1
else
b=0
fori=last-101tolast-51
vh(i)=vh(i+51)
vl(i)=vl(i+51)
vo(i)=vo(i+51)
vc(i)=vc(i+51)
next
a=(vh(last-51)+vl(last-51))/2
j=1
fori=last-49tolast
j=j+2
vh(i)=2*a-vl(i-j)
vl(i)=2*a-vh(i-j)
vo(i)=2*a-vc(i-j)
vc(i)=2*a-vo(i-j)
next
endif
ffl.vardata("hh")=vh
ffl.vardata("ll")=vl
ffl.vardata("oo")=vo
ffl.vardata("cc")=vc
ffl.varstartindex("hh")=b
ffl.varstartindex("ll")=b
ffl.varstartindex("oo")=b
ffl.varstartindex("cc")=b
%>
A:=BACKSET(ISLASTBAR,50);
STICKLINE(AANDCC>=OO,OO,CC,6,0),COLOR990099,SHIFT50;
STICKLINE(AANDCC>=OO,OO,CC,4,0),COLORbb00bb,SHIFT50;
STICKLINE(AANDCC>=OO,OO,CC,2,0),COLORdd00dd,SHIFT50;
STICKLINE(AANDCC>=OO,OO,CC,1,0),COLORff00ff,SHIFT50;
STICKLINE(AANDCC>=OO,LL,OO,0.1,1),COLORMAGENTA,SHIFT50;
STICKLINE(AANDCC>=OO,CC,HH,0.1,1),COLORMAGENTA,SHIFT50;
STICKLINE(AANDCC<OO,OO,CC,6,0),COLOR009900,SHIFT50;
STICKLINE(AANDCC<OO,OO,CC,4,0),COLOR00bb00,SHIFT50;
STICKLINE(AANDCC<OO,OO,CC,2,0),COLOR00dd00,SHIFT50;
STICKLINE(AANDCC<OO,OO,CC,1,0),COLOR00ff00,SHIFT50;
STICKLINE(AANDCC<OO,LL,HH,0.1,0),COLORGREEN,SHIFT50;
VERTLINE(ISLASTBAR),COLORYELLOW,POINTDOT;
BBI:="BBI";
中:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORFF00FF,LINETHICK2;
上:=BBI+3*STD(BBI,10),COLOR00FF00;
下:=BBI-3*STD(BBI,10),COLOR0000FF;
安全:=MA(C,30),CIRCLEDOT,COLORFF00FF;
TJ1:=下*1.05>中AND中*1.05>上AND中>=REF(中,1)ANDREF(中,1)>=REF(中,2);
TJ2:=LLV(REF(VOL,1),60);
VAR91:=REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4)+REF(V,5);
VAR92:=VAR91/5;
LB:=V/VAR92;
TJ8:=C>LLV(LOW,120)*1.38;
VAR2:=(HIGH-LOW);
VAR3:=ABS((OPEN-CLOSE));
VAR4:=(HIGH-IF((CLOSE>OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE>OPEN),OPEN,CLOSE)-LOW);
VAR6:=((VAR3/VAR2)*VOL);
VAR7:=((VAR4/VAR2)*VOL);
VAR8:=((VAR5/VAR2)*VOL);
GG:=(VAR6>=VAR7)AND(VAR6>=VAR8)AND(CLOSE>OPEN);
TJ3:=LB>2ORVOL/REF(VOL,1)>2ANDGG;
WLT1:=EMA(C,3);
WLT2:=EMA(C,5);
WLT3:=EMA(WLT2,5);
QQ:=C<上;
MM:=WLT1<REF(WLT1,1);
DD:=QQANDMM;
TJ6:=COUNT(DD,7)=1;
TJ7:=C<LLV(LOW,250)*2.1;
XG:=TJ1ANDTJ7ANDTJ3;
DRAWICON(XG,LOW*0.96,6);
DRAWICON(TJ6ANDMMANDTJ8AND上>中*1.1,HIGH*1.01,5);

时间A:=1000000+时间;时间B:=DATE;d1:=DATE=时间A;d2:=DATE=时间B;
tj1:=BARSLAST(d1);tj2:=BARSLAST(d2);hh:=HHV(HIGH,tj1);ll:=LLV(LOW,tj1);
hh1:=HHV(VOL,tj1);ll1:=LLV(VOL,tj1);zh:=REF(hh,tj2);zl:=REF(ll,tj2);
zh1:=REF(hh1,tj2);zl1:=REF(ll1,tj2);sj1:=NUMTOSTR(时间A,0);sj2:=NUMTOSTR(时间B,0);
zw:=BARSLAST(HIGH=hh);jw:=BARSLAST(LOW=ll);zw1:=BARSLAST(VOL=hh1);jw1:=BARSLAST(VOL=ll1);
qz:=(zh-zl)/zl*100*SGN(jw-zw);qz1:=IF(CAPITAL<1,SUM(INDEXV/ESTDATA(8)*100,tj1),SUM(VOL/CAPITAL*100,tj1));
xs:=NUMTOSTR(REF(DATE,zw),0);xx:=NUMTOSTR(REF(DATE,jw),0);
xs1:=NUMTOSTR(REF(DATE,zw1),0);xx1:=NUMTOSTR(REF(DATE,jw1),0);
A1:=COST(0.33);A2:=COST(5);A3:=COST(15);A4:=COST(55);A5:=COST(97);
成本90%:=COST(90);成本70%:=COST(70);成本30%:=COST(30);成本10%:=COST(10);
获利:=WINNER(CLOSE)*100;套牢:=100-WINNER(CLOSE)*100;
DRAWTEXTEX(CLOSE,1,350,0,'90成本:'+NUMTOSTR(成本90%,2)),Color00DD00;
DRAWTEXTEX(CLOSE,1,350,60,'70成本:'+NUMTOSTR(成本70%,2)),Color00DDFF;
DRAWTEXTEX(CLOSE,1,200,0,'30成本:'+NUMTOSTR(成本30%,2)),Color00DD00;
DRAWTEXTEX(CLOSE,1,200,60,'10成本:'+NUMTOSTR(成本10%,2)),Color00DDFF;
DRAWTEXTEX(CLOSE,1,700,120,'底出击:'+NUMTOSTR(A1,2)),ColorDDDDDD;DRAWTEXTEX(CLOSE,1,540,0,'建仓:'+NUMTOSTR(A2,2)),Color00DDFF;
DRAWTEXTEX(CLOSE,1,700,0,'快刀:'+NUMTOSTR(A3,2)),Colorff00FF;DRAWTEXTEX(CLOSE,1,860,0,'升浪:'+NUMTOSTR(A4,2)),Color0000FF;
DRAWTEXTEX(CLOSE,1,860,60,'预测:'+NUMTOSTR(A5,2)),ColorffFF00;DRAWTEXTEX(CLOSE,1,540,60,'获利:'+NUMTOSTR(获利,2)),ColorFF00FF;
DRAWTEXTEX(CLOSE,1,700,60,'套牢:'+NUMTOSTR(套牢,2)),Color00DD00;





回复

举报

QQ|

GMT+8, 2024-6-18 20:29

快速回复 返回顶部 返回列表