股民大家庭

 找回密码
 立即注册

扫一扫,访问微社区

搜索
查看: 15067|回复: 2
打印 上一主题 下一主题

[大智慧Ⅰ] 买卖背离,副图指标

[复制链接]
1
发表于 2007-10-20 14:30:45 | 只看该作者
看贴是学习,回贴是礼貌. 每天进一步,天天有进步...



上一篇:飞狐版 奔向太阳
下一篇:[大智慧Ⅰ] K凯旋门
2
发表于 2008-09-10 15:00:01 | 只看该作者
看了楼主的帖子,我陷入了严肃的思考中。我认为,如果不把楼主的帖子顶上去,就是对真理的一种背叛,就是对谬论的极大妥协。因此,我决定义无返顾地顶了!
回复 支持 反对

使用道具 举报

3
 楼主| 发表于 2007-10-20 12:19:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
原码:

inpute:
A:=1,100,14;
N1:=1.1000,26;
N:=2,20,9;
Z:=1,20,5;

LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;
蛮准:CROSS(RSI,11)*10,linethick3,COLORRED;
drawtext(蛮准,4,'^'),color66ffcc;
Var1:=(VOL+(CAPITAL-VOL))/CAPITAL;
Var2:=EMA(Var1,30);
Var3:=CLOSE-REF(CLOSE,2);
Var4:=MAX(Var3,0);
Var5:=ABS(Var3);
Var6:=SMA(Var4,7,1)/SMA(Var5,7,1)*100;
Var7:=SMA(Var4,13,1)/SMA(Var5,13,1)*100;
Var8:=BARSCOUNT(CLOSE);
Var1A:=SMA(MAX(Var3,0),6,1)/SMA(ABS(Var3),6,1)*100;
Var1B:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
Var1C:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var1D:=SMA((SMA(Var1C,4,1)-50)*2,3,1);
Var1E:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
Var1F:=SMA(Var1E,4,1)-61;
Var20:=SMA(Var1F,3,1);
Var21:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
ST的爸爸:=Var1A<=25 AND Var1B<-95 AND Var21>20 AND Var1D<-30 AND Var20<30 AND Var2-CLOSE>=-0.25 AND Var6<22 AND Var7
<28 AND Var8>50;
Var9:=(HIGH+LOW+CLOSE)/3;
Var10:=(Var9-MA(Var9,14))/(0.015*AVEDEV(Var9,14));
Var11:=(Var9-MA(Var9,70))/(0.015*AVEDEV(Var9,70));
Var12:=IF(Var10>=150 AND Var10<200 AND Var11>=150 AND Var11<200,10,0);
Var13:=IF(Var10<=-150 AND Var10>-200 AND Var11<=-150 AND Var11>-200,-10,Var12);
Var14:=IF(Var11>=200 AND Var10>=150,15,IF(Var11<=-200 AND Var10<=-150,-15,Var13));
预警: Var14,linethick2,COLORYELLOW;
STICKLINE(ST的爸爸,0,80,-5,0), ,  COLORRED;

A1:=BARSLAST(ref(cross("macd.diff"(8,13,9),"macd.dea"(8,13,9)),1));
B1:=ref(c,A1+1)>c and ref("macd.diff"(8,13,9),A1+1)<"macd.diff"(8,13,9) and cross("macd.diff"(8,13,9),"macd.dea"(8,13,9));
A2:=BARSLAST(ref(cross(".k"(9,3,3),".d"(9,3,3)),1));
B2:=ref(c,A2+1)>c and ref(".k"(9,3,3),A2+1)<".k"(9,3,3) and cross(".k"(9,3,3),".d"(9,3,3));
A3:=BARSLAST(ref(cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=ref(c,A3+1)>c and ref("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) and cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
C1:=BARSLAST(ref(cross("macd.dea"(12,26,9),"macd.diff"(12,26,9)),1));
D1:=ref(c,C1+1)<c and ref("macd.diff"(12,26,9),C1+1)>"macd.diff"(12,26,9) and cross("macd.dea"(12,26,9),"macd.diff"(12,26,9));
C2:=BARSLAST(ref(cross(".d"(9,3,3),".k"(9,3,3)),1));
D2:=ref(c,C2+1)<c and ref(".k"(9,3,3),C2+1)>".k"(9,3,3) and cross(".d"(9,3,3),".k"(9,3,3));
C3:=BARSLAST(ref(cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));
D3:=ref(c,C3+1)<c and ref("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) and cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));
DRAWTEXT(B1,-2,'M'),COLORFF00FF;
DRAWTEXT(B2,-5,'K'),COLORYELLOW;
DRAWTEXT(B3,-8,'R'),COLORRED;

DRAWTEXT(D1,4,'M'),COLORFFCC66;
DRAWTEXT(D2,7,'K'),COLORC0A8FF;
DRAWTEXT(D3,10,'R'),COLORFFCCCC;
Varo2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
Varo3:=SMA(SMA(Varo2,3,1),3,1);
Varo4:=EMA(Varo3,5);
Varo5:=LLV(LOW,26);
Varo6:=HHV(HIGH,34);
Varo7:=EMA((CLOSE-Varo5)/(Varo6-Varo5)*4,4)*25;
建仓区: IF((Varo7<10),15,20), ,linethick2 ,color00ccff;
派发区: IF((Varo7>90),-15,-20), , linethick2 ,color6699ff;

P:=(HIGH + LOW + CLOSE)/3;
cci:(P-MA(P,A))*5/(1.5*avedev(P,A)),colorf0f000;

Vaz4:=(CLOSE-LLV(CLOSE,126))/(HHV(CLOSE,126)-LLV(CLOSE,126))*100;
Vaz24:=Vaz4=0;
STICKLINE(Vaz24>0,-21,-23,1,2), ,colorred,linethick3 ;
Vaz25:=Vaz4=100;
STICKLINE(Vaz25>0,21,23,1,2), ,color00ff00,linethick3;

Var1400:=H>L*1.053 AND COUNT(H>L*1.053,5)>2 AND (C/MA(C,30)*100<75 OR C/MA(C,50)*100<78);
Var1500:=DMA(EMA(C,5),SUM(V,8)/2.8/CAPITAL);
赢:REF((C-Var1500)/Var1500*100,1)<-34 AND (C-Var1500)/Var1500*100>REF((C-Var1500)/Var1500*100,1) AND REF((C-Var1500)/Var1500*100,1)<REF((C-Var1500)/Var1500*100,2) AND (C-Var1500)/Var1500*100-REF((C-Var1500)/Var1500*100,1)>1.76 OR Var1400;
drawtext(赢,-15,'↑'),color00ccff;
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

今日股市|网站地图|股民学校|手机版|小黑屋|股民大家庭 |网站地图24小时在线客服

GMT+8, 2025-1-29 04:20 , Processed in 7.605091 second(s), 28 queries , Gzip On.

Powered by 股民大家庭

© 2007-2019 www.gupiao168.com


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