聪明主图源码免费下载

Ⅰ 求通达信主图源码：倍量柱其后三天价升量缩被确认为‘黄金柱’，遂在该量柱最低价画横线向右延伸，谢谢

倍量柱:=V/REF(V,1)>2;
价升:=COUNT(C>REF(C,1),3);
量缩:=COUNT(VOL<REF(VOL,1),3);
黄金柱:=IF(价升 AND 量缩,倍量柱,DRAWNULL);
STICKLINE(黄金柱,H,L,1,0),COLORYELLOW;
DRAWTEXT(黄金柱,L*1.01,'___________________________'),COLORYELLOW;

Ⅱ 求 通达信原本 薛斯通道主图源码 还有参数怎么加

N:=13;
VAR2:=CLOSE*VOL;
VAR3:=EMA((EXPMA(VAR2,3)/EXPMA(VOL,3)+EXPMA(VAR2,6)/EXPMA(VOL,6)+EXPMA(VAR2,12)/EXPMA(VOL,12)+EXPMA(VAR2,24)/EXPMA(VOL,24))/4,N);
SUP:1.06*VAR3;
SDN:VAR3*0.94;
VAR44:=EXPMA(CLOSE,9);
LUP:EXPMA(VAR44*1.14,5);
LDN:EXPMA(VAR44*0.88,5);
参数不需要加，如果想修改，只需要修改N的值就可以了。

Ⅲ 谁知道这个指标源代码主图！谢谢

input:P1(5);
年:MA(CLOSE,26),color00ff00;
cp:="cpzb@cp";
cp,LINETHICK0;
DRAWICON(cp=1,l*0.95,4),ALIGN1;
DRAWICON(cp=9,h*1.05,5),ALIGN1;
DRAWtext(cp=1,l*0.925,'B'),coloryellow,ALIGN1;
DRAWtext(cp=9,h*1.085,'S'),colorgreen,ALIGN1;

dp:=if(c=INDEXC,0,1);
gj:=AMOUNT/v/100;
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
STICKLINE(DISPSTATUS=2 and dp=1 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(DISPSTATUS=2 and dp=1 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(DISPSTATUS=2 and dp=1 and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(DISPSTATUS=2 and dp=1 and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF0000;
if DISPSTATUS=2 then a:=BARPOS;
if DISPSTATUS=1 then b:=BARPOS;
d:=a-b;
e:=hhv(h,d);
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2, e*1.08,'-----------------------------------'),ColorFFFFFF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c>=今日支撑, e*1.07,'今日支撑=：'+NUMTOSTRN(今日支撑 ,2 )+' '),ColorFF00FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c<今日支撑, e*1.07,'今日支撑=：'+NUMTOSTRN(今日支撑 ,2 )+' '),ColorFF0000,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c>=今日阻力, e*1.07,'今日阻力=：'+NUMTOSTRN(今日阻力 ,2 )),Color0000FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c<今日阻力, e*1.07,'今日阻力=：'+NUMTOSTRN(今日阻力 ,2 )),Color00FF00,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2, e*1.04,'-----------------------------------'),ColorFFFFFF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c>=明日支撑, e*1.05,'明日支撑=：'+NUMTOSTRN(明日支撑 ,2 )+' '),Color00FFFF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c<明日支撑, e*1.05,'明日支撑=：'+NUMTOSTRN(明日支撑 ,2 )+' '),Color00FFFF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c>=明日阻力, e*1.05,'明日阻力=：'+NUMTOSTRN(明日阻力 ,2 )),Color00FFFF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and c<明日阻力, e*1.05,'明日阻力=：'+NUMTOSTRN(明日阻力 ,2 )),Color00FFFF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and v>ref(v,1) and ma(v,5)>ref(ma(v,5),1),e*1.03,' 今日成交量大于昨日,且有继续增大趋势'),Color8285FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and v<ref(v,1) and ma(v,5)>ref(ma(v,5),1),e*1.03,' 今日成交量小于昨日，但有放大迹象'),Color8285FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and v>ref(v,1)and ma(v,5)<ref(ma(v,5),1),e*1.03,' 今日成交量大于昨日, 但有缩小迹象'),Color8285FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and v<ref(v,1)and ma(v,5)<ref(ma(v,5),1),e*1.03,' 今日成交量小于昨日，且有缩小迹象'),Color8285FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and v>ref(v,1)and ma(v,5)<ref(ma(v,5),1),e*1.03,' 今日成交量大于昨日, 但有缩小迹象'),Color8285FF,ALIGN2;
DRAWTEXT(c>0 and dp=1 and DISPSTATUS=2 and v<ref(v,1)and ma(v,5)<ref(ma(v,5),1),e*1.03,' 今日成交量小于昨日，且有缩小迹象'),Color8285FF,ALIGN2;
Var1:=EMA(C,3);
Var2:=EMA(C,5);
Var3:=EMA(C,10);
Var4:=EMA(C,20);
Var5:=EMA(C,30);
Var6:=(Var2+Var3+Var4+Var5)/4;
Var7:=(Var6-REF(Var6,15))/REF(Var6,15)*100;
Var8:=(Var6-REF(Var6,15))/REF(Var6, 15)*100;
Var9:=EMA(Var7,8);
STICKLINE(Var7<1*REF(Var7,1),h,l,0.5,0),COLORBLUE;STICKLINE(Var7<1*REF(Var7,1),o,c,5, 1),COLORBLUE;
STICKLINE(Var7>1*REF(Var7,1),h,l,0.5,0),COLORRED;STICKLINE(Var7>1*REF(Var7,1),o,c,5, 1),COLORRED;
STICKLINE(Var7<1*REF(Var7,1) AND Var9>1*REF(Var9,1),h,l,0.5,0),COLORGREEN;STICKLINE(Var7<1*REF(Var7,1) AND Var9>1*REF(Var9,1),o,c,5, 1),COLORGREEN;
买进价:=((c-ref(ma(c,6),1))/6+ma(c,6))*1.004;
买进条件:=cross(c,买进价) and 买进价>ref(买进价,1);
STICKLINE(买进条件,h,l,0.5,1),colorwhite,linethick2;STICKLINE(买进条件,o,c,6,0),colorwhite,linethick2;
加码价:=((c-ref(ma(c,18),1))/18+ma(c,18))*1.004;
加码条件:=cross(c,加码价) and 加码价>ref(加码价,1);
STICKLINE(加码条件,h,l,0.5,1),coloryellow,linethick2;STICKLINE(加码条件,o,c,6,0),coloryellow,linethick2;

