大智慧三万多的主图原源码(大智慧)

大智慧三万多的主图原源码(大智慧)

源码正文：

看完这个主图，你就会抛掉所有的公式。挑战工具的极限。你会看到会炒股的人写出来的跟大智慧公式写出来的是两回事来的。

x1:=(C+L+H)/3{XG51};
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10{XG51};
ema8:=ema(c,8){XG51};
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45上升'),coloryellow;

ah:hhvall(h); al:llvall(l){XG51};
ahl:=ah-al{XG51};
a23:al+ahl*0.236,COLORBLUE,POINTDOT{XG51};
a38:al+ahl*0.382,COLOREE00EE,POINTDOT{XG51};
a50:al+ahl*0.50,COLORBLUE,POINTDOT{XG51};
a61:al+ahl*0.618,COLOREE00EE,POINTDOT{XG51};
a76:al+ahl*0.764,COLORBLUE,POINTDOT{XG51};
y:=999{XG51};
DRAWTEXTREL(500,0,'100% '+ah),COLOREE00EE{XG51};
DRAWTEXTREL(500,y*0.236,'76.4% '+a76),COLORBLUE{XG51};
DRAWTEXTREL(500,y*0.382,'61.8% '+a61),COLOREE00EE{XG51};
DRAWTEXTREL(500,y*0.50,'50% '+a50),COLORBLUE{XG51};
DRAWTEXTREL(500,y*0.618,'38.2% '+a38),COLOREE00EE{XG51};
DRAWTEXTREL(500,y*0.764,'23.6% '+a23),COLORBLUE{XG51};
DRAWTEXTREL(500,y-30,'最低 '+al),COLOREE00EE;

DRAWGBK((CLOSE > 0),stRIP(RGB(4,1,28),RGB(4,1,35),0)){XG51};
varl13:=("macd.diff#WEEK"(26,12,9)){XG51};
varl14:=("macd.dea#WEEK"(26,12,9)){XG51};
VL:=REF(LOW,1); VH:=REF(H,1){XG51};
Var1:=SMA(Abs(H-Vh),13,1)/SMA(MAX(H-Vh,0),13,1)*100{XG51};
Var2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100{XG51};
Var3:=MA(Var1,13){XG51};
Var4:=MA(Var2,13){XG51};
Var5:=LLV(L,34){XG51};
Var6:=HHV(H,34){XG51};
Var7:=EMA(IF(H>=Var6,Var3,0),3){XG51};
Var8:=EMA(IF(L<=Var5,Var4,0),3){XG51};
var9:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1)){XG51};
var10:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (var9* 10.9){XG51};
Var11:=FILTER(IF(var10<=var9 AND Var8>REF(Var8,1),Var8*8,0),55){XG51};
Var21:=LLV(LOW,60){XG51};
Var31:=HHV(HIGH,60){XG51};
Var41:=EMA((CLOSE-Var21)/(Var31-Var21)*100,13){XG51};
Var51:=EMA(0.667*REF(Var41,1)+0.333*Var41,21){XG51};
varL2:=FILTER(crOSS(Var51,Var41) AND Var41>84,13){XG51};
持股线:MA(C,26),LINETHICK3,coloryellow{XG51};
趋势线:MA(CLOSE,13),linethick5,colorred{XG51};
qjj:FILTER((CROSS(varl13,varl14) and varl14<0 and CROSS(c,持股线)),90),LINETHICK0;

