查看完整版本: {美景如画之碧海蓝天}

{美景如画之碧海蓝天}

　　
　　DRAWGBK(C=C,COLORRGB(200,440,660),COLORRGB(800,300,100),1);

　　zqmacd:=DATATYPE;

　　rmacd:=OPENMINUTES(TIME);

　　zsmacd:=ref(c,rmacd);

　　zsrmacd:=DYNAINFO( 3);

　　jmacd:=SUM(C*V,SUMBARS(VOL,CAPITAL))/SUM(V,SUMBARS(VOL,CAPITAL));

　　jjmacd:=SUM(C*V,0)/SUM(V,0);

　　jjmacd1:=SUM(C*V,rmacd)/SUM(V,rmacd)LINETHICK0;

　　jjamacd:=if(zqmacd=6,jjmacd,if(zqmacd=1,jjmacd1,jjmacd));

　　zsamacd:=if(zqmacd=6,zsrmacd,if(zqmacd=1,zsmacd,zsrmacd));

　　crmacd:=if(zqmacd=6,c>0,if(zqmacd=1,rmacd>1,c>0));

　　PARTLINE(crmacd,zsamacd),COLORGRAY,POINTDOT;

　　dkmacd:=(SMA(C,2,1)-SMA(C,6,1))*2.1,LINETHICK0;

　　FILLRGN(dkmacd>0 and jjamacd>0 ,zsamacd,ZSamacd+dkmacd),ColorB40084;

　　FILLRGN(dkmacd<=0 and jjamacd>0 ,zsamacd,ZSamacd+dkmacd),Color80A180;

　　///如觉得MACD影响K线以上原码可删除

　　{阴柱}

　　STICKLINE(open>=close ,H ,L,2,0 ),COLORGREEN;

　　STICKLINE(open>=close ,close ,open,8,0 ),COLOR008800;

　　STICKLINE(open>=close ,close ,open,7,0 ),COLOR009900;

　　STICKLINE(open>=close ,close ,open,6,0 ),COLOR00AA00;

　　STICKLINE(open>=close ,close ,open,5,0 ),COLOR00BB00;

　　STICKLINE(open>=close ,close ,open,4,0 ),COLOR00CC00;

　　STICKLINE(open>=close ,close ,open,3,0 ),COLOR00DD00;

　　STICKLINE(open>=close ,close ,open,2,0 ),COLOR00EE00;

　　STICKLINE(open>=close ,close ,open,1,0 ),COLOR00FF00;

　　{红柱}

　　STICKLINE(close>open,H,L,2,0) ,COLORRED;

　　STICKLINE(close>open,close,open,8,0) ,COLORFF00FF;

　　STICKLINE(close>open,close,open,7,0) ,COLORFF22FF;

　　STICKLINE(close>open,close,open,6,0) ,COLORFF44FF;

　　STICKLINE(close>open,close,open,5,0) ,COLORFF66FF;

　　STICKLINE(close>open,close,open,4,0) ,COLORFF88FF;

　　STICKLINE(close>open,close,open,3,0) ,COLORFF99FF;

　　STICKLINE(close>open,close,open,2,0) ,COLORFFAAFF;

　　STICKLINE(close>open,close,open,1,0) ,COLORFFBBFF;

　　{直线板K}

　　STICKLINE(h=l and c=o  and (c/ref(c,1))>1.048,h,l,8,0) ,COLORRED;

　　STICKLINE(h=l and c=o  and (ref(c,1)/c)>1.048,h,l,8,0) ,COLOR00FF00;

　　/////////

　　VAR1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

　　VAR2:=SMA(VAR1,3,1);

　　VAR3:=(SMA(VAR2,3,1)/2+40)*1.1-3*1;

　　VAR4:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;

　　VAR5:=SMA(VAR4,3,1)/2*1.1+3;

　　DRAWICON(IF(CROSS(VAR3,VAR5),15,0),LOW*0.998,1),ALIGN;

　　DRAWTEXT(IF(CROSS(VAR3,VAR5),15,0),LOW*0.993,'←破浪'),colorFF,ALIGN;

　　V70W1:=AMOUNT/VOL/100;

　　V70W:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

　　V7S:=SUM(AMOUNT,3)/V70W1/100;

　　CYC3:=(IF(DATE<9999998,DMA(V70W,VOL/V7S),0));

　　蓝天:EMA(CYC3,3),LINETHICK1,COLORYELLOW;

　　碧海:EMA(CYC3,8),LINETHICK1,COLORWHITE;

　　VARYZ1:=EMA(CLOSE,2)-EMA(CLOSE,89);

　　VARYZ2:=EMA(VARYZ1,30);

　　VARYZ3:=2*(VARYZ1-VARYZ2)*10;

　　VARYZ4:=POW(VARYZ3,3)*0.1+POW(VARYZ3,2);

　　VARYZ5:=(IF(YEAR<9999 AND VARYZ3>0.015,VARYZ4,0))/45;

　　乘风:VARYZ5>0,LINETHICK,COLORYELLOW;