Ⅳ 哪位朋友提供金点百分百主图和选股公式源码。不胜感激！

“证卷统计排行网”有大量关于此类的问题解答，您可以去查看！

Ⅳ 找龙回头主图源码公式

公式指标来源于网络.不知道是不是你要的.

{龙回头--主图指标}

MA1:MA(CLOSE,5);

MA2:MA(CLOSE,10);

MA3:MA(CLOSE,20);

MA4:MA(CLOSE,30);

MA5:MA(CLOSE,60);

强势线:MA(C,25)+MA(C,25)*20/100,LINETHICK2,COLORRED;

DM1:=C/REF(C,1)>1.09 AND C>=O;

DM2:=REF(C,4)<REF(O,4) AND REF(C,4)/REF(C,5)<0.96 AND REF(C,2)/REF(C,3)<1.02 AND REF(C,1)/REF(C,2)<1.02;

DM3:=MAX(REF(C,1),REF(O,1))/MIN(REF(C,1),REF(O,1))<1.036 AND MAX(REF(C,2),REF(O,2))/MIN(REF(C,2),REF(O,2))<1.036

AND MAX(REF(C,3),REF(O,3))/MIN(REF(C,3),REF(O,3))<1.036;

DXGM:=COUNT(REF(DM1,1),10) AND DM2 AND DM3;

AM1:=C/REF(C,1)>1.09 AND C>=O;

AM2:=REF(C,3)<REF(O,3) AND REF(C,3)/REF(C,4)<0.96 AND REF(C,2)/REF(C,3)<1.02 AND REF(C,1)/REF(C,2)<1.02;

AM3:=MAX(REF(C,1),REF(O,1))/MIN(REF(C,1),REF(O,1))<1.036 AND MAX(REF(C,2),REF(O,2))/MIN(REF(C,2),REF(O,2))<1.036;

AXGM:=COUNT(REF(AM1,1),10) AND AM2 AND AM3;

BM1:=C/REF(C,1)>1.09 AND C>=O;

BM2:=REF(C,2)<REF(O,2) AND REF(C,2)/REF(C,3)<0.96;

BM3:=MAX(REF(C,1),REF(O,1))/MIN(REF(C,1),REF(O,1))<1.05;

BXGM:=COUNT(REF(BM1,1),10) AND BM2 AND BM3;

CM1:=C/REF(C,1)>1.09 AND C>=O;

CM2:=REF(C,1)<REF(O,1) AND REF(C,1)/REF(C,2)<0.96;