DD:=FINANCE2(35){XG51};
SS:=FINANCE2(37){XG51};
GG:=FINANCE2(3){XG51};
TH:=DYNAINFO(39){XG51};
DRAWTEXTREL(10,720,'总股本:'+NUMTOSTRn(DD,0)+'万股' +' 流通A股:'+NUMTOSTRn(SS,0)+'万股'+'市盈率:'+NUMTOSTRn(TH,2)+' 倍'+' 每股收益:'+NUMTOSTRn(GG,3)+' 元'),ColorFFFF00{XG51};
DRAWTEXT(var11,C*0.98,'㊣'),linethick4,ColorFFFF00{XG51};
DRAWICON(qjj,C*1.09,1){XG51};
DRAWTEXT(qjj,l*0.78,'霸占大牛股'),COLOR00FFFF{XG51};
DRAWTEXT(varl2,C*1.04,'逃跑'),Colorgreen{XG51};
获利比例:=(WINNER(C)*1000)/10{XG51};
平均成本:=(COST(50)*100)/100{XG51};
穿透力:=(winner(C)-winner(ref(C,1)))/v*capital{XG51};
９０％成本:=FLOOR(COST(50-90/2)*100)/100{XG51};
～:=CEILING(COST(50+90/2)*100)/100{XG51};
９０集中度:=INTPART((～-９０％成本)/(～+９０％成本)*1000)/10{XG51};
７０％成本:=FLOOR(COST(50-70/2)*100)/100{XG51};
～～:=CEILING(COST(50+70/2)*100)/100{XG51};
７０集中度:=INTPART((～～-７０％成本)/(～～+７０％成本)*1000)/10{XG51};
DRAWTEXTABS(0,12,' 获利比例:'+STR(获利比例)),COLOR44bbff{XG51};
DRAWTEXTABS(0,24,' 平均成本:'+STR(平均成本)),COLOR44bbff{XG51};
DRAWTEXTABS(0,36,' 穿透力:'+STR(穿透力)),COLOR44bbff{XG51};
DRAWTEXTABS(0,48,'９０％成本:'+STR(９０％成本)+'-'+STR(～)),COLOR44bbff{XG51};
DRAWTEXTABS(0,60,'９０集中度:'+STR(９０集中度)),COLOR44bbff{XG51};
DRAWTEXTABS(0,72,'７０％成本:'+STR(７０％成本)+'-'+STR(～～)),COLOR44bbff{XG51};
DRAWTEXTABS(0,84,'７０集中度:'+STR(７０集中度)),COLOR44bbff{XG51};
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100){XG51};
明日阻力:=l+(gj-l)+(c-l){XG51};
明日支撑:=l+(c-gj){XG51};
今日阻力:=REF(明日阻力 , 1){XG51};
今日支撑:=REF(明日支撑 , 1){XG51};
STICKLINE(DISPSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000FF{XG51};
STICKLINE(DISPSTATUS=2 and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00{XG51};
STICKLINE(DISPSTATUS=2 and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF{XG51};
STICKLINE(DISPSTATUS=2 and c<今日支撑,今日支撑,今日支撑,20,0),ColorFF9900{XG51};
DRAWTEXTREL(770,5,'今日支撑：'+NUMTOSTRN(今日支撑 ,2 )),Colorred{XG51};
DRAWTEXTREL(630,5,'今日阻力：'+NUMTOSTRN(今日阻力 ,2 )),ColorGREEN{XG51};
DRAWTEXTREL(1,800,'所属板块:'+BKNAME),ColorAFFF00{XG51};
DRAWTEXTREL(1,850,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市净率:'+NUMTOSTRN((CLOSE / FINANCE2(4)),2)+'元'+' 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF{X-G_5~1-C-N-{};

KDJ和MACD低位金叉买入指标(大智慧)

源码正文：

difF:ema(CLOSE,12)-Ema(CLOSE,27){XG51};
DEA:EMA(DIFF,9){XG51};
macd:2*(DIFF-DEA), COLORstICK,LINETHICK2{XG51};
低位金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低位金叉,0,0.08,6,0),COLORBLUE{XG51};
DRAWTEXT(低位金叉,0.16,' 低位金叉'),COLORRED{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*0.9,1) {XG51};
DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORBLUE{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00{XG51};
底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORWHITE,LINETHICK4{XG51};
DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A2+1) AND CROSS(DEA,DIFF){XG51};
顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORCYAN,LINETHICK4{XG51};
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2{X?G?5?1?C?N?{};