draWGBK(1,COLORRGB(33,33,0),COLORRGB(633,0,0),0),colorFF0000;
DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,'改编：一发千钧'),ALIGN5,LINETHICK4,colorFFFF;
LC:=REF(CLOSE,1);
STICKLINE((OPEN >= CLOSE),OPEN,CLOSE,8,0),colorFFFF00;
STICKLINE((OPEN >= CLOSE),HIGH,LOW,0,0),colorFFFF00;
{ _最新股票指标公式}
STICKLINE((OPEN < CLOSE),OPEN,CLOSE,8,0),colorFF;
STICKLINE((OPEN < CLOSE),HIGH,LOW,0,0),colorFF;
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(Abs((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
AA:=(CLOSE - MA15);
波动回调提示图:MA(CLOSE,10000);
STICKLINE((MA15 > REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,colorFF;
STICKLINE((MA15 < REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,colorFF00;
DRAWTEXT(crOSS(FF,MA15),(LOW * 0.99),'上
拐
点'),colorFFFF;
DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'下
拐
点'),colorFF00;
DRAWTEXT(CROSS(85,RSI),(HIGH * 1.02),'回
调！'),colorFFFFFF;
ll:=COST(0);
hh:=COST(100);
aa1:=(hh-ll)/100;//把区间分成100份
tm1:=WINNER(ll[DATacOUNT]+aa1[DATACOUNT]);
tm:=tm1[DATACOUNT];
dyjw[1]:=ll[DATACOUNT]+aa1[DATACOUNT];
for k=2 to 100 do begin
dyjw[k]:=(ll[DATACOUNT]+k*aa1[DATACOUNT]);
dyhlp:=WINNER(dyjw[k]);
hlp:=dyhlp-tm1;
tm1:=dyhlp;
IF hlp[DATACOUNT]>tm then begin
tm:=hlp[DATACOUNT];
jg:=dyjw[k];
end;
end;
筹码密集峰价位:jg-aa1[DATACOUNT]/2,LINETHICK2;
