查看完整版本: [源码]和讯飞弧黄金眼版专用公式

yngs 2004-3-6 21:42

[源码]和讯飞弧黄金眼版专用公式

MACD2
[code]
{SHORT:12;LONG:26;M:9}
DIFF : (EMA(CLOSE,SHORT) - EMA(CLOSE,LONG)),linethick2,colorgreen;
DEA  : EMA(DIFF,M),colorcyan;
MACD:2*(DIFF-DEA), COLORSTICK;
tj:=(diff>dea);
tj1:=(diff>0);
PARTLINE(tj,diff),colormagenta,linethick2;
partline(tj1 and tj,diff),colorred,linethick2;
tj2:=diff<-1 and diff<dea and macd<-1;
partline(tj2,diff),colorblue,linethick2;
B1:=LLV(MACD,999999);
B2:=HHV(MACD,999999);
B3:=(B2-B1);
C1:=LLV(low,999999);
C2:=HHV(high,999999);
C3:=(C2-C1);
D:=B3/C3;
[/code]

yngs 2004-3-6 21:44

顶部起点

[code]
[n:30]
转向: ZIG(3,10),COLORFFB97A,linethick2;
HH:HHV(H,N);
LL:LLV(L,N);

<%

VH=FFL.VARDATA("HH")

VL=FFL.VARDATA("LL")

VN=FFL.VARDATA("N")

LAST=UBOUND(VH)

IF VN>LAST THEN VN=LAST+1

FOR I=LAST TO LAST-VN+1 STEP-1

    VH(I)=VH(LAST)

    VL(I)=VL(LAST)

NEXT

FFL.VARDATA("HH")=VH

FFL.VARDATA("LL")=VL

FFL.VARSTARTINDEX("HH")=LAST-VN+1

FFL.VARSTARTINDEX("LL")=LAST-VN+1

%>

HH,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH,'【顶部起点】↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH,HH,2),align2,coloryellow;
HH-((HH-LL)*0.809),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.809),' 0.809↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.809),HH-((HH-LL)*0.809),2),align2,coloryellow;
HH-((HH-LL)*0.764),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.764),' 0.764↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.764),HH-((HH-LL)*0.764),2),align2,coloryellow;
HH-((HH-LL)*0.618),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.618),' 0.618↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.618),HH-((HH-LL)*0.618),2),align2,coloryellow;
HH-((HH-LL)*0.500),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.500),' 0.500↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.500),HH-((HH-LL)*0.500),2),align2,coloryellow;
HH-((HH-LL)*0.382),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.382),' 0.382↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.382),HH-((HH-LL)*0.382),2),align2,coloryellow;
HH-((HH-LL)*0.333),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.333),' 0.333↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.333),HH-((HH-LL)*0.333),2),align2,coloryellow;
HH-((HH-LL)*0.236),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.236),' 0.236↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.236),HH-((HH-LL)*0.236),2),align2,coloryellow;
HH-((HH-LL)*0.191),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH-((HH-LL)*0.191),' 0.191↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-((HH-LL)*0.191),HH-((HH-LL)*0.191),2),align2,coloryellow;
LL,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL,'〖黄金分割〗↓'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL,LL,2),align2,coloryellow;
[/code]

姚平 2004-3-8 00:03

谢谢朋友！！！

mydg 2004-3-8 02:06

有未来数据

mydg 2004-3-8 02:07

还是谢谢啦！

ybb001 2004-3-8 06:45

谢谢朋友！！！

天天股票 2004-3-8 08:30

我不会用啊!

枪手 2004-3-8 11:33

谢谢朋友！

大唐电信 2004-3-11 13:33

谢谢！

风雨步行 2004-4-9 23:26

你好，请教！！11加急

DIFF : (EMA(CLOSE,SHORT) - EMA(CLOSE,LONG)),linethick2,colorgreen;安装提示  行二：未定义的标识符？？？？、请教！
:p

hhuzhoujie 2004-4-16 18:29

谢谢！

追风侠 2004-4-17 07:44

休息休息休息休息嘻嘻嘻

mmmmmm 2004-4-17 21:08

谢谢

af8889 2004-4-18 22:34

有未来数据？？？？？

天涯海角 2004-4-20 16:52

谢谢

风雨步行 2004-4-20 21:11

很一般，不过还是要感谢你的热心

:thinking:

wwxx 2004-4-21 10:46

谢谢！！！！！！！

王庆 2004-4-22 08:07

谢谢

天涯海角 2004-4-22 15:58

谢谢朋友！！！

jmgsdz 2004-5-2 15:54

和讯飞弧黄金眼版专用公式修改

