예스스탁
예스스탁 답변
2022-08-05 16:46:31
안녕하세요
예스스탁입니다.
Inputs : Period(20), Sence(1.5), CC_DN(Yellow);
Vars:
VLineUp(0),
VLineDn(0),
HHighest(0),
LLowest(0),
JustChanged(FALSE),
VLine(0), DBN(0);
Array:
Highs[35](0),
Lows[35](0),
RRange[35](0),
UpWave[1](FALSE),
DnWave[1](FALSE);
If STime == 180000 Then
DBN = 0;
DBN = DBN + 1;
Var1 = Period;
Var2 = Var1 - 1;
Var3 = Var1 - 2;
Var5 = Sence;
Var6 = H-L;
JustChanged = FALSE;
if CurrentBar <= Var2 then begin
Highs[CurrentBar] = Close;
Lows[CurrentBar] = Close;
RRange[CurrentBar] = (H-L) /2;
end;
if CurrentBar == Var1 then begin
if Highs[Var2] >= Highs[Var3] then begin
UpWave[1] = TRUE;
HHighest = Highs[Var2];
VLineUp = HHighest - (Var5 * MA(Var6,Var2));
#Plot1(VLineUp,"VLineUp");
end;
if Highs[Var2] < Highs[Var3] then begin
DnWave[1] = TRUE;
LLowest = Lows[Var2];
VLineDn = LLowest + (Var5 * MA(Var6,Var2));
#Plot2(VLineDn,"VLineDn");
end;
end;
if CurrentBar > Var1 then begin
if DnWave[1] and Close > VLineDn then begin
DnWave[1] = FALSE;
UpWave[1] = TRUE;
JustChanged = TRUE;
HHighest = Close;
LLowest = 0;
end;
if UpWave[1] and Close < VLineUp and JustChanged == FALSE then begin
UpWave[1] = FALSE;
DnWave[1] = TRUE;
JustChanged = TRUE;
LLowest = Close;
HHighest = 0;
end;
if JustChanged == FALSE then begin
if Close > HHighest then
HHighest = Close;
else if Close < LLowest then
LLowest = Close;
end;
VLineUp = HHighest - (Var5 * MA(Var6,Var2));
VLineDn = LLowest + (Var5 * MA(Var6,Var2));
/*if UpWave[1] then Plot1(VLineUp,"VLineUp", Red);
else if DnWave[1] then Plot1(VLineDn,"VLineUp", Blue);
*/
end;
input : P(10),short(12),long(26),sig(9);
var : mav(0),macdo(0);
mav = ma(C,P);
MACDo = MACD_OSC(short,long,sig);
if upwave[1] and c > o and mav > mav[1] Then
Buy();
if dnwave[1] and c < o and mav < mav[1] Then
Sell();
if MarketPosition == 1 Then
{
if c < o and c < l[1] and mav[1] < mav[2] and c[1] < o[1] Then
ExitLong("bx");
}
if MarketPosition == -1 Then
{
if c > o and c > h[1] and mav[1] > mav[2] and c[1] > o[1] Then
ExitLong("sx");
}
즐거운 하루되세요
> 아트정 님이 쓴 글입니다.
> 제목 : 수식요청
> 안녕하세요
수식요청드림니다
매수
10이평선 상향하고 양봉일때
Sw2선 양선일때
청산
10이평 하향하는 음봉발생후 다음봉에서
전음봉의 저점을 하향하는 음봉발생시 청산.
매도
10이평 하향하고
Sw2선 음선(청색)일때
청산
10이평 상향하는 양봉발생후 다음봉도 양봉발생
전양봉의 고점돌파시 청산.
일일수익 100틱시 스톱.
첨부sw2 78362에 있음니다
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식요청
> 안녕하세요
예스스탁입니다.
Inputs : Period(20), Sence(1.5), CC_DN(Yellow);
Vars:
VLineUp(0),
VLineDn(0),
HHighest(0),
LLowest(0),
JustChanged(FALSE),
VLine(0), DBN(0);
Array:
Highs[35](0),
Lows[35](0),
RRange[35](0),
UpWave[1](FALSE),
DnWave[1](FALSE);
If STime == 180000 Then
DBN = 0;
DBN = DBN + 1;
Var1 = Period;
Var2 = Var1 - 1;
Var3 = Var1 - 2;
Var5 = Sence;
Var6 = H-L;
JustChanged = FALSE;
if CurrentBar <= Var2 then begin
Highs[CurrentBar] = Close;
Lows[CurrentBar] = Close;
RRange[CurrentBar] = (H-L) /2;
end;
if CurrentBar == Var1 then begin
if Highs[Var2] >= Highs[Var3] then begin
UpWave[1] = TRUE;
HHighest = Highs[Var2];
VLineUp = HHighest - (Var5 * MA(Var6,Var2));
#Plot1(VLineUp,"VLineUp");
end;
if Highs[Var2] < Highs[Var3] then begin
DnWave[1] = TRUE;
LLowest = Lows[Var2];
VLineDn = LLowest + (Var5 * MA(Var6,Var2));
#Plot2(VLineDn,"VLineDn");
end;
end;
if CurrentBar > Var1 then begin
if DnWave[1] and Close > VLineDn then begin
DnWave[1] = FALSE;
UpWave[1] = TRUE;
JustChanged = TRUE;
HHighest = Close;
LLowest = 0;
end;
if UpWave[1] and Close < VLineUp and JustChanged == FALSE then begin
UpWave[1] = FALSE;
DnWave[1] = TRUE;
JustChanged = TRUE;
LLowest = Close;
HHighest = 0;
end;
if JustChanged == FALSE then begin
if Close > HHighest then
HHighest = Close;
else if Close < LLowest then
LLowest = Close;
end;
VLineUp = HHighest - (Var5 * MA(Var6,Var2));
VLineDn = LLowest + (Var5 * MA(Var6,Var2));
/*if UpWave[1] then Plot1(VLineUp,"VLineUp", Red);
else if DnWave[1] then Plot1(VLineDn,"VLineUp", Blue);
*/
end;
input : P(10),short(12),long(26),sig(9);
var : mav(0),macdo(0);
mav = ma(C,P);
MACDo = MACD_OSC(short,long,sig);
if upwave[1] and c > o and mav > mav[1] Then
Buy();
if dnwave[1] and c < o and mav < mav[1] Then
Sell();
if MarketPosition == 1 Then
{
if c < o and c < l[1] and mav[1] < mav[2] and c[1] < o[1] Then
ExitLong("bx");
}
if MarketPosition == -1 Then
{
if c > o and c > h[1] and mav[1] > mav[2] and c[1] > o[1] Then
ExitLong("sx");
}
즐거운 하루되세요
> 아트정 님이 쓴 글입니다.
> 제목 : 수식요청
> 안녕하세요
수식요청드림니다
매수
10이평선 상향하고 양봉일때
Sw2선 양선일때
청산
10이평 하향하는 음봉발생후 다음봉에서
전음봉의 저점을 하향하는 음봉발생시 청산.
매도
10이평 하향하고
Sw2선 음선(청색)일때
청산
10이평 상향하는 양봉발생후 다음봉도 양봉발생
전양봉의 고점돌파시 청산.
일일수익 100틱시 스톱.
첨부sw2 78362에 있음니다