最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 通达信实用汽枪主图源码

    正文概述    2024-04-14 15:36:14  

    麻烦路过的老师将通达信实用汽枪主图改成飞狐的谢谢

     
    N:=100;
     KK:=BARSLAST(CURRBARSCOUNT=N);
     GD:=CONST(IF(ISLASTBAR=1,HHV(H,KK),0));{高点}
    DD:=CONST(IF(ISLASTBAR=1,LLV(L,KK),0));{低点}
    KJ:=GD-DD;{高低点差值=分区高度}
    GD4:=IF(CURRBARSCOUNT<=N,GD,DRAWNULL);
    高区:=IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLORRED,LINETHICK2;
    低区:=IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,LINETHICK2;
    平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF;
    低:=IF(CURRBARSCOUNT<=N/2,DD,DRAWNULL),COLORFFFF00;
    高:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL),COLOR00FFFF;
    支撑:=IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;
    强势:=IF(CURRBARSCOUNT<=N,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
    突破:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR0000FF;
    警示:=IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
    压力:=IF(CURRBARSCOUNT<=N,DD+KJ*0.809,DRAWNULL),COLOR00FF00;
    低涨:=IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,KK)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
    天数:BARSLAST(L=DD),COLORCYAN,NODRAW;
    顶点:IF(CURRBARSCOUNT<=N, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,CROSSDOT;
    低点:IF(CURRBARSCOUNT<=N, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,CROSSDOT;
     STICKLINE(CCI>=200 AND H>=顶点,O,C,2,0),COLORBLUE;
     STICKLINE(CCI<=100 AND L<=低点,O,C,2,0),COLORYELLOW;
     DRAWBAND(高区,RGB(120,20,0),强势,RGB(0,0,0));
     DRAWBAND(强势,RGB(80,0,100),低区,RGB(0,0,0));
     DRAWBAND(高,RGB(100,100,0),压力,RGB(0,0,0));
     STICKLINE(CURRBARSCOUNT=N,GD,DD,0,0),COLORGREEN;
     STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080;
     STICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;
     STICKLINE(CURRBARSCOUNT<=N,支撑,支撑,2,0),COLORFF00FF;
     STICKLINE(CURRBARSCOUNT<=N,强势,强势,2,0),COLORFF00FF;
     STICKLINE(CURRBARSCOUNT<=N,压力,压力,2,0),COLOR00FFFF;
     DRAWTEXT(CURRBARSCOUNT=N/4+8,GD-KJ*0.09,'【风险区】--高抛避险'),COLOR00FFFF;
     DRAWTEXT(CURRBARSCOUNT=N/4+10,GD-KJ*0.4,'【拉升区】--强势畜锐'),COLORFFFF80;
     DRAWTEXT(CURRBARSCOUNT=N/4+15,DD+KJ/3,'【关注区】--逢低买入'),COLOR00FFFF;
     DRAWTEXT(CURRBARSCOUNT=N/4+20,DD+KJ/10,'【低吸区】--大胆买入'),COLOR00FF00;
     DRAWTEXT(CURRBARSCOUNT=N/2+10,GD-KJ*0.25,'【拉升区】'),COLORRED;
     DRAWTEXT(CURRBARSCOUNT=N/2+10,DD+KJ*0.25,'【持股区】'),COLORYELLOW;


    高1:=REF(HHV(H,120),3);
    低1:=REF(LLV(L,120),3);
     H1:=高1-(高1-低1)*0.191;
     H2:=高1-(高1-低1)*0.382;
     H3:=高1-(高1-低1)*0.5;
     H4:=高1-(高1-低1)*0.618;
     H5:=高1-(高1-低1)*0.809;
    突破1:=REF(EMA(C,14),1);
     A1XL:=(EMA(C,10)-突破1)/突破1*100;
    基准:=IF(A1XL>=0,REF(EMA(C,10),BARSLAST(CROSS(A1XL,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1XL))+1));
     STICKLINE(A1XL>=0,基准,突破1,0.5,0),COLOR408080;

    第一防线:REFDATE(低,DATE),POINTDOT,COLORYELLOW,LINETHICK3;
    第二防线:REFDATE(支撑,DATE),POINTDOT,COLORWHITE,LINETHICK3;
     VAR11:=MA(C,9),COLORRED;
    上升通道:IF(VAR11>REF(VAR11,1),VAR11,DRAWNULL),LINETHICK5,COLORRED;
    下降通道:IF(VAR11

     RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
     K:=SMA(RSV,3,1);
     D:=SMA(K,3,1);
     J:=3*K-2*D;
     RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
     K24:=SMA(RSV24,3,1);
     D24:=SMA(K24,3,1);
     J24:=3*K24-2*D24;
    压力位:IF(CROSS(J24,J),H,REF(H,BARSLAST(CROSS(J24,J)))),COLOR66CC66,LINETHICK3;
    支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORCC33CC,LINETHICK3;
     {支撑价:LLV(LOW,34),COLOR0088FF,DOTLINE,LINETHICK2;
    阻力价:HHV(HIGH,34),COLORFF9900,DOTLINE,LINETHICK2;}

     A0:=(L+H+C*2)/4;
     AA:=EMA(A0,14)COLORYELLOW,LINETHICK1;
     BB:=EMA(A0,25)COLORYELLOW,LINETHICK2;
     A1X:=(AA-REF(AA,1))/REF(AA,1)*100;
     A2X:=(BB-REF(BB,1))/REF(BB,1)*100;
     G:=BARSLAST(CROSS(A1X,0));
     CC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORBLUE;
    必卖止损价位:REF(A0,G),COLORFFFFFF,LINETHICK3;

     DRAWKLINE(H,O,L,C);
     ZKP:=IF(C>REF(C,1),REF(C,1),DRAWNULL);
     ZSP:=IF(C>REF(C,1),C,DRAWNULL);
     DKP:=IF(C<=REF(C,1),REF(C,1),DRAWNULL);
     DSP:=IF(C<=REF(C,1),C,DRAWNULL);
     DRAWKLINE(H,DKP,L,DSP);
     STICKLINE(C<=REF(C,1),DKP,DSP,3.05,0),COLORBLUE;
     STICKLINE(C<=REF(C,1),DKP,DSP,2.2,0),COLORFF7700;
     STICKLINE(C<=REF(C,1),DKP,DSP,1.5,0),COLORFF9900;
     STICKLINE(C<=REF(C,1),DKP,DSP,0.5,0),COLORFFBB00;
     DRAWKLINE(H,ZKP,L,ZSP);
     STICKLINE(C>REF(C,1),ZKP,ZSP,3.05,0),COLOR000099;
     STICKLINE(C>REF(C,1),ZKP,ZSP,2.2,0),COLOR0000CC;
     STICKLINE(C>REF(C,1),ZKP,ZSP,1.5,0),COLOR0000FF;
     STICKLINE(C>REF(C,1),ZKP,ZSP,0.5,0),COLORCC66FF;
     STICKLINE(V/REF(V,1)>2 AND CLOSE>=OPEN,ZKP,ZSP,1,0),COLORYELLOW;

     TY:=C;
     A1:=REF(TY,10)=HHV(TY,2*10+1);
     B1:=FILTER(A1,10);
     C1:=BACKSET(B1,10+1);
     HD:=FILTER(C1,10);
     A2:=REF(TY,10)=LLV(TY,2*10+1);
     B2:=FILTER(A2,10);
     C2:=BACKSET(B2,10+1);
     LD:=FILTER(C2,10);
    前期高位:REF(C,BARSLAST(HD)),COLOR8000FF,POINTDOT;
     STICKLINE(C,前期高位,前期高位,8,0),COLOR8000FF;

     JRH:=HHV(C,2);    
     JRL:=LLV(C,2);    
     VAR01:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));    
     VAR02:=(REF(VAR01,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR03:=(REF(VAR02,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR04:=(REF(VAR03,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR05:=(REF(VAR04,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR06:=(REF(VAR05,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR07:=(REF(VAR06,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR08:=(REF(VAR07,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR09:=(REF(VAR08,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VARA:=(REF(VAR09,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VARD:=(CLOSE  VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR010:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR011:=(REF(VAR010,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR012:=(REF(VAR011,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR013:=(REF(VAR012,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR014:=(REF(VAR013,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR015:=(REF(VAR014,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR016:=(REF(VAR015,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR017:=(REF(VAR016,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));    
     VAR018:=(REF(VAR017,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));    
     VAR019:=((REF(VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018,1)) AND VAR01);    
     VAR1A:=((REF(VAR01 OR VAR02 OR VAR03 OR VAR04 OR VAR05 OR VAR06 OR VAR07 OR VAR08 OR VAR09 OR VARA OR VARB OR VARC,1)) AND VARD);    
    红色持股:=VAR01 OR VAR02 OR VAR03 OR VAR04 OR VAR05 OR VAR06 OR VAR07 OR VAR08 OR VAR09 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW;
    离场:=IF(红色持股,JRL,DRAWNULL);    
    明离场价:=离场,COLORFF99FF,NODRAW;
    青色观望:=VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018,COLORFFFF00,NODRAW;    
    进:=IF(青色观望,JRH,DRAWNULL);
    今离场价:REF(离场,1),COLOR0000FF,NODRAW;    
    明进场价:进,COLOR33AACC,NODRAW;    
    今进场价:REF(明进场价,1),COLORGREEN,NODRAW;

     DRAWTEXT_FIX(1,0.00,0,0,'所属行业:')COLOR00FFFF;
     DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR00FFFF;
     DRAWTEXT_FIX(1,0.14,0,0,'所属地区:')COLOR00FFFF;
     DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK)COLOR00FFFF;
     DRAWTEXT_FIX(1,0.00,0.10,0,'莸利比例:'),COLORYELLOW;
     DRAWNUMBER_FIX(1,0.06,0.10,0,CONST(WINNER(C )*100)),COLOR0080FF;
     DRAWTEXT_FIX(1,0.12,0.10,0,'动态PE:'),COLORYELLOW;
     DRAWNUMBER_FIX(1,0.17,0.10,0,CONST(DYNAINFO(39))),COLOR0080FF;
     DRAWTEXT_FIX(1,0.22,0.10,0,'市值:'),COLORYELLOW;
     DRAWNUMBER_FIX(1,0.26,0.10,0,FINANCE(40)/100000000),COLOR0080FF;
     DRAWTEXT_FIX  (1,0.31,0.10,0,'公积金(股):'),COLORYELLOW;
     DRAWNUMBER_FIX(1,0.38,0.10,0,FINANCE(18)),COLOR0080FF;
     DRAWTEXT_FIX  (1,0.43,0.10,0,'收益:'),COLORYELLOW;
     DRAWNUMBER_FIX(1,0.47,0.10,0,FINANCE(33)),COLOR0080FF;

    主力买力度:=LARGEINTRDVOL*1000/VOL;
    主力卖力度:=LARGEOUTTRDVOL*1000/VOL;

     AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW;
     DRAWRECTREL(0,215,CONST(ABS(主力买力度)*560/AAD),268,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0)));
     DRAWRECTREL(0,270,CONST(ABS(主力卖力度)*560/AAD),323,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0)));
     DRAWTEXT_FIX(1,0,0.224,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORYELLOW;
     DRAWTEXT_FIX(1,0,0.276,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORYELLOW;
    超B:=L2_AMO(0,2)/10000.0;
    大B:=L2_AMO(1,2)/10000.0;
    中B:=L2_AMO(2,2)/10000.0;
    小B:=L2_AMO(3,2)/10000.0;
    超S:=L2_AMO(0,3)/10000.0;
    大S:=L2_AMO(1,3)/10000.0;
    中S:=L2_AMO(2,3)/10000.0;
    小S:=L2_AMO(3,3)/10000.0;
    净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORRED,NODRAW;

     {总额:=AMOUNT;
    买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
    买%:=买/AMOUNT*100;
    流入:=AMOUNT*买%/10000000000;
    流出:=AMOUNT/100000000-流入;
    净流入:=(流入-流出);}
    DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
     DEA:=EMA(DIF,9);
     MACD:=(DIF-DEA)*2;
     VAR113:=HHV(HIGH,60);
     VAR114:=LLV(LOW,30);
     VAR115:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
     VAR116:=(VAR113+VAR114+VAR115)/3;
     VAR117:=EMA(VAR116,5);
     K01:=EMA(VAR117,5)*2, COLORFF00FF;
     D01:=EMA(K01,5),  COLORWHITE;
     J01:=K01*3-D01*2, COLORYELLOW;
     ENTERLONG:=CROSS(K01,D01);
     EXITLONG:=CROSS(D01,K01);
     B01:=(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)),L*0.98,1))*D01*2/3;
     B02:=IF(TROUGHBARS(3,15,1)=1 AND HIGH>LOW+0.01,20,0);
    必买:=(B01 AND B02) AND 净流入>0; 
    必卖:=IF(PEAKBARS(3,15,1)=1,80,100),COLORGREEN,LINETHICK1;
     QQ:=必卖=80;
     B03:=((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)));
     V1:=EMA(CLOSE,60)-EMA(CLOSE,300);
     V2:=EMA(V1,300);
     V3:=(CLOSE-(LOW,8))/((HIGH,8)-LLV(LOW,8))*100;
     V4:=SMA(V3,2,1),NODRAW;
     V5:=SMA(V4,2,1),NODRAW;
     V6:=CLOSE/REF(CLOSE,3)>=1.1;
     V7:=BACKSET(V6,3);
    大涨:=(V7 AND COUNT(V7,3)=1);
     DRAWICON(必买,L-0.16,11);
     DRAWICON(大涨 AND 必买,L-0.16,9);
     DRAWICON(大涨,L-0.18,1);
     DRAWICON(QQ,H+0.1,6);
     M1:=30;
     P2:=80;
     VAR101:=(C+H+O+L)/4;
    买入:=XMA(VAR101,M1)*(1-P2/1000),COLORFFFFFF,LINETHICK2;
    反弹:=EMA(EMA(EMA(HIGH,5),5),5)*0.95,COLORRED,LINETHICK1;
    暴:=CROSS(买入,反弹);
    DRAWTEXT(暴>0,L*0.99,'↖起暴'),COLORYELLOW;
     TYP:=(HIGH+LOW+CLOSE)/3;
     CI15:=(TYP-MA(TYP,15))/(0.015*AVEDEV(TYP,15));
     CI10:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
     CI5:=(TYP-MA(TYP,5))/(0.015*AVEDEV(TYP,5));
     CI3:=(TYP-MA(TYP,3))/(0.015*AVEDEV(TYP,3));
     EMAH3:=EMA(H,3);
     EMAL3:=EMA(L,3);
     EMAH5:=EMA(H,5);
     EMAL5:=EMA(L,5);
     EMAL10:=EMA(L,10);
     EMAZ:=(EMAH3+EMAH5+EMAL3+EMAL5)/4;
     EMA3:=(EMAH3-EMAL3)/8+EMAL3;
     PBX1:=(EXPMA((C+H+L)/3,4)+MA((C+H+L)/3,4*2)+MA((C+H+L)/3,4*4))/3;
     PBX2:=(EXPMA((C+H+L)/3,6)+MA((C+H+L)/3,6*2)+MA((C+H+L)/3,6*4))/3;
    冠军1号短线王:=PBX1>PBX2 AND CI15>0 AND CI10>0 AND EMAH3>EMAH5 AND EMAL3>EMAL5 AND EMAL5>EMAL10 AND O 冠军1号:冠军1号短线王=1;
     DRAWTEXT(冠军1号,L*0.99,'↖冠军1号'),COLORYELLOW;


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 通达信实用汽枪主图源码 加入收藏