커뮤니티
시스템 작성의뢰
2024-05-18 00:11:11
917
글번호 179668
Input : Period1(1), Period2(15), Period3(30), Period4(60), Period5(120),period6(240),Period7(480), Period8(960), Period9(1920), Period10(3840),period11(7680);
var : Sma1(0),Sma2(0),Sma3(0),Sma4(0),Sma5(0),sma6(0),Sma7(0),Sma8(0),Sma9(0),Sma10(0),sma11(0),OBVV(0),PositiveVolumeIndex(0),dpo(0);
var:s(0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
Sma3 = ma(C,Period3);
Sma4 = ma(C,Period4);
Sma5 = ma(C,Period5);
sma6 = ma(c,period6);
Sma7 = ma(C,Period7);
Sma8 = ma(C,Period8);
Sma9 = ma(C,Period9);
Sma10 = ma(C,Period10);
sma11 = ma(c,period11);
수고 하십니다 ! 위수식을 적용해주시고
이동평균선3840 선까지 역배열 하고 240 이평선과 3840 이평선의 간격이 20 틱이상
벌어지고 1 평균거래량이 40 이상 증가하고 slope of volume 이 위아래로 1 이상 움직이고
er bear power 지표가 0.00 이상 올라가고 120 이평선이 240 이평선과 업크로스 할때
매수 하고
이동평균선3840 선까지 정배열 하고 240 이평선과 3840 이평선의 간격이 20 틱이상
벌어지고 1 평균거래량이 40 이상 증가하고 slope of volume 이 위아래로 1 이상 움직이고
er bear power 지표가 -0.00 이상 내려가고 120 이평선이 240 이평선과 다운크로스 할때
매도 하는 시스템을 부탁 합니다 !
답변 1
예스스탁 예스스탁 답변
2024-05-20 10:51:34
안녕하세요
예스스탁입니다.
Input : Period1(1), Period2(15), Period3(30), Period4(60), Period5(120),period6(240),Period7(480), Period8(960), Period9(1920), Period10(3840),period11(7680);
var : Sma1(0),Sma2(0),Sma3(0),Sma4(0),Sma5(0),sma6(0),Sma7(0),Sma8(0),Sma9(0),Sma10(0),sma11(0),OBVV(0),PositiveVolumeIndex(0),dpo(0);
var:s(0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
Sma3 = ma(C,Period3);
Sma4 = ma(C,Period4);
Sma5 = ma(C,Period5);
sma6 = ma(c,period6);
Sma7 = ma(C,Period7);
Sma8 = ma(C,Period8);
Sma9 = ma(C,Period9);
Sma10 = ma(C,Period10);
sma11 = ma(c,period11);
Condition1 = sma1 > sma2 and
sma2 > sma3 and
sma3 > sma4 and
sma4 > sma5 and
sma5 > sma6 and
sma6 > sma7 and
sma7 > sma8 and
sma8 > sma9 and
sma9 > sma10 and
sma10 > sma11;
Condition2 = sma1 < sma2 and
sma2 < sma3 and
sma3 < sma4 and
sma4 < sma5 and
sma5 < sma6 and
sma6 < sma7 and
sma7 < sma8 and
sma8 < sma9 and
sma9 < sma10 and
sma10 < sma11;
if bdate != Bdate[1] Then
{
var1 = var1+v;
Var2 = Var2+1;
}
Var3 = var1/Var2;
input : FIPeriod(5);
var : fval(0),fi(0);
Fval = ((Close - Close[1]) * Volume) ;
FI = Ema(Fval, FIPeriod);
Inputs: Len(21);
Variables: X(0), Num1(0), Num2(0), SumBars(0), SumSqrBars(0), SumY(0), Sum1(0), Sum2(0),SOV(0);
If Len == 0 Then
SOV = 0;
If CurrentBar == 1 Then Begin
SumBars = SumBars[1];
SumBars = Len * (Len - 1) * 0.5;
SumSqrBars = (Len - 1) * Len * (2 * Len - 1) / 6;
End;
Sum1 = 0;
For X = 0 To Len - 1 Begin
Sum1= Sum1 + X * V[X];
End;
SumY = accumn(V, Len);
Sum2 = SumBars * SumY;
Num1 = Len * Sum1 - Sum2;
Num2 = SumBars * SumBars - Len * SumSqrBars;
If Num2 <> 0 Then
SOV = Num1 / Num2;
Else
SOV = 0;
Input : Period(13);
Var : BullP(0), BearP(0),Emav(0);
Emav = Ema(c,Period);
BullP = HIGH - Emav;
BearP = LOW - Emav;
if Condition2[1] == true and
sma6 <= sma10-PriceScale*20 and
v >= v[1]+10 and
abs(sov-sov[1]) >= 1 and
bearp >= 0 and
CrossUp(sma5,sma6) Then
Buy();
if Condition1[1] == true and
sma6 >= sma10-PriceScale*20 and
v >= v[1]+10 and
abs(sov-sov[1]) >= 1 and
bearp <= 0 and
CrossDown(sma5,sma6) Then
Sell();
즐거운 하루되세요
> tnsflwls 님이 쓴 글입니다.
> 제목 : 시스템 작성의뢰
> Input : Period1(1), Period2(15), Period3(30), Period4(60), Period5(120),period6(240),Period7(480), Period8(960), Period9(1920), Period10(3840),period11(7680);
var : Sma1(0),Sma2(0),Sma3(0),Sma4(0),Sma5(0),sma6(0),Sma7(0),Sma8(0),Sma9(0),Sma10(0),sma11(0),OBVV(0),PositiveVolumeIndex(0),dpo(0);
var:s(0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
Sma3 = ma(C,Period3);
Sma4 = ma(C,Period4);
Sma5 = ma(C,Period5);
sma6 = ma(c,period6);
Sma7 = ma(C,Period7);
Sma8 = ma(C,Period8);
Sma9 = ma(C,Period9);
Sma10 = ma(C,Period10);
sma11 = ma(c,period11);
수고 하십니다 ! 위수식을 적용해주시고
이동평균선3840 선까지 역배열 하고 240 이평선과 3840 이평선의 간격이 20 틱이상
벌어지고 1 평균거래량이 40 이상 증가하고 slope of volume 이 위아래로 1 이상 움직이고
er bear power 지표가 0.00 이상 올라가고 120 이평선이 240 이평선과 업크로스 할때
매수 하고
이동평균선3840 선까지 정배열 하고 240 이평선과 3840 이평선의 간격이 20 틱이상
벌어지고 1 평균거래량이 40 이상 증가하고 slope of volume 이 위아래로 1 이상 움직이고
er bear power 지표가 -0.00 이상 내려가고 120 이평선이 240 이평선과 다운크로스 할때
매도 하는 시스템을 부탁 합니다 !
다음글
이전글