以下是通达信龙头模型指标公式源码副图（无源码的请下载附件导入）

VAR1:=(3*CLOSE+HIGH+LOW+OPEN)/6;
VAR2:=EMA(VAR1,35);
VAR3:=(HHV(VAR2,10)+HHV(VAR2,30)+HHV(VAR2,90))/3;
VAR4:=(LLV(VAR2,10)+LLV(VAR2,30)+LLV(VAR2,90))/3;
VAR5:=(HHV(VAR3,5)+HHV(VAR3,15)+HHV(VAR3,30))/3;
VAR6:=(LLV(VAR4,5)+LLV(VAR4,15)+LLV(VAR4,30))/3;
VAR7:=expma(CLOSE,6);
VAR8:=EXPMA(CLOSE,18);
M1:=500*(VAR7-VAR8)/VAR8+2,COLORYELLOW,LINETHICK2;
ZZ:=M1>2 AND EMA(EMA(VAR1,2),2)>VAR6;
共振追涨紫:ZZ AND ZZ>=REF(ZZ,1),NODRAW,COLORMAGENTA ;
STICKLINE(共振追涨紫,4,8,1,0),COLORMAGENTA ;
DRAWTEXT(共振追涨紫,7.7,'紫'),COLORYELLOW;
X_1:=INDEXH;
X_2:=INDEXO;
X_3:=INDEXL;
X_4:=INDEXC;
X_5:=INDEXV;
X_6:=(3*CLOSE+HIGH+LOW+OPEN)/6;
X_7:=EMA(X_6,35);
X_8:=(HHV(X_7,5)+HHV(X_7,15)+HHV(X_7,30))/3;
X_9:=(LLV(X_7,5)+LLV(X_7,15)+LLV(X_7,30))/3;
牛线:=(HHV(X_8,5)+HHV(X_8,15)+HHV(X_8,30))/3,COLORYELLOW;
X_10:=(LLV(X_9,5)+LLV(X_9,15)+LLV(X_9,30))/3;
X_11:=X_4/EMA(X_4,120);
大盘中线:=EMA(EMA(CLOSE,120)*X_11,2),COLORRED;
X_12:=X_6>=牛线 AND X_6>=大盘中线;
强势起爆紫:X_12=1,NODRAW,COLORMAGENTA;
STICKLINE(强势起爆紫,4,7,3.5,0),COLORMAGENTA ;