CXGM:=COUNT(REF(CM1,1),10) AND CM2;

SGX:=MA(C,25)+MA(C,25)*20/100;

GYTJ1:=(BETWEEN(O/MA(C,10),1.02,0.99) OR BETWEEN(L/MA(C,10),1.04,0.99) OR (BETWEEN(L/SGX,1.01,0.995) AND SGX/MA(C,10)<1.08))AND C>MA(C,10)

AND BETWEEN(C/REF(C,1),1.05,0.97) AND MA(C,5)>MA(C,10) AND MA(C,5)/MA(C,10)>1.01 AND H/MAX(C,O)<1.04

AND C>MA(C,120)AND MA(C,20)>MA(C,60) AND MA(C,20)>MA(C,120) AND REF(L,1)/REF(MA(C,10),1)>0.998;

GYTJ2:=REF(C,1)<REF(MA(C,5),1) AND O<MA(C,5) AND MA(C,10)>MA(C,20) AND MA(C,20)>MA(C,30);

ABXG:=(DXGM OR AXGM OR BXGM OR CXGM) AND GYTJ1 AND GYTJ2;

DRAWICON(ABXG,L*0.98,11);

DRAWTEXT(ABXG,L*0.94,'龙回头'),COLORWHITE;

SCMXG:=COUNT(ABXG,5) AND CROSS(MA(C,10),MA(C,5));

DRAWICON(SCMXG,L*0.98,9);

DRAWTEXT(SCMXG,L*0.94,'二次尾买'),COLORYELLOW;

Ⅵ 帮我把同花顺指标改成大智慧的指标 源码如下： 麒麟线（主图）：

FL:MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),COLORF4E202;
FS:MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),COLORF4E202,LINETHICK1;
CG:IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17)),coloryellow,LINETHICK2;
VAR0:=(CLOSE*2+HIGH+LOW)/4*VOL;
VAR1:=SUM(VAR0,89)/SUM(VOL,89);
VAR2:=IF(COUNT(VAR0>0,2)>=2,MA(CLOSE,89)*(1+(MA(VAR0,89)/REF(MA(VAR0,89),1)-1)/21),MA(CLOSE,89));
VAR3:=IF(COUNT(ABS(CLOSE-VAR1)>21,8)>=1 AND COUNT(CLOSE/REF(CLOSE,1)<0.8,8)<1 AND COUNT(VAR0>0,2)>=2,10,0);
VAR4:=IF(CLOSE>=VAR1 AND COUNT(VAR0>0,2)>=2,VAR1*1.001,IF(VAR0<0.1 AND COUNT(VAR0>0,2)<1.5,MA(CLOSE,89),VAR1*0.999));
VAR5:=IF(VAR3>0,VAR2,VAR4);
VAR6:=MA(CLOSE,89);
搏杀生命线:IF(VAR5/REF(VAR5,1)>1.1 OR VAR5/REF(VAR5,1)<0.9,VAR6,VAR5),COLORFF80FF,LINETHICK2;

{资金拉升（副图）：}
N:=3;
VAR1:=1.13;
VAR3:=LLV(HIGH,318);
VAR4:=100*(CLOSE-VAR3)/VAR3*VAR1;
VAR5:=REF(LLV(CLOSE,610),1)*VAR1;
VAR6:=REF(HHV(CLOSE,610),1)*VAR1;
VAR7:=100*(CLOSE-VAR5)/(VAR6-VAR5)*VAR1;
VAR8:=(CLOSE-LLV(CLOSE,880))/(HHV(CLOSE,880)-LLV(CLOSE,880))*100*VAR1;
VAR9:=(CLOSE-LLV(CLOSE,318))/(HHV(CLOSE,318)-LLV(CLOSE,318))*100*VAR1;
VARA:=(CLOSE-LLV(LOW,880))/(HHV(HIGH,880)-LLV(LOW,880))*100*VAR1;
VARB:=(CLOSE-LLV(LOW,318))/(HHV(HIGH,318)-LLV(LOW,318))*100*VAR1;
VARC:=EMA(100*(CLOSE-LLV(LOW,144))/(HHV(HIGH,144)-LLV(LOW,144)),5)/4*VAR1;
VARD:=IF(VARC>13.16,VARC,0)*VAR1;
VARE:=VARC<1*VAR1;
VARF:=VARD*VAR1;
VAR10:=VAR4<0 AND VAR7<0;
VAR11:=1;
VAR12:=(HIGH+LOW+CLOSE*2)/4*VAR11;
VAR13:=EMA(VAR12,34);
VAR14:=STD(VAR12,34);
VAR15:=((VAR12-VAR13)/VAR14*100+200)/4*VAR11;
VAR16:=(EMA(VAR15,89)-25)*1.56*VAR11;
VAR17:=EMA(VAR16,5)*1.22*VAR11;
VAR18:=EMA(VAR17,3)*VAR11;
VAR19:=3*VAR17-2*VAR18*VAR11;

