DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' 公眾號(hào)【創(chuàng)新指標(biāo)公式源碼】',0); DRAWKLINE(H,O,L,C); Z1:=STRCAT(HYBLOCK,' '); Z2:=STRCAT(Z1,DYBLOCK); Z3:=STRCAT(Z2,' '); DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
LT:=LLVBARS(L,60); HT:=FINDHIGHBARS(H,LT+1,60,1); 鍋蓋:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORLIGREEN ,LINETHICK1; DRAWTEXT(CURRBARSCOUNT=20,鍋蓋*1.01,STRCAT(('鍋蓋:'),CON2STR(鍋蓋,2))),COLORLIGREEN;
{量王} 總量:=AMOUNT,VOLSTICK; 量比:=V/REF(MA(V,5),1),COLORBROWN,NODRAW; 幾倍:=1.9; 倍量量王:= 總量 >=REF(總量,1)*幾倍 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW; 天量:總量=HHV(總量,120), COLORRED;
量王:=天量&&倍量量王&&量比>2&&(BARSCOUNT(C)+1)>120,COLORGREEN; STICKLINE(量王,C,O,0.1,0),COLORYELLOW; 量王頂:DRAWLINE(量王,H,REF(量王,1),REF(H,1),1),COLORLIBLUE,LINETHICK1; DRAWTEXT(CURRBARSCOUNT=3,量王頂,STRCAT((''),CON2STR(量王頂,2))),COLORLIBLUE;
量王底:DRAWLINE(量王,L,REF(量王,1){ISLASTBAR},REF(L,1),1),COLORLIRED,LINETHICK1; DRAWTEXT(CURRBARSCOUNT=3,量王底,STRCAT((''),CON2STR(量王底,2))),COLORLIRED;
{莊家成本} AL0:=SUMBARS(V,CAPITAL*1); AL1:=SUM(COST(10),AL0)/AL0; AL2:=SUM(COST(20),AL0)/AL0; AL3:=SUM(COST(30),AL0)/AL0; AL4:=SUM(COST(40),AL0)/AL0; AL5:=SUM(COST(50),AL0)/AL0; 莊家成本2:=(5*AL1+4*AL2+3*AL3+2*AL4+AL5)/15,COLOR0080FF,DOTLINE; 莊家成本1:REFDATE(莊家成本2,DATE),COLORWHITE,DOTLINE; DRAWTEXT(CURRBARSCOUNT=50,莊家成本1,STRCAT('莊本:',CON2STR(莊家成本1,2))),COLORWHITE;
{小壓} HH1:=REF(C,9)=HHV(C,2*9+1); HH2:=FILTER(HH1,9); HH3:=BACKSET(HH2,9+1); HH4:=FILTER(HH3,9); 小壓:=REF(C*0.999,BARSLAST(HH4)),COLORWHITE,NODRAW; HH5:=ABS(REF(小壓,1)-小壓)>小壓*0.075 AND HH4; 小壓2:REF(C*0.999,BARSLAST(HH5)),COLORGRAY,DOTLINE; STICKLINE(C*0.999 AND ISLASTBAR,小壓2,小壓2,1,1), COLORLIGREEN;
GHCZS1:=REF(C,1); GHCZS2:=IF(C>=1,10000,100000); GHCZS3:=1.10*GHCZS1-49/GHCZS2; GHCZS4:=1.05*GHCZS1-49/GHCZS2; GHCZS5:=0.90*GHCZS1+51/GHCZS2; GHCZS6:=0.95*GHCZS1+51/GHCZS2; GHCZS7:=NAMELIKE('S') OR NAMELIKE('*S'); GHCZS8:=IF(GHCZS7,C>=GHCZS4,C>=GHCZS3); GHCZS9:=IF(GHCZS7,C<=GHCZS6,C<=GHCZS5); GHCZS10:=IF(GHCZS7,H>=GHCZS4,H>=GHCZS3); GHCZS11:=IF(GHCZS7,L<=GHCZS6,L<=GHCZS5); GHCZS12:=C/REF(C,1)>1.099 AND H=C AND H>L,NODRAW; GHCZS13:=SMA(MAX(CLOSE-REF(CLOSE,1),0),2,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),2,1)*100; GHCZS14:=CROSS(GHCZS13,50) AND BARSLAST(GHCZS12)<=10 AND BARSLAST(GHCZS12)>0; GHCZS15:=CROSS(GHCZS13,50) AND BARSLAST(GHCZS12)=0 AND COUNT(GHCZS12,10)=2; GHCZS16:=GHCZS14 OR GHCZS15;
GHCZS17:=BARSNEXT(GHCZS16)<=10,NODRAW; GHCZS18:=BARSLAST(GHCZS16); GHCZS22:=(C-REF(C,1))/REF(C,1)*100; GHCZS23:=GHCZS18<=15 AND GHCZS22>=5;
STICKLINE(GHCZS8,O,C,2,0),COLORMAGENTA; STICKLINE(GHCZS9,O,C,2,0),COLORLICYAN;DRAWSL(GHCZS12 AND GHCZS17,(O+C)/2,0,15,0),COLORLIGRAY; STICKLINE(GHCZS12 AND GHCZS17,L,L,20,-1),COLORGREEN; DRAWTEXT(GHCZS12 AND GHCZS17,L*0.98,VARCAT(VAR2STR(L-0.01,2),'')),COLORGREEN; STICKLINE(GHCZS23,C,O,2,0),COLORFF0080;
STICKLINE(GHCZS16,C,O,2,0),COLORYELLOW; DRAWTEXT(GHCZS16,L*0.98,'買(mǎi)'),COLORYELLOW;
{顧比} P:=21; 擒股指標(biāo)1:=IF(L=LLV(L,P),L,DRAWNULL); 擒股指標(biāo)2:=CONST(BARSLAST(擒股指標(biāo)1!=DRAWNULL)); 擒股指標(biāo)3:=CONST(IF(擒股指標(biāo)2=0,H,REF(H,擒股指標(biāo)2))); 擒股指標(biāo)4:=CONST(REF(BARSLAST(H>擒股指標(biāo)3),擒股指標(biāo)2+1)+擒股指標(biāo)2+1); 擒股指標(biāo)5:=CONST(IF(擒股指標(biāo)4=0,H,REF(H,擒股指標(biāo)4))); 擒股指標(biāo)6:=CONST(REF(BARSLAST(H>擒股指標(biāo)5),擒股指標(biāo)4+1)+擒股指標(biāo)4+1); 顧比:IF(CURRBARSCOUNT<=擒股指標(biāo)2+21,CONST(IF(擒股指標(biāo)6=0,H,REF(H,擒股指標(biāo)6))),DRAWNULL),COLORYELLOW; DRAWTEXT(CURRBARSCOUNT=20,顧比,STRCAT(('顧比:'),CON2STR(顧比,2))),COLORYELLOW; STICKLINE(CROSS(C,顧比)AND V>REF(V,1),L,L,5,0),COLORYELLOW;
|