|
论坛版主
   
指标公式版主 - 帖子
- 3110
- 积分
- 15990
- 注册时间
- 2007-4-11
|
65楼
大 中
小 发表于 2008-3-8 09:48 只看该作者
引用:原码下载! (3线开合, 顺势而为, 箱体,群龙有首, 宝塔线)
{3线开合 n=15}
C0:=(h+l+c)/3;
a1:=HHV(C0,n);a2:=LLV(C0,n);a3:=a1-a2;
a4:=ema((C0-a2)/a3,2)*100;
b1:=HHV(C0,4*n);b2:=LLV(C0,4*n);b3:=b1-b2;
b4:=ema((C0-b2)/b3,2)*100;
C1:=HHV(C0,16*n);C2:=LLV(C0,16*n);C3:=C1-C2;
C4:=ema((C0-C2)/C3,2)*100;
短期相对价位:a4,color66dddd,linethick2;
中期相对价位:b4,color6699ff,linethick2;
长期相对价位:C4,color6600ff,linethick2;
90,pointdot;
50,pointdot;
20,pointdot; 引用:{顺势而为}
均价:=(HIGH+4*LOW+OPEN+CLOSE)/7;
均价差:= EMA(均价,13) - EMA(均价,34);
移动均价:= EMA(均价差,5);
差:=(均价差-移动均价)*5;
A:=IF(差>=1000 ,1000 ,IF(差<=均价,均价,差) );
分水岭:forcast(forcast(A,31),10);
上涨:if(A>分水岭,A,分水岭),colorred;
下跌:if(A<分水岭,A,分水岭),colorgreen;
STICKLINE(分水岭<上涨,上涨,分水岭,0.8,1)colorred,,linethick2 引用:{箱体}
生命线:MA(CLOSE,13);
牛熊线:(EMA(CLOSE,5)*7+EMA(CLOSE,5)*3)/10,;
箱顶:MA(REF(HHV(CLOSE,30),1),2);
箱底:MA(REF(LLV(CLOSE,30),1),2);
持股:STICKLINE(生命线<OPEN and CLOSE>OPEN,OPEN,CLOSE,8,1)colorred;
STICKLINE(生命线<OPEN and CLOSE>OPEN,HIGH,LOW,1,1)colorred;
STICKLINE(生命线<CLOSE and OPEN>CLOSE,OPEN,CLOSE,8,1)colorred;
STICKLINE(生命线<CLOSE and OPEN>CLOSE,HIGH,LOW,0.8,1)colorred;
持币:STICKLINE(生命线>HIGH,OPEN,CLOSE,8,1)colorgreen;
STICKLINE(生命线>HIGH,HIGH,LOW,0.8,1)colorgreen;
警戒:STICKLINE(生命线<HIGH and CLOSE<生命线,OPEN,CLOSE,8,0)colorcyan;
STICKLINE(生命线<HIGH and CLOSE<生命线,HIGH,LOW,0.8,0)colorcyan;
STICKLINE(生命线>OPEN and CLOSE>生命线,OPEN,CLOSE,8,0)coloryellow;
关注:STICKLINE(生命线>OPEN and CLOSE>生命线,HIGH,LOW,0.8,0)coloryellow;
STICKLINE(生命线<OPEN,生命线,HIGH,0.8,1)colorred; 引用:{群龙有首}
a1:=EMA((EMA(CLOSE,1)+EMA(CLOSE,3)+EMA(CLOSE,5))/3,3),colorFF2010;
a2:=EMA((EMA(CLOSE,3)+EMA(CLOSE,5)+EMA( CLOSE,7))/3,3),colorFF2010;
a3:EMA((EMA(CLOSE,5)+EMA(CLOSE,7)+EMA( CLOSE,9))/3,3)color1000FF;
a4:EMA((EMA(CLOSE,7)+EMA(CLOSE,9)+EMA( CLOSE,11))/3,3)color1000FF;
a5:EMA((EMA(CLOSE,9)+EMA(CLOSE,11)+EMA( CLOSE,13))/3,3)color1010FF;
a6:EMA((EMA(CLOSE,11)+EMA(CLOSE,13)+EMA( CLOSE,15))/3,3),color1080FF;
a7:EMA((EMA(CLOSE,13)+EMA(CLOSE,15)+EMA( CLOSE,17))/3,3),color1090FF;
a8:EMA((EMA(CLOSE,15)+EMA(CLOSE,17)+EMA( CLOSE,19))/3,3)color10A0FF;
a9:=EMA((EMA(CLOSE,17)+EMA(CLOSE,19)+EMA( CLOSE,21))/3,3)color10B0FF;
a10:EMA((EMA(CLOSE,19)+EMA(CLOSE,21)+EMA( CLOSE,23))/3,3)color10C0FF;
a11:=EMA((EMA(CLOSE,21)+EMA(CLOSE,23)+EMA( CLOSE,25))/3,3)color10D0FF;
A:=EMA((EMA(CLOSE,29)+EMA(CLOSE,31)+EMA(CLOSE,33))/3,3),LINETHICK0;
{hz2004716}
a15:=a-(a1-a*0.997),colorFF1010;
a16:=a-(a2-a),colorff2010;
a17:=a-(a3-a),colorff3010;
a18:a-(a4-a),colorff4010;
a19:a-(a5-a),colorff5010;
a20:a-(a6-a),colorff6010;
a21:a-(a7-a),colorff7010;
a22:a-(a8-a),colorff8010;
a23:a-(a9-a)+0.01,colorFFc010,LINETHICK4;
a24:=a-(a10-a),colorffc010;
a25:=a-(a11-a*0.997),colorff8010;{LINEDOT;}
STICKLINE(A3>A,A11,A25,13,0),color1088EE;
STICKLINE(A2<A,A5,A22,13,0),color008800;
群龙有首:A10,LINETHICK3,COLORYELLOW; 引用:宝塔线
B1:=REF(C,1);B2:=REF(C,2);
SS:=IF(C>REF(C,1) AND REF(C,1)>=REF(C,2),1,IF(C<REF(C,1) AND REF(C,1)<=REF(C,2),-1,IF(C>REF(C,2) AND REF(C,2)>REF(C,1),2,IF(C<REF(C,2) AND REF(C,2)<REF(C,1),-2,0))));
SM:=IF(REF(SS,1)<>0,REF(SS,1),IF(REF(SS,2)<>0,REF(SS,2),IF(REF(SS,3)<>0,REF(SS,3),IF(REF(SS,5)<>0,REF(SS,5),IF(REF(SS,6)<>0,REF(SS,6),IF(REF(SS,7)<>0,REF(SS,7),0))))));
STICKLINE(SS=1 OR SM>=1 AND SS=0,B1,C,4,1),COLORRED;
STICKLINE(SS=-1 OR SM<=-1 AND SS=0,B1,C,4,0),colorFF9000;
STICKLINE(SS=2,B2,C,4,1),COLORRED;
STICKLINE(SS=-2,B2,C,4,0),colorFF9000;
STICKLINE((SS=-1 OR SS=-2) AND SM>0,B2,B1,4,1),COLORRED;
STICKLINE((SS=1 OR SS=2) AND SM<0,B2,B1,4,0),colorFF9000;
ZJ:=(C+H+L)/3;
Var1:=MA(ZJ,30);
Var2:=MA(ZJ,13)-MA(ZJ,34);
Var3:=MA(Var2,5);
Var4:=(Var2-Var3)*5;
Var5:=MA(IF(Var4>=1000,1000,IF(Var4<=ZJ,ZJ,Var4) ),1);
Var6:=MA(IF(Var4>=1000,1000,IF(Var4<=ZJ,ZJ,Var4) ),3);
神秘线中线趋势:Var1+2.2*STD(ZJ,30),COLORRED;
KS:=(C-MA(C,13))/MA(C,13)*(-100);
RKS:=REF(KS,1);
MLS:=RKS/KS>=1.23 AND RKS>=8 AND C/REF(C,1)>=1.02;
feng:EMA(C,10),colorwhite;
yun:EMA(KS/10+EMA(C,10),3),coloryellow;
魔斗士:(EMA(C,5)*7+EMA(C,5)*3)/10,colorblue;
DRAWTEXT(cross(feng,yun),yun,'买'),coloryellow,LINETHICK4;
Var3:=(C-b1)/b1*100;
筹码:=MA((C-REF(O,34))/REF(O,34),1)*100;
筹码差:=MA(筹码,10);
Var5:=V/CAPITAL*100;
上轨道:=SUM(Var5,30);
下轨道:=REVERSE(SUM(Var5,30));
跌筹比:=筹码/下轨道;
DRAWTEXT(COUNT(跌筹比>95/100 AND 筹码<-25 AND Var3>5.5,12) AND C<0.95*b1,yun,'震'),colorred;
DRAWTEXT(COUNT(跌筹比>95/100 AND 筹码<-25 AND Var3>5.5,12) AND C<0.98*b1 AND C>0.96*b1,yun,'打'),colorgreen;
DRAWTEXT(COUNT(跌筹比>95/100 AND 筹码<-25 AND Var3>5.5,12) AND C<0.96*b1 AND C>0.94*b1,yun,'压'),colorgre
附件: 您所在的用户组无法下载或查看附件
骤雨过,琼珠乱撒,打遍新荷。
人生百年有几,念良辰美景,休放虚过。
穷通前定,何用苦张罗。
命友邀宾玩赏,对芳尊浅酌低歌。
且酩酊,任他两轮日月,来往如梭。
|