找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
查看: 2254|回复: 15

求助;这个指标源码没错咋会通达信通不过????

[复制链接]
发表于 2013-1-18 11:40 | 显示全部楼层 |阅读模式
悬赏10威望未解决
未命名.jpg
{10自创指标}
R1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200;
R2:=EMA((CLOSE-(LLV(LOW,5)))/((HHV(HIGH,5))-(LLV(LOW,5)))*100,4)*2;
R3:=EMA(0.618*REF(R2,1)+0.382*R2,2);
R4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
R5:=POW(MA(LOW,5),2)+MA(LOW,5);
R6:=POW(MA(HIGH,5),2)+MA(HIGH,5);
R7:=(R4-LLV(R5,64))/(HHV(R6,64)-LLV(R5,64))*150+65-10;
R8:=SMA((SMA(R7,3,1)*1.5-100),3,1);
R9:=3*(SMA(R7,3,1)*1.5-100)-2*R8;
R10:=(HIGH+LOW+CLOSE*2)/4;
R11:=(R10-(EMA(R10,13)))*100/(STD(R10,13));
R12:=EMA((EMA(R11,5)),13)+200-100;
R13:=(SMA(R1,3,1))+R2+(SMA(R7,3,1)*1.5-100)+R12;
R14:=(SMA((SMA(R1,3,1)),3,1))+R3+R8+(EMA(R12,10));
R15:=(3*(SMA(R1,3,1))-2*(SMA((SMA(R1,3,1)),3,1)))+(3*R12-2*(EMA(R12,10)))+
R9+(3*R12-2*(EMA(R12,10)));
R16:=(HIGH+LOW+CLOSE)/3;
R17:=(R16-MA(R16,34))/(0.015*AVEDEV(R16,34));
R18:=(HIGH+LOW+CLOSE+R16)/4;
R19:=(R18-(EMA(R18,24)))/(STD(R18,24))*100;
R20:=(R16-MA(R16,24))/(0.015*AVEDEV(R16,24));
R21:=(((EMA(R19,5))+R20+R17)/3+165)/4;
R22:=(R13+R14+R15*30)/32/5-15;
A1:=EMA(EMA(CLOSE,13),13);
A2:=(A1-REF(A1,1))/REF(A1,1)*6400;
A3:=100*WINNER(CLOSE*0.95);
买卖:= EMA(((R21+R22)/2/1.1),1),COLORRED,LINETHICK2;
确认:=MA(买卖,3),COLORWHITE,LINETHICK2;
AR1:=EMA(OPEN,7);
AR2:=EMA(AR1,21);
AR3:=CROSS(AR1,AR2);
AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
DM:IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,20,0),COLORYELLOW,LINETHICK2;
DRAWICON(DM,70,1);
DP:IF(PEAKBARS(2,9,1)=1,80,100),COLORBLUE,LINETHICK2;
DRAWICON(DP,70,2);
ZM:IF(TROUGHBARS(3,18,1)=0 AND HIGH>LOW+0.1,20,0),COLORFF00FF,LINETHICK3;
DRAWICON(ZM,70,1);
ZP:IF(PEAKBARS(2,15,1)=0,80,100),COLORGREEN,LINETHICK3;
DRAWICON(ZP,70,2);
QMZIG(3,35)>REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)<REF(ZIG(3,35),2))
*50,STICK,COLORRED,LINETHICK6;
DRAWICON(QM,70,1);
QPZIG(3,35)<REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)>REF(ZIG(3,35),2))
*50,STICK,COLORGREEN,LINETHICK4;
DRAWICON(QP,70,2);
多空MACDKD均线:100,LINETHICK0,COLORRED;
工作WLRSIVOL:100,LINETHICK0,COLORRED;
{1多空指标}
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON (C<BBI,90,2);
DRAWICON(C>BBI,90,1);
{2MACD指标}
DIFF:=EMA(C,F11)-EMA(C,F);
DEA:=EMA(DIFF,F12);
MACD:=2*(DIFF-DEA);
DRAWICON(MACD<REF(MACD,1),80,2);
DRAWICON(MACD>REF(MACD,1),80,1);
{3KDJ指标}
RSV:=(C-LLV(L,F))/(HHV(H,F)-LLV(L,F))*100;
K:=SMA(RSV,F10,1);
D:=SMA(K,F15,1);
J:=3*K-2*D;
DRAWICON(J<REF(J,1),70,2);
DRAWICON(J>REF(J,1),70,1);
{4均线指标}
VAR6:=(2*C+H+L)/4;
VAR8:=LLV(L,34);
VARB:=HHV(H,34);
VARC:=EMA((VAR6-VAR8)/(VARB-VAR8)*100,8);
VARD:=EMA(VARC,5);
DRAWICON (VARC-VARD<0,60,2);
DRAWICON(VARC-VARD>0,60,1);
{5,47天均线工作线}
MA1:=EMA(C,F13);
DRAWICON (C<MA1,50,2);
DRAWICON(C>MA1,50,1);
{6威廉LWR,7,3天交叉指标}
RSX:=(HHV(H,F)-C)/(HHV(H,F)-LLV(L,F))*100;
LWR1:=SMA(RSX,F13,1);
LWR2:=SMA(LWR1,F15,1);
DRAWICON (LWR1>LWR2,40,2);
DRAWICON(LWR1<LWR2,40,1);
{7RSI强弱指标7,13}
LC := REF(C,1);
RSI1:=SMA(MAX(C-LC,0),F13,1)/SMA(ABS(C-LC),F13,1)*100;
RSI2:=SMA(MAX(C-LC,0),F10,1)/SMA(ABS(C-LC),F10,1)*100;
DRAWICON (RSI1<RSI2,30,2);
DRAWICON(RSI1>RSI2,30,1);
{8成交量指标}
VAR2:=AMOUNT/VOL/100;
短期:=MA(VAR2,10);
DRAWICON (C<短期,20,2);
DRAWICON(C>短期,20,1);
{9买卖指标}
VAR01:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
VAR02:=HIGH-REF(HIGH,1);
VAR03:=REF(LOW,1)-LOW;
VAR04:=SUM(IF(VAR02>0 AND VAR02>VAR03,VAR02,0),25);
VAR05:=SUM(IF(VAR03>0 AND VAR03>VAR02,VAR03,0),25);
VAR06:=VAR04*100/VAR01;
VAR07:=VAR05*100/VAR01;
VAR08:=MA(ABS(VAR07-VAR06)/(VAR07+VAR06)*100,15);
VAR09:=(VAR08+REF(VAR08,15))/2;
A:=(VAR07>VAR06 AND VAR07>25 AND VAR06<25);
B:=ZIG(3,50/5)*100,COLORRED,LINETHICK2;
G:=MA(B,2),COLORGREEN,LINETHICK2;
DD:=CROSS(B,G)*1000,COLORRED;
W:=CROSS(G,B)*1000,COLORBLUE;
E:=REF(INDEXC,1);
F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);
VAR10:=F AND F<8;
VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR12:=SMA(VAR11,3,1);
VAR13:=SMA(VAR12,3,1);
VAR14:=VAR13 AND VAR13<20;
MM:=A AND DD AND VAR10 AND VAR14 ;


