|
'RSI.RSI1'(6,12,24) AND CROSS('RSI.RSI2'(6,12,24),'RSI.RSI1'(6,12,24));DRAWICON(FILTER(D3>0,5),H*1.03,12);DRAWTEXT(FILTER(D3>0,5),H*1.01,'R顶'),00FF00;{RSI顶背离};X:=LLV(J,2)=LLV(J,8);Y:=IF(CROSS(J,REF(J 0.01,1)) AND X AND J<20,30,0);DRAWTEXT(CROSS(J,REF(J 0.01,1)) AND X AND J<20,LOW,'短进'),FF00FF;DRAWTEXT((MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13)),(LOW)*(0.97),'赢'),00FF00;2 三线买卖快线:EMA(EMA(EMA(EMA(CLOSE,2),2),2),2),LINETHICK2,0000FF;慢线:EMA(REF(快线,1),2),LINETHICK2,00FFFF;总趋势:EMA(EMA(EMA(EMA(EMA(CLOSE,55),2),2),2),2),LINETHICK2,FF00FF;HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;AA:=REF(H,HIGHN)=HHV(H,2*HIGHN 1);QY:=BACKSET(AA,HIGHN 1);CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN 1);DRAWICON(CC,H*1.02,2);DDD:=BARSLAST(CC);GDTS:=IF(CC,CURRBARSCOUNT,0);DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);DINGBU1:=REF(DINGBU,DDD 1);GDCS1:=CONST(DINGBUTS);DINGBUTS1:=REF(DINGBUTS,DDD 1);GDCS2:=CONST(DINGBUTS1);DINGBU2:=REF(DINGBU1,DDD 1);MM:=IF(CURRBARSCOUNT>GDCS2,0,1);3 主力追踪V1:=(C*3 H L)/5*10;V2:=EMA(V1,13)-EMA(V1,34);V3:=EMA(V2,5);V4:=2*(V2-V3)*5.5;V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;V6:=EMA(3*V5-2*SMA(V5,18,1),5);V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;V8:=(INDEXC*2 INDEXH INDEXL)/4;V9:=EMA(V8,13)-EMA(V8,34);VA:=EMA(V9,3);VB:=(V9-VA)/2;0;主力动向:EMA(V4,2),RED;机构动向:EMA(VB,2),MAGENTA;(SLOPE(主力动向,2)>0 AND SLOPE(机构动向,2)>0,主力动向),RED,LINETHICK4;(SLOPE(主力动向,2)<0,主力动向),GREEN,LINETHICK3;(SLOPE(机构动向,2)>0 AND SLOPE(主力动向,2)>0,机构动向),MAGENTA,LINETHICK4;(SLOPE(机构动向,2)<0,机构动向),WHITE,LINETHICK2;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;STICKLINE(CCREF(CC,2),CC,0,5,1), RED;主力资金试盘:IF(CROSS(AA,BB),3,0),STICK,LINETHICK4,0080FF;主力对倒出货:IF(CROSS(BB,AA),-3,0),STICK,LINETHICK4,00FF00;DRAWICON(主力资金试盘>0,5,4);DRAWICON(主力对倒出货<0,-4,2);VAR1:=REF((LOW OPEN CLOSE HIGH)/4,1);VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1); VAR3:=EMA(VAR2,10);VAR4:=LLV(LOW,33);VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),5);惨跌:STICKLINE(VAR5>REF(VAR5,1),0,VAR5,7,0 ),MAGENTA;主力拉升:STICKLINE(VAR5REF(R11,1);DRAWLINE(D1,H,S11,H,1),BLUE;A2:=REF(L,8)=LLV(L,2*8 1); B2:=FILTER(A2,8);C2:=BACKSET(B2,8 1); D2:=FILTER(C2,8);{低点}T11:=BACKSET(ISLASTBAR,BARSLAST(D2) 1); U11:=T11>REF(T11,1);DRAWLINE(D2,L,U11,L,1),BLUE;M:=INTPART(3*8/5);A12:=REF(H,M)=HHV(H,2*M 1); B12:=FILTER(A12,M); C12:=BACKSET(B12,M 1); D12:=FILTER(C12,M);{高点}R112:=BACKSET(ISLASTBAR,BARSLAST(D12) 1); S112:=R112>REF(R112,1);DRAWLINE(D12,H,S112,H,1),RED;A22:=REF(L,M)=LLV(L,2*M 1); B22:=FILTER(A22,M);C22:=BACKSET(B22,M 1); D22:=FILTER(C22,M);{低点}T112:=BACKSET(ISLASTBAR,BARSLAST(D22) 1); U112:=T112>REF(T112,1);DRAWLINE(D22,L,U112,L,1),RED;VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);VAR2222:=CROSS(VAR1111,0.9);VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);VAR4444:=CROSS(VAR3333,0.9);压力:= REF(HIGH,BARSLAST(VAR2222));STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),EA91B5,LINETHICK3;支撑:= REF(LOW,BARSLAST(VAR4444));STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),00B4FF,LINETHICK3;下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);RRRSV:=SMA(下档线,3,1);KKK:=SMA(RRRSV,3,1);DDD:=((3 * RRRSV) - (2 * KKK));JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);RSV24:=SMA(JJ12,3,1);K24:=SMA(RSV24,3,1);D24:=((3 * RSV24) - (2 * K24));压力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),FFFFFF;底部:=LLV(HIGH,30),00FF00;DRAWICON(L<=支撑 AND H>支撑,L,0);DRAWICON(H>=压力 AND L<压力,H,0);DRAWICON(CROSS(快线,慢线),L*0.95,5);DRAWICON(CROSS(慢线,快线),H*1.05,6);5 寻找疯牛VAR1:=DATE<99991231; VAR2:=MA((HIGH LOW 2*CLOSE)/4,2); 压力: EMA(REVERSE(VAR2) 2*(MA(VAR2,N) 1.6*STD(VAR2,N)),M)*VAR1, ,669999; 强势线: HHV(VAR2,P)*VAR1, , FF0000; VAR3:=EMA(VAR2,13)-EMA(VAR2,34); VAR4:=EMA(VAR3,5); VAR5:=(VAR3-VAR4)*5; VAR6:=IF(VAR5>=1000,1000,IF(VAR5<=VAR2,VAR2,VAR5)); VAR7:=FORCAST(FORCAST(VAR6,7),P); VAR8:=IF(VAR6>VAR7,VAR6,VAR2); 疯牛: VAR2*MA(VAR2,3)/REF(DMA(VAR2,VOL),7)*VAR1, ,0066FF; 6 主力筹监控{价量线主线快线}价量:3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),00CCFF,NODRAW;主线:(((价量-LLV(价量,27))/(HHV(价量,27)-LLV(价量,27)))*(4))*(25),CYAN,NODRAW;快线:(((价量-LLV(价量,9))/(HHV(价量,9)-LLV(价量,9)))*(4))*(25),55AAFF,NODRAW;RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;K1:=SMA(RSV,3,1);D1:=SMA(K1,3,1);KK:=INTPART(K1);DD:=INTPART(D1);TFXXS:=KK DD;{变异KD风险系数}TGLXS:=(TFXXS-REF(TFXXS,1));{变异KD乖离系数:资金流向}{红}STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS 100,2.5,0),0000AA; STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS 100,1.5,0),0022CC;STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS 100,0.5,0),0055FF;{粉}STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS 100,2.5,0),AA00BB;STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS 100,1.5,0),CC22BB;STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS 100,0.5,0),FF55BB;{黄}STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS 100,2.5,0),00AAFF; STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS 100,1.5,0),00CCFF; STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS 100,0.5,0),00FFFF;{蓝}STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS 100,2.5,0),FF7700;STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS 100,1.5,0),FFAA22;STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS 100,0.5,0),FFFF55;STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,100,TGLXS 100,8,0),BROWN;STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,100,TGLXS 100,8,0),WHITE;ZLCM:=EMA(WINNER(CLOSE)*70,3);{主力筹码估算}SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{散户筹码估算}ZSHTL:=SHCM/(ZLCM SHCM)*100;{散户套牢筹码系数}ZZLKP:=ZLCM/(ZLCM SHCM)*100;{主力控盘筹码系数}ZSHJJ:=EMA(ZSHTL,55);{散户警戒}ZZLJJ:=EMA(ZZLKP,55);{主力警戒}散兵坑:IF(ZZLKP<=10,ZZLKP,ZZLKP),MAGENTA,NODRAW;{散户套牢筹码}STICKLINE(C>0,ZSHTL,ZZLKP,2,0),808080;{散户筹码警戒}STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,2,0),C0C0C0;{主力控盘筹码}{粉}STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,2.5,0 ),AA00BB;STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,1.5,0 ),CC22BB; STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,0.5,0 ),EE44BB; {蓝}STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,2.5,0 ),FF7700; STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,1.5,0 ),FFAA22;STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,0.5 ,0 ),FFFF55;{亮红}STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,2.5,0 ),131FFD;STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,1.5,0 ),5050FF;STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,0.5,0 ),7E7EFF;{深蓝}STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,2.5,0 ),AA0000;STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,1.5,0 ),CC0000;STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,0.5 ,0 ),FF0000;{主力筹码警戒}{黄}STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,2.5,0 ),00AAFF; STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,1.5,0 ),00CCFF; STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,0.5,0 ),00FFFF;{红}STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ>50,ZZLKP,ZZLJJ,2.5,0 ),0000AA; STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ>50,ZZLKP,ZZLJJ,1.5,0 ),0022CC;STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ>50,ZZLKP,ZZLJJ,0.5 ,0 ),0055FF;{红}STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ<50 AND ZZLKP>50 AND ZZLJJ>REF(ZZLJJ,1),ZZLKP,50,2.5,0 ),0000AA; STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ<50 AND ZZLKP>50 AND ZZLJJ>REF(ZZLJJ,1),ZZLKP,50,1.5,0 ),0022CC;STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ<50 AND ZZLKP>50 AND ZZLJJ>REF(ZZLJJ,1),ZZLKP,50,0.5 ,0 ),0055FF;{铸顶风险区}{绿}STICKLINE(ZZLKP>80,ZZLKP,ZZLKP-(ZZLKP-80)/2,2.5,0),00AA00;STICKLINE(ZZLKP>80,ZZLKP,ZZLKP-(ZZLKP-80)/2,1.5,0),00CC00;STICKLINE(ZZLKP>80,ZZLKP,ZZLKP-(ZZLKP-80)/2,0.5,0),00FF00;{散兵坑}STICKLINE(ZZLKP<=10,ZZLKP,0,5,0),DD00DD;100,GREEN;80,GREEN;{0,GREEN;}{主线快线}价量,0CC0FF,LINETHICK2;主线,00FFAA,LINETHICK2;快线,LINESTICK,FF68DD;7 摇篮小黑马{黑马摇篮之小黑马} A:=(3*CLOSE LOW OPEN HIGH)/6; D1:=(20*A 19*REF(A,1) 18*REF(A,2) 17*REF(A,3) 16*REF(A,4) 15*REF(A,5) 14*REF(A,6) 13*REF(A,7) 12*REF(A,8) 11*REF(A,9) 10*REF(A,10) 9*REF(A,11) 8*REF(A,12) 7*REF(A,13) 6*REF(A,14) 5*REF(A,15) 4*REF(A,16) 3*REF(A,17) 2*REF(A,18) REF(A,20))/211; D2:=EMA(D1,2); D3:=EMA(D2,2); K1:=EMA(D3,2); 小黑马:CROSS(D1,K1);
|
