【金柱飞舞】-主力量价模型,主、副、选源码分享!-夜雨聆风

本文最后更新于2026-03-10，某些文章具有时效性，若有错误或已失效，请在下方留言或联系老夜。

【金柱飞舞】-主力量价模型,主、副、选源码分享!

{主图指标}

DMAA:=REF(C,1);DMAB:=C<0.96*O OR C<=DMAA*0.96 OR C>1000 AND C<=DMAA*0.98;DMAC:=BARSLAST(FILTER(DMAB,3));DMAD: REF(O,DMAC),COLORLIGREEN,POINTDOT;DMAE: REF((L+H)/2,DMAC),NODRAW;DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK);DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK);DMAF:=(C-REF(C,1))/REF(C,1)*100;DMAG:=(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’) OR NAMELIKE(‘S’)) AND DMAF>=4.945;DMAH:=(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’) OR NAMELIKE(‘S’)) AND DMAF<=-4.945;DMAI:IF(DMAG,REF(C,1)*1.05,REF(C,1)*1.1),NODRAW;DMAJ:IF(DMAH,REF(C,1)*0.95,REF(C,1)*0.9),NODRAW;DMAK:=1.3;DMAL:=1;DMAM:=0;DMAN:=MA(C,5);DMAO:=MA(C,10);DMAP:=MA(C,20);DMAQ:=DMAN>REF(DMAN,1) AND DMAO<REF(DMAO,1) AND DMAP<REF(DMAP,1);DMAR:=REF(V,1);DMAS:=REF(V,2);DMAT:=REF(V,3);DMAU:=REF(C,2);DMBA:=REF(C,3);DMBB:=REF(C,4);DMBC:=REF(O,1);DMBD:=REF(O,2);DMBE:=REF(O,3);DMBF:=REF(O,4);DMBG:=C>=DMBA AND DMAU>=DMBA;DMBH:=L>DMBE AND REF(L,1)>DMBE AND REF(L,2)>DMBE;DMBI:=AMOUNT/VOL/100;DMBJ:=REF(DMBI,1);DMBK:=REF(DMBI,2);DMBL:=C>=O OR (C<O AND DMBI>DMAA);DMBM:=COUNT(DMBL,3)>=2;DMBN:=DMBA>DMBE;DMBO:=(DMBI>=DMBJ OR C>DMAA) AND (DMBJ>=DMBK OR DMAA>=DMAU);DMBP:=(C+DMAA+DMAU)/3>DMBA;DMBQ:=V>DMAR AND DMAR>DMAS;DMBR:=V<=DMAR AND DMAR<=DMAS;DMBS:=(V+DMAR+DMAS)/3<=DMAT AND NOT(DMBQ);DMBT:=C/V;DMBU:=DMBT>=REF(DMBT,1) AND REF(DMBT,1)>=REF(DMBT,2);DMBV:=(C+DMAA+DMAU)/3/DMBA;DMBW:=(V+DMAR+DMAS)/3/DMAT;DMBX:=DMAK*DMBV/DMBW>1;DMBY:=DMBE>DMBB AND DMBB>DMBF;DMBZ:=DMBN AND DMBO AND DMBR AND DMBG AND DMBH AND DMBY;DMCB:=BACKSET(DMBZ,5);DMCA:=FILTER(DMCB,4);DMCC:=DMBN AND DMBO AND DMBR AND DMBG AND DMBH;DMCD:=BACKSET(DMCC,4);DMCE:=FILTER(DMCD,3);DMCF:=DMCC AND REF(DMCC,1);DMCG:=BACKSET(DMCF,4);DMCH:=FILTER(DMCG,3);DMCI:=DMCC AND REF(DMCC,2);DMCJ:=BACKSET(DMCI,4);DMCK:=FILTER(DMCJ,3);DMCL:=DMCC AND REF(DMCC,3);DMCM:=BACKSET(DMCL,4);DMCN:=FILTER(DMCM,3);DMCO:=DMBN AND DMBO AND DMBS AND NOT(DMBQ) AND DMBG AND DMBH AND DMBY AND NOT(DMCC) AND NOT(DMBZ);DMCP:=BACKSET(DMCO,5);DMCQ:=FILTER(DMCP,4);DMCR:=DMBN AND DMBO AND DMBS AND NOT(DMBQ) AND DMBG AND DMBH AND NOT(DMCC) AND NOT(DMBZ);DMCS:=BACKSET(DMCR,4);DMCT:=FILTER(DMCS,3);DMCU:=DMCR AND REF(DMCR,1);DMCV:=BACKSET(DMCU,4);DMCW:=FILTER(DMCV,3);DMCX:=DMCR AND REF(DMCR,2);DMCY:=BACKSET(DMCX,4);DMCZ:=FILTER(DMCY,3);DMDA:=DMCR AND REF(DMCR,3);DMDB:=BACKSET(DMDA,4);DMDC:=FILTER(DMDB,3);DMDD:=DMBN AND DMBP AND DMBR AND DMBG AND DMBH AND DMBY AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMBZ) AND NOT(DMCO);DMDE:=BACKSET(DMDD,5);DMDF:=FILTER(DMDE,4);DMDG:=DMBN AND DMBP AND DMBR AND DMBG AND DMBH AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMBZ) AND NOT(DMCO);DMDH:=BACKSET(DMDG,4);DMDI:=FILTER(DMDH,3);DMDJ:=DMDG AND REF(DMDG,1);DMDK:=BACKSET(DMDJ,4);DMDL:=FILTER(DMDK,3);DMDM:=DMDG AND REF(DMDG,2);DMDN:=BACKSET(DMDM,4);DMDO:=FILTER(DMDN,3);DMDP:=DMDG AND REF(DMDG,3);DMDQ:=BACKSET(DMDP,4);DMDR:=FILTER(DMDQ,3);DMDS:=DMBN AND DMBP AND DMBS AND DMBG AND DMBH AND DMBY AND NOT(DMCC) AND NOT(DMBZ) AND NOT(DMCR) AND NOT(DMCO) AND NOT(DMDG);DMDT:=BACKSET(DMDS,5);DMDU:=FILTER(DMDT,4);DMDV:=DMBN AND DMBP AND DMBS AND DMBG AND DMBH AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMDG) AND NOT(DMBZ) AND NOT(DMCO);DMDW:=BACKSET(DMDV,4);DMDX:=FILTER(DMDW,3);DMDY:=DMDV AND REF(DMDV,1);DMDZ:=BACKSET(DMDY,4);DMEA:=FILTER(DMDZ,3);DMEB:=DMDV AND REF(DMDV,2);DMEC:=BACKSET(DMEB,4);DMED:=FILTER(DMEC,3);DMEE:=DMDV AND REF(DMDV,3);DMEF:=BACKSET(DMEE,4);DMEG:=FILTER(DMEF,3);DMEH:=DMBN AND DMBP AND DMBX AND DMBG AND DMBH AND DMBY AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMDG) AND NOT(DMCC) AND NOT(DMBZ) AND NOT(DMCO) AND NOT(DMDS);DMEI:=BACKSET(DMEH,5);DMEJ:=FILTER(DMEI,4);DMEK:=DMBN AND DMBP AND DMBX AND DMBG AND DMBH AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMDG) AND NOT(DMBZ) AND NOT(DMCO) AND NOT(DMDS);DMEL:=BACKSET(DMEK,4);DMEM:=FILTER(DMEL,3);DMEN:=DMEK AND REF(DMEK,1);DMEO:=BACKSET(DMEN,4);DMEP:=FILTER(DMEO,3);DMEQ:=DMEK AND REF(DMEK,2);DMER:=BACKSET(DMEQ,4);DMES:=FILTER(DMER,3);DMET:=DMEK AND REF(DMEK,3);DMEU:=BACKSET(DMET,4);DMEV:=FILTER(DMEU,3);DMEW:=DMBN AND DMBP AND DMBU AND DMBG AND DMBH AND DMBY AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMDG) AND NOT(DMEK) AND NOT(DMBZ) AND NOT(DMCO) AND NOT(DMDS) AND NOT(DMEH);DMEX:=BACKSET(DMEW,5);DMEY:=FILTER(DMEX,4);DMEZ:=DMBN AND DMBP AND DMBU AND DMBG AND DMBH AND NOT(DMCC) AND NOT(DMCR) AND NOT(DMDG) AND NOT(DMEK) AND NOT(DMBZ) AND NOT(DMCO) AND NOT(DMDS);DMFA:=BACKSET(DMEZ,4);DMFB:=FILTER(DMFA,3);DMFC:=DMEZ AND REF(DMEZ,1);DMFD:=BACKSET(DMFC,4);DMFE:=FILTER(DMFD,3);DMFF:=DMEZ AND REF(DMEZ,2);DMFG:=BACKSET(DMFF,4);DMFH:=FILTER(DMFG,3);DMFI:=DMEZ AND REF(DMEZ,3);DMFJ:=BACKSET(DMFI,4);DMFK:=FILTER(DMFJ,3);DMFL:=(DMCE AND NOT(REF(DMCE,4))) OR (DMCH AND NOT(REF(DMCH,4))) OR (DMCK AND NOT(REF(DMCK,4))) OR (DMCN AND NOT(REF(DMCN,4)));DMFM:=(DMCT AND NOT(REF(DMCT,4))) OR (DMCW AND NOT(REF(DMCW,4))) OR (DMCZ AND NOT(REF(DMCZ,4))) OR (DMDC AND NOT(REF(DMDC,4)));DMFN:=(DMDI AND NOT(REF(DMDI,4))) OR (DMDL AND NOT(REF(DMDL,4))) OR (DMDO AND NOT(REF(DMDO,4))) OR (DMDR AND NOT(REF(DMDR,4)));DMFO:=(DMDX AND NOT(REF(DMDX,4))) OR (DMEA AND NOT(REF(DMEA,4))) OR (DMED AND NOT(REF(DMED,4))) OR (DMEG AND NOT(REF(DMEG,4)));DMFP:=(DMEM AND NOT(REF(DMEM,4))) OR (DMEP AND NOT(REF(DMEP,4))) OR (DMES AND NOT(REF(DMES,4))) OR (DMEV AND NOT(REF(DMEV,4)));DMFQ:=(DMFB AND NOT(REF(DMFB,4))) OR (DMFE AND NOT(REF(DMFE,4))) OR (DMFH AND NOT(REF(DMFH,4))) OR (DMFK AND NOT(REF(DMFK,4)));DMFR:=DMFL OR DMFM OR DMFN OR DMFO OR DMFP OR DMFQ;STICKLINE(DMFR AND NOT(REF(DMFR,4)),OPEN,CLOSE,3,0),COLOR0099FF;DRAWTEXT (DMFR AND NOT(REF(DMFR,4)),LOW*0.986,’↖黄金柱’),COLORYELLOW;DMFS:=SUMBARS(DMFR,1);STICKLINE(DMFS AND DMAL=1,REF(C,DMFS-1),REF(C,DMFS-1),10,0),COLOR8822FF;DMFT:=(DMCA AND NOT(REF(DMCA,5)));DMFU:=(DMCQ AND NOT(REF(DMCQ,5)));DMFV:=(DMDF AND NOT(REF(DMDF,5)));DMFW:=(DMDU AND NOT(REF(DMDU,5)));DMFX:=(DMEJ AND NOT(REF(DMEJ,5)));DMFY:=(DMEY AND NOT(REF(DMEY,5)));DMFZ:=DMFT OR DMFU OR DMFV OR DMFW OR DMFX OR DMFY;STICKLINE(DMFZ AND NOT(REF(DMFZ,5)),OPEN,CLOSE,3,0),COLOR0000FF;DRAWTEXT (DMFZ AND NOT(REF(DMFZ,5)),LOW*0.978,’↖元帅柱’),COLOR0000FF;DMGA:=SUMBARS(DMFZ,1);STICKLINE(DMGA AND DMAL=1,REF(C,DMGA-1),REF(C,DMGA-1),10,0),COLOR8822FF;DMGB:=(DMCC OR DMCR OR DMDG OR DMEK OR DMEZ) AND DMAQ AND DMAM;DMGC:=BACKSET(DMGB,4);DMGD:=FILTER(DMGC,3);STICKLINE(DMGD AND NOT(REF(DMGD,4)),OPEN,CLOSE,3,0),COLOR0099FF;DRAWTEXT(DMGD AND NOT(REF(DMGD,4)),LOW*0.958,’↖临界点’),COLOR0099FF;DMGE:=(DMBZ OR DMCO OR DMDD OR DMEH OR DMEW) AND DMAQ AND DMAM;DMGF:=BACKSET(DMGE,5);DMGG:=FILTER(DMGF,5);STICKLINE(DMGG AND NOT(REF(DMGG,4)),OPEN,CLOSE,3,0),COLOR0099FF;DRAWTEXT(DMGG AND NOT(REF(DMGG,4)),LOW*0.958,’↖临界点’),COLOR0099FF;DMGH:=REF(C,1);DMGI:=IF((C-DMGH)*100/DMGH>=(10-0.01*100/DMGH),1,0);STICKLINE(DMGI,OPEN,CLOSE,2,0),COLORFF00FF;STICKLINE(DMGI,H,L,0,0),COLORFF00FF;DMGJ:=IF((DMGH-C)*100/DMGH>=(10-0.01*100/DMGH),1,0);STICKLINE(DMGJ,OPEN,CLOSE,2,0),COLORGREEN;STICKLINE(DMGJ,H,L,0,1),COLORGREEN;

