QQ登录

只需一步,快速开始

广告载入中...
查看: 5206|回复: 58

提醒公式(通达信与飞狐)

[复制链接]
发表于 2012-1-28 19:01 | |阅读模式

马上注册,享用更多功能,让你轻松玩转本论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
QQ截图201201281902282222.jpg
QQ截图20120128190111111.jpg
备注:公式不是万能的,只能多一项参考,感谢千老师原创!
飞狐源码:
DRAWTEXTEX(C,1,0,0,STKLABEL+' '+STKNAME+''),ColorFFBF00;
J1:="macd.diff";
J2:="macd.dea";
J3:="kdj.k";
J4:="kdj.d";
VL:=REF(LOW,1); VH:=REF(H,1);
Var1:=SMA(ABS(H-Vh),13,1)/SMA(MAX(H-Vh,0),13,1)*100;
Var2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;
Var3:=REF(CLOSE,1);
Var4:=MA(Var2,13);
Var5:=LLV(L,34);
Var6:=SMA(MAX(CLOSE-Var3,0),6,1)/SMA(ABS(CLOSE-Var3),6,1)*100;
var7:=CROSS(93,Var6);
Var8:=EMA(IF(L<=Var5,Var4,0),3);
var9:=H>LLV(l,0)*7;
var10:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1));
var11:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (var10 * 10.9);
T:FILTER(IF(var11<=var10 AND Var8>REF(Var8,1),Var8*8,0),20),LINETHICK4,STICK,ColorFF00FF;
T0:FILTER(IF(CROSS(j4,j3) and SUM(j1>REF(j1,1),3)>3,CROSS(j4,j3) and CROSS(j2,j1),0),13),STICK,Color5E8262,LINETHICK3;
T1:FILTER(CROSS(j1,j2) and vol>REF(SUM(vol,5),1),3),STICK,Color2B87C3,LINETHICK3;
T2:FILTER(var7 and C/(REF(C,1)-1)*100<>5 and var9 and vol>REF(SUM(vol,3),1),5),STICK,ColorFFFF00,LINETHICK3;
T3:FILTERX(var9 and CROSS(j4,j3) and C/(REF(C,1)-1)*100<>5,22),STICK,Color00FF00,LINETHICK3;
DRAWTEXT(T0,T0,'注\n意\n洗\n盘'),SHIFT1,Color5E8262;
DRAWTEXT(T,T,'洗\n盘\n结\n束'),ColorFF00FF,SHIFT1;
DRAWTEXT(T1,T1,'主\n力\n加\n速'),Color2B87C3,SHIFT1;
DRAWTEXT(T2,T2,'庄家逃跑'),ColorFFFF00;
DRAWTEXT(T3,T3,'风\n险'),Color00FF00,SHIFT1,PXDN50,ALIGN4;
通达信版
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J1:=DIFF;
J2:=DEA;
J3:=K;
J4:=D;
VL:=REF(LOW,1); VH:=REF(H,1);
VAR1:=SMA(ABS(H-VH),13,1)/SMA(MAX(H-VH,0),13,1)*100;
VAR2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;
VAR3:=REF(CLOSE,1);
VAR4:=MA(VAR2,13);
VAR5:=LLV(L,34);
VAR6:=SMA(MAX(CLOSE-VAR3,0),6,1)/SMA(ABS(CLOSE-VAR3),6,1)*100;
VAR7:=CROSS(93,VAR6);
VAR8:=EMA(IF(L<=VAR5,VAR4,0),3);
VAR9:=H>LLV(L,0)*7;
VAR10:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1));
VAR11:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (VAR10 * 10.9);
T:FILTER(IF(VAR11<=VAR10 AND VAR8>REF(VAR8,1),VAR8*8,0),20),LINETHICK4,STICK,COLORFF00FF;
T0:FILTER(IF(CROSS(J4,J3) AND SUM(J1>REF(J1,1),3)>3,CROSS(J4,J3) AND CROSS(J2,J1),0),13),STICK,COLOR5E8262,LINETHICK3;
T1:FILTER(CROSS(J1,J2) AND VOL>REF(SUM(VOL,5),1),3),STICK,COLOR00FFFF,LINETHICK3;
T2:FILTER(VAR7 AND C/(REF(C,1)-1)*100!=5 AND VAR9 AND VOL>REF(SUM(VOL,3),1),5),STICK,COLORFFFF00,LINETHICK3;
T3:FILTER(VAR9 AND CROSS(J4,J3) AND C/(REF(C,1)-1)*100!=5,22),STICK,COLOR00FF00,LINETHICK3;
DRAWTEXT(T0,T0,'注意洗盘'),COLOR5E8262;
DRAWTEXT(T,T*0.90,'洗盘结束'),COLORFF00FF;
DRAWTEXT(T1,T1*0.90,'主力加速'),COLOR00FFFF;
DRAWTEXT(T2,T2*0.90,'庄家逃跑'),COLORFFFF00;
DRAWTEXT(T3,T3*0.90,'风险'),COLOR00FF00;

