整合到通达信用《手机同花顺LV2多空主图》加神奇九转+行业信息手机电脑通用 【技术指标】

admin

指标评测步骤：程序评测，大数据回测，每日跟踪，实盘验证。

     因为自己分析和看盘选股都是用通达信，而交易用的却是手机同花顺，看同花顺的Level-2的主图显示多空这个功能多少有些参考助益，把这个和神奇九转一并整到通达信里面。改后在电脑版通达信的显示近乎和同花顺的一模一样，不过呢，由于通达信手机版没有那个“多”“空”图标，手机版只能将就改为上下箭头代表多空。

DIY了以下信息
1、叠加了行业信息。
2、叠加了均线
3、叠加了九转信息
4、叠加了同花顺多空信息
5、叠加了自用尾盘打分
          有喜欢的下面复制粘贴，注意均线设置，我还是到出个TN6文件给朋友们吧，文尾自取。

电脑版效果见下：        

         

         

         

手机版效果：右边为手机同花顺，左边为手机通达信

源码：注意参数设置  ，与系统MA均线设置一样，建议在均线上进行修改。      

         

         

MA5:MA(CLOSE,M1),COLORWHITE;

MA10:MA(CLOSE,M2),COLORYELLOW;

MA20:MA(CLOSE,M3),COLORFF00FF;

MA60:MA(CLOSE,M4),COLORGREEN;

MA120:MA(CLOSE,M5),COLORGRAY;

MA250:MA(CLOSE,M6),COLORBLUE;

N1:=5;

N4:=34;

CQ:=100*(C-LLV(L,N4))/(HHV(C,N4)-LLV(L,N4));

SAT:=(AMOUNT/C)/(HHV(AMOUNT,N4)/HHV(C,N4));

饱和度:=IF(SAT>1,1,SAT)*100;

W1:=C=HHV(C,20);

W2:=BARSLAST(W1);

W3:=IF(W2>0,REF(C,W2),REF(C,W2));

W4:=CROSS(C,REF(W3,1));

KAAA:=饱和度>=97 AND CQ>90;

KBBB:=W4 AND COUNT(W4,5)=1;

AA:=CLOSE/REF(CLOSE,1)>=1.09;

STICKLINE(AA,OPEN,CLOSE,2,0),COLORYELLOW;

STICKLINE(KBBB,OPEN,CLOSE,2,0),COLORFF00FF;

         

{多空主图}

DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);

