打印本文
關(guān)閉窗口
相關(guān)標(biāo)簽:量子通信概念股龍頭 、 通信股票有哪些 、 量子通信概念股一覽表 、 通信設(shè)備板塊 、 5g通信板塊 、 通訊板塊股票 、 通訊行業(yè)股票 、 通信達行業(yè)漲幅 、 基建股票有哪些 、 通信股票龍頭股 、 以上指標(biāo)公式 、 通達信精品指標(biāo)公式 、
?
?
?
原理解析：
?
?來源:程序化99（ www.kzuj.com.cn ）
源碼：
引用公式源碼 ?公式名為漲幅引用
A:DYNAINFO(14);
?
指標(biāo)源碼：
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,'上證指數(shù)：' +NUMTOSTRN(STKINDI('1A0001','漲幅引用.A')*100,2)+'%'),COLOR7711EE;END;
IF STKINDI('1A0001','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(30,0,'上證指數(shù)：' +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 醫(yī) 藥：' +NUMTOSTRN(STKINDI('991028','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991028','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y4,'991028 醫(yī) 藥：' +NUMTOSTRN(STKINDI('991028','漲幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991007','漲幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y5,'991007 房 地 產(chǎn)：' +NUMTOSTRN(STKINDI('991007','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991007','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y5,'991007 房 地 產(chǎn)：' +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 農(nóng)林牧漁：' +NUMTOSTRN(STKINDI('991021','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991021','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y7,'991021 農(nóng)林牧漁：' +NUMTOSTRN(STKINDI('991021','漲幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993128','漲幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X1,Y8,'993128 農(nóng)業(yè)龍頭：' +NUMTOSTRN(STKINDI('993128','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993128','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X1,Y8,'993128 農(nóng)業(yè)龍頭：' +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 商業(yè)連鎖：' +NUMTOSTRN(STKINDI('991023','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991023','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y2,'991023 商業(yè)連鎖：' +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 電力設(shè)備：' +NUMTOSTRN(STKINDI('991037','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991037','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y8,'991037 電力設(shè)備：' +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 交通設(shè)施：' +NUMTOSTRN(STKINDI('991016','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991016','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y5,'991016 交通設(shè)施：' +NUMTOSTRN(STKINDI('991016','漲幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('991031','漲幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y6,'991031 外 貿(mào)：' +NUMTOSTRN(STKINDI('991031','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('991031','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y6,'991031 外 貿(mào)：' +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 創(chuàng) 投：' +NUMTOSTRN(STKINDI('993695','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993695','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y8,'993695 創(chuàng) 投：' +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 節(jié)能環(huán)保：' +NUMTOSTRN(STKINDI('993645','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993645','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X5,Y7,'993645 節(jié)能環(huán)保：' +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 股權(quán)投資：' +NUMTOSTRN(STKINDI('993605','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993605','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X2,Y10,'993605 股權(quán)投資：' +NUMTOSTRN(STKINDI('993605','漲幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993386','漲幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X3,Y10,'993386 預(yù) 增：' +NUMTOSTRN(STKINDI('993143','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993386','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X3,Y10,'993386 預(yù) 增：' +NUMTOSTRN(STKINDI('993143','漲幅引用.A')*100,2)+'%'),COLORGREEN;END;
IF STKINDI('993385','漲幅引用.A')*100>=0 THEN BEGIN DRAWTEXTABS(X4,Y10,'993385 預(yù) 減：' +NUMTOSTRN(STKINDI('993144','漲幅引用.A')*100,2)+'%'),COLORRED;END;
IF STKINDI('993385','漲幅引用.A')*100<0 THEN BEGIN DRAWTEXTABS(X4,Y10,'993385 預(yù) 減：' +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;
?
?
?
?
?
公式導(dǎo)入教程: 【通達信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】
?