通达信双线支撑压力多功能主图选股指标公式源码

通达信双线支撑压力多功能主图选股指标公式源码

源码正文：

现价线:DYNAINFO(7),DOTLINE,COLORBLUE{XG51};
DRAWTEXT_FIX(C>O,0.54,0.07,0,'瑾用指标'),COLORFF7F00{XG51};
N8:=stRCAT(CON2STR(YEAR,0),' 年 ');
Y8:=STRCAT(CON2STR(MONTH,0),' 月 ');
R8:=STRCAT(CON2STR(DAY,0),' 日 '){XG51};
R9:=STRCAT(CON2STR(WEEkdAY,0),' ');
SJ8:=STRCAT(STRCAT(N8,Y8), R8);
DRAWTEXT_FIX(C>0,0.4,0.07,0,SJ8),COLORCYAN{XG51};
DRAWTEXT_FIX(C>0,0.5,0.07,0,R9),COLORCYAN{XG51};
DRAWTEXT_FIX(C>0,0.48,0.07,0,'星期'),COLORCYAN{XG51};
P1:=10{XG51};
P2:=250{XG51};
maR1:=MA(CLOSE,P1){XG51};
C1:=C>=MAR1{XG51};
C2:=C<MAR1{XG51};
AA:=C1>=C2{XG51};
BB:=C2>C1{XG51};
MAA:MAR1,COLOR00FF00,LINETHICK2{XG51};
IF(MAA>=REF(MAA,1),MAA,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(MAA<REF(MAA,1),MAA,DRAWNULL),COLORFFFFFF,LINETHICK2{XG51};
MAB:MA(CLOSE,P2),COLOR00FF00,LINETHICK2{XG51};
IF(MAB>=REF(MAB,1),MAB,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(MAB<REF(MAB,1),MAB,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
VAR2:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1){XG51};
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4){XG51};
VAR6:=ema((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3{XG51};
VAR7:=EMA(0.667*REF(VAR6,1)+0.333* VAR6,2)*VAR3{XG51};
AAA:= MAA>=REF(MAA,1){XG51};
BBB:= MAA<REF(MAA,1){XG51};
DDD:=MAB>=REF(MAB,1){XG51};
EEE:=MAB<REF(MAB,1){XG51};
TT:=IF(ISLASTBAR,240/FROMOPEN,1){XG51};
NN:=120{XG51};
HH:=HHV(V*TT,NN){XG51};
LL:=LLV(V,NN){XG51};
最高:=CONST(HH){XG51};
最低:=CONST(LL){XG51};
最高2:=CONST(HHV(H,NN)){XG51};
最低2:=CONST(LLV(L,NN)){XG51};
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW{XG51};
RCC1:=最高2*0.9-(最高2-最低2)*PP{XG51};
最低3:=MIN(RCC1,最低2){XG51};
AA1:=最低3{XG51};
今日保护价:(REF(C,2)+REF(C,1)+O)/3,COLOR00FFFF,NODRAW{XG51};
顶点:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,HHV(H,BArslAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORWHITE,DOTLINE{XG51};
低点:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,LLV(L,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIMAGENTA,DOTLINE{XG51};
DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(C>0,0.01,0.004,0,DYBLOCK),COLOR00ddfF,LINETHICK2{XG51};
DRAWTEXT_FIX(C>0,0.06,0.004,0,HYBLOCK),COLOR2200FF,LINETHICK2{XG51};
DRAWTEXT_FIX(C>0,0.10,0.004,0,GNBLOCK),COLORFFCC00,LINETHICK2{XG51};
DRAWTEXT_FIX(1,0.38,0.004,0,FGBLOCK),COLORLIMAGENTA{XG51};
AAA1:=STRCAT('沪深总上涨数:',CON2STR(DYNAINFO(60),0)){XG51};
AAA2:=STRCAT('沪深总下跌数:',CON2STR(DYNAINFO(61),0)){XG51};
AAA3:=STRCAT('沪深总成交金额:',CON2STR(DYNAINFO(62)/100000000,0)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.06,0,AAA1),COLORWHITE{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.12,0,AAA2),COLORCYAN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.18,0,AAA3),COLORBLUE{XG51};
总股本:=STRCAT(STRCAT(' 总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿'){XG51};
流通盘:=STRCAT(STRCAT('      流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿'){XG51};
全流通:=STRCAT('      全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2)){XG51};
市值:=STRCAT(STRCAT('      流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿'){XG51};
股本市值:=STRCAT('  ',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,1.2,0,股本市值),COLORBLUE{XG51};
市盈率:=STRCAT('市盈率: ',CON2STR(DYNAINFO(39),2)){XG51};
市净率:=STRCAT('      市净率: ',CON2STR(C/FINANCE(34),2)){XG51};
每股收益:=STRCAT('     每股收益: ',CON2STR(FINANCE(38),2)){XG51};
股值:=STRCAT('  ',STRCAT(STRCAT(市盈率,市净率),每股收益)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.38,1.2,0,股值),COLORLIGREEN;    
净资收益率:=STRCAT('净资收益率: ',CON2STR(FINANCE(29)/FINANCE(19)*100,2)){XG51};
毛利率:=STRCAT('    毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)){XG51};
主营利润率:=STRCAT('    主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2)){XG51};
当前业绩:=STRCAT(' ',STRCAT(STRCAT(净资收益率,毛利率),主营利润率)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.62,1.2,0,当前业绩),COLORWHITE;    
上涨家数:INDEXADV,COLOR0080FF,NODRAW{XG51};
下跌家数:INDEXDEC,COLORCYAN,NODRAW{XG51};
当前获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW,COLOR0080FF{XG51};
涨停:DYNAINFO(3)*1.1,COLORWHITE,NODRAW{XG51};
跌停:DYNAINFO(3)*0.9,COLORCYAN,NODRAW{X-G_5_1-C-N-{};