　　PARTLINE(VARYZ5>0,乘风),LINETHICK2,COLORYELLOW;

　　VARYZ6:=EMA(CLOSE,2)-EMA(CLOSE,150);

　　VARYZ7:=EMA(VARYZ6,100);

　　VARYZ8:=2*(VARYZ6-VARYZ7);

　　VARYZ9:=POW(VARYZ8,3)*0.1+POW(VARYZ8,1);

　　VARYZ10:=(IF(VARYZ8>0.1,VARYZ9,0))*5;

　　破浪:VARYZ10>0 AND VARYZ5,LINETHICK,COLORMAGENTA;

　　PARTLINE(VARYZ10>0 AND VARYZ5,蓝天),LINETHICK2,COLORMAGENTA;

　　VARYZ11:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;

　　PARTLINE(VARYZ11>0,碧海),COLORRED,LINETHICK2;

　　DRAWICON(VARYZ5=0 AND VARYZ10=0 AND VARYZ11>0,蓝天,11);

　　回航:VARYZ5=0 AND VARYZ10=0 AND VARYZ11<0,LINETHICK,colorFF00;

　　PARTLINE(VARYZ5=0 AND VARYZ10=0 AND VARYZ11<0,蓝天),LINETHICK1,colorFF00;

　　VARC1:=AMOUNT/VOL/100;

　　VARC2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

　　VARC3:=SUM(AMOUNT,83)/VARC1/100;

　　VAR10:=MA(CLOSE,80)-MA(CLOSE,10)/3;

　　DRAWTEXT(IF(CLOSE<VAR10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08

　　AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.99,'●'),colorFFFFFF,ALIGN;

　　DRAWTEXT(IF(CLOSE<VAR10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08

　　AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.98,'←乘风'),coloree;

　　VAR11:=REF(CLOSE,1);

　　VAR12:=(SMA(MAX(CLOSE-VAR11,0),18,1))/(SMA(ABS(CLOSE-VAR11),18,1))*100;

　　DRAWICON(CROSS(79,VAR12),HIGH*1.02,2);

　　DRAWTEXT(CROSS(79,VAR12),HIGH*1.01,' ●'),colorFFFFFF,ALIGN;

　　DRAWTEXT(CROSS(79,VAR12),HIGH*1.03,' ←坚决砸空'),colorFFFFFF;

　　VAR1C:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

　　VAR2C:=SMA(VAR1C,5,1);

　　VAR3C:=SMA(VAR2C,10,1);

　　VAR4C:=CROSS(VAR3C,VAR2C);

　　VAR5C:=VAR3C>80 OR VAR2C>80;

　　VAR6C:=VAR4C AND VAR5C;

　　DRAWTEXT(VAR6C,HIGH*1.01,'杀多'),colorFF00;

　　VAR1:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);

　　VAR2:=VAR1+VAR1*34/100;

　　VAR3:=LOW;

　　VAR4:=REF(LOW,1);

　　VAR5:=(SMA(ABS(VAR3-VAR4),3,1))/(SMA(MAX(VAR3-VAR4,0),17,1))*100;

　　cycmax:=dma(AMOUNT/(100*vol),vol/capital);

　　VAR6:=(MA(IF(CLOSE*1.68<=CYCMAX,VAR5*10,VAR5/10),17));

　　VAR7:=LLV(LOW,30);

　　VAR8:=HHV(VAR6,30);

　　VAR9:=(MA(IF(LOW<=VAR7,(VAR6+VAR8*2)/2,0),17));

　　VARA:=(2*CLOSE+HIGH+LOW)/4;

　　VARB:=LLV(LOW,34);

　　VARC:=HHV(HIGH,34);

　　VARD:=EMA((VARA-VARB)/(VARC-VARB)*100,6);

　　VARE:=(EMA(0.667*REF(VARD,1)+0.333*VARD,4));

　　VARF:=LLV(LOW,120);

　　VAR10:=HHV(HIGH,120);

　　VAR11:=VAR10-VARF;

　　DRAWTEXT(IF((COUNT(CLOSE<REF(CLOSE,1),8))/8>0.3 AND COUNT(VARD>VARE,3) AND REF(LOW,1)=LLV(LOW,120) AND

　　CLOSE>OPEN,1,0) OR VAR9>40000,LOW,'开多\n预警'),colorFF;

　　VAR12:=MA(CLOSE,5);

　　VAR13:=MA(CLOSE,30);

　　VAR14:=MA(CLOSE,60);

　　VAR15:=REF(CLOSE,1);

　　VAR16:=(SMA(MAX(CLOSE-VAR15,0),6,1))/(SMA(ABS(CLOSE-VAR15),6,1))*100;

　　VAR17:=REF(CLOSE,1);

　　VAR18:=(SMA(MAX(CLOSE-VAR17,0),6,1))/(SMA(ABS(CLOSE-VAR17),6,1))*100;

　　DRAWTEXT(CROSS(84,VAR16) AND CROSS(84,VAR18),HIGH*1.006,'空\n B'),colorEEFF;

　　VAR1:=INDEXV*INDEXc;

　　VAR2:=EMA(VAR1,5)/EMA(INDEXV,5);

　　VAR3:=(INDEXc-VAR2)/VAR2*100;

　　VAR4:=VAR3<=-1.5 AND VAR3>-100;

　　VAR5:=(SUM(VAR4>0,17))/(SUM(VAR4=0,17));

　　VAR6:=VAR5<5 AND VAR5>=0.25;

　　VAR7:=(LOW+HIGH+CLOSE)/3;

　　VAR8:=(VAR7-MA(VAR7,4))/(0.015*AVEDEV(VAR7,4));

　　VAR9:=EMA(VAR8,3);

　　VARA:=(HIGH+LOW+CLOSE)/3;

　　VARB:=SUM(MAX(0,HIGH-REF(VARA,1)),26)/(SUM(MAX(0,REF(VARA,1)-LOW),26))*100;

　　VARC:=REF(MA(VARB,3),2.2);

　　VARD:=REF(MA(VARB,13),6.2);

　　VARE:=REF(MA(VARB,89),36.6);

　　VARF:=CROSS(VARC,VARB) AND VARB>150;

　　VAR10:=MA(CLOSE,5);

　　VAR11:=MA(CLOSE,10);

　　VAR12:=(VAR10-CLOSE)/CLOSE>0.03;

　　VAR13:=(VAR11-VAR10)/VAR10>0.03;

　　VAR14:=LLV(CLOSE,30)=LLV(CLOSE,120);

　　VAR15:=LLV(LOW,5)=LLV(LOW,45) AND CLOSE>=OPEN*1.04;

　　VAR16:=CLOSE>(REF(HIGH,1)+REF(LOW,1))/2;

　　VAR17:=VAR15 AND VAR16;

　　DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),HIGH*1.006,'空\nA'),colorEEFF;