DRAWICON(W=1000,10,19);
DRAWICON(DD=1000,10,23);
VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR301:=SMA(SMA(VAR200,3,1),3,1)/28.57;
VAR400:=EMA(VAR301,5);
操盘:=3*VAR301-2*VAR400;
A111:=CROSS(操盘,VAR301) AND VAR301<2.1 AND C>O;
STICKLINE(A111,30,0,4,0),COLOR770077;
STICKLINE(A111,30,0,3,0),COLOR990099;
STICKLINE(A111,30,0,2,0),COLORBB00BB;
STICKLINE(A111,30,0,1,0),COLORDD00DD;
STICKLINE(A111,30,0,0.3,0),COLORFF00FF;
{DRAWTEXT(A111,36,'财神到'),COLORRED;};
VAR55:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K55:=SMA(VAR55,3,1);
D55:=SMA(K55,3,1);
J55:=SMA(D55,3,1);
TJ1:=D55>=REF(D55,1) AND REF(D55,1)<REF(D55,2);
VAR34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K34:=SMA(VAR34,3,1);
D34:=SMA(K34,3,1);
J34:=SMA(D34,3,1);
TJ2:=D34>=REF(D34,1) AND REF(D34,1)<REF(D34,2);
VAR9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K9:=SMA(VAR9,3,1);
D9:=SMA(K9,3,1);
J9:=SMA(D9,3,1);
TJ3:=D9>=REF(D9,1) AND REF(D9,1)<REF(D9,2);
VAR3:=(CLOSE-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3))*100;
K3:=SMA(VAR3,3,1);
D3:=SMA(K3,3,1);
J3:=SMA(D3,3,1);
TJ4:=D3>=REF(D3,1) AND REF(D3,1)<REF(D3,2);
XG:=TJ2 AND TJ3 AND TJ4 AND TJ1;
STICKLINE(XG,0,50,3,0),COLOR00FFFF;
STICKLINE(REF("KDJ.J",1)<0 AND "KDJ.J">0,25,0,3,0),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=89,10,'★五里警告一:纪律、止损、
趋势第一!人脑服从电脑,坚决执行信号!'),COLOR00FFFF;



 楼主| 发表于 2013-1-18 11:41 | 显示全部楼层
{10自创指标}
R1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200;
R2:=EMA((CLOSE-(LLV(LOW,5)))/((HHV(HIGH,5))-(LLV(LOW,5)))*100,4)*2;
R3:=EMA(0.618*REF(R2,1)+0.382*R2,2);
R4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
R5:=POW(MA(LOW,5),2)+MA(LOW,5);
R6:=POW(MA(HIGH,5),2)+MA(HIGH,5);
R7:=(R4-LLV(R5,64))/(HHV(R6,64)-LLV(R5,64))*150+65-10;
R8:=SMA((SMA(R7,3,1)*1.5-100),3,1);
R9:=3*(SMA(R7,3,1)*1.5-100)-2*R8;
R10:=(HIGH+LOW+CLOSE*2)/4;
R11:=(R10-(EMA(R10,13)))*100/(STD(R10,13));
R12:=EMA((EMA(R11,5)),13)+200-100;
R13:=(SMA(R1,3,1))+R2+(SMA(R7,3,1)*1.5-100)+R12;
R14:=(SMA((SMA(R1,3,1)),3,1))+R3+R8+(EMA(R12,10));
R15:=(3*(SMA(R1,3,1))-2*(SMA((SMA(R1,3,1)),3,1)))+(3*R12-2*(EMA(R12,10)))+
R9+(3*R12-2*(EMA(R12,10)));
R16:=(HIGH+LOW+CLOSE)/3;
R17:=(R16-MA(R16,34))/(0.015*AVEDEV(R16,34));
R18:=(HIGH+LOW+CLOSE+R16)/4;
R19:=(R18-(EMA(R18,24)))/(STD(R18,24))*100;
R20:=(R16-MA(R16,24))/(0.015*AVEDEV(R16,24));
R21:=(((EMA(R19,5))+R20+R17)/3+165)/4;
R22:=(R13+R14+R15*30)/32/5-15;
A1:=EMA(EMA(CLOSE,13),13);
A2:=(A1-REF(A1,1))/REF(A1,1)*6400;
A3:=100*WINNER(CLOSE*0.95);
买卖:= EMA(((R21+R22)/2/1.1),1),COLORRED,LINETHICK2;
确认:=MA(买卖,3),COLORWHITE,LINETHICK2;
AR1:=EMA(OPEN,7);
AR2:=EMA(AR1,21);
AR3:=CROSS(AR1,AR2);
AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
DM:IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,20,0),COLORYELLOW,LINETHICK2;
DRAWICON(DM,70,1);
DP:IF(PEAKBARS(2,9,1)=1,80,100),COLORBLUE,LINETHICK2;
DRAWICON(DP,70,2);
ZM:IF(TROUGHBARS(3,18,1)=0 AND HIGH>LOW+0.1,20,0),COLORFF00FF,LINETHICK3;
DRAWICON(ZM,70,1);
ZP:IF(PEAKBARS(2,15,1)=0,80,100),COLORGREEN,LINETHICK3;
DRAWICON(ZP,70,2);
QMZIG(3,35)>REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)<REF(ZIG(3,35),2))
*50,STICK,COLORRED,LINETHICK6;
DRAWICON(QM,70,1);
QPZIG(3,35)<REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)>REF(ZIG(3,35),2))
*50,STICK,COLORGREEN,LINETHICK4;
DRAWICON(QP,70,2);
多空MACDKD均线:100,LINETHICK0,COLORRED;
工作WLRSIVOL:100,LINETHICK0,COLORRED;
{1多空指标}
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON (C<BBI,90,2);
DRAWICON(C>BBI,90,1);
{2MACD指标}
DIFF:=EMA(C,F11)-EMA(C,F);
DEA:=EMA(DIFF,F12);
MACD:=2*(DIFF-DEA);
DRAWICON(MACD<REF(MACD,1),80,2);
DRAWICON(MACD>REF(MACD,1),80,1);
{3KDJ指标}
RSV:=(C-LLV(L,F))/(HHV(H,F)-LLV(L,F))*100;
K:=SMA(RSV,F10,1);
D:=SMA(K,F15,1);
J:=3*K-2*D;
DRAWICON(J<REF(J,1),70,2);
DRAWICON(J>REF(J,1),70,1);
{4均线指标}
VAR6:=(2*C+H+L)/4;
VAR8:=LLV(L,34);
VARB:=HHV(H,34);
VARC:=EMA((VAR6-VAR8)/(VARB-VAR8)*100,8);
VARD:=EMA(VARC,5);
DRAWICON (VARC-VARD<0,60,2);
DRAWICON(VARC-VARD>0,60,1);
{5,47天均线工作线}
MA1:=EMA(C,F13);
DRAWICON (C<MA1,50,2);
DRAWICON(C>MA1,50,1);
{6威廉LWR,7,3天交叉指标}
RSX:=(HHV(H,F)-C)/(HHV(H,F)-LLV(L,F))*100;
LWR1:=SMA(RSX,F13,1);
LWR2:=SMA(LWR1,F15,1);
DRAWICON (LWR1>LWR2,40,2);
DRAWICON(LWR1<LWR2,40,1);
{7RSI强弱指标7,13}
LC := REF(C,1);
RSI1:=SMA(MAX(C-LC,0),F13,1)/SMA(ABS(C-LC),F13,1)*100;
RSI2:=SMA(MAX(C-LC,0),F10,1)/SMA(ABS(C-LC),F10,1)*100;
DRAWICON (RSI1<RSI2,30,2);
DRAWICON(RSI1>RSI2,30,1);
{8成交量指标}
VAR2:=AMOUNT/VOL/100;
短期:=MA(VAR2,10);
DRAWICON (C<短期,20,2);
DRAWICON(C>短期,20,1);
{9买卖指标}
VAR01:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
VAR02:=HIGH-REF(HIGH,1);
VAR03:=REF(LOW,1)-LOW;
VAR04:=SUM(IF(VAR02>0 AND VAR02>VAR03,VAR02,0),25);
VAR05:=SUM(IF(VAR03>0 AND VAR03>VAR02,VAR03,0),25);
VAR06:=VAR04*100/VAR01;
VAR07:=VAR05*100/VAR01;
VAR08:=MA(ABS(VAR07-VAR06)/(VAR07+VAR06)*100,15);
VAR09:=(VAR08+REF(VAR08,15))/2;
A:=(VAR07>VAR06 AND VAR07>25 AND VAR06<25);
B:=ZIG(3,50/5)*100,COLORRED,LINETHICK2;
G:=MA(B,2),COLORGREEN,LINETHICK2;
DD:=CROSS(B,G)*1000,COLORRED;
W:=CROSS(G,B)*1000,COLORBLUE;
E:=REF(INDEXC,1);
F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);
VAR10:=F AND F<8;
VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR12:=SMA(VAR11,3,1);
VAR13:=SMA(VAR12,3,1);
VAR14:=VAR13 AND VAR13<20;
MM:=A AND DD AND VAR10 AND VAR14 ;
DRAWICON(W=1000,10,19);
DRAWICON(DD=1000,10,23);
VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR301:=SMA(SMA(VAR200,3,1),3,1)/28.57;
VAR400:=EMA(VAR301,5);
操盘:=3*VAR301-2*VAR400;
A111:=CROSS(操盘,VAR301) AND VAR301<2.1 AND C>O;
STICKLINE(A111,30,0,4,0),COLOR770077;
STICKLINE(A111,30,0,3,0),COLOR990099;
STICKLINE(A111,30,0,2,0),COLORBB00BB;
STICKLINE(A111,30,0,1,0),COLORDD00DD;
STICKLINE(A111,30,0,0.3,0),COLORFF00FF;
{DRAWTEXT(A111,36,'财神到'),COLORRED;};
VAR55:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K55:=SMA(VAR55,3,1);
D55:=SMA(K55,3,1);
J55:=SMA(D55,3,1);
TJ1:=D55>=REF(D55,1) AND REF(D55,1)<REF(D55,2);
VAR34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K34:=SMA(VAR34,3,1);
D34:=SMA(K34,3,1);
J34:=SMA(D34,3,1);
TJ2:=D34>=REF(D34,1) AND REF(D34,1)<REF(D34,2);
VAR9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K9:=SMA(VAR9,3,1);
D9:=SMA(K9,3,1);
J9:=SMA(D9,3,1);
TJ3:=D9>=REF(D9,1) AND REF(D9,1)<REF(D9,2);
VAR3:=(CLOSE-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3))*100;
K3:=SMA(VAR3,3,1);
D3:=SMA(K3,3,1);
J3:=SMA(D3,3,1);
TJ4:=D3>=REF(D3,1) AND REF(D3,1)<REF(D3,2);
XG:=TJ2 AND TJ3 AND TJ4 AND TJ1;
STICKLINE(XG,0,50,3,0),COLOR00FFFF;
STICKLINE(REF("KDJ.J",1)<0 AND "KDJ.J">0,25,0,3,0),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=89,10,'★五里警告一:纪律、止损、
趋势第一!人脑服从电脑,坚决执行信号!'),COLOR00FFFF;

