下载
登录/ 注册
主页
论坛
视频
热股
可转债
下载
下载

为大家无偿编写通达信公式

09-03-10 10:09 130768次浏览
我是一只鱼
+关注
博主要求身份验证
登录用户ID:
1,详细列出条件与要求
2,提供成功率较高的炒股思路
3,本人尽力而为,并请论坛高手共同研究与测试
注意:
1,本论坛的大于号和小于号不能正常显示,所以请把">"改为半角的大于号"<" 改为小于号;
2,公式里的常数如"N"等,要在参数里面定义,最小填如0,最大填如1000,缺省自己填;
3,有多个输出的公式不是用来选股的,是用于主图或附图显示的,一点要区
打开淘股吧APP
421
评论(1216)
收藏
展开
热门 最新
爱琴海

09-03-26 19:26

0
哦,刚看到鱼兄已经为我编好了,谢谢了啊。
爱琴海

09-03-26 19:21

0
鱼兄好,能不能麻烦你编个选股公式,就是要MACD在O轴位以上发生金叉的(DIF在O轴位以上金叉DEA)。在O轴位以下发生的金叉不要。
  
  不知道可以吗?麻烦你了。谢谢鱼兄。
其乐

09-03-26 18:50

0
好贴。

拜您为师。
我是一只鱼

09-03-26 17:58

0
MA89:=MA(CLOSE,89);
  MA233:=MA(CLOSE,233);
  LC:=REF(CLOSE,1);
  RSI8:SMA(MAX(CLOSE-LC,0),8,1)/SMA(ABS(CLOSE-LC),8,1)*100;
  RSI75:SMA(MAX(CLOSE-LC,0),75,1)/SMA(ABS(CLOSE-LC),75,1)*100;
  A1:=(C/MA233>0.98) AND (MA233/REF(MA233,1))>0.998;
  A2:=HHV(RSI8,30)>80;
  A3:=CROSS(RSI8,RSI75) AND RSI75>49.9;
  A4:=MA89/REF(MA89,1)>0.998;
  选股:(A1 AND A2 AND A3 AND A4)*25,COLORRED;

公式测试正确!

我是一只鱼

09-03-26 17:51

0
呵呵,和你上面的计算结果一样吧:)

我是一只鱼

09-03-26 17:49

0
哈哈,没经过使用测试,看来还一下发现不了问题
[引用原文已无法访问]
N:=2;
BBB:=MONTH=N AND CURRBARSCOUNT<55;
AAB:=BARSLASTCOUNT(BBB);
AAC:=BARSLAST(BBB);
HHH:=IF(AAC=1,HHV(H,HHV(AAB,0)+1),0);
LLL:=IF(AAC=1,LLV(L,HHV(AAB,0)+1),0);
CCC:=REF(C,AAC);
CDP:=HHV(IF(AAC=1,(HHH+CCC+LLL)/3,0),0);
CDP1:=CDP+HHV(HHH,0)-HHV(LLL,0);
CDP2:=CDP+HHV(LLL,0)-HHV(HHH,0);
上月均价:DRAWLINE(AAC=1,CDP,ISLASTBAR,CDP,0)COLORLIRED,LINETHICK2;
上轨:DRAWLINE(AAC=1,CDP1,ISLASTBAR,CDP1,0)COLORGREEN,LINETHICK1;
下轨:DRAWLINE(AAC=1,CDP2,ISLASTBAR,CDP2,0)COLORRED,LINETHICK1;

金陵散人

09-03-26 17:05

0
我查看了一下,您取的最低价不是上月最低价,是本月第一天的最低价。请指教,谢谢!
另在这个均价线加上下轨的话可以实现吗?CDP+HHH-LLL;CDP+LLL-HHH.
[引用原文已无法访问]
金陵散人

09-03-26 16:47

0
感谢兄台的修改,在开开上是对的,但是在指数和其他个股上不一致了?不知何故?
上证计算的上月均价是2157.60。
[引用原文已无法访问]
大度度人

09-03-26 16:46

