通达信乾天太红指标公式

　　通达信乾天太红指标公式var0：=date《1501231;

　　Var1：=MA（CLOSE，152）;

　　Var2：=MA（CLOSE，194.16）;

　　Var3：=Var2+2*STD（CLOSE，170）;

　　Var4：=Var1+2*STD（CLOSE，170）;

　　发现：var0*（CLOSE》Var3）*13*10;

　　表达：var0*（CLOSE》Var4）*13*10，COLORSTICK;

　　Var6：=EMA（HHV（HIGH，500），21）;

　　Var7：=EMA（HHV（HIGH，250），21）;

　　Var8：=EMA（HHV（HIGH，90），21）;

　　Var9：=EMA（LLV（LOW，500），21）;

　　VarA：=EMA（LLV（LOW，250），21）;

　　VarB：=EMA（LLV（LOW，90），21）;

　　VarC：=EMA（（Var9*0.96+VarA*0.96+VarB*0.96+Var6*0.558+Var7*0.558+Var8*0.558）/6，21）;

　　VarD：=EMA（（Var9*1.25+VarA*1.23+VarB*1.2+Var6*0.55+Var7*0.55+Var8*0.65）/6，21）;

　　VarE：=EMA（（Var9*1.3+VarA*1.3+VarB*1.3+Var6*0.68+Var7*0.68+Var8*0.68）/6，21）;

　　VarF：=EMA（（VarC*3+VarD*2+VarE）/6*1.738，21）;

　　Var10：=REF（LOW，1）;

　　Var11：=SMA（ABS（LOW-Var10），3，1）/SMA（MAX（LOW-Var10，0），3，1）*100;

　　Var12：=EMA（IF（CLOSE*1.35《=VarF，Var11*10，Var11/10），3）;

　　Var13：=LLV（LOW，30）;

　　Var14：=HHV（Var12，30）;

　　Var15：=IF（MA（CLOSE，58），1，0）;

　　Var16：=EMA（IF（LOW《=Var13，（Var12+Var14*2）/2，0），3）/618*Var15;

　　Var17：=IF（Var16》50，50，Var16）/3.82*6;

　　吸筹：STICKLINE（var0*（Var17》0），0，Var17，4，1），colormagenta ， ;

　　Var18：=HHV（HIGH，30）;

　　Var19：=LLV（LOW，30）;

　　能量：var0*EMA（（CLOSE-Var19）/（Var18-Var19）*100，5）/8*10，colorred ， ;

　　Var1A：=（EMA（AMOUNT，5）/EMA（VOL，5）/100-EMA（AMOUNT，125）/EMA（VOL，125）/100）/（EMA（AMOUNT，5）/EMA（VOL，5）/100）《-0.4;

　　Var1B：=（CLOSE-LLV（LOW，15））/（HHV（HIGH，15）-LLV（LOW，15））*100;

　　Var1C：=SMA（Var1B，3，1）;

　　Var1D：=SMA（Var1C，3，1）;

　　Var1E：=（-100）*（HHV（HIGH，52）-CLOSE）/（HHV（HIGH，52）-LLV（LOW，52））;

　　Var1F：=COUNT（Var1A，5）》=1 AND （Var1E《-99.9 OR Var1D《15 AND Var1C《12）;

　　Var20：=VOL/FINANCE（7）;

　　Var21：=100*WINNER（CLOSE）;

　　Var22：=MA（Var21，3）;

　　Var23：=MA（Var20，34）;

　　Var24：=Var22《Var23*100 AND Var21《Var20;

　　Var25：=SUM（IF（CLOSE》REF（CLOSE，1），1，0），0）;

　　Var26：=SUMBARS（VOL，CAPITAL）;

　　Var27：=IF（CLOSE》LLV（CLOSE，Var26），1，-1）*IF（Var25》LLV（Var25，Var26），1，-1）;

　　Var28：=COUNT（IF（Var27=-1，1，0）=1，8）》2;

　　Var29：=（CLOSE-DMA（（3*HIGH+LOW+OPEN+2*CLOSE）/7，VOL/（SUM（AMOUNT，13）/（AMOUNT/VOL/100）/100）））/DMA（（3*HIGH+LOW+OPEN+2*CLOSE）/7，VOL/（SUM（AMOUNT，13）/（AMOUNT/VOL/100）/100））*100《-18;

　　Var2A：=（CLOSE-MIN（REF（CLOSE，5）*0.865，REF（CLOSE，21）*0.772））/CLOSE《0.01;

　　Var2B：=Var28 AND Var29 AND Var2A;

　　Var2C：=VOL/CAPITAL》=0.02 AND VOL/CAPITAL《=0.2 AND OPEN=1.105;

　　Var2D：=Var2C AND COUNT（Var2C，5）=1;

　　Var2E：=Var2B OR Var2C;

