板塊漲幅行業(yè)漲幅公式指標源碼[大智慧公式]
相關標簽:量子通信概念股龍頭 、 通信股票有哪些 、 量子通信概念股一覽表 、 通信設備板塊 、 5g通信板塊 、 通訊板塊股票 、 通訊行業(yè)股票 、 通信達行業(yè)漲幅 、 基建股票有哪些 、 通信股票龍頭股 、 以上指標公式 、 通達信精品指標公式 、
?
?
?
原理解析:
?
?來源:程序化99( m.kzuj.com.cn )
源碼:
引用公式源碼 ?公式名為漲幅引用
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,'上證指數(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 電力設備:' +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 外 貿(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 股權投資:' +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;
?
?
?
?
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯(lián)系技術人員 QQ: 511411198 或微信:cxhjy888 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內(nèi)容