커뮤니티
수정좀 부탁합니다
2019-05-30 13:51:58
190
글번호 129058
아래 식을 만들어 시운전을 해보고 있습니다
TX1 = Text_New(sdate[1],stime[1],var6,NumToStr(var6,2));
Text_SetColor(TX1,blue);
TX2 = Text_New(sdate[1],stime[1],var3,NumToStr(var3,2));
Text_SetColor(TX2,red);
그런데 위에 식을 아래에 적용을 같이 할라고 하면 문제가 발생합니다
무엇이 문제인지 알수가 없네요
손절선에 가격을 나오게 하고 싶어서 입니다
수정좀 부탁합니다
nput : P(20),N(20);
var : mav(0),Direction(0),HH(0),LL(0);
var : tX(0),BH(0),SH(0);//틱수
Var : TL1(0),TL2(0),TX1(0),TX2(0);
mav = ma(c,P);
HH = highest(H,N);
LL = lowest(L,N);
if mav > mav[1] Then{
Direction = 1;
}
if mav < mav[1] Then
Direction = -1;
if Direction == -1 and Direction[1] != -1 Then{
value1 = mav[1];
var1 = HH[1];
var2 = 1;
}
if Direction == 1 and Direction[1] != 1 Then{
value1 = mav[1];
var1 = LL[1];
var2 = -1;
}
if Countif(var2 == -1 and C>O and C>value1,2) == 2 and mav > mav[1] Then
{
buy("매수");
if MarketPosition <= 0 Then
{
var3 = sdate[1];
var4 = sTime[1];
var5 = H;
TL1 = TL_New(var3,var4,var5,sdate,stime,var5);
TL_SetStyle(TL1,3);
TL_SetColor(TL1,RED);
}
}
if Countif(var2 == 1 and C<O and C<value1,2) == 2 and mav < mav[1] Then
{
sell("매도");
if MarketPosition >= 0 then
{
var6 = sdate[1];
var7 = sTime[1];
var8 = L;
TL2 = TL_New(var6,var7,var8,sdate,stime,var8);
TL_SetStyle(TL2,3);
TL_SetColor(TL2,blue);
}
}
if MarketPosition == 1 Then
{
if H > var5 Then
var5 = h;
TL_SetBegin(TL1,var3,var4,var5);
TL_SetEnd(TL1,sdate,stime,var5);
}
if MarketPosition == -1 Then
{
if L < var8 Then
var8 = L;
TL_SetBegin(TL2,var6,var7,var8);
TL_SetEnd(TL2,sdate,stime,var8);
}
답변 1
예스스탁 예스스탁 답변
2019-05-30 15:29:19
안녕하세요
예스스탁입니다.
올려주신 시스템 수식에 var3, var6에 저장되는 값은 날짜입니다.
var5와 var8이 추세선으로 그려지는 값이므로 해당 값으로 처리해 드립니다.
input : P(20),N(20);
var : mav(0),Direction(0),HH(0),LL(0);
var : tX(0),BH(0),SH(0);//틱수
Var : TL1(0),TL2(0),TX1(0),TX2(0);
mav = ma(c,P);
HH = highest(H,N);
LL = lowest(L,N);
if mav > mav[1] Then
{
Direction = 1;
}
if mav < mav[1] Then
Direction = -1;
if Direction == -1 and Direction[1] != -1 Then
{
value1 = mav[1];
var1 = HH[1];
var2 = 1;
}
if Direction == 1 and Direction[1] != 1 Then{
value1 = mav[1];
var1 = LL[1];
var2 = -1;
}
if Countif(var2 == -1 and C>O and C>value1,2) == 2 and mav > mav[1] Then
{
buy("매수");
if MarketPosition <= 0 Then
{
var3 = sdate[1];
var4 = sTime[1];
var5 = H;
TL1 = TL_New(var3,var4,var5,sdate,stime,var5);
TL_SetStyle(TL1,3);
TL_SetColor(TL1,RED);
tx1 = Text_New(sdate,stime,var5,NumToStr(var5,2));
Text_SetColor(TX2,red);
}
}
if Countif(var2 == 1 and C<O and C<value1,2) == 2 and mav < mav[1] Then
{
sell("매도");
if MarketPosition >= 0 then
{
var6 = sdate[1];
var7 = sTime[1];
var8 = L;
TL2 = TL_New(var6,var7,var8,sdate,stime,var8);
TL_SetStyle(TL2,3);
TL_SetColor(TL2,blue);
tx2 = Text_New(sdate,stime,var8,NumToStr(var8,2));
Text_SetColor(TX2,BLUE);
}
}
if MarketPosition == 1 Then
{
if H > var5 Then
{
var5 = h;
Text_SetString(TX1,NumToStr(var5,2));
}
TL_SetBegin(TL1,var3,var4,var5);
TL_SetEnd(TL1,sdate,stime,var5);
Text_SetLocation(TX1,sdate,stime,var5);
}
if MarketPosition == -1 Then
{
if L < var8 Then
{
var8 = L;
Text_SetString(TX2,NumToStr(var8,2));
}
TL_SetBegin(TL2,var6,var7,var8);
TL_SetEnd(TL2,sdate,stime,var8);
Text_SetLocation(TX2,sdate,stime,var8);
}
즐거운 하루되세요
> 사이다 님이 쓴 글입니다.
> 제목 : 수정좀 부탁합니다
> 아래 식을 만들어 시운전을 해보고 있습니다
TX1 = Text_New(sdate[1],stime[1],var6,NumToStr(var6,2));
Text_SetColor(TX1,blue);
TX2 = Text_New(sdate[1],stime[1],var3,NumToStr(var3,2));
Text_SetColor(TX2,red);
그런데 위에 식을 아래에 적용을 같이 할라고 하면 문제가 발생합니다
무엇이 문제인지 알수가 없네요
손절선에 가격을 나오게 하고 싶어서 입니다
수정좀 부탁합니다
nput : P(20),N(20);
var : mav(0),Direction(0),HH(0),LL(0);
var : tX(0),BH(0),SH(0);//틱수
Var : TL1(0),TL2(0),TX1(0),TX2(0);
mav = ma(c,P);
HH = highest(H,N);
LL = lowest(L,N);
if mav > mav[1] Then{
Direction = 1;
}
if mav < mav[1] Then
Direction = -1;
if Direction == -1 and Direction[1] != -1 Then{
value1 = mav[1];
var1 = HH[1];
var2 = 1;
}
if Direction == 1 and Direction[1] != 1 Then{
value1 = mav[1];
var1 = LL[1];
var2 = -1;
}
if Countif(var2 == -1 and C>O and C>value1,2) == 2 and mav > mav[1] Then
{
buy("매수");
if MarketPosition <= 0 Then
{
var3 = sdate[1];
var4 = sTime[1];
var5 = H;
TL1 = TL_New(var3,var4,var5,sdate,stime,var5);
TL_SetStyle(TL1,3);
TL_SetColor(TL1,RED);
}
}
if Countif(var2 == 1 and C<O and C<value1,2) == 2 and mav < mav[1] Then
{
sell("매도");
if MarketPosition >= 0 then
{
var6 = sdate[1];
var7 = sTime[1];
var8 = L;
TL2 = TL_New(var6,var7,var8,sdate,stime,var8);
TL_SetStyle(TL2,3);
TL_SetColor(TL2,blue);
}
}
if MarketPosition == 1 Then
{
if H > var5 Then
var5 = h;
TL_SetBegin(TL1,var3,var4,var5);
TL_SetEnd(TL1,sdate,stime,var5);
}
if MarketPosition == -1 Then
{
if L < var8 Then
var8 = L;
TL_SetBegin(TL2,var6,var7,var8);
TL_SetEnd(TL2,sdate,stime,var8);
}
다음글
이전글