金牛财露 2008-10-29 20:03
众多精准指标在此天天发布--今日发布真假顶底
[color=red][attach]38671[/attach][attach]34685[/attach][/color]
[color=red]飞狐金牛指标之一超买超卖:[/color]
DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1)
DRAWTEXTEX(CLOSE,1,800,100,'☆金牛自制/版权所有☆'),colorFFFF;
A1:=REF(C,1);
A2:=SMA(MAX(C-A1,0),5,1)/SMA(ABS(C-A1),5,1)*1000;
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
A4:=A2-LLV(A2,10);
A5:=(MA(A4,2)*3+A4*13)/16;
A6:=IF(A5>13,MA(A5,2),A5)/6;
RSI1:=SMA(MAX(C-A1,0),6,1)/SMA(ABS(C-A1),6,1)*100;
RSI2:=SMA(MAX(C-A1,0),12,1)/SMA(ABS(C-A1),12,1)*100;
RSI3:=SMA(MAX(C-A1,0),24,1)/SMA(ABS(C-A1),24,1)*100;
压力:=HHV(MA(RSI2,3),12);
支撑:=LLV(MA(RSI2,3),12);
中间:(HHV(MA(RSI2,3),12)+LLV(MA(RSI2,3),12))/2,COLORRED,LINETHICK2;
STICKLINE(RSI2<支撑,中间,RSI2,1,0)colorff00;
STICKLINE(RSI2<支撑,中间,RSI2,8,0)color113300;
STICKLINE(RSI2<支撑,中间,RSI2,7,0)color224400;
STICKLINE(RSI2<支撑,中间,RSI2,6,0)color335500;
STICKLINE(RSI2<支撑,中间,RSI2,5,0)color447700;
STICKLINE(RSI2<支撑,中间,RSI2,4,0)color559900;
STICKLINE(RSI2<支撑,中间,RSI2,3,0)color66aa00;
STICKLINE(RSI2<支撑,中间,RSI2,2,0)color77dd00;
STICKLINE(RSI2<支撑,中间,RSI2,1,0)color88FF00;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,1,0)colorff00;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,8,0)color113300;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,7,0)color224400;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,6,0)color335500;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,5,0)color447700;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,4,0)color559900;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,3,0)color66aa00;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,2,0)color77dd00;
STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,1,0)color88FF00;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,2,0)colorred;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,9,0)color1133;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,8,0)color2244;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,7,0)color3355;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,6,0)color4477;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,5,0)color5599;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,4,0)color66aa;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,3,0)color77dd;
STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,2,0)color88ff;
STICKLINE(RSI2>=压力,中间,RSI2,2,0)colorred;
STICKLINE(RSI2>=压力,中间,RSI2,8,0)color1133;
STICKLINE(RSI2>=压力,中间,RSI2,7,0)color2244;
STICKLINE(RSI2>=压力,中间,RSI2,6,0)color3355;
STICKLINE(RSI2>=压力,中间,RSI2,5,0)color4477;
STICKLINE(RSI2>=压力,中间,RSI2,4,0)color5599;
STICKLINE(RSI2>=压力,中间,RSI2,3,0)color66aa;
STICKLINE(RSI2>=压力,中间,RSI2,2,0)color77dd;
STICKLINE(RSI2>=压力,中间,RSI2,1,0)color88ff;
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));
DRAWTEXT(B3,RSI2,'底背');
B1:=RSI1>=RSI2 AND RSI2>=RSI3;
S1:=RSI1<RSI2 AND RSI2<RSI3;
BS1:=NOT(RSI1>=RSI2 AND RSI2>=RSI3)AND NOT(RSI1<RSI2 AND RSI2<RSI3);
STICKLINE(B1,80,82,2,1)COLORRED;
STICKLINE(S1,80,82,2,1)COLORGREEN;
STICKLINE(BS1,80,82,2,1)COLORYELLOW;
短线:IF(CROSS(A6,1) AND (A6<30)AND RSI2<35 AND RSI2>=支撑 AND RSI2<中间,30,20),COLORMAGENTA,LINETHICK2;
AA:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)))*100;
主动买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*(HIGH-OPEN+CLOSE-LOW),VOL/2));
主动卖盘:=IF(CLOSE>OPEN,-AA*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,-AA*(HIGH-LOW),-VOL/2));
买卖比:=主动买盘/主动卖盘;
卖盘:=VOL-主动买盘;
卖盘大:=(卖盘-主动买盘)/卖盘>0.6;
买盘大:=(主动买盘-卖盘)/主动买盘>0.6;
WJ:=(HIGH+LOW+CLOSE)/3;
VD1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
VD2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-WJ);
VD3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
VD4:=IF(HIGH=LOW,1,WJ-MIN(CLOSE,OPEN));
VD5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));
VD6:=VD1*VD5;
VD7:=VD2*VD5;
VD8:=VD3*VD5;
VD9:=VD4*VD5;
买入量:=VD9+VD8;
卖出量:=VD6+VD7;
卖量:=VOL-买入量;
卖量大:=(卖量-买入量)/卖量>0.4;
买量大:=(买入量-卖量)/买入量>0.4;
买入资金:=买入量*CLOSE/100;
卖出资金:=卖出量*CLOSE/100;
资金进出:=买入资金-卖出资金;
买卖资金比:=买入资金/卖出资金;
DRAWTEXTEX(CLOSE,1,1,100,'当日买量:'+NUMTOSTR(买入量[SYSPARAM(1)],2)+'\n'+'当日卖量:'+NUMTOSTR(卖出量[SYSPARAM(1)],2)+'\n'+'当日买卖量:'+NUMTOSTR(VOL,2)+'\n'+'资金进出万元:'+NUMTOSTR(资金进出[SYSPARAM(1)],2)+'\n'+'买入资金累计万元:'+NUMTOSTR(买入资金[SYSPARAM(1)],2)+'\n'+'卖出资金累计万元:'+NUMTOSTR(卖出资金[SYSPARAM(1)],2)),ALIGN4,COLORYELLOW;
AA:=SUM(IF(CLOSE>REF(CLOSE,1) AND VOL>REF(VOL,1),VOL,0),2);
BB:=SUM(IF(CLOSE<REF(CLOSE,1) AND VOL<REF(VOL,1),VOL,0),2);
DD:=AA-BB;
X0:=IF(DD>0 AND (CLOSE/REF(CLOSE,1)-1)*100>0,AMOUNT/10000,0);
X1:=IF(DD<0 AND (CLOSE/REF(CLOSE,1)-1)*100<0,AMOUNT/10000,0);
DDX:(X0-X1)/FINANCE(7)*CLOSE/100,LINETHICK0;
DDX1:EMA(DDX,0)*15.367;
DDX2:MA(DDX1,0);
DDX3:MA(DDX1,0);
天:=COUNT(X0-X1>0,5);
DRAWTEXTEX(CLOSE,1,380,30,'一周内翻红:'+NUMTOSTR(天,0)+' 天'),colorFFDD00;
DRAWTEXTEX(DD>=0,1,200,30,'大单动向:'+'↑'),colorFFDD00;
DRAWTEXTEX(DD<0,1,200,30,'大单动向:'+'↓'),colorFFDD00;
VARIABLE:WDAY[7]='星期六';
WDAY[1]:='星期日';
WDAY[2]:='星期一';
WDAY[3]:='星期二';
WDAY[4]:='星期三';
WDAY[5]:='星期四';
WDAY[6]:='星期五';
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
P:=SYSPARAM(1);
STR1:=''+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1];
DRAWTEXTEX(CLOSE>0,1,650,30,STR1),colorFFDD00;
DRAWTEXTEX(CLOSE,1,10,30,STKLABEL+' '+STKNAME+''),colorFFBF00;
[attach]33752[/attach]
[color=red]大智慧指标金牛系列之二--金牛财露尖尖角主图:[/color]
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;
A001:=CLOSE-REF(CLOSE,6);
A002:=MA(A001,6);
A003:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*100;
A004:=SMA(A003,3,1);
A005:=SMA(A004,3,1);
A006:=EMA((3*A004-2*A005),2);
A007:=(HIGH+LOW+CLOSE)/3;
A008:=((A007-MA(A007,14))/(0.015*AVEDEV(A007,14)))/2;
A009:=(A008+(EMA(((0-(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))))+100)/100,3)*200-100))/2;
A010:=A009-REF(A009,14);
A011:=A009-REF(A009,26);
A012:=(A009+A010+A011)/3;
KKM:=EMA(A012,4);
A013:=HHV(HIGH,34);
A014:=(2*CLOSE+HIGH+LOW)/4;
A015:=LLV(LOW,34);
A016:=EMA(((A014-A015)/(A013-A015))*100,13);
A017:=EMA(0.667*REF(A016,1)+0.333*A016,2);
KKMD:=A016-A017>1 AND A016<30 AND A017<30;
KKML:=A016-A017<0 AND A016>80 AND A017>80 AND REF(A016-A017,1)>0;
KKMQ:=COUNT(A016-A017>0,2)=2;
KKAL:=(A016-A017)<0;
生命线红灯买点:MA(CLOSE,0),LINETHICK2,COLOR0000FF;
取舍线绿灯卖点:MA(CLOSE,0),ColorWhite;
DRAWTEXT(FILTER(KKMD,30),L,'露'),COLOR00FFFF;
DRAWTEXT(FILTER(KKML,30),H,'角'),COLORFFFF00;
DRAWTEXT(FILTER(KKMQ,30),C,'角'),COLOR00FF00;
DRAWTEXT(FILTER(KKAL,30),H,'●尖'),COLORFF8080;
DRAWTEXT(FILTER(CLOSE/REF(CLOSE,1)>INDEXC/REF(INDEXC,1),30),L*0.95,'♂金'),COLORFF00FF;
DRAWTEXT(CROSS(MA(CLOSE,5),MA(CLOSE,10)),L*0.92,'♂牛'),COLOR0000FF;
DRAWTEXT(CROSS(MA(CLOSE,10),MA(CLOSE,5)),H*1.08,'←跑'),ColorWhite;
DRAWTEXT(FILTER(KKM>EMA(KKM,4) AND KKM>REF(KKM,1),30),L*0.98,'●财');
DRAWTEXT(FILTER(KKM<EMA(KKM,4) AND KKM<REF(KKM,1),30),H*1.02,'●角');
DRAWTEXT(FILTER(KKM>EMA(KKM,4) AND KKM<REF(KKM,1),30),H,'Ψ角'),COLORAA8800;
DRAWTEXT(FILTER(KKM<EMA(KKM,4) AND KKM>REF(KKM,1),30),L,'●牛')
,COLORAA00AA;
Var41:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
Var42:=REF(Var41,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var43:=REF(Var42,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var44:=REF(Var43,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var45:=REF(Var44,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var46:=REF(Var45,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var47:=REF(Var46,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var48:=REF(Var47,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var49:=REF(Var48,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VarA:=REF(Var49,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VarB:=REF(VarA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VarC:=REF(VarB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VarD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VarE:=REF(VarD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VarF:=REF(VarE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var50:=REF(VarF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var51:=REF(Var50,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var52:=REF(Var51,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var53:=REF(Var52,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var54:=REF(Var53,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var55:=REF(Var54,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var56:=REF(Var55,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var57:=REF(Var56,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var58:=REF(Var57,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var59:=REF(VarD OR VarE OR VarF OR Var50 OR Var51 OR Var52 OR Var53 OR Var54 OR Var55 OR Var56 OR Var57 OR Var58,1) AND Var41;
STICKLINE(Var59,REF(CLOSE,1),REF(CLOSE,2),14,1),colorred;
Var41A:=REF(Var41 OR Var42 OR Var43 OR Var44 OR Var45 OR Var46 OR Var47 OR Var48 OR Var49 OR VarA OR VarB OR VarC,1) AND VarD;
STICKLINE(Var41A,REF(CLOSE,1),REF(CLOSE,2),14,1),colorgreen;
TY:=C;
{公式注释:金、牛、财、露都是买点;尖、尖、角都是卖点}
{FILLRGN(AA10,AA12,(((AA12 <= AA10) AND (BB12 >= 1)) AND (BB10 >= 1))),Color0098FF;
FILLRGN(AA10,AA12,(((AA12 >= AA10) AND (BB10 <= 1)) AND (BB10 <= 1))),color00FF00; }
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;
Var11:=(2*CLOSE+HIGH+LOW)/4;
qq1:=AMOUNT/V;
BB1:=L<qq1*0.9;
ii1:=(C-REF(C,1))/REF(C,1)*100>1.2;
uu1:=L<MA(C,5)*0.921;
pp1:=V<MA(V,5)*1.5;
FF1:=BB1 AND ii1 AND uu1 AND pp1;
DRAWTEXT(ff1,(LOW* 0.99),'鼠'),Color4080FF;
y51:=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(y51,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,'进'),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;
VAR81:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR82:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR83:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR82,MA(VAR3,6)),(LOW * 0.998),8);
DRAWICON(CROSS(MA(VAR83,6),VAR81),(HIGH * 1.013),9);
DRAWTEXT(CROSS(VAR82,MA(VAR83,6)),(LOW * 0.984),'¥买 '),color4440FF;
DRAWTEXT(CROSS(MA(VAR83,6),VAR81),(HIGH * 1.035),' ○卖'),colorFFFF34;
建仓区域:=((3 * SMA((((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100),5,1)) - (2 * SMA(SMA((((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100),5,1),3,1)));
DRAWTEXT(建仓区域<5,LOW-0.03,'='),ColorWhite;
DRAWTEXT(建仓区域<5,LOW-0.03,'='),COLORWHITE;
机构建仓区:建仓区域<5,ColorWhite;
e1:=BARSCOUNT(c);
ah:=hhv(h,200);
al:=llv(l,200);
b0:=(ah-al)/40;
kb1:=h+b0;
kb2:=l-b0;
stickline((e1+0)/34=FLOOR((e1+0)/34),kb2,kb2-3*b0,2,0),COLOryellow,LINETHICK3;
drawtext((e1+0)/34=FLOOR((e1+0)/34),kb2-2*b0,'底'),COLORwhite;
Kk1:=ref(RSV,1);Kk2:=ref(RSV,2);ka:=rsv;Kk3:=ref(RSV,3);Kk4:=ref(RSV,4);kk5:=ref(rsv,5);
kk80:=3*80-(pow(2/3,1)*kk1+pow(2/3,2)*kk2+pow(2/3,3)*kk3+pow(2/3,4)*kk4+3*pow(2/3,5)*kk5);
kkk80:=sma((kk80*(HHV(H,9)-LLV(L,9))/100)+LLV(L,9),3,1);
交叉:=3*sma(sma(ka,3,1),3,1)-(pow(2/3,1)*kk1+pow(2/3,2)*kk2+pow(2/3,3)*kk3+pow(2/3,4)*kk4+3*pow(2/3,5)*kk5);
k转折:=3*sma(ka,3,1)-(pow(2/3,1)*kk1+pow(2/3,2)*kk2+pow(2/3,3)*kk3+pow(2/3,4)*kk4+3*pow(2/3,5)*kk5);
k转折价0:=sma((k转折*(HHV(H,9)-LLV(L,9))/100)+LLV(L,9),3,1);
日交叉0:=sma((交叉*(HHV(H,9)-LLV(L,9))/100)+LLV(L,9),3,1);
DRAWTEXT(k转折价0>=kkk80 and k转折价0>=日交叉0,日交叉0,'&'),COLORff00ff;
趋势:= 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),
COLORYELLOW,linethick2;
警戒:=趋势<=5 ;
d1:=c/l>1.05 and count(警戒,3)>=1 and c/ref(c,1)>1.01;
箱顶:HHV(MA((LOW+HIGH+CLOSE+O)/4,5),58),color00aaff;
箱底:LLV(MA((LOW+HIGH+CLOSE+O)/4,6),88),colorGREEN;
Var92:=EMA((HIGH+LOW+CLOSE)/3*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10))*20/10+箱底,2);
Var93:=(3*Var92-2*SMA(Var92,5,1))*0.3;
Var94:=(HHV(INDEXH,13)-INDEXC)/(HHV(INDEXH,13)-LLV(INDEXL,13));
Var5:=EMA(3*Var4-2*SMA(Var4,18,1),5);
Var6:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8));
Var7:=3*SMA(Var6,3,1)-2*SMA(SMA(Var6,3,1),5,1);
Var8:=(INDEXC*2+INDEXH+INDEXL)/4;
Var9:=EMA(Var8,13)-EMA(Var8,34);
Varu:=EMA(Var9,5);
资金流向:=(Var9-VarA+箱底)*1,coloryellow;
VarG1:=1.86*EMA(CLOSE,5)-EMA(CLOSE,13);
持币:VarG1,ColorWhite;
as:=箱底;
牛气冲天:STICKLINE( 持币>=as,as ,持币 ,4 ,0 ) ,colorred ;
sTICKLINE( 持币<= REF(持币,1)
AND 持币>as,as ,持币 ,4 ,1 ) ,colorwhite;
趁机派发:STICKLINE( REF(持币,2)<REF(持币,1) and 持币<= REF(持币,1)
AND 持币>as,as ,持币 ,4 ,0 ) ,colorgreen ;
熊气盖天:STICKLINE(持币<as-0.5,as-0.5 ,持币 ,8 ,1 ) , ;
MA1:MA(C,0),coloraaee00;
MA0:MA(C,0),colorwhite;
DRAWTEXT( CROSS(MA0 , 箱底),l , '试'),colorred;
DRAWTEXT( CROSS(MA0 , MA0),l , '买'),coloryellow;
DRAWTEXT( CROSS(MA0 , 箱顶) AND c>箱顶,箱顶 , '追'),color00EEAA;
DRAWTEXT( CROSS(箱顶,MA0)and c<箱顶 ,h , '卖') ,colorFFAA99;
DRAWTEXT( ref(资金流向 ,2)<ref(资金流向 ,1) and ref(资金流向 ,1)>资金流向
and 资金流向>箱顶 and c>箱顶,h*1.0051, '顶'),colorwhite;DRAWTEXT( CROSS(持币 , 箱底),箱底, '加仓'),colorred;[attach]33910[/attach]
[color=red][/color]
[color=red]金牛系列之三---金牛主力探针(通用)[/color]
Var2:=REF(LOW,1);
Var3:=SMA(ABS(LOW-Var2),13,1)/SMA(MAX(LOW-Var2,0),13,1)*100;
Var4:=EMA(IF(CLOSE*1.2,Var3*13,Var3/13),13);
Var5:=LLV(LOW,34);
Var6:=HHV(Var4,34);
Var7:=IF(LLV(LOW,56),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,5);
Var10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10);
STICKLINE(Var9>REF(Var9,1),0,Var9*0.25,4,0),COLORRED;
拉升出货:IF(Var9>REF(Var9,1),Var9*0.25,0),COLORRED,STICK;
STICKLINE(Var9<REF(Var9,1),0,Var9*0.25,4,0),COLORGREEN;
对倒打压:IF(Var9<REF(Var9,1),Var9*0.25,0),COLORGREEN,STICK;
STICKLINE(Var8>REF(Var8,1),0,Var8,4,0),COLORMAGENTA;
主力进场:IF(Var8>REF(Var8,1),Var8,0),COLORMAGENTA,STICK;
STICKLINE(Var8<REF(Var8,1),0,Var8*1.5,4,0),colorFFF810;
洗盘清理跟风户:IF(Var8<REF(Var8,1),Var8*1.5,0),colorFFF810,STICK;
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
STICKLINE(XL3,0,Var8*3,4,1),COLORMAGENTA;
↑金牛买点↑:XL3,COLORMAGENTA,STICK;
DRAWTEXT(XL3,Var8*3.5,'买'),COLORMAGENTA;
DRAWICON(XL3,15,4),COLORRED;
{以下内容回复可见}
[attach]33924[/attach]
[color=red]金牛系列之四--买卖趋势:[/color]
DRAWGBK(C=C,COLORRGB(128,128,128),COLORRGB(30,30,30),1);
VAR1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR2:=SMA(VAR1,9,1);
VAR3:=SMA(VAR2,3,1);
回避为好: 100-(100-3*VAR2+2*VAR3),COLORYELLOW;
见青色就走:IF(回避为好>REF(回避为好,1),回避为好,回避为好-5),COLORCYAN,LINETHICK2;
PARTLINE(回避为好=见青色就走,回避为好),COLORRED,LINETHICK4;{注:只做红线,红线出现在20.00以下为放心买点,在60.00以上出现的红线不适合买进}[attach]34013[/attach]
[color=red]金牛系列之五:变盘:[/color]
Var1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
Var2:=REF(Var1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var3:=REF(Var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var4:=REF(Var3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var5:=REF(Var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var6:=REF(Var5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var7:=REF(Var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var8:=REF(Var7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var9:=REF(Var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VarA:=REF(Var9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VarB:=REF(VarA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VarC:=REF(VarB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
涨:STICKLINE(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,CLOSE,REF(CLOSE,1),7,1),COLORRED;
VarD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VarE:=REF(VarD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VarF:=REF(VarE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var10:=REF(VarF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var11:=REF(Var10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var12:=REF(Var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var13:=REF(Var12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var14:=REF(Var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var15:=REF(Var14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var16:=REF(Var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
Var17:=REF(Var16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Var18:=REF(Var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
跌:STICKLINE(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,CLOSE,REF(CLOSE,1),7,1),COLORGREEN;
Var19:=REF(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,1) AND Var1;
底:STICKLINE(Var19,REF(CLOSE,1),REF(CLOSE,2),7,0),COLORMAGENTA;
Var1A:=REF(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,1) AND VarD;
顶:STICKLINE(Var1A,REF(CLOSE,1),REF(CLOSE,2),7,0),COLORYELLOW;
a:=BARSCOUNT(c);
ah:=hhv(h,72);
al:=llv(l,72);
a0:=(ah-al)/21;
b1:=l-a0;
stickline((a+0)/10=FLOOR((a+0)/10),b1,b1-3*a0,1,0);
drawtext((a+0)/10=FLOOR((a+0)/10),b1-3*a0,'变盘'),COLORWHITE;
MA6:MA(CLOSE,0),COLORWHITE{,LINETHICK2};
MA18:MA(CLOSE,0),COLORBLUE{,LINETHICK2};
a:=(3*c+l+o+h)/6;
X:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+
14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+
ref(a,20))/210;
庄成本:eMA(X,0),COLORRED,LINETHICK2;
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);
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);
DRAWTEXT(filter(买=1,5),LOW-0.03,'买'),COLORRED;
STICKLINE(filter(买=1,5),HIGH,LOW,0,1),COLORRED{,LINETHICK2};
STICKLINE(filter(买=1,5),OPEN,CLOSE,4,1),COLORRED{,LINETHICK2};
DRAWTEXT(filter(卖=1,1),HIGH*1.02,'卖'),COLORCYAN;
STICKLINE(filter(卖=1,1),HIGH,LOW,0,1),COLORBLUE{,LINETHICK2};
STICKLINE(filter(卖=1,1),OPEN,CLOSE,4,1),COLORBLUE{,LINETHICK2};
加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
加仓B:=加仓A;{白K突破压力位要用}
DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),LOW-0.03,'加');
STICKLINE(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),HIGH,LOW,0,1),COLORFF00FF{,LINETHICK2};
STICKLINE(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),OPEN,CLOSE,4,1),COLORFF00FF{,LINETHICK2};
追:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0);
DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'追'),COLOR006633;
STICKLINE(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),HIGH,LOW,0,1),COLOR006633{,LINETHICK2};
STICKLINE(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),OPEN,CLOSE,4,1),COLOR006633{,LINETHICK2};
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;
BDGD:=HHV(J,2)=HHV(J,8) AND J>80;
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0);
DRAWTEXT(注意 AND 卖<>1,HIGH*1.02,'减'),COLORWHITE;
STICKLINE(注意 AND 卖<>1,HIGH,LOW,0,1),COLORYELLOW{,LINETHICK2};
STICKLINE(注意 AND 卖<>1,OPEN,CLOSE,4,1),COLORYELLOW{,LINETHICK2};
RSV1:=(c-LLV(low,13))/(HHV(h,13)-LLV(l,13))*100;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1;
RSV2:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K2:=SMA(RSV2,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
支撑:=IF(CROSS(J1,J2),L,REF(L,BARSLAST(CROSS(J1,J2))));
压力:=IF(CROSS(J2,J1),H,REF(H,BARSLAST(CROSS(J2,J1))));
DRAWTEXT(支撑=压力 AND REF(支撑,1)<>REF(压力,1),LOW*0.99,'●'),COLOR3300FF;
DRAWTEXT(支撑=压力 AND REF(支撑,1)<>REF(压力,1),LOW*0.97,'优'),COLOR3300FF;
DRAWTEXT((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力) AND 买<>1) OR (C=压力 AND OPEN>CLOSE),LOW*0.98,'突'),COLORWHITE;
STICKLINE((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力) AND 买<>1) OR (C=压力 AND OPEN>CLOSE),HIGH,LOW,0,1),COLORWHITE{,LINETHICK2};
STICKLINE((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力)AND 买<>1) OR (C=压力 AND OPEN>CLOSE),OPEN,CLOSE,4,1),COLORWHITE{,LINETHICK2};
突破压力位:=IF((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力)AND 买<>1) OR (C=压力 AND OPEN>CLOSE),1,0);以下内容回复可见
[attach]34014[/attach]
[attach]34021[/attach]
[color=red]金牛系列之六--主力控盘力度(对[/color][url=http://www.gszl.org/space.php?uid=10307][color=red]deerangel[/color][/url][color=red] 美天顶底指标的优化使其更精确)[/color]
VAR1:=EMA(EMA(CLOSE,3),1);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,2,0),COLORWHITE;
A10:=CROSS(控盘,0);
无控盘:IF(控盘<0,控盘,0),COLORWHITE;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,4,0),COLORRED;
轻度控盘:0,COLORRED;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,2,0),COLORFF00FF;
高度控盘:0,COLORFF00FF;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2,0),COLOR00FF00;
出货:0,COLOR00FF00;
DRAWTEXT(FILTER(无控盘<-14,10),无控盘,' 抄底'),COLORYELLOW;
Var3:(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
0, VOLSTICK;
拉升:IF(Var3>0,Var3,0);
短顶: STICKLINE(Var3>9 AND Var3< REF(Var3,1),Var3-8,0,3,0), COLORFF0000;
大顶: STICKLINE(Var3>20 AND Var3< REF(Var3,1),Var3-8,0,8,1),COLORFF0000;
Var4:=HHV(Var3>20,10);
危险: STICKLINE(Var4 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),Var3-8,0,4,0),color008364;
止损: STICKLINE(Var4 AND Var3< REF(Var3,1) AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),Var3-8,0,3,0),colorff937f;
短底: STICKLINE(Var3<-9 AND Var3> REF(Var3,1),Var3+8,0,3,0), COLOR00AAFF;
大底: STICKLINE(Var3<-20 AND Var3> REF(Var3,1),Var3+8,0,7,0), COLORyellow;{见下图}
[attach]34421[/attach]
[color=red]金牛系列之七:精确打击原码[/color]
[color=red]stickline(c>0,-100,150,100,0),color334400;
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
短期底部:=LLV(OPEN,30);
AA10:=MA(CLOSE,10);
AA12:=MA(CLOSE,12);
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);
VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6);
VAR6:=MA(VAR5,3);
VAR7:=DMA(EMA(CLOSE,12),((SUM(VOL,5) / 3) / CAPITAL));
VAR8:=(((CLOSE - VAR7) / VAR7) * 100);
VAR9:=((((REF(VAR8,1) < (0 - 40)) AND (VAR8 > REF(VAR8,1))) AND (REF(VAR8,1) < REF(VAR8,2))) AND ((VAR8 - REF(VAR8,1)) > 2.5));
VARA:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARB:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARC:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARD:=REF(CLOSE,1);
VARE:=((SMA(MAX((CLOSE - VARD),0),5,1) / SMA(ABS((CLOSE - VARD)),5,1)) * 100);
VARF:=(((HIGH + LOW) + CLOSE) / 3);
VAR10:=((VARF - MA(VARF,14)) / (0.015 * AVEDEV(VARF,14)));
VAR11:=(((((MA(AMOUNT,5) / MA(VOL,5)) / 100) - ((MA(AMOUNT,110) / MA(VOL,110)) / 100)) / ((MA(AMOUNT,5) / MA(VOL,5)) / 100)) < (0 - 0.273));
VAR12:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) < (0 - 0.125));
VAR13:=(VAR11 AND VAR12);
VAR14:=((((VARA >= (0 - 45)) AND (VARA <= (0 - 10))) AND (VARB <= (0 - 15))) AND (VARC <= (0 - 20)));
VAR15:=(COUNT(VAR14,1) >= 1);
VAR16:=(VAR13 AND VAR15);
VAR17:=1;
VAR18:=(CLOSE * VOL);
VAR19:=EMA((((((MA(VAR18,4) / MA(VOL,4)) + (MA(VAR18,6) / MA(VOL,6))) + (MA(VAR18,13) / MA(VOL,13))) + (MA(VAR18,24) / MA(VOL,24))) / 4),1);
VAR1A:=(1 * VAR19);
VAR1B:=(VAR19 * 0.92);
VAR1C:=EMA(CLOSE,34);
VAR1D:=MA((VAR1C * 1.12),5);
VAR1E:=MA((VAR1C * 0.82),5);
VAR1F:=(CLOSE < VAR1E);
VAR20:=((((((MA(AMOUNT,5) * VAR17) / MA(VOL,5)) / 100) - ((MA(AMOUNT,125) / MA(VOL,125)) / 100)) / ((MA(AMOUNT,5) / MA(VOL,5)) / 100)) < ((0 - 0.4) * VAR17));
VAR21:=HHV(HIGH,500);
VAR22:=LLV(LOW,500);
VAR23:=HHV(HIGH,250);
VAR24:=LLV(LOW,250);
VAR25:=HHV(HIGH,125);
VAR26:=LLV(LOW,125);
VAR27:=MA(((((((VAR21 * 0.45) + (VAR23 * 0.5)) + VAR22) + VAR24) + VAR26) / 5),35);
VAR28:=MA((((VAR23 * 0.62) + VAR26) / 2),35);
VAR29:=MA((((VAR23 * 0.75) + VAR26) / 2),18);
VAR2A:=MA((((((VAR23 * 0.93) + (VAR27 * 2)) + (VAR28 * 1.8)) + (VAR29 * 1.5)) / 4),18);
VAR2B:=MA(((((VAR21 * 0.95) + (VAR27 * 3)) + (VAR28 * 2)) / 3),35);
VAR2C:=VAR27;
VAR2D:=VAR28;
VAR2E:=VAR29;
VAR2F:=VAR2A;
VAR30:=VAR2B;
VAR31:=((CLOSE - REF(MA(CLOSE,20),11)) < (0 - 2));
VAR32:=(INDEXA / 100000000);
VAR33:=INDEXADV;
VAR34:=INDEXDEC;
VAR35:=((VAR18 / (VAR18 + VAR19)) * VAR17);
VAR36:=((VAR19 / (VAR18 + VAR19)) * VAR17);
VAR37:=EMA(VAR35,10);
VAR38:=EMA(VAR36,10);
VAR39:=EMA(VAR37,10);
VAR3A:=EMA(VAR38,20);
VAR3B:=EMA(VAR37,3);
VAR3C:=EMA(VAR39,6);
VAR3D:=EMA(VAR3A,2);
VAR3E:=(VAR3C - VAR3D);
VAR3F:=(((VAR3C - REF(VAR3C,1)) > 0) AND ((REF(VAR3C,1) - REF(VAR3C,2)) < 0));
VAR40:=IF((CROSS(VAR3B,VAR3C) AND (VAR3C <= 20)),30,0);
VAR41:=VAR40;
VAR42:=(SMA(((AMOUNT / VOL) / 100),13,1) * 1.15);
VAR43:=(SMA(((AMOUNT / VOL) / 100),13,1) * 0.85);
VAR44:=(CLOSE - REF(MA(CLOSE,20),11));
VAR45:=(((((((((((((CLOSE < VAR1E) AND VAR20) AND (CLOSE < VAR43)) OR (((CLOSE < VAR1E) AND VAR31) AND VAR20)) OR ((CLOSE < VAR1E) AND (CLOSE < VAR43))) OR (((CLOSE < VAR1E) AND VAR20) AND (CLOSE < VAR43))) OR (VAR20 AND (CLOSE < VAR2C))) OR ((VAR20 AND VAR31) AND (VAR44 < (0 - 1.5)))) OR (VAR20 AND (CLOSE < VAR1E))) OR (VAR20 AND (VAR44 < (0 - 1.5)))) OR (VAR31 AND (CLOSE < VAR43))) OR ((CLOSE < VAR2C) AND (VAR44 < (0 - 1.5)))) OR ((CLOSE < VAR1E) AND VAR31));
VAR46:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR47:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR48:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR49:=REF(CLOSE,1);
VAR4A:=((SMA(MAX((CLOSE - VAR49),0),5,1) / SMA(ABS((CLOSE - VAR49)),5,1)) * 100);
VAR4B:=(((HIGH + LOW) + CLOSE) / 3);
VAR4C:=((VAR4B - MA(VAR4B,14)) / (0.015 * AVEDEV(VAR4B,14)));
VAR4D:=(((((MA(AMOUNT,5) / MA(VOL,5)) / 100) - ((MA(AMOUNT,110) / MA(VOL,110)) / 100)) / ((MA(AMOUNT,5) / MA(VOL,5)) / 100)) < (0 - 0.273));
VAR4E:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) < (0 - 0.125));
VAR4F:=(VAR11 AND VAR12);
VAR50:=((((VAR2 >= (0 - 45)) AND (VAR2 <= (0 - 7))) AND (VAR3 <= (0 - 11))) AND (VAR4 <= (0 - 14)));
VAR51:=(COUNT(VAR50,1) >= 1);
VAR52:=(VAR4F AND VAR51);
VAR53:=(((((VAR20 AND (CLOSE < VAR1E)) AND VAR31) AND (CLOSE < VAR2C)) AND VAR45) AND VAR52);
VAR54:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR55:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR56:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR57:=REF(CLOSE,1);
VAR58:=((SMA(MAX((CLOSE - VAR57),0),5,1) / SMA(ABS((CLOSE - VAR57)),5,1)) * 100);
VAR59:=(((HIGH + LOW) + CLOSE) / 3);
VAR5A:=((VAR59 - MA(VAR59,14)) / (0.015 * AVEDEV(VAR59,14)));
VAR5B:=((((((VAR54 >= (0 - 15.8)) AND (VAR54 <= (0 - 12.2))) AND (VAR55 <= (0 - 20.8))) AND (VAR56 <= (0 - 27.5))) AND (VAR58 <= 11.7)) AND (VAR5A <= (0 - 145)));
VAR5C:=9.999999884842+026;
VAR5D:=(COST(10) * 0);
VAR5E:=((((MA(AMOUNT,5) / MA(VOL,5)) / 100) - ((MA(AMOUNT,125) / MA(VOL,125)) / 100)) / ((MA(AMOUNT,5) / MA(VOL,5)) / 100));
VAR5F:=MA((((LLV(LOW,45) - CLOSE) / (HHV(HIGH,45) - LLV(LOW,45))) * 100),5);
VAR60:=((CROSS((0 - 5),VAR5F) AND (VAR5E < (0 - 0.4))) AND (((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) < (0 - 0.19)));
VAR61:=MA(CLOSE,3);
VAR62:=(REF(CLOSE,2) * 0.865);
VAR63:=(REF(CLOSE,13) * 0.772);
VAR64:=MIN(VAR62,VAR63);
VAR65:=((100 * VOL) / CAPITAL);
VAR66:=MA(CLOSE,13);
VAR67:=IF(((((CLOSE - VAR64) / CLOSE) < 0.03) AND ((SUM(VAR65,5) / 5) < 1.8)),1,0);
底部出现开始控盘:STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),5,0),COLORBROWN;
出击:IF(((((VAR9 OR VAR16) OR VAR53) OR VAR5B) OR ((((CLOSE - VAR64) / CLOSE) < 0.03) AND ((SUM(VAR65,5) / 5) < 1.8))),120,0),LINETHICK2,color0000FF;
VAR68:=0;
VARQ:=MA(CLOSE,152);
VARW:=MA(CLOSE,194.16);
VAREe:=(VARW + (2 * STD(CLOSE,170)));
VARR:=(VARQ + (2 * STD(CLOSE,170)));
VART:=IF((DATE > 1080822),0,1);
VAR611:=EMA(HHV(HIGH,500),21);
VAR71:=EMA(HHV(HIGH,250),21);
VAR81:=EMA(HHV(HIGH,90),21);
VAR91:=EMA(LLV(LOW,500),21);
VARA1:=EMA(LLV(LOW,250),21);
VARB1:=EMA(LLV(LOW,90),21);
VARC1:=EMA((((((((VAR91 * 0.96) + (VARA1 * 0.96)) + (VARB1 * 0.96)) + (VAR611 * 0.558)) + (VAR71 * 0.558)) + (VAR81 * 0.558)) / 6),21);
VARD1:=EMA((((((((VAR91 * 1.25) + (VARA1 * 1.23)) + (VARB1 * 1.2)) + (VAR611 * 0.55)) + (VAR71 * 0.55)) + (VAR81 * 0.65)) / 6),21);
VARE1:=EMA((((((((VAR91 * 1.3) + (VARA1 * 1.3)) + (VARB1 * 1.3)) + (VAR611 * 0.68)) + (VAR71 * 0.68)) + (VAR81 * 0.68)) / 6),21);
VARF1:=EMA((((((VARC1 * 3) + (VARD1 * 2)) + VARE1) / 6) * 1.738),21);
VAR101:=REF(LOW,1);
VAR111:=((SMA(ABS((LOW - VAR101)),3,1) / SMA(MAX((LOW - VAR101),0),3,1)) * 100);
VAR121:=EMA(IF(((CLOSE * 1.35) <= VARF1),(VAR111 * 10),(VAR111 / 10)),3);
VAR131:=LLV(LOW,30);
VAR141:=HHV(VAR121,30);
VAR151:=IF(MA(CLOSE,58),1,0);
VAR161:=((EMA(IF((LOW <= VAR131),((VAR121 + (VAR141 * 2)) / 2),0),3) / 618) * VAR151);
VAR171:=(((IF((VAR161 > 50),50,VAR161) / 20) * 15) * VART);
SG:=EMA(HHV(HIGH,1),8);
X1:=EMA(CLOSE,8);
X30:=((X1 < REF(X1,1)) AND (CLOSE < X1));
X31:=IF(((SG < REF(SG,1)) OR X30),1,0);
全仓出击:=((((COUNT((X31 = 1),4) = 3) AND (X31 = 0)) AND (((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) > 0.085)) * 89);
STICKLINE(全仓出击>=89,0,100,6,0),color0000FF;
DRAWICON((全仓出击 >= 89),全仓出击,1);
DRAWTEXT((全仓出击 >= 89),105,'--买入'),COLORRED;
均5:=MA(CLOSE,4);
X7:=EMA(EMA(EMA(HIGH,9),9),9);
海底:=(X7 * 0.92);
海底2:=(X7 * 0.933);
中轨道:=MA(CLOSE,2);
DRAWTEXT(((CROSS(中轨道,均5) AND (LOW <= 海底)) AND (CLOSE >= 海底2)),85,'-底部'),color00FFFF;
STICKLINE(((CROSS(中轨道,均5) AND (LOW <= 海底)) AND (CLOSE >= 海底2)),0,85,4,0),color00FFFF;
VAR1:=EMA(EMA(CLOSE,3),1);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,4,0),COLORWHITE;
无控盘:0,COLORWHITE;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,4,0),COLORMAGENTA;
高度控盘:0,COLORFF00FF;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,4,0),COLOR00FF00;
控盘对倒出货:0,COLOR00FF00;[/color]
[color=red][attach]35978[/attach]
撒尿就跑原码:[/color]
[color=red]input:M(5,2,36),N(9,2,36);
VAR1:=(HIGH + LOW + CLOSE)/3;
卧虎:=(VAR1-MA(VAR1,m))/(0.015*MA(VAR1,m)) COLOR3399ff ;
尿:=SMA(卧虎,n,1),COLORCYAN ;
撒尿就跑:IF( 尿>0, 尿,0) COLORaaaaaa ,LINEDOT;
强度:=(卧虎-0);
STICKLINE(强度>=0,0,强度*1.000,9,0),COLOR3399ff;
STICKLINE(强度>=0,0,强度*0.930,9,0),COLOR303030;
STICKLINE(强度>=0,0,强度*0.850,9,0),COLOR6699ff;
STICKLINE(强度>=0,0,强度*0.750,9,0),COLOR303030;
STICKLINE(强度>=0,0,强度*0.600,9,0),COLOR6699ff;
STICKLINE(强度>=0,0,强度*0.475,9,0),COLOR303030;
STICKLINE(强度>=0,0,强度*0.300,9,0),COLOR3399ff;
STICKLINE(强度>=0,0,强度*0.195,9,0),COLOR303030;
STICKLINE(强度>=0,0,强度*0.075,9,0),COLOR6699ff;
0, COLOR3399ff;
15 , POINTDOT,COLOR00aabb ;[/color]
[color=red]Var1:=AMOUNT/VOL/100;
Var2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
Var3:=SUM(AMOUNT,13)/Var1/100;
Var4:=DMA(Var2,VOL/Var3);
Var5:=(CLOSE-Var4)/Var4*100;
Var6:=(INDEXC-LLV(INDEXL,9))/(HHV(INDEXH,9)-LLV(INDEXL,9))*100;
Var7:=SMA(Var6,3,1);
Var8:=SMA(Var7,3,1);
CROSS(Var7,Var8) AND Var7<45 AND COUNT(Var5<=-15,5)>=1[/color]
[color=#ff0000]今日发布金牛筹码集中度:注该公式里边的未来函数均为开收盘预测,对指标精确度没有影响尽可放心参考鼠标移动就能看到汉字提示。[/color]
开:=WINNER(O)*100,POINTDOT,COLORBLUE;
高:=WINNER(H)*100,POINTDOT,COLORRED;
低:=WINNER(L)*100,POINTDOT,COLORBLACK;
收:=WINNER(C)*100,POINTDOT,COLOR0000FF;
底位长阳:=收-开>20*低,POINTDOT,COLORRED;
无量长阳:=收-开>15 AND V/CAPITAL<0.03,POINTDOT,COLORBLUE;
带量长阳:=收-开>25 AND V/CAPITAL>=0.03 AND 收<=61.8,POINTDOT,COLORMAGENTA;
带量大阳:=收-开>40 AND V/CAPITAL>0.05 AND CROSS(收,61.8),POINTDOT,COLORYELLOW;
长阴:=开-收>20 AND 开>=80,POINTDOT,COLOR000000;
61.8,linethick1,COLORBLUE;
涨跌幅%:(收-REF(收,1))/REF(收,1)*100,linethick;
STICKLINE(收<开,低,高,2,0),COLORWHITE;
STICKLINE(收<开,收,开,8,1),COLORBLACK;
STICKLINE(收>=开,低,高,2,0),COLORYELLOW;
STICKLINE(收>=开,收,开,8,1),COLORRED;
STICKLINE(无量长阳,低,高,2,0),COLORBLUE;
STICKLINE(无量长阳,开,收,10,0),COLORBLUE;
STICKLINE(带量长阳,开,收,10,0),COLORMAGENTA;
STICKLINE(底位长阳>=1,开,收,10,0),COLORRED;
STICKLINE(带量大阳,开,收,10,0),COLORYELLOW;
STICKLINE(长阴>=1,开,收,10,0),COLOR000000;
N1:=90+(100-90)/2;
N2:=(100-90)/2;
AA:=COST(N1);
DD:=COST(N2);
集中度:(AA-DD)/(AA+DD)*100,COLOR0000FF,linethick;
IF(集中度<=10,0,-10),COLORRED;
{以下画可移动柱图}
BB:=BARPOS=SYSPARAM(1);
p:=SYSPARAM(1);
PARTLINE(BETWEEN(BARPOS ,SYSPARAM(1)-5 , SYSPARAM(1)+1 ), 5),COLORRED,LINETHICK4;
STICKLINE(底位长阳[p] and SYSPARAM(1)-0=BARPOS,0,30,12,0),colorRED;
STICKLINE(无量长阳[p] and SYSPARAM(1)-0=BARPOS,20,60,12,0),COLORBLUE;
STICKLINE(带量长阳[p] and SYSPARAM(1)-0=BARPOS,20,60,12,0),COLORMAGENTA;
STICKLINE(带量大阳[p] and SYSPARAM(1)-0=BARPOS,40,80,12,0),colorYELLOW;
STICKLINE(长阴[p] and SYSPARAM(1)-0=BARPOS,60,100,12,0),color000000;
{在柱图上显示}
DRAWTEXT(底位长阳 and SYSPARAM(1)-0=BARPOS,10,'底位长阳'),COLORCYAN,ALIGN0;
DRAWTEXT(无量长阳 and SYSPARAM(1)-0=BARPOS,10,'无量长阳'),COLORCYAN,ALIGN0;
DRAWTEXT(带量长阳 and SYSPARAM(1)-0=BARPOS,10,'带量长阳'),COLORCYAN,ALIGN0;
DRAWTEXT(带量大阳 and SYSPARAM(1)-0=BARPOS,10,'带量大阳'),COLORCYAN,ALIGN0;
DRAWTEXT(长阴 and SYSPARAM(1)-0=BARPOS,50,'长阴'),COLORCYAN,ALIGN0;
DRAWTEXT(BARPOS=SYSPARAM(2),1,' \n金牛操盘副图之一:红色K线=底位长阳;
品红色K线=带量长阳;
蓝色K线=无量长阳;
黄色K线=带量大阳;
白色K长阴=顶部;
'),ALIGN4,COLORYELLOW;[attach]37879[/attach]
[attach]38671[/attach]
[color=#ff0000][attach]38910[/attach][/color]
[[i] 本帖最后由 金牛财露 于 2008-11-18 11:22 编辑 [/i]]