【通達信】求股價突破最長籌碼條上的上沿價格做成選股公式(已解決：深情厚意)

M18:=MA(C,18);
M36:=MA(C,36);
M72:=MA(C,72);
M144:=MA(C,144);
本:=C>M18 AND C>M36  AND C>M72 AND C>M144 AND M72>=REF(M72,1) AND M144>REF(M144,1);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主動買盤:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主買占%:=主動買盤/VOL*100;
振幅:=BETWEEN((H-L)/REF(C,1)*100,1.2,6);
換手率:=VOL/CAPITAL*100;

強命線:=EMA(COST(81),10);
平線:=HHV(強命線,60);
C平線幅:=100*(C-平線)/平線;
H高:=H>HHV(C,120);
趨高:=COUNT(H高,2)>=1;      
              
中午:本 AND 主買占%>37 AND 振幅<7 AND 換手率<17 AND C>平線 AND C平線幅<19 AND 趨高;

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
能量:=OBV=HHV(OBV,16);   
量能:=COUNT(能量,4)>=1;
價漲幅1:=(C-REF(C,1))/REF(C,1);
量漲幅1:=(V-REF(V,1))/REF(V,1);
價漲幅:=SUM(價漲幅1,0);
量漲幅:=SUM(量漲幅1,0);
量漲幅2:=EMA(量漲幅,50)/EMA(價漲幅,20);  
量漲幅線:=量漲幅/量漲幅2;


價量幅度:=100*(價漲幅-量漲幅線)/量漲幅線;  
幅度:=價量幅度>-0.46 AND 價量幅度<3.3;  

PJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-PJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,PJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5)+(V2*V5);
V7:=(V3*V5)+(V4*V5);
WP1:=DYNAINFO(23);
NP1:=DYNAINFO(22);
WP2:=IF(ISLASTBAR,V7*240/FROMOPEN,V7);
NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6);
WP:=IF(ISLASTBAR AND PERIOD=5 ,WP1,WP2);
NP:=IF(ISLASTBAR AND PERIOD=5 ,NP1,NP2);
日差:=WP-NP;
中午1:量能 AND 幅度 AND 日差>0;

CMN:=20;
TRENDA:=WINNER(C)*100;
CMQS1:=WMA(TRENDA,8);
CMQS2:=WMA(TRENDA,13);
CMQS3:=WMA(TRENDA,21);
CMQS4:=WMA(TRENDA,34);
CMQS5:=WMA(TRENDA,55);
CM01:=CMQS1>REF(CMQS1,1);
CM02:=CMQS2>REF(CMQS2,1);
CM03:=CMQS3>REF(CMQS3,1);
CM04:=CMQS4>REF(CMQS4,1);
CM05:=CMQS5>REF(CMQS5,1);
CM06:=TRENDA>CMQS1;
CM07:=TRENDA>CMQS2;
CM08:=TRENDA>CMQS3;
CM09:=TRENDA>CMQS4;
CM10:=TRENDA>CMQS5;
CM11:=CMQS1>CMQS2;
CM12:=CMQS1>CMQS3;
CM13:=CMQS1>CMQS4;
CM14:=CMQS1>CMQS5;
CM15:=CMQS2>CMQS3;
CM16:=CMQS2>CMQS4;
CM17:=CMQS2>CMQS5;
CM18:=CMQS3>CMQS4;
CM19:=CMQS3>CMQS5;
CM20:=CMQS4>CMQS5;
籌碼:=EMA(((CM01+CM02+CM03+CM04+CM05+CM06+CM07+CM08+CM09+CM10+
CM11+CM12+CM13+CM14+CM15+CM16+CM17+CM18+CM19+CM20)*(100/CMN)),2);

