| 1、时间信号系统 时间点，高低点 DIFF:=100*(EMA(CLOSE,12)-EMA(CLOSE,26)),NODRAW; DEA:=EMA(DIFF,9),NODRAW; MACD:=(DIFF-DEA)*2,NODRAW; 死叉:=CROSS(DEA,DIFF); N1:=BARSLAST(死叉); N2:=REF(BARSLAST(死叉),N1+1); N3:=REF(BARSLAST(死叉),N2+N1+2); CL1:=LLV(LOW,N1+1); DIFL1:=LLV(DIFF,N1+1); CL2:=REF(CL1,N1+1); DIFL2:=REF(DIFL1,N1+1); CL3:=REF(CL2,N1+1); DIFL3:=REF(DIFL2,N1+1); PDIFL2:=IF(DIFL2>0,INTPART(LOG(DIFL2))-1,INTPART(LOG(-DIFL2))-1); MDIFL2:=INTPART(DIFL2/POW(10,PDIFL2)); PDIFL3:=IF(DIFL3>0,INTPART(LOG(DIFL3))-1,INTPART(LOG(-DIFL3))-1); MDIFL3:=INTPART(DIFL3/POW(10,PDIFL3)); MDIFB2:=INTPART(DIFF/POW(10,PDIFL2)); MDIFB3:=INTPART(DIFF/POW(10,PDIFL3)); 直接底部结构:=(CL1<CL2 ) AND (MDIFB2>MDIFL2) AND DIFF<0 AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB2<=REF(MDIFB2,0); 隔峰底部结构:=(CL1<CL3 AND CL3<CL2 ) AND (MDIFB3>MDIFL3) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB3<=REF(MDIFB3,0); BG:=((MDIFB2>REF(MDIFB2,1))*REF(直接底部结构,2)) OR ((MDIFB3>REF(MDIFB3,2))*REF(隔峰底部结构,2)),NODRAW; P:=CROSS(DIFF,DEA); DRAWTEXT(FILTER(BG AND P,MACD>0),L*0.99,'●底部结构'),colormagenta; 金叉:=CROSS(DIFF,DEA); M1:=BARSLAST(金叉); M2:=REF(BARSLAST(金叉),M1+1); M3:=REF(BARSLAST(金叉),M2+M1+2); CH1:=HHV(HIGH,M1+1); DIFH1:=HHV(DIFF,M1+1); CH2:=REF(CH1,M1+1); DIFH2:=REF(DIFH1,M1+1); CH3:=REF(CH2,M1+1); DIFH3:=REF(DIFH2,M1+1); PDIFH2:=IF(DIFH2>0,INTPART(LOG(DIFH2))-1,INTPART(LOG(-DIFH2))-1); MDIFH2:=INTPART(DIFH2/POW(10,PDIFH2)); PDIFH3:=IF(DIFH3>0,INTPART(LOG(DIFH3))-1,INTPART(LOG(-DIFH3))-1); MDIFH3:=INTPART(DIFH3/POW(10,PDIFH3)); MDIFT2:=INTPART(DIFF/POW(10,PDIFH2)); MDIFT3:=INTPART(DIFF/POW(10,PDIFH3)); 直接顶部结构:=(CH1>CH2 ) AND (MDIFT2<MDIFH2) AND DIFF>0 AND (MACD>0 AND REF(MACD,1)>0) AND MDIFT2>=REF(MDIFT2,0); 隔峰顶部结构:=(CH1>CH3 AND CH3>CH2 ) AND (MDIFT3<MDIFH3) AND (MACD>0 AND REF(MACD,1)>0) AND MDIFT3>=REF(MDIFT3,0); TG:=((MDIFT2<REF(MDIFT2,1))*REF(直接顶部结构,2)) OR ((MDIFT3<REF(MDIFT3,2))*REF(隔峰顶部结构,2)),NODRAW; Q:=CROSS(DEA,DIFF); DRAWTEXT(FILTER(TG AND Q,MACD<0),H*1.02,'●顶部结构'),colorgreen; W1:=FILTER(IF(HHVBARS(HIGH,13),0,1),13); DRAWTEXT(W1 AND STRFIND(PERIODNAME,'日线'),H*1.01,'时间'),coloryellow; W2:=FILTER(IF(LLVBARS(LOW,13),0,1),13); DRAWTEXT(W2 AND STRFIND(PERIODNAME,'日线'),H*1.01,'时间'),coloryellow; A1:=C>REF(C,4); NT:=BARSLASTCOUNT(A1); TJ11:=NT=9; TJ13:=ISLASTBAR AND BETWEEN(NT,5,8); AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT; DRAWTEXT(NT=9,H*1.007,'▲高点'),colorgreen; K1:=REF(C,0)>REF(C,13); K2:=REF(NT=9,13); DRAWTEXT(K1 AND K2 AND STRFIND(PERIODNAME,'日线'),H*1.007,'■顶'),colorred; B1:=C<REF(C,4); NT0:=BARSLASTCOUNT(B1); TJ21:=NT0=9 ; TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8); AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0; DRAWTEXT(NT0=9,L*0.994,'▲低点'),colorred; T1:=REF(C,0)<REF(C,13); T2:=REF(NT0=9,13); DRAWTEXT(T1 AND T2 AND STRFIND(PERIODNAME,'日线'),L*0.994,'■底'),colorgreen; A1A:=EMA(CLOSE, 9); A1B:=((A1A - EMA(CLOSE, 5)) < 0); A1C:=((A1A - EMA(CLOSE, 5)) > 0); A1D:=BARSLAST(A1B); A1E:=BARSLAST(A1C); A1F:=IF((A1E > 0),(CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,0); A20:=SUM(A1F,0); A21:=IF((A1D > 0),(0 - 2),0); A22:=IF((A1E > 0),SUM((CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,A1E),0); A23:=A22 / A1E; A25:=EMA(EMA(EMA(CLOSE, 3), 3), 3); 上升通道:((A25 - REF(A25, 1)) + A25),colorred; 反转通道:MA(上升通道, 15),colorgreen; DRAWTEXT(CROSS(C,反转通道) AND STRFIND(PERIODNAME,"日线"),L*0.994,'↑多头'),colorlired; DRAWTEXT(CROSS(反转通道,C) AND STRFIND(PERIODNAME,"日线"),H*1.01,'↓空头'),colorblue; 2、天赐良机 STICKLINE(C>0,90,95,10,0),COLOR408000; STICKLINE(C>0,10,5,10,0),COLOR408000; HDY:=EMA (100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3); DRAWBAND(HDY,RGB(255,000,139),10,RGB(255,255,71)); STICKLINE(C>0,90,10,10,0),COLOR000000; 风险:HDY,colormagenta,LINETHICK2; RSV1:=(CLOSE-LLV(LOW,35))/(HHV(HIGH,35)-LLV(LOW,35))*100; K1:=SMA(RSV1,13,1); D1:=SMA(K1,13,1); STICKLINE(EMA(D1,3)>REF(EMA(D1,3),1),EMA(D1,3),REF(EMA(D1,3),1),8,0),COLORFF5D00; STICKLINE(EMA(D1,3)>REF(EMA(D1,3),1),EMA(D1,3),REF(EMA(D1,3),1),7,0),COLORFF5D10; STICKLINE(EMA(D1,3)>REF(EMA(D1,3),1),EMA(D1,3),REF(EMA(D1,3),1),6,0),COLORFF7710; STICKLINE(EMA(D1,3)>REF(EMA(D1,3),1),EMA(D1,3),REF(EMA(D1,3),1),5,0),COLORFF8810; STICKLINE(EMA(D1,3)>REF(EMA(D1,3),1),EMA(D1,3),REF(EMA(D1,3),1),4,0),COLORFF9910; VA1:=HHV(HIGH,9)-LLV(LOW,9); VA2:=HHV(HIGH,9)-CLOSE; VA3:=CLOSE-LLV(LOW,9); VA4:=VA2/VA1*100-70; VA5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100; VA6:=(CLOSE+HIGH+LOW)/3; VA7:=SMA(VA3/VA1*100,3,1); VA8:=LLV(LOW,34); VA9:=SMA(VA7,3,1)-SMA(VA4,9,1); VARA:=IF(VA9>100,VA9-100,0); VARB:=HHV(HIGH,34); VARC:=EMA((VA6-VA8)/(VARB-VA8)*100,13); VARD:=EMA(0.667*REF(VARC,1)+0.333*VARC,2); VARE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(ABS(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25; VARF:=MA(VARE,3); VAR1:=HHV(HIGH,9)-LLV(LOW,9); VAR2:=HHV(HIGH,9)-CLOSE; VAR3:=CLOSE-LLV(LOW,9); VAR4:=((VAR2)/(VAR1))*(100)-70; VAR5:=((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)))*(100); VAR6:=((2)*(CLOSE)+HIGH+LOW)/(4); VAR7:=SMA(((VAR3)/(VAR1))*(100),3,1); VAR8:=LLV(LOW,34); VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1); VAR10:=IF((VAR9>100),VAR9-100,0); VAR11:=HHV(HIGH,34); B1:=EMA(((VAR6-VAR8)/(VAR11-VAR8))*(100),8); DRAWKLINE(EMA(B1,5),EMA(B1,5),B1+1,B1); 操作:EMA(B1,5),colorred; 生命:EMA(VARD,1),coloryellow; V1:=MA(C,5)=HHV(MA(C,5),20); V2:=MA(C,5)>MA(C,10); V3:=MA(V,5)>MA(V,40)*1.01; V4:=COUNT(MA(C,1)>REF(C,1),2)=2; VV:=V1 AND V2 AND V3 AND V4; A1:=EMA(CLOSE,8); A2:=EMA(A1,20); A3:=CROSS(A1,A2); A4:=A1<EMA(CLOSE,120); STICKLINE((A3 AND A4)OR(V1 AND V2 AND V3 AND V4),B1*1.03,B1*1.120,1,0),coloryellow; A5:=3*SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,21,1)-2* SMA(SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,20,1),8,1),CIRCLEDOT ,COLORFF9900 ; 安全:=20; 转强:IF(CROSS(A5,安全),9,0),STICK,colorlired,LINETHICK2; 拉升:IF(CROSS(VARC,生命) AND VARC>VARD AND VARC<55 AND C>O,9,0),STICK,colorred,LINETHICK2; VAR18:=HHV(HIGH,30); VAR19:=LLV(LOW,30); NL:=EMA((CLOSE-VAR19)/(VAR18-VAR19)*100,5)/8*10,coloryellow,LINETHICK2; DRAWTEXT(CROSS(5,NL),4,'★做底'),colorred; VAR44:=REF(CLOSE,1); VAR45:=SMA(MAX(CLOSE-VAR44,0),6,1)/SMA(ABS(CLOSE-VAR44),6,1)*100; STICKLINE(CROSS(84,VAR45),0,9,0.8,1),colorgreen; DRAWTEXT(CROSS(84,VAR45),4,'空警'),colorgreen; 3、主力逍遥吸货控盘资金 和谐源码，分享给大家了。( 顶尖 财经 股票学院: http://www.58188.com ) M1:=16; N2:=9; VAR1C:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4; VAR1D:=EMA(CLOSE,2)-EMA(CLOSE,89); VAR1E:=EMA(VAR1D,30); VAR1F:=2*(VAR1D-VAR1E)*10; VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100); VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100); VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100); VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6); VAR6:=MA(VAR5,3); VAR20:=POW(VAR1F,3)*0.1+POW(VAR1F,2); VAR21:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)); VAR22:=EMA(VAR21*0.97,3); VAR23:=(HIGH+LOW+CLOSE)/3; VAR24:=(VAR23-MA(VAR23,14))/(0.015*AVEDEV(VAR23,14)); VAR25:=IF(VAR1F>0.015,VAR20,0)/45; WWWCHNMONEYCOM:=STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),7,0),COLOR00AAFF; STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),7,0),COLOR0044FF; STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),7,0),COLOR0088FF; STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),7,0),COLOR00AAFF; 拉升资金: VAR25,colorred; VAR26:=EMA(CLOSE,2)-EMA(CLOSE,150); VAR27:=EMA(VAR26,100); VAR28:=2*(VAR26-VAR27); VAR29:=POW(VAR28,3)*0.1+POW(VAR28,1); VAR1:=EMA(EMA(CLOSE,3),1); 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; DRAWTEXT(CROSS(控盘,0),0-3,'▲'),COLORFF00FF; DRAWTEXT(CROSS(0,控盘),0,'▼'),colorgreen; VAR2A:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)); VAR2B:=EMA(VAR2A*0.97,3); VAR2C:=(HIGH+LOW+CLOSE)/3; VAR2D:=(VAR2C-MA(VAR2C,14))/(0.015*AVEDEV(VAR2C,14)); 主力资金进出:控盘,COLORFFAA00; STICKLINE(控盘<0,控盘,0,7,0),COLORFF8800; STICKLINE(控盘<0,控盘,0,7,0),COLORFFAA00; STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,7,0),COLOR0000EE; STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,7,0),COLOR00EE00; 主力资金:=IF(VAR28>0.1,VAR29,0)*5; VAR1r:=REF((L+O+C+H)/4,1); VAR2r:=SMA(ABS(VAR1r-H),13,1)/SMA(MAX(VAR1r-H,0),10,1); VAR3r:=EMA(VAR2r,10); VAR4r:=HHV(H,33); VAR5r:=EMA(IF(H>=VAR4r,VAR3r,0),3)*-1; 对倒出货洗盘:0,COLOR00FF00; 黄色底部吸货:0,coloryellow; 主力买:CROSS(控盘,0),colorwhite; SELECT CROSS(控盘,0); 主力退场:IF(VAR5r>REF(VAR5r,1),VAR5r,0),LINETHICK2,colorgreen; 主力诱多:IF(VAR5r<REF(VAR5r,1),VAR5r,0),LINETHICK2,coloryellow; |