수고 하십니다.
아래 일봉 지표식을 분봉에 구현되게 변환 부탁드립니다.
수고 하세요.
############################
input : boxp(35);
var : LL(0),k1(0),k2(0),k3(0),Box1(False);
var : NH(0),idx(0),TopBox(0),BtmBox(0);
LL = lowest(l, boxp);
k1 = highest(h, boxp);
k2 = highest(h, boxp - 1);
k3 = highest(h, boxp - 2);
box1 = k3 < k2;
if H > k1[1] Then
{
NH = H;
idx = 0;
}
Else
{
if NH > 0 Then
{
idx = idx +1;
if idx == boxp-2 and box1 == true Then
{
TopBox = NH;
BtmBox = LL;
}
}
}
input : TOP색상(red);
input : BOT색상(blue);
Plot1(TOPbox,"다바스박스TOP",TOP색상);
Plot2(BTMbox,"다바스박스BTM",BOT색상);
답변 1
예스스탁
예스스탁 답변
2024-05-20 11:33:36
안녕하세요
예스스탁입니다.
input : boxp(35);
var : LL(0),k1(0),k2(0),k3(0),Box1(False);
var : NH(0),idx(0),TopBox(0),BtmBox(0);
var : cnt(0),dd(0);
if NextBarBdate != Bdate Then
{
dd = dd+1;
LL = 0;
k1 = 0;
k2 = 0;
k3 = 0;
For cnt = 0 to Boxp
{
if cnt < boxp and (LL == 0 or (LL > 0 and DayLow(cnt) < LL)) Then
LL = DayLow(cnt);
if cnt > 0 and (k1 == 0 or (k1 > 0 and DayHigh(cnt) > k1)) Then
k1 = DayHigh(cnt);
if cnt < Boxp-1 and (k2 == 0 or (k2 > 0 and DayHigh(cnt) > k2)) Then
k2 = DayHigh(cnt);
if cnt < Boxp-2 and (k3 == 0 or (k3 > 0 and DayHigh(cnt) > k3)) Then
k3 = DayHigh(cnt);
}
box1 = k3 < k2;
if DayHigh(0) > k1 Then
{
NH = DayHigh(0);
idx = dd;
}
Else
{
if NH > 0 Then
{
if dd == idx+(boxp-2) and box1 == true Then
{
TopBox = NH;
BtmBox = LL;
}
}
}
}
input : TOP색상(red);
input : BOT색상(blue);
Plot1(TOPbox,"다바스박스TOP",TOP색상);
Plot2(BTMbox,"다바스박스BTM",BOT색상);
즐거운 하루되세요
> 오이도인 님이 쓴 글입니다.
> 제목 : 수식 부탁드립니다
> 수고 하십니다.
아래 일봉 지표식을 분봉에 구현되게 변환 부탁드립니다.
수고 하세요.
############################
input : boxp(35);
var : LL(0),k1(0),k2(0),k3(0),Box1(False);
var : NH(0),idx(0),TopBox(0),BtmBox(0);
LL = lowest(l, boxp);
k1 = highest(h, boxp);
k2 = highest(h, boxp - 1);
k3 = highest(h, boxp - 2);
box1 = k3 < k2;
if H > k1[1] Then
{
NH = H;
idx = 0;
}
Else
{
if NH > 0 Then
{
idx = idx +1;
if idx == boxp-2 and box1 == true Then
{
TopBox = NH;
BtmBox = LL;
}
}
}
input : TOP색상(red);
input : BOT색상(blue);
Plot1(TOPbox,"다바스박스TOP",TOP색상);
Plot2(BTMbox,"다바스박스BTM",BOT색상);