通达信乾天太红副图指标（源码 贴图 鱼头开始吃）
Var63:=CROSS(Var51,4);
Var64:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var65:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var66:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var67:=REF(CLOSE,1);
Var68:=SMA(MAX(CLOSE-Var67,0),5,1)/SMA(ABS(CLOSE-Var67),5,1)*100;
Var69:=(HIGH+LOW+CLOSE)/3;
Var6A:=(Var69-MA(Var69,14))/(0.015*AVEDEV(Var69,14));
Var6B:=(Var64>=-15.8 AND Var64<=-12.2 AND Var65<=-20.8 AND Var66<=-27.5 AND Var68<=11.7 AND Var6A<=-145)*100;
Var6C:=Var48=0;
Var6D:=Var48=100;
Var6E:=LLV(HIGH,240);
Var6F:=100*(CLOSE-Var6E)/Var6E;
Var70:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
Var71:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
Var72:=0;
Var73:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
Var74:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
Var75:=BARSCOUNT(CLOSE);
Var76:=Var73<20 AND Var74<23 AND Var75>35;
Var77:=Var76 AND COUNT(Var76,1)=1;
Var78:=EMA(CLOSE,21)-EMA(CLOSE,8);
Var79:=EMA(Var78,5);
Var7C:=IF(EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)<=0.85 AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
Var7D:=(-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100;
Var7E:=(-100)*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
Var7F:=(-100)*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100;
Var80:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
Var81:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
Var82:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
Var83:=(Var7D+Var7E+Var7F+Var80+Var81+Var82)/6;
Var84:=EMA(Var83,3);
Var85:=ABS(Var80-Var82);
Var86:=(Var83+Var85)/2;
Var87:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;
Var88:=Var87+Var86;
Var89:=IF(Var7C>0 AND Var88<0,200,0);
Var8A:=IF(Var86<0 AND CLOSE=LLV(CLOSE,5) AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,-50,0);
Var8B:=IF(Var88<0 AND Var8A=-50,100,0);
Var8C:=MA(CLOSE,3);
Var8D:=REF(CLOSE,2)*0.865;
Var8E:=REF(CLOSE,13)*0.772;
Var8F:=MIN(Var8D,Var8E);
Var90:=100*VOL/CAPITAL;
Var91:=MA(CLOSE,13);
Var92:=IF((CLOSE-Var8F)/CLOSE<0.03 AND SUM(Var90,5)/5<1.8,1,0);
Var93:=IF(Var92>0 AND (Var8A<0 OR Var7C>0),100,0);
Var94:=Var93;
Var95:=IF(Var89>0 AND Var8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR Var92>0 AND REF(CLOSE,1)/REF(CLOSE,2)>0.902 OR (Var89>0 AND Var8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR Var92>0) AND (Var8A<0 OR Var7C>0) AND Var93<10,50,0);
Var96:=(Var89>0 AND Var8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR Var92>0) AND (Var8A<0 OR Var7C>0);
Var97:=Var89>0 AND Var8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR Var92>0 AND REF(CLOSE,1)/REF(CLOSE,2)>0.902;
Var98:=Var96 OR Var97;
Var99:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);
Var9A:=HIGH-REF(HIGH,1);
Var9B:=REF(LOW,1)-LOW;
Var9C:=SMA(IF(Var9A>0 AND Var9A>Var9B,Var9A,0),12,1);
Var9D:=SMA(IF(Var9B>0 AND Var9B>Var9A,Var9B,0),12,1);
Var9E:=Var9C*100/Var99;
Var9F:=Var9D*100/Var99;
VarA0:=SMA(ABS(Var9F-Var9E)/(Var9F+Var9E)*100,12,1);
VarA1:=(VarA0+REF(VarA0,5))/2;
VarA2:=SUM(HIGH-OPEN,12)/SUM(OPEN-LOW,12)*100;
VarA3:=SUM(MAX(0,HIGH-REF(CLOSE,1)),12)/SUM(MAX(0,REF(CLOSE,1)-LOW),12)*100;
VarA4:=AMOUNT/VOL/100;
VarA5:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarA6:=SUM(AMOUNT,5)/VarA4/100;
VarA7:=SUM(AMOUNT,13)/VarA4/100;
VarA8:=SUM(AMOUNT,34)/VarA4/100;
VarA9:=SUM(AMOUNT,209)/VarA4/100;
VarAA:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
VarAB:=VarAA/CAPITAL;
VarAC:=VOL/CAPITAL*VarA5+VarAB*REF(VarA4,1);
VarAD:=DMA(VarA5,VOL/VarA6);
VarAE:=DMA(VarA5,VOL/VarA7);
VarAF:=DMA(VarA5,VOL/VarA8);
VarB0:=DMA(VarA5,VOL/CAPITAL);
VarB1:=MA(HHV(HIGH,488),18);
VarB2:=MA(HHV(HIGH,220),18);
VarB3:=MA(HHV(HIGH,98),18);
VarB4:=MA(LLV(LOW,488),18);
VarB5:=MA(LLV(LOW,220),18);
VarB6:=MA(LLV(LOW,98),18);
VarB7:=MA((VarB4*0.96+VarB5*0.96+VarB6*0.96+VarB1*0.558+VarB2*0.558+VarB3*0.558)/6,18);
VarB8:=MA((VarB4*1.25+VarB5*1.23+VarB6*1.2+VarB1*0.55+VarB2*0.55+VarB3*0.65)/6,18);
VarB9:=MA((VarB4*1.3+VarB5*1.3+VarB6*1.3+VarB1*0.68+VarB2*0.68+VarB3*0.68)/6,18);
VarBA:=MA((VarB7*3+VarB8*2+VarB9)/6*1.738,18);
VarBB:=IF(DATE<=1021231,VarBA,VarBA*DAY);
VarBC:=LOW;
VarBD:=REF(LOW,1);
VarBE:=SMA(ABS(VarBC-VarBD),3,1)/SMA(MAX(VarBC-VarBD,0),3,1)*100;
VarBF:=MA(IF(CLOSE*1.35<=VarBB,VarBE*10,VarBE/10),3);
VarC0:=LLV(LOW,30);
VarC1:=HHV(VarBF,30);
VarC2:=IF(LOW<=VarC0,(VarBF+VarC1*2)/2,0);
宝马:var0*((MA(VarC2 AND CLOSE<COST(1),3) AND (CLOSE-VarAE)/VarAE*100<-11)*118),colorblue ,;
DRAWTEXT(var0*(Var61 OR Var98),70,'★大黑马');
DRAWTEXT(var0*(Var60>0),50,'★黑马');
dRAWTEXT(var0*宝马,120,'★'),colorred;
STICKLINE(var0*Var61,0,120,8,0);
STICKLINE(var0*Var98,0,90,8,0),colorwhite ;
