通达信版本【飞狐公式】1250回头望月●强弱摆荡指数●黑马回头!
一,通达信版本副图公式:obv.macd 二,通达信版本主图公式:抢防 三,通达信版本主图公式:股经叠彩线 四,通达信版本主图公式:兔子寻宝, 五,通达信版本副图公式:大盘资金异动 六,通达信版本副图公式:浪里白条 七,通达信版本主图公式,江恩法则5.0 八,通达信版本主副图公式,直效获利九,通达信版本主图公式,1250回头望月-顺水推舟十,通达信版本副图公式,强弱摆荡指十一,通达信版本,黑马回头*****************************************hh16888 三级MACD会员 "obv.macd"这个指标不错,原码如下: 飞狐用的公式 "obv.macd"这个指标不错,原码如下: 飞狐用的公式 OBV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0))/25000,0),1); obve:=ema(obv,3); DIFF : EMA(obve,12) - EMA(obve,26); bbDIFF:=DIFF-ref(DIFF,1); DEA : EMA(DIFF,9); bbDEA:=DEA-ref(DEA,1); MACD : 2*(DIFF-DEA), COLORSTICK; STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,4,0),colorgreen; STICKLINE(MACD<ref(MACD,1)and MACD<0,0,MACD,4,0),colorFFCC33; STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,4,0),COLOR0099FF; STICKLINE(MACD>ref(MACD,1)and MACD>0,0,MACD,4,0),COLORyellow; PARTLINE(bbDEA>0,DEA),color9966CC; PARTLINE(bbDEA<0,DEA),color00ff33; PARTLINE(bbDIFF>0,DIFF),colorwhite; PARTLINE(bbDIFF<0,DIFF),colorblue; yq123 三级MACD会员 飞狐的,请帮忙改成通达信 STICKLINE(C>=O,C,O,7,0),COLORGREEN; STICKLINE(C>=O,H,C,7,1),COLORRED; STICKLINE(C>=O,H,C,4,1),COLORRED; STICKLINE(C>=O,O,L,7,1),COLORGREEN; STICKLINE(C<O,C,O,7,1),COLORGREEN; STICKLINE(C<O,C,O,4,1),COLORGREEN; STICKLINE(C<O,H,O,7,1),COLORGREEN; STICKLINE(C<O,C,L,7,1),COLORGREEN; STICKLINE(C<O,C,L,4,1),COLORGREEN; VAR3:=MA(C,8)*1.01; VAR4:=MA(O,13)*1.01; VAR5:=(MA(HIGH,5)+MA(LOW,5)+MA(CLOSE,5)+MA(OPEN,5)+HIGH+LOW+CLOSE+OPEN)/8; VAR6:=IF(VAR4>VAR5,VAR4,VAR5); VAR7:=IF(VAR4<VAR5,VAR4,VAR5); VAR8:=3/100; 抢1:MA(VAR7,5)*(1-VAR8),COLORGREEN; 防1:MA(VAR6,5)*(1+VAR8),COLORWHITE; 抢2:EMA(VAR6,3)*(1-VAR8),COLORRED; 防2:EMA(VAR7,3)*(1+VAR8),COLORYELLOW; STICKLINE(VAR3>VAR4,VAR3,VAR4,4,0),COLORYELLOW; STICKLINE(VAR3<=VAR4,VAR3,VAR4,4,0),COLORWHITE; STICKLINE(VAR4>VAR5,VAR4,VAR5,1,0),COLORCYAN; STICKLINE(VAR4<=VAR5,VAR4,VAR5,1,1),COLORRED;
|
|
|
|
|
|
|
|
-
UID
-
7393
-
精华
-
0
-
黄金
-
14 两
-
米
-
447 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:16 | 只看该作者
一,通达信版本副图本公式:obv.macd 二,通达信版本主图公式:抢防 {通达信版副图本公式:obv.macd} OBV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0))/25000,0),1); OBVE:=EMA(OBV,3); DIFF : EMA(OBVE,12) - EMA(OBVE,26),LINETHICK2; BBDIFF:=DIFF-REF(DIFF,1); DEA : EMA(DIFF,9),LINETHICK2; BBDEA:=DEA-REF(DEA,1); MACD : 2*(DIFF-DEA), COLORSTICK; STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.5,0),COLORGREEN; STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,3,1),COLORFFCC33; STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3,1),COLOR0099FF; STICKLINE(MACD>REF(MACD,1)AND MACD>0,0,MACD,3,1),COLORYELLOW; IF(BBDEA>0,DEA,DRAWNULL),COLOR9966CC,LINETHICK2; IF(BBDEA<0,DEA,DRAWNULL),COLOR00FF33,LINETHICK2; IF(BBDIFF>0,DIFF,DRAWNULL),COLORRED,LINETHICK2; IF(BBDIFF<0,DIFF,DRAWNULL),COLORCYAN,LINETHICK2; -------------------------------------------------------------------------- {通达信版本主图公式} {STICKLINE(C>=O,C,O,3,0),COLORGREEN; STICKLINE(C>=O,H,C,3,1),COLORRED; STICKLINE(C>=O,H,C,3,1),COLORRED; STICKLINE(C>=O,O,L,3,1),COLORGREEN; STICKLINE(C<O,C,O,3,1),COLORGREEN; STICKLINE(C<O,C,O,3,1),COLORGREEN; STICKLINE(C<O,H,O,3,1),COLORGREEN; STICKLINE(C<O,C,L,3,1),COLORGREEN;}
VAR3:=MA(C,8)*1.01; VAR4:=MA(O,13)*1.01; VAR5:=(MA(HIGH,5)+MA(LOW,5)+MA(CLOSE,5)+MA(OPEN,5)+HIGH+LOW+CLOSE+OPEN)/8; VAR6:=IF(VAR4>VAR5,VAR4,VAR5); VAR7:=IF(VAR4<VAR5,VAR4,VAR5); VAR8:=3/100; STICKLINE(VAR3>VAR4,VAR3,VAR4,4,1),COLORYELLOW; STICKLINE(VAR3<=VAR4,VAR3,VAR4,4,1),COLORLIBLUE; STICKLINE(VAR4>VAR5,VAR4,VAR5,1,0),COLORGREEN; STICKLINE(VAR4=VAR5,VAR4,VAR5,1,1),COLORRED; 抢1:MA(VAR7,5)*(1-VAR8),COLORGREEN; 防1:MA(VAR6,5)*(1+VAR8),COLORWHITE; 抢2:EMA(VAR6,3)*(1-VAR8),COLORRED; 防2:EMA(VAR7,3)*(1+VAR8),COLORYELLOW;
附件
|
|
|
|
|
|
|
-
UID
-
4431
-
精华
-
0
-
黄金
-
14 两
-
米
-
463 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:18 | 只看该作者
hh16888 三级MACD会员
{股经叠彩线} 原码如下:
{股经叠彩线} a:=(3*收盘价+最低价+开盘价+最高价)/6; hjx21:=(21*a+20*向前引用(a,1)+19*向前引用(a,2)+18*向前引用(a,3)+17*向前引用(a,4)+16*向前引用(a,5)+ 15*向前引用(a,6)+14*向前引用(a,7)+13*向前引用(a,8)+12*向前引用(a,9)+11*向前引用(a,10)+ 10*向前引用(a,11)+9*向前引用(a,12)+8*向前引用(a,13)+7*向前引用(a,14)+6*向前引用(a,15)+ 5*向前引用(a,16)+4*向前引用(a,17)+3*向前引用(a,18)+2*向前引用(a,19)+ 向前引用(a,21))/231; HJX3:=(3*a+2*向前引用(a,1)+向前引用(a,2))/6; DC1:指数平滑移动平均(HJX3,4),COLORred; DC2:指数平滑移动平均(dc1,3),COLORred; DC3:指数平滑移动平均(dc1,7),COLORred; DC4:指数平滑移动平均(hjx21,6),COLORYELLOW; DC5:指数平滑移动平均(HJX21,16),COLORYELLOW; DC6:指数平滑移动平均(hjx21,34),COLORyellow; RSV:=(收盘价-最低值(最低价,6))/(最高值(最高价,6)-最低值(最低价,6))*100; K:=移动平均(RSV,3,1); D:=移动平均(K,3,1); J:=3*K-2*D; yx2:=d>向前引用(d,1); yx3:=DC4>DC6 AND DC5>DC6; yx4:=收盘价>DC4 AND 收盘价/DC4<1.1; yx5:=DC1>DC2 AND DC2>DC3; xg:=yx2 AND yx3 AND yx4; 神彩飞扬培训:=xg AND 统计总数(xg,10)=1 AND 统计总数(yx5,10)<5; 显示文字(神彩飞扬培训,最低价*0.98,'神彩'),colorffffff; DIFF:=指数平滑移动平均(收盘价,12) - 指数平滑移动平均(收盘价,26); DEA:=指数平滑移动平均(DIFF,9); MACD:=2*(DIFF-DEA); xg0:=交叉函数(MAcd,0); xg1:=交叉函数(收盘价,dc1) AND 交叉函数(收盘价,dc2) AND 交叉函数(收盘价,dc3) AND 上一次条件成立位置(xg0)<=5 AND 收盘价<DC4 ; 显示文字(xg1,最低价*0.98,'叠彩'),colorff00ff; hjx:=指数平滑移动平均(hjx21,12); zf:=100*(收盘价-向前引用(收盘价,1))/向前引用(收盘价,1); TtUP:=HJX+2*估算标准差(收盘价,20); TtDOWN:=HJX-2*估算标准差(收盘价,20); hup:=指数平滑移动平均(TtUP,3); hdown:=指数平滑移动平均(TtDOWN,3); Lbrise:=hup/向前引用(hup,1)>1.0035; midrise:=HJX>向前引用(HJX,1); Lbdown:=hdown<向前引用(HDOWN,1); Clb1:=最低价/hup<1.01 AND 收盘价/hup>0.99 AND (开盘价+最低价)/2.1<HUP ; kxt:=收盘价>开盘价 AND ((最高价-收盘价)+(开盘价-最低价))/(收盘价-开盘价)<1.2 AND 最高价/收盘价<1.035; tdkd:=100*(hup-hdown)/HJX; tdxt:=tdkd<15 AND 最低值(tdkd,8)<10; xg:=Lbrise AND midrise AND Clb1 AND kxt AND tdxt; Cxg:=统计总数(xg,20); 喇叭开口:=xg AND Cxg=1 AND 统计总数(Lbrise,10)<10 AND 最高价/最高值(最高价,5)>0.98;
显示文字(喇叭开口,最低价*0.98,'喇叭'),colorffff00; 画图标(xg1,最低价,10); 画图标(神彩飞扬培训,最低价,11); 画图标(喇叭开口,最低价,12),colorffff00;
|
|
|
|
|
|
|
-
UID
-
5754
-
精华
-
0
-
黄金
-
14 两
-
米
-
473 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:20 | 只看该作者
三,通达信版本主图公式:股经叠彩线 {通达信版本主图公式:股经叠彩线} A:=(3*CLOSE+LOW+OPEN+HIGH)/6; HJX21:=(21*A+20*REF(A,1)+19*REF(A,2)+18*REF(A,3)+17*REF(A,4)+16*REF(A,5)+ 15*REF(A,6)+14*REF(A,7)+13*REF(A,8)+12*REF(A,9)+11*REF(A,10)+ 10*REF(A,11)+9*REF(A,12)+8*REF(A,13)+7*REF(A,14)+6*REF(A,15)+ 5*REF(A,16)+4*REF(A,17)+3*REF(A,18)+2*REF(A,19)+ REF(A,21))/231; HJX3:=(3*A+2*REF(A,1)+REF(A,2))/6; DC1:EMA(HJX3,4),COLORLIMAGENTA; DC2:EMA(DC1,3),COLORRED; DC3:EMA(DC1,7),COLORRED; K1:=BACKSET(DC1<REF(DC1,1),2); IF(K1,DC1,DRAWNULL),COLORGREEN,LINETHICK1; K2:=BACKSET(DC2<REF(DC2,1),2); IF(K2,DC2,DRAWNULL),COLORGREEN,LINETHICK1; K3:=BACKSET(DC3<REF(DC3,1),2); IF(K3,DC3,DRAWNULL),COLORGREEN,LINETHICK1; DC4:EMA(HJX21,6),COLORYELLOW; DC5:EMA(HJX21,16),COLORYELLOW; DC6:EMA(HJX21,34),COLORYELLOW; RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; YX2:=D>REF(D,1); YX3:=DC4>DC6 AND DC5>DC6; YX4:=CLOSE>DC4 AND CLOSE/DC4<1.1; YX5:=DC1>DC2 AND DC2>DC3; XG:=YX2 AND YX3 AND YX4; 神彩飞扬培训:=XG AND COUNT(XG,10)=1 AND COUNT(YX5,10)<5; DRAWTEXT(神彩飞扬培训,LOW*0.98,'神彩'),COLORFFFFFF; DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA:=EMA(DIFF,9); MACD:=2*(DIFF-DEA); XG0:=CROSS(MACD,0); XG1:=CROSS(CLOSE,DC1) AND CROSS(CLOSE,DC2) AND CROSS(CLOSE,DC3) AND BARSLAST(XG0)<=5 AND CLOSE<DC4 ; DRAWTEXT(XG1,LOW*0.98,'叠彩'),COLORFF00FF; HJX:=EMA(HJX21,12); ZF:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1); TTUP:=HJX+2*STD(CLOSE,20); TTDOWN:=HJX-2*STD(CLOSE,20); HUP:=EMA(TTUP,3); HDOWN:=EMA(TTDOWN,3); LBRISE:=HUP/REF(HUP,1)>1.0035; MIDRISE:=HJX>REF(HJX,1); LBDOWN:=HDOWN<REF(HDOWN,1); CLB1:=LOW/HUP<1.01 AND CLOSE/HUP>0.99 AND (OPEN+LOW)/2.1<HUP ; KXT:=CLOSE>OPEN AND ((HIGH-CLOSE)+(OPEN-LOW))/(CLOSE-OPEN)<1.2 AND HIGH/CLOSE<1.035; TDKD:=100*(HUP-HDOWN)/HJX; TDXT:=TDKD<15 AND LLV(TDKD,8)<10; XGG:=LBRISE AND MIDRISE AND CLB1 AND KXT AND TDXT; CXG:=COUNT(XGG,20); 喇叭开口:=XGG AND CXG=1 AND COUNT(LBRISE,10)<10 AND HIGH/HHV(HIGH,5)>0.98; DRAWTEXT(喇叭开口,LOW*0.99,'喇叭'),COLORFFFF00; DRAWICON(CROSS(DC1,DC2),LOW*0.99,5); DRAWICON(神彩飞扬培训,LOW*0.970,9); DRAWICON(喇叭开口,LOW,2),COLORFFFF00;
附件
|
|
|
|
|
|
|
-
UID
-
4432
-
精华
-
0
-
黄金
-
14 两
-
米
-
463 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:23 | 只看该作者
hh16888 三级MACD会员
(兔子寻宝) 原码如下:
DRAWBKBMP(CLOSE>0,'兔兔专用8'); 兔子:(46.18*EMA(CLOSE,10)-31.82*EMA(CLOSE,4))/14.36,Linethick1; J:=SUM(VOL*CLOSE,5)/SUM(VOL,5); 寻宝:EMA(J,2),colorwhite,Linethick1; DRAWICON((CROSS(寻宝,兔子)),兔子,10); DRAWTEXT((CROSS(寻宝,兔子)),兔子,' ←兔兔介入,'),color00ff00; 买线:=EMA(CLOSE,2); 卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42); BU:=CROSS(买线,卖线); SEL:=CROSS(卖线,买线); STICKLINE(买线>=卖线,CLOSE,OPEN,8,0),colorFF00FF; STICKLINE(买线>=卖线,CLOSE,OPEN,7,0),colorFF22FF; STICKLINE(买线>=卖线,CLOSE,OPEN,6,0),colorFF44FF; STICKLINE(买线>=卖线,CLOSE,OPEN,5,0),colorFF66FF; STICKLINE(买线>=卖线,CLOSE,OPEN,4,0),colorFF88FF; STICKLINE(买线>=卖线,CLOSE,OPEN,3,0),colorFF99FF; STICKLINE(买线>=卖线,CLOSE,OPEN,2,0),colorFFAAFF; STICKLINE(买线>=卖线,CLOSE,OPEN,1,0),colorFFBBFF; STICKLINE(买线>=卖线,LOW,HIGH,0.3,0),colorFFBBFF; STICKLINE(买线<卖线,CLOSE,OPEN,8,0),color8800; STICKLINE(买线<卖线,CLOSE,OPEN,7,0),color9900; STICKLINE(买线<卖线,CLOSE,OPEN,6,0),colorAA00; STICKLINE(买线<卖线,CLOSE,OPEN,5,0),colorBB00; STICKLINE(买线<卖线,CLOSE,OPEN,4,0),colorCC00; STICKLINE(买线<卖线,CLOSE,OPEN,3,0),colorDD00; STICKLINE(买线<卖线,CLOSE,OPEN,2,0),colorEE00; STICKLINE(买线<卖线,CLOSE,OPEN,1,0),colorFF00; STICKLINE(买线<卖线,LOW,HIGH,0.3,0),colorff00; STICKLINE(CROSS(买线,卖线) or CROSS(卖线,买线),OPEN,CLOSE,4.5,0),color00ffff; DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,('\n所属板块:' + BLKNAME)),ALIGN4,colorffff00; DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,' \n总股本='+NUMTOSTR(FINANCE(1) ,0 )+'万股'+' 流通A股='+ NUMTOSTR(FINANCE(7),0)+'万股'+' 净资产='+NUMTOSTR(FINANCE(34),2 ) +' 收益='+ NUMTOSTR(FINANCE(33),2)+' 公积金='+ NUMTOSTR(FINANCE(18),2)+' 市盈率='+NUMTOSTR(DYNAINFO(39),2)+' 振幅='+ NUMTOSTR((h/l-1)*100,2)+'%'+' 换手率='+NUMTOSTR(100*VOL/CAPITAL,2)+'%'),COLOR00ff00,ALIGN4; DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,' \n \n兔兔专利,侵权必究!!'),ALIGN4,coloryellow;限制:=EMA((((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3-EMA(LLV(((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3,89),2))/(EMA(HHV (((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3,21),2)-EMA(LLV(((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3,89),2)),8)*100; 平衡:=SMA(EMA(SMA((CLOSE+LOW)/2,3,1),3),5,1); DRAWICON(FILTER(平衡>REF(平衡,1)AND HHV(MA((HIGH+CLOSE)/2,13),10)<REF(HHV(MA((HIGH+CLOSE)/2,13),10),1)AND((CLOSE+LOW)/2)>REF((CLOSE+LOW)/2,1),5)AND 限制<88,LOW*0.97,13); DRAWTEXT(FILTER(平衡>REF(平衡,1)AND HHV(MA((HIGH+CLOSE)/2,13),10)<REF(HHV(MA((HIGH+CLOSE)/2,13),10),1)AND((CLOSE+LOW)/2)>REF((CLOSE+LOW)/2,1),5)AND 限制<88,LOW*0.97,' ←兔子追涨'),ALIGN,colorffff33; 一剑封喉:=((CROSS(CLOSE,MA(CLOSE,13)) AND CROSS(CLOSE,MA(CLOSE,34))) AND CROSS(CLOSE,MA(CLOSE,55))); A1:=(((CLOSE - LLV(LOW,22)) / (HHV(HIGH,22) - LLV(LOW,22))) * 100); A2:=(((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100); A:=((3 * SMA(A1,5,1)) - (2 * SMA(SMA(A2,5,1),3,1))); YNGS:=(一剑封喉 AND (A < 30)),LINETHICK0; DRAWICON((一剑封喉 AND (A < 30)),(LOW * 0.99),1); DRAWTEXT((一剑封喉 AND (A < 30)),(LOW * 0.99),' ←兔子封喉'),coloryellow; LC:=REF(CLOSE,1); RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; DRAWTEXT(EMA(EMA(CLOSE,13),50)>EMA(EMA(CLOSE,13),50*3) and CROSS(84,RSI), HIGH*1.02,'←风险'),color00ff33; DRAWTEXT(EMA(EMA(CLOSE,13),50)<EMA(EMA(CLOSE,13),50*3) and CROSS(80,RSI), HIGH*1.02,'←风险'),color00ff33; aaa:=(MA(CLOSE,13)+MA(CLOSE,17))/2; ccc:=(STD(CLOSE,13)+STD(CLOSE,17))/2; bbb:=aaa+2.1*ccc; ddd:=aaa+0.72*ccc; zzz:=IF(ccc>1.88,MA(ddd,3),ddd); DRAWTEXT(CLOSE>=1.09*REF(CLOSE,1),CLOSE,'涨停啦,'),coloryellow; SFF:=HIGH/REF(HIGH,1)<1 AND REF(HIGH,1)/REF(HIGH,2)<1 AND LOW/REF(LOW,1)>1 and REF(LOW,1)/REF(LOW,2)>1 ; DRAWTEXT(SFF,LOW*0.95,'金兔子:提醒你关注')colorred; 专用:MA(CLOSE,10)LINETHICK4, ColorMagenta; PARTLINE(专用<REF(专用,1),专用)LINETHICK4, COLORGREEN;
|
|
|
|
|
|
|
-
UID
-
5473
-
精华
-
0
-
黄金
-
14 两
-
米
-
459 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:23 | 只看该作者
四,通达信主图公式:兔子寻宝, {通达信主图公式:(兔子寻宝)} 兔子:(46.18*EMA(CLOSE,10)-31.82*EMA(CLOSE,4))/14.36,COLORGREEN,LINETHICK1; K1:=BACKSET(兔子>REF(兔子,1),2); IF(K1,兔子,DRAWNULL),COLORLIMAGENTA,LINETHICK1; J:=SUM(VOL*CLOSE,5)/SUM(VOL,5); 寻宝:EMA(J,2),COLORCYAN,LINETHICK1; K2:=BACKSET(寻宝>REF(寻宝,1),2); IF(K2,寻宝,DRAWNULL),COLORRED,LINETHICK1; DRAWICON((CROSS(寻宝,兔子)),兔子,10); DRAWTEXT((CROSS(寻宝,兔子)),兔子,' ←兔兔介入,'),COLOR00FF00; 买线:=EMA(CLOSE,2); 卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42); BU:=CROSS(买线,卖线); SEL:=CROSS(卖线,买线); STICKLINE(CROSS(买线,卖线) OR CROSS(卖线,买线),OPEN,CLOSE,3,0),COLOR00FFFF;
平衡:=SMA(EMA(SMA((CLOSE+LOW)/2,3,1),3),5,1); 限制:=EMA((((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3-EMA(LLV(((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3,89),2))/(EMA(HHV (((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3,21),2)-EMA(LLV(((HIGH+CLOSE)/2+LOW+(CLOSE+LOW)/2)/3,89),2)),8)*100; DRAWICON(FILTER(平衡>REF(平衡,1)AND HHV(MA((HIGH+CLOSE)/2,13),10)<REF(HHV(MA((HIGH+CLOSE)/2,13),10),1)AND((CLOSE+LOW)/2)>REF((CLOSE+LOW)/2,1),5)AND 限制<88,LOW*0.98,5); DRAWTEXT(FILTER(平衡>REF(平衡,1)AND HHV(MA((HIGH+CLOSE)/2,13),10)<REF(HHV(MA((HIGH+CLOSE)/2,13),10),1)AND((CLOSE+LOW)/2)>REF((CLOSE+LOW)/2,1),5)AND 限制<88,LOW*0.95,'←兔子追涨'),,COLORFFFF33; 一剑封喉:=((CROSS(CLOSE,MA(CLOSE,13)) AND CROSS(CLOSE,MA(CLOSE,34))) AND CROSS(CLOSE,MA(CLOSE,55))); A1:=(((CLOSE - LLV(LOW,22)) / (HHV(HIGH,22) - LLV(LOW,22))) * 100); A2:=(((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100); A:=((3 * SMA(A1,5,1)) - (2 * SMA(SMA(A2,5,1),3,1))); YNGS:=(一剑封喉 AND (A < 30)),LINETHICK0; DRAWICON((一剑封喉 AND (A < 30)),(LOW * 0.99),1); DRAWTEXT((一剑封喉 AND (A < 30)),(LOW * 0.99),' ←兔子封喉'),COLORYELLOW; LC:=REF(CLOSE,1); RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; DRAWTEXT(EMA(EMA(CLOSE,13),50)>EMA(EMA(CLOSE,13),50*3) AND CROSS(84,RSI), HIGH*1.02,'←风险'),COLOR00FF33; DRAWTEXT(EMA(EMA(CLOSE,13),50)<EMA(EMA(CLOSE,13),50*3) AND CROSS(80,RSI), HIGH*1.02,'←风险'),COLOR00FF33; AAA:=(MA(CLOSE,13)+MA(CLOSE,17))/2; CCC:=(STD(CLOSE,13)+STD(CLOSE,17))/2; BBB:=AAA+2.1*CCC; DDD:=AAA+0.72*CCC; ZZZ:=IF(CCC>1.88,MA(DDD,3),DDD); DRAWTEXT(CLOSE>=1.09*REF(CLOSE,1),CLOSE,'涨停啦,'),COLORYELLOW; SFF:=HIGH/REF(HIGH,1)<1 AND REF(HIGH,1)/REF(HIGH,2)<1 AND LOW/REF(LOW,1)>1 AND REF(LOW,1)/REF(LOW,2)>1 ; DRAWTEXT(SFF,LOW*0.90,'金兔子:提醒你关注')COLORRED;
附件
|
|
|
|
|
|
|
-
UID
-
3991
-
精华
-
0
-
黄金
-
14 两
-
米
-
594 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:27 | 只看该作者
AHFYXL1 总版主 "大盘资金异动 "指标原码如下: DP1:=INDEXADV/(INDEXADV+INDEXDEC)*INDEXA/100000000; DP2:=WMA(EMA(DP1,3),3); A:=(HHV(DP2,5)-DP2)/(HHV(DP2,5)-LLV(DP2,5))*100-80; 空头:EMA(3*A-2*SMA(A,18,1),5),LINETHICK3,PRECISION2,COLORGREEN; B:=(DP2-LLV(DP2,5))/(HHV(DP2,5)-LLV(DP2,5))*80-80; 多头:3*SMA(B,3,1)-2*SMA(SMA(B,3,1),5,1),LINETHICK3,PRECISION2,COLORMAGENTA; 大盘1:=(INDEXC*2+INDEXH+INDEXL)/4; 大盘K := EMA(大盘1,13) - EMA(大盘1,34); 大盘D := EMA(大盘K,3); 大盘B:=(大盘K-大盘D); 大资金进:if(大盘B>=0,大盘B*8.8,0),LINETHICK,PRECISION2,COLORRED; 大资金撤:if(大盘B<=0,大盘B*2.58,0),LINEDOT,PRECISION2,COLORWHITE; STICKLINE(大盘B<=0 and 大资金撤<=ref(大资金撤,1),0,大资金撤,2,0),COLORCYAN; STICKLINE(大盘B<=0 and 大资金撤>=ref(大资金撤,1),0,大资金撤,2,0),ColorFFA6FF; STICKLINE(大盘B>=0 and 大资金进>=ref(大资金进,1),0,大资金进,2,0),COLORRED; STICKLINE(大盘B>=0 and 大资金进<=ref(大资金进,1),0,大资金进,2,0),COLORYELLOW; PARTLINE(1,大资金进),LINEDOT,COLORYELLOW; PARTLINE(1,0),LINETHICK2,COLORGRAY;
|
|
|
|
|
|
|
-
UID
-
4443
-
精华
-
0
-
黄金
-
14 两
-
米
-
450 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:28 | 只看该作者
五,通达信版本副图本公式:大盘资金异动 {"大盘资金异动 "指标原码如下:}
DP1:=INDEXADV/(INDEXADV+INDEXDEC)*INDEXA/100000000; DP2:=EMA(EMA(DP1,3),3); A:=(HHV(DP2,5)-DP2)/(HHV(DP2,5)-LLV(DP2,5))*100-80; 空头:EMA(3*A-2*SMA(A,18,1),5),LINETHICK3,COLORGREEN; B:=(DP2-LLV(DP2,5))/(HHV(DP2,5)-LLV(DP2,5))*80-80; 多头:3*SMA(B,3,1)-2*SMA(SMA(B,3,1),5,1),LINETHICK3,COLORMAGENTA; 大盘1:=(INDEXC*2+INDEXH+INDEXL)/4; 大盘K := EMA(大盘1,13) - EMA(大盘1,34); 大盘D := EMA(大盘K,3); 大盘B:=(大盘K-大盘D); 大资金进:IF(大盘B>=0,大盘B*8.8,0),LINETHICK1,COLORRED; 大资金撤:IF(大盘B<=0,大盘B*2.58,0),COLORWHITE; STICKLINE(大盘B<=0 AND 大资金撤<=REF(大资金撤,1),0,大资金撤,2,0),COLORCYAN; STICKLINE(大盘B<=0 AND 大资金撤>=REF(大资金撤,1),0,大资金撤,2,0),COLORFFA6FF; STICKLINE(大盘B>=0 AND 大资金进>=REF(大资金进,1),0,大资金进,2,0),COLORRED; STICKLINE(大盘B>=0 AND 大资金进<=REF(大资金进,1),0,大资金进,2,0),COLORYELLOW; IF(1,大资金进,DRAWNULL),COLORYELLOW,LINETHICK2; IF(1,0,DRAWNULL),COLORGRAY,LINETHICK2;
附件
|
|
|
|
|
|
|
-
UID
-
7410
-
精华
-
0
-
黄金
-
14 两
-
米
-
441 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:32 | 只看该作者
坐一坐!有分析家的源码吗?期待中...........
|
|
|
|
|
|
|
|
-
UID
-
5453
-
精华
-
0
-
黄金
-
14 两
-
米
-
421 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:32 | 只看该作者
|
|
|
|
|
|
-
UID
-
3951
-
精华
-
0
-
黄金
-
14 两
-
米
-
457 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:32 | 只看该作者
|
|
|
|
|
|
-
UID
-
6122
-
精华
-
0
-
黄金
-
14 两
-
米
-
447 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:33 | 只看该作者
|
|
|
|
|
|
-
UID
-
4220
-
精华
-
0
-
黄金
-
14 两
-
米
-
462 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:34 | 只看该作者
你老板 (~主管版务工作~) 论坛版主 {以下为《浪里白条》飞狐版:} DRAWGBK(DATE>900101,colorRGB(89,92,220),colorrgb(5,15,115),1); var01:=EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5); var02:=(HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5); var03:=cross(var02,var01); var04:=ref(var02,2)<ref(var02,1) and var02<ref(var02,1); var05:=count(var03,7)>0 and var04; Var06:=REF((LOW+OPEN+CLOSE+HIGH)/4,1); Var07:=SMA(ABS(LOW-Var06),13,1)/SMA(MAX(LOW-Var06,0),10,1); Var08:=EMA(Var07,10); Var09:=ema(c,5); Var10:=LLV(LOW,33); Var11:=EMA(IF(LOW<=Var10,Var09,0),3)*40; var12:=if(var11>100,var11*0.312,var11); 白鲨之鳍:var12,colorwhite; fillrgn(var12>0,0,var12),colorwhite; fillrgn(var02>0,0,var02),color3A7841; 渔湾:var02,colorgreen; 浪花:var01,colorcyan; stickline(var05 and count(var05,5)=1,0,var12,4,0),colorred;
|
|
|
|
|
|
|
-
UID
-
4639
-
精华
-
0
-
黄金
-
14 两
-
米
-
476 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:37 | 只看该作者
六,通达信版本副图本公式:浪里白条 STICKLINE(18,100,0,5,0),COLORBLUE; VAR01:=EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5); VAR02:=(HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5); VAR03:=CROSS(VAR02,VAR01); VAR04:=REF(VAR02,2)<REF(VAR02,1) AND VAR02<REF(VAR02,1); VAR05:=COUNT(VAR03,7)>0 AND VAR04; VAR06:=REF((LOW+OPEN+CLOSE+HIGH)/4,1); VAR07:=SMA(ABS(LOW-VAR06),13,1)/SMA(MAX(LOW-VAR06,0),10,1); VAR08:=EMA(VAR07,10); VAR09:=EMA(C,5); VAR10:=LLV(LOW,33); VAR11:=EMA(IF(LOW<=VAR10,VAR09,0),3)*40; VAR12:=IF(VAR11>100,VAR11*0.312,VAR11); 白鲨之鳍:VAR12,COLORWHITE; STICKLINE(VAR12>0,0,VAR12,3,0),COLORWHITE; STICKLINE(VAR12>0,0,VAR12,2,0),COLOR555555; STICKLINE(VAR12>0,0,VAR12,1,0),COLORWHITE; STICKLINE(VAR02>0,0,VAR02,5,0),COLOR3A7841; 渔湾:VAR02,COLORGREEN; 浪花:VAR01,COLORCYAN; STICKLINE(VAR05 AND COUNT(VAR05,5)=1,0,VAR12,4,0),COLORRED;
附件
|
|
|
|
|
|
|
-
UID
-
5071
-
精华
-
0
-
黄金
-
14 两
-
米
-
467 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:39 | 只看该作者
谢谢浩申大师!!!
|
|
|
|
|
|
|
-
UID
-
6429
-
精华
-
0
-
黄金
-
14 两
-
米
-
498 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:40 | 只看该作者
|
|
|
|
|
|
-
UID
-
3631
-
精华
-
0
-
黄金
-
14 两
-
米
-
417 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:40 | 只看该作者
|
|
|
|
|
|
-
UID
-
6037
-
精华
-
0
-
黄金
-
14 两
-
米
-
456 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:40 | 只看该作者
谢谢提供源码!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
|
|
-
UID
-
7393
-
精华
-
0
-
黄金
-
14 两
-
米
-
447 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:44 | 只看该作者
谢谢老师提供源码啊
|
|
|
|
|
|
|
-
UID
-
4431
-
精华
-
0
-
黄金
-
14 两
-
米
-
463 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:48 | 只看该作者
|
|
|
|
|
|
-
UID
-
5754
-
精华
-
0
-
黄金
-
14 两
-
米
-
473 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:53 | 只看该作者
|
|
|
|
|
|
-
UID
-
4432
-
精华
-
0
-
黄金
-
14 两
-
米
-
463 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 00:57 | 只看该作者
|
|
|
|
|
|
-
UID
-
5473
-
精华
-
0
-
黄金
-
14 两
-
米
-
459 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 01:02 | 只看该作者
|
|
|
|
|
|
-
UID
-
3991
-
精华
-
0
-
黄金
-
14 两
-
米
-
594 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 01:06 | 只看该作者
谢谢提供源码!!!!!!!!!!!!!!!!!!!!!!!!!!!ok 3q 3q
|
|
|
|
|
|
|
g15666这个看看能不能改成通达信的 ********************************** "黑马回头"主副图指标原码(绝版)
[飞狐类] "黑马回头"主副图指标原码
指标编写思路: 1、趋势向上:30日均线保持向上,安全操作; 2、黑马界定:连续三天大幅拉升,阶段涨幅较大(参数ZF1); 3、白马界定:四天内至少有三天拉升,阶段涨幅较大(参数ZF1); 4、黑白买点:以黑马、白马起涨的第一天收盘价为支撑点,设为黑、白买点; 5、买点1、2:当股价在10天内重新回落到黑白买点时,分别设定为买点1、买点2。 6、信号过滤:当买点信号第一次出现后,并有反弹超过黑白买点后,此后买点过滤。 7、奔马界定:5日均线连续5天(参数N)以上向上运行,且短期均线多头排列,确定为奔马; 8、奔马饮水:奔马最后确认的5日内,5日均线回头,且日线收盘位于10日均线与30日均线之间,短线趋势向上不变,设定为奔马饮水;此时股价一般是第一波拉升建仓后的洗盘买点。
指标使用技巧: 1、清楚反弹:该指标为寻找大幅拉升龙头的回调买点,一般只是反弹行情,期望值不可过高; 2、短期优选:买点信号离黑马、白马信号时间越短越好; 3、趋势优选:买点股价依然保持在30日均线支撑附近,优选。 4、盘中把握:买点设定为黑白买点,盘中股价打到黑白买点位置即会出现低买信号,---注意尽量买在黑白买点附近,盘中切记不可追涨! 5、饮水判断:如前期已经有饮水信号出现,说明短期内股价已经明显出现多个拉升波段,此时的回调也许会变成破位走弱,应该适当回避。
名称来源:做股票重在顺势而为,即买在股票波段的起涨点,只做拉升段最好。但是许多朋友对拉升段的判断又难以把握,因此,拉升后的回调、反弹行情,也许可以成为我们的一点补充----
ZF1:=15;ZF2:=3;N:=5; QSXS:=MA(C,30)>=REF(MA(C,30),1); ZF:=(C/REF(C,1)-1)*100; 黑马(C/ref(C,3)-1)*100>=ZF1 and count(ZF>=ZF2,3)=3 AND QSXS)*15,COLORFF00FF,LINETHICK2; HMSJ:=BARSLAST(黑马); 黑:IF(HMSJ<=10 AND QSXS,REF(C,HMSJ+2),0),COLORFF6600,POINTDOT,LINETHICK2; DM1:=LOW<=REF(C,HMSJ+2) AND HMSJ<=10 AND 黑马=0; GL1:=黑>0 AND CROSS(C,黑); 低买DM1>0 AND COUNT(GL1,HMSJ)=0)*黑,COLOR00FF00,LINETHICK2; 白马(H/ref(L,4)-1)*100>=ZF1 and count(ZF>=ZF2,4)>=3 AND H=HHV(H,3) AND QSXS)*10,COLORYELLOW,STICK,LINETHICK5; BMSJ:=BARSLAST(白马); 白:IF(BMSJ<=10 AND QSXS,REF(C,BMSJ+3),0),COLORWHITE,POINTDOT,LINETHICK2; DM2:=LOW<REF(C,BMSJ+3) AND BMSJ<=10 AND 白马=0; GL2:=白>0 AND CROSS(C,白); 低买1:(DM2>0 AND COUNT(GL2,BMSJ)=0)*白,COLORWHITE,LINETHICK2; MA5:=MA(C,5); MA10:=MA(C,10); MA20:=MA(C,20); MA30:=MA(C,30); BM:=COUNT(MA5>REF(MA5,1),N)=N AND MA5>MA10 AND MA10>MA20 AND MA20>MA30; 奔马:BM*5,COLOR0000FF,POINTDOT,LINETHICK2; STICKLINE(奔马>0,0 ,5 ,5 ,1 ),color0000FF; BMSJ2:=BARSLAST(奔马); BMHT:=MA5<REF(MA5,1) AND C<MA5 AND C<MA10 AND C>MA30; 饮水:(BMSJ2<=5 AND BMHT AND QSXS)*3,COLORFF6600,LINETHICK2;
|
|
|
|
|
|
|
- UID
- 3991
- 精华
- 0
- 黄金
- 14 两
- 米
- 594 斗
- 鲜花
- 0 朵
- 阅读权限
- 40
|
92楼
发表于 2007-9-10 03:46 | 只看该作者
十一,通达信版本,黑马回头 ZF1:=15;ZF2:=3;N:=5; QSXS:=MA(C,30)>=REF(MA(C,30),1); ZF:=(C/REF(C,1)-1)*100; 黑马:((C/REF(C,3)-1)*100>=ZF1 AND COUNT(ZF>=ZF2,3)=3 AND QSXS)*15,COLORFF00FF,LINETHICK2; HMSJ:=BARSLAST(黑马); 黑:IF(HMSJ<=10 AND QSXS,REF(C,HMSJ+2),0),COLORFF6600,POINTDOT,LINETHICK2; DM1:=LOW<=REF(C,HMSJ+2) AND HMSJ<=10 AND 黑马=0; GL1:=黑>0 AND CROSS(C,黑); 低买:(DM1>0 AND COUNT(GL1,HMSJ)=0)*黑,COLOR00FF00,LINETHICK2; 白马:((H/REF(L,4)-1)*100>=ZF1 AND COUNT(ZF>=ZF2,4)>=3 AND H=HHV(H,3) AND QSXS)*10,COLORYELLOW,STICK,LINETHICK5; BMSJ:=BARSLAST(白马); 白:IF(BMSJ<=10 AND QSXS,REF(C,BMSJ+3),0),COLORWHITE,POINTDOT,LINETHICK2; DM2:=LOW<REF(C,BMSJ+3) AND BMSJ<=10 AND 白马=0; GL2:=白>0 AND CROSS(C,白); 低买1:(DM2>0 AND COUNT(GL2,BMSJ)=0)*白,COLORWHITE,LINETHICK2; MA5:=MA(C,5); MA10:=MA(C,10); MA20:=MA(C,20); MA30:=MA(C,30); BM:=COUNT(MA5>REF(MA5,1),N)=N AND MA5>MA10 AND MA10>MA20 AND MA20>MA30; 奔马:BM*5,COLOR0000FF,POINTDOT,LINETHICK2; STICKLINE(奔马>0,0 ,5 ,3 ,1 ),COLOR0000FF; BMSJ2:=BARSLAST(奔马); BMHT:=MA5<REF(MA5,1) AND C<MA5 AND C<MA10 AND C>MA30; 饮水:(BMSJ2<=5 AND BMHT AND QSXS)*3,COLORFF6600,LINETHICK2;
附件
- 未命名.gif (35.53 KB)
|
|
-
UID
-
4443
-
精华
-
0
-
黄金
-
14 两
-
米
-
450 斗
-
鲜花
-
0 朵
-
阅读权限
-
40
|
发表于 2007-9-10 01:12 | 只看该作者
|
|