云枫版 立庄量 （主图 、原码 、说明） 一、立庄量是指标前辈的精华思想，云枫在此表示感谢。 AAA:=(3*C+H+L+O)/6; VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36; VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3; VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3; VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3; VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3; VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; DRAWBAND(VAR1,RGB(155,50,50),VAR6,RGB(250,250,0)); 短线:VAR1,COLORWHITE; 中线:VAR6,COLORYELLOW; 下跌:IF(VAR1=VAR6,VAR6,DRAWNULL),COLORGREEN; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1; 立桩量:=FILTER(TJ1,5); TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0))); 突破:=TJ2=1; STICKLINE(CLOSE,REF(HIGH,BARSLAST(立桩量)),REF(HIGH,BARSLAST(立桩量)),1,0),COLORCYAN; STICKLINE(CLOSE,REF(LOW,BARSLAST(立桩量)),REF(LOW,BARSLAST(立桩量)),1,0),COLORYELLOW; TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0))); 三天法则:=TJ3=1; 成立:=三天法则 AND 突破; 条件成立:=FILTER(成立,3); DRAWTEXT(条件成立,L*0.99,'成立'),COLORYELLOW; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3.2,0 ),COLOR001100; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.7,0 ),COLOR007700; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.1,0 ),COLOR009900; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.8,0 ),COLOR00AA00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0.9,0 ),COLOR00BB00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0.2,0 ),COLOR00CC00; STICKLINE(OPEN>=CLOSE,H,L,0,0),COLOR00CC00; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.2,0) ,COLOR000066; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.7,0) ,COLOR000099; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.1,0) ,COLOR0000AA; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.8,0) ,COLOR0000DD; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.8,0) ,COLOR0000FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.2,0) ,COLORCC66FF; STICKLINE(CLOSE>OPEN,H,L,0,0),COLORCC66FF; DRAWRECTREL(0,580,100,960,RGB(150,0,0)); DRAWRECTREL(100,580,200,960,RGB(0,150,150)); DRAWRECTREL(200,725,300,960,RGB(150,0,150)); 日K:="KD.K"(9,3,3); 日D:="KD.D"(9,3,3); 月K:="KDJ.K#MONTH"(9,3,3); 月D:="KDJ.D#MONTH"(9,3,3); 周K:="KDJ.K#WEEK"(9,3,3); 周D:="KDJ.D#WEEK"(9,3,3); DRAWTEXT_FIX(ISLASTBAR,0.04,0.60,0,'KDJ '),COLOR00FFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.65,0,'日K='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.05,0.65,0,日K),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.7,0,'日D='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.05,0.7,0,日D),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.75,0,'周K='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.05,0.75,0,周K),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.8,0,'周D='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.05,0.8,0,周D),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.85,0,'月K= '),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.05,0.85,0, 月K),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.9,0,'月D='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.05,0.9,0,月D),COLORFFFFFF; 日DIF:="MACD.DIF"(12,26,9); 日DEA:="MACD.DEA"(12,26,9); 周DIF:="MACD.DIF#WEEK"(12,26,9); 周DEA:="MACD.DEA#WEEK"(12,26,9); 月DIF:="MACD.DIF#MONTH"(12,26,9); 月DEA:="MACD.DEA#MONTH"(12,26,9); DRAWTEXT_FIX(ISLASTBAR,0.13,0.60,0,'MACD '),COLOR00FFFF; DRAWTEXT_FIX(ISLASTBAR,0.11,0.65,0,'日DIF='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.155,0.65,0,日DIF),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.11,0.7,0,'日DEA='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.155,0.7,0,日DEA),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.11,0.75,0,'周DIF='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.155,0.75,0,周DIF),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.11,0.8,0,'周DEA='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.155,0.8,0,周DEA),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.11,0.85,0,'月DIF= '),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.155,0.85,0, 月DIF),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.11,0.9,0,'月DEA='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.155,0.9,0,月DEA),COLORFFFFFF; TYP:=(HIGH+LOW+CLOSE)/3; 日CCI:=(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84)); 周CCI:=(TYP-MA(TYP,21))/(0.015*AVEDEV(TYP,21)); 月CCI:=(TYP-MA(TYP,9))/(0.015*AVEDEV(TYP,9)); DRAWTEXT_FIX(ISLASTBAR,0.235,0.75,0,'CCI'),COLOR00FFFF; DRAWTEXT_FIX(ISLASTBAR,0.206,0.80,0,'日CCI='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.250,0.80,0,日CCI),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.206,0.85,0,'周CCI='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.250,0.85,0,周CCI),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.206,0.90,0,'月CCI='),COLORFFFFFF; DRAWNUMBER_FIX(ISLASTBAR,0.250,0.90,0,月CCI),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0,0.98,0,'情绪冲动 未设止赢止损 短期暴涨 有疑问的企业 不要下单'),COLOREEEEEE;
|
