커뮤니티
수식문의 문의 드립니다
2016-10-06 12:29:43
157
글번호 102598
항상 감사드립니다.
1) 직전고점과 직전저점을 구하고
==> 기준 봉개수는 3개
2) 직전저점이 만들어진 경우
==> 직전 저점과 직전전 고점의 차이(틱수-해선 다종목 적용)를 직전저점 아래에 숫자로 표시
==> 그아래 직전저점의 종가를 표시
직전고점이 만들어진 경우
==> 직전 고점과 직전전 저점의 차이(틱수-해선 다종목 적용)를 직전고점 위에 숫자로 표시
==> 그위에 직전고점의 종가를 표시
3) 직전저점과 직전고점을 연결하는 선을 그리기
==> 상방은 빨강색
==> 하방은 파랑색
답변 6
예스스탁 예스스탁 답변
2016-10-06 13:34:31
안녕하세요
예스스탁입니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
if T <= 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
T = 1;
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
if LD > 0 and LT > 0 and LL > 0 then{
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
T = -1;
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[right];
if HD > 0 and HT > 0 and HH > 0 then{
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : 수식문의 문의 드립니다
> 항상 감사드립니다.
1) 직전고점과 직전저점을 구하고
==> 기준 봉개수는 3개
2) 직전저점이 만들어진 경우
==> 직전 저점과 직전전 고점의 차이(틱수-해선 다종목 적용)를 직전저점 아래에 숫자로 표시
==> 그아래 직전저점의 종가를 표시
직전고점이 만들어진 경우
==> 직전 고점과 직전전 저점의 차이(틱수-해선 다종목 적용)를 직전고점 위에 숫자로 표시
==> 그위에 직전고점의 종가를 표시
3) 직전저점과 직전고점을 연결하는 선을 그리기
==> 상방은 빨강색
==> 하방은 파랑색
스로우
2016-10-06 13:49:30
답변 감사합니다.
직전고점 직전저점의 기준을 다른 방법으로 보고자 합니다.
1) 스윙함수 봉3개 기준으로 고점과 저점을 보되
2) 상방인경우 스윙함수의 고점과 저점을 기준으로 진폭의 38.2% 눌리면(터치하거나 붕괴) 고점인정하고... 이 경우에 대해서 나머지 명령을 실행하도록 조정하고 싶습니다
<하방인 경우 반대>
감사합니다. ^^
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의 문의 드립니다
> 안녕하세요
예스스탁입니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
if T <= 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
T = 1;
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
if LD > 0 and LT > 0 and LL > 0 then{
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
T = -1;
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[right];
if HD > 0 and HT > 0 and HH > 0 then{
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : 수식문의 문의 드립니다
> 항상 감사드립니다.
1) 직전고점과 직전저점을 구하고
==> 기준 봉개수는 3개
2) 직전저점이 만들어진 경우
==> 직전 저점과 직전전 고점의 차이(틱수-해선 다종목 적용)를 직전저점 아래에 숫자로 표시
==> 그아래 직전저점의 종가를 표시
직전고점이 만들어진 경우
==> 직전 고점과 직전전 저점의 차이(틱수-해선 다종목 적용)를 직전고점 위에 숫자로 표시
==> 그위에 직전고점의 종가를 표시
3) 직전저점과 직전고점을 연결하는 선을 그리기
==> 상방은 빨강색
==> 하방은 파랑색
예스스탁 예스스탁 답변
2016-10-06 16:40:07
안녕하세요
예스스탁입니다.
아래 내용 참고하시기 바랍니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
var : cnt(0);
if T == 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
LL = HH;
T = 1;
}
if T == 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
LD = sDate[Right];
T = sTime[Right];
LL = L[Right];
LC = C[right];
HH = LL;
T = -1;
}
if T == -1 Then{
if SwingHigh(1,H,Left,Right,Left+Right+1) != -1 and H[right] > HH Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
}
if HH > LL and L <= HH-(HH-LL)*0.382 Then{
T = 1;
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
LL = HH;
}
}
if T == 1 Then{
if SwingLow(1,L,Left,Right,Left+Right+1) != -1 and L[right] < LL Then{
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[Right];
}
if LL < HH and H >= LL+(HH-LL)*0.382 Then{
T = -1;
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
HH = LL;
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : Re : Re : 수식문의 문의 드립니다
> 답변 감사합니다.
직전고점 직전저점의 기준을 다른 방법으로 보고자 합니다.
1) 스윙함수 봉3개 기준으로 고점과 저점을 보되
2) 상방인경우 스윙함수의 고점과 저점을 기준으로 진폭의 38.2% 눌리면(터치하거나 붕괴) 고점인정하고... 이 경우에 대해서 나머지 명령을 실행하도록 조정하고 싶습니다
<하방인 경우 반대>
감사합니다. ^^
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의 문의 드립니다
> 안녕하세요
예스스탁입니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
if T <= 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
T = 1;
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
if LD > 0 and LT > 0 and LL > 0 then{
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
T = -1;
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[right];
if HD > 0 and HT > 0 and HH > 0 then{
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : 수식문의 문의 드립니다
> 항상 감사드립니다.
1) 직전고점과 직전저점을 구하고
==> 기준 봉개수는 3개
2) 직전저점이 만들어진 경우
==> 직전 저점과 직전전 고점의 차이(틱수-해선 다종목 적용)를 직전저점 아래에 숫자로 표시
==> 그아래 직전저점의 종가를 표시
직전고점이 만들어진 경우
==> 직전 고점과 직전전 저점의 차이(틱수-해선 다종목 적용)를 직전고점 위에 숫자로 표시
==> 그위에 직전고점의 종가를 표시
3) 직전저점과 직전고점을 연결하는 선을 그리기
==> 상방은 빨강색
==> 하방은 파랑색
스로우
2016-10-07 09:58:14
스로우 님에 의해 삭제된 답변입니다.
스로우
2016-10-07 09:56:56
답변 감사드립니다.
그런데 1) 글자의 색(빨강,파랑)이 반영되지 않습니다.
2) 글자가 봉과 겹쳐서 잘 보이지 않는데요. 상방은 더 봉위로, 하방은 더 봉아래로 표시하고 위치를 임의로 조정할수있게 설정했으면 좋겠네요.
그리고 3)직전고저점 연결선을 좀더 굵게(3pt) 표시할 수 있었으면 좋겠읍니다
감사합니다 ^^
> 예스스탁 님이 쓴 글입니다.javascript:OnWrite();
> 제목 : Re : Re : Re : 수식문의 문의 드립니다
> 안녕하세요
예스스탁입니다.
아래 내용 참고하시기 바랍니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
var : cnt(0);
if T == 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
LL = HH;
T = 1;
}
if T == 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
LD = sDate[Right];
T = sTime[Right];
LL = L[Right];
LC = C[right];
HH = LL;
T = -1;
}
if T == -1 Then{
if SwingHigh(1,H,Left,Right,Left+Right+1) != -1 and H[right] > HH Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
}
if HH > LL and L <= HH-(HH-LL)*0.382 Then{
T = 1;
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
LL = HH;
}
}
if T == 1 Then{
if SwingLow(1,L,Left,Right,Left+Right+1) != -1 and L[right] < LL Then{
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[Right];
}
if LL < HH and H >= LL+(HH-LL)*0.382 Then{
T = -1;
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
HH = LL;
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : Re : Re : 수식문의 문의 드립니다
> 답변 감사합니다.
직전고점 직전저점의 기준을 다른 방법으로 보고자 합니다.
1) 스윙함수 봉3개 기준으로 고점과 저점을 보되
2) 상방인경우 스윙함수의 고점과 저점을 기준으로 진폭의 38.2% 눌리면(터치하거나 붕괴) 고점인정하고... 이 경우에 대해서 나머지 명령을 실행하도록 조정하고 싶습니다
<하방인 경우 반대>
감사합니다. ^^
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의 문의 드립니다
> 안녕하세요
예스스탁입니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
if T <= 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
T = 1;
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
if LD > 0 and LT > 0 and LL > 0 then{
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
T = -1;
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[right];
if HD > 0 and HT > 0 and HH > 0 then{
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : 수식문의 문의 드립니다
> 항상 감사드립니다.
1) 직전고점과 직전저점을 구하고
==> 기준 봉개수는 3개
2) 직전저점이 만들어진 경우
==> 직전 저점과 직전전 고점의 차이(틱수-해선 다종목 적용)를 직전저점 아래에 숫자로 표시
==> 그아래 직전저점의 종가를 표시
직전고점이 만들어진 경우
==> 직전 고점과 직전전 저점의 차이(틱수-해선 다종목 적용)를 직전고점 위에 숫자로 표시
==> 그위에 직전고점의 종가를 표시
3) 직전저점과 직전고점을 연결하는 선을 그리기
==> 상방은 빨강색
==> 하방은 파랑색
스로우
2016-10-07 09:57:11
답변 감사드립니다.
그런데 1) 글자의 색(빨강,파랑)이 반영되지 않습니다.
2) 글자가 봉과 겹쳐서 잘 보이지 않는데요. 상방은 더 봉위로, 하방은 더 봉아래로 표시하고 위치를 임의로 조정할수있게 설정했으면 좋겠네요.
그리고 3)직전고저점 연결선을 좀더 굵게(3pt) 표시할 수 있었으면 좋겠읍니다
감사합니다 ^^
> 예스스탁 님이 쓴 글입니다.javascript:OnWrite();
> 제목 : Re : Re : Re : 수식문의 문의 드립니다
> 안녕하세요
예스스탁입니다.
아래 내용 참고하시기 바랍니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
var : cnt(0);
if T == 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
LL = HH;
T = 1;
}
if T == 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
LD = sDate[Right];
T = sTime[Right];
LL = L[Right];
LC = C[right];
HH = LL;
T = -1;
}
if T == -1 Then{
if SwingHigh(1,H,Left,Right,Left+Right+1) != -1 and H[right] > HH Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
}
if HH > LL and L <= HH-(HH-LL)*0.382 Then{
T = 1;
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
LL = HH;
}
}
if T == 1 Then{
if SwingLow(1,L,Left,Right,Left+Right+1) != -1 and L[right] < LL Then{
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[Right];
}
if LL < HH and H >= LL+(HH-LL)*0.382 Then{
T = -1;
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
HH = LL;
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : Re : Re : 수식문의 문의 드립니다
> 답변 감사합니다.
직전고점 직전저점의 기준을 다른 방법으로 보고자 합니다.
1) 스윙함수 봉3개 기준으로 고점과 저점을 보되
2) 상방인경우 스윙함수의 고점과 저점을 기준으로 진폭의 38.2% 눌리면(터치하거나 붕괴) 고점인정하고... 이 경우에 대해서 나머지 명령을 실행하도록 조정하고 싶습니다
<하방인 경우 반대>
감사합니다. ^^
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의 문의 드립니다
> 안녕하세요
예스스탁입니다.
input : Left(3),Right(3);
var : T(0),TL(0),tx(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
if T <= 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
T = 1;
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
if LD > 0 and LT > 0 and LL > 0 then{
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
tx = Text_New(HD,HT,HH,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HC,2));
Text_SetStyle(tx,2,2);
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
T = -1;
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[right];
if HD > 0 and HT > 0 and HH > 0 then{
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,2));
Text_SetStyle(tx,2,2);
}
}
즐거운 하루되세요
> 스로우 님이 쓴 글입니다.
> 제목 : 수식문의 문의 드립니다
> 항상 감사드립니다.
1) 직전고점과 직전저점을 구하고
==> 기준 봉개수는 3개
2) 직전저점이 만들어진 경우
==> 직전 저점과 직전전 고점의 차이(틱수-해선 다종목 적용)를 직전저점 아래에 숫자로 표시
==> 그아래 직전저점의 종가를 표시
직전고점이 만들어진 경우
==> 직전 고점과 직전전 저점의 차이(틱수-해선 다종목 적용)를 직전고점 위에 숫자로 표시
==> 그위에 직전고점의 종가를 표시
3) 직전저점과 직전고점을 연결하는 선을 그리기
==> 상방은 빨강색
==> 하방은 파랑색