怎样炒股指期货:CPW全部源码(2)

 

CPW的个股５三线玄机

rsv:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))100;

k:=sma(rsv,3,1);

d:=sma(k,3,1);

j:=3k-2d;

a:=((100-2ref(k,1)+2k+4ref(d,1)/3)/3(hhv(h,9)-llv(l,9))+100llv(l,9))/100;

b:=((-(2ref(k,1))+2k+4ref(d,1)/3)/3(hhv(h,9)-llv(l,9))+100llv(l,9))/100;

a1:=if(cross(d,k),l,0);

a2:=if(cross("551885.R1","551885.R3") and count(cross(50,d),barslast(cross(d,k)))=1 and c<hhv(c,11) and count(cross("551885.R1","551885.R3"),barslast(cross(55,d)))=1 or cross("551885.R2","551885.R1") and count(cross(55,d),barslast(cross(d,k)))=1 and c<hhv(c,10) and count(cross("551885.R2","551885.R1"),barslast(cross(55,d)))=1 or cross(50,d) and ref(c,1)>a and ref(c,1)>ref(o,1),1,0);

b1:ref(a,barslast(a2)),Lihick5,colorff;

b2:if("DR4.B3"<"DR4.B4",ref(b,barslast(a1)),ref(a,barslast(a1))),Lihick5,colorffff;

fillrgn(b1>=b2 and (b1-b2)/b2100<2,b1,b2),colorffffff;

fillrgn(b1<b2 and abs(b1-b2)/b2100<2,b1,b2),colorffffff;

stickline(b1<b2 and c>b1 and b1<b20.962,b2,b20.962,0,0),colorff00;

b3:if(b1<b2 and c>b1 and b1<b20.962,b20.962,ref(a,barslast(a2))),Lihick5,colorff00ff;

 

551885

a:ma(c,14);

lc:=ref(c,1);

r1:sma(max(c-lc,0),2,1)/sma(abs(c-lc),2,1)100;

r3:sma(max(c-lc,0),34,1)/sma(abs(c-lc),34,1)100;

r2:2;

fillrgn(c>0,999999995904,0),color10000;

 

谁在作多

VAR2:=SUM(IF(CLOSE>OPEN,VOL,0),34)/SUM(VOL,34)100;

VAR3:=100-SUM(IF(CLOSE>OPEN,VOL,0),34)/SUM(VOL,34)100;

散户跟风意愿: VAR3,LINETHICK4;

主力作盘意愿: VAR2,LINETHICK4;

标准: 60,LINETHICK2;

 

 

黄金通道

上:HHV(H,20); 下:LLV(L,20),colreen;

GD1:=REF(H,HHVBARS(H,20))+REF(L,LLVBARS(L,20));

GD2:=REF(H,HHVBARS(H,20))-REF(L,LLVBARS(L,20));

中:GD1/2,COLORRED,LINETHICK1;

黄:REF(L,LLVBARS(L,20))+GD20.382,COLOR00FFFF,;

金:REF(L,LLVBARS(L,20))+GD20.618,COLORffef40,;

 

 

{优化CPW的遍地黄金}

{n1=5,n2=13,n3=34,n4=250}

n1:=5;

n2:=13;

n3:=34;

n4:=250;

DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,0),1);

DRAWGBK(CLOSE>0, COLORRGB(1,8888,8888), COLORRGB(1,3333,6666),3);

 

Var1:=SMA("1a0002$AMOUNT"+"399107$AMOUNT",10,1)/1000000; 

Var2:=REF(Var1,1); 

Var3:=MA("1a0002$CLOSE"+"399107$CLOSE"3,5); 

收盘:=Var1("1a0002$CLOSE"+"399107$CLOSE"3)/Var31/10,POINTDOT; 

开盘:=Var1("1a0002$OPEN"+"399107$OPEN"3)/Var31/10,POINTDOT,COLOR009900,LINETHICK0; 

最高:=Var1("1a0002$HIGH"+"399107$HIGH"3)/Var31/10,POINTDOT,COLOR009900,LINETHICK0; 

