相对价位 input:N(13,1,100); DRAWGBK(CLOSE,COLORRGB(36,68,36),COLORRGB(100,100,100),1); XDJ1:=LLV(LOW,N); XDJ2:=EMA((((3)*(CLOSE) + HIGH + LOW + OPEN)/(6) - XDJ1)/(HHV(HIGH,N) - XDJ1),8); XDJ3:=(EMA(XDJ2,2))*(100); CD1:=(REF(CLOSE,1))/(CLOSE); CD2:=(1 - (MA(LOW,3))/(MA((HIGH + LOW + (2)*(CLOSE))/(4),20)))*(100) - 5; CD3:=((MA(HIGH,3))/(MA((HIGH + LOW + (2)*(CLOSE))/(4),20)) - 1)*(100) - 5; CD4:=IF((CD2 > 0),((CD2)*(REF((HIGH + LOW + (2)*(CLOSE))/(4),3)))/(CLOSE),0); HZ1:=(MA(LOW,2))*(0.96); HZ2:=(MA(LOW,26))*(0.85); HZ3:=IF((REF(HZ1,1) < HZ2) and (REF(HZ1,1) < HZ1) and (REF(HZ1,1) < REF(HZ1,2)),8,0); 铁底:=(MA(LOW,30))*(0.85); N1:=SYSPARAM(3); N2:=SYSPARAM(2); N3:=N1 - N2 + 1; HH:=HHV(XDJ3,N3); LL:=LLV(XDJ3,N3); 高:=(HH[N1])*(0.9); 中:=(HH[N1] + LL[N1])/(2); 低:=(LL[N1])*(1.3); 最低:=LL[N1]; Y:=HHV(VOL,N1 - N2 + 1); YVB:=(Y[N1])/(HH[N1] - LL[N1] + MINDIFF); Z:=(VOL)/(YVB) + LL[N1]; Z_1:=((CLOSE - LLV(LOW,30))/(HHV(HIGH,30) - LLV(LOW,30)))*(100) - 50; Z_2:=SMA(Z_1,3,1); Z_3:=EMA((3)*(Z_2) - (2)*(SMA(Z_2,3,1)),6); Z_4:=(Z_3 - REF(Z_3,1))*(3); ZJ1:=DMA((HIGH + LOW + (CLOSE)*(2))/(4),0.9); ZJ2:=(VOL)/((HIGH - LOW)*(2) - ABS(CLOSE - OPEN)); ZJ3:=IF((CLOSE > OPEN),(ZJ2)*(HIGH - LOW),IF((CLOSE < OPEN),(ZJ2)*(HIGH - OPEN + CLOSE - LOW),(VOL)/(2))) + IF((CLOSE > OPEN),0 - (ZJ2)*(HIGH - CLOSE + OPEN - LOW),IF((CLOSE < OPEN),0 - (ZJ2)*(HIGH - LOW),0 - (VOL)/(2))); ZJ4:=((ZJ3)/(20))/(1.15); ZJ5:=(ZJ4)*(0.55) + (REF(ZJ4,1))*(0.33) + (REF(ZJ4,2))*(0.22); ZJ6:=EMA(ZJ5,3); QJ1:=(CLOSE - LLV(LOW,5))/(HHV(HIGH,5) - LLV(LOW,5)); QJ2:=(SMA(MAX(QJ1 - REF(QJ1,1),0),8,1))/(SMA(ABS(QJ1 - REF(QJ1,1)),8,1)); QJ3:=EMA(QJ2,5) - EMA(QJ2,13); QJ4:=(QJ3 - LLV(QJ3,3))/(HHV(QJ3,3) - LLV(QJ3,3)); QJ5:=(SMA(QJ4,3,1))/(3); QJ6:=SMA(QJ5,3,1); KK:=((3)*(QJ5) - (2)*(QJ6))*(2.5); DD:=EMA(((3)*(QJ5) - (2)*(QJ6))*(2.5),3); T1:=BARSLAST(CROSS(DD,KK)); T2:=BARSLAST((KK > DD)); B:=DATACOUNT - BARPOS + 1; SJ:=DATACOUNT - SYSPARAM(1); FC:=VOL; I:=SJ; WHILE (I <= DATACOUNT) Do Begin Begin XL:=0; J:=0; WHILE (J <= SJ) Do Begin XL:=XL + FC[I - J];J:=J+1; End; MAN:=XL; I:=I+1; End; End; HS:=((100)*(XL))/(CAPITAL); YBH1:=EMA(CLOSE,7) - EMA(CLOSE,19); YBH2:=EMA(YBH1,9); YB:=(YBH1 >= YBH2); YH:=(YBH1 >= 0); SZ:=((CLOSE)*(3) + HIGH + LOW + OPEN)/(6); SK:=EMA(SZ,13) - EMA(SZ,73); SD:=EMA(SK,2); XH:=CROSS(SK,SD) and (SK < 0 - 0.04) and (CLOSE - (REF(CLOSE,1))/(REF(CLOSE,1)) >= 0.03) or CROSS(SK,SD) and (SK <= 0 - 0.14) or CROSS(SK,SD) and (SK <= 0.05) and ((VOL)/(MA(VOL,5)) > 2) or ((CLOSE)/(REF(CLOSE,1)) > 0.035); QJ1:=(SUM((VOL)*(CLOSE),1))/(SUM(VOL,1)); QJ2:=EMA(QJ1,13); QJ3:=FORCAST(((QJ1 - QJ2)*(100))/(QJ1),5); XLA:=(CLOSE >= REF(CLOSE,1)) and (REF(CLOSE,1) >= REF(CLOSE,2)) and (REF(CLOSE,1) <= REF(CLOSE,3)) and (REF(CLOSE,2) <= REF(CLOSE,3)) and (REF(CLOSE,4) > REF(CLOSE,2)) or (REF(CLOSE,4) <= REF(CLOSE,2)) and (REF(CLOSE,5) >= REF(CLOSE,3)) or (CLOSE >= REF(CLOSE,1)) and (REF(CLOSE,1) <= REF(CLOSE,2)) and (CLOSE >= REF(CLOSE,2)) and (REF(CLOSE,3) > REF(CLOSE,1)) or (REF(CLOSE,3) <= REF(CLOSE,1)) and (REF(CLOSE,4) >= REF(CLOSE,2)); STICKLINE((ZJ6 <= 0),0,最低 + (Z)/(2),5,1),ColorFCFF00; STICKLINE((CD4 > 0),0,最低 + (Z)/(2),5,0),ColorFFB0FF; STICKLINE((CD4 > 0),0,(最低 + (Z)/(2))*(0.8),5,0),ColorFF8CFF; STICKLINE((CD4 > 0),0,(最低 + (Z)/(2))*(0.6),5,0),ColorFF59FF; STICKLINE((CD4 > 0),0,(最低 + (Z)/(2))*(0.4),5,0),ColorFF18FF; STICKLINE((CD4 > 0),0,(最低 + (Z)/(2))*(0.2),5,0),Color001DFF; STICKLINE(HZ3,0,最低 + (Z)/(2),5,0),colorGreen; STICKLINE(HZ3,0,(最低 + (Z)/(2))*(0.8),5,0),Color33CC00; STICKLINE(HZ3,0,(最低 + (Z)/(2))*(0.6),5,0),Color339900; STICKLINE(HZ3,0,(最低 + (Z)/(2))*(0.4),5,0),Color337700; STICKLINE(HZ3,0,(最低 + (Z)/(2))*(0.2),5,0),Color005500; STICKLINE((ZJ6 >= 0),0,最低 + (Z)/(2),5,1),Color5050FF; STICKLINE((CLOSE < 铁底),(Z)/(2),最低 + (Z)/(2),5,0),colorGray; PARTLINE(CLOSE,高),POINTDOT,colorGray; PARTLINE(CLOSE,中),POINTDOT,colorGray; PARTLINE(CLOSE,低),POINTDOT,colorWhite; 强:FORCAST(XDJ3,5),linethick,PRECISION2,colorRed; 弱:=FORCAST(REF(XDJ3,1),5); PARTLINE(CLOSE,强),linethick2,colorRed; PARTLINE((强 < 弱),强),linethick2,ColorFF0000; 区界:REF(LLV(XDJ3,T2),T1),PRECISION2,colorYellow; 涨跌幅:((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100),linethick,PRECISION2,ColorFFBBFF; DRAWTEXT((BARPOS = SYSPARAM(2)),高,'高位: ' + NUMTOSTR(高,2)),linethick,colorGray; DRAWTEXT((BARPOS = SYSPARAM(2)),中,'中位: ' + NUMTOSTR(中,2)),linethick,colorGray; DRAWTEXT((BARPOS = SYSPARAM(2)),(最低)*(0.68),'低位: ' + NUMTOSTR(低,2)),linethick4,colorWhite; PARTLINE(RANGE(BARPOS,SYSPARAM(1),SYSPARAM(3) + 3),(中)*(1.1)),Color5BBBB5; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(1)),(中)*(1.2),' 倒数: ' + NUMTOSTR(B[SYSPARAM(1)],0) + '(天) ' + ' \n 累计换手:' + NUMTOSTR(HS,2) + '% '),linethick,Color5BBBB5 |