{量能部分:}
方向成交量:=IFF(CLOSE>=OPEN,VOL,VOL*(-1));
LHLNMID:=(3*CLOSE+OPEN+HIGH+LOW)/6;
LHLN短線:=WMA(LHLNMID,5);
LHLN中線:=WMA(LHLNMID,10);
LHLN多頭:=LHLN短線>LHLN中線;
P01:=SUM(方向成交量,1)>0;
P02:=SUM(方向成交量,2)>0;
P03:=SUM(方向成交量,3)>0;
P04:=SUM(方向成交量,4)>0;
P05:=SUM(方向成交量,5)>0;
SUM11:=SUM(方向成交量,11);
SUM12:=SUM(方向成交量,12);
SUM13:=SUM(方向成交量,13);
SUM14:=SUM(方向成交量,14);
SUM15:=SUM(方向成交量,15);
SUM16:=SUM(方向成交量,16);
SUM17:=SUM(方向成交量,17);
SUM18:=SUM(方向成交量,18);
SUM19:=SUM(方向成交量,19);
SUM20:=SUM(方向成交量,20);
P11:=SUM11>0 AND SUM11>REF(SUM11,1);
P12:=SUM12>0 AND SUM12>REF(SUM12,1);
P13:=SUM13>0 AND SUM13>REF(SUM13,1);
P14:=SUM14>0 AND SUM14>REF(SUM14,1);
P15:=SUM15>0 AND SUM15>REF(SUM15,1);
P16:=SUM16>0 AND SUM16>REF(SUM16,1);
P17:=SUM17>0 AND SUM17>REF(SUM17,1);
P18:=SUM18>0 AND SUM18>REF(SUM18,1);
P19:=SUM19>0 AND SUM19>REF(SUM19,1);
P20:=SUM20>0 AND SUM20>REF(SUM20,1);
MAZJ05:=MA(方向成交量,5);
MAZJ10:=MA(方向成交量,10);
MAZJ15:=MA(方向成交量,15);
MAZJ20:=MA(方向成交量,20);
MA01:=MAZJ05>MAZJ10;
MA02:=MAZJ05>MAZJ15;
MA03:=MAZJ05>MAZJ20;
MA04:=MAZJ10>MAZJ15;
MA05:=MAZJ10>MAZJ20;
MA06:=MAZJ15>MAZJ20;
基準線1:=EMA(EMA(EMA(EMA(IFF(方向成交量>=0,方向成交量,0),20),2),2),2);
基準線6:=基準線1*6;
ZJDL10:=IFF(方向成交量>基準線6,10,IFF(方向成交量<=基準線6 AND 方向成交量>0,10*方向成交量/基準線6,0));
短線總量:=SUM(方向成交量,3);
短線總量10:=EMA(短線總量,10);
短線總量60:=EMA(短線總量,60);
短線總量20:=EMA(短線總量,20);
短線總量30:=EMA(短線總量,30);
CZD01:=短線總量>短線總量10;
CZD02:=短線總量20>短線總量30;
CZD03:=短線總量10>短線總量60;
總權:=53;
量能X:=EMA(EMA(100*(P01*2+P02*2+P03*5+P04*2+P05*2+P11*1+P12*1+P13*1+P14*1+P15*1+P16*1+P17*1+P18*1+P19*1+P20*1+
MA01*2+MA02*2+MA03*1+MA04*1+MA05*1+MA06*1+ZJDL10+CZD01*5+CZD02*4+CZD03*3)/總權,2),2);
量能XX:=IFF(LHLN多頭,量能X*1.2,量能X);
量能:=WMA(IFF(量能XX>=100,100,量能XX),3);