最低:=Var1("1a0002$LOW"+"399107$LOW"3)/Var31/10,POINTDOT,COLOR009900,LINETHICK0; 

昨收盘:=REF(收盘,1),POINTDOT,COLOR009900,LINETHICK0; 

涨跌:=(收盘-REF(收盘,1))/REF(收盘,1)100,POINTDOT,COLOR009900,LINETHICK0; 

大盘生命线:=EMA(收盘,N1),; 

xx2:=EMA(收盘,N2),COLOR00FF00; 

xx3:=EMA(收盘,N3),COLORblue,lihick2; 

xx4:=EMA(收盘,N4),COLORred; 

生命禁区:1.15,colorred,lihick2;

0.88,coloryello,lihick2;

股价泥潭:0,colreen,lihick2;

-0.25,colorffef40,lihick2;

FILLRGN(n1>0,生命禁区,0.88),COLORRED;

FILLRGN(n1>0,股价泥潭,-0.25),COLORBLUE;

大盘温度计收盘-xx3)/xx3,colorhite,lihick4;

draicon(cross(大盘温度计,0),0,8); 

 

 

年后山【六彩变异k线】正式版

VAR1W:=IF((CURRENTDATE <= 91031220),1,0);

DRAWGBK(1,COLORRGB(265,0,0),COLORRGB(265,285,0),0);

A:=EMA(CLOSE,5);

VAR1:=((CLOSE + HIGH) / 2);

B:=EMA(VAR1,15);

JJ:=(2 (A - B));

收盘:=JJ;

最高:=(((JJ + REF(JJ,1)) / 2) + 0.1);

开盘:=REF(JJ,1);

最低:=(((JJ + REF(JJ,1)) / 2) - 0.1);

AAV:=((最高 + 最低) / 2);

KS:=(((CLOSE - MA(CLOSE,13)) / MA(CLOSE,13)) (0 - 100));

金线:=EMA(((KS / 10) + EMA(CLOSE,10)),3);

STICKLINE(((收盘 >= 开盘) AND VAR1W),开盘,收盘,5,0),colorFF;

STICKLINE(((收盘 >= 开盘) AND VAR1W),最低,收盘,0.5,1),colorFF;

STICKLINE(((收盘 >= 开盘) AND VAR1W),最高,收盘,0.5,1),colorFF;

STICKLINE(((收盘 >= AAV) AND VAR1W),AAV,收盘,5,0),colorFFFF;

STICKLINE(((收盘 <= AAV) AND VAR1W),AAV,收盘,5,0),colorFF0000;

STICKLINE(((收盘 <= 开盘) AND VAR1W),开盘,收盘,5,0),colorFF0000;

STICKLINE(((收盘 <= 开盘) AND VAR1W),开盘,最高,0.5,0),colorFFFF00;

STICKLINE(((收盘 <= 开盘) AND VAR1W),开盘,最低,0.5,0),colorFFFF00;

ZYHEMA(收盘,5) VAR1W),colorFF00FF;

ZYGEMA(收盘,15) VAR1W),colorFFFF;

警界区:=(DMA(CLOSE,(VOL / SUM(VOL,34))) VAR1W);

DDG:=(((CLOSE - 警界区) / 警界区) 100);

提款路线:=EMA(DDG,3);

启动提款机:IF(((提款路线 < (0 - 22)) AND VAR1W),888,0),LINETHICK0;

DRAWICON(((提款路线 < (0 - 24)) AND VAR1W),(0 - 0.1),10);

DRAWICON(((提款路线 < (0 - 24)) AND VAR1W),(0 - 0.2),10);

DRAWTE55188((CROSS(ZYH,ZYG) AND (提款路线 < (0 - 24))),最低,'买\n进'),colorFF00FF;

AAK:=IF((((MA(VOL,5) / 240) >= 5) AND ((CLOSE > (REF(CLOSE,1) 0.98)) = 1)),88,0);