{百万操盘（副）：}
止损:REF(C,1)/(1.04),color00ff00;
逃命:REF(C,1)/1.06,COLORee8400;

趋势: 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))*100,5,1),3,1);
买警: IF(趋势<=20,22,0);
卖1: IF(趋势>=95,86,95);
底部: 18;
卖2: IF(趋势>=88,79,88);
买进: IF(CROSS(趋势,底部),22,0);

买入:C,colorred;
卖3: IF(趋势>=81,66,81);
卖4: IF(趋势>=74,57,74);
买警1: IF(趋势<=25,28,25);

Ⅶ 通达信版本-缠论笔段预测主图指标，源代码免费分享

显示开关:=1;

顶价:=REF(H,BARSLAST(H>REF(H,1)));

底价:=REF(L,BARSLAST(L<REF(L,1)));

分型顶0:=H>顶价 AND L>底价;

分型底0:=L<顶价 AND H<底价;

分型顶1:=分型顶0 AND H=HHV(H,BARSLAST(分型底0));

分型底1:=分型底0 AND L=LLV(L,BARSLAST(分型顶0));

分型顶:=FILTERX(分型顶1,BARSLAST(分型底1));

分型底:=FILTERX(分型底1,BARSLAST(分型顶1));

UP1:=BARSLAST(分型底);

顶力度1:=HHV(L,UP1+1)>LLV(H,UP1+1);

顶包含1:=COUNT(L>REF(L,1),UP1)>2 AND COUNT(H>REF(H,1),UP1)>2;

DN1:=BARSLAST(分型顶);

底力度1:=HHV(L,DN1+1)>LLV(H,DN1+1);

底包含1:=COUNT(H>REF(H,1),DN1)>2 AND COUNT(L>REF(L,1),DN1)>2;

笔顶10:=分型顶 AND UP1>3 AND 顶力度1 AND 顶包含1;

笔底10:=分型底 AND DN1>3 AND 底力度1 AND 底包含1;

笔顶11:=笔顶10 AND H=HHV(H,BARSLAST(笔底10));

笔底11:=笔底10 AND L=LLV(L,BARSLAST(笔顶10));

笔顶12:=笔顶11 AND H=HHV(H,BARSLAST(笔底11));

笔底12:=笔底11 AND L=LLV(L,BARSLAST(笔顶11));

笔顶1:=FILTERX(笔顶12,BARSLAST(笔底12));

笔底1:=FILTERX(笔底12,BARSLAST(笔顶12));

UP2:=BARSLAST(笔底1);

顶力度2:=HHV(L,UP2+1)>LLV(H,UP2+1);

顶包含2:=COUNT(L>REF(L,1),UP2)>2 AND COUNT(H>REF(H,1),UP2)>2;

DN2:=BARSLAST(笔顶1);

底力度2:=HHV(L,DN2+1)>LLV(H,DN2+1);

底包含2:=COUNT(H>REF(H,1),DN2)>2 AND COUNT(L>REF(L,1),DN2)>2;

笔顶20:=分型顶 AND UP2>3 AND 顶力度2 AND 顶包含2;

笔底20:=分型底 AND DN2>3 AND 底力度2 AND 底包含2;

笔顶21:=笔顶20 AND H=HHV(H,BARSLAST(笔底20));

笔底21:=笔底20 AND L=LLV(L,BARSLAST(笔顶20));

笔顶2:=FILTERX(笔顶21,BARSLAST(笔底21));

笔底2:=FILTERX(笔底21,BARSLAST(笔顶21));

笔顶3:=笔顶1 OR 笔顶2;

笔底3:=笔底1 OR 笔底2;

笔顶41:=FILTERX(笔顶3 AND H=HHV(H,BARSLAST(笔底3)),BARSLAST(笔底3));

笔底41:=FILTERX(笔底3 AND L=LLV(L,BARSLAST(笔顶3)),BARSLAST(笔顶3));

笔顶42:=FILTERX(笔顶41 AND H=HHV(H,BARSLAST(笔底41)),BARSLAST(笔底41));

