답변완료
문의
Input : 타주기분(3), Length(14);
var : cnt(0),S1(0),D1(0),TM(0),TF(0);
var : SigSum(0),RSIsig(0);
Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0);
var : idx(0), PreUpAvg(0), preDownAvg(0),RSIV(0);
Array : C1[100](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TimeToMinutes(stime)%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 1 to 99{
C1[cnt] = C1[cnt-1][1];
}
PreUpAvg = UpAvg[1];
preDownAvg = DownAvg[1];
idx = idx + 1;
}
C1[0] = C;
If idx == Length+2 Then {
UpSum = 0;
DownSum = 0;
For Counter = 0 To Length - 1 {
UpAmt = C1[Counter] - C1[Counter+1];
If UpAmt >= 0 Then
DownAmt = 0;
Else{
DownAmt = -UpAmt;
UpAmt = 0;
}
UpSum = UpSum + UpAmt;
DownSum = DownSum + DownAmt;
}
UpAvg = UpSum / Length;
DownAvg = DownSum / Length;
}
If idx > Length+2 Then {
UpAmt = C1[0] - C1[1];
If UpAmt >= 0 Then
DownAmt = 0;
Else {
DownAmt = -UpAmt;
UpAmt = 0;
}
UpAvg = (PreUpAvg * (Length - 1) + UpAmt) / Length;
DownAvg = (preDownAvg * (Length - 1) + DownAmt) / Length;
}
If UpAvg + DownAvg <> 0 Then
RSIv = 100 * UpAvg / (UpAvg + DownAvg);
Else
RSIv = 0;
PLOT1(RSIv,"RSI")
시그널선 부탁드립니다
2022-09-25
828
글번호 162491
지표
답변완료
수식작성 부탁드립니다.
안녕하세요. 운영자님
제가 이번에 부탁드릴 시스템은
거래시간 : 22:30 ~ 다음날 05:00
매수조건 : 다음 지표수식에서 주가가 120 이동평균선 위 Plot1 or Plot3를 상향돌파 시
매수하고 X틱 이상 이익시 익절 또는 Y틱 이상 손실 시 손절
매도조건 : 다음 지표수식에서 주가가 120 이동평균선 아래 Plot2 or Plot4를 하향돌파 시
매도하고 X틱 이상 이익시 익절 또는 Y틱 이상 손실 시 손절
input : Length(5);
var : Hdate0(0), Hdate1(0), Htime0(0), Htime1(0), Hval(0), TL1(0);
var : Ldate0(0), Ldate1(0), Ltime0(0), Ltime1(0), Lval(0), TL2(0);
var1 = SwingHigh(1, H, Length, Length, Length*2+1);
var2 = SwingLow(1, L, Length, Length, Length*2+1);
if var1 == -1 Then
var1 = var1[1];
if Var2 == -1 Then
var2 = Var2[1];
if var1 <> var1[1] Then {
TL_delete(TL1);
Hdate0 = sdate;
Hdate1 = sDate[Length];
Htime0 = stime;
Htime1 = sTime[Length];
Hval = H[Length];
TL1 = TL_New(Hdate1, Htime1, Hval, Hdate0, Htime0, Hval);
}
TL_SetColor(TL1, Red);
TL_SetExtRight(TL1,true);
TL_SetSize(TL1,2);
if var2 <> var2[1] Then {
TL_delete(TL2);
Ldate0 = sdate;
Ldate1 = sDate[Length];
Ltime0 = stime;
Ltime1 = sTime[Length];
Lval = L[Length];
TL2 = TL_New(Ldate1, Ltime1, Lval, Ldate0, Ltime0, Lval);
}
TL_SetColor(TL2, Blue);
TL_SetExtRight(TL2,true);
TL_SetSize(TL2,2);
# 그래프 종류 속성 점그래프
Plot1(var1,"swHigh",Red,0,4);
Plot2(var2,"swLow",Blue,0,4);
Plot3(var1,"swHigh확장",Red,0,4);
Plot4(var2,"swLow확장",Blue,0,4);
FixPlotShift(1,-Length);
FixPlotShift(2,-Length);
수고하세요,
2022-09-25
962
글번호 162488
시스템
답변완료
시스템 관련 질문 드립니다.
INPUT : K(0.8);
VAR : ENTRY(0),entry2(0),HO(0),minu(0),HLMa(0);
ENTRY = NextBarOpen + (H-O)*K;
ENTRY2 = NextBarOpen - (H-O)*K;
HO = H-O;
Minu= min(H-O,H[1]-O[1],H[2]-O[2]);
HLMa = ma(Minu,5);
if HL<HLMa Then
BUY("ENT",ATSTOP,ENTRY);
EXITLONG("EL",AtMarket);
if HL<HLMa Then
Sell("ENT2",AtStop,ENTRY2);
ExitShort("ES",OnClose);
아이디어는 돌파 매매인데 이를 일봉에 적용했을 때
봉가정오류가 나타날 가능성이 있나요?
2022-09-25
1112
글번호 162487
시스템