BBK:=IF(((((((CLOSE / REF(CLOSE,1)) >= 1) AND (((VOL / CAPITAL) 100) <= 30)) AND (((VOL / CAPITAL) 100) >= 1.5)) AND ((HIGH / CLOSE) <= 1.001)) AND (AAK >= 1)),93,0);

DRAWTE55188(((BBK > 90) AND VAR1W),最低,'追\n涨'),colorFFFF;

生命线:0,POINTDOT;

红灯:IF(((金线 <= CLOSE) AND VAR1W),CLOSE,0),LINETHICK0,colorFF;

DRAWICON(((金线 <= CLOSE) AND VAR1W),0.001,10);

绿灯:IF(((金线 >= CLOSE) AND VAR1W),CLOSE,0),LINETHICK0,colorFF00;

DRAWICON(((金线 >= CLOSE) AND VAR1W),0.001,11);

升跌:=EMA((((CLOSE / MA(((((2 CLOSE) + HIGH) + LOW) / 4),10)) - 1) 100),3);

黄灯:IF(((升跌 >= 0) AND VAR1W),CLOSE,0),LINETHICK0,colorFFFF;

DRAWICON(((升跌 >= 0) AND VAR1W),0,12);

绿灯1:IF(((升跌 <= 0) AND VAR1W),CLOSE,0),LINETHICK0,colorFF00;

DRAWICON(((升跌 <= 0) AND VAR1W),0,11);

DRAWICON((CROSS(ZYG,0) AND VAR1W),0,10);

DRAWICON((CROSS(0,ZYG) AND VAR1W),0,12);

 

 

 

{三线玄机+十线开花}

n 21

 

 

rsv:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))100;

 

k:=sma(rsv,3,1);

 

d:=sma(k,3,1);

 

j:=3k-2d;

 

a:=((100-2ref(k,1)+2k+4ref(d,1)/3)/3(hhv(h,9)-llv(l,9))+100llv(l,9))/100;

 

b:=((-(2ref(k,1))+2k+4ref(d,1)/3)/3(hhv(h,9)-llv(l,9))+100llv(l,9))/100;

 

a1:=if(cross(d,k),l,0);

 

a2:=if(cross("XT5.R1","XT5.R3") and count(cross(50,d),barslast(cross(d,k)))=1 and c<hhv(c,11) and count(cross("XT5.R1","XT5.R3"),barslast(cross(55,d)))=1 or cross("XT5.R2","XT5.R1") and count(cross(55,d),barslast(cross(d,k)))=1 and c<hhv(c,10) and count(cross("XT5.R2","XT5.R1"),barslast(cross(55,d)))=1 or cross(50,d) and ref(c,1)>a and ref(c,1)>ref(o,1),1,0);

 

b1:ref(a,barslast(a2)),Lihick5,colorff;

 

b2:if("DR4.B3"<"DR4.B4",ref(b,barslast(a1)),ref(a,barslast(a1))),Lihick5,colorffff;

 

fillrgn(b1>=b2 and (b1-b2)/b2100<2,b1,b2),colorffffff;

 

fillrgn(b1<b2 and abs(b1-b2)/b2100<2,b1,b2),colorffffff;

 

stickline(b1<b2 and c>b1 and b1<b20.962,b2,b20.962,0,0),colorff00;

 

b3:if(b1<b2 and c>b1 and b1<b20.962,b20.962,ref(a,barslast(a2))),Lihick5,colorff00ff;

 

 

MA3:MA(CLOSE,5),colorred;

MA4:MA(CLOSE,6),colorred;

MA5:MA(CLOSE,7),colorred;

MA6:MA(CLOSE,8),colorred;

MA7:MA(CLOSE,9),colorred;

MA8:MA(CLOSE,10),colorred;

MA9:MA(CLOSE,11),colorred;

MA10:MA(CLOSE,12),colorred;

MA11:MA(CLOSE,13),colorred;

MA12:MA(CLOSE,14),colorred;

MA13:MA(CLOSE,15),colorred;

MA14:MA(CLOSE,n);

洼: IF(MA14>MA3,MA3,MA14),coloryello;

洼1: IF(MA14>MA4,MA4,MA14),coloryello;

