커뮤니티
신호 부탁드립니다.
2018-06-26 00:24:09
223
글번호 120031
첨부 이미지
그림1
기본 시스템 식입니다. 이미지 처럼 수치가 표시가 되었으면 합니다. 항상 감사합니다.
Input : shortPeriod(12), longPeriod(26);
Var : value(0);
var : BD(0),BT(0),BV(0),BD1(0),BT1(0),BV1(0),TL1(0);
var : SD(0),ST(0),SV(0),SD1(0),ST1(0),SV1(0),TL2(0);
value = MACD(shortPeriod, longPeriod);
# 매수/매도청산
If CrossUP(value, 0) Then
{
Buy("매수");
BD = sdate;
BT = stime;
BV = C;
BD1 = BD[1];
BT1 = BT[1];
BV1 = BV[1];
TL_Delete(TL1);
if BD1 > 0 Then{
TL1 = TL_New(BD1,BT1,BV1,BD,BT,BV);
TL_SetColor(TL1,RED);
TL_SetExtRight(TL1,true);
}
}
# 매도/매수청산
If CrossDown(value, 0) Then
{
Sell("매도");
SD = sdate;
ST = stime;
SV = O;
SD1 = SD[1];
ST1 = ST[1];
SV1 = SV[1];
TL_Delete(TL2);
if SD1 > 0 Then{
TL2 = TL_New(SD1,ST1,SV1,SD,ST,SV);
TL_SetColor(TL2,BLUE);
TL_SetExtRight(TL2,true);
}
}
- 1. 120619_캡처.JPG (0.04 MB)
답변 1
예스스탁 예스스탁 답변
2018-06-26 18:01:27
안녕하세요
예스스탁입니다.
Input : shortPeriod(12), longPeriod(26);
Var : value(0),tx(0);
var : BD(0),BT(0),BV(0),BD1(0),BT1(0),BV1(0),TL1(0);
var : SD(0),ST(0),SV(0),SD1(0),ST1(0),SV1(0),TL2(0);
value = MACD(shortPeriod, longPeriod);
# 매수/매도청산
If CrossUP(value, 0) Then
{
Buy("매수");
BD = sdate;
BT = stime;
BV = C;
BD1 = BD[1];
BT1 = BT[1];
BV1 = BV[1];
TL_Delete(TL1);
if BD1 > 0 Then{
TL1 = TL_New(BD1,BT1,BV1,BD,BT,BV);
TL_SetColor(TL1,RED);
TL_SetExtRight(TL1,true);
}
tx = Text_New(sdate,stime,H+PriceScale*2,NumToStr(c,2));
Text_SetStyle(tx,2,2);
}
# 매도/매수청산
If CrossDown(value, 0) Then
{
Sell("매도");
SD = sdate;
ST = stime;
SV = O;
SD1 = SD[1];
ST1 = ST[1];
SV1 = SV[1];
TL_Delete(TL2);
if SD1 > 0 Then{
TL2 = TL_New(SD1,ST1,SV1,SD,ST,SV);
TL_SetColor(TL2,BLUE);
TL_SetExtRight(TL2,true);
}
Text_New(sdate,stime,L-PriceScale*2,NumToStr(c,2));
Text_SetStyle(tx,2,2);
}
즐거운 하루되세요
> 타잔94 님이 쓴 글입니다.
> 제목 : 신호 부탁드립니다.
> 기본 시스템 식입니다. 이미지 처럼 수치가 표시가 되었으면 합니다. 항상 감사합니다.
Input : shortPeriod(12), longPeriod(26);
Var : value(0);
var : BD(0),BT(0),BV(0),BD1(0),BT1(0),BV1(0),TL1(0);
var : SD(0),ST(0),SV(0),SD1(0),ST1(0),SV1(0),TL2(0);
value = MACD(shortPeriod, longPeriod);
# 매수/매도청산
If CrossUP(value, 0) Then
{
Buy("매수");
BD = sdate;
BT = stime;
BV = C;
BD1 = BD[1];
BT1 = BT[1];
BV1 = BV[1];
TL_Delete(TL1);
if BD1 > 0 Then{
TL1 = TL_New(BD1,BT1,BV1,BD,BT,BV);
TL_SetColor(TL1,RED);
TL_SetExtRight(TL1,true);
}
}
# 매도/매수청산
If CrossDown(value, 0) Then
{
Sell("매도");
SD = sdate;
ST = stime;
SV = O;
SD1 = SD[1];
ST1 = ST[1];
SV1 = SV[1];
TL_Delete(TL2);
if SD1 > 0 Then{
TL2 = TL_New(SD1,ST1,SV1,SD,ST,SV);
TL_SetColor(TL2,BLUE);
TL_SetExtRight(TL2,true);
}
}