커뮤니티

부탁드립니다

프로필 이미지
크라켄
2022-02-21 19:10:29
1230
글번호 156558
답변완료
#,질문 76027 확인 요청드립니다.
지표
답변 2
프로필 이미지

예스스탁 예스스탁 답변

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 확인 요청드립니다.
프로필 이미지

크라켄

2022-02-22 13:01:13

> 예스스탁 님이 쓴 글입니다. > 제목 : 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 이런식으로입력가능하면 좋겠습니다. 도움부탁드립니다.