예스스탁
예스스탁 답변
2022-02-22 09:31:32
안녕하세요
예스스탁입니다.
input : N1(3);
var : P(0),PH(0),PL(0),PM(0),N(0),NH(0),NL(0),NM(0);
var : cnt(0);
Array : TL1[20](0),TL2[20](0),TL3[20](0),ii[20](0);
if C > O Then
P = 1;
Else
P = 0;
if C < O Then
N = 1;
Else
N = 0;
if P == 1 Then
{
if P != P[1] Then
{
PH = H;
PL = L;
PM = (PH+PL)/2;
}
Else
{
if H > PH Then
PH = H;
if L < PL Then
PL = L;
PM = (PH+PL)/2;
}
}
if N == 1 Then
{
if N != N[1] Then
{
NH = H;
NL = L;
NM = (NH+NL)/2;
}
Else
{
if H > NH Then
NH = H;
if L < NL Then
NL = L;
NM = (NH+NL)/2;
}
}
if P == 0 and CountIf(P==1,N1)[1] == N1 Then
{
var1 = PH[1];
var2 = PL[1];
var3 = PM[1];
ii[0] = Index;
TL1[0] = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
TL2[0] = TL_New(sDate,sTime,var2,NextBarSdate,NextBarStime,var2);
TL3[0] = TL_New(sDate,sTime,Var3,NextBarSdate,NextBarStime,var3);
For cnt = 1 to 19
{
ii[cnt] = ii[cnt-1][1];
TL1[cnt] = TL1[cnt-1][1];
TL2[cnt] = TL2[cnt-1][1];
TL3[cnt] = TL3[cnt-1][1];
}
TL_SetColor(TL1[0],RED);
TL_SetColor(TL2[0],RED);
TL_SetColor(TL3[0],RED);
TL_SetExtRight(TL1[0],true);
TL_SetExtRight(TL2[0],true);
TL_SetExtRight(TL3[0],true);
}
if N == 0 and CountIf(N==1,N1)[1] == N1 Then
{
var4 = NH[1];
var5 = NL[1];
var6 = NM[1];
ii[0] = Index;
TL1[0] = TL_New(sDate,sTime,var4,NextBarSdate,NextBarStime,var4);
TL2[0] = TL_New(sDate,sTime,Var5,NextBarSdate,NextBarStime,Var5);
TL3[0] = TL_New(sDate,sTime,var6,NextBarSdate,NextBarStime,var6);
For cnt = 1 to 19
{
ii[cnt] = ii[cnt-1][1];
TL1[cnt] = TL1[cnt-1][1];
TL2[cnt] = TL2[cnt-1][1];
TL3[cnt] = TL3[cnt-1][1];
}
TL_SetColor(TL1[0],BLUE);
TL_SetColor(TL2[0],BLUE);
TL_SetColor(TL3[0],BLUE);
TL_SetExtRight(TL1[0],true);
TL_SetExtRight(TL2[0],true);
TL_SetExtRight(TL3[0],true);
}
for cnt = 0 to 19
{
if ii[cnt] > 0 and Index > ii[cnt]+20 Then
{
TL_Delete(TL1[cnt]);
TL_Delete(TL2[cnt]);
TL_Delete(TL3[cnt]);
ii[cnt] = 0;
}
}
즐거운 하루 되세요
> 크라켄 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,질문 76027 확인 요청드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁드립니다
>
안녕하세요
예스스탁입니다.
input : N1(3);
var : P(0),PH(0),PL(0),PM(0),N(0),NH(0),NL(0),NM(0);
var : cnt(0);
Array : TL1[20](0),TL2[20](0),TL3[20](0),ii[20](0);
if C > O Then
P = 1;
Else
P = 0;
if C < O Then
N = 1;
Else
N = 0;
if P == 1 Then
{
if P != P[1] Then
{
PH = H;
PL = L;
PM = (PH+PL)/2;
}
Else
{
if H > PH Then
PH = H;
if L < PL Then
PL = L;
PM = (PH+PL)/2;
}
}
if N == 1 Then
{
if N != N[1] Then
{
NH = H;
NL = L;
NM = (NH+NL)/2;
}
Else
{
if H > NH Then
NH = H;
if L < NL Then
NL = L;
NM = (NH+NL)/2;
}
}
if P == 0 and CountIf(P==1,N1)[1] == N1 Then
{
var1 = PH[1];
var2 = PL[1];
var3 = PM[1];
ii[0] = Index;
TL1[0] = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
TL2[0] = TL_New(sDate,sTime,var2,NextBarSdate,NextBarStime,var2);
TL3[0] = TL_New(sDate,sTime,Var3,NextBarSdate,NextBarStime,var3);
For cnt = 1 to 19
{
ii[cnt] = ii[cnt-1][1];
TL1[cnt] = TL1[cnt-1][1];
TL2[cnt] = TL2[cnt-1][1];
TL3[cnt] = TL3[cnt-1][1];
}
TL_SetColor(TL1[0],RED);
TL_SetColor(TL2[0],RED);
TL_SetColor(TL3[0],RED);
TL_SetExtRight(TL1[0],true);
TL_SetExtRight(TL2[0],true);
TL_SetExtRight(TL3[0],true);
}
if N == 0 and CountIf(N==1,N1)[1] == N1 Then
{
var4 = NH[1];
var5 = NL[1];
var6 = NM[1];
ii[0] = Index;
TL1[0] = TL_New(sDate,sTime,var4,NextBarSdate,NextBarStime,var4);
TL2[0] = TL_New(sDate,sTime,Var5,NextBarSdate,NextBarStime,Var5);
TL3[0] = TL_New(sDate,sTime,var6,NextBarSdate,NextBarStime,var6);
For cnt = 1 to 19
{
ii[cnt] = ii[cnt-1][1];
TL1[cnt] = TL1[cnt-1][1];
TL2[cnt] = TL2[cnt-1][1];
TL3[cnt] = TL3[cnt-1][1];
}
TL_SetColor(TL1[0],BLUE);
TL_SetColor(TL2[0],BLUE);
TL_SetColor(TL3[0],BLUE);
TL_SetExtRight(TL1[0],true);
TL_SetExtRight(TL2[0],true);
TL_SetExtRight(TL3[0],true);
}
for cnt = 0 to 19
{
if ii[cnt] > 0 and Index > ii[cnt]+20 Then
{
TL_Delete(TL1[cnt]);
TL_Delete(TL2[cnt]);
TL_Delete(TL3[cnt]);
ii[cnt] = 0;
}
}
즐거운 하루 되세요
> 크라켄 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,질문 76027 확인 요청드립니다.
===============================================================================
#,답변수식 감사합니다,
만일 위식과 같은 조건으로 적용기간을 시작일,종료일로 날자입력식으로 수정할수
있을까요,즉 20220115~20220222 이런식으로입력가능하면 좋겠습니다.
도움부탁드립니다.