{趨勢部分:}
數量:=23;
DMADIF:=MA(C,10)-MA(C,50);
DMAAMA:=MA(DMADIF,10);
DMAX:=DMADIF>DMAAMA;
P301:=DMAX;
DMITR:=EXPMEMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),14);
DMIHD:=H-REF(H,1);
DMILD:=REF(L,1)-L;
DMIDMP:=EXPMEMA(IFF(DMIHD>0 AND DMIHD>DMILD,DMIHD,0),14);
DMIDMM:=EXPMEMA(IFF(DMILD>0 AND DMILD>DMIHD,DMILD,0),14);
DMIPDI:=DMIDMP*100/DMITR;
DMIMDI:=DMIDMM*100/DMITR;
DMIX:=DMIPDI>DMIMDI;
P302:=DMIX;
DPODPO:=C-REF(MA(C,20),20/2+1);
DPOMADPO:=MA(DPODPO,6);
DPOX:=DPODPO>DPOMADPO;
P303:=DPOX;
EMVVOLUME:=MA(V,14)/V;
EMVMID:=100*(H+L-REF(H+L,1))/(H+L);
EMVEMV:=MA(EMVMID*EMVVOLUME*(H-L)/MA(H-L,14),14);
EMVMAEMV:=MA(EMVEMV,9);
EMVX:=EMVEMV>EMVMAEMV;
P304:=EMVX;
MACDDIF:=EMA(C,12)-EMA(C,26);
MACDDEA:=EMA(MACDDIF,9);
MACDX:=MACDDIF>MACDDEA;
P305:=MACDX;
TRIXTR:=EMA(EMA(EMA(C,12),12),12);
TRIXTRIX:=(TRIXTR-REF(TRIXTR,1))/REF(TRIXTR,1)*100;
TRIXMATRIX:=MA(TRIXTRIX,9);
TRIXX:=TRIXTRIX>TRIXMATRIX;
P306:=TRIXX;
WVADWVAD:=SUM((C-O)/(H-L)*V,24)/10000;
WVADMAWVAD:=MA(WVADWVAD,6);
WVADX:=WVADWVAD>WVADMAWVAD;
P308:=WVADX;
JSJS:=100*(C-REF(C,5))/(5*REF(C,5));
JSMAJS1:=MA(JSJS,5);
JSX:=JSJS>JSMAJS1;
P309:=JSX;
CYEMAL:=MA(C,5);
CYEMAS:=MA(MA(C,20),5);
CYECYEL:=(CYEMAL-REF(CYEMAL,1))/REF(CYEMAL,1)*100;
CYECYES:=(CYEMAS-REF(CYEMAS,1))/REF(CYEMAS,1)*100;
CYEX:=CYECYEL>CYECYES;
P310:=CYEX;
JLHBVAR1:=(C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*80;
JLHBB:=SMA(JLHBVAR1,7,1);
JLHBVAR2:=SMA(JLHBB,5,1);
JLHBX:=JLHBB>JLHBVAR2;
P311:=JLHBX;
CYCJJJ:=IFF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
CYCDDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
CYCJJJT:=IFF(CYCDDD,1,(CYCJJJ<(DYNAINFO(5)+0.01) && CYCJJJ>(DYNAINFO(6)-0.01)));
CYCCYC1:=IFF(CYCJJJT,0.01*EXPMA(AMOUNT,5)/EXPMA(VOL,5),EMA((HIGH+LOW+CLOSE)/3,5));
CYCCYC2:=IFF(CYCJJJT,0.01*EXPMA(AMOUNT,13)/EXPMA(VOL,13),EMA((HIGH+LOW+CLOSE)/3,13));
CYCX:=CYCCYC1>CYCCYC2;
P312:=CYCX;
BBIBBI:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;
BBIX:=C>BBIBBI;
P313:=BBIX;
DDITR:=MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1)));
DDIDMZ:=IFF((H+L)<=(REF(H,1)+REF(L,1)),0,MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1))));
DDIDMF:=IFF((H+L)>=(REF(H,1)+REF(L,1)),0,MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1))));
DDIDIZ:=SUM(DDIDMZ,13)/(SUM(DDIDMZ,13)+SUM(DDIDMF,13));
DDIDIF:=SUM(DDIDMF,13)/(SUM(DDIDMF,13)+SUM(DDIDMZ,13));
DDIDDI:=DDIDIZ-DDIDIF;
DDIADDI:=SMA(DDIDDI,30,10);
DDIAD:=MA(DDIADDI,5);
DDIX:=DDIADDI>DDIAD;
P314:=DDIX;
FSLSWL:=(EXPMA(C,5)*7+EXPMA(C,10)*3)/10;
FSLSWS:=DMA(EMA(C,12),MAX(1,100*(SUM(V,5)/(3*CAPITAL))));
FSLX:=FSLSWL>FSLSWS;
P315:=FSLX;
MAMA1:=MA(C,5);
MAMA2:=MA(C,10);
MAXX:=MAMA1>MAMA2;
P316:=MAXX;
EXPEMA1:=EXPMA(C,12);
EXPEMA2:=EXPMA(C,17);
EXPMAX:=EXPEMA1>EXPEMA2 AND EXPEMA1>REF(EXPEMA1,1) AND EXPEMA2>REF(EXPEMA2,1);
P317:=EXPMAX;
PBX1:=(EXPMA(C,4)+MA(C,4*2)+MA(C,4*4))/3;
PBX2:=(EXPMA(C,6)+MA(C,6*2)+MA(C,6*4))/3;
PBXX:=PBX1>PBX2 AND PBX1>REF(PBX1,1) AND PBX2>REF(PBX2,1);
P318:=PBXX;
SARX:=C>SAR(4,2,20);
P319:=SARX;
QLTB:=IFF(H>REF(C,1),H-REF(C,1)+C-L,C-L);
QLTS:=IFF(REF(C,1)>LOW,REF(C,1)-L+H-C,H-C);
QLVOL_:=(QLTB-QLTS)*V/(QLTB+QLTS)/100;
QLVOL_0:=DMA(QLVOL_,0.1);
QLVOL_1:=DMA(QLVOL_,0.05);
QLRES1:=QLVOL_0-QLVOL_1;
QLLON:=SUM(QLRES1,0);
QLLONG:=QLLON;
QLMA1:=MA(QLLON,10);
LONQLX:=QLLONG>REF(QLLONG,1) AND QLMA1>REF(QLMA1,1) AND QLLONG>QLMA1;
P320:=LONQLX;
QLSTB:=IFF(H>REF(C,1),H-REF(C,1)+C-L,C-L);
QLSTS:=IFF(REF(C,1)>L,REF(C,1)-L+H-C,H-C);
QLSVOL_:=(QLSTB-QLSTS)*V/(QLSTB+QLSTS)/100;
QLSVOL_0:=DMA(QLSVOL_,0.1);
QLSVOL_1:=DMA(QLSVOL_,0.05);
QLSSHORT:=QLSVOL_0-QLSVOL_1;
QLSMA1:=MA(QLSSHORT,10);
SHORTQLX:=QLSSHORT>QLSMA1;
P321:=SHORTQLX;
AMVAMV0:=V*(O+C)/2;
AMVAMV1:=SUM(AMVAMV0,5)/SUM(V,5);
AMVAMV2:=SUM(AMVAMV0,13)/SUM(V,13);
AMVX:=AMVAMV1>AMVAMV2;
P322:=AMVX;
MTMMTM:=C-REF(C,12);
MTMMAMTM:=MA(MTMMTM,6);
MTMX:=MTMMTM>MTMMAMTM;
P323:=MTMX;
ZJTJVAR1:=EMA(EMA(C,9),9);
ZJTJ控盤:=(ZJTJVAR1-REF(ZJTJVAR1,1))/REF(ZJTJVAR1,1)*1000;
YZKPX:=ZJTJ控盤>REF(ZJTJ控盤,1) AND ZJTJ控盤>0;
P324:=YZKPX;
趨勢:=(P301+P302+P303+P304+P305+P306+P308+P309+P310+P311+P312+P313+P314+P315+P316+P317+P318+P319+P320+P321+P322+P323+P324)*(100/數量);

