커뮤니티
조건검색식 수정 부탁드립니다.
2015-07-30 22:07:24
144
글번호 89026
Inputs: Length(10),SIG(50);
Vars : WtCRatio(1), VolRatio(1), VolAvg(Volume),
BuyP(1), SellP(1), Sign(1), Return(0),
WghtClose(Close), AvgTR(High - Low),
Constant(1), BuyPres(1), SellPres(1),
TempDI(1), DMIndx(1);
VolAvg = Average(Volume, Length);
Return = 0 ;
WghtClose = (High + Low + Close + Close + Close) * 0.2;
AvgTR = Average (Highest (High, 2) - Lowest ( Low, 2), Length);
VolAvg = ((VolAvg * (Length - 1)) + Volume) / Length;
If WghtClose <> 0 and WghtClose[1] <> 0 and
AvgTR <> 0 and VolAvg <> 0 then
Begin
WtCRatio = (WghtClose - WghtClose[1]) / MinList(WghtClose,WghtClose[1]) ;
VolRatio = Volume / VolAvg;
Constant = ((WghtClose * 3) /AvgTR) * AbsValue (WtCRatio);
If Constant > 88 then Constant = 88;
Constant = VolRatio / ExpValue (Constant);
If WtCRatio > 0 then
Begin
BuyP = VolRatio;
SellP = Constant;
End
Else
Begin
BuyP = Constant;
SellP = VolRatio;
End;
BuyPres = ((BuyPres [1] * (Length - 1)) + BuyP) / Length;
SellPres = ((SellPres [1] * (Length - 1)) + SellP) / Length;
TempDI +1;
If SellPres > BuyPres then
Begin
Sign = -1;
If SellPres <> 0 then TempDI = BuyPres / SellPres;
End
Else
Begin
Sign = 1;
If BuyPres <> 0 then TempDI = SellPres / BuyPres;
End;
TempDI = TempDI * Sign;
If TempDI < 0 then
DMIndx = -1 - TempDI ;
else
DMIndx = 1 - TempDI ;
{
Return = DMIndx * 100.0;
}
End;
DMIndX = Return ;
IF DMINDX > SIG Then
VaR1=0.001;
Else
VAR1=0;
Find(VAR1);
위와 같이 식을짜면 dmindx가 50이상인경우에도 조건검색식에 검색되지않는 종목들이
있습니다. 수식 수정부탁드립니다.
답변 1
예스스탁 예스스탁 답변
2015-08-03 13:06:33
안녕하세요
예스스탁입니다.
문의하신 내용은 수식안에서 수정할만한 부분은 없습니다.
종목검색을 하실때 설정화면에서
제외종목이나 거래량, 거래대금등을 지정하는 부분이 있습니다.
설정창 옵션 살펴봐 주시기 바랍니다.
즐거운 하루되세요
> ijh0316 님이 쓴 글입니다.
> 제목 : 조건검색식 수정 부탁드립니다.
> Inputs: Length(10),SIG(50);
Vars : WtCRatio(1), VolRatio(1), VolAvg(Volume),
BuyP(1), SellP(1), Sign(1), Return(0),
WghtClose(Close), AvgTR(High - Low),
Constant(1), BuyPres(1), SellPres(1),
TempDI(1), DMIndx(1);
VolAvg = Average(Volume, Length);
Return = 0 ;
WghtClose = (High + Low + Close + Close + Close) * 0.2;
AvgTR = Average (Highest (High, 2) - Lowest ( Low, 2), Length);
VolAvg = ((VolAvg * (Length - 1)) + Volume) / Length;
If WghtClose <> 0 and WghtClose[1] <> 0 and
AvgTR <> 0 and VolAvg <> 0 then
Begin
WtCRatio = (WghtClose - WghtClose[1]) / MinList(WghtClose,WghtClose[1]) ;
VolRatio = Volume / VolAvg;
Constant = ((WghtClose * 3) /AvgTR) * AbsValue (WtCRatio);
If Constant > 88 then Constant = 88;
Constant = VolRatio / ExpValue (Constant);
If WtCRatio > 0 then
Begin
BuyP = VolRatio;
SellP = Constant;
End
Else
Begin
BuyP = Constant;
SellP = VolRatio;
End;
BuyPres = ((BuyPres [1] * (Length - 1)) + BuyP) / Length;
SellPres = ((SellPres [1] * (Length - 1)) + SellP) / Length;
TempDI +1;
If SellPres > BuyPres then
Begin
Sign = -1;
If SellPres <> 0 then TempDI = BuyPres / SellPres;
End
Else
Begin
Sign = 1;
If BuyPres <> 0 then TempDI = SellPres / BuyPres;
End;
TempDI = TempDI * Sign;
If TempDI < 0 then
DMIndx = -1 - TempDI ;
else
DMIndx = 1 - TempDI ;
{
Return = DMIndx * 100.0;
}
End;
DMIndX = Return ;
IF DMINDX > SIG Then
VaR1=0.001;
Else
VAR1=0;
Find(VAR1);
위와 같이 식을짜면 dmindx가 50이상인경우에도 조건검색식에 검색되지않는 종목들이
있습니다. 수식 수정부탁드립니다.
다음글
이전글