1樓:匿名使用者
看看這個可以不:板塊監控另類表現手法(大智慧),**演示在下面**裡.
input:m(1,0,10);
drawgbklast(c,strip(rgb(65,65,65),rgb(0,0,0),0));
保險:=stkindi('991255','引用線.板塊漲幅)*100;
電力:=stkindi('991003','引用線.板塊漲幅)*100;
電力裝置:=stkindi('991037','引用線.板塊漲幅)*100;
電器:=stkindi('991014','引用線.板塊漲幅)*100;
電子資訊:=stkindi('991006','引用線.板塊漲幅)*100;
房地產:=stkindi('991007','引用線.板塊漲幅)*100;
紡織服裝:=stkindi('991008','引用線.板塊漲幅)*100;
鋼鐵:=stkindi('991009','引用線.板塊漲幅)*100;
工程建築:=stkindi('991002','引用線.板塊漲幅)*100;
供水供氣:=stkindi('991010','引用線.板塊漲幅)*100;
化工化纖:=stkindi('991011','引用線.板塊漲幅)*100;
機械:=stkindi('991027','引用線.板塊漲幅)*100;
計算機:=stkindi('991004','引用線.板塊漲幅)*100;
建材:=stkindi('991024','引用線.板塊漲幅)*100;
交通設施:=stkindi('991016','引用線.板塊漲幅)*100;
教育傳媒:=stkindi('991032','引用線.板塊漲幅)*100;
旅遊酒店:=stkindi('991018','引用線.板塊漲幅)*100;
煤炭石油:=stkindi('991019','引用線.板塊漲幅)*100;
釀酒食品:=stkindi('991020','引用線.板塊漲幅)*100;
農林牧漁:=stkindi('991021','引用線.板塊漲幅)*100;
其他行業:=stkindi('991025','引用線.板塊漲幅)*100;
汽車類:=stkindi('991026','引用線.板塊漲幅)*100;
券商:=stkindi('991036','引用線.板塊漲幅)*100;
商業聯鎖:=stkindi('991023','引用線.板塊漲幅)*100;
通訊:=stkindi('991135','引用線.板塊漲幅)*100;
外貿:=stkindi('991031','引用線.板塊漲幅)*100;
醫藥:=stkindi('991028','引用線.板塊漲幅)*100;
儀電儀表:=stkindi('991033','引用線.板塊漲幅)*100;
銀行類:=stkindi('991017','引用線.板塊漲幅)*100;
有色金屬:=stkindi('991034','引用線.板塊漲幅)*100;
運輸物流:=stkindi('991136','引用線.板塊漲幅)*100;
造紙印刷:=stkindi('991035','引用線.板塊漲幅)*100;
drawtext(dispstatus=2 and 保險》m,保險,'﹉保險'+保險+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 電力》m,電力,'﹉﹉電力'+電力+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 電力裝置》m,電力裝置,'﹉﹉﹉﹉電力裝置'+電力裝置+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 電器》m,電器,'﹉﹉﹉﹉﹉﹉電器'+電器+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 電子資訊》m,電子資訊,'﹉﹉﹉﹉﹉﹉﹉﹉電子資訊'+電子資訊+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 房地產》m,房地產,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉房地產'+房地產+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 紡織服裝》m,紡織服裝,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉紡織服裝'+紡織服裝+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 鋼鐵》m,鋼鐵,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉鋼鐵'+鋼鐵+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 工程建築》m,工程建築,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉工程建築'+工程建築+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 供水供氣》m,供水供氣,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉供水供氣'+供水供氣+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 化工化纖》m,化工化纖,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉化工化纖'+化工化纖+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 機械》m,機械,'﹉機械'+機械+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 計算機》m,計算機,'﹉﹉計算機'+計算機+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 建材》m,建材,'﹉﹉﹉建材'+建材+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 交通設施》m,交通設施,'﹉﹉﹉﹉﹉交通設施'+交通設施+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 教育傳媒》m,教育傳媒,'﹉﹉﹉﹉﹉﹉﹉教育傳媒'+教育傳媒+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 旅遊酒店》m,旅遊酒店,'﹉﹉﹉﹉﹉﹉﹉﹉﹉旅遊酒店'+旅遊酒店+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 煤炭石油》m,煤炭石油,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉煤炭石油'+煤炭石油+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 釀酒食品》m,釀酒食品,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉釀酒食品'+釀酒食品+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 農林牧漁》m,農林牧漁,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉農林牧漁'+農林牧漁+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 其他行業》m,其他行業,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉其他行業'+其他行業+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 汽車類》m,汽車類,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉汽車類'+汽車類+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 券商》m,券商,'﹉券商'+券商+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 商業聯鎖》m,商業聯鎖,'﹉﹉商業聯鎖'+商業聯鎖+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 通訊》m,通訊,'﹉﹉﹉﹉通訊'+通訊+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 外貿》m,外貿,'﹉﹉﹉﹉﹉﹉外貿'+外貿+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 醫藥》m,醫藥,'﹉﹉﹉﹉﹉﹉﹉﹉醫藥'+醫藥+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 儀電儀表》m,儀電儀表,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉儀電儀表'+儀電儀表+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 銀行類》m,銀行類,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉銀行類'+銀行類+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 有色金屬》m,有色金屬,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉有色金屬'+有色金屬+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 運輸物流》m,運輸物流,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉運輸物流'+運輸物流+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
drawtext(dispstatus=2 and 造紙印刷》m,造紙印刷,'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉造紙印刷'+造紙印刷+'﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉﹉'),align2,col***reen;
這樣得到的圖似乎要直觀一些(見附圖)。
高手進!跪求幫忙寫個藏頭詩!軍人
田 園風雨聲 爽 月夢痕輕 愛 在西北地 段 郎少年兵 高 山流水時 琨 玉姻緣石 永 念歪小寶 不 動正相思 變 卻夢中人 心 意知不知?五言小令,祝閤家歡 煙雨無忌詞 田園沁香暖風吹 爽心悅目思緒飛 愛意繢綣思郎君 段落成文訴心扉 高遠立志家國情 琨鵬雄心誓保衛 永恆承諾如初逢 不盡痴戀不言悔 ...
文才高手進謝謝,幫忙寫個藏頭詩!
侯王將相望久絕,芮公回首顏色勞。我徒三人共追之,愛竹只應憐直節。你坐輕舟順江遊。倩客高低結草亭,我欲蓬萊頂上行。喜共華篇來示人,歡戚猶來恨不平。你我同行笑連聲。侯府閨秀靚麗女。芮芮細柔賢惠妻。我蘊真情今生伴。永誌不忘倩倩依 小名 愛若磐石天地老。您摯我誠家業禧。藏辭閣 原創 侯芮我永愛你 的示愛祈福...
配臺電腦,請高手幫忙寫個配置單
我給你配個2008年3月份超高價效比的電腦6000元足夠了 cpu amd 羿龍 9500 盒 1350元 主機板 精英 a770m a 599元 記憶體 黑金剛 ddrii800 1g 2條300元 硬碟 希捷酷魚7200.10 250g 16m 串列埠 499元 顯示卡 藍寶石 hd3850藍曜...