{指標部分:}
ZBSLPG:=22;
LTSHPG:=100-100*(HHV(H,40)-C)/(HHV(H,40)-LLV(L,40));
ZB01:=LTSHPG>=50;
DIFPG:=EMA(C,12)-EMA(C,26);
DEAPG:=EMA(DIFPG,9);
ZB02:=DIFPG>DEAPG;
APG:=MA((-100)*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),19);
BPG:=(-100)*(HHV(H,14)-C)/(HHV(H,14)-LLV(L,14));
DPG:=EMA((-100)*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),4);
QSDDLONG:=APG+100;
QSDDSHORT:=BPG+100;
QSDDMID:=DPG+100;
ZB03:=QSDDSHORT>QSDDMID;
ZB04:=QSDDSHORT>QSDDLONG;
ZB05:=QSDDMID>QSDDLONG;
RSVPG:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
KPG:=SMA(RSVPG,3,1);
DPG2:=SMA(KPG,3,1);
ZB06:=KPG>DPG2;
LCPG:=REF(CLOSE,1);
RPG1:=SMA(MAX(C-LCPG,0),6,1)/SMA(ABS(C-LCPG),6,1)*100;
RPG2:=SMA(MAX(C-LCPG,0),12,1)/SMA(ABS(C-LCPG),12,1)*100;
RPG3:=SMA(MAX(C-LCPG,0),24,1)/SMA(ABS(C-LCPG),24,1)*100;
ZB07:=RPG1>RPG2;
ZB08:=RPG1>RPG3;
ZB09:=RPG2>RPG3;
ZB10:=MA(C,5)>MA(C,10);
ZB11:=MA(C,5)>MA(C,20);
ZB12:=MA(C,10)>MA(C,20);
MAVPG:=(C*2+H+L)/4;
SKPG:=EMA(MAVPG,13)-EMA(MAVPG,34);
SDPG:=EMA(SKPG,5);
ZB13:=(2*(SKPG-SDPG))>((-2)*(SKPG-SDPG));
MIDPGX:=(3*C+O+L+H)/6;
DKXPG1:=WMA(MIDPGX,5);
DKXPG2:=WMA(MIDPGX,10);
DKXPG3:=WMA(MIDPGX,20);
ZB14:=DKXPG1>REF(DKXPG1,1);
ZB15:=DKXPG2>REF(DKXPG2,1);
ZB16:=DKXPG3>REF(DKXPG3,1);
G08PG:=EMA(C,34);
ZB17:=G08PG>REF(G08PG,1);
B08PG:=(C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*80;
BPG1:=SMA(B08PG,7,1);
BPG2:=SMA(BPG1,3,1);
ZB18:=BPG1>BPG2;
BBIPG:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;
ZB19:=C>BBIPG;
MIDSLB:=(3*C+L+O+H)/6;
E1:=EMA(10000*(WMA(MIDSLB,30)-REF(WMA(MIDSLB,30),1))/REF(WMA(MIDSLB,30),1),10);
E2:=EMA(E1,2);
E3:=EMA(E2,2);
E4:=EMA(E3,2);
E5:=EMA(E4,2);
E6:=EMA(E5,2);
E7:=EMA(E6,2);
ZB20:=E2>E3 AND E3>E4 AND E4>E5 AND E5>E6 AND E6>E7;
ZB21:=E2>REF(E2,1) AND E3>REF(E3,1) AND E4>REF(E4,1) AND E5>REF(E5,1) AND E6>REF(E6,1) AND E7>REF(E7,1);
TRPG1:=MAX(MAX((H-L),ABS(H-REF(C,1))),ABS(REF(C,1)-L));
ATRPG1:=EMA(TRPG1,14);
HDPG:=H-REF(H,1);
LDPG:=REF(L,1)-L;
PDMPG:=EMA(IFF(HDPG>0 AND HDPG>LDPG,HDPG,0),14);
MDMPG:=EMA(IFF(LDPG>0 AND LDPG>HDPG,LDPG,0),14);
PDIPG:=PDMPG/ATRPG1;
MDIPG:=MDMPG/ATRPG1;
XLPG:=(PDIPG-MDIPG)/(PDIPG+MDIPG);
ZB22:=XLPG>0;
指標:=(ZB01+ZB02+ZB03+ZB04+ZB05+ZB06+ZB07+ZB08+ZB09+ZB10+
ZB11+ZB12+ZB13+ZB14+ZB15+ZB16+ZB17+ZB18+ZB19+ZB20+ZB21+ZB22)*(100/ZBSLPG);

{資金部分:}


JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
主力流入:=(QJ0*(JJ-MIN(CLOSE,OPEN)));
主力流出:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
主力凈買:=(主力流入-主力流出)/10000;
P201:=SUM(主力凈買,1)>0;
P202:=SUM(主力凈買,2)>0;
P203:=SUM(主力凈買,3)>0;
P204:=SUM(主力凈買,4)>0;
P205:=SUM(主力凈買,5)>0;
SUM211:=SUM(主力凈買,11);
SUM212:=SUM(主力凈買,12);
SUM213:=SUM(主力凈買,13);
SUM214:=SUM(主力凈買,14);
SUM215:=SUM(主力凈買,15);
SUM216:=SUM(主力凈買,16);
SUM217:=SUM(主力凈買,17);
SUM218:=SUM(主力凈買,18);
SUM219:=SUM(主力凈買,19);
SUM220:=SUM(主力凈買,20);
P211:=SUM211>0 AND SUM211>REF(SUM211,1);
P212:=SUM212>0 AND SUM212>REF(SUM212,1);
P213:=SUM213>0 AND SUM213>REF(SUM213,1);
P214:=SUM214>0 AND SUM214>REF(SUM214,1);
P215:=SUM215>0 AND SUM215>REF(SUM215,1);
P216:=SUM216>0 AND SUM216>REF(SUM216,1);
P217:=SUM217>0 AND SUM217>REF(SUM217,1);
P218:=SUM218>0 AND SUM218>REF(SUM218,1);
P219:=SUM219>0 AND SUM219>REF(SUM219,1);
P220:=SUM220>0 AND SUM220>REF(SUM220,1);
MAZJ205:=MA(主力凈買,5);
MAZJ210:=MA(主力凈買,10);
MAZJ215:=MA(主力凈買,15);
MAZJ220:=MA(主力凈買,20);
MA201:=MAZJ205>MAZJ210;
MA202:=MAZJ205>MAZJ215;
MA203:=MAZJ205>MAZJ220;
MA204:=MAZJ210>MAZJ215;
MA205:=MAZJ210>MAZJ220;
MA206:=MAZJ215>MAZJ220;

短線資金:=SUM(主力凈買,3);
短線資金10:=EMA(短線資金,10);
短線資金60:=EMA(短線資金,60);
短線資金20:=EMA(短線資金,20);
短線資金30:=EMA(短線資金,30);
CZD201:=短線資金>短線資金10;
CZD202:=短線資金20>短線資金30;
CZD203:=短線資金10>短線資金60;
總權2:=53;
資金:=EMA(EMA(100*(P201*2+P202*2+P203*5+P204*2+P205*2+P211*1+P212*1+P213*1+P214*1+P215*1+P216*1+P217*1+P218*1+P219*1+P220*1+
MA01*2+MA02*2+MA03*1+MA04*1+MA05*1+MA06*1+ZJDL10+CZD01*5+CZD02*4+CZD03*3)/總權2,2),2);

量線1:=籌碼>REF(籌碼,1);
量線2:=量能>REF(量能,1);
量線3:=趨勢>=REF(趨勢,1);
量線4:=指標>=REF(指標,1);
量線5:=資金>=REF(資金,1);
量線6:=量線1 AND 量線2 AND 量線3 AND 量線4 AND 量線5;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
線量:=BBI>REF(BBI,1);


塊線:量線6 AND CCI>100 AND 線量;

流通盤:=CAPITAL/1000000<9;
去ST:=IF(NAMELIKE('S'),0,1) AND IF(NAMELIKE('*'),0,1);        
去停牌:=DYNAINFO(4)>0;{停牌}
漲幅:=(C-REF(C,1))/REF(C,1)*100;            
十日漲幅:=SUM((C-REF(C,1))/REF(C,1)*100,10)<16;            
牌:=流通盤 AND 去ST AND 去停牌 AND 漲幅>-0.99 AND 漲幅<9 AND 十日漲幅 AND C<34;      
銷售毛利率:=(1-FINANCE(21)/FINANCE(20))*100>0;
利潤同比:= FINANCE(43)>-40;
凈利潤率:=FINANCE(30)>0;
基本面:=銷售毛利率 AND 利潤同比 AND 凈利潤率;

MIDA:=MA(C,20);
布林軌:=REF(MIDA,1);
上軌:=BOLL+2*STD(CLOSE,20);
軌:=上軌>REF(上軌,1);

成本:牌 AND 基本面 AND L>布林軌 AND 軌;

DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130);
DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE);
L2:=REFDATE(HHV(LH2,DA),DATE);
L3:=REFDATE(HHV(LH3,DA),DATE);
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);
CMF:=MAX(L1,MAX(L2,MAX(L3,MAX(L4,MAX(L5,MAX(L6,MAX(L7,MAX(L8,MAX(L9,MAX(L10,0))))))))));
位置:=CEILING(DA*CMF/SS)*3;
DW:=IF(CMF=L1,HI*99/100,IF(CMF=L2,HI/POW(GZ,1)*99/100,IF(CMF=L3,HI/POW(GZ,2)*99/100,IF(CMF=L4,HI/POW(GZ,3)*99/100,IF(CMF=L5,HI/POW(GZ,4)*99/100,IF(CMF=L6,HI/POW(GZ,5)*99/100,
IF(CMF=L7,HI/POW(GZ,6)*99/100,IF(CMF=L8,LO*POW(GZ,2),IF(CMF=L9,LO*POW(GZ,1),IF(CMF=L10,LO,0))))))))));
上沿價幅度:=100*(C-DW)/DW;
長暗條:=BARSLAST(CROSS(CEILING(DA*L5/SS)*4.9>=CURRBARSCOUNT,0.5))>=72;
期:=上沿價幅度>-3 AND 上沿價幅度<10 AND 長暗條=1;