洼2: IF(MA14>MA5,MA5,MA14),coloryello;

洼3: IF(MA14>MA6,MA6,MA14),coloryello;

洼4: IF(MA14>MA7,MA7,MA14),coloryello;

洼5: IF(MA14>MA8,MA8,MA14),coloryello;

洼6: IF(MA14>MA9,MA9,MA14),coloryello;

洼7: IF(MA14>MA10,MA10,MA14),coloryello;

洼8: IF(MA14>MA11,MA11,MA14),coloryello;

洼9: IF(MA14>MA12,MA12,MA14),coloryello;

洼10: IF(MA14>MA13,MA13,MA14),coloryello; 

 

 

破解,只是看图仿制,大家还可以进一步优化,玩玩而已,~

 

建一个FN的公式

x:=ma(c,4);

x2:=ma(c,5);{这里可以进一步优化,比如使用中位线}

 

再建高级要塞:

 

DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,0),1);

DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,0),1);

DRAWGBK(CLOSE>0, COLORRGB(1,8888,8888), COLORRGB(1,3333,6666),2);

 

ADJ:stkindi('','fn.x',0,7),colorred,lihick2;

AGJ:stkindi('','fn.x2',0,7),colorYELLOW,lihick2;

FILLRGN(ADJ>AGJ ,ADJ,AGJ),colorYELLOW;

FILLRGN(ADJ<AGJ ,ADJ,AGJ),colorWHITE;

tj:=c>=o;

STICKLINE(tj,l,h,1,0),COLOR00EEFF;

STICKLINE(tj,o,c,8,0),COLOR0000FF;

STICKLINE(tj,o,c,7,0),COLOR0022FF;

STICKLINE(tj,o,c,6,0),COLOR0044FF;

STICKLINE(tj,o,c,5,0),COLOR0066FF;

STICKLINE(tj,o,c,4,0),COLOR0088FF;

STICKLINE(tj,o,c,3,0),COLOR00AAFF;

STICKLINE(tj,o,c,2,0),COLOR00CCFF;

STICKLINE(tj,o,c,1,0),COLOR00EEFF;

 

 

STICKLINE(not(tj),l,h,1,0),COLOR00FF00;

STICKLINE(not(tj),o,c,8,0),COLOR008800;

STICKLINE(not(tj),o,c,7,0),COLOR009900;

STICKLINE(not(tj),o,c,6,0),COLOR00AA00;

STICKLINE(not(tj),o,c,5,0),COLOR00BB00;

STICKLINE(not(tj),o,c,4,0),COLOR00CC00;

STICKLINE(not(tj),o,c,3,0),COLOR00DD00;

STICKLINE(not(tj),o,c,2,0),COLOR00EE00;

STICKLINE(not(tj),o,c,1,0),COLOR00FF00;

 

a:="1a0001$close";//D

b:=WMA(A,20);//DMIY

b1:=MA(b,3);

b2:=MA(b,5);

b3:=MA(b,21);

b4:=MA(b,34);//下面也可简化，懒了

x:=REF(CLOSE,1)<REF(CLOSE,2) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(VOL,1)>REF(MA(VOL,20),1)1.1;

y:=IF(x,MIN(REF(LOW,1),LOW),0);

z1:=REF(y,BARSLAST(x)),Lihick5,colorffff;

x1:=REF(CLOSE,1)<REF(OPEN,1) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) or REF(CLOSE,1)<REF(OPEN,1) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1);

y1:=IF(x1,REF(CLOSE,1),0);

z2:=REF(y1,BARSLAST(x1)),COLORred,Lihick5,colorffff;

STICKLINE(CLOSE>0 and (MAX(z1,z2)-MIN(z1,z2))/MIN(z1,z2)100<3 and MAX(B1,B2)>MIN(B3,B4),z1,z2,5,0),COLORred;

 

MN:=ZIG(3,15);

DRAWICON(MN>REF(MN,1)AND REF(MN,1)<REF(MN,2),L,1);

DRAWICON(MN<REF(MN,1)AND REF(MN,1)>REF(MN,2),H,3);