VAR1:=(100-((90 * (HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));

VAR2:=(100-MA(((100*(HHV(HIGH,6)-CLOSE))/(HHV(HIGH,6)-LLV(LOW,6))),34));

DRAWICON(CROSS(VAR1,MA(VAR2,6)),LOW*0.998,1);

DRAWICON(CROSS(MA(VAR2,6),VAR1),HIGH*1.008,2);

         

{VAR3:=((CLOSE*2+HIGH+LOW)/4-REF(EMA(EMA(CLOSE,9),9),1))/REF(EMA(EMA(CLOSE,9),9),1)*30;

VAR4:=EXIST(CROSS(VAR1,MA(VAR2,6)),3) AND CROSS(VAR3,0);

DRAWICON(VAR4,L*0.945,1);}

         

N:=CURRBARSCOUNT;

B:=C     <REF(C,4);< span>     </REF(C,4);<>

DRAWNUMBER(N=6 AND REFXV(COUNT(B,6),5)=6 AND REF(B,1)

=0,L*0.975,1),COLORMAGENTA;

DRAWNUMBER(N=7 AND REFXV(COUNT(B,7),6)=7 AND REF(B,1)

=0,L*0.975,1),COLORMAGENTA;

DRAWNUMBER(N=8 AND REFXV(COUNT(B,8),7)=8 AND REF(B,1)

=0,L*0.975,1),COLORMAGENTA;

DRAWNUMBER(N>=9 AND REFXV(COUNT(B,9),8)=9 AND REF(B,1)

=0,L*0.975,1),COLORMAGENTA;

DRAWNUMBER(N=5 AND REFXV(COUNT(B,5),4)=5 AND COUNT(B,2)=2 AND

REF(B,1)=0,L*0.975,2),COLORMAGENTA;

DRAWNUMBER(N=6 AND REFXV(COUNT(B,6),5)=6 AND COUNT(B,2)=2 AND

REF(B,1)=0,L*0.975,2),COLORMAGENTA;

DRAWNUMBER(N=7 AND REFXV(COUNT(B,7),6)=7 AND COUNT(B,2)=2 AND

REF(B,1)=0,L*0.975,2),COLORMAGENTA;

DRAWNUMBER(N>=8 AND REFXV(COUNT(B,8),7)=8 AND COUNT(B,2)=2 AND

REF(B,2)=0,L*0.975,2),COLORMAGENTA;

DRAWNUMBER(N=4 AND REFXV(COUNT(B,4),3)=4 AND COUNT(B,3)=3 AND

REF(B,3)=0,L*0.975,3),COLORMAGENTA;

DRAWNUMBER(N=5 AND REFXV(COUNT(B,5),4)=5 AND COUNT(B,3)=3 AND

REF(B,3)=0,L*0.975,3),COLORMAGENTA;

DRAWNUMBER(N=6 AND REFXV(COUNT(B,6),5)=6 AND COUNT(B,3)=3 AND

REF(B,3)=0,L*0.975,3),COLORMAGENTA;

DRAWNUMBER(N>=7 AND REFXV(COUNT(B,7),6)=7 AND COUNT(B,3)=3 AND

REF(B,3)=0,L*0.975,3),COLORMAGENTA;

DRAWNUMBER(N=3 AND REFXV(COUNT(B,3),2)=3 AND COUNT(B,4)=4 AND

REF(B,4)=0,L*0.975,4),COLORMAGENTA;

DRAWNUMBER(N=4 AND REFXV(COUNT(B,4),3)=4 AND COUNT(B,4)=4 AND

REF(B,4)=0,L*0.975,4),COLORMAGENTA;

DRAWNUMBER(N=5 AND REFXV(COUNT(B,5),4)=5 AND COUNT(B,4)=4 AND

REF(B,4)=0,L*0.975,4),COLORMAGENTA;

DRAWNUMBER(N>=6 AND REFXV(COUNT(B,6),5)=6 AND COUNT(B,4)=4 AND

REF(B,4)=0,L*0.975,4),COLORMAGENTA;

DRAWNUMBER(N=2 AND REFXV(COUNT(B,2),1)=2 AND COUNT(B,5)=5 AND

REF(B,5)=0,L*0.975,5),COLORMAGENTA;

DRAWNUMBER(N=3 AND REFXV(COUNT(B,3),2)=3 AND COUNT(B,5)=5 AND

REF(B,5)=0,L*0.975,5),COLORMAGENTA;

DRAWNUMBER(N=4 AND REFXV(COUNT(B,4),3)=4 AND COUNT(B,5)=5 AND

REF(B,5)=0,L*0.975,5),COLORMAGENTA;

DRAWNUMBER(N>=5 AND REFXV(COUNT(B,5),4)=5 AND COUNT(B,5)=5 AND

REF(B,5)=0,L*0.975,5),COLORMAGENTA;

DRAWNUMBER(N=1 AND COUNT(B,6)=6 AND REF(B,6)=0,L*0.975,6),COLORMAGENTA;

DRAWNUMBER(N=2 AND REFXV(COUNT(B,2),1)=2 AND COUNT(B,6)=6 AND

REF(B,6)=0,L*0.975,6),COLORMAGENTA;

DRAWNUMBER(N=3 AND REFXV(COUNT(B,3),2)=3 AND COUNT(B,6)=6 AND

REF(B,6)=0,L*0.975,6),COLORMAGENTA;

DRAWNUMBER(N>=4 AND REFXV(COUNT(B,4),3)=4 AND COUNT(B,6)=6 AND

REF(B,6)=0,L*0.975,6),COLORMAGENTA;

DRAWNUMBER(N=1 AND COUNT(B,7)=7 AND REF(B,7)=0,L*0.975,7),COLORMAGENTA;

DRAWNUMBER(N=2 AND REFXV(COUNT(B,3),1)=3 AND COUNT(B,7)=7 AND

REF(B,7)=0,L*0.975,7),COLORMAGENTA;

DRAWNUMBER(N>=3 AND REFXV(COUNT(B,3),2)=3 AND COUNT(B,7)=7 AND

REF(B,7)=0,L*0.975,7),COLORMAGENTA;

DRAWNUMBER(N=2 AND COUNT(B,8)=8 AND REF(B,8)=0,L*0.975,8),COLORMAGENTA;

DRAWNUMBER(N>=2 AND REFXV(COUNT(B,2),1)=2 AND COUNT(B,8)=8 AND

REF(B,8)=0,L*0.975,8),COLORMAGENTA;

DRAWNUMBER(N>=1 AND COUNT(B,9)=9 AND REF(B,9)=0,L*0.975,9),COLORGREEN;

S:=C>REF(C,4);

DRAWNUMBER(N=6 AND REFXV(COUNT(S,6),5)=6 AND REF(S,1)

=0,H*1.025,1),COLORMAGENTA;

DRAWNUMBER(N=7 AND REFXV(COUNT(S,7),6)=7 AND REF(S,1)

=0,H*1.025,1),COLORMAGENTA;

DRAWNUMBER(N=8 AND REFXV(COUNT(S,8),7)=8 AND REF(S,1)

=0,H*1.025,1),COLORMAGENTA;

DRAWNUMBER(N>=9 AND REFXV(COUNT(S,9),8)=9 AND REF(S,1)

=0,H*1.025,1),COLORMAGENTA;

DRAWNUMBER(N=5 AND REFXV(COUNT(S,5),4)=5 AND COUNT(S,2)=2 AND

REF(S,1)=0,H*1.025,2),COLORMAGENTA;

DRAWNUMBER(N=6 AND REFXV(COUNT(S,6),5)=6 AND COUNT(S,2)=2 AND

REF(S,1)=0,H*1.025,2),COLORMAGENTA;

DRAWNUMBER(N=7 AND REFXV(COUNT(S,7),6)=7 AND COUNT(S,2)=2 AND

REF(S,1)=0,H*1.025,2),COLORMAGENTA;

DRAWNUMBER(N>=8 AND REFXV(COUNT(S,8),7)=8 AND COUNT(S,2)=2 AND

REF(S,2)=0,H*1.025,2),COLORMAGENTA;

DRAWNUMBER(N=4 AND REFXV(COUNT(S,4),3)=4 AND COUNT(S,3)=3 AND

REF(S,3)=0,H*1.025,3),COLORMAGENTA;

DRAWNUMBER(N=5 AND REFXV(COUNT(S,5),4)=5 AND COUNT(S,3)=3 AND

REF(S,3)=0,H*1.025,3),COLORMAGENTA;

DRAWNUMBER(N=6 AND REFXV(COUNT(S,6),5)=6 AND COUNT(S,3)=3 AND

REF(S,3)=0,H*1.025,3),COLORMAGENTA;

DRAWNUMBER(N>=7 AND REFXV(COUNT(S,7),6)=7 AND COUNT(S,3)=3 AND

REF(S,3)=0,H*1.025,3),COLORMAGENTA;

DRAWNUMBER(N=3 AND REFXV(COUNT(S,3),2)=3 AND COUNT(S,4)=4 AND

REF(S,4)=0,H*1.025,4),COLORMAGENTA;

DRAWNUMBER(N=4 AND REFXV(COUNT(S,4),3)=4 AND COUNT(S,4)=4 AND

REF(S,4)=0,H*1.025,4),COLORMAGENTA;

DRAWNUMBER(N=5 AND REFXV(COUNT(S,5),4)=5 AND COUNT(S,4)=4 AND

REF(S,4)=0,H*1.025,4),COLORMAGENTA;

DRAWNUMBER(N>=6 AND REFXV(COUNT(S,6),5)=6 AND COUNT(S,4)=4 AND

REF(S,4)=0,H*1.025,4),COLORMAGENTA;

DRAWNUMBER(N=2 AND REFXV(COUNT(S,2),1)=2 AND COUNT(S,5)=5 AND

REF(S,5)=0,H*1.025,5),COLORMAGENTA;

DRAWNUMBER(N=3 AND REFXV(COUNT(S,3),2)=3 AND COUNT(S,5)=5 AND

REF(S,5)=0,H*1.025,5),COLORMAGENTA;

DRAWNUMBER(N=4 AND REFXV(COUNT(S,4),3)=4 AND COUNT(S,5)=5 AND

REF(S,5)=0,H*1.025,5),COLORMAGENTA;

DRAWNUMBER(N>=5 AND REFXV(COUNT(S,5),4)=5 AND COUNT(S,5)=5 AND

REF(S,5)=0,H*1.025,5),COLORMAGENTA;

DRAWNUMBER(N=1 AND COUNT(S,6)=6 AND REF(S,6)

=0,H*1.025,6),COLORMAGENTA;

DRAWNUMBER(N=2 AND REFXV(COUNT(S,2),1)=2 AND COUNT(S,6)=6 AND

REF(S,6)=0,H*1.025,6),COLORMAGENTA;

DRAWNUMBER(N=3 AND REFXV(COUNT(S,3),2)=3 AND COUNT(S,6)=6 AND

REF(S,6)=0,H*1.025,6),COLORMAGENTA;

DRAWNUMBER(N>=4 AND REFXV(COUNT(S,4),3)=4 AND COUNT(S,6)=6 AND

REF(S,6)=0,H*1.025,6),COLORMAGENTA;

DRAWNUMBER(N=1 AND COUNT(S,7)=7 AND REF(S,7)

=0,H*1.025,7),COLORMAGENTA;

DRAWNUMBER(N=2 AND REFXV(COUNT(S,3),1)=3 AND COUNT(S,7)=7 AND

REF(S,7)=0,H*1.025,7),COLORMAGENTA;

DRAWNUMBER(N>=3 AND REFXV(COUNT(S,3),2)=3 AND COUNT(S,7)=7 AND

REF(S,7)=0,H*1.025,7),COLORMAGENTA;

DRAWNUMBER(N=2 AND COUNT(S,8)=8 AND REF(S,8)

=0,H*1.025,8),COLORMAGENTA;

DRAWNUMBER(N>=2 AND REFXV(COUNT(S,2),1)=2 AND COUNT(S,8)=8 AND

REF(S,8)=0,H*1.025,8),COLORMAGENTA;

DRAWNUMBER(N>=1 AND COUNT(S,9)=9 AND REF(S,9)

=0,H*1.025,9),COLORYELLOW;

         

{尾盘预警打分}

X_1:=MA(CLOSE,5);

X_2:=MA(CLOSE,10);

X_3:=MA(CLOSE,20);

         

尾盘预警打分X_1-X_2)/X_2*500+(X_2-X_3)/X_3*300+IF(LOW     

<X_2,(-100),0),NODRAW;< span>     </X_2,(-100),0),NODRAW;<>

         

         

