相關標簽: 封成比計算指標公式 、 通達信公式源代碼大全 、 通達信普通k線指標源碼 、 通達信顏色數字代碼 、 第一最牛指標通達信 、 通達信顏色函數大全 、 通達信顏色源碼 、

?

原理解析：
VAR1賦值:(2*收盤價+最高價+最低價+開盤價)/5 輸出A1: (VAR1的3日指數移動平均+VAR1的6日指數移動平均+VAR1的12日指數移動平均+VAR1的24日指數移動平均)/4 輸出A2: A1的2日指數移動平均 輸出A3: A2的2日指數移動平均 輸出A4: A3的2日指數移動平均 輸出A5: A4的2日指數移動平均 輸出A6: A5的2日指數移動平均 輸出A7: A6的2日指數移動平均 輸出A8: VAR1的2.78日指數移動平均*1.028 輸出A9: 開盤價的3.2日簡單移動平均*1.028 輸出安全線: 收盤價的55日指數移動平均, CIRCLEDOT 輸出蕕利比例:以收盤價計算的獲利盤比例*100,線寬為0, COLORFF00FF,PRECIS2 輸出市盈率:市盈(動),線寬為0,畫黃色,PRECIS2 輸出市凈率:買量(即買一量),線寬為0,COLORFF00FF ,PRECIS2 流通股賦值:FINANCE2(37) 每股收益賦值:FINANCE2(3) 每股公積賦值:FINANCE2(7) 未分配利潤賦值:FINANCE2(8) 每股凈資產賦值:FINANCE2(4) 凈資產收益率賦值:FINANCE2(5) 總股本賦值:FINANCE2(35) 股東權益比賦值:FINANCE2(9) 限售A股賦值:FINANCE2(41) 流通B股賦值:FINANCE2(38) 流通H股賦值:FINANCE2(39) 輸出DRAWTEXTABS(25,00,'總股本: '+NUMTOSTRN(總股本,2)+' 萬股'),COLORFF00FF 輸出DRAWTEXTABS(200,00,'流通A股: '+NUMTOSTRN(流通股,2)+' 萬股'),COLOR00FFFF 輸出DRAWTEXTABS(360,00,'流通B股: '+NUMTOSTRN(流通B股,2)+' 萬股'),COLORFF00FF 輸出DRAWTEXTABS(25,15,'限售A股: '+NUMTOSTRN(限售A股,2)+' 萬股'),COLORFF00FF 輸出DRAWTEXTABS(200,15,'流通H股: '+NUMTOSTRN(流通H股,2)+' 萬股'),COLOR00FFFF 輸出DRAWTEXTABS(25,30,'每股收益: '+NUMTOSTRN(每股收益,2)+' 元'),COLORFF00FF 輸出DRAWTEXTABS(200,30,'每股凈資產: '+NUMTOSTRN(每股凈資產,2)+' 元'),COLOR00FFFF 輸出DRAWTEXTABS(25,45,'凈資產收益率: '+NUMTOSTRN(凈資產收益率,2)+' %'),COLORFF00FF 輸出DRAWTEXTABS(200,45,'未分配利潤: '+NUMTOSTRN(未分配利潤,2)+' 元'),COLOR00FFFF 輸出DRAWTEXTABS(25,60,'每股公積: '+NUMTOSTRN(每股公積,2)+' 元'),COLORFF00FF 輸出DRAWTEXTABS(200,60,'股東權益比: '+NUMTOSTRN(股東權益比,2)+' %'),COLOR00FFFF 輸出DRAWTEXTABS(25,75,'機構評級:'+EXTRASTRING('評級')),COLORFF00FF 輸出DRAWTEXTABS(25,90,'所屬板塊:'+BKNAME),COLORFF00FF 當滿足條件收陽線時,在開盤價和最低價位置之間畫柱狀線,寬度為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賦值:收盤價= 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日前的收盤價 當滿足條件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賦值:收盤價=4日內收盤價的最高值 AND 1日前的收盤價=4日內收盤價的最低值 當滿足條件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賦值:收盤價=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日前的收盤價 當滿足條件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賦值:1日前的收盤價=4日內收盤價的最低值 AND 收盤價>=2日前的收盤價 OR 2日前的收盤價=4日內收盤價的最低值 AND 1日前的收盤價<=3日前的收盤價 AND 2日前的收盤價<4日前的收盤價 AND 收盤價>=1日前的收盤價 當滿足條件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賦值:1日前的收盤價=4日內收盤價的最高值 AND 收盤價<2日前的收盤價 OR (2日前的收盤價=4日內收盤價的最高值 AND 1日前的收盤價>3日前的收盤價 OR 3日前的收盤價=4日內收盤價的最高值 AND 1日前的收盤價>2日前的收盤價) AND 2日前的收盤價>=4日前的收盤價 AND 收盤價<1日前的收盤價 當滿足條件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

