通达信红财神源码副图,通达信公式

P:=13;S:=5;M:=1; DIFF:Ema(C,S)-EMA(C,P); DEA:EMA(DIFF,M),COLORRED; :2*(DIFF-DEA),COLORstICK; P1:=P;S1:=S; DIFF1:EMA(C,S1)-EMA(C,P1); DEA1:EMA(DIFF,M),COLORRED; MacD1:=2*(DIFF1-DEA1),COLORSTICK; MACD2:=DEA; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 0,0,MACD2*50,3,0),COLOR00AAFF; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 0,0,MACD2*50,1.8,0),COLOR00BBFF; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 0,0,MACD2*50,1.3,0),COLOR00CCFF; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 0,0,MACD2*50,1.2,0),COLOR00ddfF; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 0,0,MACD2*50,1,0),COLOR00EEFF; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 0,0,MACD2*50,0.5,0),COLOR00FFFF; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 0,0,MACD2*50,3.4,0),COLOR0000AA; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 0,0,MACD2*50,3.2,0),COLOR0011BB; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 0,0,MACD2*50,3,0),COLOR0022CC; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 0,0,MACD2*50,2,0),COLOR0033DD; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 0,0,MACD2*50,1,0),COLOR0044EE; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 0,0,MACD2*50,0.5,0),COLOR0055FF; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,3.4,0),COLORAA00BB; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,3.2,0),COLORBB11BB; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,3,0),COLORCC22BB; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,2,0),COLORDD33BB; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,1,0),COLOREE44BB; STICKLINE(MACD2 REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,0.5,0),COLORFF55BB; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,3,0),COLORFF7700; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,1.5,0),COLORFF8811; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,1.2,0),COLORFFAA22; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,1.0,0),COLORFFBB33; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,0.8,0),COLORFFDD44; STICKLINE(MACD2 =REF(MACD2,1)ANDMACD2 =0,0,MACD2*50,0.5,0),COLORFFFF55; VARA:=REF(LOW,1); VARB:=SMA(Abs(LOW-VARA),3,1)/SMA(MAX(LOW-VARA,0),3,1)*100; VARC:=EMA(IF(CLOSE*1.3,VARB*10,VARB/10),3); VARD:=LLV(LOW,30); VARE:=HHV(VARC,30); VARF:=IF(MA(CLOSE,58),1,0); VARG:=EMA(IF(LOW =VARD,(VARC+VARE*2)/2,0),3)/618*VARF; VARH:=IF(VARG 28,28,VARG); 吸筹:STICKLINE(VARH -120,0,VARH,6,1),COLOR0FFFFF; 备钱:IF(吸筹,1,0),COLOR0FFFFF; RSV:=(((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*100); K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; X:=LLV(J,2)=LLV(J,8); 买入时机:IF(crOSS(J,3),65,0),COLORFF00FF,LINETHICK3; DRAWTEXT(买入时机,70.1,'跟庄'),COLOR00FF00; VA:=(2*C+H+L)/4; VB:=LLV(L,5); VC:=HHV(H,5); 红线上穿买:EMA((VA-VB)/(VC-VB)*100,5),COLORRED; 红线下穿卖:EMA(红线上穿买,3),COLORFFFF00; :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),COLOR00FFFF; 秘密买点:IF(趋势 =3,20,0),COLOR00FF00,LINETHICK3; 建仓:IF(趋势 5,40,0),COLORFFFFFF,LINETHICK3; N:=5; VAR1:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)- 3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1),COLORYELLOW,LINETHICK0; VAR2:8,COLORGREEN,LINETHICK0; 上升在即:IF(CROSS(VAR1,VAR2),80,0),STICK,COLOR0000CC,LINETHICK2; 专吸庄血:IF(VAR1 =8,25,0),STICK,COLORWHITE,LINETHICK2; DRAWTEXT(CROSS(VAR1,VAR2),80,'准备买入'),COLOR00FFFF; J1:=REVERSE(J); AA:=REF(MA(C,1),10) REF(MA(C,60),10); 买点:CROSS(J,J1)ANDAA; STICKLINE(买点,0,-30,-12,0),COLOR0000FF; STICKLINE(买点,-20,-30,-10,0),COLORWHITE; STICKLINE(买点,-20,-30,-6,0),COLORYELLOW; DRAWTEXT(买点,-35,'财神'),COLORFF00FF; 买线:=EMA(C,2); 卖线:=EMA(SLOPE(C,21)*20+C,42); STICKLINE(买线 =卖线,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR001050; STICKLINE(买线卖线,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR404050; DRAWKLINE(H,O,L,C); 指导:=EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2); 界:=MA(CLOSE,27); B买:IF(CROSS(指导,界)ORCROSS(买线,卖线),C,DRAWNULL),COLORMAGENTA,NODRAW;持仓:IF(买线 =卖线,C,DRAWNULL),COLORRED,NODRAW; S卖:IF(CROSS(界,指导)ORCROSS(卖线,买线),C,DRAWNULL),COLORLIGRAY,NODRAW; 空仓:IF(买线卖线,C,DRAWNULL),COLORGREEN,NODRAW; DRAWICON(CROSS(买线,卖线),L,1); DRAWICON(CROSS(卖线,买线),H,2); MA5:MA(CLOSE,M1),COLORFFFFFF; MA13:MA(CLOSE,M2),COLOR00FF00; MA21:MA(CLOSE,M3),COLOR8000FF; MA77:MA(CLOSE,M4),LINETHICK2; MA99:MA(CLOSE,M5),LINETHICK2; DRAWICON((ZIG(3,5) REF(ZIG(3,5),1))AND(REF(ZIG(3,5),1) =REF(ZIG(3,5),2))AND(REF(ZIG(3,5),2) =REF(ZIG(3,5),3)),LOW*0.98,1); DRAWICON((ZIG(3,5) REF(ZIG(3,5),1))AND(REF(ZIG(3,5),1) =REF(ZIG(3,5),2))AND(REF(ZIG(3,5),2) =REF(ZIG(3,5),3)),HIGH*1.01,2); VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100; VAR6:=(VAR3+VAR4+VAR5)/3; VAR7:=EMA(VAR6,5); ZB:=EMA(EMA(VAR3,5),5)*3,COLORSTICK; VAR8:=IF(VAR6 =-20,10,0); VAR9:=HHV(VAR8,10); VARA:=IF(VAR9ANDCROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0); K:=EMA(VAR7,5)*2,,COLORFF00FF; D:=EMA(K,5),,COLORWHITE; J:=K*3-D*2,,COLORYELLOW; VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5))ANDJ HS:=VOL/CAPITAL*100,,COLORGREEN; DRAWTEXT(VAR8=10ANDFILTER(VAR8=10,5),LOW*0.93,'接近底部')COLORMAGENTA; DRAWTEXT(VARA=20,LOW*0.95,'底部')COLORYELLOW; VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); VAR11:=VARF REF(VAR10,1)ANDVOL REF(VOL,1)ANDCLOSE REF(CLOSE,1); DRAWTEXT(VAR11ANDCOUNT(VAR11,30)=1,LOW*0.95,''),LINETHICK1,COLORFF00FF; VAR12:=(HIGH+LOW+CLOSE)/3; VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14)); VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70)); VAR15:=IF(VAR13 =150ANDVAR13 200ANDVAR14 =150ANDVAR14 200,10,0); VAR16:=IF(VAR13 =-150ANDVAR13 -200ANDVAR14 =-150ANDVAR14 -200,-10,VAR15); VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; VAR18:=100-ABS(VAR17); VAR19:=IF(VAR18 90,VAR18,100); VAR1A:=IF(VARE 0,VARE,0); VAR1B:=IF(VAR14 =200ANDVAR13 =150,15,IF(VAR14 =-200ANDVAR13 =-150,-15,VAR16))+60; VAR1C:=VAR1A 48ANDVAR1B 60ANDVAR19 DRAWTEXT(VAR1CANDCOUNT(VAR1C,30)=1,LOW*0.95,'大笔')COLORWHITE; VAR1:=ZIG(3,13); STICKLINE((REF(VAR1,2) REF(VAR1,1))AND(VAR1 REF(VAR1,1)),CLOSE,OPEN,5,0),COLOR66FF00; AAA:=CONST(HHV(H*0.85,90)); A74:=MA(CLOSE,20); A75:=(CLOSE MA(CLOSE,5)); A76:=(MA(CLOSE,5) MA(CLOSE,10)); A77:=(CLOSE MA(CLOSE,10)); A78:=(MA(CLOSE,5) MA(CLOSE,20)); A79:=(CLOSE MA(CLOSE,20)); A710:=REF(A74,1); A711:=(A74 A710); AVX:=(((((IF(A75,10,(0-10))+IF(A76,10,(0-10)))+IF(A77,10,(0-10))) +IF(A78,10,(0-10)))+IF(A79,10,(0-10)))+IF(A711,10,(0-10))); DSLX:=(CLOSE/INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); V1:=MA(VOL,5); V2:=MA(VOL,10); T1:=CONST(IF(C 200AND((CROSS(AVX,1)AND(V1 =V2))AND(DSLX =DSLX1)),1,0)); T2:=CONST(IF(C 200AND((CROSS(AVX,1)AND(V1 V2))AND(DSLX =DSLX1)),1,0)); T3:=CONST(IF(C 200AND((CROSS(AVX,1)AND(V1 V2))AND(DSLX DSLX1)),1,0)); T4:=CONST(IF(C 200AND((CROSS(AVX,1)AND(V1 =V2))AND(DSLX DSLX1)),1,0)); T5:=CONST(IF(C 200AND((CROSS(1,AVX)AND(V1 =V2))AND(DSLX =DSLX1)),1,0)); T6:=CONST(IF(C 200AND((CROSS(1,AVX)AND(V1 V2))AND(DSLX =DSLX1)),1,0)); T7:=CONST(IF(C 200AND((CROSS(1,AVX)AND(V1 =V2))AND(DSLX DSLX1)),1,0)); T8:=CONST(IF(C 200AND((CROSS(1,AVX)AND(V1 V2))AND(DSLX DSLX1)),1,0)); T9:=CONST(IF(C 200AND((((AVX =1)AND(REF(AVX,1) 0))AND(V1 =V2))AND(DSLX =DSLX1)),1,0)); T10:=CONST(IF(C 200AND((((AVX =1)AND(REF(AVX,1) 0))AND(V1 V2))AND(DSLX =DSLX1)),1,0)); T11:=CONST(IF(C 200AND((((AVX =1)AND(REF(AVX,1) 0))AND(V1 =V2))AND(DSLX DSLX1)),1,0)); T12:=CONST(IF(C 200AND((((AVX =1)AND(REF(AVX,1) 0))AND(V1 V2))AND(DSLX DSLX1)),1,0)); T13:=CONST(IF(C 200AND((((AVX 1)AND(REF(AVX,1) 0))AND(V1 =V2))AND(DSLX =DSLX1)),1,0)); T14:=CONST(IF(C 200AND((((AVX 1)AND(REF(AVX,1) 0))AND(V1 V2))AND(DSLX =DSLX1)),1,0)); T15:=CONST(IF(C 200AND((((AVX 1)AND(REF(AVX,1) 0))AND(V1 =V2))AND(DSLX DSLX1)),1,0)); T16:=CONST(IF(C 200AND((((AVX 1)AND(REF(AVX,1) 0))AND(V1 V2))AND(DSLX DSLX1)),1,0)); T17:=CONST(IF(C 200AND(CROSS(AVX,1)AND(V1 =V2)),1,0)); T18:=CONST(IF(C 200AND(CROSS(AVX,1)AND(V1 =V2)),1,0)); T19:=CONST(IF(C 200AND(CROSS(AVX,1)AND(V1 V2)),1,0)); T20:=CONST(IF(C 200AND(CROSS(1,AVX)AND(V1 =V2)),1,0)); T21:=CONST(IF(C 200AND(CROSS(1,AVX)AND(V1 V2)),1,0)); T22:=CONST(IF(C 200AND(((AVX =1)AND(REF(AVX,1) 0))AND(V1 =V2)),1,0)); T23:=CONST(IF(C 200AND(((AVX =1)AND(REF(AVX,1) 0))AND(V1 V2)),1,0)); T24:=CONST(IF(C 200AND(((AVX 1)AND(REF(AVX,1) 0))AND(V1 =V2)),1,0)); T25:=CONST(IF(C 200AND(((AVX 1)AND(REF(AVX,1) 0))AND(V1 V2)),1,0)); DRAWTEXT_FIX(T1=1ANDCURRBARSCOUNT=70,0,0.92,0,'理想,明显走强,参与，仓位在2/3左右。'),COLORFFFFFF; DRAWTEXT_FIX(T2=1ANDCURRBARSCOUNT=70,0,0.92,0,'走势趋强,还显不足,进场，仓位在1/2左右。'),COLORFFFFFF; DRAWTEXT_FIX(T3=1ANDCURRBARSCOUNT=70,0,0.92,0,'量价良好,没有明显走强，短线进场，仓位1/2左右。'),COLORFFFFFF; DRAWTEXT_FIX(T4=1ANDCURRBARSCOUNT=70,0,0.92,0,'形态尚可，量能不足，未完全走强，短线参与，仓位1/3左右。'),COLORFFFFFF; DRAWTEXT_FIX(T5=1ANDCURRBARSCOUNT=70,0,0.92,0,'形态变坏，重仓者减持大半，清仓者观望。'),COLORFFFFFF; DRAWTEXT_FIX(T6=1ANDCURRBARSCOUNT=70,0,0.92,0,'随一起下跌，明显缩量走势，考虑到风险，减持或清仓。'),COLORFFFFFF; DRAWTEXT_FIX(T7=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股放量下跌，走势明显偏弱，离场观望。'),COLORFFFFFF; DRAWTEXT_FIX(T8=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股缩量下跌，走势偏弱，离场观望。'),COLORFFFFFF; DRAWTEXT_FIX(T9=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股形态良好，强势明显，量能充足，可以继续持有。'),COLORFFFFFF; DRAWTEXT_FIX(T10=1ANDCURRBARSCOUNT=70,0,0.92,0,'上行趋势不变，强势依然，量能开始转弱，注意风险。'),COLORFFFFFF; DRAWTEXT_FIX(T11=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。'),COLORFFFFFF; DRAWTEXT_FIX(T12=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股走势趋弱，量能不足，减持大部分。'),COLORFFFFFF; DRAWTEXT_FIX(T13=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股形态不佳，注意的变化，目前不适合参与。'),COLORFFFFFF; DRAWTEXT_FIX(T14=1ANDCURRBARSCOUNT=70,0,0.92,0,'趋势不明，股价偏弱，注意量能变化，目前不宜参与。'),COLORFFFFFF; DRAWTEXT_FIX(T15=1ANDCURRBARSCOUNT=70,0,0.92,0,'有走强迹象，但量能不足，趋势不明，不适合操作。'),COLORFFFFFF; DRAWTEXT_FIX(T16=1ANDCURRBARSCOUNT=70,0,0.92,0,'该股走势太弱，没有参与价值。'),COLORFFFFFF; DRAWTEXT_FIX(T17=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘理想，有明显走强迹象，中线参与，仓位在2/3左右。'),COLORFFFFFF; DRAWTEXT_FIX(T18=1ANDCURRBARSCOUNT=70,0,0.92,0,'如前期经过一轮下跌，最佳买点，前期有过一段涨幅需谨慎。'),COLORFFFFFF; DRAWTEXT_FIX(T19=1ANDCURRBARSCOUNT=70,0,0.92,0,'考虑短线进场，仓位在1/2左右，一旦量能放大,加仓买入。'),COLORFFFFFF; DRAWTEXT_FIX(T20=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘形态走坏，重仓者可以减去大部分仓位。'),COLORFFFFFF; DRAWTEXT_FIX(T21=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘缩量调整，注意风险，短线清仓观望。'),COLORFFFFFF; DRAWTEXT_FIX(T22=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘走势良好，量能理想，可以继续持有强势股。'),COLORFFFFFF; DRAWTEXT_FIX(T23=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘形态良好，但量能稍显不足，随时准备减仓。'),COLORFFFFFF; DRAWTEXT_FIX(T24=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘趋势不明，注意成交量变化，目前不适宜进场。'),COLORFFFFFF; DRAWTEXT_FIX(T25=1ANDCURRBARSCOUNT=70,0,0.92,0,'大盘趋势向下，量能萎缩，不适合进场。'),COLORFFFFFF; A1J:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,10))/EMA(CLOSE,10));{23} A2J:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1J); 金线王:=EMA(A2J,5)*1;{200} 金线王2:=EMA(A2J,200)*1.118;{200} 条件:=(C-REF(C,1))/REF(C,1)*100 金K线:=CROSS(C,金线王)AND条件; RRFJ:=金K线,STICK; STICKLINE(IF(RRFJ,-120,0),+80,0,2,0),COLORLIMAGENTA;{COLOR000088;} DRAWTEXT(RRFJ,42,'---接财神'),COLORYELLOW;

通达信红财神源码副图截图

相关推荐