ZB1:=EMA(C,65);
長期趨:=EMA(ZB1,45);
長期幅度:=100*(C-長期趨)/長期趨;
M18:=MA(C,18);
M36:=MA(C,36);
M72:=MA(C,72);
CM72:=100*(C-M72)/M72;
M144:=MA(C,144);
M36幅:=100*(L-M36)/M36;
幅36:=COUNT(M36幅<2.3,2)>=1;
本:= C>M18 AND C>M36  AND C>M72 AND CM72<22 AND C>M144 AND M36幅<6.1 AND M72>=REF(M72,1) AND M144>REF(M144,1);
MCST:=DMA(AMOUNT/(100*VOL),VOL/CAPITAL);
C市場成本:=100*(C-MCST)/MCST;
成本:=H>=MCST-0.01 AND C市場成本>-2.1 AND C市場成本<15;
日1:=期 AND 長期幅度<45 AND 本 AND 成本;
A:=SUMBARS(V,CAPITAL);
A7:=SUM(COST(70),A)/A;
CA7幅度:=100*(C-A7)/A7;

VAR1:=REF(MA(C,20),10);
高:=H-VAR1;
低:=L-VAR1;
收:=C-VAR1;
均線1:=MA(收, 7);
均線2:=MA(收, 8);
機構K線:=高<3.8 AND 低>0 AND 均線1>REF(均線1,1) AND 均線2>REF(均線2,1);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
左側動能:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
右側動能:=左側動能/VOL*10000;
右側動能幅度:=100*(右側動能-REF(右側動能,1))/REF(右側動能,1);

