【精選指標】通達信【機構籌碼封頂】主圖指標源碼分享，助你股海擒牛！

DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130);

DA:=IF(CURRBARSCOUNT>DA1,0,DA1);

HI:=REFDATE(HHV(H,DA),DATE);

LO:=REFDATE(LLV(L,DA),DATE);

C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);

GZ:=EXP(LN(HI/LO)/10);

章魚哥1:=SUM(IF(C1>=(HI/GZ),V,0),DA);

章魚哥2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1< (HI/GZ),V,0),DA);

章魚哥3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1< (HI/POW(GZ,2)),V,0),DA);

章魚哥4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1< (HI/POW(GZ,3)),V,0),DA);

章魚哥5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1< (HI/POW(GZ,4)),V,0),DA);

章魚哥6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1< (HI/POW(GZ,5)),V,0),DA);

章魚哥7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1< (HI/POW(GZ,6)),V,0),DA);

章魚哥8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1< (HI/POW(GZ,7)),V,0),DA);

章魚哥9:=SUM(IF(C1>=(LO*GZ) AND C1< LO*POW(GZ,2),V,0),DA);

章魚哥10:=SUM(IF(C1>=LO AND C1< LO*GZ,V,0),DA);

L1:=REFDATE(HHV(章魚哥1,DA),DATE);

L2:=REFDATE(HHV(章魚哥2,DA),DATE);

L3:=REFDATE(HHV(章魚哥3,DA),DATE);

L4:=REFDATE(HHV(章魚哥4,DA),DATE);

L5:=REFDATE(HHV(章魚哥5,DA),DATE);

L6:=REFDATE(HHV(章魚哥6,DA),DATE);

L7:=REFDATE(HHV(章魚哥7,DA),DATE);

L8:=REFDATE(HHV(章魚哥8,DA),DATE);

L9:=REFDATE(HHV(章魚哥9,DA),DATE);

L10:=REFDATE(HHV(章魚哥10,DA),DATE);

SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);

ZT:=C/REF(C,1)>1.094 AND H=C;

STICKLINE(ZT,C,O,3.0,0),COLORYELLOW;

W5:COST(5),DOTLINE;

W95:COST(95),DOTLINE;

C2:W95-W5,NODRAW;

獲利籌碼:CONST( (C)*100),NODRAW;

ZG:=HHV(H,598);

BZ:=C2/ZG*100,NODRAW;

JZ:=BZ< 20 AND CROSS(C,COST(90)) AND C/REF(C,1)>1.0618;

DRAWICON(JZ,L*0.989,38);

GJ:=HHV(H,21),COLORRED,POINTDOT;

ZTS:BARSLAST(GJ<>REF(GJ,1))>=6,NODRAW;

TJ1:=BARSLAST(GJ=REF(GJ,1));

HX:H>IF(ZTS=1,REF(GJ,1),DRAWNULL),NODRAW;

AA1:=REF(GJ,21)=HHV(GJ,2*21+1);

BB1:=FILTER(AA1,21);

CC1:= (BB1,21+1);

DD1:=FILTER(CC1,21),NODRAW;

前期高點:=REF(GJ,BARSLAST(DD1)),COLORFF00FF,DOTLINE;

PT:STICKLINE(C>0,前期高點,前期高點,1,0),COLORRED;

PL1:=(CROSS(C,REF(前期高點,1))OR L< 前期高點 AND C>前期高點) AND C/REF(C,1)>=1.098 AND C=H,NODRAW;

STICKLINE(PL1,(C+O)/2,C,3,0),COLORRED;

HL:=(COST(97)-COST(3))/10;

章魚1:= (COST(3)+HL*1)- (COST(3)+HL*0);

章魚2:= (COST(3)+HL*2)- (COST(3)+HL*1);

章魚3:= (COST(3)+HL*3)- (COST(3)+HL*2);

章魚4:= (COST(3)+HL*4)- (COST(3)+HL*3);

章魚5:= (COST(3)+HL*5)- (COST(3)+HL*4);

章魚6:= (COST(3)+HL*6)- (COST(3)+HL*5);

章魚7:= (COST(3)+HL*7)- (COST(3)+HL*6);

章魚8:= (COST(3)+HL*8)- (COST(3)+HL*7);

章魚9:= (COST(3)+HL*9)- (COST(3)+HL*8);

章魚10:= (COST(3)+HL*10)- (COST(3)+HL*9);DRAWTEXT_FIX(C>O,0.01,0.51,0,'更多精彩指標公式，請關注微信公眾號：通達信指標公式'),COLORYELLOW;

MX章魚:=MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(章魚1,章魚2),章魚3),章魚4),章魚5),章魚6),章魚7),章魚8),章魚9),章魚10);

峰價上:=IF(章魚10>=MX章魚,COST(3)+HL*10,IF(章魚9>=MX章魚,COST(3)+HL*9,IF(章魚8>=MX章魚,COST(3)+HL*8,IF(章魚7>=MX章魚,COST(3)+HL*7,IF(章魚6>=MX章魚,COST(3)+HL*6,IF(章魚5>=MX章魚,COST(3)+HL*5,IF(章魚4>=MX章魚,COST(3)+HL*4,IF(章魚3>=MX章魚,COST(3)+HL*3,IF(章魚2>=MX章魚,COST(3)+HL*2,IF(章魚1>=MX章魚,COST(3)+HL*1,0)))))))))),COLORWHITE;

