缠中说禅社区论坛's Archiver

fengyun688 发表于 2008-6-17 19:33

本人珍藏的一个从鼎砥下载的公式源码

Var1:=REF(CLOSE,2);
会员专用: SMA(MAX(CLOSE-Var1,0),7,1)/SMA(ABS(CLOSE-Var1),7,1)*100,COLORFFAA66;
Var2:=REF(CLOSE,1);
Var3:=SMA(MAX(CLOSE-Var2,0),7,1)/SMA(ABS(CLOSE-Var2),7,1)*100;
极品逃亡: IF(会员专用< REF(会员专用,1) AND 会员专用>79,会员专用,0);
DRAWTEXT(极品逃亡 ,70 ,'★<-极品逃亡'),coloryellow,linethick1;
DRAWTEXT(88>0 and ref(o,1)/ref(c,1)>1.04 and ref(l,1)<=688 and o>ref(c,1)and c<ref(o,1)and c/o>=1.01,l-l*0.02,'★<--极品绝底初现'),linethick1;
DRAWTEXT(c-o>=0 and o/l>1.05 and l<=llv(l,20),l,'★<--极品绝底'),colorblue, linethick1;
q2:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;
q3:=SMA(q2, 9, 1);
q4:=SMA(q3, 3, 1);
特殊会员专用:3*q3-2*q4,colorwhite,linethick2;
q8:=HHVBARS(HIGH, 50);  
q10:=(CLOSE-REF(OPEN, q8))/REF(OPEN, q8)*100;
跨越:EMA(q3, 3),COLORRED;
DRAWTEXT(CROSS(特殊会员专用, 8) AND q10<-13,20,'*大底来'),coloryellow,linethick5;
DRAWTEXT(CROSS(特殊会员专用, 93) AND q10<-13,40,'*大底'),linethick5;
DRAWTEXT(CROSS(跨越, 特殊会员专用) AND ref(特殊会员专用,1)>80, ref(特殊会员专用,3), '*顶'),COLORRED,linethick5;
Var12:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
机构做空能量线: SMA(Var12,3,1),colorgreen,linethick2;
大底来: 0,POINTDOT;
大底: 0,POINTDOT;
DRAWTEXT(cross(跨越,机构做空能量线) ,大底+40,'进入强势区域'),coloryellow,linethick1;
DRAWTEXT(cross(特殊会员专用,跨越) ,大底+20,'进入拉升区域'),linethick1;
DRAWTEXT(cross(跨越,特殊会员专用) ,大底+70,'注意调整'),COLORFFAA66,linethick1;
●注意买入点: DRAWTEXT(REF(CROSS(机构做空能量线,跨越),25) AND 机构做空能量线>1.005*跨越,跨越,'●<-注意买入点'),COLORBLUE,linethick1;
★逢低买入: DRAWTEXT(REF(CROSS(跨越,特殊会员专用),82) AND 跨越>1.3*特殊会员专用,特殊会员专用,'★<<-逢低买入'),linethick1;
★低买: DRAWTEXT(REF(CROSS(特殊会员专用,跨越),1) AND 特殊会员专用>1.3*跨越,跨越,'★低买'),COLORRED,linethick1;

UID48760 帖子576 精华0 积分3704 威望2136  金钱1568  贡献积分0  活跃积分0  金币0  阅读权限120 来自陕西 在线时间85 小时 注册时间2008-5-1 最后登录2008-6-17 查看详细资料
TOP

别吵了 发表于 2008-6-22 01:34

谢谢了，先下看看

hhhyzb 发表于 2008-6-22 14:43

先谢谢了1/:clap /:shake

要离 发表于 2008-6-22 21:43

有空再来研究

chunbingliang 发表于 2008-6-23 00:45

我用了一下，测试很牛，但是昨天航天动力把我套进去了，呵呵，百分之几的概率被我撞到了

别克 发表于 2008-6-23 10:04

谢谢,下载了

langlibaitiaosn 发表于 2008-6-28 00:17

鼎砥/:sing /:sing

sdzjp 发表于 2008-6-28 08:45

