通达信胜庄之宝未加密选股指标公式源码

源码正文：

趋势线:(3)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(2)*(Sma(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(95),5,1),3,1)),CoLorF0F000{XG51};
买点准备:IF((趋势线<=10),12,0),Linethick2,CoLor0000FF{XG51};
V1:=MA(((100)*(CLOSE-LLV(CLOSE,34)))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20{XG51};
V2:=(2)*(Abs(V1)){XG51};
V3:=100-100-(3)*(SMA(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),20,1))+(2)*(SMA(SMA(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),20,1),15,1)){XG51};
V4:=100-100-(3)*(SMA(((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),20,1))+(2)*(SMA(SMA(((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),20,1),15,1)){XG51};
V5:=(HIGH+LOW+CLOSE)/(3){XG51};
V6:=(V5-MA(V5,10))/((0.015)*(AVEDEV(V5,10))){XG51};
V7:=(V5-MA(V5,30))/((0.015)*(AVEDEV(V5,30))){XG51};
V8:=IF((V6>=150) AND (V6<200) AND (V7>=150) AND (V7<200),10,0){XG51};
V9:=IF((V6<=(-150)) AND (V6>(-200)) AND (V7<=(-150)) AND (V7>(-200)),(-10),V8){XG51};
VA:=((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100){XG51};
VB:=100-ABS(VA){XG51};
VC:=(3)*(SMA(((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1))-(2)*(SMA(SMA(((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1),15,1)){XG51};
VD:=(3)*(SMA(((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1))-(2)*(SMA(SMA(((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1),15,1)){XG51};
VE:=(REF(LOW,1))*(0.9){XG51};
VF:=(LOW)*(0.9){XG51};
顶线:=IF((VB<90),VB,100){XG51};
多方:IF((V1>0),V1,0),LINEstICK,CoLorFF00FF{XG51};
空方:(-IF((V1<0),V2,0)),LINESTICK,CoLorF0F000{XG51};
预警系统:IF(((V7>=200) AND (V6>=150) or crOSS(65,多方)),15,IF((V7<=(-200)) AND (V6<=(-150)),(-15),V9))+65,CoLor000000{XG51};
大趋势:=V3{XG51};
STICKLINE((V3<=REF(V4,1)),V3,V4,8,0),CoLor00FF00{XG51};
STICKLINE((V3>REF(V4,1)),V3,V4,8,0),CoLor0000FF{XG51};
T1:=(CLOSE>MA(CLOSE,20)) AND (MA(CLOSE,20)>=REF(MA(CLOSE,20),1)){XG51};
T2:=CLOSE{XG51};
T3:=(多方>60) AND (预警系统>65) AND (顶线=100){XG51};
T4:=(多方>48) AND (预警系统>65) AND (顶线<100){XG51};
T5:=(空方<(-38)) AND (预警系统<65){XG51};
T7:=(V3>REF(V4,1)) AND (vol>REF(VOL,1)) AND (CLOSE>REF(CLOSE,1)){XG51};
T8:(V3<=REF(V4,1)) AND CLOSE AND (空方>=REF(空方,1)) AND VC,CoLorFF0000{XG51};
DRAWTEXT(T1 AND (COUNT(T1,30)=1),10,'上升通道!'),CoLor00FFFF{XG51};
下降通道:DRAWTEXT(T2 AND (COUNT(T2,30)=1),80,'下降通道'),CoLorFFFFFF{XG51};
上涨过急:DRAWTEXT(T3 AND (COUNT(T3,30)=1),80,'上涨过急'),CoLor00FF00{XG51};
资金进场:DRAWTEXT(T7 AND (COUNT(T7,30)=1),(-10),'资金进场'),CoLor00FFFF{XG51};
DRAWTEXT(T8 AND (COUNT(T8,30)=1),90,'见顶回落'),CoLorF0F000{XG51};
A1:=((HHV(HIGH,50))/(LLV(LOW,100))>1.5){XG51};
A2:=(HHV(HIGH,50)-LOW)/(HHV(HIGH,50)-LLV(LOW,100)){XG51};
A3:=(LOW-LLV(LOW,100))/(HHV(HIGH,50)-LLV(LOW,100)){XG51};
A4:=(HHVBARS(HIGH,50)<LLVBARS(LOW,100)){XG51};
A5:=A1 AND (A2>0.5) AND (A3>0.3) AND A4{XG51};
A6:=(COUNT(A5,20)=1){XG51};
抢反弹:IF(A6 AND A5,26,0),Stick,Linethick2,CoLor00FFFF{XG51};
DRAWTEXT(抢反弹,32,'抢反弹'),CoLor0099FF{XG51};
VAR2W:=100-((100)*(HHV(HIGH,14)-CLOSE))/(HHV(HIGH,14)-LLV(LOW,14)){XG51};
MW:=ema(VAR2W,3){XG51};
VAR3W:=EMA(VAR2W,7){XG51};
M1:=EMA(VAR3W,5){XG51};
MB1:=CROSS(MW,M1) AND (M1<20){XG51};
抄底:IF(MB1,40,0),Linethick2,CoLorFFFFFF{XG51};
DRAWTEXT(抄底,62,'★'),CoLor00FFFF{XG51};
DRAWTEXT(抄底,52,'抄底 '),CoLorFF00FF{XG51};
A11:=MA(CLOSE,5){XG51};
A12:=MA(CLOSE,10){XG51};
A13:=MA(CLOSE,20){XG51};
A14:=MA(CLOSE,30){XG51};
均线多头排列:IF((A11>A12) AND (A12>A13) AND CROSS(A13,A14) ,25,0),Stick,Linethick2,CoLor00BBFF{XG51};
DRAWTEXT((A11>A12) AND (A12>A13) AND CROSS(A13,A14) ,35,'均线多头'),CoLorBBFFFF{XG51};
AAA:IF(T7 AND (COUNT(T7,30)=1),1,0){X~G_5_1~C~N~{};

源码正文：

DRAWGBK(C>0, RGB(40,120,20),RGB(00,00,00),0,0,1),LINETHICK2{XG51};
dif:=ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIF,9),COLORCYAN,LINETHICK2{XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
DIF1:EMA(CLOSE,8)-EMA(CLOSE,18),COLORBLUE,LINETHICK2{XG51};
DEA1:=EMA(DIF1,8),COLORRED,LINETHICK2{XG51};
空中加油:IF(DIF>REF(DIF,1) AND DIF>=DEA AND REF(DIF,1)<=REF(DIF,2) AND REF(DIF,1)>=REF(DEA,1) ,1,0),NODRAW{XG51};
DRAWICON(空中加油=1,DIF,23){XG51};
STICKLINE(MacD<REF(MACD,1)AND MACD>0,0,MACD,2,0 ),COLOR00BBFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR00ddfF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0,0 ),COLOR00FFFF{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2,0 ),COLOR0011EE{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR0033DD{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0,0 ),COLOR0055FF{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2,0 ),COLORBB11BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1,0 ),COLORDD33BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,0,0 ),COLORFF55BB{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2,0 ),COLORFFBB11{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1,0 ),COLORFFDD33{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0,0 ),COLORFFFF55{XG51};
JCCOUNT:=COUNT(crOSS(DIF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,-0.18,6,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*1.1,13) {XG51};
VAR0004:="MACD.DIF#WEEK"(6,13,5){XG51};
VAR0005:="MACD.DEA#WEEK"(6,13,5){XG51};
VAR0006:="MACD.MACD#WEEK"(6,13,5){XG51};
VAR7:="MACD.DIF#MONTH"(6,13,5){XG51};
VAR8:="MACD.DEA#MONTH"(6,13,5){XG51};
周金叉:IF(CROSS(VAR0004,VAR0005),0.3,0)LINESTICK, COLORWHITE,LINETHICK3{XG51};
月金叉:IF(CROSS(VAR7,VAR8),-0.5,0)LINESTICK, COLORBLUE,LINETHICK3{XG51};
零轴金叉:IF(CROSS(VAR0004,0),0.2,0)LINESTICK,COLORCYAN,LINETHICK2{XG51};
0,LINETHICK3{XG51};
DRAWICON(CROSS(MACD,0),MACD,1){XG51};
DRAWICON(CROSS(DIF1,0),DIF1,1){XG51};
DRAWICON(CROSS(DIF,DEA),DIF,1){XG51};
DRAWICON(CROSS(DEA,DIF),DEA,2){XG51};
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1{XG51};
DRAWTEXT(低位金叉,-0.2,' 金叉'),COLORFFFFFF{XG51};
JCCOUNT1:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0)){XG51};
二次金叉1:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,-0.18,10,0),COLOR0042CC{XG51};
STICKLINE(二次金叉,0,-0.18,8,0),COLOR004FF2{XG51};
STICKLINE(二次金叉,0,-0.18,8,0),COLOR3375FF{XG51};
DRAWTEXT(二次金叉,-0.2,' 金叉二'),COLOR3375FF{XG51};
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA){XG51};
STICKLINE(底背离,0,0.13,10,0),COLORCECE00{XG51};
STICKLINE(底背离,0,0.13,4,0),COLORFFFF00{XG51};
STICKLINE(底背离,0,0.13,2,0),COLORFFFF44{XG51};
DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORFFFFFF,LINETHICK1{XG51};
DRAWTEXT(底背离,0.3,' 底背离'),COLORFFFF26{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF){XG51};
DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORCYAN,LINETHICK1{X-G?5.1-C-N-{};