发表于 2014-9-16 19:32 |
楼主辛苦,谢谢分享,学习了。

发表于 2012-1-28 19:29 |
发表于 2012-1-28 20:16 |
预测量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预测量,0,4,-1),COLOR00FF00;
JE:=VOL;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
主买:=(QJ0*(JJ-MIN(CLOSE,OPEN)));
主卖:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
散买:=(QJ0*(HIGH-MAX(OPEN,CLOSE)));
散卖:=(QJ0*(MAX(CLOSE,OPEN)-JJ));
庄净入:IF((主买-主卖)>0,主买-主卖,0)COLORRED,NODRAW;
庄净出:IF((主买-主卖)<0,主买-主卖,0)COLORGREEN,NODRAW;
散净入:IF((散买-散卖)>0,散买-散卖,0)COLORGREEN,NODRAW;
散净出:IF((散买-散卖)<0,散买-散卖,0)COLORRED,NODRAW;
STICKLINE(H=L AND C<REF(C,1),0,JE,3,0),COLOR00AA00;
STICKLINE(H=L AND C<REF(C,1),0,JE,1.5,0),COLOR00CC00;
STICKLINE(H=L AND C<REF(C,1),0,JE,1,0),COLOR00EE00;
STICKLINE(H=L AND C>REF(C,1),0,JE,3,0),COLOR0000AA;
STICKLINE(H=L AND C>REF(C,1),0,JE,1.5,0),COLOR0000CC;
STICKLINE(H=L AND C>REF(C,1),0,JE,1,0),COLOR0000FF;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,3,0),COLORAA0000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1.5,0),COLORCC0000;
散户卖:STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1,0),COLOREE0000;
STICKLINE(散买>0,0,主买+主卖+散买,3,0),COLORAA00AA;
STICKLINE(散买>0,0,主买+主卖+散买,1.5,0),COLORCC00CC;
散户买:STICKLINE(散买>0,0,主买+主卖+散买,1,0),COLOREE00EE;
STICKLINE(主卖>0,0,主买+主卖,3,0),COLOR00AA00;
STICKLINE(主卖>0,0,主买+主卖,1.5,0),COLOR00CC00;
主力卖:STICKLINE(主卖>0,0,主买+主卖,1,0),COLOR00EE00;
STICKLINE(主买>0,0,主买,3,0),COLOR0000AA;
STICKLINE(主买>0,0,主买,1.5,0),COLOR0000CC;
主力买:STICKLINE(主买>0,0,主买,1,0),COLOR0000FF;
AA:=IF(C>(H+L)/2,JE,0);BB:=IF(C<(H+L)/2,JE,0);
F1:=SUM(AA,5);F2:=SUM(BB,5);F3:=EMA(F1-F2,3);
T1:=主买>主卖 AND CROSS(F3,REF(F3,1)) AND F3<0;
T2:=主卖>主买 AND CROSS(REF(F3,1),F3) AND F3>0;
DRAWTEXT(T1,JE,'+B'),COLOR00FFFF;
DRAWTEXT(T2,JE,'-S'),COLORFFFFFF;


本文来自: 股海明灯  详细文章参考:http://www.178448.com/thread-344968-1-1.html
发表于 2012-1-28 21:58 |
谢谢楼主分享!
发表于 2012-1-28 22:09 |
谢谢楼主分享!
发表于 2012-1-28 22:22 |
支持一下,谢谢分享
头像被屏蔽
发表于 2012-1-28 23:33 |
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2012-1-29 09:15 |
发表于 2012-1-29 10:53 |
谢谢楼主分享!

发表于 2012-1-29 11:26 |
谢谢楼主分享!



本文来自: 股海明灯  详细文章参考:http://www.178448.com/thread-344966-1-1.html
发表于 2012-1-29 18:11 |
谢谢楼主分享
发表于 2012-1-29 18:52 |
感谢了学习学习
本文来自: 股海明灯  详细文章参考:http://www.178448.com/thread-344776-1-1.html
发表于 2012-1-29 22:05 |
好好学习天天向上
发表于 2012-1-29 23:07 |
谢谢楼主分享!
发表于 2012-2-11 10:22 |
不错不错不错不错
快速回复 返回顶部 返回列表