谢谢!
感谢楼主无私奉献!/:clap /:clap /:clap

孤独客 发表于 2008-7-7 21:18

/:clap /:clap /:clap /:clap

jimmy07 发表于 2008-7-10 00:02

我输入后有错：
错误句 :
●注意买入点: DRAWTEXT(REF(CROSS(机构做空能量线,跨越),25) AND 机构做空能量线>1.005*跨越,跨越,19),COLORBLUE,LINETHICK1
详细信息 : 对不起，公式FENGYUN688输出不能超过16个!

fxf760126 发表于 2008-7-11 21:44

感谢楼主
感谢楼主

huaban 发表于 2008-7-11 22:37

谢谢，有空再研究。/:fu /:fu /:fu

blazer 发表于 2008-7-11 22:49

顶底有几个人，对时间和空间预测得特别准，真他妈神了！

灵感 发表于 2008-7-12 00:44

感谢热心的楼主/:shake

firefox 发表于 2008-7-13 23:37

谢谢，看不太懂 ，可以用来自动选股吗

marcovin 发表于 2008-8-12 19:41

从鼎砥,顶底吗

wbcfly 发表于 2008-8-26 15:47

你在网上查找一下：鼎砥投资论坛，就能找到了！非常出名的一个论坛。

自言自语 发表于 2008-9-6 23:45

回复 10楼 jimmy07 的帖子

通达信对输出有限制。试试这个。
VAR1:=REF(CLOSE,2);
会员专用:= SMA(MAX(CLOSE-VAR1,0),7,1)/SMA(ABS(CLOSE-VAR1),7,1)*100,COLORFFAA66;
VAR2:=REF(CLOSE,1);
VAR3:=SMA(MAX(CLOSE-VAR2,0),7,1)/SMA(ABS(CLOSE-VAR2),7,1)*100;
极品逃亡: IF(会员专用< REF(会员专用,1) AND 会员专用>79,会员专用,0);
DRAWTEXT(极品逃亡 ,70 ,'★<-极品逃亡'),COLORYELLOW,LINETHICK1;
DRAWTEXT(88>0 AND REF(O,1)/REF(C,1)>1.04 AND REF(L,1)<=688 AND O>REF(C,1)AND C<REF(O,1)AND C/O>=1.01,L-L*0.02,'★<--极品绝底初现'),LINETHICK1;
DRAWTEXT(C-O>=0 AND O/L>1.05 AND L<=LLV(L,20),L,'★<--极品绝底'),COLORBLUE, LINETHICK1;
Q2:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;
Q3:=SMA(Q2, 9, 1);
Q4:=SMA(Q3, 3, 1);
特殊会员专用:3*Q3-2*Q4,COLORWHITE,LINETHICK2;
Q8:=HHVBARS(HIGH, 50);  
Q10:=(CLOSE-REF(OPEN, Q8))/REF(OPEN, Q8)*100;
跨越:EMA(Q3, 3),COLORRED;
DRAWTEXT(CROSS(特殊会员专用, 8) AND Q10<-13,20,'*大底来'),COLORYELLOW,LINETHICK5;
DRAWTEXT(CROSS(特殊会员专用, 93) AND Q10<-13,40,'*大底'),LINETHICK5;
DRAWTEXT(CROSS(跨越, 特殊会员专用) AND REF(特殊会员专用,1)>80, REF(特殊会员专用,3), '*顶'),COLORRED,LINETHICK5;
VAR12:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
机构做空能量线: SMA(VAR12,3,1),COLORGREEN,LINETHICK2;
大底:=0,POINTDOT;