0
老大能否帮忙看一下以下公式要求,谢谢
  
  1,股价已接近233日均线或在其以上,233日线最好已经止跌转上。
  2,89日均线开始走平或止跌上扬。
  3,最近一波股价上涨中8日RSI曾上破80.
  4,75日RSI已经在50以上.
  5,在符合上面条件时,等待8日RSI跌破75日RSI后又重新上破75日RSI的当日或次日买入(或跌到75日RSI附近重新转上时买入)。
在通达信中编写的该选股公式,显示无法支持多输出,不知错在那里,谢谢
MA89:=MA(CLOSE,89);
  MA233:=MA(CLOSE,233);
  LC:=REF(CLOSE,1);
  RSI8:SMA(MAX(CLOSE-LC,0),8,1)/SMA(ABS(CLOSE-LC),8,1)*100;
  RSI75:SMA(MAX(CLOSE-LC,0),75,1)/SMA(ABS(CLOSE-LC),75,1)*100;
  A1:=(C/MA233>0.98) AND (MA233/REF(MA233,1))>0.998;
  A2:=HHV(RSI8,30)>80;
  A3:=CROSS(RSI8,RSI75) AND RSI75>49.9;
  A4:=MA89/REF(MA89,1)>0.998;
  选股:(A1 AND A2 AND A3 AND A4)*25,COLORRED;
我是一只鱼

09-03-26 16:11

0
【 · 原创: livetrust 只看该作者(-1) 2009-03-26 12:55】  STICKLINE(C>=O,C,O,3,0),COLOR000045;

  MA3:=MA(C,3);
  YTSL:=(3*C+L+O+H)/6;
  辰星线:(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211,COLORFFFF00;
  牵牛线:MA(C,26),COLOR669933;
  等待:IF(MA3<=辰星线,牵牛线,DRAWNULL),COLORGREEN,LINETHICK2;
  中轨:=MA(C,26);
  上轨:=中轨+STD(C,20);
  下轨:=中轨-STD(C,20);
  上极限:(中轨+2*STD(C,20)),COLORFF937F,LINETHICK2;
  下极限:(中轨-2*STD(C,20)),COLORWHITE,LINETHICK2;
  急速超跌:=(C-MA(C,34))/MA(C,34)*100<-14;
  VAR1:=(C>REF(C,1) AND C>REF(C,2));
  VAR2:=(REF(VAR1,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR3:=(REF(VAR2,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR4:=(REF(VAR3,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR5:=(REF(VAR4,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR6:=(REF(VAR5,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR7:=(REF(VAR6,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR8:=(REF(VAR7,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR9:=(REF(VAR8,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VARA:=(REF(VAR9,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VARB:=(REF(VARA,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VARC:=(REF(VARB,1) AND C<=REF(C,1) AND C>=REF(C,2));
  持股:IF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,辰星线,DRAWNULL),COLORRED,POINTDOT,LINETHICK5;
  VARD:=(C<REF(C,1) AND C<REF(C,2));
  VARE:=(REF(VARD,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VARF:=(REF(VARE,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR10:=(REF(VARF,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR11:=(REF(VAR10,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR12:=(REF(VAR11,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR13:=(REF(VAR12,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR14:=(REF(VAR13,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR15:=(REF(VAR14,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR16:=(REF(VAR15,1) AND C>=REF(C,1) AND C<=REF(C,2));
  VAR17:=(REF(VAR16,1) AND C<=REF(C,1) AND C>=REF(C,2));
  VAR18:=(REF(VAR17,1) AND C>=REF(C,1) AND C<=REF(C,2));
  持币:IF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,辰星线,DRAWNULL),COLORLIGRAY,POINTDOT,LINETHICK5;
  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);
  DRAWTEXT(VAR19,L,'←短买'),COLOR33FFCC;
  DRAWTEXT(VAR1A,H+0.1,'←离场'),COLORFF99FF;
  
  麻烦鱼兄帮我看看, 等待:IF(MA3<=辰星线,牵牛线,DRAWNULL),COLORGREEN,LINETHICK2;
  这个没有办法输出超过16个, 麻烦你帮我改改, 谢谢 
用上面的即可
刷新 首页 上一页 下一页 末页
提交