{信息}

概念STR:=STRCAT(STRCAT(DYBLOCK,'--'),GNBLOCK);

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.05,0,STRCAT('所属概念:',概念STR)),COLOR00FFFF;

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.12,0,STRCAT('所属风格:',FGBLOCK)),COLOR00FFFF;

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.19,0,STRCAT('所属行业:',HYBLOCK)),COLOR00FFFF;

         

成交额STR:=STRCAT(VAR2STR(AMOUNT/100000000,2),'亿元');

         

换手率STR:=STRCAT(VAR2STR(DYNAINFO(37)*100,2),'%');

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.26,0,STRCAT('成交额:',成交额STR)),COLOR00FFFF;

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.33,0,STRCAT('换手率:',换手率STR)),COLOR00FFFF;

         

流通市值STR:=STRCAT(VAR2STR(FINANCE(40)/100000000,2),' 亿元');

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.4,0,STRCAT('流通市值:',流通市值STR)),COLOR00FFFF;

         

开盘金额:=DYNAINFO(15);

         

开盘金额STR:=STRCAT(CON2STR(开盘金额/10000,0),' 万元');

         

DRAWTEXT_FIX(ISLASTBAR,0.02,0.47,0,STRCAT('开盘金额:',开盘金额STR)),COLOR00FFFF;

         

         

{神奇九转}

         

A1:=C>REF(C,4);

         

NT:=BARSLASTCOUNT(A1);

         

TJ11:=NT=9;

         

TJ13:=ISLASTBAR AND BETWEEN(NT,1,8);

         

AY:=(BACKSET(TJ11>0,9) OR   BACKSET(TJ13>0,NT))*NT;

         

DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;

         

DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;

         

B1:=C     <REF(C,4);< span>     </REF(C,4);<>

         

NT0:=BARSLASTCOUNT(B1);

         

TJ21:=NT0=9 ;

         

TJ23:=ISLASTBAR AND BETWEEN(NT0,1,8);

         

AY1:=(BACKSET(TJ21>0,9)  OR  BACKSET(TJ23>0,NT0))*NT0;

         

DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;

         

         

公式太多，如嫌复制麻烦，或需要下载TN6格式一键安装，到下面位置下载。