股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[大智慧] 整合的自用天上人间主图 (源码、贴图)


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-21 17:21:06
整合的自用天上人间主图 (源码、贴图)介绍

整合的自用天上人间主图 (源码、贴图)

工作线:eMA(CLOSE,14),colorFF00FF,linethick3;
二号线:eMA(CLOSE,25),coloryellow,linethick3;三号线:eMA(CLOSE,99),linethick3,colorgreen;
四号线:eMA(CLOSE,144),colorblue,linethick3;生命线:eMA(CLOSE,453),coloryellow,linethick3;

hb:=cost(99.9);
lb:=cost(0.1);
b3:=(hb-lb)/50;
b31:=hb-b3;
b32:=hb-2*b3;
b33:=hb-3*b3;
b34:=hb-4*b3;
b35:=hb-5*b3;
b36:=hb-6*b3;
b37:=hb-7*b3;
b38:=hb-8*b3;
b39:=hb-9*b3;
b310:=hb-10*b3;
b311:=hb-11*b3;
b312:=hb-12*b3;
b313:=hb-13*b3;
b314:=hb-14*b3;
b315:=hb-15*b3;
b316:=hb-16*b3;
b317:=hb-17*b3;
b318:=hb-18*b3;
b319:=hb-19*b3;
b320:=hb-20*b3;
b321:=hb-21*b3;
b322:=hb-22*b3;
b323:=hb-23*b3;
b324:=hb-24*b3;
b325:=hb-25*b3;
b326:=hb-26*b3;
b327:=hb-27*b3;
b328:=hb-28*b3;
b329:=hb-29*b3;
b330:=hb-30*b3;
b331:=hb-31*b3;
b332:=hb-32*b3;
b333:=hb-33*b3;
b334:=hb-34*b3;
b335:=hb-35*b3;
b336:=hb-36*b3;
b337:=hb-37*b3;
b338:=hb-38*b3;
b339:=hb-39*b3;
b340:=hb-40*b3;
b341:=hb-41*b3;
b342:=hb-42*b3;
b343:=hb-43*b3;
b344:=hb-44*b3;
b345:=hb-45*b3;
b346:=hb-46*b3;
b347:=hb-47*b3;
b348:=hb-48*b3;
b349:=hb-49*b3;

