답변완료
수정을 부탁 드립니다.
안녕하세요!
아래 수식은 두종목의 가격차이를 실시간으로 텍스트로 보여주는 수식인데요!
ㅁ매매를 하면서 보면 두 종목의 가격차이가 실시간으로 잘 안맞는 것 같아서
확인 한번 부탁드립니다.
var : ii(0,Data1),mm(0,Data1),dd(0,data1),tl1(0,Data1),tl2(0,Data1),tx1(0,Data1);
mm = (Data1(c)+data2(c))/2;
dd = (Data1(c)-data2(c));
if CurrentDate == sDate Then
{
if Data1(sDate != sDate[1])Then
{
tl1 = TL_New(sDate,stime,Data1(c),NextBarSdate,NextBarStime,Data1(c));
TL_SetExtLeft(tl1,true);
TL_SetExtRight(tl1,true);
TL_SetColor(tl1,Lime);
tl2 = TL_New(sDate,stime,Data2(c),NextBarSdate,NextBarStime,Data2(c));
TL_SetExtLeft(tl2,true);
TL_SetExtRight(tl2,true);
TL_SetColor(tl2,Magenta);
Tx1 = Text_New(sDate,sTime,mm,NumToStr(dd,2));
Text_SetStyle(tx1,0,2);
}
Else
{
TL_SetBegin(tl1,sDate,sTime,Data1(c));
TL_SetEnd(tl1,NextBarSdate,NextBarStime,Data1(c));
TL_SetBegin(tl2,sDate,sTime,Data2(c));
TL_SetEnd(tl2,NextBarSdate,NextBarStime,Data2(c));
Text_SetLocation(tx1,NextBarSdate,NextBarStime,mm);
}
}
2025-07-14
150
글번호 192497
지표
답변완료
수식 수정을 부탁드립니다
수식 검증에 이상이 없고 시스템에 저장되어 있는데 챠트에 적용하면 수식이 보이지 않고 구현되지도 않습니다. 도움을 부탁드립니다. 늘 건강하세요.
Inputs: rsiPeriod(21), bandLength(34), lengthrsipl(7), lengthtradesl(2);
// --------------------------------------------------------------------------------
// 변수 선언 (cnt 변수 추가)
Var: A_VWAP_1min(0);
Var: B_VWAP_1min(0);
Var: C_VWAP_1min(0);
Var: rsiVal_1min(0);
Var: S_RSI_Val_1min(0);
Var: F_RSI_Val_1min(0);
Var: HH_5min(0), LL_5min(0), CC_5min(0);
Var: TF_5min(0);
Var: A_VWAP_5min(0);
Var: B_VWAP_5min(0);
Var: C_VWAP_5min(0);
Var: rsiVal_5min(0);
Var: S_RSI_Val_5min(0);
Var: F_RSI_Val_5min(0);
Var: HH_10min(0), LL_10min(0), CC_10min(0);
Var: TF_10min(0);
Var: A_VWAP_10min(0);
Var: B_VWAP_10min(0);
Var: C_VWAP_10min(0);
Var: rsiVal_10min(0);
Var: S_RSI_Val_10min(0);
Var: F_RSI_Val_10min(0);
Var: cnt(0); // <-- 여기에 cnt 변수 선언 추가
Array : HH_5min_Arr[61](0),LL_5min_Arr[61](0),CC_5min_Arr[61](0);
Array : HH_10min_Arr[61](0),LL_10min_Arr[61](0),CC_10min_Arr[61](0);
// --------------------------------------------------------------------------------
// 1. 1분봉 데이터 (현재 차트) - 기존 코드의 변수명 그대로 사용
// 1분봉 VWAP 및 RSI 계산
A_VWAP_1min = Average((H+L+C)/3, 5);
B_VWAP_1min = Average((H+L+C)/3, 20);
C_VWAP_1min = Average((H+L+C)/3, 60);
rsiVal_1min = RSI(rsiPeriod);
S_RSI_Val_1min = Average(rsiVal_1min, lengthrsipl);
F_RSI_Val_1min = Average(rsiVal_1min, lengthtradesl);
// --------------------------------------------------------------------------------
// 2. 5분봉 데이터 구성 및 VWAP, RSI 계산
TF_5min = TimeToMinutes(stime)%5; // 5분봉의 시작을 감지
if dayindex == 0 or (TF_5min < TF_5min[1] and stime > stime[1]) Then{ // 5분봉 시작 시 초기화
HH_5min_Arr[0] = H;
LL_5min_Arr[0] = L;
CC_5min_Arr[0] = C;
for cnt = 1 to 60{ // <-- cnt 사용
HH_5min_Arr[cnt] = HH_5min_Arr[cnt-1][1];
LL_5min_Arr[cnt] = LL_5min_Arr[cnt-1][1];
CC_5min_Arr[cnt] = CC_5min_Arr[cnt-1][1];
}
}
// 5분봉 내에서 고가, 저가 업데이트 (현재 5분봉이 진행 중일 때)
if H > HH_5min_Arr[0] Then HH_5min_Arr[0] = H;
if L < LL_5min_Arr[0] Then LL_5min_Arr[0] = L;
CC_5min_Arr[0] = C; // 현재 5분봉의 종가는 항상 현재 1분봉의 종가
// 이 부분은 예스트레이더의 Average 함수가 다른 시간대의 데이터를 인자로 받아 처리하는지,
// 아니면 직접 5분봉 데이터를 기반으로 Average를 구현해야 하는지에 따라 달라집니다.
// --------------------------------------------------------------------------------
// 3. 10분봉 데이터 구성 및 VWAP, RSI 계산
TF_10min = TimeToMinutes(stime)%10; // 10분봉의 시작을 감지
if dayindex == 0 or (TF_10min < TF_10min[1] and stime > stime[1]) Then{ // 10분봉 시작 시 초기화
HH_10min_Arr[0] = H;
LL_10min_Arr[0] = L;
CC_10min_Arr[0] = C;
for cnt = 1 to 60{ // <-- cnt 사용
HH_10min_Arr[cnt] = HH_10min_Arr[cnt-1][1];
LL_10min_Arr[cnt] = LL_10min_Arr[cnt-1][1];
CC_10min_Arr[cnt] = CC_10min_Arr[cnt-1][1];
}
}
// 10분봉 내에서 고가, 저가 업데이트
if H > HH_10min_Arr[0] Then HH_10min_Arr[0] = H;
if L < LL_10min_Arr[0] Then LL_10min_Arr[0] = L;
CC_10min_Arr[0] = C;
// --------------------------------------------------------------------------------
// 4. 최종 매수/매도 조건 (모든 시간대 만족 시)
// 이 부분은 위에서 구성된 5분봉, 10분봉의 VWAP 및 RSI 변수들을 사용하여 조건을 만듭니다.
// 아직 5분봉, 10분봉의 VWAP 및 RSI 계산 로직이 없으므로 이 부분은 주석 처리 또는 임시 값 사용 필요
// If (A_VWAP_1min > B_VWAP_1min and B_VWAP_1min > C_VWAP_1min and F_RSI_Val_1min > S_RSI_Val_1min) And
// (A_VWAP_5min > B_VWAP_5min and B_VWAP_5min > C_VWAP_5min and F_RSI_Val_5min > S_RSI_Val_5min) And
// (A_VWAP_10min > B_VWAP_10min and B_VWAP_10min > C_VWAP_10min and F_RSI_Val_10min > S_RSI_Val_10min) Then
// Buy("매수");
// If (A_VWAP_1min < B_VWAP_1min and B_VWAP_1min < C_VWAP_1min and F_RSI_Val_1min < S_RSI_Val_1min) And
// (A_VWAP_5min < B_VWAP_5min and B_VWAP_5min < C_VWAP_5min and F_RSI_Val_5min < S_RSI_Val_5min) And
// (A_VWAP_10min < B_VWAP_10min and B_VWAP_10min < C_VWAP_10min and F_RSI_Val_10min < S_RSI_Val_10min) Then
// Sell("매도");
2025-07-14
183
글번호 192496
시스템
답변완료
부탁드립니다.
도움에 감사 드립니다.
월이 바뀌면 새로 계산하는 방식으로 수정 부탁 드립니다.
미리 감사 드립니다.
input:renkoSize(0.5),length(10), NumATRs(1.5);
var:j(0),k(0),renkoCnt(0),gubun(0),Sum(0),mav(0);
array:OO[50](0),HH[50](0),LL[50](0),CC[50](0); //이평선
If bdate != bdate[1] and DayOfWeek(Bdate) <= DayOfWeek(Bdate[1]) Then //break on session에 해당, 즉 일자가 바뀌면 새로 계산
{
gubun = 0; //방향을 초기화한다. 이후 형성되는 가격에 의해 방향이 계산
For j = 49 DownTo 1 //금일 시가봉을 신규 추가
{
OO[j] = OO[j-1];
HH[j] = HH[j-1];
LL[j] = LL[j-1];
CC[j] = CC[j-1];
}
OO[0] = C; //분봉의 종가를 기반으로 계산하기 때문에 당일 시초가 아니다
HH[0] = C;
LL[0] = C;
CC[0] = C;
}
Else
{
If gubun == 0 and CC[0] > 0 Then //일 첫봉이 완성되지 않은 시점
{
If OO[0] - renkoSize >= C Then
{
gubun = -1; //하락 방향
CC[0] = OO[0] - renkoSize; //음봉
HH[0] = OO[0];
LL[0] = CC[0];
j = 0;
}
Else If OO[0] + renkoSize <= C Then
{
gubun = 1; //상승 방향
CC[0] = OO[0] + renkoSize; //양봉
HH[0] = CC[0];
LL[0] = OO[0];
j = 0;
}
}
If LL[0] - renkoSize >= C Then
{
gubun = -1;
renkoCnt = Int(Round((LL[0]-C)/renkoSize,9));
if renkoCnt > 49 then renkoCnt = 49;
For j = 49 DownTo renkoCnt
{
OO[j] = OO[j-renkoCnt];
HH[j] = HH[j-renkoCnt];
LL[j] = LL[j-renkoCnt];
CC[j] = CC[j-renkoCnt];
}
For j = renkoCnt-1 DownTo 0
{
OO[j] = LL[j+1];
CC[j] = LL[j+1] - renkoSize;
HH[j] = OO[j];
LL[j] = CC[j];
}
}
Else If HH[0] + renkoSize <= C Then
{
gubun = 1;
renkoCnt = Int(Round((C-HH[0])/renkoSize,9));
if renkoCnt > 49 then renkoCnt = 49;
For j = 49 DownTo renkoCnt
{
OO[j] = OO[j-renkoCnt];
HH[j] = HH[j-renkoCnt];
LL[j] = LL[j-renkoCnt];
CC[j] = CC[j-renkoCnt];
}
For j = renkoCnt-1 DownTo 0
{
OO[j] = HH[j+1];
CC[j] = HH[j+1] + renkoSize;
HH[j] = CC[j];
LL[j] = OO[j];
}
}
Else If nextbarBdate != Bdate and DayOfWeek(nextbarBdate) <= dayofweek(Bdate) Then //주 마지막봉
{
For j = 49 DownTo 1
{
OO[j] = OO[j-1];
HH[j] = HH[j-1];
LL[j] = LL[j-1];
CC[j] = CC[j-1];
}
If LL[1] > C Then { //종가가 이전 봉보다 아래 형성
OO[0] = LL[1];
CC[0] = C;
HH[0] = OO[0];
LL[0] = CC[0];
} Else If HH[1] < C Then { //종가가 이전 봉보다 위에 형성
OO[0] = HH[1];
CC[0] = C;
HH[0] = CC[0];
LL[0] = OO[0];
} Else { //종가가 이전 봉의 중간에 형성
OO[0] = C;
CC[0] = C;
HH[0] = C;
LL[0] = C;
}
j = 0; //채널 값을 새로이 계산
}
}
if CC[length] > 0 then
{
sum = 0 ;
for j = 0 to length - 1
{
sum = sum + CC[j];
}
mav = sum/length;
plot5(maV,"MidLine");
}
2025-07-14
155
글번호 192495
지표
답변완료
검색식부탁드립니다
수고많습니다 수식을검색식으로 부탁드립니다
매수선
a=shift(close,-26+1);
b=bbandsup(240,3);
valuewhen(1,crossup(a,b),b)
기준선
a=shift(close,-26+1);
b=bbandsup(240,3);
a1=crossup(c,b(25));
valuewhen(1,a1,(h+l)/2.20))
기준선이 매수선밑에있고 주가가 매수선을돌파하는 검색식을 부탁드립니다
2025-07-14
165
글번호 192494
종목검색
답변완료
수식문의
수고하십니다
아래식에 오루가 (외부변수2개가필요합니다) 나오느데5,6줄
어떠게 해야하는지요 도움 부탁합니다
감사합니다
if sTime>=17000 or sTime<1000 Then
Input : is1(50),is2(100);
var: isma1(0),isma2(0);
isma1=LRL(C,IS1,0);
isma2=LRL(C,IS2,0);
# 매수/매도청산
If CrossUP(ISMA1, ISMA2) Then
{
Buy();
}
# 매도/매수청산
If CrossDown(ISMA1, ISMA2) Then
{
Sell();
}
2025-07-14
135
글번호 192493
시스템