笔底42:=FILTERX(笔底41 AND L=LLV(L,BARSLAST(笔顶41)),BARSLAST(笔顶41));

笔顶431:=笔顶42 AND (BARSLAST(笔底42)>1 OR BARSLAST(笔底42)=DRAWNULL);

笔底431:=笔底42 AND (BARSLAST(笔顶42)>1 OR BARSLAST(笔顶42)=DRAWNULL);

笔顶432:=笔顶431 AND (H=HHV(H,BARSLAST(笔底431)) OR BARSLAST(笔底431)=DRAWNULL);

笔底432:=笔底431 AND (L=LLV(L,BARSLAST(笔顶431)) OR BARSLAST(笔顶431)=DRAWNULL);

笔顶43:=FILTERX(笔顶432,BARSLAST(笔底431));

笔底43:=FILTERX(笔底432,BARSLAST(笔顶431));

笔顶441:=笔顶43 AND (BARSLAST(笔底43)>2 OR BARSLAST(笔底43)=DRAWNULL);

笔底441:=笔底43 AND (BARSLAST(笔顶43)>2 OR BARSLAST(笔顶43)=DRAWNULL);

笔顶442:=笔顶441 AND (H=HHV(H,BARSLAST(笔底441)) OR BARSLAST(笔底441)=DRAWNULL);

笔底442:=笔底441 AND (L=LLV(L,BARSLAST(笔顶441)) OR BARSLAST(笔顶441)=DRAWNULL);

笔顶44:=FILTERX(笔顶442,BARSLAST(笔底441));

笔底44:=FILTERX(笔底442,BARSLAST(笔顶441));

笔顶451:=笔顶44 AND (BARSLAST(笔底44)>3 OR BARSLAST(笔底44)=DRAWNULL);

笔底451:=笔底44 AND (BARSLAST(笔顶44)>3 OR BARSLAST(笔顶44)=DRAWNULL);

笔顶452:=笔顶451 AND (H=HHV(H,BARSLAST(笔底451)) OR BARSLAST(笔底451)=DRAWNULL);

笔底452:=笔底451 AND (L=LLV(L,BARSLAST(笔顶451)) OR BARSLAST(笔顶451)=DRAWNULL);

笔顶45:=FILTERX(笔顶452,BARSLAST(笔底452));

笔底45:=FILTERX(笔底452,BARSLAST(笔顶452));

DN511:=BARSLAST(笔顶45);

底力度511:=HHV(L,DN511+1)>LLV(H,DN511+1);

底包含511:=COUNT(H>REF(H,1),DN511)>2 AND COUNT(L>REF(L,1),DN511)>2;

笔底511:=笔底43 AND (笔底45<>1) AND DN511>3 AND 底力度511 AND 底包含511 AND (L=LLV(L,BARSLAST(笔顶45)));

笔底51:=FILTERX(笔底511,BARSLAST(笔顶45));

UP512:=BARSLAST(笔底45);

顶力度512:=HHV(L,UP512+1)>LLV(H,UP512+1);

顶包含512:=COUNT(L>REF(L,1),UP512)>2 AND COUNT(H>REF(H,1),UP512)>2;

笔顶512:=笔顶43 AND (笔顶45<>1) AND UP512>3 AND 顶力度512 AND 顶包含512 AND (H=HHV(H,BARSLAST(笔底45)));

笔顶51:=FILTERX(笔顶512,BARSLAST(笔底45));

笔顶521:=笔顶45 OR 笔顶51;

笔底521:=笔底45 OR 笔底51;

笔顶52:=FILTERX(笔顶521 AND H=HHV(H,BARSLAST(笔底521)),BARSLAST(笔底521));

笔底52:=FILTERX(笔底521 AND L=LLV(L,BARSLAST(笔顶521)),BARSLAST(笔顶521));

UP53:=BARSLAST(笔底52);

顶力度53:=HHV(L,UP53+1)>LLV(H,UP53+1);

顶包含53:=COUNT(L>REF(L,1),UP53)>2 AND COUNT(H>REF(H,1),UP53)>2;

DN53:=BARSLAST(笔顶52);

底力度53:=HHV(L,DN53+1)>LLV(H,DN53+1);

底包含53:=COUNT(H>REF(H,1),DN53)>2 AND COUNT(L>REF(L,1),DN53)>2;

笔顶53:=笔顶52 AND UP53>3 AND 顶力度53 AND

Ⅷ 有木有同花顺主图显示板块概念的源码

可以有同花顺主图显示概念板块的源码,只显示概念板块,效果如下图.