예스스탁
예스스탁 답변
2025-06-19 14:57:08
안녕하세요
예스스탁입니다.
var : shortPeriod(5), longPeriod(20),Period(60);
var : bh(0),bd(0),bt(0),tl1(0),tx1(0),A1(0),A2(0),A3(0);
var : sl(0),sd(0),st(0),tl2(0),tx2(0),B1(0),B2(0),B3(0);
var : A31(0),B31(0);
value1 = ma(C, shortPeriod);
value2 = ma(C, longPeriod);
Value3 = ma(c, Period);
If CrossUP(value1, value2) and C > Value3 Then
{
buy();
bh = h;
bd = sDate;
bt = sTime;
if sl > 0 Then
{
A1 = sd;
A2 = st;
A3 = sl;
A31 = A3[1];
TL_SetEnd(TL1,A1,A2,A3[1]);
tl1 = TL_New(A1,A2,A3,NextBarSdate,NextBarStime,A3);
Text_SetLocation(Tx1,A1,A2,A3[1]);
if A3 > A31 Then
tx1 = Text_New(NextBarSdate,NextBarStime,A3,"▼"+NumToStr(A3,1));
Else
tx1 = Text_New(NextBarSdate,NextBarStime,A3,NumToStr(A3,1));
Text_SetColor(tx1,Blue);
Text_SetStyle(tx1,1,0);
}
}
If CrossDown(value1, value2) and C < Value3 Then
{
sell();
sl = l;
sd = sDate;
st = sTime;
if bh > 0 Then
{
B1 = bd;
B2 = bt;
B3 = bh;
B31 = B3[1];
TL_SetEnd(TL2,B1,B2,B3[1]);
TL2 = TL_New(B1,B2,B3,NextBarSdate,NextBarStime,B3);
Text_SetLocation(tx2,B1,B2,B3[1]);
if B3 < B31 Then
tx2 = Text_New(NextBarSdate,NextBarStime,B3,"▲"+NumToStr(B3,1));
Else
tx2 = Text_New(NextBarSdate,NextBarStime,B3,NumToStr(B3,1));
Text_SetColor(tx2,Red);
Text_SetStyle(tx2,1,1);
}
}
if MarketPosition == 1 Then
{
if h > bh Then
{
bh = h;
bd = sDate;
bt = sTime;
}
}
if MarketPosition == -1 Then
{
if l < sl Then
{
sl = l;
sd = sDate;
st = sTime;
}
}
TL_SetEnd(tl1,NextBarSdate,NextBarStime,A3);
TL_SetEnd(tl2,NextBarSdate,NextBarStime,B3);
Text_SetLocation(tx1,NextBarSdate,NextBarStime,A3);
Text_SetLocation(tx2,NextBarSdate,NextBarStime,B3);
즐거운 하루되세요
> 와우리 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> var : shortPeriod(5), longPeriod(20);
var : bh(0),bd(0),bt(0),tl1(0),tx1(0),A1(0),A2(0),A3(0);
var : sl(0),sd(0),st(0),tl2(0),tx2(0),B1(0),B2(0),B3(0);
var : A31(0),B31(0);
value1 = ma(C, shortPeriod);
value2 = ma(C, longPeriod);
If CrossUP(value1, value2) Then
{
buy();
bh = h;
bd = sDate;
bt = sTime;
if sl > 0 Then
{
A1 = sd;
A2 = st;
A3 = sl;
A31 = A3[1];
TL_SetEnd(TL1,A1,A2,A3[1]);
tl1 = TL_New(A1,A2,A3,NextBarSdate,NextBarStime,A3);
Text_SetLocation(Tx1,A1,A2,A3[1]);
if A3 > A31 Then
tx1 = Text_New(NextBarSdate,NextBarStime,A3,"▼"+NumToStr(A3,1));
Else
tx1 = Text_New(NextBarSdate,NextBarStime,A3,NumToStr(A3,1));
Text_SetColor(tx1,Blue);
Text_SetStyle(tx1,1,0);
}
}
If CrossDown(value1, value2) Then
{
sell();
sl = l;
sd = sDate;
st = sTime;
if bh > 0 Then
{
B1 = bd;
B2 = bt;
B3 = bh;
B31 = B3[1];
TL_SetEnd(TL2,B1,B2,B3[1]);
TL2 = TL_New(B1,B2,B3,NextBarSdate,NextBarStime,B3);
Text_SetLocation(tx2,B1,B2,B3[1]);
if B3 < B31 Then
tx2 = Text_New(NextBarSdate,NextBarStime,B3,"▲"+NumToStr(B3,1));
Else
tx2 = Text_New(NextBarSdate,NextBarStime,B3,NumToStr(B3,1));
Text_SetColor(tx2,Red);
Text_SetStyle(tx2,1,1);
}
}
if MarketPosition == 1 Then
{
if h > bh Then
{
bh = h;
bd = sDate;
bt = sTime;
}
}
if MarketPosition == -1 Then
{
if l < sl Then
{
sl = l;
sd = sDate;
st = sTime;
}
}
TL_SetEnd(tl1,NextBarSdate,NextBarStime,A3);
TL_SetEnd(tl2,NextBarSdate,NextBarStime,B3);
Text_SetLocation(tx1,NextBarSdate,NextBarStime,A3);
Text_SetLocation(tx2,NextBarSdate,NextBarStime,B3);
위의 식을 기준으로 60 일선을 추가
60 일선 위에서는 매수 신호만 표시
60 일선 아래서는 매도 신호만 표시 되게 부탁드립니다