发新话题
打印

[通达信] 估界文交流菜园[大势分析]

本主题被作者加入到个人文集中
MACD的线不要显示,就是到一定的数值,比如到了-10-9显示一个符号就可以了,

TOP

引用:
原帖由 青衫飞扬 于 2008-4-30 00:19 发表
最近经常来理想学习..有疑问,发了贴没人回答,伤心也失望,看见估老大有个自留地特意来求助...以前在理想发过一个猎杀黑豹的指标,感觉单调了,想加点东西,思路如下,1是,比如想把MACD的2个线加进去,从正数跌到了负数,无法 ...
第二个问题无法完成,同花顺偶很菜的,第一个请发个图说明下,要禁表情符号源码才能看清。

TOP

加块瓦片!

瞎组合了个指标,希望大家喜欢.飞狐的.


input:H1(158,1,300),P(20,1,100),N8(4,1,100),P1(5,1,100);
主线:=(加权移动平均(收盘价,P1) * 0.98);
VAR1:=乘幂((收盘价 - 主线),1);
VAR2:=简单移动平均(VAR1,3);
VAR3:=开平方(VAR2);
阻力线:=(主线 + (1.96 * VAR3));
支撑线:=(主线 - (1.96 * VAR3));
画分段线(((主线 > 向前引用(主线,1)) AND (阻力线 <> 支撑线)),主线),LINETHICK3,colorFF;
画图标((主线 > 向前引用(主线,1)),主线,10);
画图标(交叉函数(VAR2,VAR3),(最高价 * 1.035),3);
N1:=系统参数(3);
N:=((N1 - 系统参数(2)) + 1);
HH:=最高值(最高价,N);
LL:=最低值(最低价,N);
最高:HH[N1],colorFF;
最低:LL[N1],colorFF;
(最低 + ((最高 - 最低) * 0.191));
(最低 + ((最高 - 最低) * 0.382));
(最低 + ((最高 - 最低) * 0.5)),colorFF00FF;
(最低 + ((最高 - 最低) * 0.618));
(最低 + ((最高 - 最低) * 0.809));
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用(最低,上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用(最低,上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 1)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 1)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用(最低,上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'000%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'19.1%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'38.2%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'50%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'61.8%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'80.9%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 1)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'100%↑'),colorFFFF;
均价:=(HIGH+4*LOW+OPEN+CLOSE)/7;
均价差:= EMA(均价,13) - EMA(均价,34);
移动均价:= EMA(均价差,5);
差:=(均价差-移动均价)*5;
A:=IF(差>=1000 ,1000 ,IF(差<=均价,均价,差) );
分水岭:=forcast(forcast(A,31),10){,linethick3,COLORYELLOW};
上涨:if(A>分水岭,A,分水岭),LINETHICK3,colorred;
下跌:if(A<分水岭,A,分水岭),LINETHICK3,ColorGREEN;
分水岭一:forcast(forcast(A,31),10),linethick2,Color00FFFF;
amv0:=VOL*(O+C+H+L)/4;
势:EMA(amv0,21)/EMA(VOL,21),colorFF0000;
压:6*HHV(势,2)-5*势,colorRED;
托:2*势-压,colorRED;
买线:=ema(c,2);
卖线:=ema(slope(c,21)*20+c,42);   
bu:=cross(买线,卖线);
sel:=cross(卖线,买线);
drawtext(bu,low,'买'),colorred,linethick3;
drawtext(bu,low,' ̄'),color208fff,linethick3;
drawtext(sel,high,' ̄'),colorffff00,linethick3;
drawtext(sel,high,'卖'),colormagenta,linethick3;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(ff1,(LOW* 0.99),'鼠'),Color4080FF;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑马线:=EMA(A51,5);
A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,(HIGH* 0.97),'黑马'),COLORYELLOW;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背'),ColorA6E500;
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背'),Color1880FF;
VAR2:=LLV(LOW,27);
VAR3:=HHV(HIGH,34);
VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25;
注意买:=IF((Var4<10),80,100);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
超跌:=IF(J<0,10,0);
BDDD:=LLV(J,2)=LLV(J,8);
买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,30,0);
DRAWTEXT(买入 AND 注意买=100 AND 超跌=0,low,'B'),Color8000FF;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(filter(买=1,5),LOW-0.03,'升'),ColorFFDE00;
x1:=(C+L+H)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45'),colorwhite;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
var9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2);
     stickline(var9Q,c,(o+c)/2,7,0),color000055;
     stickline(var9Q,c,(o+c)/2,6,0),color000066;
     stickline(var9Q,c,(o+c)/2,5,0),color000077;
     stickline(var9Q,c,(o+c)/2,4,0),color000099;
     stickline(var9Q,c,(o+c)/2,3,0),color0000bb;
     stickline(var9Q,c,(o+c)/2,2,0),color0000dd;
     stickline(var9Q,c,(o+c)/2,1,0),color0000ff;
varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
     stickline(varaQ,c,(o+c)/2,7,0),colorff11ff;
     stickline(varaQ,c,(o+c)/2,6,0),colorff33ff;
     stickline(varaQ,c,(o+c)/2,5,0),colorff55ff;
     stickline(varaQ,c,(o+c)/2,4,0),colorff77ff;
     stickline(varaQ,c,(o+c)/2,3,0),colorff99ff;
     stickline(varaQ,c,(o+c)/2,2,0),colorffbbff;
     stickline(varaQ,c,(o+c)/2,1,0),colorffddff;
varbQ:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<>hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2);
     stickline(varbQ,c,(o+c)/2,7,0),color333333;
     stickline(varbQ,c,(o+c)/2,6,0),color555555;
     stickline(varbQ,c,(o+c)/2,5,0),color777777;
     stickline(varbQ,c,(o+c)/2,4,0),color999999;
     stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb;
     stickline(varbQ,c,(o+c)/2,2,0),colordddddd;
     stickline(varbQ,c,(o+c)/2,1,0),colorffffff;
varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
stickline(varcQ,o,(o+c)/2,7,0),color003300;
     stickline(varcQ,o,(o+c)/2,6,0),color005500;
     stickline(varcQ,o,(o+c)/2,5,0),color007700;
     stickline(varcQ,o,(o+c)/2,4,0),color009900;
     stickline(varcQ,o,(o+c)/2,3,0),color00bb00;
     stickline(varcQ,o,(o+c)/2,2,0),color00dd00;
     stickline(varcQ,o,(o+c)/2,1,0),color00ff00;
vardQ:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1);
stickline(vardQ,o,(o+c)/2,7,0),colorff1100;
stickline(vardQ,o,(o+c)/2,6,0),colorff3300;
stickline(vardQ,o,(o+c)/2,5,0),colorff5500;
stickline(vardQ,o,(o+c)/2,4,0),colorff7700;
stickline(vardQ,o,(o+c)/2,3,0),colorff9900;
stickline(vardQ,o,(o+c)/2,2,0),colorffbb00;
stickline(vardQ,o,(o+c)/2,1,0),colorffdd00;

TOP

多谢各位,早点休息了,明天有个好心情。

TOP

来晚了来晚了!

附件

1_33.gif (26.47 KB)

2008-4-30 01:25, 下载次数: 4

2_69.gif (41.3 KB)

2008-4-30 01:25, 下载次数: 2


TOP

早晨起来到各位老师的楼内,扫扫地,泡几壶茶...收获也不少

TOP

开门晚了点,给楼上的抢去了.
又多了一个学习的地方....

TOP

要经常到老师的菜园看看有什么好果子可摘!

TOP

各位早上好,今天是四月的最后一个交易日,今天的走势可能对五月的行情起决定作用。

TOP

今天放量就好!今天放量就好!

TOP

先鼓掌支持!!!在放鞭炮庆祝................

TOP

按照这几天的均量算,若能有接近1000亿的成交量,后市可期,密切留意。

TOP

刚看到,来祝贺下.

TOP

晕菜~!就说怎么找不见了·!!原来置顶了~!!哈哈哈~~给猪喂大虾请安了~!!!!

TOP

顺便来学些东西 哈哈

TOP

发新话题

理想论坛上的网友发表的帖子纯属个人意见,理想论坛不负任何责任! 免责声明
共同建设网络精神文明,欢迎广大网友举报论坛上的不良信息,我们会在最短的时间内及时处理

信息产业部信息备案:津ICP备05011481号      天津市通信管理局电子公告专项备案:060006号
茂名市公安局网警备案:4409013011161号 感谢茂名群英网络提供带宽支持
理想论坛值班电话[8:30~17:30]: 022-23707282  022-23707281 022-23707280 15902230709(紧急)