커뮤니티
연장선 좀 부탁 드립니다.
2023-08-28 07:36:00
1344
글번호 171874
* 안녕하세요^^ 항상 많은 도움에 고맙습니다.
* 요청 사항1 ▶ 아래 수식에서 우측선 연장 부탁 드립니다.
즉 다음 신호 나올때 까지 우측선 부탁 드립니다.(bb는 삭제)
기존왼쪽선은 그대로 두고
다음 고가선 혹은 저가선이 발생할때 까지 우측선 연장
// 아래방식으로 Else 를 써 보았는데 수직선이 생기는데 잘못한게 뭐죠?
// Else
{
TL_SetEnd(HTL[0],sDate,sTime,bb);
Text_SetLocation(TX,sDate,sTime,bb);
}
// 이것을 사용 해봤는데 수직선이 생김니다.
// 어느부분이 잘못되었나요?
* 요청 사항2 ▶ 마지막 봉 기준 하락율좀 부탁 드립니다.(피보나치선)
즉 맨 마지막 봉 기준
마지막 봉대비 0.25 하락한 우측 추세선(굵기 0) 점선
마지막 봉대비 0.38 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 0.50 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.25 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.38 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.50 하락선 우측 추세선(굵기 0) 점선
6개 추세선이 상기 우측 연장선 하고 같이 생기도록 부탁 드립니다.
▶새로운 추세선이 발생하면 종료 하고 새로운 추세선 가격 기준 6개선 발생 하면서
이전 추세선은 1개(변수) 까지만 6개선 점선 표시 (2개 이전은 삭제)
즉 추세선 2개(변수) 라면 3개이전은 삭제
* 혹시 6개선이 안생긴다면 Lowest(L,P)[1] 를 Lowest(L,P)[3] 바꾸어도 됨니다
<아래수식>
input : bb(10);
var : TX(0);
input : P(10),n(9),틱(5);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,sDate[200],sTime[200],LL);
TL_SetColor(LTL[0],Blue);
TL_Delete(LTL[n]);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,sDate[200],sTime[200],HH);
TL_SetColor(HTL[0],Red);
TL_Delete(HTL[n]);
}
// 아래부분 이 잘못 된거 갔습니다. 수정좀 요청 드립니다.
Else
{
TL_SetEnd(HTL[0],sDate,sTime,bb);
Text_SetLocation(TX,sDate,sTime,bb);
}
* 고맙습니다 행복한 날 되십시요^^
좋은날 있을것 입니다.
답변 2
예스스탁 예스스탁 답변
2023-08-28 13:18:12
안녕하세요
예스스탁입니다.
var : TX(0);
input : P(10),n(9),틱(5);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);
var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);
TL_SetColor(LTL[0],Blue);
TL_Delete(LTL[n]);
TL_Delete(LTL1);
TL_Delete(LTL2);
TL_Delete(LTL3);
TL_Delete(LTL4);
TL_Delete(LTL5);
TL_Delete(LTL6);
LTL1 = TL_new(sDate,sTime,LL+0.25,NextBarSdate,NextBarStime,LL+0.25);
LTL2 = TL_new(sDate,sTime,LL+0.38,NextBarSdate,NextBarStime,LL+0.38);
LTL3 = TL_new(sDate,sTime,LL+0.50,NextBarSdate,NextBarStime,LL+0.50);
LTL4 = TL_new(sDate,sTime,LL-0.25,NextBarSdate,NextBarStime,LL-0.25);
LTL5 = TL_new(sDate,sTime,LL-0.38,NextBarSdate,NextBarStime,LL-0.38);
LTL6 = TL_new(sDate,sTime,LL-0.50,NextBarSdate,NextBarStime,LL-0.50);
TL_SetSize(LTL1,0);
TL_SetSize(LTL2,0);
TL_SetSize(LTL3,0);
TL_SetSize(LTL4,0);
TL_SetSize(LTL5,0);
TL_SetSize(LTL6,0);
TL_SetStyle(LTL1,3);
TL_SetStyle(LTL2,3);
TL_SetStyle(LTL3,3);
TL_SetStyle(LTL4,3);
TL_SetStyle(LTL5,3);
TL_SetStyle(LTL6,3);
TL_SetColor(LTL1,Blue);
TL_SetColor(LTL2,Blue);
TL_SetColor(LTL3,Blue);
TL_SetColor(LTL4,Blue);
TL_SetColor(LTL5,Blue);
TL_SetColor(LTL6,Blue);
}
Else
{
TL_SetEnd(LTL[0],sDate,sTime,LL);
Text_SetLocation(TX,sDate,sTime,LL);
TL_SetEnd(LTL1,sDate,sTime,LL+0.25);
TL_SetEnd(LTL2,sDate,sTime,LL+0.38);
TL_SetEnd(LTL3,sDate,sTime,LL+0.50);
TL_SetEnd(LTL4,sDate,sTime,LL-0.25);
TL_SetEnd(LTL5,sDate,sTime,LL-0.38);
TL_SetEnd(LTL6,sDate,sTime,LL-0.50);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);
TL_SetColor(HTL[0],Red);
TL_Delete(HTL[n]);
TL_Delete(HTL1);
TL_Delete(HTL2);
TL_Delete(HTL3);
TL_Delete(HTL4);
TL_Delete(HTL5);
TL_Delete(HTL6);
HTL1 = TL_new(sDate,sTime,HH+0.25,NextBarSdate,NextBarStime,HH+0.25);
HTL2 = TL_new(sDate,sTime,HH+0.38,NextBarSdate,NextBarStime,HH+0.38);
HTL3 = TL_new(sDate,sTime,HH+0.50,NextBarSdate,NextBarStime,HH+0.50);
HTL4 = TL_new(sDate,sTime,HH-0.25,NextBarSdate,NextBarStime,HH-0.25);
HTL5 = TL_new(sDate,sTime,HH-0.38,NextBarSdate,NextBarStime,HH-0.38);
HTL6 = TL_new(sDate,sTime,HH-0.50,NextBarSdate,NextBarStime,HH-0.50);
TL_SetSize(HTL1,0);
TL_SetSize(HTL2,0);
TL_SetSize(HTL3,0);
TL_SetSize(HTL4,0);
TL_SetSize(HTL5,0);
TL_SetSize(HTL6,0);
TL_SetStyle(HTL1,3);
TL_SetStyle(HTL2,3);
TL_SetStyle(HTL3,3);
TL_SetStyle(HTL4,3);
TL_SetStyle(HTL5,3);
TL_SetStyle(HTL6,3);
TL_SetColor(HTL1,Red);
TL_SetColor(HTL2,Red);
TL_SetColor(HTL3,Red);
TL_SetColor(HTL4,Red);
TL_SetColor(HTL5,Red);
TL_SetColor(HTL6,Red);
}
Else
{
TL_SetEnd(HTL[0],sDate,sTime,HH);
Text_SetLocation(TX,sDate,sTime,HH);
TL_SetEnd(HTL1,sDate,sTime,HH+0.25);
TL_SetEnd(HTL2,sDate,sTime,HH+0.38);
TL_SetEnd(HTL3,sDate,sTime,HH+0.50);
TL_SetEnd(HTL4,sDate,sTime,HH-0.25);
TL_SetEnd(HTL5,sDate,sTime,HH-0.38);
TL_SetEnd(HTL6,sDate,sTime,HH-0.50);
}
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 연장선 좀 부탁 드립니다.
> * 안녕하세요^^ 항상 많은 도움에 고맙습니다.
* 요청 사항1 ▶ 아래 수식에서 우측선 연장 부탁 드립니다.
즉 다음 신호 나올때 까지 우측선 부탁 드립니다.(bb는 삭제)
기존왼쪽선은 그대로 두고
다음 고가선 혹은 저가선이 발생할때 까지 우측선 연장
// 아래방식으로 Else 를 써 보았는데 수직선이 생기는데 잘못한게 뭐죠?
// Else
{
TL_SetEnd(HTL[0],sDate,sTime,bb);
Text_SetLocation(TX,sDate,sTime,bb);
}
// 이것을 사용 해봤는데 수직선이 생김니다.
// 어느부분이 잘못되었나요?
* 요청 사항2 ▶ 마지막 봉 기준 하락율좀 부탁 드립니다.(피보나치선)
즉 맨 마지막 봉 기준
마지막 봉대비 0.25 하락한 우측 추세선(굵기 0) 점선
마지막 봉대비 0.38 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 0.50 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.25 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.38 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.50 하락선 우측 추세선(굵기 0) 점선
6개 추세선이 상기 우측 연장선 하고 같이 생기도록 부탁 드립니다.
▶새로운 추세선이 발생하면 종료 하고 새로운 추세선 가격 기준 6개선 발생 하면서
이전 추세선은 1개(변수) 까지만 6개선 점선 표시 (2개 이전은 삭제)
즉 추세선 2개(변수) 라면 3개이전은 삭제
* 혹시 6개선이 안생긴다면 Lowest(L,P)[1] 를 Lowest(L,P)[3] 바꾸어도 됨니다
<아래수식>
input : bb(10);
var : TX(0);
input : P(10),n(9),틱(5);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,sDate[200],sTime[200],LL);
TL_SetColor(LTL[0],Blue);
TL_Delete(LTL[n]);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,sDate[200],sTime[200],HH);
TL_SetColor(HTL[0],Red);
TL_Delete(HTL[n]);
}
// 아래부분 이 잘못 된거 갔습니다. 수정좀 요청 드립니다.
Else
{
TL_SetEnd(HTL[0],sDate,sTime,bb);
Text_SetLocation(TX,sDate,sTime,bb);
}
* 고맙습니다 행복한 날 되십시요^^
좋은날 있을것 입니다.
예스스탁 예스스탁 답변
2023-08-30 09:31:32
안녕하세요
예스스탁입니다.
input : P(10),n(9),틱(5);
input : 틱1(10),틱2(20),틱3(50);
var : TX(0);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);
var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);
TL_SetColor(LTL[0],Blue);
TL_Delete(LTL[n]);
TL_Delete(LTL1);
TL_Delete(LTL2);
TL_Delete(LTL3);
TL_Delete(LTL4);
TL_Delete(LTL5);
TL_Delete(LTL6);
LTL1 = TL_new(sDate,sTime,LL+PriceScale*틱3,NextBarSdate,NextBarStime,LL+PriceScale*틱3);
LTL2 = TL_new(sDate,sTime,LL+PriceScale*틱2,NextBarSdate,NextBarStime,LL+PriceScale*틱2);
LTL3 = TL_new(sDate,sTime,LL+PriceScale*틱1,NextBarSdate,NextBarStime,LL+PriceScale*틱1);
LTL4 = TL_new(sDate,sTime,LL-PriceScale*틱1,NextBarSdate,NextBarStime,LL-PriceScale*틱1);
LTL5 = TL_new(sDate,sTime,LL-PriceScale*틱2,NextBarSdate,NextBarStime,LL-PriceScale*틱2);
LTL6 = TL_new(sDate,sTime,LL-PriceScale*틱3,NextBarSdate,NextBarStime,LL-PriceScale*틱3);
TL_SetSize(LTL1,0);
TL_SetSize(LTL2,0);
TL_SetSize(LTL3,0);
TL_SetSize(LTL4,0);
TL_SetSize(LTL5,0);
TL_SetSize(LTL6,0);
TL_SetStyle(LTL1,3);
TL_SetStyle(LTL2,3);
TL_SetStyle(LTL3,3);
TL_SetStyle(LTL4,3);
TL_SetStyle(LTL5,3);
TL_SetStyle(LTL6,3);
TL_SetColor(LTL1,Blue);
TL_SetColor(LTL2,Blue);
TL_SetColor(LTL3,Blue);
TL_SetColor(LTL4,Blue);
TL_SetColor(LTL5,Blue);
TL_SetColor(LTL6,Blue);
}
Else
{
TL_SetEnd(LTL[0],sDate,sTime,LL);
Text_SetLocation(TX,sDate,sTime,LL);
TL_SetEnd(LTL1,sDate,sTime,LL+PriceScale*틱3);
TL_SetEnd(LTL2,sDate,sTime,LL+PriceScale*틱2);
TL_SetEnd(LTL3,sDate,sTime,LL+PriceScale*틱1);
TL_SetEnd(LTL4,sDate,sTime,LL-PriceScale*틱1);
TL_SetEnd(LTL5,sDate,sTime,LL-PriceScale*틱2);
TL_SetEnd(LTL6,sDate,sTime,LL-PriceScale*틱3);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);
TL_SetColor(HTL[0],Red);
TL_Delete(HTL[n]);
TL_Delete(HTL1);
TL_Delete(HTL2);
TL_Delete(HTL3);
TL_Delete(HTL4);
TL_Delete(HTL5);
TL_Delete(HTL6);
HTL1 = TL_new(sDate,sTime,HH+PriceScale*틱3,NextBarSdate,NextBarStime,HH+PriceScale*틱3);
HTL2 = TL_new(sDate,sTime,HH+PriceScale*틱2,NextBarSdate,NextBarStime,HH+PriceScale*틱2);
HTL3 = TL_new(sDate,sTime,HH+PriceScale*틱1,NextBarSdate,NextBarStime,HH+PriceScale*틱1);
HTL4 = TL_new(sDate,sTime,HH-PriceScale*틱1,NextBarSdate,NextBarStime,HH-PriceScale*틱1);
HTL5 = TL_new(sDate,sTime,HH-PriceScale*틱2,NextBarSdate,NextBarStime,HH-PriceScale*틱2);
HTL6 = TL_new(sDate,sTime,HH-PriceScale*틱3,NextBarSdate,NextBarStime,HH-PriceScale*틱3);
TL_SetSize(HTL1,0);
TL_SetSize(HTL2,0);
TL_SetSize(HTL3,0);
TL_SetSize(HTL4,0);
TL_SetSize(HTL5,0);
TL_SetSize(HTL6,0);
TL_SetStyle(HTL1,3);
TL_SetStyle(HTL2,3);
TL_SetStyle(HTL3,3);
TL_SetStyle(HTL4,3);
TL_SetStyle(HTL5,3);
TL_SetStyle(HTL6,3);
TL_SetColor(HTL1,Red);
TL_SetColor(HTL2,Red);
TL_SetColor(HTL3,Red);
TL_SetColor(HTL4,Red);
TL_SetColor(HTL5,Red);
TL_SetColor(HTL6,Red);
}
Else
{
TL_SetEnd(HTL[0],sDate,sTime,HH);
Text_SetLocation(TX,sDate,sTime,HH);
TL_SetEnd(HTL1,sDate,sTime,HH+PriceScale*틱3);
TL_SetEnd(HTL2,sDate,sTime,HH+PriceScale*틱2);
TL_SetEnd(HTL3,sDate,sTime,HH+PriceScale*틱1);
TL_SetEnd(HTL4,sDate,sTime,HH-PriceScale*틱1);
TL_SetEnd(HTL5,sDate,sTime,HH-PriceScale*틱2);
TL_SetEnd(HTL6,sDate,sTime,HH-PriceScale*틱3);
}
즐거운 하루되세요
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 연장선 좀 부탁 드립니다.
>
안녕하세요
예스스탁입니다.
var : TX(0);
input : P(10),n(9),틱(5);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);
var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);
TL_SetColor(LTL[0],Blue);
TL_Delete(LTL[n]);
TL_Delete(LTL1);
TL_Delete(LTL2);
TL_Delete(LTL3);
TL_Delete(LTL4);
TL_Delete(LTL5);
TL_Delete(LTL6);
LTL1 = TL_new(sDate,sTime,LL+0.25,NextBarSdate,NextBarStime,LL+0.25);
LTL2 = TL_new(sDate,sTime,LL+0.38,NextBarSdate,NextBarStime,LL+0.38);
LTL3 = TL_new(sDate,sTime,LL+0.50,NextBarSdate,NextBarStime,LL+0.50);
LTL4 = TL_new(sDate,sTime,LL-0.25,NextBarSdate,NextBarStime,LL-0.25);
LTL5 = TL_new(sDate,sTime,LL-0.38,NextBarSdate,NextBarStime,LL-0.38);
LTL6 = TL_new(sDate,sTime,LL-0.50,NextBarSdate,NextBarStime,LL-0.50);
TL_SetSize(LTL1,0);
TL_SetSize(LTL2,0);
TL_SetSize(LTL3,0);
TL_SetSize(LTL4,0);
TL_SetSize(LTL5,0);
TL_SetSize(LTL6,0);
TL_SetStyle(LTL1,3);
TL_SetStyle(LTL2,3);
TL_SetStyle(LTL3,3);
TL_SetStyle(LTL4,3);
TL_SetStyle(LTL5,3);
TL_SetStyle(LTL6,3);
TL_SetColor(LTL1,Blue);
TL_SetColor(LTL2,Blue);
TL_SetColor(LTL3,Blue);
TL_SetColor(LTL4,Blue);
TL_SetColor(LTL5,Blue);
TL_SetColor(LTL6,Blue);
}
Else
{
TL_SetEnd(LTL[0],sDate,sTime,LL);
Text_SetLocation(TX,sDate,sTime,LL);
TL_SetEnd(LTL1,sDate,sTime,LL+0.25);
TL_SetEnd(LTL2,sDate,sTime,LL+0.38);
TL_SetEnd(LTL3,sDate,sTime,LL+0.50);
TL_SetEnd(LTL4,sDate,sTime,LL-0.25);
TL_SetEnd(LTL5,sDate,sTime,LL-0.38);
TL_SetEnd(LTL6,sDate,sTime,LL-0.50);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);
TL_SetColor(HTL[0],Red);
TL_Delete(HTL[n]);
TL_Delete(HTL1);
TL_Delete(HTL2);
TL_Delete(HTL3);
TL_Delete(HTL4);
TL_Delete(HTL5);
TL_Delete(HTL6);
HTL1 = TL_new(sDate,sTime,HH+0.25,NextBarSdate,NextBarStime,HH+0.25);
HTL2 = TL_new(sDate,sTime,HH+0.38,NextBarSdate,NextBarStime,HH+0.38);
HTL3 = TL_new(sDate,sTime,HH+0.50,NextBarSdate,NextBarStime,HH+0.50);
HTL4 = TL_new(sDate,sTime,HH-0.25,NextBarSdate,NextBarStime,HH-0.25);
HTL5 = TL_new(sDate,sTime,HH-0.38,NextBarSdate,NextBarStime,HH-0.38);
HTL6 = TL_new(sDate,sTime,HH-0.50,NextBarSdate,NextBarStime,HH-0.50);
TL_SetSize(HTL1,0);
TL_SetSize(HTL2,0);
TL_SetSize(HTL3,0);
TL_SetSize(HTL4,0);
TL_SetSize(HTL5,0);
TL_SetSize(HTL6,0);
TL_SetStyle(HTL1,3);
TL_SetStyle(HTL2,3);
TL_SetStyle(HTL3,3);
TL_SetStyle(HTL4,3);
TL_SetStyle(HTL5,3);
TL_SetStyle(HTL6,3);
TL_SetColor(HTL1,Red);
TL_SetColor(HTL2,Red);
TL_SetColor(HTL3,Red);
TL_SetColor(HTL4,Red);
TL_SetColor(HTL5,Red);
TL_SetColor(HTL6,Red);
}
Else
{
TL_SetEnd(HTL[0],sDate,sTime,HH);
Text_SetLocation(TX,sDate,sTime,HH);
TL_SetEnd(HTL1,sDate,sTime,HH+0.25);
TL_SetEnd(HTL2,sDate,sTime,HH+0.38);
TL_SetEnd(HTL3,sDate,sTime,HH+0.50);
TL_SetEnd(HTL4,sDate,sTime,HH-0.25);
TL_SetEnd(HTL5,sDate,sTime,HH-0.38);
TL_SetEnd(HTL6,sDate,sTime,HH-0.50);
}
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 연장선 좀 부탁 드립니다.
> * 안녕하세요^^ 항상 많은 도움에 고맙습니다.
* 요청 사항1 ▶ 아래 수식에서 우측선 연장 부탁 드립니다.
즉 다음 신호 나올때 까지 우측선 부탁 드립니다.(bb는 삭제)
기존왼쪽선은 그대로 두고
다음 고가선 혹은 저가선이 발생할때 까지 우측선 연장
// 아래방식으로 Else 를 써 보았는데 수직선이 생기는데 잘못한게 뭐죠?
// Else
{
TL_SetEnd(HTL[0],sDate,sTime,bb);
Text_SetLocation(TX,sDate,sTime,bb);
}
// 이것을 사용 해봤는데 수직선이 생김니다.
// 어느부분이 잘못되었나요?
* 요청 사항2 ▶ 마지막 봉 기준 하락율좀 부탁 드립니다.(피보나치선)
즉 맨 마지막 봉 기준
마지막 봉대비 0.25 하락한 우측 추세선(굵기 0) 점선
마지막 봉대비 0.38 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 0.50 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.25 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.38 하락선 우측 추세선(굵기 0) 점선
마지막 봉대비 -0.50 하락선 우측 추세선(굵기 0) 점선
6개 추세선이 상기 우측 연장선 하고 같이 생기도록 부탁 드립니다.
▶새로운 추세선이 발생하면 종료 하고 새로운 추세선 가격 기준 6개선 발생 하면서
이전 추세선은 1개(변수) 까지만 6개선 점선 표시 (2개 이전은 삭제)
즉 추세선 2개(변수) 라면 3개이전은 삭제
* 혹시 6개선이 안생긴다면 Lowest(L,P)[1] 를 Lowest(L,P)[3] 바꾸어도 됨니다
<아래수식>
input : bb(10);
var : TX(0);
input : P(10),n(9),틱(5);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,sDate[200],sTime[200],LL);
TL_SetColor(LTL[0],Blue);
TL_Delete(LTL[n]);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,sDate[200],sTime[200],HH);
TL_SetColor(HTL[0],Red);
TL_Delete(HTL[n]);
}
// 아래부분 이 잘못 된거 갔습니다. 수정좀 요청 드립니다.
Else
{
TL_SetEnd(HTL[0],sDate,sTime,bb);
Text_SetLocation(TX,sDate,sTime,bb);
}
* 고맙습니다 행복한 날 되십시요^^
좋은날 있을것 입니다.
다음글