?

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

源碼：

?

Var1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1: (EMA(Var1,3)+EMA(Var1,6)+EMA(Var1,12)+EMA(Var1,24))/4;
A2: EMA(A1,2);
A3: EMA(A2,2);
A4: EMA(A3,2);
A5: EMA(A4,2);
A6: EMA(A5,2);
A7: EMA(A6,2);
A8: EMA(Var1,2.78)*1.028;
A9: MA(OPEN,3.2)*1.028;
安全線: EMA(CLOSE,55), CIRCLEDOT;
{財務原碼}
蕕利比例:WINNER(c )*100,linethick0, colorFF00FF,precis2;
市盈率:DYNAINFO(39),linethick0,COLORYELLOW,precis2 ;
市凈率:DYNAINFO(58),linethick0,colorFF00FF ,precis2;
流通股:=FINANCE2(37);
每股收益:=FINANCE2(3);
每股公積:=FINANCE2(7);
未分配利潤:=FINANCE2(8);
每股凈資產:=FINANCE2(4);
凈資產收益率:=FINANCE2(5);
總股本:=FINANCE2(35) ;
股東權益比:=FINANCE2(9);
限售A股:=FINANCE2(41);
流通B股:=FINANCE2(38);
流通H股:=FINANCE2(39);
DRAWTEXTABS(25,00,'總股本: '+NUMTOSTRN(總股本,2)+' 萬股'),colorFF00FF;
DRAWTEXTABS(200,00,'流通A股: '+NUMTOSTRN(流通股,2)+' 萬股'),Color00FFFF;
DRAWTEXTABS(360,00,'流通B股: '+NUMTOSTRN(流通B股,2)+' 萬股'),colorFF00FF;
DRAWTEXTABS(25,15,'限售A股: '+NUMTOSTRN(限售A股,2)+' 萬股'),colorFF00FF;
DRAWTEXTABS(200,15,'流通H股: '+NUMTOSTRN(流通H股,2)+' 萬股'),Color00FFFF;
DRAWTEXTABS(25,30,'每股收益: '+NUMTOSTRN(每股收益,2)+' 元'),colorFF00FF;
DRAWTEXTABS(200,30,'每股凈資產: '+NUMTOSTRN(每股凈資產,2)+' 元'),Color00FFFF;
DRAWTEXTABS(25,45,'凈資產收益率: '+NUMTOSTRN(凈資產收益率,2)+' %'),colorFF00FF;
DRAWTEXTABS(200,45,'未分配利潤: '+NUMTOSTRN(未分配利潤,2)+' 元'),Color00FFFF;
DRAWTEXTABS(25,60,'每股公積: '+NUMTOSTRN(每股公積,2)+' 元'),colorFF00FF;
DRAWTEXTABS(200,60,'股東權益比: '+NUMTOSTRN(股東權益比,2)+' %'),Color00FFFF;
DRAWTEXTABS(25,75,'機構評級:'+Extrastring('評級')),colorFF00FF;
DRAWTEXTABS(25,90,'所屬板塊:'+BKNAME),colorFF00FF;

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:=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);
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:=c=hhv(c,4) and ref(c,1)=llv(c,4);
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:=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);
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:=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);
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:=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);
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;
{程序化交易 www.weiqiv.net.cn }

?

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

?