動能:=右側動能>4900 AND 右側動能幅度>-30;
日均:=MA(V,10);
量線:=日均>REF(日均,1);

量:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
買量:=IF(CLOSE>OPEN,量*(HIGH-LOW),IF(CLOSE<OPEN,量*((HIGH-OPEN)+ (CLOSE-LOW)),VOL/2));
賣量:=(IF(CLOSE>OPEN,0-量*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0- 量*(HIGH-LOW),0-VOL/2)))*-1;

凈量:=買量-賣量;
量真假:=凈量>REF(凈量,1);
日11:=日1 AND C>A7 AND CA7幅度<14 AND 機構K線 AND 動能 AND 量線 AND 量真假;
PJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-PJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,PJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5)+(V2*V5);
V7:=(V3*V5)+(V4*V5);
WP1:=DYNAINFO(23);
NP1:=DYNAINFO(22);
WP2:=IF(ISLASTBAR,V7*240/FROMOPEN,V7);
NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6);
WP:=IF(ISLASTBAR AND PERIOD=5 ,WP1,WP2);
NP:=IF(ISLASTBAR AND PERIOD=5 ,NP1,NP2);
日差:=WP-NP;
周差:=SUM(日差,5);
強命線:=EMA(COST(81),10);
平線:=HHV(強命線,60);
L平線幅度:=100*(L-平線)/平線;
C平線幅度:=100*(C-平線)/平線;
強命:=L平線幅度<1.55 AND C平線幅度<7.2 AND C平線幅度>1;
累和:日11 AND 日差>0 AND 強命;

