相關標簽:

?

同花順均衡圖副圖指標源碼

?

原理解析：
填充背景 AA賦值:(120日內最高價的最高值-120日內最低價的最低值)/30 VAR1賦值:(2*收盤價+最高價+最低價)/4 輸出轉換線:(8日內最高價的最高值+8日內最低價的最低值)/2,畫紅色,線寬為2 輸出基準線:(22日內最高價的最高值+22日內最低價的最低值)/2,畫綠色,線寬為2 輸出先行線:22日前的收盤價,畫黃色 輸出云帶A:22日前的(轉換線+基準線)/2,COLORFFFFFF 輸出云帶B:22日前的(44日內最高價的最高值+44日內最低價的最低值)/2,COLORFFFFFF 當滿足條件云帶A<云帶B時,在云帶A和云帶B位置之間畫柱狀線,寬度為0.1,0不為0則畫空心柱.,COLORCEFFFF,POINTDOT 當滿足條件云帶A>=云帶B時,在云帶A和云帶B位置之間畫柱狀線,寬度為0.1,0不為0則畫空心柱.,COLORFF00FF,POINTDOT 當滿足條件轉換線上穿基準線ANDVAR1<云帶A和云帶B的較小值時,在基準線和最低價的較小值*0.995位置書寫文字,畫紅色 當滿足條件基準線上穿轉換線ANDVAR1>云帶A和云帶B的較大值時,在基準線和最高價的較大值+AA位置書寫文字,COLORFF9966 當滿足條件收陽線時,在開盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收陽線時,在收盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件開盤價>=收盤價時,在收盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在開盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為10,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 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為10,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位置之間畫柱狀線,寬度為10,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位置之間畫柱狀線,寬度為10,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位置之間畫柱狀線,寬度為10,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位置之間畫柱狀線,寬度為10,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位置之間畫柱狀線,寬度為10,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 AC賦值:成交額(元)/(成交量(手)) YY賦值:AC的13日簡單移動平均 LLL賦值:(收盤價-YY)/YY*100 賦值: 收盤價的21日簡單移動平均 UPPERC賦值: MIDC + 2*收盤價的21日估算標準差 LOWERC賦值: MIDC - 2*收盤價的21日估算標準差 BBA賦值:(收盤價-LOWERC)/(UPPERC-LOWERC) BBC賦值:BBA的3日線性回歸預測值 LIFENGCYC賦值:(1日前的LLL<-15 AND 1日前的BBA<0 AND LLL>1日前的LLL) 當滿足條件LIFENGCYC>0時,在最低價*0.99位置書寫文字,COLORFFFFFF TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

DRAWGBK(DATE>900103,STRIP(RGB(80,110,255),RGB(120,160,255),2));
AA:=(HHV(HIGH,120)-LLV(LOW,120))/30;
var1:=(2*CLOSE+HIGH+LOW)/4;
轉換線:(HHV(H,8)+LLV(L,8))/2,colorred,LINETHICK2;
基準線:(HHV(H,22)+LLV(L,22))/2,colorgreen,linethick2;
先行線:REF(C,22),coloryellow;
云帶A:REF((轉換線+基準線)/2,22),ColorFFFFFF;
云帶B:REF((HHV(H,44)+LLV(L,44))/2,22),ColorFFFFFF;
STICKLINE(云帶A<云帶B,云帶A,云帶B,0.1,0),ColorCEFFFF,POINTDOT;
STICKLINE(云帶A>=云帶B,云帶A,云帶B,0.1,0),COLORff00ff,POINTDOT;
DRAWTEXT(CROSS(轉換線,基準線) AND var1<MIN(云帶A,云帶B),MIN(基準線,LOW)*0.995,'▲'),colorred;
DRAWTEXT(CROSS(基準線,轉換線) AND var1>MAX(云帶A,云帶B),MAX(基準線,HIGH)+AA,'▼'),COLORFF9966;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,10,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,10,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,10,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,10,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,10,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,10,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,10,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;
AC:=AMOUNT/(VOL);
YY:=MA(AC,13);
LLL:=(C-YY)/YY*100;
MIDC := MA(CLOSE,21);
UPPERC:= MIDC + 2*STD(C,21);
LOWERC:= MIDC - 2*STD(C,21);
BBA:=(C-LOWERC)/(UPPERC-LOWERC);
BBC:=FORCAST(BBA,3);
LIFENGCYC:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1));
DRAWTEXT(LIFENGCYC>0,LOW*0.99,'☆'),colorffffff;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?