답변완료
수정을 부탁 드립니다.
안녕하세요!
아래 수식은 두종목의 가격차이를 실시간으로 텍스트로 보여주는 수식인데요!
ㅁ매매를 하면서 보면 두 종목의 가격차이가 실시간으로 잘 안맞는 것 같아서
확인 한번 부탁드립니다.
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
174
글번호 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
210
글번호 192496
시스템
답변완료
크기가 적은 숫자를 제거한 수식 수정을 부탁드립니다
그림파일의 내용중 크기가 적은 숫자를 제외한 수식 부탁드립니다
==========================================================
input : Period(35),선두께(2);
Var:상승색(Turquoise), 하락색(Turquoise);
Var:j(0),T(0);
Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0),tl9(0),
date21(0),date22(0),time21(0),time22(0),
date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0),box(0);
Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0);
Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0);
Plot1(0);
For j = 0 To 19
{
HiBar[j] = HiBar[j] + 1;
LoBar[j] = LoBar[j] + 1;
}
if weekhigh(0)[1] < weekhigh(0) Then
T = 1;
if weekLow(0)[1] > weekLow(0) Then
T = -1;
If T == -1 Then
{
If T[1] != -1 Then
{
For j = 18 DownTo 0
{
LoVal[j+1] = LoVal[j];
LoBar[j+1] = LoBar[j];
}
LoVal[0] = L;
LoBar[0] = 0;
date11 = date[HiBar[0]];
time11 = stime[HiBar[0]];
Value11 = HiVal[0];
date12 = date[LoBar[0]];
time12 = stime[LoBar[0]];
Value12 = LoVal[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetColor(TL1,하락색);
box = Box_New(date11,time11,Value11,date12,time12,Value12);
Box_SetColor(box,Blue);
Box_SetFill(box,true,100,true);
date21 = date[HiBar[0]];
time21 = stime[HiBar[0]];
date22 = date[0];
time22 = stime[0];
for j = 0 to 6
{
fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]);
{
Tx = Text_New(sDate,sTime,Loval[0],NumToStr(L,0));
Text_SetStyle(tx,1,0);
}
}
}
If LoVal[0] > L Then
{
LoVal[0] = L;
LoBar[0] = 0;
date12 = date[LoBar[0]];
time12 = stime[LoBar[0]];
Value12 = LoVal[0];
TL_SetEnd(TL1, date12,time12,Value12);
date22 = date[0];
time22 = stime[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
Box_SetEnd(box,date12,time12,Value12);
{
Text_SetString(Tx,NumToStr(L,0));
Text_SetLocation(Tx,sDate,sTime,Loval[0]);
}
}
}
If T == 1 Then
{
If T[1] != 1 Then
{
For j = 18 DownTo 0
{
HiVal[j+1] = HiVal[j];
HiBar[j+1] = HiBar[j];
}
HiVal[0] = H;
HiBar[0] = 0;
date11 = date[LoBar[0]];
time11 = stime[LoBar[0]];
Value11 = LoVal[0];
date12 = date[HiBar[0]];
time12 = stime[HiBar[0]];
Value12 = HiVal[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetColor(TL1,상승색);
box = Box_New(date11,time11,Value11,date12,time12,Value12);
Box_SetColor(box,Red);
Box_SetFill(box,true,100,true);
date31 = date[LoBar[0]];
time31 = stime[LoBar[0]];
date32 = date[0];
time32 = stime[0];
for j = 0 to 5
{
fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]);
{
Tx = Text_New(sDate,sTime,hival[0],NumToStr(H,0));
Text_SetStyle(tx,1,1);
}
}
}
If HiVal[0] < H Then
{
HiVal[0] = H;
HiBar[0] = 0;
date12 = date[HiBar[0]];
time12 = stime[HiBar[0]];
Value12 = HiVal[0];
TL_SetEnd(TL1, date12,time12,Value12);
date32 = date[0];
time32 = stime[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
Box_SetEnd(box,date12,time12,Value12);
{
Text_SetString(Tx,NumToStr(h,0));
Text_SetLocation(Tx,sDate,sTime,hival[0]);
Text_SetStyle(tx,1,1);
}
}
}
TL_SetSize(TL1,선두께);
TL_SetDrawMode(TL1,0);
Text_SetSize(tx,20);
2025-07-14
227
글번호 192488
지표