DRAWTEXT(CROSS(跨越,机构做空能量线) ,大底+40,'进入强势区域'),COLORYELLOW,LINETHICK1;
DRAWTEXT(CROSS(特殊会员专用,跨越) ,大底+20,'进入拉升区域'),LINETHICK1;
DRAWTEXT(CROSS(跨越,特殊会员专用) ,大底+70,'注意调整'),COLORFFAA66,LINETHICK1;
●注意买入点: DRAWTEXT(REF(CROSS(机构做空能量线,跨越),25) AND 机构做空能量线>1.005*跨越,跨越,'●<-注意买入点'),COLORBLUE,LINETHICK1;
★逢低买入: DRAWTEXT(REF(CROSS(跨越,特殊会员专用),82) AND 跨越>1.3*特殊会员专用,特殊会员专用,'★<<-逢低买入'),LINETHICK1;
★低买: DRAWTEXT(REF(CROSS(特殊会员专用,跨越),1) AND 特殊会员专用>1.3*跨越,跨越,'★低买'),COLORRED,LINETHICK1;

电123梯 发表于 2008-9-16 22:39

谢谢了，先下看看。/:shake /:shake /:shake

wf_syw 发表于 2008-9-18 09:07

/:clap /:clap

会稳 发表于 2008-9-18 15:00

★解决混沌公式的问题★分形,GATOR,EO--大家分享★解决混沌公式的问题★
分形--没有未来函数.
GATOR--的柱状是显示唇,齿,颚之间活动的关系,齿显示后走势5根的问题.
EO--变色线显示推进浪,规避调整浪.
---大家分享


