N:=20; PRICE_RANGE:=HHV(H,N)-LLV(L,N); STEP:=PRICE_RANGE/20; DENSITY:=0; FOR I=1 TO 20 DO BEGIN LEVEL:=LLV(L,N)+(I-1)*STEP; VOL_IN:=IF(C>REF(C,1),V,0); WEIGHT:=EXP(-POW((C-LEVEL)/STEP,2)); DENSITY:=DENSITY+VOL_IN*WEIGHT; END; MIGRATION:=DENSITY-MA(DENSITY,5); STICKLINE(MIGRATION>0,0,MIGRATION,2,0),COLORRED; STICKLINE(MIGRATION<0,0,MIGRATION,2,0),COLORGREEN; DENSITY_MA:=MA(DENSITY,5); DENSITY;