안녕하세요
예스스탁입니다.
Inputs:
Period(20); // CMF 계산 기간
Vars:
MFMultiplier(0),
MFVolume(0),
SumMFVolume(0),
SumVolume(0),
CMF(0),
Counter(0);
// Money Flow Multiplier 계산
If (High - Low) <> 0 Then
MFMultiplier = ((Close - Low) - (High - Close)) / (High - Low);
Else
MFMultiplier = 0;
// Money Flow Volume 계산
MFVolume = MFMultiplier * Volume;
// Period 동안의 합계 계산
SumMFVolume = 0;
SumVolume = 0;
For Counter = 0 To Period - 1 Begin
SumMFVolume = SumMFVolume + (MFMultiplier[Counter] * Volume[Counter]);
SumVolume = SumVolume + Volume[Counter];
End;
// CMF 계산
If SumVolume <> 0 Then
CMF = SumMFVolume / SumVolume;
Else
CMF = 0;
// 플롯
Plot1(CMF, "CMF",IFf(CMF>0,Green,Red));
Plot2(0, "ZeroLine");
Plot3(0.25, "UpperLevel");
Plot4(-0.25, "LowerLevel");
즐거운 하루되세요