相關標簽:波浪理論指標公式 、 通達信波浪尺指標公式 、 波浪尺的畫法視頻 、 波浪尺的原理 、 波浪提示指標公式 、 通達信趨勢浪指標 、 波浪尺理論 、 135指標公式 、 波浪尺最正確的方法 、 波浪尺的應用技巧 、 波浪尺數值判斷技巧 、 波浪尺的運用 、

?

長短支壓精美主圖直接上源碼，并在此感謝一品大師的“燒香拜佛”理念！（個人理解在圖片中，歡迎批評指正。）

?

?

?

原理解析：
填充背景,COLOR000000 輸出DRAWTEXTABS(12,8, '所屬板塊: '+BKNAME),COLOR888888 輸出輸出輸出DRAWTEXTABS(12,21,'每股收益: '+NUMTOSTRN(FINANCE2(3),2)+'元 '+' 市盈率:'+NUMTOSTRN(市盈(動),1)+'倍 '+' 每股公積金:'+NUMTOSTRN(FINANCE2(7),2)+'元'),COLOR888888 輸出DRAWTEXTABS(12,34,'總 股 本: '+NUMTOSTRN(FINANCE2(35),2)+'萬股'),COLOR888888 輸出DRAWTEXTABS(12,47,'流通 A股: '+NUMTOSTRN(FINANCE2(37),2)+'萬股'),COLOR888888 AA1賦值:20日前的收盤價=2*20+1日內收盤價的最高值 AB1賦值:AA1的20日過濾 AC1賦值:若AB1則將最近20+1周期置為1 HD賦值:AC1的20日過濾 AA2賦值:20日前的收盤價=2*20+1日內收盤價的最低值 B2賦值:AA2的20日過濾 AC2賦值:若B2則將最近20+1周期置為1 LD賦值:AC2的20日過濾 A賦值:上次HD距今天數日前的收盤價 B賦值:上次LD距今天數日前的收盤價 T1賦值:上次HD距今天數 AND 上次LD距今天數 AND 取反 當滿足條件T1時,在A和A位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORDD8800 當滿足條件T1時,在B和B位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00AA00 ST賦值:(收盤價/開盤價-1)*100 Z，賦值:(收盤價/1日前的收盤價-1)*100 SX1賦值:ST>3 AND ST=6日內ST的最高值 SX2賦值:Z，>3 AND Z，=6日內Z，的最高值 SX3賦值:Z，>=9 AND 收盤價=最高價 燒香賦值:如果SX1ORSX2ORSX3,返回1,否則返回0 DYSJ賦值:上次燒香距今天數 跟蹤賦值:如果DYSJ<=13ANDCOUNT(收盤價>DYSJ日前的最低價,DYSJ)>=DYSJ-1,返回DYSJ,否則返回0 關注賦值:如果DYSJ>=4ANDCOUNT(收盤價>DYSJ日前的收盤價,3)>=3,返回DYSJ日前的收盤價,否則返回DYSJ日前的最低價 ②賦值:如果關注=DYSJ日前的最低價,返回DYSJ日前的收盤價,否則返回DYSJ日前的最低價 PUU賦值:若DISPSTATUS=2則將最近跟蹤周期置為1 輸出壓力:當滿足條件跟蹤時,在②和關注位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR666666,LAYER7 輸出支撐:當滿足條件跟蹤時,在關注和②位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR666666,LAYER7 當滿足條件燒香時,在最低價位置書寫文字,COLOR0000FF,ALIGN1 DRAWFLAGTEXT(燒香,最低價,'⊙走上短線平臺,注意上下支撐！'),COLOR0000FF 當滿足條件收陽線時,在開盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收陽線時,在收盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件開盤價>=收盤價時,在收盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在開盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFF7700 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF9900 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFFBB00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFFCC00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFDD00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFEE00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFFFF00 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱. ,COLOR000055 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱. ,COLOR000066 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱. ,COLOR000077 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱. ,COLOR000099 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱. ,COLOR0000BB 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱. ,COLOR0000DD 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,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位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR000055 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR000066 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR000077 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR000099 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0000BB 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000DD 當滿足條件VAR9Q時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000FF VARAQ賦值:收盤價=4日內收盤價的最高值 AND 1日前的收盤價=4日內收盤價的最低值 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFF11FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF33FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF55FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF77FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF99FF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFBBFF 當滿足條件VARAQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,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位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR333333 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR555555 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR777777 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR999999 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORBBBBBB 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORDDDDDD 當滿足條件VARBQ時,在收盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFFFFFF VARCQ賦值:1日前的收盤價=4日內收盤價的最低值 AND 收盤價>=2日前的收盤價 OR 2日前的收盤價=4日內收盤價的最低值 AND 1日前的收盤價<=3日前的收盤價 AND 2日前的收盤價<4日前的收盤價 AND 收盤價>=1日前的收盤價 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR003300 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR005500 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR007700 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR009900 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00BB00 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00DD00 當滿足條件VARCQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,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位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFF1100 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF3300 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF5500 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF7700 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF9900 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFBB00 當滿足條件VARDQ時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFFDD00 CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 輸出WARNING('HTTP://www.kzuj.com.cn',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指標公式')

?

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

源碼：

?

DRAWGBK(c>0),color000000;
DRAWTEXTABS(12,8, '所屬板塊: '+BKNAME),Color888888;
DRAWTEXTABS(12,21,'每股收益: '+NUMTOSTRN(FINANCE2(3),2)+'元 '+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),1)+'倍 '+' 每股公積金:'+NUMTOSTRN(FINANCE2(7),2)+'元'),Color888888;
DRAWTEXTABS(12,34,'總 股 本: '+NUMTOSTRN(FINANCE2(35),2)+'萬股'),Color888888;
DRAWTEXTABS(12,47,'流通 A股: '+NUMTOSTRN(FINANCE2(37),2)+'萬股'),Color888888;
{以下設置長支壓}
AA1:=REF(CLOSE,20)=HHV(CLOSE,2*20+1);
AB1:=FILTER(AA1,20);
AC1:=BACKSET(AB1,20+1);
HD:=FILTER(AC1,20);
AA2:=REF(CLOSE,20)=LLV(CLOSE,2*20+1);
B2:=FILTER(AA2,20);
AC2:=BACKSET(B2,20+1);LD:=FILTER(AC2,20);A:=REF(CLOSE,BARSLAST(HD));
B:=REF(CLOSE,BARSLAST(LD));
t1:=BARSLAST(HD) and BARSLAST(LD) AND NOT(LD);
STICKLINE(t1,A,A,6,0),ColorDD8800;STICKLINE(t1,B,B,6,0),Color00AA00;
{以下設置短支壓}
ST:=(CLOSE/OPEN-1)*100;
Z，:=(C/REF(C,1)-1)*100;
SX1:=ST>3 AND ST=HHV(ST,6);
SX2:=Z，>3 AND Z，=HHV(Z，,6);
SX3:=Z，>=9 AND CLOSE=HIGH;
燒香:=IF(SX1 OR SX2 OR SX3,1,0);
DYSJ:=BARSLAST(燒香);
跟蹤:=IF(DYSJ<=13 AND COUNT(C>REF(L,DYSJ),DYSJ)>=DYSJ-1,DYSJ,0);
關注:=IF(DYSJ>=4 AND COUNT(C>REF(C,DYSJ),3)>=3,REF(C,DYSJ),REF(L,DYSJ));
②:=IF(關注=REF(L,DYSJ),REF(C,DYSJ),REF(L,DYSJ));
PUU:=BACKSET(DISPSTATUS=2,跟蹤);
壓力:STICKLINE(跟蹤,②,關注,10,0),COLOR666666,LAYER7;
支撐:STICKLINE(跟蹤,關注,②,10,0),COLOR666666,LAYER7;
{壓力:STICKLINE(PUU AND 跟蹤,②,關注,10,0),COLOR666666,LAYER7;
支撐:STICKLINE(PUU AND 跟蹤,關注,②,10,0),COLOR666666,LAYER7;}
DRAWTEXT(燒香,L,'﹡'),COLOR0000FF,ALIGN1;
DRAWFLAGTEXT(燒香,LOW,'⊙走上短線平臺,注意上下支撐！'),COLOR0000FF;
{以下設置立體K線};
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,8,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.5,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,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,8,0),color000055;
stickline(var9Q,c,(o+c)/2,7,0),color000066;
stickline(var9Q,c,(o+c)/2,6,0),color000077;
stickline(var9Q,c,(o+c)/2,5,0),color000099;
stickline(var9Q,c,(o+c)/2,4,0),color0000bb;
stickline(var9Q,c,(o+c)/2,3,0),color0000dd;
stickline(var9Q,c,(o+c)/2,1.5,0),color0000ff;
varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
stickline(varaQ,c,(o+c)/2,8,0),colorff11ff;
stickline(varaQ,c,(o+c)/2,7,0),colorff33ff;
stickline(varaQ,c,(o+c)/2,6,0),colorff55ff;
stickline(varaQ,c,(o+c)/2,5,0),colorff77ff;
stickline(varaQ,c,(o+c)/2,4,0),colorff99ff;
stickline(varaQ,c,(o+c)/2,3,0),colorffbbff;
stickline(varaQ,c,(o+c)/2,1.5,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,8,0),color333333;
stickline(varbQ,c,(o+c)/2,7,0),color555555;
stickline(varbQ,c,(o+c)/2,6,0),color777777;
stickline(varbQ,c,(o+c)/2,5,0),color999999;
stickline(varbQ,c,(o+c)/2,4,0),colorbbbbbb;
stickline(varbQ,c,(o+c)/2,3,0),colordddddd;
stickline(varbQ,c,(o+c)/2,1.5,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,8,0),color003300;
stickline(varcQ,o,(o+c)/2,7,0),color005500;
stickline(varcQ,o,(o+c)/2,6,0),color007700;
stickline(varcQ,o,(o+c)/2,5,0),color009900;
stickline(varcQ,o,(o+c)/2,4,0),color00bb00;
stickline(varcQ,o,(o+c)/2,3,0),color00dd00;
stickline(varcQ,o,(o+c)/2,1.5,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,8,0),colorff1100;
stickline(vardQ,o,(o+c)/2,7,0),colorff3300;
stickline(vardQ,o,(o+c)/2,6,0),colorff5500;
stickline(vardQ,o,(o+c)/2,5,0),colorff7700;
stickline(vardQ,o,(o+c)/2,4,0),colorff9900;
stickline(vardQ,o,(o+c)/2,3,0),colorffbb00;
stickline(vardQ,o,(o+c)/2,1.5,0),colorffdd00;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');




?

?

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

?