답변완료
문의 드립니다!
안녕하세요!
아래수식에서 발생되는 가로선을 당일의 선이 아닌 전일에 발생된 선이 당일챠트 화면에 나타나도록 수정 부탁드립니다
* 참고로 이 선의 두께를 좀더 두껍게한다거나 다른 형태의 선으로 표시되게 할수는 없을까요?
감사합니다!!
--------------------------------------------------------
input : N(30),색1(black),색2(black),굵기1(5),굵기2(5),형태1(1),형태2(1);
input : 수직선색상(Black),수직선굵기(2);
var : cnt(0),HH(0),LL(0),HTL1(0),LTL1(0),H1(0),L1(0),TL(0),vtl(0);
Array : HTL[100](0),LTL[100](0),HV[100](0),LV[100](0);
if Sdate != sDate[1] Then
{
value1 = sDate;
Value2 = value1[1];
Value3 = sTime;
Value4 = Value3[1];
For cnt = 1 to N
{
HV[cnt] = 0;
LV[cnt] = 0;
TL_Delete(HTL[cnt]);
TL_Delete(LTL[cnt]);
var1 = max(DayOpen(cnt),DayClose(cnt));
var2 = min(DayOpen(cnt),DayClose(cnt));
if cnt == 1 Then
{
HTL[cnt] = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
HV[cnt] = var1;
TL_SetColor(HTL[cnt],색1);
TL_SetSize(HTL[cnt],굵기1);
TL_SetStyle(HTL[cnt],형태1);
TL_SetExtRight(HTL[cnt],true);
TL_SetDrawMode(HTL[cnt],0);
HH = var1;
LTL[cnt] = TL_New(sDate,sTime,var2,NextBarSdate,NextBarStime,var2);
LV[cnt] = var2;
TL_SetColor(LTL[cnt],색2);
TL_SetSize(LTL[cnt],굵기2);
TL_SetStyle(LTL[cnt],형태2);
TL_SetExtRight(LTL[cnt],true);
TL_SetDrawMode(LTL[cnt],0);
LL = var2;
}
Else
{
if abs(var1-DayOpen(0)) < 10 and (var1 > HH or var1 < LL) Then
{
HTL[cnt] = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
HV[cnt] = var1;
TL_SetColor(HTL[cnt],색1);
TL_SetSize(HTL[cnt],굵기1);
TL_SetStyle(HTL[cnt],형태1);
TL_SetExtRight(HTL[cnt],true);
TL_SetDrawMode(HTL[cnt],0);
}
if abs(Var2-DayOpen(0)) < 10 and (Var2 > HH or Var2 < LL) Then
{
LTL[cnt] = TL_New(sDate,sTime,Var2,NextBarSdate,NextBarStime,Var2);
LV[cnt] = var2;
TL_SetColor(LTL[cnt],색2);
TL_SetSize(LTL[cnt],굵기2);
TL_SetStyle(LTL[cnt],형태2);
TL_SetExtRight(LTL[cnt],true);
TL_SetDrawMode(LTL[cnt],0);
}
if var1 > HH and abs(var1-DayOpen(0)) < 10 Then
HH = DayHigh(cnt);
if Var2 < LL and abs(Var2-DayOpen(0)) < 10 Then
LL = DayLow(cnt);
}
var3 = max(DayOpen(cnt+1),DayClose(cnt+1));
var4 = min(DayOpen(cnt+1),DayClose(cnt+1));
if cnt == 1 Then
{
HTL1 = TL_New(Value2,value4,var3,sDate[1],sTime[1],var3);
TL_SetColor(HTL1,색1);
TL_SetSize(HTL1,굵기1);
TL_SetStyle(HTL1,형태1);
TL_SetDrawMode(HTL1,0);
H1 = var3;
LTL1 = TL_New(Value2,Value3,var4,sDate[1],sTime[1],var4);
TL_SetColor(LTL1,색2);
TL_SetSize(LTL1,굵기2);
TL_SetStyle(LTL1,형태2);
TL_SetDrawMode(LTL1,0);
L1 = var4;
}
Else
{
if abs(var3-DayOpen(1)) < 10 and (var3 > H1 or var3 < L1) Then
{
HTL1 = TL_New(Value2,value4,var3,sDate[1],sTime[1],var3);
TL_SetColor(HTL1,색1);
TL_SetSize(HTL1,굵기1);
TL_SetStyle(HTL1,형태1);
TL_SetDrawMode(HTL1,0);
}
if abs(Var4-DayOpen(1)) < 10 and (Var4 > H1 or Var4 < L1) Then
{
LTL1 = TL_New(Value2,Value3,var4,sDate[1],sTime[1],var4);
TL_SetColor(LTL1,색2);
TL_SetSize(LTL1,굵기2);
TL_SetStyle(LTL1,형태2);
TL_SetDrawMode(LTL1,0);
}
if var3 > H1 and abs(var3-DayOpen(1)) < 10 Then
H1 = Var3;
if Var2 < L1 and abs(Var2-DayOpen(0)) < 10 Then
L1 = Var4;
}
}
}
For cnt = 1 to N
{
if HV[cnt] > 0 and
((H[0] >= HV[cnt]-PriceScale*3 and H[1] < HV[cnt]-PriceScale*3) or
(L[0] <= HV[cnt]+PriceScale*3 and L[1] > HV[cnt]+PriceScale*3) or
(H[0] >= LV[cnt]-PriceScale*3 and H[1] < LV[cnt]-PriceScale*3) or
(L[0] <= LV[cnt]+PriceScale*3 and L[1] > LV[cnt]+PriceScale*3)) Then
{
vtl = TL_New(sDate,sTime,0,sDate,sTime,999999999);
TL_SetColor(vtl,수직선색상);
TL_SetSize(vTL,수직선굵기);
TL_SetDrawMode(VTL,0);
PlaySound("C:₩예스트레이더(X64)₩data₩Sound₩.wav");
}
}
2024-09-30
832
글번호 183858
지표
답변완료
틱차트에서 데이터로 있는 분봉 관련하여 문의드립니다.
안녕하세요 항상 도움 감사드립니다.
아래 코드를 사용하고 있는데요. 주차트(data1)를 틱 300으로 설정하고 밑에 데이터(data2~20)들을 분봉(30초)로 설정하였는데 프린트문으로 데이터를 뽑아보면 첨부된 파일
왼쪽처럼 틱차트가 30초전에 여러개 완성되는 경우가 있어 data2~20들이 빈경우가 있고
오른쪽처럼 틱차트가 1분단위이상이여서 data2~20들이 여러개에 봉이 발생하는데 하나만 찍히는 경우가 발생합니다. 이럴경우에 처리하는 방법이 있는지 문의드립니다.
아래코드는 IF문부분이 반복되어 생략하였습니다. 꼭 확인 부탁드립니다. 감사합니다.
var : var11(0),var12(0),var13(0),var14(0),var15(0),var1(0),var2(0);
var : var21(0),var22(0),var23(0),var24(0),var25(0);
var : var31(0),var32(0),var33(0),var34(0),var35(0),var36(0);
var : var41(0),var42(0),var43(0),var44(0),var45(0),var46(0);
var : var59(0),var52(0),var56(0),var57(0),var51(0);
var : var69(0),var62(0),var66(0),var67(0),var61(0),var63(0),var64(0),var65(0);
input : StartDate(20240102),EndDate(20240823);
input : StartTime(090000),EndTime(150000);
var : Tcond(false);
var : lastPrintTime(0);
if sDate >= StartDate and sDate <= EndDate Then
{
var11 = Data2(c);
var21 = Data6(c);
var34 = var33[1] - var33;
if (abs(Var21[1]-Var21)) > 100000 THEN
var15 =0;
ELSE IF var21[1] < 0 AND var21 > 0 THEN
var15 = var21 - var21[1];
ELSE IF var21[1] < 0 AND var21 < 0 THEN
var15 = var21 - var21[1];
ELSE IF var21[1] > 0 AND var21 < 0 THEN
var15 = var21[1] - var21;
ELSE IF var21[1] > 0 AND var21 > 0 THEN
var15 = var21[1] - var21;
ELSE
var15 = var21[1] - var21;
IF var59[1] < 0 AND var59 > 0 THEN
var69 = var59 - var59[1];
ELSE IF var59[1] < 0 AND var59 < 0 THEN
var69 = var59 - var59[1];
ELSE IF var59[1] > 0 AND var59 < 0 THEN
var69 = var59[1] - var59;
ELSE IF var59[1] > 0 AND var59 > 0 THEN
var69 = var59[1] - var59;
ELSE
var69 = var59[1] - var59;
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
Tcond = true;
}
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
{
Tcond = False;
}
if sDate >= StartDate and sDate <= EndDate and Tcond == true Then
{
# 현재봉이 마무리되고 다음 봉이 시작되는 시점에 print 실행
if (NextBarOpen > 0 and stime != lastPrintTime) Then
{
print("c:\win\data1.csv",",거래량,%.f,폭,%.2f,5이격,%.2f,10이격,%.2f,20이격,%.2f,미결제,%.f,비차익,%.f,매수수량,%.f,매수건수,%.f,매도수량,%.f,매도건수,%.f,매도총건수,%.f,매수총건수,%.f,매도총수량,%.f,매수총건수,%.f,상승체결,%.f,하락체결,%.f,상승건수,%.f,하락건수,%.f,체결건수,%.f,상승제외,%.f,하락제외,%.f,외선현,%.f,기현외현,%.f,기옵콜,%.f,기옵풋,%.f,차익,%.f,코10,%.2f,",V,var61,var63,var64,var65,var34,var15,var11,var12,var13,var14,var22,var23,var24,var25,var31,var32,Upticks,Downticks,Ticks,Var1,Var2,Var41,Var42,Var43,Var44,Var45,Var46);
lastPrintTime = stime;
}
Plot1(var34, "미결제약정");
Plot2(var11,"매수5호가수량");
Plot3(var12,"매수5호가건수");
Plot4(var13,"매도호5호가수량");
Plot5(var14,"매도5호가건수");
Plot6(var15,"비차익");
Plot7(var22,"매도총건수");
Plot8(var23,"매수총건수");
Plot9(var24,"매도총수량");
Plot10(var25,"매수총건수");
Plot11(var31,"상승체결");
Plot12(var32,"하락체결");
#Plot13(var15, "비차익2");
}
2024-09-30
898
글번호 183851
지표