|
买线:=EMA(C,2); 卖线:=EMA(SLOPE(C,21)*20+C,42); STICKLINE(买线>=卖线,-50+REFDATE(HHV(H,0),DATE)/5,-50+REFDATE(LLV(L,0),DATE)/5,6,0),COLORLIMAGENTA; STICKLINE(买线<卖线,-50+REFDATE(HHV(H,0),DATE)/5,-50+REFDATE(LLV(L,0),DATE)/5,6,0),COLORLIBLUE; RSV:=((((HHV(HIGH,10) - CLOSE) / (HHV(HIGH,10) - LLV(LOW,10))) * 200) - 125); 小股民:SMA(RSV,5,1)+15,COLORGREEN,LINETHICK1; RSV1:=((((CLOSE - LLV(LOW,10)) / (HHV(HIGH,10) - LLV(LOW,10))) * 200) - 105); 主力:SMA(RSV1,5,1)+15,COLORLIRED,LINETHICK1; 买进:IF(主力>REF(主力,1),主力,DRAWNULL),COLORMAGENTA,LINETHICK3; 持币:IF(小股民>REF(小股民,1),小股民,DRAWNULL),COLORGREEN,LINETHICK3; {P(10,1,100),A(5,1,100);} SVOL:=INTPART(SUM(V,0)/CAPITAL); TJ0:=SVOL>REF(SVOL,1) OR BARSSINCE(CLOSE)=0; S1:=BARSLAST(TJ0)+1; TJ2:=S1<REF(S1,1); S2:=IF(TJ2,REF(S1,1)+1,S1); S3:=SUM(TJ2,0); ZK1:="KD.K#WEEK"(9,3,3); ZD2:="KD.D#WEEK"(9,3,3); Z，1:="MACD.DIF#WEEK"(12,26,9); ZA2:="MACD.DEA#WEEK"(12,26,9); 换手:=V/CAPITAL*100,LINETHICK0; JCD:=FILTER(CROSS(ZK1,ZD2) AND REF(ZD2,1)<30,13),NODRAW; 取点:=BARSLAST(JCD); 吸筹区:=IF(取点>0 AND 取点<61,取点,0); ZS1:=吸筹区; ZS2:=吸筹区+1; ZS3:=换手/5; ZSA:=IF(ZS1>0,SUM((ZS3),吸筹区+1),0),NODRAW; 主力筹码%:ZSA,NODRAW; 建仓天数:ZS1,NODRAW; 阶段总额（万）:=SUM(AMOUNT/10000,S2)*100,NODRAW; 阶段总量（手）:=SUM(V,S2)*100,NODRAW; 阶段成本（元）:(阶段总额（万）/(阶段总量（手）/100)),NODRAW; 换手冷清:STICKLINE(换手<3,-80,(换手+5-40)*2,0.0,0),COLORCYAN; 青换手冷清:(换手<3,-80,(换手-6)*4,0.0,0),COLORCYAN; 换手活跃:STICKLINE(换手>=3 AND 换手<7,-80,(换手+5-40)*2,0.0,0),COLORYELLOW; 黄换手活跃:(换手>=3 AND 换手<7,-80,(换手-6)*4,0.0,0),COLORYELLOW; 换手热烈:STICKLINE(换手>=7,-80,(换手+5-40)*2,0.5,0),COLORRED; 红换手热烈:(换手>=7,-80,(换手-6)*4,0.5,0),COLORRED; STICKLINE(JCD,(0-6)*4,6*6,0.5,0),COLORGREEN; DRAWTEXT(建仓天数,40,'建仓'),COLORGREEN; LL:=REF(CLOSE,1); MM:=SMA(MAX(CLOSE-LL,0),6,1)/SMA(ABS(CLOSE-LL),6,1)*100; 出: IF(CROSS(80,MM),90,100),COLORCYAN; DRAWTEXT(CROSS(80,MM),MM,'卖 '),COLORWHITE; DRAWTEXT(CROSS(主力,小股民),0,'买 '),COLORRED; AA:=(WINNER((CLOSE + ((CLOSE * 15) / 100))) * 100); BB:=(WINNER((CLOSE + ((CLOSE * 0) / 100))) * 100); CC:=(AA - BB); DD:=((WINNER((CLOSE - ((CLOSE * 0.1) / 100))) - WINNER((CLOSE - ((CLOSE * 15) / 100)))) * 100); EE:=(((CC < 3) AND (DD < 0.5)) AND (OPEN > LOW)); A1:=DYNAINFO(6); A22:=IF((LOW > A1),0,IF((HIGH < A1),1,(((A1 - LOW) + 0.01) / ((HIGH - LOW) + 0.01)))); A3:=(VOL / WINNER(LOW)); A4:=REF(HHV(CLOSE,120),1); A5:=REF(LLV(CLOSE,120),1); A6:=((100 * (CLOSE - A5)) / (A4 - A5)); A7:=((A22 > 0) OR (A22 = 1)); A8:=((A7 AND ((A3 / REF(A3,3)) >= 3)) AND (A6 < 80)); A9:=(((REF(A8,1) OR REF(A8,2)) OR REF(A8,3)) OR REF(A8,4)); A10:=(A8 AND A9); A11:=IF(FILTER(A8,3),5,0); A12:=IF((FILTER(A10,3) OR EE),10,0); 进场:STICKLINE(A11,-48,-30,2.5,0),COLORFF7700; 加仓:STICKLINE(A12,-48,-28,2.5,0),COLORFF00FF; STICKLINE(A11,-48,-30,2.5,0),COLORFF7700; STICKLINE(A11,-48,-30,2,0),COLORFFDD00; STICKLINE(A11,-48,-30,1,0),COLORFFEE00; STICKLINE(A12,-48,-28,2.5,0),COLOR1020DD; STICKLINE(A12,-48,-28,2,0),COLOR1020EE; STICKLINE(A12,-48,-28,1,0),COLOR1020FF; DRAWTEXT(进场=5,-30,'进场'),COLORFFFF00; DRAWTEXT(加仓=10,-28,'加仓'),COLORFFFFFF; VAR2L:=REF(LOW,1); VAR3L:=SMA(ABS(LOW-VAR2L),3,1)/SMA(MAX(LOW-VAR2L,0),3,1)*110; VAR4L:=EMA(IF(CLOSE*1.3,VAR3L*10,VAR3L/10),3); VAR5L:=LLV(LOW,13); VAR6L:=HHV(VAR4L,13); VAR7L:=IF(MA(CLOSE,34),1,0); VAR8L:=EMA(IF(LOW<=VAR5L,(VAR4L+VAR6L*2)/2,0),3)/618*VAR7L; VAR9LL:=IF(VAR8L>110,110,VAR8L); STICKLINE(VAR9LL<REF(VAR9LL,1),48,48+VAR9LL,0.5,0),COLORYELLOW; RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV2,2,1); D:=SMA(K,2,1); J:=3*K-2*D; J1:=REVERSE(J); AA1:=REF(MA(C,1),10)>REF(MA(C,60),10); 买点:CROSS(J,J1) AND AA1; STICKLINE(买点,0,30,5,0),COLOR0000FF; STICKLINE(买点,30,60,3,0),COLORWHITE; STICKLINE(买点,60,80,1,0),COLORYELLOW; DRAWTEXT(买点,40,'庄家出现！'),COLORFF00FF; |
|
|
