分享

通达信买卖监控主图源码,无未来下载

 agl2722 2013-08-17
通达信买卖监控主图源码,无未来

MA5:MA(CLOSE,5);    
短趋势:MA(CLOSE,13),COLORRED,LINETHICK2;    
MA20:MA(CLOSE,20);    
MA30:MA(CLOSE,30);    
MA60:MA(CLOSE,60);    
MA120:MA(CLOSE,120);    
MA250:MA(CLOSE,250);    
AA10:=MA(CLOSE,8);    
AA12:=MA(CLOSE,12);    
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);    
VAR01:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);    
中期大底:=LLV(LOW,30),COLORCDFFBB;    
短底:=EMA(VAR01,5);    
支撑:=HHV(短底,60);    
压力1:=HHV(LOW,20),COLORFAABEC;    
中线:=MA(CLOSE,3);    
天:=(MA(LOW,15) * 0.985);    
人:=(MA(LOW,15) * 0.96);    
地:=(((HIGH + LOW) + CLOSE) / 3);    
B1:=HHV(地,(4 * 15));    
B6:=LLV(地,(4 * 15));    
B7:=(B1 - B6);    
B8:=(MA(((地 - B6) / B7),2) * 80);    
VAR1:=(((CLOSE - LLV(LOW,100)) / (HHV(HIGH,100) - LLV(LOW,100))) * 200);    
飞龙顶底线1:=SMA(VAR1,3,1);    
VAR2:=SMA(飞龙顶底线1,3,1);    
VAR3:=((3 * 飞龙顶底线1) - (2 * VAR2));    
VAR4:=LLV(LOW,5);    
VAR5:=HHV(HIGH,5);    {股海网提供:www.}
VAR6:=(EMA((((CLOSE - VAR4) / (VAR5 - VAR4)) * 100),4) * 2);    
VAR7:=EMA(((0.667 * REF(VAR6,1)) + (0.333 * VAR6)),2);    
VAR8:=((3 * VAR6) - (2 * VAR7));    
VAR9:=(POW(MA(CLOSE,5),2) + MA(CLOSE,5));    
VARA:=(POW(MA(LOW,5),2) + MA(LOW,5));    
VARB:=(POW(MA(HIGH,5),2) + MA(HIGH,5));    
VARC:=(((((VAR9 - LLV(VARA,64)) / (HHV(VARB,64) - LLV(VARA,64))) * 150) + 65) - 10);    
VARD:=((SMA(VARC,3,1) * 1.5) - 100);    
VARE:=SMA(VARD,3,1);    
VARF:=((3 * VARD) - (2 * VARE));    
VAR10:=(((HIGH + LOW) + (CLOSE * 2)) / 4);    
VAR11:=EMA(VAR10,13);    
VAR12:=STD(VAR10,13);    
VAR13:=(((VAR10 - VAR11) * 100) / VAR12);    
VAR14:=EMA(VAR13,5);    
VAR15:=EMA(VAR14,13);    
VAR16:=((EMA(VAR14,13) + 200) - 100);    
VAR17:=EMA(VAR16,10);    
VAR18:=((3 * VAR16) - (2 * VAR17));    
VAR19:=(((飞龙顶底线1 + VAR6) + VARD) + VAR16);    
VAR1A:=(((VAR2 + VAR7) + VARE) + VAR17);    
VAR1B:=(((VAR3 + VAR8) + VARF) + VAR18);    
VAR1C:=(((HIGH + LOW) + CLOSE) / 3);    
VAR1D:=((AMOUNT / VOL) / 100);    
VAR1E:=((SUM(AMOUNT,5) / SUM(VOL,5)) / 100);    
VAR1F:=((VAR1C - MA(VAR1C,34)) / (0.015 * AVEDEV(VAR1C,34)));    
VAR21:=((((HIGH + LOW) + CLOSE) + VAR1C) / 4);    
VAR22:=EMA(VAR21,24);    
VAR23:=STD(VAR21,24);    
VAR24:=(((VAR21 - VAR22) / VAR23) * 100);    
VAR25:=((VAR1C - MA(VAR1C,24)) / (0.015 * AVEDEV(VAR1C,24)));    
VAR26:=EMA(VAR24,5);    
VAR27:=((VAR1D - MA(VAR1D,21)) / (0.015 * AVEDEV(VAR1D,21)));    
VAR28:=((VAR1E - MA(VAR1E,90)) / (0.015 * AVEDEV(VAR1E,90)));    
VAR29:=(((((((VAR28 + VAR27) + VAR26) + VAR25) + VAR1F) / 5) + 165) / 4);    
VAR2A:=(((((VAR19 + VAR1A) + (VAR1B * 30)) / 32) / 5) - 15);    
VAR2B:=(((VAR29 + VAR2A) / 2) / 1.1);    
VAR2C:=VAR2B;    
短线:=MA(VAR2C,26);    
UPPER:=(短线 - (2 * STD(VAR2C,26)));    
XY:=MA(CLOSE,5);    
M80:=MA(CLOSE,80);    
短期底部:=(LLV(HIGH,30) * 0.93),COLOR0000FF;    
MA80:=LLV(HIGH,30);    
短期底部2:=SMA(CLOSE,2,1);    
趋势:=(MA(LOW,10) * 0.96);    
MAN:=(SMA(HIGH,21,2) * 1.05);    
上1:=(HHV(短底,60) * 0.92);    
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);    
RSV:=SMA(下档线,3,1);    
K:=SMA(RSV,3,1);    
D:=((3 * RSV) - (2 * K));    
J:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);    
VAR2P:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);    
VAR3P:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);    
VAR4P:=(((J + (2 * VAR2P)) + (3 * VAR3P)) / 6);    
VAR5P:=MA(VAR4P,3);    
VAR6P:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100);    
RSV12:=SMA(VAR6P,3,1);    
K12:=SMA(RSV12,3,1);    
D12:=((3 * RSV12) - (2 * K12));    
J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);    
RSV24:=SMA(J12,3,1);    
K24:=SMA(RSV24,3,1);    
D24:=((3 * RSV24) - (2 * K24));    
J24:=IF(CROSS(D,D24),LOW,REF(LOW,BARSLAST(CROSS(D,D24))));    
压力位:=IF(CROSS(D24,D),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D)))),COLORFFFFFF;    
U2L:=IF((CLOSE >= MA(CLOSE,20)),50,20);    
RH5:=IF(((D > U2L) AND (REF(D,1) <= U2L)),LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),REF(LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),BARSLAST(((D > U2L) AND REF(D,1)))));    
RL1:=IF((LOW < RH5),HIGH,REF(HIGH,BARSLAST((LOW < RH5))));    
RL4:=IF((LOW < RH5),D,REF(D,BARSLAST((LOW < RH5))));    
RL42:=IF((((LOW < RL1) AND (D > RL4)) AND (D > D24)),LOW,REF(LOW,BARSLAST((((LOW < RL1) AND (D > RL4)) AND (D > D24)))));    
长期底部:=LLV(HIGH,30),COLORFF0000;    
DRAWTEXT(FILTER(((((RL42 = J24) AND (CLOSE > OPEN)) AND (CLOSE > 长期底部)) AND (LOW <= J24)),20),(LOW - 0.12),'底成'),COLOR0EABFF;    
上:=(SMA(LOW,5,2) * 0.96);    
中:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);    
X1:=EMA(中,10);    
X2:=REF(X1,1);    
X3:=((REF(HIGH,1) + REF(LOW,1)) / 2);    
X4:=(MA(CLOSE,21) + (2 * STD(CLOSE,21)));    
X5:=REF(CLOSE,1);    
X6:=((SMA(MAX((CLOSE - X5),0),7,1) / SMA(ABS((CLOSE - X5)),7,1)) * 100);    
X7:=CROSS(79,X6);    
X8:=FILTER(X7,4);    
X9:=MA(CLOSE,115);    
VAR001:=EMA(CLOSE,8);    
飞龙顶底线:=EMA(VAR001,20);    
VAR002:=CROSS(VAR001,飞龙顶底线);    
VAR003:=(VAR001 < MA(CLOSE,20));    
VAR004:=(((HHV(HIGH,36) - CLOSE) / (HHV(HIGH,36) - LLV(LOW,36))) * 100);    
VAR005:=SMA(VAR004,5,1);    
VAR006:=SMA(VAR005,8,1);    
VAR007:=(CROSS(VAR005,VAR006) AND (VAR006 < 5));    
VAR008:=((CLOSE > (LLV(CLOSE,60) + (0.3 * LLV(CLOSE,60)))) AND VAR007);    
VAR009:=IF((CLOSE > 1000),VAR007,VAR008);    
VAR00F:=CROSS(X1,X2);    
MA115:=VAR00F;    
低买:=(VAR002 AND VAR003);    
黑马起步:=VAR009;    
DRAWTEXT((黑马起步 > 0),(HIGH * 1.04),'逃命'),COLORFF0000;    
逃遁:=(SMA(HIGH,21,2) * 1.05);    
阻挡:=(SMA(LOW,21,2) * 0.94);    
DRAWTEXT((((((低买 > 0) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 压力位)) AND (HIGH < X9)) AND ((X2 - REF(X2,1)) > 0)),LOW,'黑马'),COLORRED;    
DRAWTEXT((((((CROSS(VAR2C,短线) AND ((CLOSE - REF(HIGH,1)) > 0)) AND ((中线 - REF(中线,1)) > 0)) AND (HIGH <= 压力1)) AND (CLOSE < MA20)) AND (LOW <= 中线)),(LOW - 0.06),'关注'),COLOR00FF00;    
DRAWTEXT((((CROSS(VAR2C,UPPER) AND (HIGH < 压力1)) AND ((XY - REF(XY,1)) > 0)) AND (HIGH < 支撑)),LOW,'买'),COLORFFFFFF;    
DRAWTEXT(FILTER(((((((LOW <= 天) AND (CLOSE >= MA20)) AND (HIGH < 压力1)) AND ((天 - REF(天,1)) > 0)) AND (CLOSE < 压力1)) AND ((MA20 - REF(MA20,1)) > 0)),6),(LOW - 0.12),'全仓'),COLOR00FFFF;    
DRAWTEXT(FILTER((((((MA115 AND (CLOSE < 压力位)) AND ((人 - REF(人,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 上1)) AND ((CLOSE / OPEN) > 1.03)),5),LOW,'●买'),COLOR93EE7D;    
DRAWTEXT(((((LOW <= 上) AND (HIGH >= 短期底部)) AND (CLOSE >= 长期底部)) AND ((CLOSE / OPEN) > 1.03)),(LOW - 0.08),'★抄底'),COLOR0000FF;    
DRAWTEXT(FILTER((((((B8 <= 1) AND (LOW <= 阻挡)) AND (CLOSE > OPEN)) AND (LOW <= 中期大底)) AND (CLOSE >= 长期底部)),3),(LOW - 0.08),'短抄'),COLORA100FF;    
DRAWTEXT((((CROSS(D,0) AND (HIGH < 压力位)) AND (VAR5P <= (0 - 7))) AND (CLOSE < XY)),(LOW - 0.11),'半仓'),COLORFFFF00;    
DRAWTEXT(FILTER((((CROSS(趋势,趋) AND (HIGH < M80)) AND (HIGH < 压力1)) AND LLV(LOW,0)),10),LOW,'果断买'),COLOR668800;    
DRAWTEXT(FILTER(((CROSS(中线,人) AND (LOW <= 人)) AND (CLOSE >= 人)),4),(LOW - 0.06),'买'),COLOR00FF00;    
DRAWTEXT(((CROSS(阻挡,长期底部) AND (BB10 > 1)) AND (HIGH < 支撑)),LOW,'出击'),COLORRED;    
DRAWTEXT(FILTER((((((((MA20 - REF(MA20,1)) > 0) AND (HIGH < 支撑)) AND ((AA10 - REF(AA10,1)) > 0)) AND (HIGH < 压力1)) AND (VOL >= REF(VOL,1))) AND CROSS(CLOSE,MA20)),57),LOW,'突破生命线'),COLOR0000FF;    
DRAWTEXT(FILTER(((((LOW <= MA80) AND (CLOSE > MA80)) AND (CLOSE > OPEN)) AND (短期底部2 <= MA80)),8),LOW,'底'),COLORFFFF00;    
DRAWTEXT(((CROSS(MA20,压力位) AND (LOW <= MA20)) AND ((MA20 - REF(MA20,1)) > 0.02)),(LOW - 0.03),'●绝佳买点'),COLORAFA0AF;    
DRAWTEXT((((((((CROSS(CLOSE,MA20) AND (HIGH < 压力位)) AND (OPEN < MA20)) AND (HIGH < 支撑)) AND ((MAN - REF(MAN,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (D < 63)) AND ((MA20 - REF(MA20,1)) > 0)),(LOW - 0.05),'●大牛浮水'),COLORBLUE;    
DRAWTEXT(CROSS(MA(CLOSE,13),C) AND INDEXC>MA(INDEXC,13) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L*0.9,'买'),COLORRED,LINETHICK2;    
VAR011:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;    
VAR012:=HHV(VAR011>20,10);     
DRAWTEXT(FILTER(VAR011<-9 AND VAR011>REF(VAR011,1),18),L*0.9,'反弹'),COLORRED,LINETHICK2;    
DRAWTEXT(VAR011<-20 AND INDEXC<MA(INDEXC,13) AND FILTER(VAR011> REF(VAR011,1),5),L*0.93,'抄底'),COLORYELLOW,LINETHICK2;    
DRAWTEXT(VAR012 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),H*1.1,'危险'),COLORYELLOW;    
   
B36:=MA(CLOSE,3) - MA(CLOSE,6);    
B612:=MA(CLOSE,6) - MA(CLOSE,12);    
W:=((B36)/(CLOSE))*(10);    
J1:=((B612)/(CLOSE))*(10);    
DRAWTEXT((W < (-0.2)) AND (J1 < (-0.2)) AND CROSS(W,J1),(LOW)*0.93,'庄影'),COLORBROWN;    
   
EMA13:=EMA(C,13);    
EMA34:=EMA(C,34);    
EMA55:=EMA(C,55);    
EMA120:=EMA(C,120);    
AR1:=EMA55>EMA34 AND EMA34>EMA13;    
AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);    
AR3:=EMA13>=REF(EMA13,2);    
AR4:=COUNT(CROSS(C,EMA13),AR2)=1;    
AR5:=AR1 AND AR2 AND AR3 AND AR4;    
AR6:=AR5 AND FILTER(AR5,10);    
A1AA:=9;    
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);    
DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.04),'清仓'),COLORGREEN;    
LOCK:=1;    
M8:=EMA(CLOSE,8);    
VARP21:=EMA(短趋势,62);    
VARP22:=(CLOSE+HIGH+LOW)/3;    
VARP23:=EMA(VARP22,10)*LOCK;    
VARP24:=REF(VAR23,1)*LOCK;    
DRAWTEXT(AR6,L-0.25,'杏'),COLOR00CCFF;    
量价背离:=VAR15*40,STICK,COLORF5CCEB,LINETHICK2;    
DRAWTEXT(量价背离,HIGH * 1.02,'离'),COLORYELLOW;    
VAR60:=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);    
VAR61:=VARF<REF(VAR60,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);    
大资金:=(VAR61 AND COUNT(VAR61,30)=1);    
DRAWTEXT(大资金,LOW*0.85,'▲大资金');    
{做空}    
RSV11:=(C - LLV(LOW,27))/(HHV(HIGH,3) - LLV(LOW,27)) * 100;    
F := SMA(RSV11, 3, 1);    
K11 := SMA(F,3, 1);    
D11 := SMA(K11,3, 1);    
WAV:=3*K11-2*D11;    
A41:=IF(1,C,IF(C<REF(O,1) AND L<REF(L,1),L,C));    
A42:=IF(C<REF(L,1),L,A41);    
A43:=IF(H<REF(O,1),L,A42);    
A44:=IF(O<=REF(C,1) AND C<REF(O,1),L,A43);    
A:=IF(C<O AND O<REF(O,1) AND L<REF(L,1),L,A44);    
AJ1:=ATAN((A/REF(A,1)-1)*100)*180/3.1416;    
LJIAO:=ATAN((VOL/REF(VOL,1)-1)*100)*180/3.1416;    
DSLJ:=LJIAO>0 AND ABS(LJIAO-AJ1)<30;    
JIA5:=WAV-REF(WAV,4)>50;    
DSALE:=DSLJ AND (JIA5 OR WAV>90);    
涨幅:=(C-LLV(C,10))/LLV(C,10)*100;    
DING2:=涨幅>20;    
DING:=DSALE OR DING2;    
QSA:=(MA(C,60)-REF(MA(C,60),10))/REF(MA(C,60),10)*100;    
QS:=SMA(QSA,10,1);    
DS:=QS<-3 OR MA(C,60)<REF(MA(C,60),1);    
QC:=DS AND DING AND DING!=REF(DING,1);    
DRAWTEXT(QC,H*1.08,'◇做空'),COLORRED;    
   
{抢钱买入}    
RSV1:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;    
K1:=SMA(RSV1,3,1);    
D1:=SMA(K1,3,1);    
J11:=3*K1-2*D1;    
X:=LLV(J11,2)=LLV(J11,8);    
VARR1:=LLV(LOW,10);    
VARR2:=HHV(HIGH,25);    
VARR3:=100*EMA((CLOSE-VARR1)/(VARR2-VARR1),4);    
DRAWTEXT(CROSS(J11,REF(J11+0.01,1)) AND X AND J11<20,LOW*0.95,'抢钱'),COLORRED;    
   
{加仓}    
MA10:=MA(CLOSE,10);    
五日乖离率:=(C-MA5)/MA5*100;    
BB05:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;    
速度5:=SMA(EMA((MA5-REF(MA5,1))/REF(MA5,1),3)*100,3,1);    
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;    
SSR:=(C-MA30)/MA30*100,NODRAW;    
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA5>REF(MA5,1)  AND SSR>REF(SSR,1) AND MA10>REF(MA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1)  ,10) ;    
DRAWTEXT(加仓 ,LOW*0.98,'◆加仓'),COLORYELLOW;    
{时间窗,变盘}    
AA:=BARSCOUNT(C);    
AH:=HHV(H,200);    
AL:=LLV(L,200);    
A0:=(AH-AL)/40;    
B11:=L-A0;    
STICKLINE((AA+0)/34=FLOOR((AA+0)/34),B11,B11-1.5*A0,2,0),COLORF00FF0;    
DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),B11-1*A0,'时间窗,变盘'),COLORF00FF0;    
{出货}    
LC:=REF(CLOSE,1);    
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);    
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'●离开'),COLORRED;    
VARE1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;    
VAR121:=(HIGH+LOW+CLOSE)/3;    
VAR131:=(VAR121-MA(VAR121,14))/(0.015*AVEDEV(VAR121,14));    
VAR141:=(VAR121-MA(VAR121,70))/(0.015*AVEDEV(VAR121,70));    
VAR171:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;    
VAR181:=100-ABS(VAR171);    
VAR191:=IF(VAR181<90,VAR181,100);    
VAR1A1:=IF(VARE1>0,VARE1,0);    
VAR1B1:=IF(VAR141>=200 AND VAR131>=150,15,IF(VAR141<=-200 AND VAR131<=-150,-15,VAR16))+60;    
VAR1C1:=VAR1A1>48 AND VAR1B1>60 AND VAR191<100;    
DRAWTEXT(VAR1C1 AND COUNT(VAR1C1,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66;    
XXS:=MA(HIGH,5)*(1+5/100);     
DRAWTEXT_FIX(1,0.14,0,0,'所属地区:')COLOR00FFFF;
DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.00,0.06,0,'主题投资:')COLOR0000FF;
DRAWTEXT_FIX(1,0.07,0.06,0,EXTERNSTR(0,1))COLOR0000FF;
DRAWTEXT_FIX(1,0.00,0.10,0,'主营业务:')COLORFF00FF;
DRAWTEXT_FIX(1,0.07,0.10,0,EXTERNSTR(0,2))COLORFF00FF; 
DRAWTEXT_FIX(1,0.00,0.14,0,'出千概念:')COLORFF88FF;
DRAWTEXT_FIX(1,0.07,0.14,0,EXTERNSTR(0,3))COLORFF88FF; 
DRAWTEXT_FIX(1,0.00,0.18,0,'愚民主题概念:'),COLOR00FFFF;
DRAWTEXT_FIX(1,0.09,0.18,0,EXTERNSTR(0,4)),COLOR00FFFF;
通达信买卖监控主图源码,无未来
{原文链接:http://www./download/FX/tong-da-xin/13731.html}

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约