커뮤니티
도움 요청합니다.
2024-01-11 11:13:20
680
글번호 175630
안녕하세요?
아래 2일선 시작라인 위 아래로 아래 그림과 같이 수치를 표기하고자 합니다.
식결과 날짜기준선 식설명
ㅣ
345.05 ㅣ "2일시작값+1.5" Red 표기 2일선 위일경우 표기
0.75 ㅣ "당일시가-2일시작값 Magenta 표기 "
1.25 ㅣ "당일시가-전일종가" Black색표기 :
================================================================(2일 시작라인)
1.25 ㅣ "전일종가-당일시가" Black색표기 2일선 아래일경우 표기
0.75 ㅣ "2일시작값-당일시가 Magenta 표기 "
345.05 ㅣ "2일시작값-1.5" Blue 표기 "
ㅣ
미리 감사드립니다.
좋은하루 되세요.
=======================--------------------------
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);
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);
}
}
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-12 11:39:31
안녕하세요
예스스탁입니다.
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);
}
}
즐거운 하루되세요
> 포보스 님이 쓴 글입니다.
> 제목 : 도움 요청합니다.
> 안녕하세요?
아래 2일선 시작라인 위 아래로 아래 그림과 같이 수치를 표기하고자 합니다.
식결과 날짜기준선 식설명
ㅣ
345.05 ㅣ "2일시작값+1.5" Red 표기 2일선 위일경우 표기
0.75 ㅣ "당일시가-2일시작값 Magenta 표기 "
1.25 ㅣ "당일시가-전일종가" Black색표기 :
================================================================(2일 시작라인)
1.25 ㅣ "전일종가-당일시가" Black색표기 2일선 아래일경우 표기
0.75 ㅣ "2일시작값-당일시가 Magenta 표기 "
345.05 ㅣ "2일시작값-1.5" Blue 표기 "
ㅣ
미리 감사드립니다.
좋은하루 되세요.
=======================--------------------------
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);
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);
}
}
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);
}
}
다음글
이전글