回复

使用道具 举报

 楼主| 发表于 2013-1-18 11:44 | 显示全部楼层
笑脸是  【:(】  
回复

使用道具 举报

 楼主| 发表于 2013-1-18 11:46 | 显示全部楼层
415455.jpg
请高手帮解决 未命名.jpg45846847.jpg
回复

使用道具 举报

 楼主| 发表于 2013-1-18 12:47 | 显示全部楼层
请高手帮解决
回复

使用道具 举报

发表于 2013-1-19 19:16 | 显示全部楼层
谢谢分享
回复

使用道具 举报

 楼主| 发表于 2013-1-20 20:44 | 显示全部楼层
若果有高手解决另外在赠送100学分
回复

使用道具 举报

发表于 2013-1-20 21:15 | 显示全部楼层
F11好象没有赋值?
回复

使用道具 举报

发表于 2013-1-21 17:46 | 显示全部楼层
这个公式拼的吧。上面的人说的对,很多处没参数或赋值。自己弄弄就行啦。
回复

使用道具 举报

 楼主| 发表于 2013-1-22 22:01 | 显示全部楼层
求高手帮忙把60分钟周期未成交或者就是停牌周期踢出,的K线主图公尺
回复

使用道具 举报

 楼主| 发表于 2013-3-11 19:56 | 显示全部楼层
求高手帮忙把60分钟周期未成交或者就是停牌周期踢出,的K线主图公尺

回复

使用道具 举报

发表于 2013-3-29 14:46 | 显示全部楼层
{:soso_e181:}
回复

使用道具 举报

发表于 2013-3-31 23:23 | 显示全部楼层
学习学习..
回复

使用道具 举报

发表于 2013-4-2 19:30 | 显示全部楼层
{:soso_e181:}
回复

使用道具 举报

 楼主| 发表于 2013-4-21 12:56 | 显示全部楼层
未命名.jpg 参数已解决
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-11-26 11:44 , Processed in 0.108496 second(s), Total 11, Slave 10 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

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