{黄金坑F}

YIDO1:=5;

YIDO2:=3;

YIDO3:SMA(EMA(((C+L)/2-LLV(L,21))/(HHV((H+C)/2,21)-LLV(L,21))*100,3),7,1)-(13),LINETHICK2,COLORF0F000;

YIDO4:=(SMA(((C+L)/2-LLV(L,21))/(HHV((H+C)/2,21)-LLV(L,21))*100,2,1)-8);

YIDO5:YIDO4>YIDO3,COLOR9800FF;

YIDO6:YIDO4<YIDO3,COLORYELLOW;

STICKLINE(FILTER(CROSS(YIDO4,YIDO3)=1 OR YIDO4>REF(YIDO4,1),10) AND YIDO4<25 ,YIDO3,YIDO3+10,9,1),COLORRED;

DRAWICON(FILTER(YIDO3>=REF(YIDO3,1)AND YIDO3<0,15),0,4);

YIDO7:=1;

YIDO8:=REF(HIGH,1)*1.1;

YIDO9:=HIGH*1.1;

YIDO10:=(YIDO9*VOL+YIDO8*(CAPITAL-VOL))/CAPITAL;

YIDO11:=REF(LOW,1)*0.9;

YIDO12:=LOW*0.9;

YIDO13:=(YIDO12*VOL+YIDO11*(CAPITAL-VOL))/CAPITAL;

