답변완료
수식문의 입니다.
#Data6 : 선물매수호가총건수#Data7 : 선물매도호가총건수var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1);var : diff(0,data1),hh(0,data1),ll(0,data1);var : TX1(0,data1),TX2(0,data1),TX3(0,data1),TX4(0,data1);diff = data6(c)-data7(c);if bdate != bdate[1] Then{ hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); Text_Delete(TX1); Text_Delete(TX2); Text_Delete(TX3); Text_Delete(TX4); TX1 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime),NumToStr(HH,0)); TX2 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime),NumToStr(LL,0)); TX3 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime),NumToStr(HH,2)); TX4 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime),NumToStr(LL,2)); Text_SetStyle(TX1,0,0); Text_SetStyle(TX2,0,0); Text_SetStyle(TX3,0,0); Text_SetStyle(TX4,0,0);}else{ if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); Text_SetString(TX3,NumToStr(HH[1],0)); Text_SetString(TX1,NumToStr(HH,0)); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); Text_SetString(TX4,NumToStr(LL[1],0)); Text_SetString(TX2,NumToStr(LL,0)); }}TL_SetExtRight(TL1,true);TL_SetExtLeft(TL1,true);TL_SetExtRight(TL2,true);TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2);TL_SetSize(TL2,2);TL_SetColor(TL1,RED);TL_SetColor(TL2,BLUE);TL_SetExtRight(TL3,true);TL_SetExtLeft(TL3,true);TL_SetExtRight(TL4,true);TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2);TL_SetSize(TL4,2);TL_SetColor(TL3,MAGENTA);TL_SetColor(TL4,CYAN);Text_SetLocation(TX1,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime));Text_SetLocation(TX2,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime));Text_SetLocation(TX3,NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime));Text_SetLocation(TX4,NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime));plot1(hh,"최고건수차",RED);plot2(ll,"최저건수차",blue);여기에 최고 에 2줄 최저에 2줄 나오는데 사이를 색으로 채울수 있나요
box
답변완료
수식작성 부탁 드립니다
아래의 수식에서 매수 기준에 1가지 더 추가하여 수식을 작성 부탁 드립니다 # 매수 If superTrend < data2(C) and data2 input : ntime(5),factor(3), AtrPeriod(10); 추가수식 data2 input : ntime(5),factor(5), AtrPeriod(20); 2개의 기준으로 매수 진입 하도록 수식 작성 부탁 드립니다.하루가 지난뒤 부터 챠트 시간이 다음날 0시부터 기록되어 나타납니다 정상 시간이 나타나도록 하는 방법을 알려 주세요. # Data1 Input : shortPeriod(5), longPeriod(20); value1 = ema(C, shortPeriod); value2 = ema(C, longPeriod); # Data2 input : ntime(5),factor(3), AtrPeriod(10); var : zS1(0,Data2),zD1(0,Data2),zTM(0,Data2),zTF(0,Data2),zHH(0,Data2),zLL(0,Data2),zC1(0,Data2); var : zsrc(0,Data2), AtrV(0,Data2),ATRv1(0,Data2),upperBand(0,Data2),lowerBand(0,Data2), prevLowerBand(0,Data2), prevUpperBand(0,Data2); var : prevSuperTrend(0,Data2), superTrend(0,Data2), direction(0,Data2),alpha(0,Data2),source(0,Data2); if data2(Bdate != Bdate[1]) Then { zS1 = data2(TimeToMinutes(stime)); zD1 = data2(sdate); } if zD1 > 0 then { if data2(sdate) == zD1 Then zTM = data2(TimeToMinutes(stime))-zS1; Else zTM = data2(TimeToMinutes(stime))+1440-zS1; zTF = zTM%ntime; if Bdate != Bdate[1] or (Bdate == Bdate[1] and ntime > 1 and zTF < zTF[1]) or (Bdate == Bdate[1] and ntime > 1 and zTM >= zTM[1]+ntime) or (Bdate == Bdate[1] and ntime == 1 and zTM > zTM[1]) Then { zHH = data2(H); zLL = data2(L); zC1 = data2(C[1]); ATRV1 = ATRV[1]; prevSuperTrend = superTrend[1]; prevLowerBand = lowerBand[1]; prevUpperBand = upperBand[1]; } if data2(H) > zHH Then zHH = data2(H); if data2(L) < zLL Then zLL = data2(L); zsrc = (zHH+zLL)/2; if zC1 > 0 Then { alpha = 1 / AtrPeriod ; source = max(zHH - zLL, abs(zHH - zC1), abs(zLL - zC1)); ATrV = alpha * source + (1 - alpha) * ATrV1; upperBand = zsrc + factor * AtrV; lowerBand = zsrc - factor * AtrV; if lowerBand > prevLowerBand or zC1 < prevLowerBand Then lowerBand = lowerBand; Else lowerBand = prevLowerBand; if upperBand < prevUpperBand or zC1 > prevUpperBand Then upperBand = upperBand; Else upperBand = prevUpperBand; if prevSuperTrend == prevUpperBand Then { if C > upperBand Then direction = -1; Else direction = 1; } Else { if C < lowerBand Then direction = 1; Else direction = -1; } if direction == -1 Then superTrend = lowerBand; Else superTrend = upperBand; } } # 매수 If superTrend < data2(C) and CrossUP(value1, value2) Then { Buy(); } # 매수청산 If CrossDown(value1, value2) Then { Exitlong(); }
답변완료
지표문의 입니다.
#Data6 : 선물매수호가총건수#Data7 : 선물매도호가총건수var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1);var : diff(0,data1),hh(0,data1),ll(0,data1);var : TX1(0,data1),TX2(0,data1),TX3(0,data1),TX4(0,data1);diff = data6(c)-data7(c);if bdate != bdate[1] Then{ hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); Text_Delete(TX1); Text_Delete(TX2); Text_Delete(TX3); Text_Delete(TX4); TX1 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime),NumToStr(HH,0)); TX2 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime),NumToStr(LL,0)); TX3 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime),NumToStr(HH,2)); TX4 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime),NumToStr(LL,2)); Text_SetStyle(TX1,0,0); Text_SetStyle(TX2,0,0); Text_SetStyle(TX3,0,0); Text_SetStyle(TX4,0,0);}else{ if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); Text_SetString(TX3,NumToStr(HH[1],0)); Text_SetString(TX1,NumToStr(HH,0)); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); Text_SetString(TX4,NumToStr(LL[1],0)); Text_SetString(TX2,NumToStr(LL,0)); }}TL_SetExtRight(TL1,true);TL_SetExtLeft(TL1,true);TL_SetExtRight(TL2,true);TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2);TL_SetSize(TL2,2);TL_SetColor(TL1,RED);TL_SetColor(TL2,BLUE);TL_SetExtRight(TL3,true);TL_SetExtLeft(TL3,true);TL_SetExtRight(TL4,true);TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2);TL_SetSize(TL4,2);TL_SetColor(TL3,MAGENTA);TL_SetColor(TL4,CYAN);Text_SetLocation(TX1,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime));Text_SetLocation(TX2,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime));Text_SetLocation(TX3,NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime));Text_SetLocation(TX4,NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime));plot1(hh,"최고건수차",RED);plot2(ll,"최저건수차",blue);여기에 최고 에 2줄 최저에 2줄 나오는데 사이를 색으로 채울수 있나요
box함수