{鳄鱼线}
Y:=(HIGH+LOW)/2;
上唇:SMA(Y,5,1),SHIFT3,COLORGREEN;
牙齿:SMA(Y,8,1),SHIFT5,COLORRED;
下鄂:SMA(Y,13,1),SHIFT8,COLORFF6600;
{分形- 没有未来函数}
KU1:=IF(HIGH=HHV(HIGH,3),1,0);
KD1:=IF( LOW=LLV( LOW,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2), REF(LOW,2+BARSLAST(REF(KD1,2)=1  AND REF(KD1,1)=0 AND KD1=0)));
上分形:IF(HIGH>=MA(CLOSE,3),UL,REF(UL,BARSLAST(HIGH>MA(CLOSE,3)))),LINETHICK0,COLORMAGENTA;{分形数字}
下分形:IF( LOW<=MA(CLOSE,3),DL,REF(DL,BARSLAST(LOW<=MA(CLOSE,3)))),LINETHICK0,COLORYELLOW;
STICKLINE(BARSLAST(ABS(上分形-REF(上分形,1)))<BARSLAST(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1)),上分形,上分形,5,1),LINETHICK1,COLORMAGENTA;{分形横线}
STICKLINE(BARSLAST(ABS(下分形-REF(下分形,1)))<BARSLAST(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1)),下分形,下分形,5,1),LINETHICK1,COLORYELLOW;
DRAWICON(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),HIGH*1.015,4);{箭头突破分形}
DRAWICON(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),LOW*0.99,5);
{AOAC-K区域}
Var1:=(HIGH+LOW)/2;
AO:=MA(Var1,5)-MA(Var1,34);
AC:=AO-MA(AO,5);
VF:=AO>REF(AO,1) AND AC>REF(AC,1),COLORRED;
VG:=AO<REF(AO,1) AND AC<REF(AC,1),COLORGREEN;
VH:=AO>REF(AO,1) AND AC<REF(AC,1),COLORGRAY;
VI:=AO<REF(AO,1) AND AC>REF(AC,1),COLORGRAY;
VJ:=VH OR VI;
STICKLINE(VF AND CLOSE>OPEN,CLOSE,OPEN,8,1),COLORRED;
STICKLINE(VF AND CLOSE<=OPEN,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(VF,HIGH,LOW,1,0),COLORRED;
STICKLINE(VG AND CLOSE>OPEN,CLOSE,OPEN,8,1),COLORGREEN;
STICKLINE(VG AND CLOSE<=OPEN,CLOSE,OPEN,8,0),COLORGREEN;
STICKLINE(VG,HIGH,LOW,1,0),COLORGREEN;
STICKLINE(VJ AND CLOSE>OPEN,CLOSE,OPEN,8,1),COLORGRAY;
STICKLINE(VJ AND CLOSE<=OPEN,CLOSE,OPEN,8,0),COLORGRAY;
STICKLINE(VJ,HIGH,LOW,1,0),COLORGRAY;
{平衡线}
P1:=REF(HIGH,1)>HIGH AND REF(HIGH,1)>下鄂;
平衡线买:REF(REF(HIGH,1),BARSLAST(p1)),LINETHICK0,COLORWHITE;
STICKLINE(CROSS(HIGH,平衡线买) AND LOW>平衡线买,(HIGH+LOW)/2,(HIGH+LOW)/2,12,0),LINETHICK1,COLORWHITE;
STICKLINE(CROSS(HIGH,平衡线买) AND LOW<=平衡线买,平衡线买,平衡线买,12,0),LINETHICK1,COLORWHITE;
P2:=REF(LOW,1)<LOW AND REF(LOW,1)<下鄂;
平衡线卖:REF(REF(LOW,1),BARSLAST(p2)),LINETHICK0,COLORCYAN;
STICKLINE(CROSS(平衡线卖,LOW) AND HIGH<平衡线卖,(HIGH+LOW)/2,(HIGH+LOW)/2,12,0),LINETHICK1,COLORCYAN;
STICKLINE(CROSS(平衡线卖,LOW) AND HIGH>=平衡线卖,平衡线卖,平衡线卖,12,0),LINETHICK1,COLORCYAN;
{AO,AC方向}
AO:=MA(Y,5)-MA(Y,34);
AC:=AO-MA(AO,5);
DRAWTEXT(ISLASTBAR AND AO>REF(AO,1) AND AC>REF(AC,1),Y,'↑AO↑AC'),SHIFT1,COLORRED;
DRAWTEXT(ISLASTBAR AND AO<REF(AO,1) AND AC<REF(AC,1),Y,'↓AO↓AC'),SHIFT1,COLORGREEN;
DRAWTEXT(ISLASTBAR AND AO>REF(AO,1) AND AC<REF(AC,1),Y,'↑AO↓AC'),SHIFT1,COLORWHITE;
DRAWTEXT(ISLASTBAR AND AO<REF(AO,1) AND AC>REF(AC,1),Y,'↓AO↑AC'),SHIFT1,COLORWHITE;


{GATOR}
var1:=(HIGH+LOW)/2;
颚:=SMA(var1,13,1),LINETHICK0;
齿:=SMA(var1,8,1),LINETHICK0;
唇:=SMA(var1,5,1),LINETHICK0;
齿颚:IF(齿>颚,齿-颚,颚-齿),LINETHICK0;
齿唇:IF(齿<唇,齿-唇,唇-齿),LINETHICK0;
STICKLINE(齿颚<REF(齿颚,1),0,齿颚,6,1),SHIFT5,COLORGREEN;
STICKLINE(齿颚>REF(齿颚,1),0,齿颚,6,1),SHIFT5,COLORRED;
STICKLINE(齿唇>REF(齿唇,1),0,齿唇,6,1),SHIFT3,COLORGREEN;
STICKLINE(齿唇<REF(齿唇,1),0,齿唇,6,1),SHIFT3,COLORRED;

{EO}
Y:=(LOW+HIGH)/2;
E:=EMA(EMA(Y,5)-EMA(Y,34),2);
EO:EMA(E,1),COLORGREEN;
0,LINEDOT;
PARTLINE(EO>REF(EO,1),EO),COLORRED,LINETHICK2;

本文来自： [url=http://www.kdj.com.cn/][color=#800080]KDJ中国财经社区[/color][/url]  发布者： 操盘术  发表时间： 2007-10-20 16:43   您是本帖第 11358 位浏览者

banker2882 发表于 2008-10-6 13:12

谢谢分享!下载了!!/:money

大连江涛 发表于 2008-10-13 21:19

回复 1楼 fengyun688 的帖子

用了一下，做的非常好，很准
/:clap /:clap /:clap

海越 发表于 2008-10-13 21:43

/:clap /:clap /:clap /:clap 下了。能选股就好了

剔股刀 发表于 2008-11-4 22:44

/:fu 有图就更好了；

日落沧江静 发表于 2008-11-8 23:46

不会用  怎么办

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.