{波段短線}
N:=50;
M1:=10;
M2:=20;
M3:=60;
VARX:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
VARY:=(HIGH-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
VARZ:=(LOW-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
VARXS:=SMA(VARX,M1,1);
VARYS:=SMA(VARY,M1,1);
VARZS:=SMA(VARZ,M1,1);
VARXSS:=SMA(VARXS,M2,1);
VARYSS:=SMA(VARYS,M2,1);
VARZSS:=SMA(VARZS,M2,1);
VAR1:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,M1,1)- 3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,M1,1),M2,1),COLORYELLOW,LINETHICK1;
最大:4*((VARY+(M**1)*REF(VARYS,1))/M1)-3*((((VARY+(M**1)*REF(VARYS,1))/M1)+(M2-1)*REF(VARYSS,1))/M2),COLORLIRED,LINETHICK1;
最小:4*((VARZ+(M**1)*REF(VARXS,1))/M1)-3*((((VARZ+(M**1)*REF(VARXS,1))/M1)+(M2-1)*REF(VARXSS,1))/M2),COLORLIGREEN,LINETHICK1;
VAR2:8,COLORGREEN;
準備拉升: IF(CROSS(最小,VAR2),80,0),STICK,COLORWHITE,LINETHICK2;
壓住莊家: IF(VAR1<=8,0,0),STICK,COLORWHITE,LINETHICK1;
DRAWTEXT(CROSS(VAR1,VAR2),5,'建倉'),COLORCYAN;
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
DIFS:=EMA(CLOSE,N*2);
DIFL:=EMA(CLOSE,N*4);
DIF:=DIFS-DIFL,COLORWHITE;
DEA:=EMA(DIF,M3),COLORYELLOW;
MACD:=(DIF-DEA)*2,COLORSTICK;
{
IF DIF>=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF>=DEA THEN 建倉區(qū):100 ,COLORYELLOW,LINETHICK1;
IF DIF<=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF>=DEA THEN 建倉區(qū):85 ,COLORYELLOW,LINETHICK1;
IF DIF<=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF<=DEA THEN 建倉區(qū):80 ,COLORYELLOW,LINETHICK1;
IF DIF>=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF<=DEA THEN 建倉區(qū):85 ,COLORYELLOW,LINETHICK1;
IF DIF<=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF>=DEA THEN 建倉區(qū):70 ,COLORYELLOW,LINETHICK1;
IF DIF>=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF>=DEA THEN 建倉區(qū):80 ,COLORYELLOW,LINETHICK1;
IF DIF<=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF<=DEA THEN 建倉區(qū):60 ,COLORYELLOW,LINETHICK1;
IF DIF>=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF<=DEA THEN 建倉區(qū):85 ,COLORYELLOW,LINETHICK1;
}
100,COLOR555555;
85,COLOR555555;
80,COLOR555555;
70,COLOR555555;
60,COLOR555555;
DRAWTEXT(最小< 15 AND 最小>=-5 AND (CLOSE-REF(CLOSE,1))/CLOSE<=(VAR**REF(VAR1,1))/VAR1 AND MA(CLOSE,N*2)>=REF(MA(CLOSE,N*2),1),最小,'備');
原理解析
N賦值:50
M1賦值:10
M2賦值:20
M3賦值:60
VARX賦值:(收盤價-N日內(nèi)最低價的最低值)/(N日內(nèi)最高價的最高值-N日內(nèi)最低價的最低值)*100
VARY賦值:(最高價-N日內(nèi)最低價的最低值)/(N日內(nèi)最高價的最高值-N日內(nèi)最低價的最低值)*100
VARZ賦值:(最低價-N日內(nèi)最低價的最低值)/(N日內(nèi)最高價的最高值-N日內(nèi)最低價的最低值)*100
VARXS賦值:VARX的M1日[1日權(quán)重]移動平均
VARYS賦值:VARY的M1日[1日權(quán)重]移動平均
VARZS賦值:VARZ的M1日[1日權(quán)重]移動平均
VARXSS賦值:VARXS的M2日[1日權(quán)重]移動平均
VARYSS賦值:VARYS的M2日[1日權(quán)重]移動平均
VARZSS賦值:VARZS的M2日[1日權(quán)重]移動平均
輸出VAR1:4*(收盤價-N日內(nèi)最低價的最低值)/(N日內(nèi)最高價的最高值-N日內(nèi)最低價的最低值)*100的M1日[1日權(quán)重]移動平均- 3*(收盤價-N日內(nèi)最低價的最低值)/(N日內(nèi)最高價的最高值-N日內(nèi)最低價的最低值)*100的M1日[1日權(quán)重]移動平均的M2日[1日權(quán)重]移動平均,畫黃色,線寬為1
輸出最大:4*((VARY+(M**1)*1日前的VARYS)/M1)-3*((((VARY+(M**1)*1日前的VARYS)/M1)+(M2-1)*1日前的VARYSS)/M2),畫淡紅色,線寬為1
輸出最小:4*((VARZ+(M**1)*1日前的VARXS)/M1)-3*((((VARZ+(M**1)*1日前的VARXS)/M1)+(M2-1)*1日前的VARXSS)/M2),畫淡綠色,線寬為1
輸出VAR2:8,畫綠色
輸出準備拉升: 如果最小上穿VAR2,返回80,否則返回0,STICK,畫白色,線寬為2
輸出壓住莊家: 如果VAR1<=8,返回0,否則返回0,STICK,畫白色,線寬為1
當滿足條件VAR1上穿VAR2時,在5位置書寫文字,畫青色
VARO5賦值:27日內(nèi)最低價的最低值
VARO6賦值:34日內(nèi)最高價的最高值
VARO7賦值:(收盤價-VARO5)/(VARO6-VARO5)*4的4日指數(shù)移動平均*25
DIFS賦值:收盤價的N*2日指數(shù)移動平均
DIFL賦值:收盤價的N*4日指數(shù)移動平均
DIF賦值:DIFS-DIFL,畫白色
DEA賦值:DIF的M3日指數(shù)移動平均,畫黃色
MACD賦值:(DIF-DEA)*2,COLORSTICK
100,COLOR555555
85,COLOR555555
80,COLOR555555
70,COLOR555555
60,COLOR555555
當滿足條件最小<15AND最小>=-5AND(收盤價-1日前的收盤價)/收盤價<=(VAR**1日前的VAR1)/VAR1ANDMA(收盤價,N*2)>=1日前的收盤價的N*2日簡單移動平均時,在最小位置書寫文字
如有需要
，請加QQ：88652583 或微信： 88652583
