您现在的位置:程序化交易>> 股票公式>> 大智慧>> 大智慧公式>>正文内容

板块涨幅行业涨幅公式指标源码[大智慧公式]

相关标签:量子通信概念股龙头 、 通信股票有哪些 、 量子通信概念股一览表 、 通信设备板块 、 5g通信板块 、 通讯板块股票 、 通讯行业股票 、 通信达行业涨幅 、 基建股票有哪些 、 通信股票龙头股 、 以上指标公式 、 通达信精品指标公式 、

 

 

 

原理解析:


 

 来源:程序化99( WWW.CXH99.COM )

源码:

引用公式源码  公式名为涨幅引用

A:DYNAINFO(14);

 

指标源码:

INPUT:N(12,0,50,1);
X1:=5 ; X2:=155; X3:=305; X4:=455; X5:=605; X6:=1000; Y1:=0; Y2:=Y1+N; Y3:=Y2+N; Y4:=Y3+N; Y5:=Y4+N; Y6:=Y5+N; Y7:=Y6+N; Y8:=Y7+N; Y9:=Y8+N; Y10:=Y9+N;
IF STKINDI('1A0001','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(30,0,'上证指数:' +NUMTOSTRN(STKINDI('1A0001','涨幅引用.A')*100,2)+'%'),COLOR7711EE;END;
IF STKINDI('1A0001','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(30,0,'上证指数:' +NUMTOSTRN(STKINDI('1A0001','涨幅引用.A')*100,2)+'%'),COLORB48C33;END;
{IF STKINDI('993124','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(78,0,'深证:' +NUMTOSTRN(STKINDI('993124','涨幅引用.A')*100,2)+'%'),COLOR7711EE;END;
IF STKINDI('993124','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(78,0,'深证:' +NUMTOSTRN(STKINDI('993124','涨幅引用.A')*100,2)+'%'),COLORB48C33;END;}
IF STKINDI('991036','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y2,'991036 券 商:' +NUMTOSTRN(STKINDI('991036','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991036','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y2,'991036 券 商:' +NUMTOSTRN(STKINDI('991036','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991017','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y3,'991017 银 行 类:' +NUMTOSTRN(STKINDI('991017','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991017','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y3,'991017 银 行 类:' +NUMTOSTRN(STKINDI('991017','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991028','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y4,'991028 医 药:' +NUMTOSTRN(STKINDI('991028','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991028','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y4,'991028 医 药:' +NUMTOSTRN(STKINDI('991028','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991007','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y5,'991007 房 地 产:' +NUMTOSTRN(STKINDI('991007','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991007','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y5,'991007 房 地 产:' +NUMTOSTRN(STKINDI('991007','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991024','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y6,'991024 建 材:' +NUMTOSTRN(STKINDI('991024','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991024','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y6,'991024 建 材:' +NUMTOSTRN(STKINDI('991024','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991021','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y7,'991021 农林牧渔:' +NUMTOSTRN(STKINDI('991021','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991021','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y7,'991021 农林牧渔:' +NUMTOSTRN(STKINDI('991021','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993128','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y8,'993128 农业龙头:' +NUMTOSTRN(STKINDI('993128','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993128','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y8,'993128 农业龙头:' +NUMTOSTRN(STKINDI('993128','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993795','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y3,'993795 中 字 头:' +NUMTOSTRN(STKINDI('993795','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993795','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y3,'993795 中 字 头:' +NUMTOSTRN(STKINDI('993795','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991018','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y1,'991018 旅游酒店:' +NUMTOSTRN(STKINDI('991018','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991018','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y1,'991018 旅游酒店:' +NUMTOSTRN(STKINDI('991018','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991023','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y2,'991023 商业连锁:' +NUMTOSTRN(STKINDI('991023','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991023','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y2,'991023 商业连锁:' +NUMTOSTRN(STKINDI('991023','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991020','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y3,'991020 酿酒食品:' +NUMTOSTRN(STKINDI('991020','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991020','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y3,'991020 酿酒食品:' +NUMTOSTRN(STKINDI('991020','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991008','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y4,'991008 纺织服装:' +NUMTOSTRN(STKINDI('991008','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991008','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y4,'991008 纺织服装:' +NUMTOSTRN(STKINDI('991008','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991006','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y5,'991006 电子信息:' +NUMTOSTRN(STKINDI('991006','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991006','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y5,'991006 电子信息:' +NUMTOSTRN(STKINDI('991006','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991004','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y6,'991004 计 算 机:' +NUMTOSTRN(STKINDI('991004','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991004','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y6,'991004 计 算 机:' +NUMTOSTRN(STKINDI('991004','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991026','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y7,'991026 汽 车 类:' +NUMTOSTRN(STKINDI('991026','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991026','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y7,'991026 汽 车 类:' +NUMTOSTRN(STKINDI('991026','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991014','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y8,'991014 电 器:' +NUMTOSTRN(STKINDI('991014','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991014','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y8,'991014 电 器:' +NUMTOSTRN(STKINDI('991014','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993745','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y1,'993745 稀缺资源:' +NUMTOSTRN(STKINDI('993745','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993745','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y1,'993745 稀缺资源:' +NUMTOSTRN(STKINDI('993745','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991019','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y2,'991019 煤炭石油:' +NUMTOSTRN(STKINDI('991019','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991019','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y2,'991019 煤炭石油:' +NUMTOSTRN(STKINDI('991019','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991009','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y3,'991009 钢 铁:' +NUMTOSTRN(STKINDI('991009','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991009','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y3,'991009 钢 铁:' +NUMTOSTRN(STKINDI('991009','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991034','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y4,'991034 有色金属:' +NUMTOSTRN(STKINDI('991034','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991034','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y4,'991034 有色金属:' +NUMTOSTRN(STKINDI('991034','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991027','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y5,'991027 机 械:' +NUMTOSTRN(STKINDI('991027','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991027','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y5,'991027 机 械:' +NUMTOSTRN(STKINDI('991027','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991011','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y6,'991011 化工化纤:' +NUMTOSTRN(STKINDI('991011','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991011','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y6,'991011 化工化纤:' +NUMTOSTRN(STKINDI('991011','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991003','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y7,'991003 电 力:' +NUMTOSTRN(STKINDI('991003','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991003','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y7,'991003 电 力:' +NUMTOSTRN(STKINDI('991003','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991037','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y8,'991037 电力设备:' +NUMTOSTRN(STKINDI('991037','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991037','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y8,'991037 电力设备:' +NUMTOSTRN(STKINDI('991037','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991032','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y1,'991032 教育传媒:' +NUMTOSTRN(STKINDI('991032','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991032','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y1,'991032 教育传媒:' +NUMTOSTRN(STKINDI('991032','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991010','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y2,'991010 供水供气:' +NUMTOSTRN(STKINDI('991010','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991010','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y2,'991010 供水供气:' +NUMTOSTRN(STKINDI('991010','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991033','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y3,'991033 仪电仪表:' +NUMTOSTRN(STKINDI('991033','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991033','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y3,'991033 仪电仪表:' +NUMTOSTRN(STKINDI('991033','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991136','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y4,'991136 运输物流:' +NUMTOSTRN(STKINDI('991136','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991136','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y4,'991136 运输物流:' +NUMTOSTRN(STKINDI('991136','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991016','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y5,'991016 交通设施:' +NUMTOSTRN(STKINDI('991016','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991016','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y5,'991016 交通设施:' +NUMTOSTRN(STKINDI('991016','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991031','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y6,'991031 外 贸:' +NUMTOSTRN(STKINDI('991031','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991031','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y6,'991031 外 贸:' +NUMTOSTRN(STKINDI('991031','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991002','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y7,'991002 工程建筑:' +NUMTOSTRN(STKINDI('991002','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991002','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y7,'991002 工程建筑:' +NUMTOSTRN(STKINDI('991002','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993695','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y8,'993695 创 投:' +NUMTOSTRN(STKINDI('993695','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993695','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y8,'993695 创 投:' +NUMTOSTRN(STKINDI('993695','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993685','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y1,'993685 3 G:' +NUMTOSTRN(STKINDI('993685','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993685','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y1,'993685 3 G:' +NUMTOSTRN(STKINDI('993685','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991135','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y2,'991135 通 信:' +NUMTOSTRN(STKINDI('991135','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991135','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y2,'991135 通 信:' +NUMTOSTRN(STKINDI('991135','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993585','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y4,'993585 新 能 源:' +NUMTOSTRN(STKINDI('993585','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993585','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y4,'993585 新 能 源:' +NUMTOSTRN(STKINDI('993585','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993091','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y5,'993091 新 上 海:' +NUMTOSTRN(STKINDI('993091','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993091','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y5,'993091 新 上 海:' +NUMTOSTRN(STKINDI('993091','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991035','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y6,'991035 造纸印刷:' +NUMTOSTRN(STKINDI('991035','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991035','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y6,'991035 造纸印刷:' +NUMTOSTRN(STKINDI('991035','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993645','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y7,'993645 节能环保:' +NUMTOSTRN(STKINDI('993645','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993645','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y7,'993645 节能环保:' +NUMTOSTRN(STKINDI('993645','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993665','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y8,'993665 航天军工:' +NUMTOSTRN(STKINDI('993665','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993665','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y8,'993665 航天军工:' +NUMTOSTRN(STKINDI('993665','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993139','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y9,'993139 大 盘:' +NUMTOSTRN(STKINDI('993139','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993139','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y9,'993139 大 盘:' +NUMTOSTRN(STKINDI('993139','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993140','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y9,'993140 中 盘:' +NUMTOSTRN(STKINDI('993140','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993140','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y9,'993140 中 盘:' +NUMTOSTRN(STKINDI('993140','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993141','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y9,'993141 小 盘:' +NUMTOSTRN(STKINDI('993141','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993141','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y9,'993141 小 盘:' +NUMTOSTRN(STKINDI('993141','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993142','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y9,'993142 高 价:' +NUMTOSTRN(STKINDI('993142','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993142','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y9,'993142 高 价:' +NUMTOSTRN(STKINDI('993142','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993143','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y9,'993143 中 价:' +NUMTOSTRN(STKINDI('993143','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993143','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y9,'993143 中 价:' +NUMTOSTRN(STKINDI('993143','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993144','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y10,'993144 低 价:' +NUMTOSTRN(STKINDI('993144','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993144','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y10,'993144 低 价:' +NUMTOSTRN(STKINDI('993144','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993605','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X2,Y10,'993605 股权投资:' +NUMTOSTRN(STKINDI('993605','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993605','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y10,'993605 股权投资:' +NUMTOSTRN(STKINDI('993605','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993386','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y10,'993386 预 增:' +NUMTOSTRN(STKINDI('993143','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993386','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y10,'993386 预 增:' +NUMTOSTRN(STKINDI('993143','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993385','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y10,'993385 预 减:' +NUMTOSTRN(STKINDI('993144','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993385','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y10,'993385 预 减:' +NUMTOSTRN(STKINDI('993144','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993095','涨幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X5,Y10,'993095 奥 运:' +NUMTOSTRN(STKINDI('993095','涨幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993095','涨幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y10,'993095 奥 运:' +NUMTOSTRN(STKINDI('993095','涨幅引用.A')*100,2)+'%'),COLORGREEN;END;

 

 

 

 

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程

 

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 511411198  有需要帮忙请点击这里留言!!!或微信:cxhjy888 进行 有偿 编写!不贵!点击查看价格!

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容