強命線:=EMA(COST(81),10);

平線:HHV(強命線,60),COLORCYAN,DOTLINE;
JH:DRAWTEXT(ISLASTBAR,平線,'---強命線'),COLORGREEN;

C平線幅:100*(C-平線)/平線,NODRAW;
生命:MA(C,453),COLORMAGENTA;
生命幅:100*(C-生命)/生命,NODRAW;
M36:MA(C,36);
M36L幅:100*(L-M36)/M36,NODRAW;
M72:MA(C,72);
M72幅:100*(C-M72)/M72,NODRAW;
M144:MA(C,144),LINETHICK2,COLOR0000FF;
M144幅:100*(C-M144)/M144,NODRAW;
十日漲幅:SUM((C-REF(C,1))/REF(C,1)*100,10),NODRAW;

VOLUME:VOL,VOLSTICK;
MA120:=MA(V,250),COLORLIBLUE,LINETHICK1;

{修改成交量畫素色}
STICKLINE(C>O,0,VOL,1,1),COLORLIRED;
STICKLINE(C<O,0,VOL,1,0),COLORLIGREEN;
STICKLINE(C=O,0,VOL,1,0),COLORMAGENTA;{增加，原來漏了}

{倍量突出顯示}
近期高量:=REF(HHV(V,480),1);
{STICKLINE(VOL>MA(VOL,60)*2 AND C>O AND VOL<MA120*1.5,0,VOL,1,1),COLORRED;
STICKLINE(VOL>MA(VOL,60)*2 AND C<O AND VOL<MA120*1.5,0,VOL,1,1),COLORLIGREEN;}

{主圖成交量波浪線}
DIFC:=(EMA(VOL,12)-EMA(VOL,26))*7+MA(VOL,160)*1.2,COLORWHITE;{上移到0軸以上}
DEAC:EMA(DIFC,5)LINETHICK3,COLORGREEN;
MACDC:=(DIFC-DEAC)*2+(MA(VOL,160)*1.35),COLORSTICK;
IF(DIFC>MA(DIFC,5),DEAC,DRAWNULL),COLORRED,LINETHICK2;
IF(DEAC>REF(DEAC,1),DEAC,DRAWNULL),COLORRED,LINETHICK1;
{標記量價背離}
量價背離判斷:=MA(C,15)>REF(MA(C,15),1)   AND  (DEAC<REF(DEAC,1));
IF(量價背離判斷,DEAC,DRAWNULL),COLORBLUE,LINETHICK2;