　　Var2F：=REF（CLOSE，1）;

　　Var30：=SMA（MAX（CLOSE-Var2F，0），7，1）/SMA（ABS（CLOSE-Var2F），7，1）*100;

　　Var31：=SMA（MAX（CLOSE-Var2F，0），13，1）/SMA（ABS（CLOSE-Var2F），13，1）*100;

　　Var32：=Var30《20 AND Var31《25;

　　Var33：=Var32;

　　Var34：=SUM（IF（CLOSE》REF（CLOSE，1），VOL，IF（CLOSE《REF（CLOSE，1），0-VOL，0）），0）;

　　Var35：=IF（CLOSE》LLV（CLOSE，Var26），1，-1）;

　　Var36：=IF（Var34》LLV（Var34，Var26），1，-1）;

　　Var37：=Var35*Var36;

　　Var38：=IF（Var37=-1，1，0）;

　　Var39：=Var38 AND CLOSE=LLV（CLOSE，120） AND Var21《Var20;

　　Var3A：=IF（FILTER（Var1F AND Var24 AND Var2E AND Var33 AND Var39》0，4），70，0）;

　　DRAWTEXT（var0*（FILTER（Var24 AND Var2E AND Var33 OR Var33 AND Var39，1）），Var2*4-13，‘抄底’），colorgreen;

　　STICKLINE（var0*（IF（Var24 AND Var2E AND Var33 OR Var33 AND Var39，35，0）），0，Var2*4-4，15，0）;

　　Var3B：=（CLOSE-LLV（LOW，36））/（HHV（HIGH，36）-LLV（LOW，36））*100;

　　Var3C：=SMA（Var3B，3，1）;

　　Var3D：=SMA（Var3C，3，1）;

　　Var3E：=SMA（Var3D，3，1）;

　　Var3F：=CROSS（Var3D，Var3E） AND Var3D《20;

　　Var40：=CROSS（Var3E，Var3D）AND Var3D》80;

　　Var41：=5;

　　DRAWTEXT（var0*（CROSS（Var41，能量）），10，‘底部’），colorwhite ， ;

　　Var44：=REF（CLOSE，1）;

　　Var45：=SMA（MAX（CLOSE-Var44，0），6，1）/SMA（ABS（CLOSE-Var44），6，1）*100;

　　STICKLINE（var0*（CROSS（84，Var45）），0，Var2*10+3，5，1），color3399cc;

　　DRAWTEXT（var0*（CROSS（84，Var45）），30，‘预警’）colorred;

　　stickline（var0*（cross（13，var45）），0，130，0.8，1）;

　　drawtext（var0*（cross（13，var45）），110，‘★探底’）coloryellow;

　　Var47：=EMA（100*（CLOSE-LLV（LOW，100））/（HHV（HIGH，100）-LLV（LOW，100）），5）;

　　Var48：=（CLOSE-LLV（CLOSE，126））/（HHV（CLOSE，126）-LLV（CLOSE，126））*100;

　　Var49：=EMA（CLOSE，2）-EMA（CLOSE，150）;

　　Var4A：=EMA（Var49，100）;

　　Var4B：=2*（Var49-Var4A）;

　　Var4C：=POW（Var4B，3）*0.1+POW（Var4B，1）;

　　Var4D：=SQRT（SQRT（LOW*HIGH*OPEN*CLOSE））;

　　Var4E：=EMA（Var4D*0.97，3）;

　　Var4F：=（HIGH+LOW+CLOSE）/3;

　　Var50：=（Var4F-MA（Var4F，14））/（0.015*AVEDEV（Var4F，14））;

　　Var51：=IF（Var4B》0.1，Var4C，0）*5;

　　Var52：=LLV（HIGH，240）;

　　Var53：=100*（CLOSE-Var52）/Var52;

　　Var54：=AMOUNT/VOL;

　　Var55：=EMA（（WINNER（CLOSE*1.1）-WINNER（CLOSE*0.9））*80，5）;

　　Var56：=INDEXC;

　　Var57：=MA（Var56，5）;

　　Var58：=MA（Var56，20）;

　　Var59：=MA（Var56，30）;

　　Var5A：=Var59》Var57*1.08 AND Var58》Var57*1.055;

　　Var5B：=Var57》Var56*1.03 AND Var58》Var56*1.13;

　　Var5C：=Var5B;

　　Var5D：=IF（FILTER（Var55《6，5）=1，1，0）;

　　Var5E：=（Var5D AND Var53《-2.5 AND Var47《5 AND Var48=0）*60;

　　Var5F：=Var55《6 AND Var5C;

　　Var60：=IF（FILTER（Var5F，1）=1，1，0）*80;

　　Var61：=Var5F AND Var5D*80;

　　Var62：=CROSS（Var51，2）;

　　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 ;