{DRAWGBK(v>=0,COLORRGB(18,19,51),COLORRGB(1,105,155),0);}
DRAWGBK(CLOSE,COLORRGB(110,130,130),COLORRGB(25,15,0),1);
DRAWTEXTEX(c>0,1,0,60,'K线上部深红色条纹持股'),linethick1,color0000ff;
DRAWTEXTEX(c>0,1,0,100,'K线上部粉红色条纹变盘'),linethick1,colorff99ff;
DRAWTEXTEX(c>0,1,0,140,'K线上部浅蓝色条纹抛售'),linethick1,colorff9900;
DRAWTEXTEX(c>0,1,0,180,'K线下部浅灰色条纹下跌'),linethick1,color888888;
DRAWTEXTEX(c>0,1,0,220,'K线下部浅绿色条纹买入'),linethick1,color00ff00;DRAWTEXTEX(c>0,1,200,60,'黄心K线-立庄量'),linethick1,coloryellow;
DRAWTEXTEX(c>0,1,200,100,'棕心K线-立庄量成立'),linethick1,color3399ff;
DRAWTEXTEX(c>0,1,200,140,'做多区域紫红色K线'),linethick1,COLOR663377;
DRAWTEXTEX(c>0,1,200,180,'做空区域深青色K线'),linethick1,color858500;
DRAWTEXTEX(c>0,1,200,220,'强洗区域橙红色K线'),linethick1,color726CA;
DRAWTEXTEX(c>0,1,200,260,'初升区域浅青色K线'),linethick1,COLORffff00;画面起点:=SYSPARAM(2);
画面终点:=SYSPARAM(3);
画面K线数:=画面终点-画面起点+1;
最低:=LLV(LOW,画面K线数);
视低:=最低[画面终点],COLORFF2200;
最高:=HHV(HIGH,画面K线数);
视高:=最高[画面终点];
成交量最高:=HHV(VOL,画面K线数);
成交量视高:=成交量最高[画面终点];
合成成交量:=VOL*((视高-视低)/成交量视高)+视低;
STICKLINE(C>0,视低,合成成交量,10,1),color669999;STICKLINE(C>REF(C,1),合成成交量,合成成交量,10,1),COLOR5d4134;X1:=(CLOSE+LOW+HIGH)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
VAR2:=EMA(EMA(X1,1),13);
VAR3:=EMA(VAR2,21);
PARTLINE(VAR3,VAR3),LINETHICK2,colorcc49c85;
STICKLINE(VAR2>=VAR3,VAR2,VAR3,8,0),colorcc49c85;
PARTLINE(VAR2<VAR3,VAR3),LINETHICK2,colorca29b9b;STICKLINE(VAR2<VAR3,VAR2,VAR3,8,0),color99ffcc;
XCLOSE:=EMA((OPEN+HIGH+LOW+CLOSE)/4,3);
XOPEN:=EMA((REF(OPEN,1)+REF(XCLOSE,1))/2,3);
TEMPG:=MAX(HIGH,XOPEN);
XHIGH:=EMA(MAX(TEMPG,XCLOSE),3);
TEMP:=MIN(LOW,XOPEN);
XLOW:=EMA(MIN(TEMP,XCLOSE),3);
O1:=IF(XOPEN<XCLOSE,XOPEN,XCLOSE);
C1:=IF(XOPEN<XCLOSE,XCLOSE,XOPEN);
STICKLINE(XOPEN<XCLOSE,XHIGH,XLOW,0.1,0),color00cc99;
STICKLINE(XOPEN<XCLOSE,C1,O1,4,1),color00cc99;
STICKLINE(XOPEN>=XCLOSE,XHIGH,XLOW,0.1,0),coloryellow;
STICKLINE(XOPEN>=XCLOSE,C1,O1,4,1),coloryellow;AC:=CLOSE;
AH:=HIGH;
AL:=LOW;
AO:=OPEN;
STICKLINE(AC>=AO,AH,AC,0,0),color8899;
STICKLINE(AC>=AO,AH,AC,0,0),color77FFEE;
STICKLINE(AC>=AO,AO,AL,0,0),color8899;
STICKLINE(AC>=AO,AO,AL,0,0),color77FFEE;STICKLINE(AC>AO,AC,AO,7,0),color1199AA;
STICKLINE(AC>AO,AC,AO,6,0),color22AABB;
STICKLINE(AC>AO,AC,AO,5,0),color33BBCC;
STICKLINE(AC>AO,AC,AO,4,0),color44CCDD;
STICKLINE(AC>AO,AC,AO,3,0),color55DDEE;
STICKLINE(AC>AO,AC,AO,2,0),color66EEEE;
STICKLINE(AC>AO,AC,AO,1,0),color77FFEE;
STICKLINE(AC<=AO,AH,AC,0,0),colorFF8800;
STICKLINE(AC<=AO,AH,AC,0,0),colorFFFF33;
STICKLINE(AC<=AO,AO,AL,0,0),colorFF8800;
STICKLINE(AC<=AO,AO,AL,0,0),colorFFFF33;STICKLINE(AC<=AO,AC,AO,7,0),colorFF9900;
STICKLINE(AC<=AO,AC,AO,6,0),colorFFAA11;
STICKLINE(AC<=AO,AC,AO,5,0),colorFFBB11;
STICKLINE(AC<=AO,AC,AO,4,0),colorFFCC22;
STICKLINE(AC<=AO,AC,AO,3,0),colorFFDD22;
STICKLINE(AC<=AO,AC,AO,2,0),colorFFEE33;
STICKLINE(AC<=AO,AC,AO,1,0),colorFFFF33;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);做多:=IF(K>D AND MACD>0 AND V>1,2,0),COLORRED;
做空:=IF(K<D AND MACD<0 AND V>1,-2,0),COLOR00FF00;
强洗:=IF(MACD>0 AND K<D AND V>1,1,0),COLOR0099FF;
弱升:=IF(MACD<0 AND K>D AND V>1,-1,0),COLORFFFF00;
STICKLINE(做多,C,O,7,0),COLOR663311;
STICKLINE(做多,C,O,6,0),COLOR663322 ;
STICKLINE(做多,C,O,5,0),COLOR663333;
STICKLINE(做多,C,O,4,0),COLOR663344 ;
STICKLINE(做多,C,O,3,0),COLOR663355;
STICKLINE(做多,C,O,2,0),COLOR663366;
STICKLINE(做多,C,O,1,0),COLOR663377;
STICKLINE(做多,H,L,0,0),COLOR663377;//做多区域为紫红色K线，代表KDJ金叉，MACD金叉====双金叉看多区域。
STICKLINE(做空,C,O,7,0),COLOR454500;
STICKLINE(做空,C,O,5,0),COLOR555500;
STICKLINE(做空,C,O,3,0),COLOR656500;
STICKLINE(做空,C,O,2,0),COLOR757500;
STICKLINE(做空,C,O,1,0),COLOR858500;
STICKLINE(做空,LOW,HIGH,0,0),color858500;//做空区域为深青色K线，代表KDJ死叉，MACD死叉====双死叉看空区域。STICKLINE(强洗,CLOSE,OPEN,7,0),color70084;
STICKLINE(强洗,CLOSE,OPEN,6,0),colorA3;
STICKLINE(强洗,CLOSE,OPEN,5,0),colorB7;
STICKLINE(强洗,CLOSE,OPEN,4,0),colorCD;
STICKLINE(强洗,CLOSE,OPEN,3,0),colorE9;
STICKLINE(强洗,CLOSE,OPEN,2,0),color754E9;
STICKLINE(强洗,CLOSE,OPEN,1,0),color76EF3;
STICKLINE(强洗,LOW,HIGH,0,0),color726CA;//强洗区域为橙黄色K线，代表KDJ死叉，MACD金叉====短空中多洗盘区域。STICKLINE(弱升,C,O,7,0),Coloraaaa00;
STICKLINE(弱升,C,O,6,0),Colorbbbb00;
STICKLINE(弱升,C,O,5,0),Colorcccc00;
STICKLINE(弱升,C,O,4,0),Colordddd00;
STICKLINE(弱升,C,O,3,0),Coloreeee00;
STICKLINE(弱升,C,O,2,0),COLORffff00;
STICKLINE(弱升,C,O,1,0),Colorffff00;
STICKLINE(弱升,H,L,0,0),COLORffff00;//初升区域为浅青色K线，代表KDJ金叉，MACD死叉====短多中空反弹区域。
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);ggg:=MIN(CLOSE,OPEN);STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,7,0),COLOR000055;
STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,6,0),COLOR000066;
STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,5,0),COLOR000077;
STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,4,0),COLOR000099;
STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,3,0),COLOR0000BB;
STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,2,0),COLOR0000DD;
STICKLINE(VAR9Q,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,1,0),COLOR0000FF;
VARAQ:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,7,0),COLORFF11FF;
STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,6,0),COLORFF33FF;
STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,5,0),COLORFF55FF;
STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,4,0),COLORFF77FF;
STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,3,0),COLORFF99FF;
STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,2,0),COLORFFBBFF;
STICKLINE(VARAQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,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,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,7,0),COLOR333333;
STICKLINE(VARBQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,6,0),COLOR555555;
STICKLINE(VARBQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,5,0),COLOR777777;
STICKLINE(VARBQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,4,0),COLOR999999;
STICKLINE(VARBQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,3,0),COLORBBBBBB;
STICKLINE(VARBQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,2,0),COLORDDDDDD;
STICKLINE(VARBQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,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,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,7,0),COLOR003300;
STICKLINE(VARCQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,6,0),COLOR005500;
STICKLINE(VARCQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,5,0),COLOR007700;
STICKLINE(VARCQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,4,0),COLOR009900;
STICKLINE(VARCQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,3,0),COLOR00BB00;
STICKLINE(VARCQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,2,0),COLOR00DD00;
STICKLINE(VARCQ,ABS(O-C)*0.4+ggg,ABS(O-C)*0.2+ggg,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,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,7,0),COLORFF1100;
STICKLINE(VARDQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,6,0),COLORFF3300;
STICKLINE(VARDQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,5,0),COLORFF5500;
STICKLINE(VARDQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,4,0),COLORFF7700;
STICKLINE(VARDQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,3,0),COLORFF9900;
STICKLINE(VARDQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,2,0),COLORFFBB00;
STICKLINE(VARDQ,ABS(O-C)*0.8+ggg,ABS(O-C)*0.6+ggg,1,0),COLORFFDD00;超买:MA(C,10)*IF(CAPITAL<1,0.9,1.1),COLORmagenta;
超卖:MA(C,10)*IF(CAPITAL<1,1.04,0.9),COLORFFFF00;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
AA:=CROSS(K,80);
BB:=BARSLAST(AA=1);
DD:=REF(LOW,BB);
EE:=CROSS(DD,CLOSE);
FF:=SUM(EE,BB);
GG:=REF(FF,1)=0 AND FF=1;
HH:=REF(DD,1)=DD;
PARTLINE(HH=1,DD);
DRAWLINE(AA=1,DD,GG=1,DD,0),colorFF00;
X:=(BARSLAST((SYSPARAM(2)=BARPOS))+1);
NS:=IF((HHV(ABS(((HHV(CLOSE,6)/LLV(CLOSE,6))-1)),6)>(10/100)),3,6);
N1:=IF((DATATYPE=2),(NS*48),IF((DATATYPE=3),(NS*16),IF((DATATYPE=4),(NS*8),IF((DATATYPE=5),(NS*4),NS))));
MM:=IF(STKTYPE=0 ,MA(CLOSE,N1),((SUM(AMOUNT,N1)/SUM(VOL,N1))/100));
M1:=REF(MM,1);
买入:=IF(CROSS(CLOSE,M1),M1,0);
卖出:=IF(CROSS(M1,CLOSE),M1,0);
YE:=BARPOS;
费用:=(5/1000);
DW:=BARSLAST((卖出>0));
EX10:=HHV((买入>0),(DW+1));
BJ:=IF((EX10>REF(EX10,1)),买入,0);
SJ:=IF((EX10<REF(EX10,1)),卖出,0);
BNN:=BARSLAST((BJ>0));
CC:=REF(BJ,BNN);
盈利:=((SJ*(1-费用))-(CC*(1+费用)));
YL:=SUM(IF((SJ>0),盈利,0),0);
每股盈利:=YL,LINETHICK0,PRECISION2,colorFFFFFF;
CN:=SUM(IF(((SJ>0) AND (REF(CC,1)>0)),1,0),0);
CG:=SUM(IF(((SJ>0) AND (盈利>0)),1,0),0);
成功率:=((100*CG)/CN),LINETHICK0,PRECISION1,color88FF;
H1:=HHV(IF((1=2),成功率,YL),X);
L1:=LLV(IF((1=2),成功率,YL),X);
AH:=H1[DATACOUNT];
AL:=L1[DATACOUNT];
AHL:=(AH-AL);
POLYLINE((1=2),成功率),color88FF;
买入均价:=(SUM(BJ,0)/CN),LINETHICK0,PRECISION1,colorFF;
年收益:=((100*((240*YL)/YE))/买入),LINETHICK0,PRECISION1,colorFF;
持股时间:=(SUM(IF(((SJ>0) AND (CC>0)),(REF(BNN,1)+1),0),0)/YE),LINETHICK0,PRECISION2,colorFF00FF;
交易:=CN;
（次）成功:=CG;
年交均次:=((240*CN)/YE);
MON:=SUM(IF((MONTH<>REF(MONTH,1)),1,0),0);
上市年:=(MON/12);
DRAWNUMBER((BJ>0),(LOW*0.95),BJ,2),ALIGN0,colorFF;
DRAWICON(((BJ>0) AND (1=1)),(LOW*0.97),4);
DRAWNUMBER((((SJ>0) AND (1=1)) AND (((盈利/(CC*(1+费用)))*100)>=0)),(HIGH*1.1),((盈利/(CC*(1+费用)))*100),1),ALIGN0,colorFF;
DRAWNUMBER((((SJ>0) AND (1=1)) AND (((盈利/(CC*(1+费用)))*100)<0)),(HIGH*1.1),((盈利/(CC*(1+费用)))*100),1),ALIGN0,colorFFFF;
DRAWICON(((SJ>0) AND (1=1)),(HIGH*1.04),5);
DRAWNUMBER(((SJ>0) AND (1=1)),(HIGH*1.07),SJ,2),ALIGN0,colorFF00;
Ｎ波动:=(SUM(IF((((SJ>0) AND (CC>0)) AND ((REF(BNN,1)+1)<=3)),(REF(BNN,1)+1),0),0)/YE),LINETHICK0,PRECISION2,colorFF00FF;
买价:=IF((BJ>0),BJ,0),LINETHICK0,PRECISION2,colorFF;
卖价:=IF((SJ>0),SJ,0),LINETHICK0,PRECISION2,colorFF00;
DRAWTEXTEX(CLOSE,1,0,0,(((((((((((((((((('年盈利:'+NUMTOSTR(YL,2))+'元 成功率:')+NUMTOSTR(成功率,1))+'% 年收益:')+NUMTOSTR(年收益,1))+'%')+' 持股时间比:')+NUMTOSTR(持股时间,1))+'\n')+'交易:')+NUMTOSTR(交易,0))+'次 成功:')+NUMTOSTR(CG,0))+'次 年均:')+NUMTOSTR(年交均次,1))+'次 总共:')+NUMTOSTR(YE,0))+'K线')),colorFFFF;
临界:=(((CLOSE/M1)-1)*100);
增减:=(临界-(100*((REF(CLOSE,1)/REF(M1,1))-1)));
DRAWTEXTEX(CLOSE,1,500,0,(((((((('当前 信号持续:'+NUMTOSTR(BNN,0))+'(K线)')+' 最高盈利:')+NUMTOSTR(HHV((((HIGH/CC)-1)*100),(BNN+1)),1))+'% 买卖临界点:')+NUMTOSTR(临界,1))+'% 增减:')+NUMTOSTR(IF(((BNN>0) AND (DATATYPE=6)),增减,IF((BNN=0),0,-100)),1))),colorFFFF;
DRAWTEXT(((SYSPARAM(3)=BARPOS) ),HIGH,'.'),color1;
DRAWTEXT(((SYSPARAM(3)=BARPOS)),LOW,'.'),color1;
参考介入价:MM,LINETHICK0,PRECISION2,colorFFFFFF;
FUA:=HHV(HIGH,15);
FUB:=LLV(LOW,15);
空:=EMA(CLOSE,5);
均衡:EMA(空,0),colorFFFFFF;
下趋势、双线持币:HHV(MA(HIGH,3),2),LINETHICK2,colorFF00;
上趋势、单线持股:LLV(MA(HIGH,3),1),LINETHICK2,colorFF; {点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
