通达信〖短线掘金〗多条均线成本线成交量加权线及买卖源码

VAR84:=26;
VARP0:=10;
VAR0A := MA(vol, 4);
VARR7 := OPEN - LOW;
VAR51 := CLOSE;
VARU3:=16;
VARY7 := OPEN - LOW;
VARFK := OPEN - LOW;
VARIQ := 93;
VAR6W:EMA(COST(85),10),COLORWHITE,DOTLINE;
VARXE := OPEN - LOW;
VAR4Y := 90;
VAR6C := CLOSE;
VARJI:EMA(COST(99),10),COLORGREEN,DOTLINE;
VAREI := OPEN - LOW;
VARAG := REF(HIGH, 4);
VARID := MA(VOL, 9);
DRAWBAND(VAR6W,RGB(180,00,120), VARJI,RGB(10,60,58));
VARAN := REF(HIGH, 9);
VAR33 := MA(VOL, 10);
VARYT := MA(VOL, 3);
VAR90:(1+VARP0/100)*MA(CLOSE,VAR84),LINETHICK4,COLORGREEN;
VARFV := 37;
VARFT := 99;
VAR08 := 87;
VARB2:(1-VARU3/100)*MA(CLOSE,VAR84),LINETHICK4,COLORRED;
VARSD := MA(VOL, 8);
VARSN := CLOSE;
VAR2P := CLOSE;
NNG_78O := LLV(LOW, 52);
VARN9 := 82;
NNG_QD4 := EMA(CLOSE, 39);
VARBR := MA(VOL, 9);
NNG_9TI := HHV(HIGH, 49);
VARHN := OPEN - LOW;
VARZ2:(VAR90+VARB2)/2,POINTDOT,LINETHICK4,COLORYELLOW;
VARN7 := 70;
VARPT := MA(VOL, 5);
VARUU := OPEN - LOW;
DRAWGBK(C>0, RGB(10,10,20),RGB(10,10,20),0,'',0);
VARRP := MA(VOL, 7);
STICKLINE(C>=O, H, L, 0.8, 0), COLOR00FFFF;
VAR8Q := REF(HIGH, 7);
STICKLINE(C>=O, C, O, 3, 0), COLOR00FFFF;
VARRS := REF(HIGH, 3);
STICKLINE(C< O, H, L, 0.8, 0), COLORFF3232;
VARTL := MA(VOL, 3);
STICKLINE(C< O, C, O, 3, 0), COLORFF3232;
VARF3 := CLOSE;
VARWS:=((EMA(C,5)) * 7 + (EMA(C,10)) * 3) / 10;
VARRA:=IF((YEAR) >= (2025),0,1);
VARKA:=EMA(EMA(L,21) + (6.8) * (STD(L,2)),55);
VAR8B:=EMA(((C / (VARKA)) * ((1.88) * C + L + O)) / (2.75),3);
VARCY:=(((VAR8B) - (VARKA)) / (VARKA)) / 2;
VARUM:=(EMA((VAR8B) - ((VARCY) * (VAR8B)),5)) * (VARRA);
VARJS:=(((SMA(MAX(C - (REF(C,1)),0),24,1)) / (SMA(Abs(C - (REF(C,1))),24,1))) * (100)) * (VARRA);
VARCP:=MA(C,26) + 2 * (STD(C,26));
VARMF:=((SMA(MAX(C - (REF(C,1)),0),14,1)) / (SMA(ABS(C - (REF(C,1))),14,1))) * (100);
VARQA:=(EMA(C,60) + EMA(C,120) + EMA(C,240) + EMA(C,480)) / 4;
VARR8:=VARQA + (1.91) * (STD(VARQA,3));
VARGU:=(EMA(VARR8,12)) * (1.23);
DRAWKLINE(H,O,L,C);
VARNX:=(((((((((SMA(MAX(C - (REF(C,1)),0),24,1)) / (SMA(ABS(C - (REF(C,1))),24,1))) * (100)) > 65) AND ((VARWS) > (EMA(C,13)))) AND ((EMA(C,13)) > (EMA(C,55)))) AND ((VARCP) > (REF(VARCP,1)))) AND (C > (EMA((H + L + C) / 3,13)))) AND ((MA(C,5)) > (MA(C,10)))) AND ((crOSS(HHV(C,5),(MA(H,10)) * (1 + 5 / (100)))) AND ((((C - (REF(C,1))) / (REF(C,1))) * (100)) > (6.5)));
VARTW:=(IF((VARWS) > (VARUM),VARWS,VARUM)) * (VARRA),LINETHICK2,COLORYELLOW;
VART5:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORFF0080,LINETHICK4;
STICKLINE((((VARJS) >= (64.5)) AND ((VARMF) >= 65)) AND ((MA(C,1)) > (VARGU)),C,O,3,0),COLOR00FFFF;
VARPQ := REF(HIGH, 7);
STICKLINE((((VARJS) > 65) AND ((VARMF) >= 65)) AND ((MA(C,1)) > (VARGU)),H,L,0,0),COLOR00FFFF;
VARZF := CLOSE;
STICKLINE((((VARJS) >= (64.5)) AND ((VARMF) >= 65)) AND ((MA(C,1)) > (VARGU)),C,O,1,0),COLORLICYAN;
VAR8O := MA(VOL, 8);
DRAWTEXT(CROSS((VARUM < VARWS AND C>VARTW),0.5)AND C>REF(C,1),H*1.055,'▲机构抄底')COLORFF00FF;
DRAWTEXT((VARNX) > 0,L,'启爆点'),LINETHICK1,COLORCYAN;
VARD8 := MA(VOL, 8);
DRAWICON(CROSS((VARUM < VARWS AND C>VARTW),0.5)AND C>REF(C,1),H*1.0,26);
VARWG: MA(C,20), COLORWHITE;
VARZY: MA(C,50), COLORYELLOW;
VARKL := REF(HIGH, 6);
VARD2 := CLOSE;
VARJE := CLOSE;
VARXO := 73;
VARUI := 8;
VART6 := REF(HIGH, 8);
VAR23 := REF(HIGH, 2);
VARY1 := LLV(LOW, 45);
VARP7 := (HIGH - LOW) / CLOSE * 100;
VAR4A := SUM(VOL, 45);
NNG_5SH := SMA(CLOSE, 32, 1);
NNG_4TX := HHV(HIGH, 5);
NNG_JFP := (HIGH - LOW) / CLOSE * 100;
VARC2:=EMA((EMA(C,29) + EMA(C,31) + EMA(C,33)) / 3, 3);
VARKJ:=REF(VARC2,1);
VARIA:=EMA(C, 3);
VARFF:=EMA((SLOPE(C,22) * 20 + C), 55);
VARAD:=MA(VARFF, 1);
VARBM:=EMA(EMA(EMA(C,3),2),3);
VAR7U:=(VARBM - REF(VARBM,1)) + VARBM;
VAR4P:=MA(VAR7U, 15);
VAR2S:=(VAR7U > VAR4P AND VARIA > VARAD AND VARC2 > VARKJ);
VARM4:=CROSS(VAR2S, 0.5);
STICKLINE(C>O AND C>=REF(H,1), H, L, 0, 0), COLORYELLOW;
STICKLINE(C>O AND C>=REF(H,1), C, O, 3, 0), COLORYELLOW;
STICKLINE(C>O AND C< REF(H,1), H, L, 0, 0), COLORRED;
STICKLINE(C>O AND C< REF(H,1), C, O, 3, 0), COLORRED;
STICKLINE(C< O, H, L, 0, 0), COLORGREEN;
STICKLINE(C< O, C, O, 3, 0), COLORGREEN;
STICKLINE(C=O, H, L, 0, 0), COLORBLUE;
STICKLINE(C=O, C, O, 3, 0), COLORBLUE;
STICKLINE(VAR7U > VAR4P, H, L, 0.001, 0), COLORRED;
STICKLINE(VAR7U <= VAR4P, H, L, 0.001, 0), COLORGREEN;
VAR5H:MA(C,5),COLORWHITE;
VARNB:MA(C,10),COLORYELLOW;
VARII:MA(C,2),COLORMAGENTA;
VAR2B:MA(C,35),COLORGREEN;
VARV2:MA(C,60),COLORBLUE;
DRAWTEXT(VARM4, L*0.98, '★短线掘金'), COLORYELLOW;
STICKLINE(VARIA > VARAD, C, O, 0.1, -1), COLOR0000FF;