커뮤니티
부탁드립니다.
2024-01-14 16:37:46
677
글번호 175723
안녕하세요?
여러모로 도와주셔서 진심으로 감사드립니다.
아래 수식에서 다음내용을 검토해주십시요
1) 2일선시작라인 기준으로 상하 "전일종가-+당일시가" 데이터가 다르게 나타납니다.
2) 데이터가 2일선시작라인과 겹쳐표기됩니다. 상하 1라인 블랭크를 두었으면합니다.
3) 데이터가 많은날 당일캔들과 겹쳐서 나타납니다. 데이터가 전일 15:15분에 나타났으면 좋겠습니다.
4) "2일시작값+3.0" 데이터를 2일시작라인 상하로 추가해주세요.
늘 부탁만드려 죄송합니다.
오늘도 좋은하루 되시길 기원합니다.
================
input : p(2),pt1(0.05),pt2(0.05);
input : 굵기1(5),R1(255),G1(0),B1(0);
input : 굵기2(5),R2(255),G2(0),B2(0);
input : 굵기3(5),R3(255),G3(0),B3(0);
input : 굵기4(5),R4(255),G4(0),B4(0);
input : 굵기5(5),R5(255),G5(0),B5(0);
var : cnt(0),sum(0),mav(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
var : tx1(0),tx2(0),tx3(0);
sum = DayOpen(0);
if P >= 2 Then
{
For cnt = 1 to P-1
{
sum = sum + DayClose(cnt);
}
}
mav = sum/P;
if Index == 0 or (sTime >= 150000 and sTime[1] < 150000) Then
{
var1 = sDate;
Var2 = stime;
}
if Bdate != Bdate[1] Then
{
if var1 > 0 and Var2 > 0 Then
{
TL1 = TL_New(var1,Var2,mav,sDate,sTime,mav);
TL2 = TL_New(var1,Var2,mav+pt1,sDate,sTime,mav+pt1);
TL3 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt1);
TL4 = TL_New(var1,Var2,mav+pt2,sDate,sTime,mav+pt2);
TL5 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt2);
TL_SetColor(TL1,RGB(R1,G1,B1));
TL_SetColor(TL2,RGB(R2,G2,B2));
TL_SetColor(TL3,RGB(R3,G3,B3));
TL_SetColor(TL4,RGB(R4,G4,B4));
TL_SetColor(TL5,RGB(R5,G5,B5));
TL_SetSize(TL1, 굵기1);
TL_SetSize(TL2, 굵기2);
TL_SetSize(TL3, 굵기3);
TL_SetSize(TL4, 굵기4);
TL_SetSize(TL5, 굵기5);
if DayOpen > mav Then
{
tx1 = text_new(sDate,sTime,mav,NumToStr(mav+1.5,2)+NewLine+NewLine);
Text_SetStyle(tx1,0,1);
Text_SetColor(tx1,Red);
tx2 = text_new(sDate,sTime,mav,NumToStr(DayOpen-mav,2)+NewLine);
Text_SetStyle(tx2,0,1);
Text_SetColor(tx2,Magenta);
tx3 = text_new(sDate,sTime,mav,NumToStr(DayOpen-DayClose*(1),2));
Text_SetStyle(tx3,0,1);
Text_SetColor(tx3,Black);
}
Else
{
tx1 = text_new(sDate,sTime,mav,NumToStr(DayOpen-DayClose*(1),2));
Text_SetStyle(tx1,0,0);
Text_SetColor(tx1,Black);
tx2 = text_new(sDate,sTime,mav,NewLine+NumToStr(mav-DayOpen,2));
Text_SetStyle(tx2,0,0);
Text_SetColor(tx2,Magenta);
tx3 = text_new(sDate,sTime,mav,NewLine+NewLine+NumToStr(mav-1.5,2));
Text_SetStyle(tx3,0,0);
Text_SetColor(tx3,Blue);
}
}
}
Else
{
if sTime < 150000 Then
{
TL_SetBegin(TL1,var1,Var2,mav);
TL_SetEnd(TL1,sDate,sTime,mav);
TL_SetBegin(TL2,var1,Var2,mav+pt1);
TL_SetEnd(TL2,sDate,sTime,mav+pt1);
TL_SetBegin(TL3,var1,Var2,mav-pt1);
TL_SetEnd(TL3,sDate,sTime,mav-pt1);
TL_SetBegin(TL4,var1,Var2,mav+pt2);
TL_SetEnd(TL4,sDate,sTime,mav+pt2);
TL_SetBegin(TL5,var1,Var2,mav-pt2);
TL_SetEnd(TL5,sDate,sTime,mav-pt2);
}
}
답변 1
예스스탁 예스스탁 답변
2024-01-15 17:28:24
안녕하세요
예스스탁입니다.
input : p(2),pt1(0.05),pt2(0.05);
input : 굵기1(5),R1(255),G1(0),B1(0);
input : 굵기2(5),R2(255),G2(0),B2(0);
input : 굵기3(5),R3(255),G3(0),B3(0);
input : 굵기4(5),R4(255),G4(0),B4(0);
input : 굵기5(5),R5(255),G5(0),B5(0);
var : cnt(0),sum(0),mav(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
var : tx1(0),tx2(0),tx3(0),tx4(0);
sum = DayOpen(0);
if P >= 2 Then
{
For cnt = 1 to P-1
{
sum = sum + DayClose(cnt);
}
}
mav = sum/P;
if Index == 0 or (sTime >= 150000 and sTime[1] < 150000) Then
{
var1 = sDate;
Var2 = stime;
}
if Bdate != Bdate[1] Then
{
if var1 > 0 and Var2 > 0 Then
{
TL1 = TL_New(var1,Var2,mav,sDate,sTime,mav);
TL2 = TL_New(var1,Var2,mav+pt1,sDate,sTime,mav+pt1);
TL3 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt1);
TL4 = TL_New(var1,Var2,mav+pt2,sDate,sTime,mav+pt2);
TL5 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt2);
TL_SetColor(TL1,RGB(R1,G1,B1));
TL_SetColor(TL2,RGB(R2,G2,B2));
TL_SetColor(TL3,RGB(R3,G3,B3));
TL_SetColor(TL4,RGB(R4,G4,B4));
TL_SetColor(TL5,RGB(R5,G5,B5));
TL_SetSize(TL1, 굵기1);
TL_SetSize(TL2, 굵기2);
TL_SetSize(TL3, 굵기3);
TL_SetSize(TL4, 굵기4);
TL_SetSize(TL5, 굵기5);
if DayOpen > mav Then
{
tx1 = text_new(sDate[1],151500,mav,NumToStr(mav+3.0,2)+NewLine+NewLine+NewLine+NewLine);
Text_SetStyle(tx1,0,1);
Text_SetColor(tx1,Red);
tx2 = text_new(sDate[1],151500,mav,NumToStr(mav+1.5,2)+NewLine+NewLine+NewLine);
Text_SetStyle(tx2,0,1);
Text_SetColor(tx2,Red);
tx3 = text_new(sDate[1],151500,mav,NumToStr(DayOpen-mav,2)+NewLine+NewLine);
Text_SetStyle(tx3,0,1);
Text_SetColor(tx3,Magenta);
tx4 = text_new(sDate[1],151500,mav,NumToStr(DayOpen-DayClose(1),2)+NewLine);
Text_SetStyle(tx4,0,1);
Text_SetColor(tx4,Black);
}
Else
{
tx1 = text_new(sDate[1],151500,mav,NewLine+NumToStr(DayOpen-DayClose(1),2));
Text_SetStyle(tx1,0,0);
Text_SetColor(tx1,Black);
tx2 = text_new(sDate[1],151500,mav,NewLine+NewLine+NumToStr(mav-DayOpen,2));
Text_SetStyle(tx2,0,0);
Text_SetColor(tx2,Magenta);
tx3 = text_new(sDate[1],151500,mav,NewLine+NewLine+NewLine+NumToStr(mav-1.5,2));
Text_SetStyle(tx3,0,0);
Text_SetColor(tx3,Blue);
tx4 = text_new(sDate[1],151500,mav,NewLine+NewLine+NewLine+NewLine+NumToStr(mav-3.0,2));
Text_SetStyle(tx4,0,0);
Text_SetColor(tx4,Blue);
}
}
}
Else
{
if sTime < 150000 Then
{
TL_SetBegin(TL1,var1,Var2,mav);
TL_SetEnd(TL1,sDate,sTime,mav);
TL_SetBegin(TL2,var1,Var2,mav+pt1);
TL_SetEnd(TL2,sDate,sTime,mav+pt1);
TL_SetBegin(TL3,var1,Var2,mav-pt1);
TL_SetEnd(TL3,sDate,sTime,mav-pt1);
TL_SetBegin(TL4,var1,Var2,mav+pt2);
TL_SetEnd(TL4,sDate,sTime,mav+pt2);
TL_SetBegin(TL5,var1,Var2,mav-pt2);
TL_SetEnd(TL5,sDate,sTime,mav-pt2);
}
}
즐거운 하루되세요
> 포보스 님이 쓴 글입니다.
> 제목 : 부탁드립니다.
> 안녕하세요?
여러모로 도와주셔서 진심으로 감사드립니다.
아래 수식에서 다음내용을 검토해주십시요
1) 2일선시작라인 기준으로 상하 "전일종가-+당일시가" 데이터가 다르게 나타납니다.
2) 데이터가 2일선시작라인과 겹쳐표기됩니다. 상하 1라인 블랭크를 두었으면합니다.
3) 데이터가 많은날 당일캔들과 겹쳐서 나타납니다. 데이터가 전일 15:15분에 나타났으면 좋겠습니다.
4) "2일시작값+3.0" 데이터를 2일시작라인 상하로 추가해주세요.
늘 부탁만드려 죄송합니다.
오늘도 좋은하루 되시길 기원합니다.
================
input : p(2),pt1(0.05),pt2(0.05);
input : 굵기1(5),R1(255),G1(0),B1(0);
input : 굵기2(5),R2(255),G2(0),B2(0);
input : 굵기3(5),R3(255),G3(0),B3(0);
input : 굵기4(5),R4(255),G4(0),B4(0);
input : 굵기5(5),R5(255),G5(0),B5(0);
var : cnt(0),sum(0),mav(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
var : tx1(0),tx2(0),tx3(0);
sum = DayOpen(0);
if P >= 2 Then
{
For cnt = 1 to P-1
{
sum = sum + DayClose(cnt);
}
}
mav = sum/P;
if Index == 0 or (sTime >= 150000 and sTime[1] < 150000) Then
{
var1 = sDate;
Var2 = stime;
}
if Bdate != Bdate[1] Then
{
if var1 > 0 and Var2 > 0 Then
{
TL1 = TL_New(var1,Var2,mav,sDate,sTime,mav);
TL2 = TL_New(var1,Var2,mav+pt1,sDate,sTime,mav+pt1);
TL3 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt1);
TL4 = TL_New(var1,Var2,mav+pt2,sDate,sTime,mav+pt2);
TL5 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt2);
TL_SetColor(TL1,RGB(R1,G1,B1));
TL_SetColor(TL2,RGB(R2,G2,B2));
TL_SetColor(TL3,RGB(R3,G3,B3));
TL_SetColor(TL4,RGB(R4,G4,B4));
TL_SetColor(TL5,RGB(R5,G5,B5));
TL_SetSize(TL1, 굵기1);
TL_SetSize(TL2, 굵기2);
TL_SetSize(TL3, 굵기3);
TL_SetSize(TL4, 굵기4);
TL_SetSize(TL5, 굵기5);
if DayOpen > mav Then
{
tx1 = text_new(sDate,sTime,mav,NumToStr(mav+1.5,2)+NewLine+NewLine);
Text_SetStyle(tx1,0,1);
Text_SetColor(tx1,Red);
tx2 = text_new(sDate,sTime,mav,NumToStr(DayOpen-mav,2)+NewLine);
Text_SetStyle(tx2,0,1);
Text_SetColor(tx2,Magenta);
tx3 = text_new(sDate,sTime,mav,NumToStr(DayOpen-DayClose*(1),2));
Text_SetStyle(tx3,0,1);
Text_SetColor(tx3,Black);
}
Else
{
tx1 = text_new(sDate,sTime,mav,NumToStr(DayOpen-DayClose*(1),2));
Text_SetStyle(tx1,0,0);
Text_SetColor(tx1,Black);
tx2 = text_new(sDate,sTime,mav,NewLine+NumToStr(mav-DayOpen,2));
Text_SetStyle(tx2,0,0);
Text_SetColor(tx2,Magenta);
tx3 = text_new(sDate,sTime,mav,NewLine+NewLine+NumToStr(mav-1.5,2));
Text_SetStyle(tx3,0,0);
Text_SetColor(tx3,Blue);
}
}
}
Else
{
if sTime < 150000 Then
{
TL_SetBegin(TL1,var1,Var2,mav);
TL_SetEnd(TL1,sDate,sTime,mav);
TL_SetBegin(TL2,var1,Var2,mav+pt1);
TL_SetEnd(TL2,sDate,sTime,mav+pt1);
TL_SetBegin(TL3,var1,Var2,mav-pt1);
TL_SetEnd(TL3,sDate,sTime,mav-pt1);
TL_SetBegin(TL4,var1,Var2,mav+pt2);
TL_SetEnd(TL4,sDate,sTime,mav+pt2);
TL_SetBegin(TL5,var1,Var2,mav-pt2);
TL_SetEnd(TL5,sDate,sTime,mav-pt2);
}
}
다음글
이전글