峰價下:=峰價上-HL;

峰價中:=峰價上-HL*0.5;

峰量:MX章魚*100,NODRAW;

CB:=COST(60)> REF(COST(60),1);

XG:=REF(C,1)< 峰價中 AND CROSS(C,峰價中) AND CB;

DRAWICON(XG,峰價中,1);

ZYG36:=COST(1);

ZYG37:=COST(10);

ZYG38:=COST(20);

ZYG39:=COST(30);

ZYG40:=COST(40);

ZYG41:=COST(50);

ZYG42:=COST(60);

ZYG43:=COST(70);

ZYG44:=COST(80);

ZYG45:=COST(90);

ZYG46:=COST(99);

ZYG47:=COST(5);

ZYG48:=COST(15);

ZYG49:=COST(25);

ZYG50:=COST(35);

ZYG51:=COST(45);

ZYG52:=COST(55);

ZYG53:=COST(65);

ZYG54:=COST(75);

ZYG55:=COST(85);

ZYG56:=COST(95);

ZYG57:=ZYG47-ZYG36;

ZYG58:=ZYG37-ZYG47;

ZYG59:=ZYG48-ZYG37;

ZYG60:=ZYG38-ZYG48;

ZYG61:=ZYG49-ZYG38;

ZYG62:=ZYG39-ZYG49;

ZYG63:=ZYG50-ZYG39;

ZYG64:=ZYG40-ZYG50;

ZYG65:=ZYG51-ZYG40;

ZYG66:=ZYG41-ZYG51;

ZYG67:=ZYG52-ZYG41;

ZYG68:=ZYG42-ZYG52;

ZYG69:=ZYG53-ZYG42;

ZYG70:=ZYG43-ZYG53;

ZYG71:=ZYG54-ZYG43;

ZYG72:=ZYG44-ZYG54;

ZYG73:=ZYG55-ZYG44;

ZYG74:=ZYG45-ZYG55;

ZYG75:=ZYG56-ZYG45;

ZYG76:=ZYG46-ZYG56;

ZYG77:=MIN(ZYG57,MIN(ZYG58,MIN(ZYG59,MIN(ZYG60,MIN(ZYG61,MIN(ZYG62,MIN(ZYG63,MIN(ZYG64,MIN(ZYG65,MIN(ZYG66,MIN(ZYG67,MIN(ZYG68,MIN(ZYG69,MIN(ZYG70,MIN(ZYG71,MIN(ZYG72,MIN(ZYG73,MIN(ZYG74,MIN(ZYG75,ZYG76)))))))))))))))))));

ZYG78:=IF(ZYG57=ZYG77,(ZYG47+ZYG36)/2,IF(ZYG58=ZYG77,(ZYG47+ZYG37)/2,IF(ZYG59=ZYG77,(ZYG48+ZYG37)/2,IF(ZYG60=ZYG77,(ZYG48+ZYG38)/2,IF(ZYG61=ZYG77,(ZYG49+ZYG38)/2,IF(ZYG62=ZYG77,(ZYG49+ZYG39)/2,IF(ZYG63=ZYG77,(ZYG50+ZYG39)/2,IF(ZYG64=ZYG77,(ZYG50+ZYG40)/2,IF(ZYG65=ZYG77,(ZYG51+ZYG40)/2,IF(ZYG66=ZYG77,(ZYG51+ZYG41)/2,IF(ZYG67=ZYG77,(ZYG52+ZYG41)/2,IF(ZYG68=ZYG77,(ZYG52+ZYG42)/2,IF(ZYG69=ZYG77,(ZYG53+ZYG42)/2,IF(ZYG70=ZYG77,(ZYG53+ZYG43)/2,IF(ZYG71=ZYG77,(ZYG54+ZYG43)/2,IF(ZYG72=ZYG77,(ZYG54+ZYG44)/2,IF(ZYG73=ZYG77,(ZYG55+ZYG44)/2,IF(ZYG74=ZYG77,(ZYG55+ZYG45)/2,IF(ZYG75=ZYG77,(ZYG56+ZYG45)/2,(ZYG56+ZYG46)/2)))))))))))))))))));

籌碼峰線:ZYG78,NODRAW,COLOR00EEEE;

STICKLINE(ISLASTBAR,籌碼峰線,籌碼峰線*1.001,60,0),COLORWHITE,COLORLIMAGENTA;

籌碼頂峰:=IF(CROSS(C,籌碼峰線),1,0);

DRAWICON(籌碼頂峰 AND ZT,L*0.98,9);

使用說明：

當股價在下方的成本線獲得支撐并出現“錢袋子”買入信號時，我會考慮進場建倉。建倉后，我會關注紅色橫線所代表的籌碼峰值區域，如果籌碼峰保持穩定，我會持續持有股票，等待價格突破。一旦股價突破上方的獲利均價線，我會繼續持有或根據市場情況適當加倉；如果股價跌破獲利均價線，我將選擇離場以避免潛在的損失。