以下是通达信红色拉升指标公式源码副图（无源码的请下载附件导入）

VVV1:=(C*2+H+L)/4*10;
VVV2:=EMA(VVV1,13)-EMA(VVV1,34);
VVV3:=EMA(VVV2,5);
VVV4:=(VVV2-VVV3)/5;
主力进:IF(VVV4>=0,VVV4,0),COLORRED;
N1:=9;N2:=12;N3:=26;M:=10;M1:=15;M2:=30;
筹码短期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,vol/(SUM(AMOUNT,8)/(AMOUNT/VOL/100)/100));
筹码中期:=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,20)/(AMOUNT/VOL/100)/100));
DIF:=EMA(EMA(CLOSE,18)-EMA(CLOSE,34),11);
macd:=EMA(EMA(DIF,11),11),COLOR58FF58;
DEF:=2*(DIF-MacD),COLORFFFF00,LINETHICK0;
BY:=crOSS(筹码短期,筹码中期);
BYO:=CROSS(筹码中期,筹码短期);
STICKLINE(DEF>=0 AND DEF>=REF(DEF,1) AND COUNT(BY,30)>0,-0.02,Abs(DEF*0.6999),2,0),COLOR6055FF;
STICKLINE(DEF>=0 AND DEF< REF(DEF,1),0,ABS(DEF*0.666),2,1),COLOR3344EE;
{ STICKLINE(DEF<0 AND DEF>=REF(DEF,1),0,DEF*0.625,2,1),COLOR9966CC;
STICKLINE(DEF<0 AND DEF< REF(DEF,1),0,DEF*0.666,2,0),COLORCC6600;}
STICKLINE(BY,0,0.21,1,0),COLORBBBBFF;
{STICKLINE(BYO,0,-0.18,1,0),COLOR33CC00;}
DRAWTEXT(BY,0.20,'中线走上'),COLOR0000FF;
多方趋势:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) -3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)
-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1);
天线:=78.89;
DRAWTEXT(CROSS(天线,多方趋势),0.2,'高◇'),COLORF0F000;
A:=(3*CLOSE+LOW+OPEN+HIGH)/6;