YIDO14:=EMA(YIDO13,30);

YIDO15:=EMA(YIDO10,30);

YIDO16:=YIDO15-2;

YIDO17:=IF(CLOSE<=YIDO14,YIDO16,YIDO15);

YIDO18:=MA(CLOSE,80)-MA(CLOSE,10)/17;

STICKLINE(YIDO17-YIDO16=0 AND YIDO7 AND CROSS((EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1)-REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1))/REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1)*100,MA((EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1)-REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1))/REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1)*100,YIDO2)),50,0,5,0),COLORCC9966;

DRAWTEXT(FILTER(YIDO17-YIDO16=0 AND CROSS((EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1)-REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1))/REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1)*100,MA((EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1)-REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1))/REF(EMA(EMA(EMA(CLOSE,YIDO1),YIDO1),YIDO1),1)*100,YIDO2)),4),55,’可入’),COLORRED;

YIDO19:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;

YIDO20:SMA(SMA(YIDO19,3,1),3,1),COLORFF6633;

YIDO21:3*SMA(YIDO19,3,1)-2*YIDO20,COLORRED;

DRAWICON(CROSS(90,YIDO21),90,2);

STICKLINE(SMA(YIDO19,3,1)>YIDO20,SMA(YIDO19,3,1),YIDO20,4,0),COLOR1133FF;

