相關標簽:

?

原理解析：
填充背景 當前月賦值:對當前日期/100(進行)四舍五入/100的小數部分*100 月賦值:月份 日賦值:日 VERTLINE(月=1 AND (日=25)),COLORFFFFFF,LINEDASHDOT VERTLINE(月=3 AND (日=20)),COLORFFFFFF,LINEDASHDOT VERTLINE(月=5 AND (日=12)),COLORFFFFFF,LINEDASHDOT VERTLINE(月=6 AND (日=14 )),COLORFFFFFF,LINEDASHDOT VERTLINE(月=7 AND ( 日=19 )),COLORFFFFFF,LINEDASHDOT VERTLINE(月=8 AND ( 日=6 )),COLORFFFFFF,LINEDASHDOT VERTLINE(月=9 AND ( 日=18 )),COLORFFFFFF,LINEDASHDOT VERTLINE(月=10 AND ( 日=31)),COLORFFFFFF,LINEDASHDOT VERTLINE(月=11 AND ( 日=28)),COLORFFFFFF,LINEDASHDOT VERTLINE(月=12 AND ( 日=31)),COLORFFFFFF,LINEDASHDOT VERTLINE(月=1 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT VERTLINE(月=2 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT VERTLINE(月=3 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT VERTLINE(月=4 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT VERTLINE(月=5 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT VERTLINE(月=6 AND ( 日=6OR 日=21)),COLORAAAAAA,LINEDASHDOT VERTLINE(月=7 AND ( 日=8 OR 日=15OR 日=23)),COLORAAAAAA,LINEDASHDOT VERTLINE(月=8 AND ( 日=8OR 日=15 OR 日=23)),COLORAAAAAA,LINEDASHDOT VERTLINE(月=9 AND ( 日=8 OR 日=15OR 日=23)),COLORAAAAAA,LINEDASHDOT VERTLINE(月=10 AND ( 日=8 OR 日=15 OR 日=23 )),COLORAAAAAA,LINEDASHDOT VERTLINE(月=11 AND ( 日=8 OR 日=15 OR 日=23)),COLORAAAAAA,LINEDASHDOT VERTLINE(月=12 AND ( 日=8 OR 日=15 OR 日=23 )),COLORAAAAAA,LINEDASHDOT 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='1'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='2'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='3'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='4'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='5'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='6'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='7'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='8'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='9'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='10'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='11'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 當滿足條件SYSPARAM(2)=BARPOSANDNUMTOS真實波幅='12'時,在收盤價位置書寫文字,COLOR00FFFF,ALIGN4 WYY1賦值:星期,線寬為0 WWJ賦值:' 星期' WWJJ賦值:如果WYY1=5,返回WWJ+'五',否則返回如果WYY1=4,返回WWJ+'四',否則返回如果WYY1=3,返回WWJ+'三',否則返回如果WYY1=2,返回WWJ+'二',否則返回如果WYY1=1,返回WWJ+'1',否則返回WWJ WYY2賦值:LMONTH WYY3賦值:LDAY WWW賦值:如果數據位置狀態=2,返回'農歷'+NUMTOSTR(WYY2,0)+'月'+NUMTOSTR(WYY3,0)+'日',否則返回'' WWH賦值:如果數據位置狀態=2,返回NUMTOSTR(日期+1000000,0),否則返回'' DRAWTEXTEX(1,1,120 ,30 ,' '+WWH+WWJJ+WWW),線寬為3,COLORFFFF80 HH賦值:市盈(動) DD賦值:總股本(股) SS賦值:流通股本(股) FF賦值:每股公積金 GG賦值:每股收益(全年折算) ZZ賦值:每股股息(港股,美股) JJ賦值:流通市值 MM賦值:JJ/SS TH賦值:市盈(動) 換手率賦值:100*成交量(手)/當前流通股本(手),COLORFFFFFF RH賦值:最高價-最低價 R賦值:振幅*100 輸出輸出DRAWTEXTEX(1,1,20,840,'當日振幅:'+NUMTOSTR(R,2)+'% '+NUMTOSTR(RH,2)+'元 '+'當前換手率:'+NUMTOSTR(換手率,2)+'%'),COLORFFFFFF 輸出VAR100賦值:'所屬板塊:' VAR100賦值:VAR100+' 電力' VAR100賦值:VAR100+' 電腦' VAR100賦值:VAR100+' 電器' VAR100賦值:VAR100+' 電子信息' VAR100賦值:VAR100+' 房地產' VAR100賦值:VAR100+' 紡織服裝' VAR100賦值:VAR100+' 鋼鐵' VAR100賦值:VAR100+' 工程建筑' VAR100賦值:VAR100+' 供水供氣' VAR100賦值:VAR100+' 化工' VAR100賦值:VAR100+' 化纖' VAR100賦值:VAR100+' 機械' VAR100賦值:VAR100+' 建材' VAR100賦值:VAR100+' 交通工具' VAR100賦值:VAR100+' 交通設施' VAR100賦值:VAR100+' 教育傳媒' VAR100賦值:VAR100+' 金融' VAR100賦值:VAR100+' 旅游酒店' VAR100賦值:VAR100+' 煤炭石油' VAR100賦值:VAR100+' 釀酒食品' VAR100賦值:VAR100+' 農林牧漁' VAR100賦值:VAR100+' 其他行業' VAR100賦值:VAR100+' 汽車' VAR100賦值:VAR100+' 汽配' VAR100賦值:VAR100+' 商業連鎖' VAR100賦值:VAR100+' 石化' VAR100賦值:VAR100+' 通信' VAR100賦值:VAR100+' 外貿' VAR100賦值:VAR100+' 醫藥' VAR100賦值:VAR100+' 儀電儀表' VAR100賦值:VAR100+' 有色金屬' VAR100賦值:VAR100+' 運輸物流' VAR100賦值:VAR100+' 造紙印刷' VAR100賦值:VAR100+' 安徽' VAR100賦值:VAR100+' 北京' VAR100賦值:VAR100+' 福建' VAR100賦值:VAR100+' 甘肅' VAR100賦值:VAR100+' 廣東' VAR100賦值:VAR100+' 廣西' VAR100賦值:VAR100+' 貴州' VAR100賦值:VAR100+' 海南' VAR100賦值:VAR100+' 河北' VAR100賦值:VAR100+' 河南' VAR100賦值:VAR100+' 黑龍江' VAR100賦值:VAR100+' 湖北' VAR100賦值:VAR100+' 湖南' VAR100賦值:VAR100+' 吉林' VAR100賦值:VAR100+' 江蘇' VAR100賦值:VAR100+' 江西' VAR100賦值:VAR100+' 遼寧' VAR100賦值:VAR100+' 內蒙古' VAR100賦值:VAR100+' 寧夏' VAR100賦值:VAR100+' 青海' VAR100賦值:VAR100+' 山東' VAR100賦值:VAR100+' 山西' VAR100賦值:VAR100+' 陜西' VAR100賦值:VAR100+' 上海' VAR100賦值:VAR100+' 深圳' VAR100賦值:VAR100+' 四川' VAR100賦值:VAR100+' 天津' VAR100賦值:VAR100+' ***' VAR100賦值:VAR100+' 新疆' VAR100賦值:VAR100+' 云南' VAR100賦值:VAR100+' 浙江' VAR100賦值:VAR100+' 重慶' VAR100賦值:VAR100+' 3G' VAR100賦值:VAR100+' H股' VAR100賦值:VAR100+' QFII持股' VAR100賦值:VAR100+' ST' VAR100賦值:VAR100+' 奧運' VAR100賦值:VAR100+' 創投' VAR100賦值:VAR100+' 次新股' VAR100賦值:VAR100+' 大盤' VAR100賦值:VAR100+' 股權改革' VAR100賦值:VAR100+' 股權投資' DRAWTEXTEX(1,1,20,960,VAR100),COLOR00FFFF 輸出輸出輸出輸出DRAWTEXTEX(1,1,20,900,'總股本:'+NUMTOSTR(DD,0)+'萬股' +' 流通A股:'+NUMTOSTR(SS,0)+'萬股'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+'每股收益:'+NUMTOSTR(GG,3)),COLORBBFFFF E賦值:(最高價+最低價+開盤價+2*收盤價)/5 ZL賦值:2*E-最低價 ZC賦值:2*E-最高價 FZ賦值:E-(最高價-最低價) MA6賦值:收盤價的6日簡單移動平均 MA18賦值:收盤價的18日簡單移動平均 BALANCE賦值:收盤價的30日指數移動平均 UP賦值:BALANCE + 2*收盤價的30日估算標準差 DOWN賦值:BALANCE- 2*收盤價的30日估算標準差 VAR9Q賦值:收盤價= 4日內收盤價的最高值AND (1日前的收盤價>=2日前的收盤價 OR 1日前的收盤價>=3日前的收盤價) OR 1日前的收盤價=4日內收盤價的最高值 AND 收盤價>=2日前的收盤價 OR 2日前的收盤價=4日內收盤價的最高值 AND 3日前的收盤價=4日內收盤價的最低值 AND 收盤價>=1日前的收盤價 OR 3日前的收盤價=4日內收盤價的最高值 AND 收盤價>=1日前的收盤價 AND 收盤價>=2日前的收盤價 VARAQ賦值:收盤價=4日內收盤價的最高值 AND 1日前的收盤價=4日內收盤價的最低值 VARBQ賦值:收盤價=4日內收盤價的最低值 AND (1日前的收盤價<2日前的收盤價 OR 1日前的收盤價<3日前的收盤價) OR 1日前的收盤價=4日內收盤價的最低值 AND 收盤價<2日前的收盤價 OR 2日前的收盤價=4日內收盤價的最低值 AND 1日前的收盤價不等于4日內收盤價的最高值 AND 收盤價<1日前的收盤價 OR 3日前的收盤價=4日內收盤價的最低值 AND 收盤價<1日前的收盤價 AND 收盤價<2日前的收盤價 VARCQ賦值:1日前的收盤價=4日內收盤價的最低值 AND 收盤價>=2日前的收盤價 OR 2日前的收盤價=4日內收盤價的最低值 AND 1日前的收盤價<=3日前的收盤價 AND 2日前的收盤價<4日前的收盤價 AND 收盤價>=1日前的收盤價 VARDQ賦值:1日前的收盤價=4日內收盤價的最高值 AND 收盤價<2日前的收盤價 OR (2日前的收盤價=4日內收盤價的最高值 AND 1日前的收盤價>3日前的收盤價 OR 3日前的收盤價=4日內收盤價的最高值 AND 1日前的收盤價>2日前的收盤價) AND 2日前的收盤價>=4日前的收盤價 AND 收盤價<1日前的收盤價 Y1賦值:1日前的以0.9為權重(((最高價+最低價)+(收盤價*2))/4.15)的動態移動平均的3日指數移動平均 VAR1W賦值:(100 - ((90 * (21日內最高價的最高值 - 收盤價)) / (21日內最高價的最高值 - 21日內最低價的最低值))) VAR2W賦值:(100 - ((90 * (21日內最高價的最高值 - 收盤價)) / (21日內最高價的最高值 - 21日內最低價的最低值))) VAR3W賦值:(100 - ((100*(6日內最高價的最高值-收盤價))/(6日內最高價的最高值-6日內最低價的最低值))的34日簡單移動平均) VAR3P賦值:如果收盤價/1日前的收盤價>1.050ANDHIGH/收盤價<1.010ANDIF(收盤價>1日前的收盤價,88,0)>0,返回91,否則返回0 SS賦值:(最低價+最高價+收盤價)/3的5日簡單移動平均>1日前的(最低價+最高價+收盤價)/3的5日簡單移動平均 AND 1日前的(最低價+最高價+收盤價)/3的5日簡單移動平均<2日前的(最低價+最高價+收盤價)/3的5日簡單移動平均 SC賦值:最低價<13日內(最低價+最高價+收盤價)/3的5日簡單移動平均的最高值 AND 最高價>13日內(最低價+最高價+收盤價)/3的5日簡單移動平均的最高值 AND 收盤價>1日前的收盤價 AND 收陽線 MR賦值:SC AND 統計2日中滿足SS的天數 買賦值:MR AND 取反 多方賦值:7*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*30的4日[1日權重]移動平均-3*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*30的4日[1日權重]移動平均的3日[1日權重]移動平均-(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*30的4日[1日權重]移動平均的3日[1日權重]移動平均的2日[1日權重]移動平均 VAR1賦值:(收盤價-24日內最低價的最低值)/(24日內最高價的最高值-24日內最低價的最低值)*1 VAR2賦值:VAR1的3日[1日權重]移動平均*100 趨勢線賦值:(VAR2的3日[1日權重]移動平均*VAR1)的3日[1日權重]移動平均*1 VAR9賦值:趨勢線上穿(VAR2的3日[1日權重]移動平均*VAR1) AND (VAR2的3日[1日權重]移動平均*VAR1)>8 AAX賦值:成交額(元)/成交量(手) BBX賦值:最低價<AAX*0.9 CCX賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100>1.2 DDX賦值:最低價<收盤價的5日簡單移動平均*0.921 EEX賦值:成交量(手)<成交量(手)的5日簡單移動平均*1.5 FFX賦值:BBX AND CCX AND DDX AND EEX A賦值:(3*收盤價+最低價+開盤價+最高價)/6 X賦值:(20*A+19*1日前的A+18*2日前的A+17*3日前的A+16*4日前的A+15*5日前的A+14*6日前的A+13*7日前的A+12*8日前的A+11*9日前的A+10*10日前的A+9*11日前的A+8*12日前的A+7*13日前的A+6*14日前的A+5*15日前的A+4*16日前的A+3*17日前的A+2*18日前的A+20日前的A)/210 MTM賦值:收盤價-1日前的收盤價 DX賦值:100*MTM的6日指數移動平均的6日指數移動平均/MTM的絕對值的6日指數移動平均的6日指數移動平均 CB賦值:X的13日指數移動平均 當滿足條件收陽線時,在開盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收陽線時,在收盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件開盤價>=收盤價時,在收盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在開盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF7700 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF9900 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFFBB00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFCC00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFDD00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFEE00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFFF00 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱. ,COLOR000055 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱. ,COLOR000066 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱. ,COLOR000077 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱. ,COLOR000099 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱. ,COLOR0000BB 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱. ,COLOR0000DD 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱. ,COLOR0000FF 紅賦值:VAR9Q 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR000055 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR000066 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR000077 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR000099 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000BB 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000DD 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000FF 粉賦值:VARAQ 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF11FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF33FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF55FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF77FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF99FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFBBFF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFDDFF 灰賦值:VARBQ 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR333333 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR555555 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR777777 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR999999 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORBBBBBB 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORDDDDDD 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFFFFF 綠賦值:VARCQ 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR003300 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR005500 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR007700 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR009900 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00BB00 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR00DD00 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00 藍賦值:VARDQ 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF1100 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF3300 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF5500 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF7700 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF9900 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFBB00 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFDD00 輸出CG:收盤價的21日簡單移動平均,COLOR00FF00,線寬為2 輸出FL:3日內CG的最高值,COLORFF0000,線寬為2 輸出FS:CG-(FL-CG),畫紅色,線寬為2 TY賦值:收盤價 A1賦值:10日前的TY=2*10+1日內TY的最高值 B1賦值:A1的10日過濾 C1賦值:若B1則將最近10+1周期置為1 HD賦值:C1的10日過濾 A2賦值:10日前的TY=2*10+1日內TY的最低值 B2賦值:A2的10日過濾 C2賦值:若B2則將最近10+1周期置為1 LD賦值:C2的10日過濾 A賦值:上次HD距今天數日前的收盤價 Z賦值:上次LD距今天數日前的最低價 T1賦值:上次HD距今天數<上次LD距今天數 AND 取反 T2賦值:上次HD距今天數>上次LD距今天數 AND 取反 輸出前期頭郤:如果T1,返回A,否則返回A,COLORFF00FF,線寬為2,POINTDOT 輸出前期底部:如果T2,返回Z,否則返回Z,畫白色,線寬為2,POINTDOT 上收賦值:收盤價 上開賦值:開盤價 上高賦值:最高價 上低賦值:最低價 輸出止贏逃命:1日前的21日內上收的最高值的21日簡單移動平均,CIRCLEDOT,COLOR00FFFF,線寬為0 輸出全倉殺入:1日前的30日內上收的最低值的21日簡單移動平均,CIRCLEDOT,畫紅色 ,線寬為0 輸出明日買賣提示:收盤價的3.5日指數移動平均,COLORF00FF0 當滿足條件明日買賣提示上穿止贏逃命時,在明日買賣提示-0.1位置書寫文字,COLOR00FF00 當滿足條件止贏逃命上穿明日買賣提示時,在止贏逃命+0.2位置書寫文字,COLOR00FFFF 當滿足條件明日買賣提示上穿全倉殺入時,在明日買賣提示-0.1位置書寫文字,COLORFFFF00 高賦值:1日前的最高價/2日前的收盤價的27日簡單移動平均*1日前的收盤價 低賦值:1日前的最低價/2日前的收盤價的27日簡單移動平均*1日前的收盤價 A5賦值:低[SYSPARAM(1)] RA5賦值:低[SYSPARAM(1)-1] A10賦值:高[SYSPARAM(1)] RA10賦值:高[SYSPARAM(1)-1] JT5賦值:如果A5>RA5,返回'↑',否則返回'↓' JT10賦值:如果A10>RA10,返回'↑',否則返回'↓' 輸出SZ1賦值:'\N \N \N開盤預測最高價:'+NUMTOSTR(高[SYSPARAM(1)],2)+JT10 當滿足條件BARPOS=SYSPARAM(2)時,在收盤價位置書寫文字,ALIGN4,畫洋紅色 輸出SZ賦值:'\N \N開盤預測最低價:'+NUMTOSTR(低[SYSPARAM(1)],2)+JT5 當滿足條件BARPOS=SYSPARAM(2)時,在收盤價位置書寫文字,ALIGN4,畫綠色 MG賦值:最高價的3日指數移動平均 ML賦值:收盤價的3日指數移動平均 買入賦值:收盤價>MG 賣出賦值:收盤價<ML XXL賦值:上次買入-賣出不等于0距今天數日前的買入-賣出 當滿足條件XXL>0時,在最高價位置畫4號圖標,ALIGN5 當滿足條件XXL<0時,在最低價位置畫5號圖標,ALIGN5 CBL1賦值:如果2日前的最高價>3日前的最高價,返回2日前的最高價,否則返回3日前的最高價 CBL3賦值:如果2日前的最低價<3日前的最低價,返回2日前的最高價,否則返回CBL1 CBL2賦值:如果3日前的最高價>=2日前的最高價,返回2日前的最高價,否則返回3日前的最高價 CBL4賦值:如果最高價<2ORL<2日前的最低價日前的最高價,返回2日前的最高價,否則返回CBL2 CB5賦值:如果最高價>=1日前的最高價ANDL>1日前的最低價,返回CBL4,否則返回CBL3 CBL6賦值:如果最高價>1日前的最高價ANDREF(最高價,1)>2日前的最高價ANDL<2日前的最高價ANDO>收盤價,返回最高價,否則返回CB5 CBL7賦值:如果最低價<1日前的最低價ANDREF(最低價,1)<2日前的最低價ANDREF(最低價,2)<3日前的最低價ANDC>OAND(1日前的最低價-最低價)/最低價>0.015,返回最低價,否則返回CBL6 輸出CBL:如果1日前的最低價<2日前的最低價ANDREF(最低價,2)<3日前的最低價ANDREF(最低價,3)<4日前的最低價ANDREF(收盤價,1)>1日前的開盤價,返回2日前的最低價,否則返回CBL7,,COLORFF9963,線寬為0 當滿足條件(BARPOS=(SYSPARAM(1)-0)ANDCBL<收盤價)時,在CBL和CBL位置之間畫柱狀線,寬度為240,0不為0則畫空心柱.,畫紅色 當滿足條件(BARPOS=(SYSPARAM(1)-0)ANDCBL>=收盤價)時,在CBL和CBL位置之間畫柱狀線,寬度為240,0不為0則畫空心柱.,畫藍色 N賦值:如果DATATYPE=7,返回3,否則返回如果DATATYPE=6,返回24,否則返回如果DATATYPE=5,返回96,否則返回如果DATATYPE=4,返回192,否則返回如果DATATYPE=3,返回384,否則返回1000 EMA6賦值:收盤價的6日簡單移動平均,畫紅色 線寬為2 EMA18賦值:收盤價的18日簡單移動平均,畫黃色 EMA144賦值:收盤價的144日簡單移動平均,畫綠色 EMA288賦值:收盤價的288日簡單移動平均,畫藍色 蛉搿扛持?統計5日中滿足收盤價<EMA18的天數=4 AND 收盤價/EMA18>1.004 AND 收盤價上穿EMA18 AND EMA18>=1日前的EMA18,線寬為0,畫紅色 股價平臺1賦值:如果收盤價>10,返回1.004,否則返回0 股價平臺2賦值:如果收盤價>8ANDCLOSE<=10,返回1.006,否則返回0 股價平臺3賦值:如果收盤價>6ANDCLOSE<=8,返回1.008,否則返回0 股價平臺4賦值:如果收盤價>4ANDCLOSE<=6,返回1.010,否則返回0 股價平臺5賦值:如果收盤價>2ANDCLOSE<=4,返回1.012,否則返回0 股價平臺6賦值:如果收盤價<=2,返回1.015,否則返回0 股價平臺賦值:股價平臺1+股價平臺2+股價平臺3+股價平臺4+股價平臺5+股價平臺6 中線JM賦值:(收盤價-18日前的收盤價)/18+EMA18*股價平臺,線寬為2,畫洋紅色 輸出ZXPY:中線JM的N日[1日權重]移動平均 MRZY賦值:對(((1日前的最高價-1日前的最低價)*8/10)+收盤價)*100(進行)四舍五入/100

?

?來源:程序化99（ m.weiqiv.net.cn ）

源碼：

?

?

DRAWGBK(1,colorrgb(0,0,100),colorrgb(0,0,0),1);
當前月:=FRACPART(ROUND(當前日期/100)/100)*100;
月:=MONTH;日:=DAY;
VERTLINE(月=1 AND (日=25)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=3 AND (日=20)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=5 AND (日=12)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=6 AND (日=14 )),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=7 AND ( 日=19 )),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=8 AND ( 日=6 )),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=9 AND ( 日=18 )),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=10 AND ( 日=31)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=11 AND ( 日=28)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=12 AND ( 日=31)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=1 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=2 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=3 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=4 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=5 AND ( 日=6 OR 日=15 OR 日=21 )),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=6 AND ( 日=6OR 日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=7 AND ( 日=8 OR 日=15OR 日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=8 AND ( 日=8OR 日=15 OR 日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=9 AND ( 日=8 OR 日=15OR 日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=10 AND ( 日=8 OR 日=15 OR 日=23 )),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=11 AND ( 日=8 OR 日=15 OR 日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=12 AND ( 日=8 OR 日=15 OR 日=23 )),COLORAAAAAA,LINEDASHDOT;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='1',c,NUMTOSTR(當前月,0)+'月轉折日:6、15、21、*25\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='2',c,NUMTOSTR(當前月,0)+'月轉折日:6、15、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='3',c,NUMTOSTR(當前月,0)+'月轉折日:6、15、*20、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='4',c,NUMTOSTR(當前月,0)+'月轉折日:6、15、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='5',c,NUMTOSTR(當前月,0)+'月轉折日:6、*1 2、15、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='6',c,NUMTOSTR(當前月,0)+'月轉折日:6、*1 4、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='7',c,NUMTOSTR(當前月,0)+'月轉折日:8、15、*1 9、23\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='8',c,NUMTOSTR(當前月,0)+'月轉折日:*6、8、15、23\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='9',c,NUMTOSTR(當前月,0)+'月轉折日:8、15、*1 8、23\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='10',c,NUMTOSTR(當前月,0)+'月轉折日:8、15、23、*31\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='11',c,NUMTOSTR(當前月,0)+'月轉折日:8、15、23、*28\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='12',c,NUMTOSTR(當前月,0)+'月轉折日:8、15、23、*31\n \n \n \n '),COLOR00FFFF,ALIGN4;
wyy1:=WEEKDAY,LINETHICK0;
wWj:=' 星期';
wWjj:=IF(wyy1=5 ,wWj+'五',IF(wyy1=4 ,wWj+'四',
IF(wyy1=3 ,wWj+'三',IF(wyy1=2 ,wWj+'二',IF(wyy1=1 ,wWj+'1',wWj)))));
wyy2:=LMONTH;
wyy3:=LDAY;
wWw:=IF( BARSTATUS=2 ,' 農歷 '+NUMTOSTR(wyy2,0)+'月 '+NUMTOSTR(wyy3,0)+'日',' ');
wWh:=IF( BARSTATUS=2 ,NUMTOSTR(date+1000000,0),' ' );
DRAWTEXTEX(1,1,120 ,30 ,' '+wWh+wWjj+wWw),LINETHICK3,ColorFFFF80;
HH:=DYNAINFO(39);
DD:=FINANCE( 1);
SS:=FINANCE( 7);
FF:=FINANCE(18);
GG:=FINANCE(33);
zz:=FINANCE(53);
JJ:=FINANCE(40);
MM:=JJ/SS;
TH:=DYNAINFO(39);
換手率:=100*v/capital,colorfffFff;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXTEX(1,1,20,840,'當日振幅:'+NUMTOSTR(R,2)+'% '+NUMTOSTR(RH,2)+'元 '+'當前換手率:'+NUMTOSTR(換手率,2)+'%'),ColorFFFFFF;
var100:='所屬板塊:';
if inblock('電力')=1 then var100:=var100+' 電力';
if inblock('電腦')=1 then var100:=var100+' 電腦';
if inblock('電器')=1 then var100:=var100+' 電器';
if inblock('電子信息')=1 then var100:=var100+' 電子信息';
if inblock('房地產')=1 then var100:=var100+' 房地產';
if inblock('紡織服裝')=1 then var100:=var100+' 紡織服裝';
if inblock('鋼鐵')=1 then var100:=var100+' 鋼鐵';
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';
if inblock('供水供氣')=1 then var100:=var100+' 供水供氣';
if inblock('化工')=1 then var100:=var100+' 化工';
if inblock('化纖')=1 then var100:=var100+' 化纖';
if inblock('機械')=1 then var100:=var100+' 機械';
if inblock('建材')=1 then var100:=var100+' 建材';
if inblock('交通工具')=1 then var100:=var100+' 交通工具';
if inblock('交通設施')=1 then var100:=var100+' 交通設施';
if inblock('教育傳媒')=1 then var100:=var100+' 教育傳媒';
if inblock('金融')=1 then var100:=var100+' 金融';
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';
if inblock('釀酒食品')=1 then var100:=var100+' 釀酒食品';
if inblock('農林牧漁')=1 then var100:=var100+' 農林牧漁';
if inblock('其他行業')=1 then var100:=var100+' 其他行業';
if inblock('汽車')=1 then var100:=var100+' 汽車';
if inblock('汽配')=1 then var100:=var100+' 汽配';
if inblock('商業連鎖')=1 then var100:=var100+' 商業連鎖';
if inblock('石化')=1 then var100:=var100+' 石化';
if inblock('通信')=1 then var100:=var100+' 通信';
if inblock('外貿')=1 then var100:=var100+' 外貿';
if inblock('醫藥')=1 then var100:=var100+' 醫藥';
if inblock('儀電儀表')=1 then var100:=var100+' 儀電儀表';
if inblock('有色金屬')=1 then var100:=var100+' 有色金屬';
if inblock('運輸物流')=1 then var100:=var100+' 運輸物流';
if inblock('造紙印刷')=1 then var100:=var100+' 造紙印刷';
if inblock('安徽')=1 then var100:=var100+' 安徽';
if inblock('北京')=1 then var100:=var100+' 北京';
if inblock('福建')=1 then var100:=var100+' 福建';
if inblock('甘肅')=1 then var100:=var100+' 甘肅';
if inblock('廣東')=1 then var100:=var100+' 廣東';
if inblock('廣西')=1 then var100:=var100+' 廣西';
if inblock('貴州')=1 then var100:=var100+' 貴州';
if inblock('海南')=1 then var100:=var100+' 海南';
if inblock('河北')=1 then var100:=var100+' 河北';
if inblock('河南')=1 then var100:=var100+' 河南';
if inblock('黑龍江')=1 then var100:=var100+' 黑龍江';
if inblock('湖北')=1 then var100:=var100+' 湖北';
if inblock('湖南')=1 then var100:=var100+' 湖南';
if inblock('吉林')=1 then var100:=var100+' 吉林';
if inblock('江蘇')=1 then var100:=var100+' 江蘇';
if inblock('江西')=1 then var100:=var100+' 江西';
if inblock('遼寧')=1 then var100:=var100+' 遼寧';
if inblock('內蒙古')=1 then var100:=var100+' 內蒙古';
if inblock('寧夏')=1 then var100:=var100+' 寧夏';
if inblock('青海')=1 then var100:=var100+' 青海';
if inblock('山東')=1 then var100:=var100+' 山東';
if inblock('山西')=1 then var100:=var100+' 山西';
if inblock('陜西')=1 then var100:=var100+' 陜西';
if inblock('上海')=1 then var100:=var100+' 上海';
if inblock('深圳')=1 then var100:=var100+' 深圳';
if inblock('四川')=1 then var100:=var100+' 四川';
if inblock('天津')=1 then var100:=var100+' 天津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新疆';
if inblock('云南')=1 then var100:=var100+' 云南';
if inblock('浙江')=1 then var100:=var100+' 浙江';
if inblock('重慶')=1 then var100:=var100+' 重慶';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('ST')=1 then var100:=var100+' ST';
if inblock('奧運')=1 then var100:=var100+' 奧運';
if inblock('創投')=1 then var100:=var100+' 創投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盤')=1 then var100:=var100+' 大盤';
if inblock('股權改革')=1 then var100:=var100+' 股權改革';
if inblock('股權投資')=1 then var100:=var100+' 股權投資';
DRAWTEXTEX(1,1,20,960,var100),color00ffff;
DRAWTEXTEX(1,1,20,900,'總股本:'+NUMTOSTR(DD,0)+'萬股' +' 流通A股:'+NUMTOSTR(SS,0)+'萬股'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+'每股收益:'+NUMTOSTR(GG,3)),COLORbbffff;
E:=(H+L+O+2*C)/5;
zl:=2*E-L;
zc:=2*E-H;
fz:=E-(H-L);
MA6:=MA(CLOSE,6);
MA18:=MA(CLOSE,18);
BALANCE:=EMA(C,30);
UP:=BALANCE + 2*STD(C,30);
DOWN:=BALANCE- 2*STD(C,30);
var9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2);
varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
varbQ:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<>hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2);
varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
vardQ:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1);
Y1:=REF(EMA(DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9),3),1);
VAR1w:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2w:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3w:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
Var3p:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
Ss:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(Ss,2);
買:=MR AND NOT(REF(MR,1));
多方:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)
-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)
-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1);
Var1:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*1;
Var2:=SMA(Var1,3,1)*100;
趨勢線:=SMA((SMA(Var2,3,1)*var1),3,1)*1;
Var9:=CROSS(趨勢線,(SMA(Var2,3,1)*var1)) AND (SMA(Var2,3,1)*var1)>8;
AAx:=AMOUNT/VOL;
BBx:=L<AAx*0.9;
CCx:=(C-REF(C,1))/REF(C,1)*100>1.2;
DDx:=L<MA(C,5)*0.921;
EEx:=VOL<MA(V,5)*1.5;
FFx:=BBx AND CCx AND DDx AND EEx;
a:=(3*c+l+o+h)/6;
X:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+
14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+
ref(a,20))/210;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=eMA(X,13);
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
紅:=var9Q;
stickline(var9Q,c,(o+c)/2,7,0),color000055;
stickline(var9Q,c,(o+c)/2,6,0),color000066;
stickline(var9Q,c,(o+c)/2,5,0),color000077;
stickline(var9Q,c,(o+c)/2,4,0),color000099;
stickline(var9Q,c,(o+c)/2,3,0),color0000bb;
stickline(var9Q,c,(o+c)/2,2,0),color0000dd;
stickline(var9Q,c,(o+c)/2,1,0),color0000ff;
粉:=varaQ;
stickline(varaQ,c,(o+c)/2,7,0),colorff11ff;
stickline(varaQ,c,(o+c)/2,6,0),colorff33ff;
stickline(varaQ,c,(o+c)/2,5,0),colorff55ff;
stickline(varaQ,c,(o+c)/2,4,0),colorff77ff;
stickline(varaQ,c,(o+c)/2,3,0),colorff99ff;
stickline(varaQ,c,(o+c)/2,2,0),colorffbbff;
stickline(varaQ,c,(o+c)/2,1,0),colorffddff;
灰:=varbQ;
stickline(varbQ,c,(o+c)/2,7,0),color333333;
stickline(varbQ,c,(o+c)/2,6,0),color555555;
stickline(varbQ,c,(o+c)/2,5,0),color777777;
stickline(varbQ,c,(o+c)/2,4,0),color999999;
stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb;
stickline(varbQ,c,(o+c)/2,2,0),colordddddd;
stickline(varbQ,c,(o+c)/2,1,0),colorffffff;
綠:=varcQ;
stickline(varcQ,o,(o+c)/2,7,0),color003300;
stickline(varcQ,o,(o+c)/2,6,0),color005500;
stickline(varcQ,o,(o+c)/2,5,0),color007700;
stickline(varcQ,o,(o+c)/2,4,0),color009900;
stickline(varcQ,o,(o+c)/2,3,0),color00bb00;
stickline(varcQ,o,(o+c)/2,2,0),color00dd00;
stickline(varcQ,o,(o+c)/2,1,0),color00ff00;
藍:=vardQ;
stickline(vardQ,o,(o+c)/2,7,0),colorff1100;
stickline(vardQ,o,(o+c)/2,6,0),colorff3300;
stickline(vardQ,o,(o+c)/2,5,0),colorff5500;
stickline(vardQ,o,(o+c)/2,4,0),colorff7700;
stickline(vardQ,o,(o+c)/2,3,0),colorff9900;
stickline(vardQ,o,(o+c)/2,2,0),colorffbb00;
stickline(vardQ,o,(o+c)/2,1,0),colorffdd00;
{買賣趨勢}
CG:MA(C,21),COLOR00ff00,linethick2;
FL:HHV(CG,3),COLORff0000,linethick2;
FS:CG-(FL-CG),COLORred,linethick2;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
Z:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
前期頭鄐:IF(T1,A,A),COLORff00ff,LINETHICK2,POINTDOT;
前期底部:IF(T2,Z,Z),COLORWHITE,LINETHICK2,POINTDOT;
上收:=C;上開:=O;上高:=H; 上低:=L;
止贏逃命:MA(REF(HHV(上收,21),1),21),circledot,COLOR00ffff,Linethick0;
全倉殺入:MA(REF(LLV(上收,30),1),21),circledot,COLORred ,LINETHICK0 ;
明日買賣提示:EMA(CLOSE,3.5),colorf00ff0;
DRAWTEXT(CROSS(明日買賣提示,止贏逃命) ,明日買賣提示-0.1,'------追漲'),color00ff00;
DRAWTEXT(CROSS(止贏逃命,明日買賣提示) ,止贏逃命+0.2,'-減倉-'),color00ffff;
DRAWTEXT(CROSS(明日買賣提示,全倉殺入) ,明日買賣提示-0.1,'買進-------'),colorffff00;
{開盤既知今天高低價}
高:=MA(REF(H,1)/REF(C,2),27)*REF(C,1);
低:=MA(REF(L,1)/REF(C,2),27)*REF(C,1);
A5:=低[SYSPARAM(1)];
RA5:=低[SYSPARAM(1)-1];
A10:=高[SYSPARAM(1)];
RA10:=高[SYSPARAM(1)-1];
jt5:=if(A5>RA5,'↑','↓');
jt10:=if(A10>RA10,'↑','↓');
SZ1:='\n \n \n開盤預測最高價:'+NUMTOSTR(高[SYSPARAM(1)],2)+jt10;
DRAWTEXT(BARPOS=SYSPARAM(2),c,SZ1),align4,COLORMAGENTA;
SZ:='\n \n開盤預測最低價:'+NUMTOSTR(低[SYSPARAM(1)],2)+jt5;
DRAWTEXT(BARPOS=SYSPARAM(2),c,SZ),align4,COLORGREEN;
{多空方向}
MG:=ema(HIGH,3);
ML:=ema(CLOSE,3);
買入:=c>MG;
賣出:=c<ML;
XXL:=ref(買入-賣出,BARSLAST(買入-賣出<>0));
DRAWICON(XXL>0,H,4),align5;
DRAWICON(XXL<0,L,5),align5;
{止盈止損}
cbl1:=if(ref(h,2)>ref(h,3),ref(h,2),ref(h,3));{CBL第一次變紅入場，變藍出。}
cbl3:=if(ref(l,2)<ref(l,3),ref(h,2),cbl1);
cbl2:=if(ref(h,3)>=ref(h,2),ref(h,2),ref(h,3));
CBL4:=IF(H<REF(H,2 OR L<REF(L,2)),REF(H,2),CBL2);
cb5:=if(h>=ref(h,1) AND L>REF(L,1 ),cbl4,cbl3);
cbl6:=if(h>ref(h,1) and ref(h,1)>ref(h,2) and l<ref(h,2) and o>c,h,cb5);
cbl7:=if(l<ref(l,1) and ref(l,1)<ref(l,2)and ref(l,2)<ref(l,3) and c>o and (ref(l,1)-l)/l>0.015,l,cbl6);
cbl:if(ref(l,1)<ref(l,2) and ref(l,2)<ref(l,3) and ref(l,3)<ref(l,4) and ref(c,1)>ref(o,1),ref(L,2),cbl7),,COLORff9963,LINETHICK0;
STICKLINE((BARPOS = (SYSPARAM(1) - 0)and cbl<c),cbl,cbl,240,0),ColorRED;
STICKLINE((BARPOS = (SYSPARAM(1) - 0)and cbl>=c),cbl,cbl,240,0),colorBLUE;
{中線加碼}
n:=if(DATATYPE=7,3,if(DATATYPE=6,24,if(DATATYPE=5,96,if(DATATYPE=4,192,if(DATATYPE=3,384,1000)))));
EMA6:=MA(C,6),COLORRED LINETHICK2;
EMA18:=MA(C,18),COLORYELLOW;
EMA144:=MA(C,144),COLORGREEN;
EMA288:=MA(C,288),COLORBLUE;
中線【18日均線買入】:=COUNT(CLOSE<EMA18,5)=4 AND CLOSE/EMA18>1.004 AND CROSS(CLOSE,EMA18) AND EMA18>=REF(EMA18,1),LINETHICK,COLORRED;
股價平臺1:=IF(CLOSE>10,1.004,0);
股價平臺2:=IF(CLOSE>8 AND CLOSE<=10,1.006,0);
股價平臺3:=IF(CLOSE>6 AND CLOSE<=8,1.008,0);
股價平臺4:=IF(CLOSE>4 AND CLOSE<=6,1.010,0);
股價平臺5:=IF(CLOSE>2 AND CLOSE<=4,1.012,0);
股價平臺6:=IF(CLOSE<=2,1.015,0);
股價平臺:=股價平臺1+股價平臺2+股價平臺3+股價平臺4+股價平臺5+股價平臺6;
中線JM:=(CLOSE-REF(CLOSE,18))/18+EMA18*股價平臺,LINETHICK2,COLORMAGENTA;
ZXPY:SMA(中線JM,n,1);
{明日K線,股票公式下載www.88 gs .com}
MRZY:=ROUND((((REF(H,1)-REF(L,1))*8/10)+C)*100)/100;
MRZS:=ROUND((C-((REF(H,1)-REF(L,1))*8/20))*100)/100;//止贏止損
VERTLINE(C>0 AND ISLASTBAR),POINTDOT,COLORYELLOW,SHIFT1;
STICKLINE(C>O AND ISLASTBAR,MRZY,MRZS,8,1),COLORMAGENTA,SHIFT2;
STICKLINE(C<=O AND ISLASTBAR,MRZY,MRZS,8,1),COLORCYAN,SHIFT2;
{明日撐壓}
M_r1:=REF((H+L+C)/3,1);M_r2:=2*M_r1-REF(L,1);M_r3:=2*M_r1-REF(H,1);
M_r4:=M_r1-M_r3+M_r2; M_r5:=M_r1-M_r2+M_r3;
DRAWTEXT(ISLASTBAR,M_r4+0.01,' ----明'),COLORYELLOW;//阻力線1
DRAWTEXT(ISLASTBAR,M_r2+0.01,' ----日'),Color00A3F5;//阻力線2
DRAWTEXT(ISLASTBAR,M_r1+0.01,' --界線'),COLORRED; //牛熊分界線
DRAWTEXT(ISLASTBAR,M_r3+0.01,' ----撐'),COLORWHITE; //壓力線
DRAWTEXT(ISLASTBAR,M_r5+0.01,' ----壓'),COLORGREEN; //支撐線1
立春:=信號過濾(月份=2 AND (日期=3OR 日期=5 ),2);
雨水:=信號過濾(月份=2 AND (日期=18 OR 日期=20),2);
驚蟄:=信號過濾(月份=3 AND (日期=5OR 日期=7 ),2);
春分:=信號過濾(月份=3 AND (日期=20 OR 日期=22),2);
清明:=信號過濾(月份=4 AND (日期=3OR 日期=6 ),2);
谷雨:=信號過濾(月份=4 AND (日期=19 OR 日期=21),2);
立夏:=信號過濾(月份=5 AND (日期=6OR 日期=8 ),2);
小滿:=信號過濾(月份=5 AND (日期=20 OR 日期=22),2);
芒種:=信號過濾(月份=6 AND (日期=5OR 日期=7 ),2);
夏至:=信號過濾(月份=6 AND (日期=20 OR 日期=22),2);
小暑:=信號過濾(月份=7 AND (日期=6OR 日期=8 ),2);
大署:=信號過濾(月份=7 AND (日期=22 OR 日期=24),2);
立秋:=信號過濾(月份=8 AND (日期=7OR 日期=9 ),2);
處暑:=信號過濾(月份=8 AND (日期=22 OR 日期=24),2);
白露:=信號過濾(月份=9 AND (日期=7OR 日期=9 ),2);
秋分:=信號過濾(月份=9 AND (日期=22 OR 日期=24),2);
寒露:=信號過濾(月份=10 AND (日期=7OR 日期=9 ),2);
霜降:=信號過濾(月份=10 AND (日期=22 OR 日期=24),2);
立冬:=信號過濾(月份=11 AND (日期=7OR 日期=9 ),2);
小雪:=信號過濾(月份=11 AND (日期=22 OR 日期=24),2);
大雪:=信號過濾(月份=12 AND (日期=6OR 日期=8 ),2);
冬至:=信號過濾(月份=12 AND (日期=21 OR 日期=23),2);
小寒:=信號過濾(月份=1 AND (日期=5OR 日期=7 ),2);
大寒:=信號過濾(月份=1 AND (日期=19 OR 日期=21),2);
顯示文字(立春,最高價*1.02,'立春'),COLORgreen,ALIGN1;
顯示文字(雨水,最高價*1.02,'雨水'),COLORgreen,ALIGN1;
顯示文字(驚蟄,最高價*1.02,'驚蟄'),COLORgreen,ALIGN1;
顯示文字(春分,最高價*1.02,'春分'),COLORgreen,ALIGN1;
顯示文字(清明,最高價*1.02,'清明'),COLORgreen,ALIGN1;
顯示文字(谷雨,最高價*1.02,'谷雨'),COLORgreen,ALIGN1;
顯示文字(立夏,最高價*1.02,'立夏'),COLORMAGENTA,ALIGN1;
顯示文字(小滿,最高價*1.02,'小滿'),COLORMAGENTA,ALIGN1;
顯示文字(芒種,最高價*1.02,'芒種'),COLORMAGENTA,ALIGN1;
顯示文字(夏至,最高價*1.02,'夏至'),COLORMAGENTA,ALIGN1;
顯示文字(小暑,最高價*1.02,'小暑'),COLORMAGENTA,ALIGN1;
顯示文字(大署,最高價*1.02,'大署'),COLORMAGENTA,ALIGN1;
顯示文字(立秋,最高價*1.02,'立秋'),COLORYELLOW,ALIGN1;
顯示文字(處暑,最高價*1.02,'處暑'),COLORYELLOW,ALIGN1;
顯示文字(白露,最高價*1.02,'白露'),COLORYELLOW,ALIGN1;
顯示文字(秋分,最高價*1.02,'秋分'),COLORYELLOW,ALIGN1;
顯示文字(寒露,最高價*1.02,'寒露'),COLORYELLOW,ALIGN1;
顯示文字(霜降,最高價*1.02,'霜降'),COLORYELLOW,ALIGN1;
顯示文字(立冬,最高價*1.02,'立冬'),COLORWHITE,ALIGN1;
顯示文字(小雪,最高價*1.02,'小雪'),COLORWHITE,ALIGN1;
顯示文字(大雪,最高價*1.02,'大雪'),COLORWHITE,ALIGN1;
顯示文字(冬至,最高價*1.02,'冬至'),COLORWHITE,ALIGN1;
顯示文字(小寒,最高價*1.02,'小寒'),COLORWHITE,ALIGN1;
顯示文字(大寒,最高價*1.02,'大寒'),COLORWHITE,ALIGN1;<!--++ plugin_code qcomic begin-->

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?