{換手率滿足6個月內>500%}
HSL:=100*VOL/(FINANCE(7)/100);LH:=SUM(HSL,126);換手率6個月:LH,NODRAW,COLORRED;
{大宗流入}
超B:=L2_AMO(0,2)/10000.0;大B:=L2_AMO(1,2)/10000.0;中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;超S:=L2_AMO(0,3)/10000.0;大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;小S:=L2_AMO(3,3)/10000.0;
{資金運算}
凈流入A:=((超B+大B+中B+小B)-(超S+大S+中S+小S))/10000;大宗資金:=((超B+大B)-(超S+大S))/10000;
近2天:=SUM(凈流入A,2);近2日:=SUM(大宗資金,2);近3天:=SUM(凈流入A,3);近3日:=SUM(大宗資金,3);
近4天:=SUM(凈流入A,4);近4日:=SUM(大宗資金,4);近5天:=SUM(凈流入A,5);近5日:=SUM(大宗資金,5);
近6天:=SUM(凈流入A,6);近6日:=SUM(大宗資金,6);近7天:=SUM(凈流入A,7);近7日:=SUM(大宗資金,7);
近8天:=SUM(凈流入A,8);近8日:=SUM(大宗資金,8);近9天:=SUM(凈流入A,9);近9日:=SUM(大宗資金,9);
近10天:=SUM(凈流入A,10);近10日:=SUM(大宗資金,10);近20天:=SUM(凈流入A,20);近20日:=SUM(大宗資金,20);
{資金顯示}
{顯示大宗流入---L2付費用戶顯示}
本月:近20日,NODRAW;本周:近5日,,NODRAW;三日流入:近3日,NODRAW;
凈流入:凈流入A,NODRAW,COLORRED;大宗流入:大宗資金,NODRAW,COLORRED;
{MACD金叉3次、4次特別提示}
DIFF:=EMA(CLOSE*100,12)-EMA(CLOSE*100,26);
DEA:=EMA(DIFF,9);DEA6:=EMA(DIFF,5);MACD2:=(DIFF - DEA)*2;
DIF:=DIFF;DEF:=DEA;MACD:=MACD2,NODRAW;
{獲利比:WINNER(C),NODRAW;}
STICKLINE((MACD2>=0),0,MACD2,0,1),COLORRED;
STICKLINE(((MACD2>=0) AND (MACD2 < REF(MACD2,1))),0,MACD2,0,0),COLORMAGENTA;
STICKLINE((MACD2<0),0,MACD2,0,0),COLORGREEN;
STICKLINE(((MACD2<0) AND (MACD2 > REF(MACD2,1))),0,MACD2,0,1),COLORWHITE;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
一次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=1,1)=1;{DRAWTEXT(一次金叉,-3,'一金');}
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;DRAWTEXT(二次金叉,近期高量*0.12,'MACD二次金叉');
STICKLINE(二次金叉,0,VOL,1,0),COLORYELLOW;{用戶可自行添加其它MACD金叉黃色量柱提示}
三次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=3,60)=1;DRAWTEXT(三次金叉,近期高量*0.1,'三次金叉');
四次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=4,64)=1;
STICKLINE(三次金叉,-8,-10,9,0),COLORRED;DRAWTEXT(四次金叉,近期高量*0.1,'四次金叉');
C1:IF(ISLASTBAR,CONST(DEAC),CONST(DEAC));

ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZZLJJ:=EMA(ZZLKP,89);
ZJLRQD:=ZZLKP-ZZLJJ;
AA:=EMA(ZJLRQD,1);
BB:=EMA(AA,5);
CC:=AA-BB;
試盤對倒:CC>REF(CC,1);

價趨勢:MA(C,3)LINETHICK2 COLORGRAY;
AMOL:=LOG(MA(AMO/C/100,5));
AMOH:=LOG(MA(AMO,5)/C/100);
FF:=CONST(LLV(AMOL,120));  
BB:=CONST(HHV(AMOL,120))-FF;  
JD:=CONST(LLV(L,120));
JJ:=CONST(HHV(H,120))-JD;
價趨勢比:=(AMOL-FF)/BB;
XX:=價趨勢比*JJ+JD;
量趨勢:XX,LINETHICK2 COLORRED;
量在價先幅度:100*(量趨勢-價趨勢)/價趨勢,NODRAW;

價趨勢:=MA(C,3);
AMOL:=LOG(MA(AMO/C/100,5));
AMOH:=LOG(MA(AMO,5)/C/100);
FF:=CONST(LLV(AMOL,120));  
BB:=CONST(HHV(AMOL,120))-FF;
JD:=CONST(LLV(L,120));
JJ:=CONST(HHV(H,120))-JD;
價趨勢比:=(AMOL-FF)/BB;  
XX:=價趨勢比*JJ+JD;
量趨勢:=XX;
量在價先:=EVERY(量趨勢>價趨勢,90);
日內:COUNT(量在價先,20)>0;

KK:=EMA(WINNER(C)*70,3);
DD:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,3);
JJ:=DD-KK;
SS:=CROSS(KK,JJ);
SS;

此源碼，凡逢籌碼峰突破，不論籌碼峰大小即可選出（是其缺點，但選出的股也不是很多，可以再手工翻閱甄選）。即可做選股公式，也可做副圖指標（出信號顯示）。