커뮤니티
92588 답글좀 봐주세요
2025-05-08 14:07:54
269
글번호 190630
첨부 이미지
그림1
그림2
안녕하세요.
답변주셔서 감사합니다. 하지만 작성해주신 수식이 첨부한 그림처럼 나타납니다.
첨부한 그림1의 동그라미 친부분처럼 박스가 출력되길 원하는데
첨부한 그림2처럼 출력됩니다. 수정부탁드립니다.
바쁘신데 감사드립니다.
진입가부분의 표기와 박스생성을 2가지 색상으로 진입가 ~ TP영역, 진입가 ~ SL영역
으로 표기될수있도록 수정해주세요
추가로 하향 돌파했을때도 나타날수 있게 해주세요
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 박스출력 수식작성 부탁드려요
>
안녕하세요
예스스탁입니다.
input : P(20);
var : mav(0),hm(0),hh(0),lm(0),ll(0);
var : EP(0),TP(0),SL(0),TL1(0),TL2(0),TX1(0),TX2(0);
mav = ma(c,P);
#당일 이평 최고/최저일때 고가/저가
if Bdate != Bdate[1] Then
{
hm = mav;
hh = h;
lm = mav;
ll = l;
}
Else
{
if mav > hm Then
{
hm = mav;
hh = h;
}
if mav < lm Then
{
lm = mav;
ll = l;
}
}
Plot1(mav);
#상향돌파
if CrossUp(c,mav) Then
{
TL_Delete(TL1);
TL_Delete(TL2);
#진입가
EP = C;
#돌파시 당일20이평 최고값
TP = hh;
#돌파시 당일20이평 최저값
SL = ll;
TL1 = TL_New(sDate,sTime,TP,NextBarSdate,NextBarStime,TP);
TL2 = TL_New(sDate,sTime,SL,NextBarSdate,NextBarStime,SL);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
Text_Delete(TX1);
Text_Delete(TX2);
TX1 = Text_New(NextBarSdate,NextBarStime,TP,"TP:"+NumToStr(TP,2)+" ("+NumToStr((TP-EP)/EP*100,1)+"%)");
TX2 = Text_New(NextBarSdate,NextBarStime,SL,"SL:"+NumToStr(SL,2)+" ("+NumToStr((SL-EP)/EP*100,1)+"%)");
Text_SetStyle(TX1,1,1);
Text_SetStyle(TX2,1,0);
}
즐거운 하루되세요
> oni 님이 쓴 글입니다.
> 제목 : 박스출력 수식작성 부탁드려요
> 안녕하세요
첨부한 사진처럼
TP와 SL을 표기하고 싶습니다.
그림과 상관없이 조건은 20이평 돌파시 당일20이평이 최고일때의 고가를 tp로 표기하고
sl은 당일20이평이 최저일때의 처가로 sl을 표기하고 싶습니다.
첨부한 그림처럼 텍스트로 sl값이 얼마인지 몇%의 손절인지 그리고 tp인 익절값이 얼마인지
진입가 대비 몇%인지를 표기할 수 있도록 부탁드립니다.
진입가는 20이평 돌파시의 종가로 해주시면 될것 같습니다.
사진처럼 박스의 컬러가 2가지로 표현되도록 부탁드립니다.
- 1. 191505_출력원하는_모양.PNG (0.11 MB)
- 2. 191505_표시되는_형태.PNG (0.01 MB)
답변 1
예스스탁 예스스탁 답변
2025-05-08 15:00:27
안녕하세요
예스스탁입니다.
input : P(20);
var : mav(0),hm(0),hh(0),lm(0),ll(0);
var : EP(0),TP(0),SL(0),TL1(0),TL2(0),TL3(0),TX1(0),TX2(0),TX3(0);
var : box1(0),box2(0);
mav = ma(c,P);
#당일 이평 최고/최저일때 고가/저가
if Bdate != Bdate[1] Then
{
hm = mav;
hh = h;
lm = mav;
ll = l;
}
Else
{
if mav > hm Then
{
hm = mav;
hh = h;
}
if mav < lm Then
{
lm = mav;
ll = l;
}
}
Plot1(mav);
if CrossUp(c,mav) Then#상향돌파
{
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
#진입가
EP = C;
#돌파시 당일20이평 최고값
TP = hh;
#돌파시 당일20이평 최저값
SL = ll;
TL1 = TL_New(sDate,sTime,TP,NextBarSdate,NextBarStime,TP);
TL2 = TL_New(sDate,sTime,EP,NextBarSdate,NextBarStime,EP);
TL3 = TL_New(sDate,sTime,SL,NextBarSdate,NextBarStime,SL);
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
TL_SetSize(TL3,1);
Box_Delete(box1);
Box_Delete(box2);
box1 = Box_New(sDate,sTime,TP,NextBarSdate,NextBarStime,EP);
Box_SetColor(box1,Yellow);
Box_SetFill(box1,true,100);
box2 = Box_New(sDate,sTime,EP,NextBarSdate,NextBarStime,SL);
Box_SetColor(box2,Gray);
Box_SetFill(box2,true,100);
Text_Delete(TX1);
Text_Delete(TX2);
Text_Delete(TX3);
TX1 = Text_New(NextBarSdate,NextBarStime,TP,"TP:"+NumToStr(TP,2)+" ("+NumToStr((TP-EP)/EP*100,1)+"%)");
TX2 = Text_New(NextBarSdate,NextBarStime,EP,"[상향돌파]EP:"+NumToStr(EP,2));
TX3 = Text_New(NextBarSdate,NextBarStime,SL,"SL:"+NumToStr(SL,2)+" ("+NumToStr((SL-EP)/EP*100,1)+"%)");
Text_SetStyle(TX1,1,1);
Text_SetStyle(TX2,1,0);
Text_SetStyle(TX3,1,0);
}
else if CrossDown(c,mav) Then#하향이탈
{
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
#진입가
EP = C;
#돌파시 당일20이평 최고값
TP = LL;
#돌파시 당일20이평 최저값
SL = HH;
TL1 = TL_New(sDate,sTime,TP,NextBarSdate,NextBarStime,TP);
TL2 = TL_New(sDate,sTime,EP,NextBarSdate,NextBarStime,EP);
TL3 = TL_New(sDate,sTime,SL,NextBarSdate,NextBarStime,SL);
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
TL_SetSize(TL3,1);
Box_Delete(box1);
Box_Delete(box2);
box1 = Box_New(sDate,sTime,TP,NextBarSdate,NextBarStime,EP);
Box_SetColor(box1,Yellow);
Box_SetFill(box1,true,100);
box2 = Box_New(sDate,sTime,EP,NextBarSdate,NextBarStime,SL);
Box_SetColor(box2,Gray);
Box_SetFill(box2,true,100);
Text_Delete(TX1);
Text_Delete(TX2);
Text_Delete(TX3);
TX1 = Text_New(NextBarSdate,NextBarStime,TP,"TP:"+NumToStr(TP,2)+" ("+NumToStr((TP-EP)/EP*100,1)+"%)");
TX2 = Text_New(NextBarSdate,NextBarStime,EP,"[하향이탈]EP:"+NumToStr(EP,2));
TX3 = Text_New(NextBarSdate,NextBarStime,SL,"SL:"+NumToStr(SL,2)+" ("+NumToStr((SL-EP)/EP*100,1)+"%)");
Text_SetStyle(TX1,1,1);
Text_SetStyle(TX2,1,0);
Text_SetStyle(TX3,1,0);
}
Else
{
TL_SetEnd(TL1,NextBarSdate,NextBarStime,TP);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,EP);
TL_SetEnd(TL3,NextBarSdate,NextBarStime,SL);
Box_SetEnd(box1,NextBarSdate,NextBarStime,EP);
Box_SetEnd(box2,NextBarSdate,NextBarStime,SL);
}
즐거운 하루되세요
> oni 님이 쓴 글입니다.
> 제목 : 92588 답글좀 봐주세요
> 안녕하세요.
답변주셔서 감사합니다. 하지만 작성해주신 수식이 첨부한 그림처럼 나타납니다.
첨부한 그림1의 동그라미 친부분처럼 박스가 출력되길 원하는데
첨부한 그림2처럼 출력됩니다. 수정부탁드립니다.
바쁘신데 감사드립니다.
진입가부분의 표기와 박스생성을 2가지 색상으로 진입가 ~ TP영역, 진입가 ~ SL영역
으로 표기될수있도록 수정해주세요
추가로 하향 돌파했을때도 나타날수 있게 해주세요
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 박스출력 수식작성 부탁드려요
>
안녕하세요
예스스탁입니다.
input : P(20);
var : mav(0),hm(0),hh(0),lm(0),ll(0);
var : EP(0),TP(0),SL(0),TL1(0),TL2(0),TX1(0),TX2(0);
mav = ma(c,P);
#당일 이평 최고/최저일때 고가/저가
if Bdate != Bdate[1] Then
{
hm = mav;
hh = h;
lm = mav;
ll = l;
}
Else
{
if mav > hm Then
{
hm = mav;
hh = h;
}
if mav < lm Then
{
lm = mav;
ll = l;
}
}
Plot1(mav);
#상향돌파
if CrossUp(c,mav) Then
{
TL_Delete(TL1);
TL_Delete(TL2);
#진입가
EP = C;
#돌파시 당일20이평 최고값
TP = hh;
#돌파시 당일20이평 최저값
SL = ll;
TL1 = TL_New(sDate,sTime,TP,NextBarSdate,NextBarStime,TP);
TL2 = TL_New(sDate,sTime,SL,NextBarSdate,NextBarStime,SL);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
Text_Delete(TX1);
Text_Delete(TX2);
TX1 = Text_New(NextBarSdate,NextBarStime,TP,"TP:"+NumToStr(TP,2)+" ("+NumToStr((TP-EP)/EP*100,1)+"%)");
TX2 = Text_New(NextBarSdate,NextBarStime,SL,"SL:"+NumToStr(SL,2)+" ("+NumToStr((SL-EP)/EP*100,1)+"%)");
Text_SetStyle(TX1,1,1);
Text_SetStyle(TX2,1,0);
}
즐거운 하루되세요
> oni 님이 쓴 글입니다.
> 제목 : 박스출력 수식작성 부탁드려요
> 안녕하세요
첨부한 사진처럼
TP와 SL을 표기하고 싶습니다.
그림과 상관없이 조건은 20이평 돌파시 당일20이평이 최고일때의 고가를 tp로 표기하고
sl은 당일20이평이 최저일때의 처가로 sl을 표기하고 싶습니다.
첨부한 그림처럼 텍스트로 sl값이 얼마인지 몇%의 손절인지 그리고 tp인 익절값이 얼마인지
진입가 대비 몇%인지를 표기할 수 있도록 부탁드립니다.
진입가는 20이평 돌파시의 종가로 해주시면 될것 같습니다.
사진처럼 박스의 컬러가 2가지로 표현되도록 부탁드립니다.