　　V70W1:=AMOUNT/VOL/100;

　　V70W:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

　　V7S:=SUM(AMOUNT,1)/V70W1/100;

　　V7X:=SUM(AMOUNT,5)/V70W1/100;

　　V7Z:=SUM(AMOUNT,10)/V70W1/100;

　　CYC3:=DMA(V70W,VOL/V7S);

　　CYC5:=DMA(V70W,VOL/V7X);

　　CYC9:=DMA(V70W,VOL/V7Z);

　　上去:=EMA(CYC3,3);

　　下来:=EMA(CYC3,5);

　　中间:=EMA(下来,5);

　　DRAWTEXT(CROSS(上去,中间),LOW*0.999,'\n开多'),colorFF;

　　DRAWTEXT(CROSS(上去,下来),LOW*0.999,' \n多'),colorFFFFFF;

　　DRAWTEXT(CROSS(下来,上去),HIGH*1.002,'开空'),colorFF00;

　　VAR101:=MA(SLOPE(CLOSE,3)/REF(CLOSE,14),13);

　　VAR102:=MA(SLOPE(INDEXC,3)/REF(INDEXC,14),13);

　　VAR103:=VAR101-VAR102;

　　VAR104:=SMA(VAR103,3,1);

　　VAR105:=AMOUNT/100000000;

　　VAR106:=(IF(CLOSE>REF(CLOSE,1),VAR105,IF(CLOSE<REF(CLOSE,1),(-1)*VAR105,0)));

　　VAR107:=SUM(VAR106,21);

　　VAR108:=VAR107*CLOSE;

　　VAR109:=SMA(VAR108,3,1);

　　VAR110:=SMA(VAR109,3,1);

　　VAR111:=MA(VAR108,30);

　　VAR112:=(IF(VAR108>VAR109 AND VAR109>VAR110 AND VAR108>VAR111,1,0));

　　VAR113:=EMA(CLOSE,12.5)-EMA(CLOSE,25);

　　VAR114:=EMA(VAR113,13);

　　VAR115:=(VAR113-VAR114)*2;

　　VAR116:=(IF(VAR115>0.3,POW(VAR115,3)*5/10+POW(VAR115,2),0));

　　VAR117:=EMA(VAR116,3);

　　VAR118:=SMA((CLOSE-LLV(LOW,31))/(HHV(HIGH,31)-LLV(LOW,31))*100,5,1);

　　VAR119:=3*VAR118-2*SMA(VAR118,3,1);

　　VAR120:=SMA(VAR119,3,1);

　　VAR121:=(IF(VAR119>VAR120 AND VAR119<50,1,0));

　　VAR122:=(IF(BARSLAST(CROSS(VAR103,VAR104))<=5 AND LLV(VAR103,10)=LLV(VAR103,60) AND VAR112,1,0));

　　DRAWTEXT(FILTER(VAR121=1 AND VAR122=1,5),LOW*0.97,'↑多入'),PXUP14,colorFF00FF;

　　DRAWTEXT(CROSS(VAR104*10000,99),HIGH*1.03,'↓多出'),PXUP14,colorFF00FF;

　　／／／／／／
[attach]14443[/attach]