通达信神龙多空主图未加密选股指标公式源码

源码正文：

stICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred{XG51};
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,7,0),colorred{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,7,0),colorcyan{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF{XG51};
a1:(ema(AMOUNT/vol/100,3)+Ema(AMOUNT/VOL/100,6)+EMA( AMOUNT/VOL/100,9))/3,ColorFF80FF,linethick1{XG51};
a2:(EMA(AMOUNT/VOL/100,5)+EMA(AMOUNT/VOL/100,10)+EMA( AMOUNT/VOL/100,20))/3,ColorFF80FF{XG51};
a3:(EMA(AMOUNT/VOL/100,7)+EMA(AMOUNT/VOL/100,14)+EMA( AMOUNT/VOL/100,28))/3,ColorFF80FF{XG51};
a4:(EMA(AMOUNT/VOL/100,9)+EMA(AMOUNT/VOL/100,18)+EMA( AMOUNT/VOL/100,36))/3,ColorFF80FF{XG51};
a5:(EMA(AMOUNT/VOL/100,11)+EMA(AMOUNT/VOL/100,22)+EMA( AMOUNT/VOL/100,44))/3,ColorFF80FF{XG51};
a6:(EMA(AMOUNT/VOL/100,13)+EMA(AMOUNT/VOL/100,26)+EMA( AMOUNT/VOL/100,52))/3,ColorFF80FF{XG51};
A:(EMA(AMOUNT/VOL/100,21)+EMA(AMOUNT/VOL/100,34)+EMA(AMOUNT/VOL/100,55))/3,LINETHICK2{XG51};
a7:a-(a1-a),coloryellow,linethick1{XG51};
a8:a-(a2-a),coloryellow{XG51};
a9:a-(a3-a),coloryellow{XG51};
a10:a-(a4-a),coloryellow{XG51};
a11:a-(a5-a),coloryellow{XG51};
a12:a-(a6-a),coloryellow{XG51};
stickline(c>=ref(c,1),o,c,5,0),colorred{XG51};
stickline(c<ref(c,1),o,c,5,0),colorcyan{XG51};
stickline(c>=ref(c,1),h,l,1,0),colorred{XG51};
stickline(c<ref(c,1),h,l,1,0),colorcyan{X!G^5~1!C!N!{};

源码正文：

金额:=IF(DYnaINFO(37)>3,2/3,1/3)*AMOUNT{XG51};
主力量:=IF(DYNAINFO(37)>3,2*V/3,V/3)*100{XG51};
成本:=金额/主力量{XG51};
成本10:=SMA(成本,10,1){XG51};
成本60:=Sma(成本,60,1){XG51};
近年最低成本:=MA(成本60,240){XG51};
现价:=C{XG51};
太阳:0,COLORWHITE{XG51};
地球:MA(成本,60)/近年最低成本*100-100,COLORCYAN{XG51};
月亮:成本10/成本60*100-100,COLORBROWN{XG51};
飞船:MA(C,5)/成本60*100-100,COLORBLUE{XG51};
AA:C/成本60*100-100{XG51};
DRAwrECTREL(200,10,800,990,RGB(0,0,01)){XG51};
DRAWRECTREL(200,500,800,500,RGB(0,0,55)){XG51};
DRAWRECTREL(500,10,500,990,RGB(0,0,55)){XG51};
DRAWTEXT_FIX(1,0.35,0.9,1,'太阳●'),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.45,0.9,1,'●地球'),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.55,0.9,1,'●月亮'),COLORBROWN{XG51};
DRAWTEXT_FIX(1,0.65,0.9,1,'●飞船'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.5,0.5,1,'●'),COLORWHITE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.5,0.5-0.02*地球,1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.5,0.5-0.02*月亮,1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.5,0.5-0.02*飞船,1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=2,0.49,0.5-0.02*REF(地球,1),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=2,0.49,0.5-0.02*REF(月亮,1),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=2,0.49,0.5-0.02*REF(飞船,1),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=3,0.48,0.5-0.02*REF(地球,2),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=3,0.48,0.5-0.02*REF(月亮,2),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=3,0.48,0.5-0.02*REF(飞船,2),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=4,0.47,0.5-0.02*REF(地球,3),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=4,0.47,0.5-0.02*REF(月亮,3),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=4,0.47,0.5-0.02*REF(飞船,3),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=5,0.46,0.5-0.02*REF(地球,4),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=5,0.46,0.5-0.02*REF(月亮,4),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=5,0.46,0.5-0.02*REF(飞船,4),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=6,0.45,0.5-0.02*REF(地球,5),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=6,0.45,0.5-0.02*REF(月亮,5),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=6,0.45,0.5-0.02*REF(飞船,5),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=7,0.44,0.5-0.02*REF(地球,6),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=7,0.44,0.5-0.02*REF(月亮,6),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=7,0.44,0.5-0.02*REF(飞船,6),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=8,0.43,0.5-0.02*REF(地球,7),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=8,0.43,0.5-0.02*REF(月亮,7),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=8,0.43,0.5-0.02*REF(飞船,7),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=9,0.42,0.5-0.02*REF(地球,8),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=9,0.42,0.5-0.02*REF(月亮,8),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=9,0.42,0.5-0.02*REF(飞船,8),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=10,0.41,0.5-0.02*REF(地球,9),1,'●'),COLORCYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=10,0.41,0.5-0.02*REF(月亮,9),1,'●'),COLORBROWN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=10,0.41,0.5-0.02*REF(飞船,9),1,'●'),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.50,0.02,1,'今天'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND crOSS(AA,飞船) OR CROSS(AA,地球),0.51,0.5-0.02*AA,1,'火箭●'),COLORLICYAN{X_G?5!1_C_N_{};