커뮤니티
문의 드립니다
2023-11-15 05:49:05
1156
글번호 174063
A.
input:Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var:HH(0),LL(0),DD(0),TT(0);
HH=dayhigh(0);
LL=daylow(0);
var1=LL+(HH-LL)*(Per1/100);
var2=LL+(HH-LL)*(Per2/100);
var3=LL+(HH-LL)*(Per3/100);
var4=LL+(HH-LL)*(Per4/100);
var5=LL+(HH-LL)*(Per5/100);
plot1(HH,"최고");
plot2(var1,"76.4");
plot3(var2,"61.8");
plot4(var3,"50.0");
plot5(var4,"38.2");
plot6(var5,"23.6");
plot7(LL,"최저");
위 지표로 2가지 시스템을 얻고자 합니다.
1.
해외선물 매매시간 0900 ~ 익일 0600
익절 100 손절 100
진입청산 2회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
2.
해외선물 매매시간 매주 월요일 10시부터 토요일 아침 6시까지
익절 100 손절 100
진입청산 20회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
------------------------------------------------------
B.
input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0);
if date > date[1]+1 Then{
HH = H;
LL = L;
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
plot1(HH,"H");
plot2(var1,"23.6");
plot3(var2,"38.2");
plot4(var3,"50.0");
plot5(var4,"61.8");
plot6(var5,"76.4");
plot7(LL,"L");
위 지표로 2가지 시스템을 얻고자 합니다.
1.
해외선물 매매시간 0900 ~ 익일 0600
익절 100 손절 100
진입청산 2회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
2.
해외선물 매매시간 매주 월요일 10시부터 토요일 아침 6시까지
익절 100 손절 100
진입청산 20회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
답변 1
예스스탁 예스스탁 답변
2023-11-16 11:46:43
안녕하세요
예스스탁입니다.
1
input : StartTime(90000),EndTime(060000);
input : 익절틱수(100),손절틱수(100);
input : P1(5),P2(20);
input:Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var : Tcond(False),entry(0);
var:HH(0),LL(0),DD(0),TT(0);
var : mav1(0),mav2(0);
HH=dayhigh(0);
LL=daylow(0);
var1=LL+(HH-LL)*(Per1/100);
var2=LL+(HH-LL)*(Per2/100);
var3=LL+(HH-LL)*(Per3/100);
var4=LL+(HH-LL)*(Per4/100);
var5=LL+(HH-LL)*(Per5/100);
IF Endtime > starttime Then
SetStopEndofday(Endtime);
Else
{
if sDate != sDate[1] Then
SetStopEndofday(Endtime);
}
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
Tcond = true;
entry = 0;
IF Endtime <= starttime Then
{
SetStopEndofday(0);
}
}
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
{
Tcond = False;
}
mav1 = ma(C,P1);
mav2 = ma(C,P2);
if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or
(MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then
entry = entry+1;
if Tcond == true Then
{
if MarketPosition <= 0 and entry < 2 and mav1 > mav2 and h < Var5 Then
{
Buy("b",AtStop,var5);
}
if MarketPosition >= 0 and entry < 2 and mav1 < mav2 and L > Var1 Then
{
Sell("s",AtStop,var1);
}
if MarketPosition == 1 and mav1 > mav2 Then
ExitLong("bx",AtLimit,var1);
if MarketPosition == -1 and mav1 < mav2 Then
ExitShort("sx",AtLimit,var5);
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
2
input : StartWeek(1),StartTime(100000),EndWeek(5),EndTime(060000);
input : 익절틱수(100),손절틱수(100);
input : P1(5),P2(20);
input:Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var : Tcond(False),entry(0);
var:HH(0),LL(0),DD(0),TT(0);
var : mav1(0),mav2(0);
HH=dayhigh(0);
LL=daylow(0);
var1=LL+(HH-LL)*(Per1/100);
var2=LL+(HH-LL)*(Per2/100);
var3=LL+(HH-LL)*(Per3/100);
var4=LL+(HH-LL)*(Per4/100);
var5=LL+(HH-LL)*(Per5/100);
IF Endtime > starttime Then
{
if DayOfWeek(sdate) == 6 Then
SetStopEndofday(Endtime);
Else
SetStopEndofday(0);
}
Else
{
if sDate != sDate[1] Then
{
if DayOfWeek(sdate) == 6 Then
SetStopEndofday(Endtime);
Else
SetStopEndofday(0);
}
}
if DayOfWeek(sDate) == StartWeek and
((sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime)) Then
{
Tcond = true;
entry = 0;
IF Endtime <= starttime Then
{
SetStopEndofday(0);
}
}
if DayOfWeek(sDate) == EndWeek and
((sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime)) Then
{
Tcond = False;
}
mav1 = ma(C,P1);
mav2 = ma(C,P2);
if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or
(MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then
entry = entry+1;
if Tcond == true Then
{
if MarketPosition <= 0 and entry < 20 and mav1 > mav2 and h < Var5 Then
{
Buy("b",AtStop,var5);
}
if MarketPosition >= 0 and entry < 20 and mav1 < mav2 and L > Var1 Then
{
Sell("s",AtStop,var1);
}
if MarketPosition == 1 and mav1 > mav2 Then
ExitLong("bx",AtLimit,var1);
if MarketPosition == -1 and mav1 < mav2 Then
ExitShort("sx",AtLimit,var5);
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
3
input : StartTime(90000),EndTime(060000);
input : 익절틱수(100),손절틱수(100);
input : P1(5),P2(20);
input:Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var : Tcond(False),entry(0);
var:HH(0),LL(0),DD(0),TT(0);
var : mav1(0),mav2(0);
if date > date[1]+1 Then{
HH = H;
LL = L;
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
IF Endtime > starttime Then
SetStopEndofday(Endtime);
Else
{
if sDate != sDate[1] Then
SetStopEndofday(Endtime);
}
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
Tcond = true;
entry = 0;
IF Endtime <= starttime Then
{
SetStopEndofday(0);
}
}
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
{
Tcond = False;
}
mav1 = ma(C,P1);
mav2 = ma(C,P2);
if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or
(MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then
entry = entry+1;
if Tcond == true Then
{
if MarketPosition <= 0 and entry < 2 and mav1 > mav2 and h < Var5 Then
{
Buy("b",AtStop,var5);
}
if MarketPosition >= 0 and entry < 2 and mav1 < mav2 and L > Var1 Then
{
Sell("s",AtStop,var1);
}
if MarketPosition == 1 and mav1 > mav2 Then
ExitLong("bx",AtLimit,var1);
if MarketPosition == -1 and mav1 < mav2 Then
ExitShort("sx",AtLimit,var5);
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
4
input : StartWeek(1),StartTime(100000),EndWeek(5),EndTime(060000);
input : 익절틱수(100),손절틱수(100);
input : P1(5),P2(20);
input:Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var : Tcond(False),entry(0);
var:HH(0),LL(0),DD(0),TT(0);
var : mav1(0),mav2(0);
if date > date[1]+1 Then{
HH = H;
LL = L;
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
IF Endtime > starttime Then
{
if DayOfWeek(sdate) == 6 Then
SetStopEndofday(Endtime);
Else
SetStopEndofday(0);
}
Else
{
if sDate != sDate[1] Then
{
if DayOfWeek(sdate) == 6 Then
SetStopEndofday(Endtime);
Else
SetStopEndofday(0);
}
}
if DayOfWeek(sDate) == StartWeek and
((sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime)) Then
{
Tcond = true;
entry = 0;
IF Endtime <= starttime Then
{
SetStopEndofday(0);
}
}
if DayOfWeek(sDate) == EndWeek and
((sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime)) Then
{
Tcond = False;
}
mav1 = ma(C,P1);
mav2 = ma(C,P2);
if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or
(MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then
entry = entry+1;
if Tcond == true Then
{
if MarketPosition <= 0 and entry < 20 and mav1 > mav2 and h < Var5 Then
{
Buy("b",AtStop,var5);
}
if MarketPosition >= 0 and entry < 20 and mav1 < mav2 and L > Var1 Then
{
Sell("s",AtStop,var1);
}
if MarketPosition == 1 and mav1 > mav2 Then
ExitLong("bx",AtLimit,var1);
if MarketPosition == -1 and mav1 < mav2 Then
ExitShort("sx",AtLimit,var5);
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
즐거운 하루되세요
> 푸른 님이 쓴 글입니다.
> 제목 : 문의 드립니다
> A.
input:Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var:HH(0),LL(0),DD(0),TT(0);
HH=dayhigh(0);
LL=daylow(0);
var1=LL+(HH-LL)*(Per1/100);
var2=LL+(HH-LL)*(Per2/100);
var3=LL+(HH-LL)*(Per3/100);
var4=LL+(HH-LL)*(Per4/100);
var5=LL+(HH-LL)*(Per5/100);
plot1(HH,"최고");
plot2(var1,"76.4");
plot3(var2,"61.8");
plot4(var3,"50.0");
plot5(var4,"38.2");
plot6(var5,"23.6");
plot7(LL,"최저");
위 지표로 2가지 시스템을 얻고자 합니다.
1.
해외선물 매매시간 0900 ~ 익일 0600
익절 100 손절 100
진입청산 2회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
2.
해외선물 매매시간 매주 월요일 10시부터 토요일 아침 6시까지
익절 100 손절 100
진입청산 20회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
------------------------------------------------------
B.
input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0);
if date > date[1]+1 Then{
HH = H;
LL = L;
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
plot1(HH,"H");
plot2(var1,"23.6");
plot3(var2,"38.2");
plot4(var3,"50.0");
plot5(var4,"61.8");
plot6(var5,"76.4");
plot7(LL,"L");
위 지표로 2가지 시스템을 얻고자 합니다.
1.
해외선물 매매시간 0900 ~ 익일 0600
익절 100 손절 100
진입청산 2회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
2.
해외선물 매매시간 매주 월요일 10시부터 토요일 아침 6시까지
익절 100 손절 100
진입청산 20회
5,20선 정배열시 23.6 매수 76.4 청산
5,20선 역배열시 76.4 매도 23.6 청산
다음글