{SHORT:12;LONG:26;M:9}
DIFF : (EMA(CLOSE,SHORT) - EMA(CLOSE,LONG)),linethick2,colorgreen;
DEA  : EMA(DIFF,M),colorcyan;
MACD:2*(DIFF-DEA), COLORSTICK;
tj:=(diff>dea);
tj1:=(diff>0);
PARTLINE(tj,diff),colormagenta,linethick2;
partline(tj1 and tj,diff),colorred,linethick2;
tj2:=diff<-1 and diff<dea and macd<-1;
partline(tj2,diff),colorblue,linethick2;
DRAWICON(CROSS(DIFF,DEA),DIFF,10);
DRAWICON(CROSS(DEA,DIFF),DIFF,11);

af8889 2004-5-3 01:28

HH:HHV(H,N);
LL:LLV(L,N);
<%
VH=FFL.VARDATA("HH")
VL=FFL.VARDATA("LL")
VN=FFL.VARDATA("N")
LAST=UBOUND(VH)
IF VN>LAST THEN VN=LAST+1
FOR I=LAST TO LAST-VN+1 STEP-1
    VH(I)=VH(LAST)
    VL(I)=VL(LAST)
NEXT
FFL.VARDATA("HH")=VH
FFL.VARDATA("LL")=VL
FFL.VARSTARTINDEX("HH")=LAST-VN+1
FFL.VARSTARTINDEX("LL")=LAST-VN+1
%>
HH,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,HH,'【黄金分割】↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH,HH,2),align2,coloryellow;
LL+((HH-LL)*0.809),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.809),' 0.809↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.809),LL+((HH-LL)*0.809),2),align2,coloryellow;
LL+((HH-LL)*0.764),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.764),' 0.764↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.764),LL+((HH-LL)*0.764),2),align2,coloryellow;
LL+((HH-LL)*0.618),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.618),' 0.618↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.618),LL+((HH-LL)*0.618),2),align2,coloryellow;
LL+((HH-LL)*0.500),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.500),' 0.500↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.500),LL+((HH-LL)*0.500),2),align2,coloryellow;
LL+((HH-LL)*0.382),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.382),' 0.382↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.382),LL+((HH-LL)*0.382),2),align2,coloryellow;
LL+((HH-LL)*0.333),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.333),' 0.333↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.333),LL+((HH-LL)*0.333),2),align2,coloryellow;
LL+((HH-LL)*0.236),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.236),' 0.236↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.236),LL+((HH-LL)*0.236),2),align2,coloryellow;
LL+((HH-LL)*0.191),pointdot,linethick1,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL+((HH-LL)*0.191),' 0.191↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL+((HH-LL)*0.191),LL+((HH-LL)*0.191),2),align2,coloryellow;
LL,coloryellow;
DRAWTEXT(c>0  and ISLASTBAR=1,LL,'〖底部起点〗↑'),coloryellow;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL,LL,2),align2,coloryellow;

[color=Teal][align=right] 本贴由 af8889 于 2004-5-3 01:33 最后编辑 [/align][/color]

af8889 2004-5-3 01:31

这才是

我心飞扬 2004-5-3 20:06

谢谢，很好！

qcheng89 2004-5-3 21:15

能帖个图就好啦！谢谢！

tdg831 2004-7-9 14:26

顶.感谢

飞天大侠 2004-7-9 19:59

);

fjfhgwg 2004-7-9 21:18

：[源码]和讯飞弧黄金眼版专用公式

ok!!

zyh631226 2004-7-14 23:23

谢谢

快乐飞刀 2004-7-16 13:44

谢谢了,学习学习.

小狐 2004-7-23 13:15

没用处无法导入

海獭 2004-7-23 14:21

好好！

感谢！

wy589 2004-8-21 14:36

ok

peter1815 2004-8-21 23:09

3q

zhaozhaosjz 2004-8-23 11:29

谢了谢了

fujiu 2004-8-23 15:37

有未来数据

周鑫 2004-8-23 17:11

谢谢了

诺亚方舟 2004-9-1 17:31

学习学习

fhjysaa 2004-10-10 12:40

欢迎

yj8818 2004-11-19 09:10

ddd

qwe_rty_uio 2006-1-27 19:46

xx

6406753 2006-2-12 21:58

00000000000

风精灵 2006-2-13 00:14

谢谢朋友！

东南人氏 2006-2-17 10:52

谢谢

m39506 2006-2-18 15:41

谢谢

忠剑飞扬 2006-2-20 01:57

谢谢，很好！

888haha 2006-2-20 14:26

谢谢，很好！

hhyhhy 2006-2-25 15:35

kankan

藏乐 2006-3-13 19:56

谢谢朋友！！！
页: [1] 2
查看完整版本: [源码]和讯飞弧黄金眼版专用公式