2023年12月27日发(作者：)

/*{量化筹码模型}

日线锁定:=IFF(PERIOD>=4,1,DRAWNULL);

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);

{01~05}

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);

{06~10}

CM06:=TRENDA>CMQS1;

CM07:=TRENDA>CMQS2;

CM08:=TRENDA>CMQS3;

CM09:=TRENDA>CMQS4;

CM10:=TRENDA>CMQS5;

{w }

{11~14}

CM11:=CMQS1>CMQS2;

CM12:=CMQS1>CMQS3;

CM13:=CMQS1>CMQS4;

CM14:=CMQS1>CMQS5;

{15~17}

CM15:=CMQS2>CMQS3;

CM16:=CMQS2>CMQS4;

CM17:=CMQS2>CMQS5;

{18~19}

CM18:=CMQS3>CMQS4;

CM19:=CMQS3>CMQS5;

{20}

CM20:=CMQS4>CMQS5;

量化筹码:=IFF(C>0 AND 日线锁定,EMA(((CM01+CM02+CM03+CM04+CM05+CM06+CM07+CM08+CM09+CM10+

CM11+CM12+CM13+CM14+CM15+CM16+CM17+CM18+CM19+CM20)*(100/CMN)),2),DRAWNULL);

XG1:=量化筹码>=REF(量化筹码,1) AND REF(量化筹码,1)

{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:=IFF(日线锁定 AND

C>0,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),DRAWNULL);

量化量能XX:=IFF(LHLN多头,量化量能X*1.2,量化量能X);

量化量能:=WMA(IFF(量化量能XX>=100,100,量化量能XX),3);

XG2:=量化量能>=REF(量化量能,1) AND REF(量化量能,1)

{全局控制}

{全局控制}

数量:=23;

{01}

DMADIF:=MA(C,10)-MA(C,50);

DMAAMA:=MA(DMADIF,10);

DMAX:=DMADIF>DMAAMA;

P001:=DMAX;

{02}

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;

P002:=DMIX;

{03}

DPODPO:=C-REF(MA(C,20),20/2+1);

DPOMADPO:=MA(DPODPO,6);

DPOX:=DPODPO>DPOMADPO;

P003:=DPOX;

{04}

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;

P004:=EMVX;

{05}

MACDDIF:=EMA(C,12)-EMA(C,26);

MACDDEA:=EMA(MACDDIF,9);

MACDX:=MACDDIF>MACDDEA;

P005:=MACDX;

{06}

TRIXTR:=EMA(EMA(EMA(C,12),12),12);

TRIXTRIX:=(TRIXTR-REF(TRIXTR,1))/REF(TRIXTR,1)*100;

TRIXMATRIX:=MA(TRIXTRIX,9);

TRIXX:=TRIXTRIX>TRIXMATRIX;

P006:=TRIXX;

{08}

WVADWVAD:=SUM((C-O)/(H-L)*V,24)/10000;

WVADMAWVAD:=MA(WVADWVAD,6);

WVADX:=WVADWVAD>WVADMAWVAD;

P008:=WVADX;

{09}

JSJS:=100*(C-REF(C,5))/(5*REF(C,5));

JSMAJS1:=MA(JSJS,5);

JSX:=JSJS>JSMAJS1;

P009:=JSX;

{10}

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;

P010:=CYEX;

{11}

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;

P011:=JLHBX;

{12}

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;

P012:=CYCX;

{13}

BBIBBI:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;

BBIX:=C>BBIBBI;

P013:=BBIX;

{14}

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);

*/

10线:MA(C,7),COLORRED,LINETHICK4,LINETHICK4;

11线:IF(MA(CLOSE,7)<=REF(MA(CLOSE,6),1),MA(CLOSE,7),NULL),COLORBLUE,LINETHICK4;

价格:EMA(EMA(C,7),4),COLORRED,LINETHICK2;

J:=价格>REF(价格,1);

IF(J-1,价格,NULL),COLORGREEN,LINETHICK2;

9线:MA(C,9),COLORRED,LINETHICK3,LINETHICK3;

8线:IF(MA(CLOSE,9)<=REF(MA(CLOSE,9),1),MA(CLOSE,9),NULL),COLORGREEN,LINETHICK3;

DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);

DEA := EMA(DIFF,9);

MACD:=2*(DIFF-DEA),COLORSTICK;

//STICKLINE1(MACD>0,0,MACD,2,0),COLORRED;

//STICKLINE1(MACD<0,0,MACD,2,0),COLORBLUE;

10线<=REF(10线,1)&&价格<=REF(价格,1)&&9线<=REF(9线,1)&&MACD<0,SOUND('A');

10线>REF(10线,1)&&价格>REF(价格,1)&&9线>REF(9线,1)&&MACD>0,SOUND('B');

STICKLINE1(10线<=REF(10线,1)&&价格<=REF(价格,1)&&9线<=REF(9线,1)&&MACD<0,H,L,4,1),COLORBLUE;

STICKLINE1(10线>REF(10线,1)&&价格>REF(价格,1)&&9线>REF(9线,1)&&MACD>0,H,L,4,1),COLORMAGENTA;