커뮤니티
Re : 다시 문의드립니다.
2018-07-01 20:11:45
244
글번호 120197
1.지난번 답변에 감사드립니다.
2.아래 첨부식은 종목검색으로는 안된다는 것은 알겠는데
매도청산의 신호가 나온 종목만 프린트를 할수는 없는지요?(엑셀 또는 텍스트)
3. 한종목은 되는데 나머지가 안되네요(종목검색과 전략챠트를 연동 시킬 경우)
4. 장마철 건강에 유의하시며 좋은 하루 되시길!!!!!
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도유지");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
답변 3
예스스탁 예스스탁 답변
2018-07-02 15:48:20
안녕하세요
예스스탁입니다.
시스템은 차트에 적용되고 차트의 종목에 대해서만 신호를 발생시킵니다
그러므로 종목검색후 검색된 종목들에 대해 차트를 띄우고 해당 시스템을 적용해야만 합니다.
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then
{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then
{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then
{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then
{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도유지");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
if MarketPosition == 0 and MarketPosition(1) == 1 and LastBarOnChart == 1 then
Print("aa.txt",SymbolCode);
즐거운 하루되세요
> sungdong 님이 쓴 글입니다.
> 제목 : Re : 다시 문의드립니다.
> 1.지난번 답변에 감사드립니다.
2.아래 첨부식은 종목검색으로는 안된다는 것은 알겠는데
매도청산의 신호가 나온 종목만 프린트를 할수는 없는지요?(엑셀 또는 텍스트)
3. 한종목은 되는데 나머지가 안되네요(종목검색과 전략챠트를 연동 시킬 경우)
4. 장마철 건강에 유의하시며 좋은 하루 되시길!!!!!
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도유지");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
sungdong
2018-07-05 10:41:51
1.일단은 출력이 텍스트에서 발생 시간이 나오는데 엑셀에서는 일률적으로 17;00:00으로 나오는 어떤 이유가 있는지모르겠네요,,(일봉상에서 볼 때)
이번기회에 PRINT가 날짜,시간,가격,종목명이 출력이 되도록 부탁합니다.
저는 매도청산 종목만 출력해서 활용해 볼려고 합니다.
2. 하나만 더 부탁하면 매도청산에서 앞전 2~개정도 매도청산 신호의 봉가격과 현재가격이 같거나 높을때도 나오게 부탁합니다.
즐거운 하루되세요!!!!!
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : Re : 다시 문의드립니다.
>
안녕하세요
예스스탁입니다.
시스템은 차트에 적용되고 차트의 종목에 대해서만 신호를 발생시킵니다
그러므로 종목검색후 검색된 종목들에 대해 차트를 띄우고 해당 시스템을 적용해야만 합니다.
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then
{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then
{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then
{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then
{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도청산");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
if MarketPosition == 0 and MarketPosition(1) == 1 and LastBarOnChart == 1 then
Print("aa.txt",SymbolCode);
즐거운 하루되세요
> sungdong 님이 쓴 글입니다.
> 제목 : Re : 다시 문의드립니다.
> 1.지난번 답변에 감사드립니다.
2.아래 첨부식은 종목검색으로는 안된다는 것은 알겠는데
매도청산의 신호가 나온 종목만 프린트를 할수는 없는지요?(엑셀 또는 텍스트)
3. 한종목은 되는데 나머지가 안되네요(종목검색과 전략챠트를 연동 시킬 경우)
4. 장마철 건강에 유의하시며 좋은 하루 되시길!!!!!
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도유지");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
sungdong
2018-07-11 11:39:09
1.tx를 통채로 받아서 출력하는 방법
2.신호발생관련 날짜,시간,가격을 볼 수 있는 방법은 (중간에 주석 있음)
3.변수로 해보았는데 이상한 값이 나오는데 해석도 안되니 답답하네요..부탁합니다.
exit와 entry atstop,atmarket등 관련 함수를 이용하여 일주일을 해보았으나 안되네요.
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
input : Pastdate(20180702);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sdate >= Pastdate Then
//if sDATE == 시작날 or ( sDATE > 시작날 ) Then
{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then
{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then
{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then
{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도청산");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
Var5=Text_GetDate(1);
Var2=Text_GetTime(1);
Var3=Text_GetValue(1);
var4 = DateToJulian(var5);
Print("c:￦매청￦aa.csv",",%s,%f,%f,%f,%s,%s,%s",tx,Var4,Var2,Var3,"매수 :"+NumToStr(C,텍스트표시소숫점자리수),SymbolName,"매수21");
Print("c:￦매청￦aa.txt",",%f,%f,%f,%f,%s,%s",tx,Var4,Var2,Var3,"매수 :"+NumToStr(C,텍스트표시소숫점자리수),SymbolName);
}
//1.tx를 통채로 받아서 출력하는 방법,2.신호발생관련 날짜,시간,가격을 볼 수 있는 방법은 ???
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
if MarketPosition == 0 and MarketPosition(1) == 1 and LastBarOnChart == 1 then
ExitLong("Sp",AtMarket,EntryPrice+당일수익-daypl);
Print("c:￦매청￦aa.csv",",%s,%f,%f,%f,%s,%s,%s",tx,Var4,Var2,Var3,"매수 :"+NumToStr(C,텍스트표시소숫점자리수),SymbolName,"매수21");
> sungdong 님이 쓴 글입니다.
> 제목 : Re : Re : Re : 다시 문의드립니다.
> 1.일단은 출력이 텍스트에서 발생 시간이 나오는데 엑셀에서는 일률적으로 17;00:00으로 나오는 어떤 이유가 있는지모르겠네요,,(일봉상에서 볼 때)
이번기회에 PRINT가 날짜,시간,가격,종목명이 출력이 되도록 부탁합니다.
저는 매도청산 종목만 출력해서 활용해 볼려고 합니다.
2. 하나만 더 부탁하면 매도청산에서 앞전 2~개정도 매도청산 신호의 봉가격과 현재가격이 같거나 높을때도 나오게 부탁합니다.
즐거운 하루되세요!!!!!
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : Re : 다시 문의드립니다.
>
안녕하세요
예스스탁입니다.
시스템은 차트에 적용되고 차트의 종목에 대해서만 신호를 발생시킵니다
그러므로 종목검색후 검색된 종목들에 대해 차트를 띄우고 해당 시스템을 적용해야만 합니다.
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then
{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then
{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then
{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then
{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도청산");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}
if MarketPosition == 0 and MarketPosition(1) == 1 and LastBarOnChart == 1 then
Print("aa.txt",SymbolCode);
즐거운 하루되세요
> sungdong 님이 쓴 글입니다.
> 제목 : Re : 다시 문의드립니다.
> 1.지난번 답변에 감사드립니다.
2.아래 첨부식은 종목검색으로는 안된다는 것은 알겠는데
매도청산의 신호가 나온 종목만 프린트를 할수는 없는지요?(엑셀 또는 텍스트)
3. 한종목은 되는데 나머지가 안되네요(종목검색과 전략챠트를 연동 시킬 경우)
4. 장마철 건강에 유의하시며 좋은 하루 되시길!!!!!
Input : short(12),long(26),sig(9),시작날(7),종료날(1),당일수익틱수(10),텍스트표시소숫점자리수(0);
input : Period(20);
Var : MACDv(0),MACDS(0),MACDO(0),T1(0),T2(0),tx(0),NP(0),N1(0),Tcond(false),당일수익(0);
var : daypl(0),Xcond(false),Bcond(false),Scond(false);
NP = NetProfit;
MACDv = MACD(short, long);
MACDs = ema(MACDv,sig);
MACDO = MACDV-MACDS;
var1 = ma(C,Period);
if MACDV > MACDS Then
T1 = 1;
Else
T1 = -1;
if var1 > var1[1] Then
T2 = 1;
Else
T2 = -1;
if sDATE == 시작날 or ( sDATE > 시작날 ) Then{
Tcond = true;
Xcond = false;
N1 = Np;
}
daypl = NP-N1;
bcond = T1 == 1 and T2 == 1;
Scond = T1 == -1 and T2 == -1;
if Tcond == true and Xcond == false then{
if MarketPosition <= 0 and Bcond == true and Bcond[1] == false Then{
buy("매수");
tx = Text_New(sdate,stime,H,"매수 :"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,RED);
Text_SetBold(tx,1);
Text_SetSize(tx,20);
}
if MarketPosition >= 0 and Scond == true and Scond[1] == false Then{
sell("S");
tx = Text_New(sdate,stime,H,":"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,blue);
Text_SetBold(tx,4);
Text_SetSize(tx,5);
}
if MarketPosition == -1 Then{
ExitShort("매도유지");
tx = Text_New(sdate,stime,H,"SP:"+NumToStr(C,텍스트표시소숫점자리수));
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
Text_SetBold(tx,4);
Text_SetSize(tx,15);
}
if MarketPosition == 1 Then
ExitLong("bp",AtLimit,EntryPrice+당일수익-daypl);
}