RC1:=REF(C,1); AA:=REF(H,8)=HHV(H,2*8+1); AA1:=REF(L,8)=LLV(L,2*8+1); QY:=BACKSET(AA,8+1); QY1:=BACKSET(AA1,8+1); CC2:=FILTER(QY,8) AND H=HHV(H,8+1); CC1:=FILTER(QY1,8) AND L=LLV(L,8+1); DDD:=BARSLAST(CC2); DD1:=BARSLAST(CC1); GDTS:=IF(CC2,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0); DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1); GDCS13:=CONST(REF(H,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1)); DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD1+1); GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2); GDCS23:=CONST(REF(H,DINGBUTS1-1)); DDCS23:=CONST(REF(L,DDTS2-1)); XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1); XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2); M:=INTPART(3*8/5); AAA:=REF(H,M)=HHV(H,2*M+1); QYY:=BACKSET(AAA,M+1); CCC:=FILTER(QYY,M) AND H=HHV(H,M+1); DDDD:=BARSLAST(CCC),NODRAW; GDTSS:=IF(CCC,CURRBARSCOUNT,0); DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS); GDCS11:=CONST(DINGBUTSS); DINGBUTS11:=REF(DINGBUTSS,DDDD+1); GDCS22:=CONST(DINGBUTS11); AA11:=REF(L,M)=LLV(L,2*M+1); QY11:=BACKSET(AA11,M+1); CC11:=FILTER(QY11,M) AND L=LLV(L,M+1); DD11:=BARSLAST(CC11); DDTSS:=IF(CC11,CURRBARSCOUNT,0); DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS); DDCS11:=CONST(DDTS11); DDTS22:=REF(DDTS11,DD11+1); DDCS22:=CONST(DDTS22); AA1F:=REF(H,5)=HHV(H,2*5+1); B1:=FILTER(AA1F,5); CH:=BACKSET(B1,5+1); D1:=FILTER(CH,5); R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1); AA2:=REF(L,5)=LLV(L,2*5+1); B2:=FILTER(AA2,5); C12:=BACKSET(B2,5+1); D2:=FILTER(C12,5); T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1); HIGHN:=10;LOWN:=10; AAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1); QYQ:=BACKSET(AAR,HIGHN+1); CCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1); DDDQQ:=BARSLAST(CCQ); GDTSQ:=IF(CCQ,CURRBARSCOUNT,0); DINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ); GDCS1Q:=CONST(DINGBUTSQ); DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1); GDCS2Q:=CONST(DINGBUTS1Q); AA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1); QY1Q:=BACKSET(AA1Q,LOWN+1); CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1); DD1Q:=BARSLAST(CC1Q); DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0); DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ); DDCS1Q:=CONST(DDTS1Q); DDTS2Q:=REF(DDTS1Q,DD1Q+1); DDCS2Q:=CONST(DDTS2Q); TJ2:=BACKSET(ISLASTBAR,SUMBARS(V,CAPITAL)); TJ3:=TJ2>REF(TJ2,1); 上:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORGRAY,LINETHICK1; 下:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORGRAY,LINETHICK1; IF(XG2,GDCS23,DRAWNULL),COLORC0C0C0,POINTDOT; IF(XG1,GDCS13,DRAWNULL),COLORC0C0C0,POINTDOT; IF(XD2,DDCS23,DRAWNULL),COLORC0C0C0,POINTDOT; IF(XD1,DDCS13,DRAWNULL),COLORC0C0C0,POINTDOT; 短压:DRAWLINE(D1,H,S11,H,1),COLOR808000; 短撑:DRAWLINE(D2,L,U11,L,1),COLOR808000; 高压:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORMAGENTA,LINETHICK1; 低撑:DRAWLINE(CURRBARSCOUNT=DDCS2Q,L,CURRBARSCOUNT=DDCS1Q,L,1),COLORMAGENTA,LINETHICK1; {以上为趋势线自动划线} Z1:=STRCAT(HYBLOCK,' '); Z2:=STRCAT(Z1,DYBLOCK); Z3:=STRCAT(Z2,' '); DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED; DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE; DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORLIGREEN;{老王} DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,FGBLOCK),COLORLIMAGENTA; DRAWTEXT_FIX(ISLASTBAR,0,0.12,0,EXTERNSTR(0,1)),COLORYELLOW;{融胜} 主力成本线:EMA(COST(9),250),COLORBROWN,DOTLINE; {牛马线买点公式升级版} MID:=(3*CLOSE+LOW+OPEN+HIGH)/6; 牛线:WMA(MID,20),COLORRED; 马线:MA(牛线,5),COLORWHITE; DRAWICON( FILTER(CROSS(牛线,马线),20),马线-0.002 ,1); DRAWTEXT(CROSS(牛线,马线),LOW*0.984,'买'),COLORRED,LINETHICK2; 止损价:H*0.95,LINETHICK0.5,COLORRED; 庄家:牛线,COLORRED; IF(庄家>=REF(庄家,1),庄家,DRAWNULL),COLORRED,LINETHICK4; IF(庄家<=REF(庄家,1),庄家,DRAWNULL),COLORGREEN,LINETHICK2; DRAWBAND(牛线,RGB(255,87,22),马线,RGB(0,30,255)); N1:=10; TK:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1; 量能平台:IF(CURRBARSCOUNT<=N1+3,CONST(IF(TK=0,C,REF(C,TK))),DRAWNULL),COLORGRAY,LINETHICK2; {NOTEXT_新量能点:IF(CURRBARSCOUNT=TK+1,量能平台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK5;} DRAWTEXT(ISLASTBAR,量能平台,'量能平台'),COLORGRAY; {稳涨} 红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW; 轨道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2; NOTEXT_升:IF(红轨道>=轨道,轨道,DRAWNULL),COLORMAGENTA,LINETHICK2; 大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA; 主力:机构+大户,NODRAW,COLORYELLOW; STICKLINE(主力>0,O,C,1.5,1),COLORRED; STICKLINE(主力<0,O,C,1.5,1),COLORCYAN; STICKLINE(大户>0,O,C,1,0),COLORMAGENTA; STICKLINE(大户<0,O,C,1,0),COLORGREEN; STICKLINE(机构>0 AND 大户>0,O,(O+C)/2,1,0),COLORRED; STICKLINE(机构<0 AND 大户>0,C,(O+C)/2,1,0),COLORCYAN; STICKLINE(机构>0 AND 大户<0,O,(O+C)/2,1,0)COLORMAGENTA; STICKLINE(机构<0 AND 大户<0,C,O,1,0)COLORLICYAN; 累计:=SUM(主力,30),COLORMAGENTA; 均值:=EMA(累计,MIN(10,30)),COLORWHITE; {红} STICKLINE(CROSS(累计,均值),H,L,0,0),COLORRED,LINETHICK1; STICKLINE(CROSS(累计,均值),CLOSE,OPEN,1.4,0),COLOR000088; STICKLINE(CROSS(累计,均值),CLOSE,OPEN,1,0),COLOR0000BB; STICKLINE(CROSS(累计,均值),CLOSE,OPEN,0.6,0),COLOR0000DD; STICKLINE(CROSS(累计,均值),CLOSE,OPEN,0,0),COLOR0000FF; {蓝} STICKLINE(CROSS(均值,累计),H,L,0,0),COLORFF8800,LINETHICK1; STICKLINE(CROSS(均值,累计),CLOSE,OPEN,1.4,0),COLORBB4400; STICKLINE(CROSS(均值,累计),CLOSE,OPEN,1,0),COLORCC5500; STICKLINE(CROSS(均值,累计),CLOSE,OPEN,0.6,0),COLORDD6600; STICKLINE(CROSS(均值,累计),CLOSE,OPEN,0,0),COLOREE7700; {高低点定位} G0:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))+XMA(XMA(H,30),30); D0:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30)); G01:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5+XMA(XMA(H,30),30); D01:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5; GO0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60); DO0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3; STICKLINE(CURRBARSCOUNT=1,G0,G0,100,5),COLORGREEN; STICKLINE(CURRBARSCOUNT=1,D0,D0,100,5),COLORMAGENTA; STICKLINE(CURRBARSCOUNT=1,GO0,GO0,100,5),COLORLIBLUE; STICKLINE(CURRBARSCOUNT=1,DO0,DO0,100,5),COLORRED; DRAWTEXT(ISLASTBAR,G0,'卖'),COLORGREEN; DRAWTEXT(ISLASTBAR,D0,'买'),COLORMAGENTA; DRAWTEXT(ISLASTBAR,GO0,'顶'),COLORLIBLUE; DRAWTEXT(ISLASTBAR,DO0,'底'),COLORRED; {一绝} Q_1:=C-REF(C,1); Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6); Q_3:=CROSS(EMA(C,19),EMA(C,7)); Q_4:=CROSS(EMA(C,7),EMA(C,19)); ZD1:=L=LLV(L,BARSLAST(Q_3)+1); ZD2:=LLV(L,BARSLAST(Q_3)+1); ZD3:=H=HHV(H,BARSLAST(Q_4)+1); ZD4:=HHV(H,BARSLAST(Q_4)+1); Q_A:=DRAWLINE(ZD1,ZD2,ZD3,ZD4,0); U1:=H=HHV(H,BARSLAST(Q_4)+1); U2:=HHV(H,BARSLAST(Q_4)+1); U3:=L=LLV(L,BARSLAST(Q_3)+1); U4:=LLV(L,BARSLAST(Q_3)+1); Q_B:=DRAWLINE(U1,U2,U3,U4,0); TJ:=IF(Q_B BB:=REF(TJ,1)=0 AND TJ>=1 ; DRAWICON(BB,L*0.99,39);{绿▲见底标志} SS:=REF(Q_A DRAWICON(SS,H*1.005,36);{X图标卖出标志} {私募公式} AAE:= WINNER(CLOSE+CLOSE*15/100)*100; BBE:= WINNER(CLOSE+CLOSE*0/100)*100; CCE:= AAE-BBE; DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100; EEE:= CCE<3 AND DDE<0.5 AND OPEN>LOW; AE1:= DYNAINFO(6); AE2:= IF(LOW>AE1,0,IF(HIGH AE3:= VOL/WINNER(LOW); AE4:= REF(HHV(CLOSE,120),1); AE5:= REF(LLV(CLOSE,120),1); AE6:= 100*(CLOSE-AE5)/(AE4-AE5); AE7:= AE2>0 OR AE2=1; AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80; AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4); AE10:= AE8 AND AE9; AE11:= IF(FILTER(AE8,3),5,0); AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3); DRAWICON(AE12,L*0.99,38);{红▲见底标志} {伏击涨停} T1:=MA(C,21)>REF(MA(C,21),1); T2:=EXIST(C>REF(C,1)*1.093,21); T3:=C T5:=EVERY(V T6:=MA(C,5)>MA(C,21); DRAWTEXT(T1 AND T2 AND T3 AND T5 AND T6,L,'↖伏击涨停'); {红底绿顶} 低:=REF(LLV(L,150),3); 近期底:=REFDATE(低,DATE); 最底:=REFDATE(近期底,DATE); 入:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)); STICKLINE(入,O,(C+O)/2,3,0),COLORRED; STICKLINE(入,H,L,0.2,0),COLORRED; DRAWTEXT(入,L*1.0021,'↖红底'),COLORLIMAGENTA; 高:=REF(HHV(H,150),3); 近期顶:=REFDATE(高,DATE); 最顶:=REFDATE(近期顶,DATE),NODRAW; 出:=最顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW; STICKLINE(出,O,(C+O)/2,3,0),COLORBLUE; STICKLINE(出,H,L,0.2,0),COLORBLUE; DRAWTEXT(出,H*0.998,'↙蓝顶'),COLORGREEN; A2:=REF(MA(C,20),1);J1:=(MA(C,20)-A2)/A2*100;MJ1:=MA(J1,3); 乖离2:=(MA(C,20)-MA(C,30))/MA(C,30)*100; VAC1:=IF(BETWEEN(乖离2,-2,5),2,0); XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04)); XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100); XL3:=CROSS(XL2,(0 - 20)); DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW*0.996),'↖买'); DRAWICON(XL3 > 0 ,LOW*0.99,1);{绝对底部} X6:=REF(CLOSE,1); X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100); X8:=CROSS(79,X7); X9:=FILTER(X8,4); DRAWTEXT(X9,(HIGH * 0.9989),'↙出货'),COLORGREEN; |
|