커뮤니티
수식작성
2021-05-16 21:07:50
562
글번호 149052
input : P1(5),P2(20),P3(60);
input : sto1(12),sto2(26),sto3(5);
Input : trixp(12), sigPeriod(9);
input : 익절틱수(100),손절틱수(20);
INPUTS: LENGTH(5);
input : short(12),long(26),sig(9);
input : StartTime(143500),EndTime(035000);
var : Tcond(false);
var : mav1(0),mav2(0),mav3(0),stok(0),stod(0);
var : trixv(0),trixs(0),TEMA(0),macdo(0);
if sDate != sDate[1] Then
SetStopEndofday(Endtime);
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
Tcond = False;
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
Tcond = true;
SetStopEndofday(0);
}
mav1 = ma(C,P1);
mav2 = ma(C,P2);
mav3 = ma(C,P3);
stok = StochasticsK(sto1,sto2);
stod = StochasticsD(sto1,sto2,sto3);
trixv = trix(trixp);
trixs = ema(trixv,sigPeriod);
TEMA = (3 * Ema(c,LENGTH)) - (3 * Ema(Ema(c,LENGTH),LENGTH)) +
(Ema(Ema(Ema(c,LENGTH),LENGTH),LENGTH));
macdo = macd_osc(short,long,sig);
var1 = 0;
var2 = 0;
if stok > stod Then
var1 = var1+1;
if trixv > trixs Then
var1 = var1+1;
if c > tema Then
var1 = var1+1;
if macdo > 0 Then
var1 = var1+1;
if stok < stod Then
var2 = var2+1;
if trixv < trixs Then
var2 = var2+1;
if c < tema Then
var2 = var2+1;
if macdo < 0 Then
var2 = var2+1;
if Tcond == true Then
{
if crossup(mav1,mav2) and var1 >= 3 and C > mav3 Then
buy("b");
if crossup(mav1,mav2) and var1 >= 3 and C < mav3 Then
Sell("s2");
if CrossDown(mav1,mav2) and var2 >= 3 and C < mav3 Then
sell("s");
if CrossDown(mav1,mav2) and var2 >= 3 and C > mav3 Then
Buy("b1");
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
-------------
목표수익 120틱에 매매정지 추가로 부탁드립니다.
답변 1
예스스탁 예스스탁 답변
2021-05-17 11:23:39
안녕하세요
예스스탁입니다.
이전 72455질문에 대한 답변 참고하시기 바랍니다.
즐거운 하루되세요
> 푸른 님이 쓴 글입니다.
> 제목 : 수식작성
> input : P1(5),P2(20),P3(60);
input : sto1(12),sto2(26),sto3(5);
Input : trixp(12), sigPeriod(9);
input : 익절틱수(100),손절틱수(20);
INPUTS: LENGTH(5);
input : short(12),long(26),sig(9);
input : StartTime(143500),EndTime(035000);
var : Tcond(false);
var : mav1(0),mav2(0),mav3(0),stok(0),stod(0);
var : trixv(0),trixs(0),TEMA(0),macdo(0);
if sDate != sDate[1] Then
SetStopEndofday(Endtime);
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
Tcond = False;
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
Tcond = true;
SetStopEndofday(0);
}
mav1 = ma(C,P1);
mav2 = ma(C,P2);
mav3 = ma(C,P3);
stok = StochasticsK(sto1,sto2);
stod = StochasticsD(sto1,sto2,sto3);
trixv = trix(trixp);
trixs = ema(trixv,sigPeriod);
TEMA = (3 * Ema(c,LENGTH)) - (3 * Ema(Ema(c,LENGTH),LENGTH)) +
(Ema(Ema(Ema(c,LENGTH),LENGTH),LENGTH));
macdo = macd_osc(short,long,sig);
var1 = 0;
var2 = 0;
if stok > stod Then
var1 = var1+1;
if trixv > trixs Then
var1 = var1+1;
if c > tema Then
var1 = var1+1;
if macdo > 0 Then
var1 = var1+1;
if stok < stod Then
var2 = var2+1;
if trixv < trixs Then
var2 = var2+1;
if c < tema Then
var2 = var2+1;
if macdo < 0 Then
var2 = var2+1;
if Tcond == true Then
{
if crossup(mav1,mav2) and var1 >= 3 and C > mav3 Then
buy("b");
if crossup(mav1,mav2) and var1 >= 3 and C < mav3 Then
Sell("s2");
if CrossDown(mav1,mav2) and var2 >= 3 and C < mav3 Then
sell("s");
if CrossDown(mav1,mav2) and var2 >= 3 and C > mav3 Then
Buy("b1");
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
-------------
목표수익 120틱에 매매정지 추가로 부탁드립니다.