커뮤니티
문의 드립니다..
2016-02-19 16:49:53
184
글번호 95576
아래수식을 예스로 변환해 주실수 있는지요..
부탁드립니다.
darvas box
box1=0;
box2=0;
SetBarsRequired(10000,10000);
procedure fillDarvas(start,end,swap,top, bottom )
{
for ( j = start; j < end; j++)
{
if( box1[j] == swap)
box1[j]= top ;
else
box1[j]= bottom;
if(box2[j] == swap)
box2[j]= bottom ;
else
box2[j]= top;
}
}
BoxArr1 = 0;
BoxArr2 = 0;
StateArray = 0;
DBuy = 0;
DSell = 0;
TopArray = 0;
BotArray = 0;
tick=0;
BoxTop = High[0];
BoxBot = Low[0];
swap=0;
state = 0;
BoxStart = 0;
for (i=0; i<BarCount; i++)
{
if (state==5)
{
TopArray[i]=BoxTop;
BotArray[i]=BoxBot;
if (Low[i]<(BoxBot*(1-tick/100)) || High[i]>(BoxTop*(1+tick/100)))
{
fillDarvas(BoxStart,i,swap,BoxTop,BoxBot);
state = 1;
swap = !swap;
BoxTop = High[i];
BoxStart = i;
}
}
else
{
if (High[i]<BoxTop)
{
if ((state<3) || (Low[i]>BoxBot))
{
state++;
}
else
{
state=3;
}
if (state==3)
BoxBot=Low[i];
}
else
{
state=1;
BoxTop=High[i];
}
}
StateArray[i] = state;
}
fillDarvas(BoxStart,BarCount,swap,BoxTop,BoxBot);
Buy=Cover=H>Ref(box1,-1) AND H>Ref(box2,-1) AND Ref(statearray,-1)==5;
Short=Sell=L<Ref(box1,-1) AND L<Ref(box2,-1) AND Ref(statearray,-1)==5;
Plot(C,"",colorDarkGrey,styleCandle);
PlotShapes(shapeUpArrow*(Buy),colorBlue);
PlotShapes(shapeDownArrow*(Sell),colorYellow);
Plot( box1, " RESI " , colorLime, styleLine );
Plot( box2, " SUPP" , colorRed, styleLine );
PlotOHLC(box1,box2,box1,box2,"",colorLavender,styleCloud);
답변 1
예스스탁 예스스탁 답변
2016-02-19 18:18:50
안녕하세요
예스스탁입니다.
올려주신 랭귀지는 사용해본적이 없는
랭귀지라 변환을 해드리기 어렵습니다.
darvas box는 기존에 저희랭귀지로 작성되서
답변드린 내용이 있으므로
게시판 검색하시면 식 찾아보실수 있습니다.
즐거운 하루되세요
> 쿠베라 님이 쓴 글입니다.
> 제목 : 문의 드립니다..
> 아래수식을 예스로 변환해 주실수 있는지요..
부탁드립니다.
darvas box
box1=0;
box2=0;
SetBarsRequired(10000,10000);
procedure fillDarvas(start,end,swap,top, bottom )
{
for ( j = start; j < end; j++)
{
if( box1[j] == swap)
box1[j]= top ;
else
box1[j]= bottom;
if(box2[j] == swap)
box2[j]= bottom ;
else
box2[j]= top;
}
}
BoxArr1 = 0;
BoxArr2 = 0;
StateArray = 0;
DBuy = 0;
DSell = 0;
TopArray = 0;
BotArray = 0;
tick=0;
BoxTop = High[0];
BoxBot = Low[0];
swap=0;
state = 0;
BoxStart = 0;
for (i=0; i<BarCount; i++)
{
if (state==5)
{
TopArray[i]=BoxTop;
BotArray[i]=BoxBot;
if (Low[i]<(BoxBot*(1-tick/100)) || High[i]>(BoxTop*(1+tick/100)))
{
fillDarvas(BoxStart,i,swap,BoxTop,BoxBot);
state = 1;
swap = !swap;
BoxTop = High[i];
BoxStart = i;
}
}
else
{
if (High[i]<BoxTop)
{
if ((state<3) || (Low[i]>BoxBot))
{
state++;
}
else
{
state=3;
}
if (state==3)
BoxBot=Low[i];
}
else
{
state=1;
BoxTop=High[i];
}
}
StateArray[i] = state;
}
fillDarvas(BoxStart,BarCount,swap,BoxTop,BoxBot);
Buy=Cover=H>Ref(box1,-1) AND H>Ref(box2,-1) AND Ref(statearray,-1)==5;
Short=Sell=L<Ref(box1,-1) AND L<Ref(box2,-1) AND Ref(statearray,-1)==5;
Plot(C,"",colorDarkGrey,styleCandle);
PlotShapes(shapeUpArrow*(Buy),colorBlue);
PlotShapes(shapeDownArrow*(Sell),colorYellow);
Plot( box1, " RESI " , colorLime, styleLine );
Plot( box2, " SUPP" , colorRed, styleLine );
PlotOHLC(box1,box2,box1,box2,"",colorLavender,styleCloud);
다음글
이전글