通达信〖暴力擒金牛〗指标公式源码

VARTCP:=EMA(100*(C-LLV(LOW, 34))/(HHV(H, 34)-LLV(LOW, 34)), 3);
DRAWBAND(VARTCP, RGB(255, 000, 139), 20, RGB(255, 255, 71));
控蟠线:VARTCP, COLORMAGENTA, LINETHICK2;
VARTCP1:=(CLOSE-LLV(LOW, 27))/(HHV(HIGH, 27)-LLV(LOW, 27))*100;
攻击线:=SMA(VARTCP1, 5, 1);
趋势线:=SMA(攻击线, 3, 1);
VAR1:=HHV(HIGH, 9)-LLV(LOW, 9);
VAR2:=HHV(HIGH, 9)-CLOSE;
VAR3:=CLOSE-LLV(LOW, 9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW, 60))/(HHV(HIGH, 60)-LLV(LOW, 60))*100;
VAR6:=(CLOSE+HIGH+LOW)/3;
VAR7:=SMA(VAR3/VAR1*100, 3, 1);
VAR8:=LLV(LOW, 34);
VAR9:=SMA(VAR7, 3, 1)-SMA(VAR4, 9, 1);
VARA:=IF(VAR9>100, VAR9-100, 0);
VARB:=HHV(HIGH, 34);
VARC:=EMA((VAR6-VAR8)/(VARB-VAR8)*100, 13);
VARD:=EMA(0.667*REF(VARC, 1)+0.333*VARC, 2);
VARE:=SMA(MAX(CLOSE-REF(CLOSE, 1), 0)/CLOSE, 8, 1)/SMA(Abs(INDEXC-REF(INDEXC, 1))/INDEXC, 8, 1)*100-25;
VARF:=MA(VARE, 3);
VAR11:=HHV(HIGH, 9)-LLV(LOW, 9);
VAR12:=HHV(HIGH, 9)-CLOSE;
VAR13:=CLOSE-LLV(LOW, 9);
VAR14:=((VAR12)/(VAR11))*(100)-70;
VAR15:=((CLOSE-LLV(LOW, 60))/(HHV(HIGH, 60)-LLV(LOW, 60)))*(100);
VAR16:=((2)*(CLOSE)+HIGH+LOW)/(4);
VAR17:=SMA(((VAR13)/(VAR11))*(100), 3, 1);
VAR18:=LLV(LOW, 34);
VAR19:=SMA(VAR17, 3, 1)-SMA(VAR14, 9, 1);
VAR110:=IF((VAR19>100), VAR19-100, 0);
VAR111:=HHV(HIGH, 34);
VAR112:=EMA(((VAR16-VAR18)/(VAR111-VAR18))*(100), 8);
生命线:EMA(VARD, 1), COLORYELLOW;
DRAWBAND(IF(VARTCP< 生命线, VARTCP, 20), RGB(15, 50, 239), 20, RGB(255, 255, 71));
STICKLINE(crOSS(控蟠线, 生命线)AND 生命线< 75, 控蟠线, 控蟠线+50, 5, 0), COLORYELLOW;
STICKLINE(CROSS(控蟠线, 生命线)AND 生命线< 75, 控蟠线+10, 控蟠线+40, 2, 0), COLORMAGENTA;
DRAWICON(CROSS(控蟠线, 生命线)AND 生命线< 75, 控蟠线+53, 29);
DRAWTEXT(CROSS(控蟠线, 生命线)AND 生命线< 75, 控蟠线+30, '-----控蟠起飞'), COLORYELLOW;
VAR2C1:=MA(C, 5)=HHV(MA(C, 5), 20);
VAR2C2:=MA(C, 5)>MA(C, 10);
VAR2C3:=MA(V, 5)>MA(V, 40)*1.01;
VAR2C4:=COUNT(MA(C, 1)>REF(C, 1), 2)=2;
VAR2CV:=VAR2C1 AND VAR2C2 AND VAR2C3 AND VAR2C4;
VAR28:=EMA(CLOSE, 8);
VAR2S20:=EMA(VAR28, 20);
VARTU:=CROSS(VAR28, VAR2S20);
VARTU1:=VAR28< EMA(CLOSE, 120);
STICKLINE((VARTU AND VARTU1)OR(VAR2C1 AND VAR2C2 AND VAR2C3 AND VAR2C4), VAR112*1.03, VAR112*1.120, 1, 0), COLORYELLOW;
A5:=3*SMA((CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100, 21, 1)-2* SMA(SMA((CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100, 20, 1), 8, 1), CIRCLEDOT, COLORFF9900;
安全:20;
警戒:90;
VARTU2:=HHV(HIGH, 30);
VARTU3:=LLV(LOW, 30);
VARTU5:=EMA((CLOSE-VARTU3)/(VARTU2-VARTU3)*100, 5)/8*10, COLORYELLOW, LINETHICK2;
STICKLINE(CROSS(5, VARTU5), 0, 13, 3, 0), COLORRED;
DRAWTEXT(CROSS(5, VARTU5), 7, '---★底成'), COLORRED;
VAR31:=REF(CLOSE, 1);
VAR32:=EMA(HHV(HIGH, 1), 8);
VAR33:=EMA(CLOSE, 8);
VAR35:=((VAR33 < REF(VAR33, 1))AND(CLOSE < VAR33));
VAR36:=IF(((VAR32 < REF(VAR32, 1))OR VAR35), 1, 0);
操蟠线:=SMA(MAX(CLOSE-VAR31, 0), 2, 1)/SMA(ABS(CLOSE-VAR31), 2, 1)*100, COLORRED, LINETHICK2;
突破线:=45, COLORMAGENTA;
低吸线:=20, COLORGREEN;
VAR37:=操蟠线< 突破线 AND REF(操蟠线, 1)>突破线;
VAR38:=操蟠线< 低吸线 AND REF(操蟠线, 1)>低吸线;
金牛起爆:(((((COUNT((VAR36 = 1), 4)= 3)AND(VAR36 = 0))AND O< C AND(((C-REF(C, 1))/REF(C, 1))>0.065))*10)>=10)OR((C-REF(C, 1))/REF(C, 1)>0.065 AND(REF(VAR38, 1)OR REF(VAR37, 1)))AND((攻击线>趋势线 AND 攻击线< 80)OR(攻击线< 趋势线 AND 攻击线< 50)), STICK, COLORYELLOW, LINETHICK4;
STICKLINE(金牛起爆, 20, 80, 5, 0), COLORYELLOW;
STICKLINE(金牛起爆, 25, 75, 1, 0), COLORRED;
DRAWICON(金牛起爆, 82, 30);
DRAWTEXT(金牛起爆, 60, ' -----金牛起爆'), COLORYELLOW;
VAR51:=HHV(CLOSE, 10);
VAR511:=EMA(VAR51, 30);
VAR513:=MA(CLOSE*vol, 20);
VAR515:=MA(CLOSE*VOL, 60);
VAR516:=1000*(VAR513-REF(VAR513, 1))/REF(VAR513, 1)*2;
VAR517:=1000*(VAR515-REF(VAR515, 1))/REF(VAR515, 1)*2;
VAR518:=(VAR516-VAR517)*VOL*CLOSE/MA(REF(VOL*CLOSE, 1), 5);
VAR519:=LLV(LOW, 200);
VAR5110:=EMA((CLOSE-VAR519)/VAR519, 30)*100+200, COLORYELLOW;
金牛:=FILTER(CLOSE>=REF(CLOSE, 1)*1.05 AND VAR518>=VAR5110/2 AND(CROSS(CLOSE, VAR511)OR(CLOSE>VAR511 AND REF(LOW, 1)< VAR511)), 20);
STICKLINE(金牛, 20, 80, 2, 0), COLORYELLOW;
DRAWICON(金牛, 70, 1);
DRAWICON(金牛, 50, 9);
DRAWICON(金牛, 30, 23);
DRAWTEXT(金牛, 60, '---金牛'), COLORYELLOW, LINETHICK3;