답변완료
수식문의
수고하십니다.
친절한 답변 감사드립니다.
문의) 텍스트 출력값을 추세선처럼 오른쪽으로 확장하여 표현할 수 있는지요
Var : Pivot(0),R1(0),R2(0),S1(0),S2(0);
Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3;
R1 = 2*Pivot-DayLow(1);
R2 = Pivot+DayHigh(1)-DayLow(1);
S1 = 2*Pivot-DayHigh(1);
S2 = Pivot-DayHigh(1)+DayLow(1);
if index == 0 Then
{
value1 = sdate;
value2 = stime;
}
TL_Delete(var1);
TL_Delete(var2);
TL_Delete(var3);
TL_Delete(var4);
TL_Delete(var5);
var1 = TL_New(value1,value2,Pivot,sdate,stime,Pivot);
var2 = TL_New(value1,value2,R1,sdate,stime,R1);
var3 = TL_New(value1,value2,R2,sdate,stime,R2);
var4 = TL_New(value1,value2,S1,sdate,stime,S1);
var5 = TL_New(value1,value2,S2,sdate,stime,S2);
TL_SetExtRight(var1,true);
TL_SetExtRight(var2,true);
TL_SetExtRight(var3,true);
TL_SetExtRight(var4,true);
TL_SetExtRight(var5,true);
#색상
TL_SetColor(var1,Black);
TL_SetColor(var2,Black);
TL_SetColor(var3,Black);
TL_SetColor(var4,Black);
TL_SetColor(var5,Black);
#굵기
TL_SetSize(var1,1);
TL_SetSize(var2,1);
TL_SetSize(var3,1);
TL_SetSize(var4,1);
TL_SetSize(var5,1);
#텍스트 출력
Text_Delete(var11);
Text_Delete(var12);
Text_Delete(var13);
Text_Delete(var14);
Text_Delete(var15);
var11 = Text_New(NextBarSdate,NextBarStime,Pivot,NumToStr(Pivot,2));
var12 = Text_New(NextBarSdate,NextBarStime,R1,NumToStr(R1,2));
var13 = Text_New(NextBarSdate,NextBarStime,R2,NumToStr(R2,2));
var14 = Text_New(NextBarSdate,NextBarStime,S1,NumToStr(S1,2));
var15 = Text_New(NextBarSdate,NextBarStime,S2,NumToStr(S2,2));
Text_SetStyle(var11,0,1);
Text_SetStyle(var12,0,1);
Text_SetStyle(var13,0,1);
Text_SetStyle(var14,0,1);
Text_SetStyle(var15,0,1);
#색상
Text_SetColor(var11,Black);
Text_SetColor(var12,Black);
Text_SetColor(var13,Black);
Text_SetColor(var14,Black);
Text_SetColor(var15,Black);
2023-07-24
1121
글번호 170872
지표
답변완료
에러수정 좀 부탁드립니다.
안녕하세요? 어디가 문제인지를 모르겠어요. 수정 좀 부탁드립니다.
//====================================//
var : x1(0,Data1),x2(0,Data1),x3(0,Data1),x4(0,Data1),x5(0,Data1),x6(0,Data1),TL1(0),선두깨(0),
v1(0,Data1),v2(0,Data1),v3(0,Data1),v4(0,Data1),v5(0,Data1),v6(0,Data1),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0);
x1 = Data1(ema(c,9));
X2 = Data1(ma(c,120)); //120이평선(1시간)
X3 = Data1(ma(c,240)); //240이평선(2시간)
X4 = Data1(ma(c,480)); //480이평선(4시간)
if crossup(c,X2) Then {
{
V1 = Data1(C);
tx1 = Text_New_Self(Data1(sDate),Data1(sTime),v1,NumToStr(v1,2));
Text_SetStyle(tx1,0,0);
PlaySound("C:₩EugeneYesTrader₩Bin10₩data₩Sound₩120이평선돌파.wav");
}
if crossup(c,X3) Then {
{
V2 = Data1(C);
tx2 = Text_New_Self(Data1(sDate),Data1(sTime),v2,NumToStr(v2,2));
Text_SetStyle(tx2,0,0);
PlaySound("C:₩EugeneYesTrader₩Bin10₩data₩Sound₩240이평선돌파.wav");
}
if crossup(c,X4) Then {
{
V3 = Data1(C);
tx3 = Text_New_Self(Data1(sDate),Data1(sTime),v3,NumToStr(v3,2));
Text_SetStyle(tx3,0,0);
PlaySound("C:₩EugeneYesTrader₩Bin10₩data₩Sound₩480이평선돌파.wav");
}
if crossdown(c,X2) Then {
{
V4 = Data1(C);
tx4 = Text_New_Self(Data1(sDate),Data1(sTime),v4,NumToStr(v4,2));
Text_SetStyle(tx4,0,0);
PlaySound("C:₩EugeneYesTrader₩Bin10₩data₩Sound₩120이평선이탈.wav");
}
if crossdown(c,X3) Then {
{
V5 = Data1(C);
tx5 = Text_New_Self(Data1(sDate),Data1(sTime),v5,NumToStr(v5,2));
Text_SetStyle(tx5,0,0);
PlaySound("C:₩EugeneYesTrader₩Bin10₩data₩Sound₩240이평선이탈.wav");
}
if crossdown(c,X4) Then {
{
V6 = Data1(C);
tx6 = Text_New_Self(Data1(sDate),Data1(sTime),v6,NumToStr(v6,2));
Text_SetStyle(tx6,0,0);
PlaySound("C:₩EugeneYesTrader₩Bin10₩data₩Sound₩480이평선이탈.wav");
}
if v1 > 0 Then
Plot1(v1,"240이평선돌파",Magenta);
if v2 > 0 Then
Plot2(v2,"60이평선위로돌파",Red);
if v3 > 0 Then
Plot3(v3,"60이평선아래로돌파",RgB(128,0,0));
if v4 > 0 Then
Plot1(v4,"240이평선돌파",RgB(0,204,255));
if v5 > 0 Then
Plot2(v5,"60이평선위로돌파",LBlue);
if v6 > 0 Then
Plot3(v6,"60이평선아래로돌파",Black);
Text_SetLocation(tx1,Data1(NextBarSdate),Data1(NextBarStime),v1);
Text_SetLocation(tx2,Data1(NextBarSdate),Data1(NextBarStime),v2);
Text_SetLocation(tx3,Data1(NextBarSdate),Data1(NextBarStime),v3);
Text_SetLocation(tx4,Data1(NextBarSdate),Data1(NextBarStime),v4);
Text_SetLocation(tx5,Data1(NextBarSdate),Data1(NextBarStime),v5);
Text_SetLocation(tx6,Data1(NextBarSdate),Data1(NextBarStime),v6);
2023-07-24
1238
글번호 170871
지표