聰明主圖源碼免費下載

Ⅰ 求通達信主圖源碼：倍量柱其後三天價升量縮被確認為『黃金柱』，遂在該量柱最低價畫橫線向右延伸，謝謝

倍量柱:=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

Ⅷ 有木有同花順主圖顯示板塊概念的源碼

可以有同花順主圖顯示概念板塊的源碼,只顯示概念板塊,效果如下圖.