커뮤니티
쌩초보라 도움 좀 부탁드립니다.
2018-11-26 00:43:35
210
글번호 123885
아래 수식에서
상승파동이 완성되어 수치를 표시할 때 캔들위에 ▼ (파란색)으로 먼저 표시되고 그 위에 수치가 표시 되었으면 합니다.
하락파동이 완성되어 수치를 표시할 때 캔들밑에 ▲ (빨간색)으로 먼저 표시되고 그 아래 수치가 표시 되었으면 합니다.
결론은 기존 수식에서 파동 완성 시 캔들과 수치 사이에 ▼ 또는 ▲ 을 삽입하고 싶다는 의미입니다.
도움 주심에 미리 감사드립니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx11 = Text_New(HD1,HT1,HH1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(HH1,2));
Text_SetStyle(tx11,2,1);
Text_SetColor(tx11,BLACK);
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLACK);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx22 = Text_New(LD1,LT1,LL1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(LL1,2));
Text_SetStyle(tx22,2,0);
Text_SetColor(tx22,RED);
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,RED);
}
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLACK);
}
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,RED);
}
}
}
답변 1
예스스탁 예스스탁 답변
2018-11-28 13:34:32
안녕하세요
예스스탁입니다.
▼▲와 숫자표시가 겹칠수 있습니다.
겹치시면 input변수 중 간격을 좀더 크게 지정하시면 됩니다.
해당 부분은 수식에서는 차트에서 해당 글자가 겹치는지 알수 없어
사용자분이 조절해 보셔야 합니다.
input : af(0.02), maxAF(0.2),간격(1);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var : ty1(0),ty11(0),ty2(0),ty22(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx11 = Text_New(HD1,HT1,HH1+PriceScale*간격,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(HH1,2));
Text_SetStyle(tx11,2,1);
Text_SetColor(tx11,BLUE);
Ty11 = Text_New(HD1,HT1,HH1,"▼");
Text_SetStyle(Ty11,2,1);
Text_SetColor(Ty11,BLUE);
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH+PriceScale*간격,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
Text_Delete(ty1);
Ty1 = Text_New(HD1,HT1,HH1,"▼");
Text_SetStyle(ty1,2,1);
Text_SetColor(ty1,BLUE);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx22 = Text_New(LD1,LT1,LL1-PriceScale*간격,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(LL1,2));
Text_SetStyle(tx22,2,0);
Text_SetColor(tx22,RED);
Ty22 = Text_New(LD1,LT1,LL1,"▲");
Text_SetStyle(ty22,2,0);
Text_SetColor(ty22,RED);
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL-PriceScale*간격,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,RED);
Text_Delete(ty2);
Ty2 = Text_New(LD,LT,LL,"▲");
Text_SetStyle(ty2,2,0);
Text_SetColor(ty2,RED);
}
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH+PriceScale*간격,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLUE);
Text_Delete(ty1);
Ty1 = Text_New(HD1,HT1,HH1,"▼");
Text_SetStyle(ty1,2,1);
Text_SetColor(ty1,BLUE);
}
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL-PriceScale*간격,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,RED);
Text_Delete(ty2);
Ty2 = Text_New(LD,LT,LL,"▲");
Text_SetStyle(ty2,2,0);
Text_SetColor(ty2,RED);
}
}
}
즐거운 하루되세요
> 플로스트 님이 쓴 글입니다.
> 제목 : 쌩초보라 도움 좀 부탁드립니다.
> 아래 수식에서
상승파동이 완성되어 수치를 표시할 때 캔들위에 ▼ (파란색)으로 먼저 표시되고 그 위에 수치가 표시 되었으면 합니다.
하락파동이 완성되어 수치를 표시할 때 캔들밑에 ▲ (빨간색)으로 먼저 표시되고 그 아래 수치가 표시 되었으면 합니다.
결론은 기존 수식에서 파동 완성 시 캔들과 수치 사이에 ▼ 또는 ▲ 을 삽입하고 싶다는 의미입니다.
도움 주심에 미리 감사드립니다.
input : af(0.02), maxAF(0.2);
input : 텍스트출력(1);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if LL > 0 Then
{
if 텍스트출력 == 1 then
{
Tx11 = Text_New(HD1,HT1,HH1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(HH1,2));
Text_SetStyle(tx11,2,1);
Text_SetColor(tx11,BLACK);
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLACK);
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if HH > 0 Then
{
if 텍스트출력 == 1 then
{
Tx22 = Text_New(LD1,LT1,LL1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(LL1,2));
Text_SetStyle(tx22,2,0);
Text_SetColor(tx22,RED);
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,RED);
}
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
if 텍스트출력 == 1 then
{
Text_Delete(tx1);
Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,BLACK);
}
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
if 텍스트출력 == 1 then
{
Text_Delete(tx2);
Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,RED);
}
}
}
다음글
이전글