커뮤니티
부탁드립니다
2021-02-18 07:26:00
1039
글번호 146415
#,71109번 질문에서 다시한번 꼭 부탁드립니다,
질문1번에서 기존식에 텍스트출력 되던것은 다 제외하고 그자리에 봉갯수(음봉,양봉
갯수표기)만 표기하는 식으로 수정 부탁입니다,제가 아무리 해보려 해도 자꾸 에라가
나서 힘드네요..다시한번 간곡히 도움요청드립니다.시간이 많이 걸린다 하시니 1번질문
하나만이라도 기존파동수식에 약식으로라도 봉갯수만 표기되면 좋으니 꼭 부탁드립니다.
##, 미리 감사드립니다.
답변 4
예스스탁 예스스탁 답변
2021-02-18 14:41:47
안녕하세요
예스스탁입니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var : ni(0),nP(0),nN(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
ni = 0;
nP = 0;
nN = 0;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx1 = Text_New(sDate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
ni = 0;
nP = 0;
nN = 0;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx2 = Text_New(sdate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
if T == 1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(sdate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
if T == -1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(sDate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
Plot1(var1);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,71109번 질문에서 다시한번 꼭 부탁드립니다,
질문1번에서 기존식에 텍스트출력 되던것은 다 제외하고 그자리에 봉갯수(음봉,양봉
갯수표기)만 표기하는 식으로 수정 부탁입니다,제가 아무리 해보려 해도 자꾸 에라가
나서 힘드네요..다시한번 간곡히 도움요청드립니다.시간이 많이 걸린다 하시니 1번질문
하나만이라도 기존파동수식에 약식으로라도 봉갯수만 표기되면 좋으니 꼭 부탁드립니다.
##, 미리 감사드립니다.
골든키
2021-02-18 15:12:28
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁드립니다
>
안녕하세요
예스스탁입니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var : ni(0),nP(0),nN(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
ni = 0;
nP = 0;
nN = 0;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx1 = Text_New(sDate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
ni = 0;
nP = 0;
nN = 0;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx2 = Text_New(sdate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
if T == 1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(sdate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
if T == -1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(sDate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
Plot1(var1);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,71109번 질문에서 다시한번 꼭 부탁드립니다,
질문1번에서 기존식에 텍스트출력 되던것은 다 제외하고 그자리에 봉갯수(음봉,양봉
갯수표기)만 표기하는 식으로 수정 부탁입니다,제가 아무리 해보려 해도 자꾸 에라가
나서 힘드네요..다시한번 간곡히 도움요청드립니다.시간이 많이 걸린다 하시니 1번질문
하나만이라도 기존파동수식에 약식으로라도 봉갯수만 표기되면 좋으니 꼭 부탁드립니다.
##, 미리 감사드립다
----------------------------------------------------------
수식적용해보니 봉갯수가 전혀 맞지 않는데...예를들어 파동저점에서 고점까지 캔들의 음봉양봉 갯수 출력인데 보내주신식은 전혀 맞지 않습니다.
예스스탁 예스스탁 답변
2021-02-18 16:20:47
안녕하세요
예스스탁입니다.
기존식이 파라볼릭 돌파 기준입니다.
고점과 저점기준으로 변경해 드립니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : ni(0),nP(0),nN(0),tx1(0),tx2(0),hi(0),li(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
Hi = Index;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
ni = Hi-Li;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Tx1 = Text_New(HD,HT,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
Li = Index;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
ni = Li-Hi;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Tx2 = Text_New(LD,LT,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
HI = Index;
ni = Hi-Li;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
Li = Index;
ni = Li-Hi;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
Plot1(Index);
plot2(Li);
plot3(Hi);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : Re : Re : 부탁드립니다
>
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁드립니다
>
안녕하세요
예스스탁입니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var : ni(0),nP(0),nN(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
ni = 0;
nP = 0;
nN = 0;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx1 = Text_New(sDate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
ni = 0;
nP = 0;
nN = 0;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx2 = Text_New(sdate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
if T == 1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(sdate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
if T == -1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(sDate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
Plot1(var1);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,71109번 질문에서 다시한번 꼭 부탁드립니다,
질문1번에서 기존식에 텍스트출력 되던것은 다 제외하고 그자리에 봉갯수(음봉,양봉
갯수표기)만 표기하는 식으로 수정 부탁입니다,제가 아무리 해보려 해도 자꾸 에라가
나서 힘드네요..다시한번 간곡히 도움요청드립니다.시간이 많이 걸린다 하시니 1번질문
하나만이라도 기존파동수식에 약식으로라도 봉갯수만 표기되면 좋으니 꼭 부탁드립니다.
##, 미리 감사드립다
----------------------------------------------------------
수식적용해보니 봉갯수가 전혀 맞지 않는데...예를들어 파동저점에서 고점까지 캔들의 음봉양봉 갯수 출력인데 보내주신식은 전혀 맞지 않습니다.
크라켄
2021-02-20 14:27:38
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : Re : Re : 부탁드립니다
> 안녕하세요
예스스탁입니다.
기존식이 파라볼릭 돌파 기준입니다.
고점과 저점기준으로 변경해 드립니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : ni(0),nP(0),nN(0),tx1(0),tx2(0),hi(0),li(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
Hi = Index;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
ni = Hi-Li;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Tx1 = Text_New(HD,HT,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
Li = Index;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
ni = Li-Hi;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Tx2 = Text_New(LD,LT,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
HI = Index;
ni = Hi-Li;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
Li = Index;
ni = Li-Hi;
nP = CountIf(C>O,ni);
nN = CountIf(C<O,ni);
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
Plot1(Index);
plot2(Li);
plot3(Hi);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : Re : Re : 부탁드립니다
>
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁드립니다
>
안녕하세요
예스스탁입니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var : ni(0),nP(0),nN(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
ni = 0;
nP = 0;
nN = 0;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx1 = Text_New(sDate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
ni = 0;
nP = 0;
nN = 0;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx2 = Text_New(sdate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
}
if T == 1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(sdate,sTime,HH,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
}
}
if T == -1 then
{
ni = ni + 1;
if C > O Then
nP = nP+1;
if C < O Then
nN = nN+1;
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
}
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(sDate,sTime,LL,NumToStr(ni,0)+"("+NumToStr(nP,0)+","+NumToStr(nN,0)+")");
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,MAGENTA);
}
}
Plot1(var1);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,71109번 질문에서 다시한번 꼭 부탁드립니다,
질문1번에서 기존식에 텍스트출력 되던것은 다 제외하고 그자리에 봉갯수(음봉,양봉
갯수표기)만 표기하는 식으로 수정 부탁입니다,제가 아무리 해보려 해도 자꾸 에라가
나서 힘드네요..다시한번 간곡히 도움요청드립니다.시간이 많이 걸린다 하시니 1번질문
하나만이라도 기존파동수식에 약식으로라도 봉갯수만 표기되면 좋으니 꼭 부탁드립니다.
##, 미리 감사드립다
----------------------------------------------------------
수식적용해보니 봉갯수가 전혀 맞지 않는데...예를들어 파동저점에서 고점까지 캔들의 음봉양봉 갯수 출력인데 보내주신식은 전혀 맞지 않습니다.
-----------------------------------------------------------------------
봉개수계산할때 첫봉과 끝봉을 제외하고 계산되었습니다, 첫봉과끝봉을 포함해서 계산되게(HTS 도구모음에 봉개수세기와 동일하게) 수정 요청 드립니다.
감사합니다.
다음글
이전글