답변완료
분봉거래량
감사합니다
오전 85979 답변 너무 잘 사용하고 있습니다.
아래는 오전에 올려주신 답변 내용입니다.
거래량이 가장 많은 순위에서부터 8번째 까지의 내용인데요.
이것을
거래량이 가장 적은 순위에서부터 8번째 까지로 바꾸고 싶습니다.
그리고 주석처리 부탁드립니다. 어떤 수식인지 알고싶네요.
다시 한 번 감사드립니다.
input : nday(10);
var : cnt(0);
Array : di[100](0), vi[2,300](0),sort[2,300](0),TL[300](0);
if Bdate != Bdate[1] Then
{
for cnt = 99 DownTo 1
{
di[cnt] = di[cnt-1];
}
di[0] = Index;
}
For cnt = 299 DownTo 1
{
vi[0,cnt] = vi[0,cnt-1];
vi[1,cnt] = vi[1,cnt-1];
TL_Delete(TL[cnt-1]);
}
vi[0,0] = v;
vi[1,0] = Index;
if di[nday] > 0 Then
{
For cnt = 0 to Index-di[nday]
{
sort[0,cnt] = vi[0,cnt];
sort[1,cnt] = vi[1,cnt];
}
Sort2DArray(sort,2,Index-di[nday],1);
plot1(c[Index-sort[1,0]],"1",Red);
plot2(c[Index-sort[1,1]],"2",Red);
plot3(c[Index-sort[1,2]],"3",Red);
plot4(c[Index-sort[1,3]],"4",Red);
plot7(c[Index-sort[1,4]],"5",Blue);
plot8(c[Index-sort[1,5]],"6",Blue);
plot9(c[Index-sort[1,6]],"7",Blue);
plot10(c[Index-sort[1,7]],"8",Blue);
}
2024-02-27
929
글번호 177021
지표
답변완료
수식수정
Inputs : Period(20), Sence(1.5);
Vars:
VLineUp(0),
VLineDn(0),
HHighest(0),
LLowest(0),
JustChanged(FALSE),
VLine(0), DBN(0),T(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
{
T = 1;
}
else if DnWave[1] then
{
T = -1;
}
end;
Input : BBP(120), MultiD(2);
var : BBmd(0),BBup(0),BBdn(0);
BBmd = ma(C,Period);
BBup = BollBandUp(BBP,MultiD);
BBdn = BollBandDown(BBP,MultiD);
if CrossDown(C,BBup) and t == -1 Then
sell();
if crossup(C,BBdn) and t == 1 Then
buy();
안녕하세요
85994글입니다
수식적용결과
Sw2선이 전혀 안맞음
양선 적색선에서 매수
음선 청색선에서 매도
이나 반대나옴
2024-02-27
904
글번호 177013
시스템
답변완료
시간 봉에서 일봉의 이평선 값 표현 2개
안녕하세요 항상 노고에 너무 감사드립니다.
시간봉에서 일봉의 이평선 값을 표현하고 싶습니다.
주식이 아니라 해외선물 또는 코인에서 사용할 예정입니다.
비슷한 자료를 찾아 봤는데,
-------
Input : Period(5);
Var : Ep(0), JISU(0), DINDEX(0), PreJISU(0);
Ep = 2/(Period+1); //평활계수
if date != date[1] then { //날짜가 변경될 경우에(매일의 첫번째 봉)
DINDEX = DINDEX + 1; //일봉상의 index를 구한다
PreJISU = JISU[1]; //전봉(전일 마지막 봉)의 JISU값을 preJISU에 저장한다.
}
if DINDEX <= 1 then //일봉상의 인덱스가 1이하이면(차트 맨 앞 첫구간을 의미)
JISU = C; //종가를 지수이동평균값으로 저장한다.
else //이외의 경우에는 (두번째 구간 부터는)
JISU = C * EP + PreJISU * (1-EP); //위 지수이평 계산식에 의해 계산된 값을 지수이평값으로 저장한다.
plot1(JISU,"지수이동평균"); //지수이동평균을 출력한다.
--------
이렇게 있더라구요, 문제는 해외선물 같은 경우, 세션이 끝나고 그 다음 세션을 기준으로 새로운 봉이 만들어지는데(같은 날일지라도), 저 식대로하면 12시가 지났을때 새로 표현이 되는 것 같아서 제대로 표현이 안될까봐 고민입니다.
결론은, 시간 봉(60분봉이나 240분봉)사용 시, 당일 일봉상의 12일 가중이평선을 표시하는 사용자 함수를 부탁드립니다.
ex)DailyEMA(12);
전일 일봉상의 12일 가중이평선을 표시하길 원할 경우
DailyEMA(12)[1] 이렇게 사용할 수 있도록 부탁드립니다. (__)
항상 감사드립니다.
2024-02-27
844
글번호 177011
사용자 함수