波段主图（源码、贴图）
DRAWGBK(C=C,COLORRGB(50,0,0),COLORRGB(50,50,30),1);
AC:=C;
AH:=H;
AL:=L;
AO:=O;
STICKLINE(AC>=AO,AH,AC,1,0),color77AAFF;
STICKLINE(AC>=AO,Ao,Al,1,0),color77AAFF;
STICKLINE(AC>=AO,AO,Ac,6,0),color77AAFF;
STICKLINE(AC<=AO,AO,Ac,6,0),colorCYAN;
STICKLINE(AC<=AO,Ah,Ao,1,0),colorCYAN;
STICKLINE(AC<=AO,AO,Al,1,0),colorCYAN;
ZH:=HHV(H,22);
ZHH:=H;
ZGF1:=ZHH/1.0809;ZGF2:=ZHH/1.1618;
ZGF3:=ZHH/1.0809/1.1618;ZGF4:=ZHH/1.1618/1.1618;
DRAWTEXTEX(sysparam(3)=BARPOS,0,2,78,'【股价第一回调区】:'+NUMTOSTR(ZGF1[SYSPARAM(1)],2)+'-'+NUMTOSTR(ZGF2[SYSPARAM(1)],2)+''),Color8BB2CA;
DRAWTEXTEX(sysparam(3)=BARPOS,0,2,96,'【股价第二回调区】:'+NUMTOSTR(ZGF3[SYSPARAM(1)],2)+'-'+NUMTOSTR(ZGF4[SYSPARAM(1)],2)+''),Color8BB2CA;
ZL:=LLV(L,22);
ZLL:=L;
ZGFB1:=ZLL*1.0809;ZGFB2:=ZLL*1.1618;ZGFB3:=ZLL*1.0809*1.1618;ZGFB4:=ZLL*1.1618*1.1618;
DRAWTEXTEX(sysparam(3)=BARPOS,0,2,120,'【股价第一压力区】:'+NUMTOSTR(ZGFB1[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(ZGFB2[SYSPARAM(1)],2)+''),ColorFF00FF;
DRAWTEXTEX(sysparam(3)=BARPOS,0,2,138,'【股价第二压力区】:'+NUMTOSTR(ZGFB3[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(ZGFB4[SYSPARAM(1)],2)+''),ColorFF00FF;
DRAWTEXTEX(sysparam(3)=BARPOS,0,2,156,'【起动价】'+NUMTOSTR(ZL[SYSPARAM(1)],2)+''),color00EEFF;
DRAWTEXTEX(sysparam(3)=BARPOS,0,110,156,'【回调价】'+NUMTOSTR(ZH[SYSPARAM(1)],2)+''),color00DD00;
明支:CLOSE-(AMOUNT/VOL/100-LOW),COLORred,LINETHICK0;
明阻:CLOSE+(AMOUNT/VOL/100-LOW),COLORgreen,LINETHICK0;
cdp:=(l+h+2*o)/4;
pt:=h-l;
最低支:cdp-pt,COLORred,LINETHICK0;
近低支:2*cdp-h,COLORMAGENTA,LINETHICK0;
近高阻:2*cdp-l,COLOR16783C,LINETHICK0;
最高阻:cdp+pt,COLORgreen,LINETHICK0;
买入价预测:C-CLOSE*2.5/100,COLORred,LINETHICK0;
卖出价预测:(CLOSE*2.5/100+CLOSE),COLORgreen,LINETHICK0;
预测低:MA(REF(LOW,1)/REF(CLOSE,2),27)*REF(CLOSE,1),COLORred,LINETHICK0;
预测高:MA(REF(HIGH,1)/REF(CLOSE,2),27)*REF(CLOSE,1),COLORgreen,LINETHICK0;
JQJJS:=(H-L)/(O-L)<2;
A1:=MA(C,13);
JZX:=REF(A1,13/2+1);
JZY:=((((REF(H,1)-REF(L,1))*8/10)+O)*100)/100;
JZS:=((O-((REF(H,1)-REF(L,1))*8/20))*100)/100;
止损:JZS,COLOR16783C,LINETHICK0;
止赢:JZY,COLORgreen,LINETHICK0;
压力:MA(EMA(CLOSE,34)*N,5),COLOR000000;
支撑:MA(EMA(CLOSE,34)*(2-N),5),COLOR000000;
B:=CLOSE*VOL;
D:=EMA((MA(B,4)/MA(VOL,4)+MA(B,6)/MA(VOL,6)+MA(B,13)/MA(VOL,13)+MA(B,24)/MA(VOL,24))/4,1);
短压:1.08*D,COLORCA066C;
短支:D*0.92,COLORCA066C;
var71:=((HIGH+LOW+CLOSE)/(3)-MA((HIGH+LOW+CLOSE)/(3),14))/((0.015)*(AVEDEV((HIGH+LOW+CLOSE)/(3),14)));
var72:=((HIGH+LOW+CLOSE)/(3)-MA((HIGH+LOW+CLOSE)/(3),70))/((0.015)*(AVEDEV((HIGH+LOW+CLOSE)/(3),70)));
var73:=IF((var71<=(-150)) AND (var71>(-200)) AND (var72<=(-150)) AND (var72>(-200)),(-10),IF((var71>=150) AND (var71<200) AND (var72>=150) AND (var72<200),10,0));
var74:=IF((100-ABS(((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100))<90),100-ABS(((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100)),100);
var75:=IF((var72>=200) AND (var71>=150),15,IF((var72<=(-200)) AND (var71<=(-150)),(-15),var73))+60;
DRAWTEXT((var75>60) AND (var74<150) AND (COUNT((var75>60) AND (var74<150),20)=1),low*0.95,' 加速'),Colorblue;
drawicon((var75>60) AND (var74<150) AND (COUNT((var75>60) AND (var74<150),20)=1),low*0.95,8),;
散户:= EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,5))/(HHV(HIGH,4)-LLV(LOW,5))*100,4);
庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2);
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,low*0.95,'●低吸'),COLOR1621F9;
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,h*1.05,'●高减'),COLOR16783C;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
STICKLINE((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,l*0.95,l*0.8,8,1),COLORblue;
PJ:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
HJ:=SUM(AMOUNT,13)/AMOUNT*VOL;
CN:= DMA(PJ,VOL/HJ);
Delarbo:=((((CLOSE-CN)/CN)*100-REF(((CLOSE-CN)/CN)*100,1)));
STICKLINE(( (Delarbo>5.8) AND ((C-REF(C,1))/REF(C,1))<0.08 AND REF(((CLOSE-CN)/CN)*100,1)<-3.8 ),l*0.95,l*0.87,5,0),COLORDD0BF0;
Var1:=(HIGH+LOW+CLOSE*2)/4;
Var3:=(EMA(((Var1-EMA(Var1,21))/STD(Var1,21)*100+200)/4,5)-25)*1.56;
Var5:=3*EMA(Var3,2)*1.22-2*EMA(EMA(Var3,2)*1.22,2);
Var6:=EMA((Var1-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,13);
Var7:=EMA(0.667*REF(Var6,1)+0.333*Var6,2);
Var8:=EMA(Var1,13)-EMA(Var1,21);
Var9:=2*(Var8-EMA(Var6,2))*3.8;
Var10:=Var9 > REF(Var9,1) AND Var6 < 63 AND Var7 < 63 AND EMA(Var3,2)*1.22 < 63 AND EMA(EMA(Var3,2)*1.22,2) < 63 AND Var5 < 63 AND CROSS(Var5,EMA(Var3,2)*1.22) AND FINANCE(33)> 0.01 AND FINANCE(34)> 1 AND REF(CLOSE,23)/CLOSE > 1.2 AND REF(CLOSE,10)/CLOSE < 1.5;
Var11:=MIN(ref(CLOSE,2)*0.865,ref(CLOSE,13)*0.772);
Var12:=if((CLOSE-Var11)/CLOSE < 4/100 and sum(100*vol/capital,5)/5 < 1.8 and WINNER(CLOSE)*100 < 0.1,1,0);
Var13:=MA(CLOSE,80)-MA(CLOSE,10)/3;
Var14:=CLOSE < Var13 and VOL/240 > MA(VOL,5)/240 AND CLOSE > REF(CLOSE,1)*1.08 AND CLOSE < MA(CLOSE,13)*1.3;
Var15:=100*(CLOSE-ma(AMOUNT/(100*vol),5))/ma(AMOUNT/(100*vol),5)<-10AND CLOSE < 10 AND CLOSE/REF(CLOSE,1) > 0.935;
STICKLINE(Var12 > 0 OR Var10 > 0 OR Var14 > 0 OR Var15 > 0,l*0.87,l*0.8,5,0),linethick4,COLOR3F0BF0;
var21:=(close-llv(low,60))/(hhv(high,60)-llv(low,60))*100;
var22:=sma(var21,5,1);
var23:=sma(var22,10,1);
var24:=cross(var23,var22);
var25:=var23>80 or var22>80;
var26:=var24 and var25;
var27:=ema(amount/vol/100,3);
var28:=ema(var27,88);
var29:=ema(var27,88)*0.85;
vara:=var29*0.87;
varb:=low<vara and close>ref(close,1)*1.02;
DRAWICON(filter(varb,6),low*0.85,10);
DRAWICON(filter(cross(-5,ma((llv(low,45)-close)/(hhv(high,45)-llv(low,45))*100,5)),5),low*0.95,10);
drawtext(filter(cross(-5,ma((llv(low,45)-close)/(hhv(high,45)-llv(low,45))*100,5)),5),low*0.95,'->买'),colorred;
DRAWICON(filter(cross(75,sma(max(close-ref(close,1),0),8,1)/sma(abs(close-ref(close,1)),8,1)*100),10),high*1.05,11);
drawtext(filter(cross(75,sma(max(close-ref(close,1),0),8,1)/sma(abs(close-ref(close,1)),8,1)*100),10),high*1.05,'->卖'),colorblue;
DRAWICON(var26,high*1.2,11);
drawtext(var26,high*1.2,'->坚决卖'),colorblue;
Var34:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
Var35:=(HIGH+LOW+CLOSE)/3;
Var36:=(Var35-MA(Var35,14))/(0.015*AVEDEV(Var35,14));
Var37:=(Var35-MA(Var35,70))/(0.015*AVEDEV(Var35,70));
Var38:=IF(Var36>=150 AND Var36<200 AND Var37>=150 AND Var37<200,10,0);
Var39:=IF(Var36<=-150 AND Var36>-200 AND Var37<=-150 AND Var37>-200,-10,Var38);
Var40:=100-ABS((CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100);
Var41:=IF(Var40<90,Var40,100);
Var42:=IF(Var34>0,Var34,0);
Var43:=IF(Var37>=200 AND Var36>=150,15,IF(Var37<=-200 AND Var36<=-150,-15,Var39))+60;
Var44:=Var42>48 AND Var43>60 AND Var41<100;
DRAWTEXT(Var44 AND COUNT(Var44,30)=1,h*1.1,'大笔出货');
Var51:=AMOUNT/VOL/100;
Var52:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
Var53:=SUM(AMOUNT,7)/Var51/100;
Var54:=DMA(Var52,VOL/Var53);
Var55:=(CLOSE-Var54)/Var54*100;
Var56:=MA(Var55,20)+STD(Var55,20);
Var57:=MA(Var55,20)+1.732*STD(Var55,20);
BIAS18:=(CLOSE-MA(CLOSE,18))/MA(CLOSE,18)*100;
Var58:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
Var59:=SMA(Var58,3,1);
STICKLINE(REF(BIAS18,1)>=5 AND CROSS(Var56,Var55) AND Var59>79 ,h*1.05,h*1.1,5,0),color0099ff;
STICKLINE(REF(BIAS18,1)>=5 AND CROSS(Var57,Var55) AND Var59>79,h*1.05,h*1.1,5,0),color0099ff;
Var60:=ma(100*(winner(1.1*c)-winner(0.9*c)),5)/ma(100*(winner(1.1*c)-winner(0.9*c)),34);
DRAWTEXT(FILTER(cross(ma(Var60,4),Var60)and Var60>1,55),压力*1.05,'变盘'),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;
超跌:STICKLINE(KS>=8,H,L,0,1),colorblue,linethick2;
反弹:STICKLINE(MLS=1,H,L,0,1),colorred,linethick2;
STICKLINE(KS>=8,O,C,8,1),colorblue,linethick2;
STICKLINE(MLS=1,O,C,8,1),colorred,linethick2;
h0:=v/capital;
a1:=IF(h0>0,AMOUNT,ma(c,2)*v*100);
ma1:=ema(a1,3)/ema(v,3)/100,colorff00ff;;
ma2:= ema(a1,7)/ema(v,7)/100,colorgreen;
mae:=ema(a1,10)/ema(v,10)/100,colorffffff;
stickline(ma1>ma2,ref(mae,1),mae,6,0),coloryellow;
stickline(ma1<ma2,ref(mae,1),mae,6,0),colorblue;
KOH:=L>REF(H,1);
KOL:=H<REF(L,1);
HIF:=L>REF(H,BARSLAST(KOH)+1);
NHIF:=L<=REF(H,BARSLAST(KOH)+1);
LIF:=H<REF(L,BARSLAST(KOL)+1);
NLIF:=H>=REF(L,BARSLAST(KOL)+1);
DRAWICON(HIF AND barslast(koh)<barslast(nhif) and BARSLAST(HIF)<BARSLAST(NHIF),REF(H,BARSLAST(KOH)+1),10),ALIGN0;
DRAWICON(LIF AND barslast(kol)<barslast(nlif) and BARSLAST(LIF)<BARSLAST(NLIF),REF(L,BARSLAST(KOL)+1),11),ALIGN0;
A:=(EMA(((AMOUNT)/(VOL))/(100),21)+EMA(((AMOUNT)/(VOL))/(100),34)+EMA(((AMOUNT)/(VOL))/(100),55))/(3),linethick0,Color008000;
DRAWTEXT(CROSS(EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4),2.8),h*1.04,'警惕！！ '),colorblue;
DRAWTEXT(CROSS(EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4),3.2),h*1.08,'逢高减磅'), ,;
DRAWTEXT(CROSS(EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4),3.5),h*1.12,'出局？ '), , ;
{当前周期计算}
停止交易周期数:=DATEDIFF(ref(DATE,1),DATE)-1;
停止交易星期数:=停止交易周期数/7;
停止交易整星期数:=FLOOR(停止交易星期数);
超出周期数:=停止交易周期数-停止交易整星期数*7;{1-6}
周末休市日期数:=2*停止交易整星期数;
当前星期:=WEEKDAY;
当前为周末:=当前星期=6 or 当前星期=0;
超出休市数:=count(当前为周末,超出周期数);
休市周期数:=周末休市日期数+超出休市数;
停牌周期数:=停止交易周期数-休市周期数-2;
停牌周期数小于十:=停牌周期数<10 and 停牌周期数>0;
停牌周期数大于等于十:=停牌周期数>=10;
停牌周期数字符串:= NUMTOSTR(停牌周期数,0);
drawtext(停牌周期数>0,low,'停牌'),align2,color8B8B7A;
drawtext(停牌周期数小于十,low,' 周期'),align1,color8B8B7A;
drawtext(停牌周期数大于等于十,low,'周期'),align1,color8B8B7A;
DRAWNUMBER(停牌周期数>0,low,停牌周期数,0),colorwhite;
JJ:=(OPEN+HIGH+LOW+CLOSE)/4;
AA:=IF(BETWEEN(C,JJ,H) OR C=O,vol,0);
BB:=IF(BETWEEN(C,JJ,L),vol,0);
CC:=IF(AA and BB,0,vol/3);
DDX:=10*(AA-(BB+CC))/IF(CAPITAL<1,SUM(vol,13),CAPITAL),LINETHICK0;
DDX1:=EMA(DDX,60)*60,COLOR00FFFF;
DDX2:=MA(DDX1,5),COLORFF00FF;
DDX3:=MA(DDX2,10),COLOR00FF00;
ww1:=FILTER(O<REF(L,1) and C>O and vol>REF(v,1),13);
LC:=REF(C,1);
JH:=SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100;
SZ:=FILTER(CROSS(JH,35) and cross(DDX1,DDX2),13);
SX:=FILTER(CROSS(JH,30) and cross(DDX1,DDX3),7);
SQ:=FILTER(CROSS(71,JH) and DDX<0 and cross(DDX3,DDX1),74);
SD:=FILTER(CROSS(80,JH) and DDX<0 and cross(DDX2,DDX1),74);
AA:=IF(CAPITAL<1,SZ,SX);
BB:=IF(CAPITAL<1,SQ,SD);
CC:=REF(HHV(CLOSE,120),1);DD:=REF(LLV(CLOSE,120),1);
WW:=((100 * (CLOSE - DD)) / (CC - DD));EE:=AMOUNT;
FF:=(EMA(EE,5) / REF(EMA(EE,5),5));
霸占:=FILTER(((((((FF >= 2)) AND (WW < 35))) AND (BARSCOUNT(CLOSE) > 30)) OR (((((FF >= 2)) AND (WW < 100))) AND (BARSCOUNT(CLOSE) < 50))),90);
STICKLINE(霸占,CLOSE,OPEN,10,0),color0000FF;
STICKLINE(霸占,HIGH,LOW,1,0),color0000FF;
STICKLINE(ww1,CLOSE,OPEN,10,0),colorMagenta;
STICKLINE(ww1,HIGH,LOW,1,0),colorMagenta;
STICKLINE(AA,CLOSE,OPEN,10,0),colorYellow;
STICKLINE(AA,HIGH,LOW,1,0),colorYellow;
STICKLINE(BB,CLOSE,OPEN,10,0),Color00FF00;
STICKLINE(BB,HIGH,LOW,1,0),Color00FF00;
DRAWTEXTEX(c,1,180,0,'红色牛股'),Color0000FF;
DRAWTEXTEX(c,1,280,0,'黄色买入'),Color00FFFF;
DRAWTEXTEX(c,1,380,0,'粉色洗盘'),ColorFF00FF;
DRAWTEXTEX(c,1,480,0,'绿色卖出'),Color00FF00;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
