通达信筹码指标_通达信主图指标_老张实用小公式6：妞妞角度线

轻装应战/副图 原码 贴图

{妞妞角度线} AS4:=BACKSET(ISLASTBAR,250); XC4:STICKLINE(CROSS(AS4,0.5),CONST(HHV(H,120)),CONST(LLV(L,120)),0,-1),COLOR0000B0; AS3:=BACKSET(ISLASTBAR,120); XC3:STICKLINE(CROSS(AS3,0.5),CONST(HHV(H,120)),CONST(LLV(L,120)),0,-1),COLOR0000B0; AS2:=BACKSET(ISLASTBAR,60); XC2:STICKLINE(CROSS(AS2,0.5),CONST(HHV(H,120)),CONST(LLV(L,120)),0,-1),COLOR0000B0; AS1:=BACKSET(ISLASTBAR,30); XC1:STICKLINE(CROSS(AS1,0.5),CONST(HHV(H,120)),CONST(LLV(L,120)),0,-1),COLOR0000B0; NH:=120; TB:=HHV(HIGH,NH); TBT:=HHVBARS(HIGH,NH),COLORCYAN,NODRAW; TH:BARSLAST(CURRBARSCOUNT=CONST(TBT)+1),COLORCYAN,NODRAW; NL:=30; TA:=LLV(LOW,NL); TAT:=LLVBARS(LOW,NL); TL:BARSLAST(CURRBARSCOUNT=CONST(TAT)+1),COLORFFAAFF,NODRAW; NOTEXTH1:DRAWLINE(TH=0,HIGH,ISLASTBAR,REF(HIGH,TBT),0),COLORGREEN;{水平线} NOTEXTL1:DRAWLINE(TL=0,L,ISLASTBAR,REF(L,TAT),0),COLORGREEN;{水平线} RX1:DRAWBAND((NOTEXTH1-NOTEXTL1)*0.618+NOTEXTL1,RGB(0,60,60), (NOTEXTH1-NOTEXTL1)*0.50+NOTEXTL1,RGB(0,0,0)); RX2:DRAWBAND((NOTEXTH1-NOTEXTL1)*0.50+NOTEXTL1,RGB(20,100,30), (NOTEXTH1-NOTEXTL1)*0.382+NOTEXTL1,RGB(0,0,0)); X06:DRAWTEXT(CURRBARSCOUNT=10,(NOTEXTH1-NOTEXTL1)*0.45+NOTEXTL1,’鱼身下’),COLORYELLOW; X07:DRAWTEXT(CURRBARSCOUNT=10,(NOTEXTH1-NOTEXTL1)*0.55+NOTEXTL1,’鱼身上’),COLORYELLOW; KW:DRAWKLINE(H,O,L,C); NOTEXTH2:DRAWLINE(TH=0,HIGH,ISLASTBAR,TB*(1-TBT*0.01),0),COLORWHITE; NOTEXTH3:DRAWLINE(TH=0,HIGH,ISLASTBAR,TB*(1-TBT*0.02),0),COLORYELLOW,LINETHICK2; NOTEXTH4:DRAWLINE(TH=0,HIGH,ISLASTBAR,TB*(1-TBT*0.03),0),COLORWHITE; NOTEXTH5:=DRAWLINE(TH=0,HIGH,ISLASTBAR,TB*(1-TBT*0.04),0),COLORWHITE; NOTEXTL2:DRAWLINE(TL=0,L,ISLASTBAR,TA*(1+TAT*0.01),0),COLORWHITE; NOTEXTL3:DRAWLINE(TL=0,L,ISLASTBAR,TA*(1+TAT*0.02),0),COLORYELLOW,LINETHICK2; NOTEXTL4:DRAWLINE(TL=0,L,ISLASTBAR,TA*(1+TAT*0.03),0),COLORWHITE; NOTEXTL5:=DRAWLINE(TL=0,L,ISLASTBAR,TA*(1+TAT*0.04),0),COLORWHITE; 期间跌幅:(NOTEXTL1-NOTEXTH1)/NOTEXTH1*100,COLORWHITE,NODRAW; NOTEXTD50:=(NOTEXTH1-NOTEXTL1)*0.5+NOTEXTL1,COLORMAGENTA,DOTLINE; NOTEXTD40:=(NOTEXTH1-NOTEXTL1)*0.382+NOTEXTL1,COLORLIBLUE,DOTLINE; NOTEXTD60:=(NOTEXTH1-NOTEXTL1)*0.618+NOTEXTL1,COLORLIBLUE,DOTLINE; NOTEXTD80:(NOTEXTH1-NOTEXTL1)*0.809+NOTEXTL1,COLORLIBLUE,DOTLINE; NOTEXTD20:(NOTEXTH1-NOTEXTL1)*0.191+NOTEXTL1,COLORLIBLUE,DOTLINE; 鱼身空间:(NOTEXTD60-C)/C*100,COLORYELLOW,NODRAW; X00:DRAWNUMBER(ISLASTBAR,NOTEXTD60,NOTEXTD60),COLORGREEN; X01:DRAWTEXT(ISLASTBAR,NOTEXTD80,’80.9%’),COLORLIGRAY; X02:=DRAWTEXT(ISLASTBAR,NOTEXTD60,’61.8%’),COLORLIGRAY; X03:=DRAWTEXT(ISLASTBAR,NOTEXTD50,’50%’),COLORLIGRAY; X04:=DRAWTEXT(ISLASTBAR,NOTEXTD40,’38.2%’),COLORLIGRAY; X05:DRAWTEXT(ISLASTBAR,NOTEXTD20,’19.1%’),COLORLIGRAY; ZT:=C>=ZTPRICE(REF(C#DAY,1),0.1) AND C=H; DT:=C<=DTPRICE(REF(C#DAY,1),0.1) AND C=L; BA:STICKLINE(ZT,(H+L)/2,CLOSE,0,0),COLORYELLOW; BC:STICKLINE(DT,(H+L)/2,CLOSE,0,0),COLORBLUE; DA:=YEAR AND MONTH AND DAY; AXA:=STRCAT(CON2STR(YEAR,0),’年’); AAB:=STRCAT(CON2STR(MONTH,0),’月’); AA33:=STRCAT(CON2STR(DAY,0),’日’); AA4:=STRCAT(‘【’,IF(WEEKDAY=1,’一’,IF(WEEKDAY=2,’二’,IF(WEEKDAY=3,’三’, IF(WEEKDAY=4,’四’,IF(WEEKDAY=5,’五’,IF(WEEKDAY=6,’六’,’日’))))))); AA1:=STRCAT(STRCAT(STRCAT(AXA,AAB),STRCAT(AA33,AA4)),’】’); S1:DRAWTEXT_FIX(DA,0,1,0,AA1),COLORGREEN; TJG:=NOT(NAMELIKE(‘S’) OR NAMELIKE(‘*S’)) AND DYNAINFO(8)>0;

红线上穿绿线买简单实用源码 副图 通达信 贴图