a1:=winner(hb)*100-winner(b31)*100;
a2:=winner(b31)*100-winner(b32)*100;
a3:=winner(b32)*100-winner(b33)*100;
a4:=winner(b33)*100-winner(b34)*100;
a5:=winner(b34)*100-winner(b35)*100;
a6:=winner(b35)*100-winner(b36)*100;
a7:=winner(b36)*100-winner(b37)*100;
a8:=winner(b37)*100-winner(b38)*100;
a9:=winner(b38)*100-winner(b39)*100;
a10:=winner(b39)*100-winner(b310)*100;
a11:=winner(b310)*100-winner(b311)*100;
a12:=winner(b311)*100-winner(b312)*100;
a13:=winner(b312)*100-winner(b313)*100;
a14:=winner(b313)*100-winner(b314)*100;
a15:=winner(b314)*100-winner(b315)*100;
a16:=winner(b315)*100-winner(b316)*100;
a17:=winner(b316)*100-winner(b317)*100;
a18:=winner(b317)*100-winner(b318)*100;
a19:=winner(b318)*100-winner(b319)*100;
a20:=winner(b319)*100-winner(b320)*100;
a21:=winner(b320)*100-winner(b321)*100;
a22:=winner(b321)*100-winner(b322)*100;
a23:=winner(b322)*100-winner(b323)*100;
a24:=winner(b323)*100-winner(b324)*100;
a25:=winner(b324)*100-winner(b325)*100;
a26:=winner(b325)*100-winner(b326)*100;
a27:=winner(b326)*100-winner(b327)*100;
a28:=winner(b327)*100-winner(b328)*100;
a29:=winner(b328)*100-winner(b329)*100;
a30:=winner(b329)*100-winner(b330)*100;
a31:=winner(b330)*100-winner(b331)*100;
a32:=winner(b331)*100-winner(b332)*100;
a33:=winner(b332)*100-winner(b333)*100;
a34:=winner(b333)*100-winner(b334)*100;
a35:=winner(b334)*100-winner(b335)*100;
a36:=winner(b335)*100-winner(b336)*100;
a37:=winner(b336)*100-winner(b337)*100;
a38:=winner(b337)*100-winner(b338)*100;
a39:=winner(b338)*100-winner(b339)*100;
a40:=winner(b339)*100-winner(b340)*100;
a41:=winner(b340)*100-winner(b341)*100;
a42:=winner(b341)*100-winner(b342)*100;
a43:=winner(b342)*100-winner(b343)*100;
a44:=winner(b343)*100-winner(b344)*100;
a45:=winner(b344)*100-winner(b345)*100;
a46:=winner(b345)*100-winner(b346)*100;
a47:=winner(b346)*100-winner(b347)*100;
a48:=winner(b347)*100-winner(b348)*100;
a49:=winner(b348)*100-winner(b349)*100;
a50:=winner(b349)*100-winner(lb)*100;
STICKLINE( DISPSTATUS=2,hb ,hb ,a1*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b31 ,b31 ,a1*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b32 ,b32 ,a2*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b33 ,b33 ,a3*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b34 ,b34 ,a4*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b35 ,b35 ,a5*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b36 ,b36 ,a6*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b37 ,b37 ,a7*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b38 ,b38 ,a8*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b39 ,b39 ,a9*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b310 ,b310 ,a10*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b311 ,b311 ,a11*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b312 ,b312 ,a12*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b313 ,b313 ,a13*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b314 ,b314 ,a14*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b315 ,b315 ,a15*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b316 ,b316 ,a16*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b317 ,b317 ,a17*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b318 ,b318 ,a18*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b319 ,b319 ,a19*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b320 ,b320 ,a20*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b321 ,b321 ,a21*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b322 ,b322 ,a22*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b323 ,b323 ,a23*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b324 ,b324 ,a24*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b325 ,b325 ,a25*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b326 ,b326 ,a26*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b327 ,b327 ,a27*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b328 ,b328 ,a28*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b329 ,b329 ,a29*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b330 ,b330 ,a30*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b331 ,b331 ,a31*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b332 ,b332 ,a32*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b333 ,b333 ,a33*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b334 ,b334 ,a34*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b335 ,b335 ,a35*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b336 ,b336 ,a36*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b337 ,b337 ,a37*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b338 ,b338 ,a38*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b339 ,b339 ,a39*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b340 ,b340 ,a40*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b341 ,b341 ,a41*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b342 ,b342 ,a42*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b343 ,b343 ,a43*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b344 ,b344 ,a44*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b345 ,b345 ,a45*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b346 ,b346 ,a46*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b347 ,b347 ,a47*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b348 ,b348 ,a48*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,b349 ,b349 ,a49*50 ,0 ),LAYER7,COLORGRAY;
STICKLINE( DISPSTATUS=2,lb ,lb ,a50*50 ,0 ),LAYER7,COLORGRAY;


STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;

DRAWTEXTABS(2,5,'所属板块:'+BKNAME),COLORFF50FF,linethick1;
流通盘:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(2,20,'流通盘:'+NUMTOSTRN(流通盘,2)+'亿'),LINETHICK1,COLORRED;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);

利润增长:=FINANCE2(10);
DRAWTEXTABS(2,35,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLORyellow;
DRAWTEXTABS(2,50,'利润增长:'+NUMTOSTRN(利润增长,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(2,65,'每股市盈率:'+NUMTOSTRN(每股市盈率,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(2,80,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLORyellow;
DRAWTEXTABS(3,95,'历史高价:'+HHV(HIGH,0)),Colorred;
 


 




 



gd14742

回复

举报

QQ|

GMT+8, 2024-11-16 12:22

快速回复 返回顶部 返回列表