VAR2:=LLV(LOW,10);

VAR3:=HHV(HIGH,25);

DLX:EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4),NODRAW;

STICKLINE(DLX>REF(DLX,1) AND DLX>3.49.8 ,100,110,1,0),COLORWHITE;

STICKLINE(DLX<=REF(DLX,1) AND REF(DLX,1)>3.49.8,100 ,110,1,0),COLORWHITE;

STICKLINE(DLX<0.5,0 ,-10,1,0),COLORMAGENTA;

STICKLINE(DLX<=REF(DLX,1) AND REF(DLX,1)<0.5,0 ,-10,1,0),COLORMAGENTA;

AR1:=IF(HHV(ABS(HHV(CLOSE,6)/LLV(CLOSE,6)-1),6)>10/100,3,6);

AR2:=AR1*48;

AR3:=VOL<MA(VOL,5) AND MA(VOL,5)<MA(VOL,55);

AR4:=CLOSE/REF(CLOSE,1)>1.025;

AR5:=MA(CLOSE,10)>CLOSE*1.05;

AR6:=MA(CLOSE,10)<CLOSE*1.1;

AR7:=MA(CLOSE,60)>CLOSE*1.28;

AR8:=AR3 AND AR4 AND AR5 AND AR6 AND AR7;

{量能异动X}

N:=10;DMGK:=1;DMGL:=INTPART(SUM(V,0)/CAPITAL);DMGM:=DMGL>REF(DMGL,1) OR BARSSINCE(CLOSE)=0;DMGN:=BARSLAST(DMGM)+1;DMGO:=DMGN< REF(DMGN,1);DMGP:=IF(DMGO,REF(DMGN,1)+1,DMGN);DMGQ:=SUM(DMGO,0);DMGR:=”KD.K#WEEK“(9,3,3);DMGS:=”KD.D#WEEK”(9,3,3);DMGT:=”MACD.DIF#WEEK”(5,34,5);DMGU:=”MACD.DEA#WEEK”(5,34,5);换手:=V/CAPITAL*100,LINETHICK0;DMGV:=CROSS(DMGR,DMGS) AND REF(DMGS,1)< 60;DMGW:EXIST(DMGV,DMGK);

源码复制错误的请自行下载Tn6，需先点””+“”，然后发关键词：260119。