通達(dá)信牧牛主圖指標(biāo)公式
N1:=18; N2:=50; N3:=89; N4:=180; DRAWBAND(MA(C,18),RGB(185,20,30),MA(C,50),RGB(0,100,100));DRAWKLINE(H,O,L,C); MA18:MA(C,18),COLORWHITE; MA50:MA(C,50),COLORYELLOW; MA89:MA(C,N3),COLORFF00FF; MA180:MA(C,N4),COLORRED; 超買:=MA(C,10)*IF(CAPITAL=0,1.04,1.1),POINTDOT,COLORGREEN,LINETHICK2; DRAWTEXT(CROSS(MA(C,N1),MA(C,N2)),MA(C,N2)*0.99,↖金叉),LINETHICK2,COLORFF00FF; ; ZD:=100*(C-REF(C,1))/REF(C,1); 漲停:=ZD>=9.90; STICKLINE((漲停>0 AND C=H),O, H, 3, 0),LINETHICK3, COLORYELLOW; 大陽線:=ZD>=5.00 AND ZD<9.90; STICKLINE((大陽線>0 AND C<=H),O, C, 3, 0),LINETHICK3, COLORFF00FF; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<=MA(C,18)*1.03,H,C,0.05,0), COLOR0000FF; STICKLINE(CROSS(MA(C,18),MA(C,50))AND C<=MA(C,18)*1.03,C,O,3,0), COLOR0066FF; STICKLINE(CROSS(MA(C,18),MA(C,50))AND C<=MA(C,18)*1.03,O,L,0.05,0), COLOR0099FF; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<=MA(C,18)*1.03 AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,C,(C-O)/2+O,3,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,O,(C-O)/2+O,3,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,C,H,0.5,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,C,(C-O)/2+O,3,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,O,H,0.5,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,C,L,0.5,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,C,(C-O)/2+O,3,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,O,(C-O)/2+O,3,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,C,H,0.5,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,C,(C-O)/2+O,3,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,O,H,0.5,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,C,L,0.5,0),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0,0,所屬行業(yè):)COLOR0080FF; DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR0080FF; DRAWTEXT_FIX(1,0.12,0,0,所屬地區(qū):)COLOR00FFFF; DRAWTEXT_FIX(1,0.18,0,0,DYBLOCK)COLOR00FFFF; DRAWTEXT_FIX(1,0.00,0.06,0,主營業(yè)務(wù):)COLOR0000FF; DRAWTEXT_FIX(1,0.06,0.06,0,EXTERNSTR(0,1))COLOR0000FF; 年:=YEAR,NODRAW; 月:=MONTH,NODRAW; 星期:=WEEKDAY,NODRAW; 日1:=DATETODAY(DATE); 上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT); 自然日:=日1-DATETODAY(上市日)+1; ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0; 本周第幾天:=BARSLAST(ZB)+1; 本月第幾天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1; MA1:=REF(C,本周第幾天); MA2:=REF(MA1,本周第幾天); MA3:=REF(MA2,本周第幾天); MA4:=REF(MA3,本周第幾天); MA5:=REF(MA4,本周第幾天); MA6:=REF(MA5,本周第幾天); MA7:=REF(MA6,本周第幾天); MA8:=REF(MA7,本周第幾天); MA9:=REF(MA8,本周第幾天); 五周價(jià):=(C+MA1+MA2+MA3+MA4)/5; 五周:=REFDATE(五周價(jià),DATE),COLOR9E9E21,LINETHICK1; CC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORWHITE; 止贏:1.05*CC,COLORYELLOW,NODRAW; 止損:0.97*CC,COLORFF00FF,NODRAW; N:=15; A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N); A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N); E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2; E2:=(H+L)/2; H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1; L1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2); X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1)); G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1); L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1; X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2)); G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1); R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); S1:=R1>REF(R1,1); T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); U1:=T1>REF(T1,1); R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2>REF(R2,1); T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2); U2:=T2>REF(T2,1); NOTEXT1:DRAWLINE(S2,H,S1,H,1),LINETHICK2,COLORRED; NOTEXT2:DRAWLINE(U2,L,U1,L,1),LINETHICK2,COLORGREEN; N1:=18; N2:=50; N3:=89; N4:=180; DRAWBAND(MA(C,18),RGB(185,20,30),MA(C,50),RGB(0,100,100));DRAWKLINE(H,O,L,C); MA18:MA(C,18),COLORWHITE; MA50:MA(C,50),COLORYELLOW; MA89:MA(C,N3),COLORFF00FF; MA180:MA(C,N4),COLORRED; 超買:=MA(C,10)*IF(CAPITAL=0,1.04,1.1),POINTDOT,COLORGREEN,LINETHICK2; DRAWTEXT(CROSS(MA(C,N1),MA(C,N2)),MA(C,N2)*0.99,↖金叉),LINETHICK2,COLORFF00FF; ; ZD:=100*(C-REF(C,1))/REF(C,1); 漲停:=ZD>=9.90; STICKLINE((漲停>0 AND C=H),O, H, 3, 0),LINETHICK3, COLORYELLOW; 大陽線:=ZD>=5.00 AND ZD<9.90; STICKLINE((大陽線>0 AND C<=H),O, C, 3, 0),LINETHICK3, COLORFF00FF; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<=MA(C,18)*1.03,H,C,0.05,0), COLOR0000FF; STICKLINE(CROSS(MA(C,18),MA(C,50))AND C<=MA(C,18)*1.03,C,O,3,0), COLOR0066FF; STICKLINE(CROSS(MA(C,18),MA(C,50))AND C<=MA(C,18)*1.03,O,L,0.05,0), COLOR0099FF; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<=MA(C,18)*1.03 AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,C,(C-O)/2+O,3,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,O,(C-O)/2+O,3,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,C,H,0.5,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,C,(C-O)/2+O,3,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,O,H,0.5,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,C,L,0.5,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,C,(C-O)/2+O,3,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,O,(C-O)/2+O,3,0),COLORRED; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,C,H,0.5,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,C,(C-O)/2+O,3,0),COLORYELLOW; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,O,H,0.5,0),COLORFFFF80; STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,C,L,0.5,0),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0,0,所屬行業(yè):)COLOR0080FF; DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR0080FF; DRAWTEXT_FIX(1,0.12,0,0,所屬地區(qū):)COLOR00FFFF; DRAWTEXT_FIX(1,0.18,0,0,DYBLOCK)COLOR00FFFF; DRAWTEXT_FIX(1,0.00,0.06,0,主營業(yè)務(wù):)COLOR0000FF; DRAWTEXT_FIX(1,0.06,0.06,0,EXTERNSTR(0,1))COLOR0000FF; 年:=YEAR,NODRAW; 月:=MONTH,NODRAW; 星期:=WEEKDAY,NODRAW; 日1:=DATETODAY(DATE); 上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT); 自然日:=日1-DATETODAY(上市日)+1; ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0; 本周第幾天:=BARSLAST(ZB)+1; 本月第幾天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1; MA1:=REF(C,本周第幾天); MA2:=REF(MA1,本周第幾天); MA3:=REF(MA2,本周第幾天); MA4:=REF(MA3,本周第幾天); MA5:=REF(MA4,本周第幾天); MA6:=REF(MA5,本周第幾天); MA7:=REF(MA6,本周第幾天); MA8:=REF(MA7,本周第幾天); MA9:=REF(MA8,本周第幾天); 五周價(jià):=(C+MA1+MA2+MA3+MA4)/5; 五周:=REFDATE(五周價(jià),DATE),COLOR9E9E21,LINETHICK1; CC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORWHITE; 止贏:1.05*CC,COLORYELLOW,NODRAW; 止損:0.97*CC,COLORFF00FF,NODRAW; N:=15; A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N); A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N); E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2; E2:=(H+L)/2; H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1; L1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2); X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1)); G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1); L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1; X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2)); G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1); R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); S1:=R1>REF(R1,1); T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); U1:=T1>REF(T1,1); R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2>REF(R2,1); T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2); U2:=T2>REF(T2,1); NOTEXT1:DRAWLINE(S2,H,S1,H,1),LINETHICK2,COLORRED; NOTEXT2:DRAWLINE(U2,L,U1,L,1),LINETHICK2,COLORGREEN;
|