답변완료
수식변경
늘 감사합니다.
월봉으로 바꾸어 쓰다 컴이 포멧되어서 사라저 버렸내요
죄송하지만 월봉(매달 1일로 시작)으로 수식을 변경해 주세요
거듭 감사합니다.
--------------------------------------
input : 시간1(090000), Price1(100);
value1 = TimeToMinutes(stime);
if stime == 시간1 Then
var : cnt(0);
Array : O1[20](0), H1[20](0),L1[20](0),C1[20](0),
O2[20](0), H2[20](0),L2[20](0),C2[20](0),
O3[20](0), H3[20](0),L3[20](0),C3[20](0),
O4[20](0), H4[20](0),L4[20](0),C4[20](0),
O5[20](0), H5[20](0),L5[20](0),C5[20](0),
O6[20](0), H6[20](0),L6[20](0),C6[20](0),
O7[20](0), H7[20](0),L7[20](0),C7[20](0);
if stime == 시간1 Then{
O1[0] = data1(O);
H1[0] = data1(H);
L1[0] = data1(L);
for cnt = 1 to 19{
O1[cnt] = O1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
C1[cnt] = C1[cnt-1][1];
}
}
if data1(H) > H1[0] Then
H1[0] = data1(H);
if data1(L) < L1[0] Then
L1[0] = data1(L);
C1[0] = data1(C);
var1 = data1(H1[0]);
var2 = data1(L1[0]);
var3 = data1(O1[0]);
var4 = data1(C1[0]);
var5 = (var4-var3)/data1(PriceScale);
plot1(var5, "111");
if stime == 시간1 Then{
O2[0] = data2(O);
H2[0] = data2(H);
L2[0] = data2(L);
for cnt = 1 to 19{
O2[cnt] = O2[cnt-1][1];
H2[cnt] = H2[cnt-1][1];
L2[cnt] = L2[cnt-1][1];
C2[cnt] = C2[cnt-1][1];
}
}
if data2(H) > H2[0] Then
H2[0] = data2(H);
if data2(L) < L2[0] Then
L2[0] = data2(L);
C2[0] = data2(C);
var11 = data2(H2[0]);
var12 = data2(L2[0]);
var13 = data2(O2[0]);
var14 = data2(C2[0]);
var15 = (var14-var13)/data2(PriceScale);
plot2(var15, "222");
if stime == 시간1 Then{
O3[0] = data3(O);
H3[0] = data3(H);
L3[0] = data3(L);
for cnt = 1 to 19{
O3[cnt] = O3[cnt-1][1];
H3[cnt] = H3[cnt-1][1];
L3[cnt] = L3[cnt-1][1];
C3[cnt] = C3[cnt-1][1];
}
}
if data3(H) > H3[0] Then
H3[0] = data3(H);
if data3(L) < L3[0] Then
L3[0] = data3(L);
C3[0] = data3(C);
var21 = data3(H3[0]);
var22 = data3(L3[0]);
var23 = data3(O3[0]);
var24 = data3(C3[0]);
var25 = (var24-var23)/data3(PriceScale);
plot3(var25, "333");
if stime == 시간1 Then{
O4[0] = data4(O);
H4[0] = data4(H);
L4[0] = data4(L);
for cnt = 1 to 19{
O4[cnt] = O4[cnt-1][1];
H4[cnt] = H4[cnt-1][1];
L4[cnt] = L4[cnt-1][1];
C4[cnt] = C4[cnt-1][1];
}
}
if data4(H) > H4[0] Then
H4[0] = data4(H);
if data4(L) < L4[0] Then
L4[0] = data4(L);
C4[0] = data4(C);
var31 = data4(H4[0]);
var32 = data4(L4[0]);
var33 = data4(O4[0]);
var34 = data4(C4[0]);
var35 = (var34-var33)/data4(PriceScale);
plot4(var35, "444");
if stime == 시간1 Then{
O5[0] = data5(O);
H5[0] = data5(H);
L5[0] = data5(L);
for cnt = 1 to 19{
O5[cnt] = O5[cnt-1][1];
H5[cnt] = H5[cnt-1][1];
L5[cnt] = L5[cnt-1][1];
C5[cnt] = C5[cnt-1][1];
}
}
if data5(H) > H5[0] Then
H5[0] = data5(H);
if data5(L) < L5[0] Then
L5[0] = data5(L);
C5[0] = data5(C);
var41 = data5(H5[0]);
var42 = data5(L5[0]);
var43 = data5(O5[0]);
var44 = data5(C5[0]);
var45 = (var44-var43)/data5(PriceScale);
plot5(var45, "555");
if stime == 시간1 Then{
O6[0] = data6(O);
H6[0] = data6(H);
L6[0] = data6(L);
for cnt = 1 to 19{
O6[cnt] = O6[cnt-1][1];
H6[cnt] = H6[cnt-1][1];
L6[cnt] = L6[cnt-1][1];
C6[cnt] = C6[cnt-1][1];
}
}
if data6(H) > H6[0] Then
H6[0] = data6(H);
if data6(L) < L6[0] Then
L6[0] = data6(L);
C6[0] = data6(C);
var51 = data6(H6[0]);
var52 = data6(L6[0]);
var53 = data6(O6[0]);
var54 = data6(C6[0]);
var55 = (var54-var53)/data6(PriceScale);
plot6(var55, "666");
if stime == 시간1 Then{
O7[0] = data7(O);
H7[0] = data7(H);
L7[0] = data7(L);
for cnt = 1 to 19{
O7[cnt] = O7[cnt-1][1];
H7[cnt] = H7[cnt-1][1];
L7[cnt] = L7[cnt-1][1];
C7[cnt] = C7[cnt-1][1];
}
}
if data7(H) > H7[0] Then
H7[0] = data7(H);
if data7(L) < L7[0] Then
L7[0] = data7(L);
C7[0] = data7(C);
var61 = data7(H7[0]);
var62 = data7(L7[0]);
var63 = data7(O7[0]);
var64 = data7(C7[0]);
var65 = (var64-var63)/data7(PriceScale);
plot7(var65, "777");
2023-04-03
1190
글번호 167865
지표
답변완료
도움부탁드립니다
매수 매도 거래량을 숫자로 보기을 키움에서 사용해서요 예스트례이드로 변경부탁드립니다.
수식1:if((high+low)/2<=close,volume,0);
수식2:a1=(high-close)/(high-low);
if((high+low)/2<=close,volume*a1,0)
수식3:if((high+low)/2>close,volume,0)
수식4:b1=(close-low)/(high-low);
if((high+low)/2>close,volume*b1,0)
수식5:a1=if((high+low)/2<=close,volume,0);
a2=(high-close)/(high-low);
a3=if((high+low)/2<=close,volume*a2,,0);
b1=if((high+low)/2>close,volume,0);
b2=(close-low)/(high-low);
b3=if((high+low)/2>close,volume*b2,,0);
if(a1>0,(a3/a1)*100,if(b1>0,(b3/b1)*100,0))
조건설정:조정1:23.6
조정2:38.2
조정3:60.0
조정4:61.8
조정5:78.4
2023-04-03
1538
글번호 167846
지표
답변완료
신호 발생하지 않아 다시 문의 드립니다.
며칠전에 알려주신 로직입니다. 신호가 발생하지 않는데 다시 확인부탁드립니다.
제가 원하는 것은
60분봉을 추세 기준으로 하여 20이평 120이평 정배열이고
60분봉에서 볼린져밴드 상단선 돌파 중이거나 또는 상단선 위에 있을 때
하위봉(예로 1분봉이나 2분봉 등) 차트에서 볼린져 상선 돌파 매수로 진입하고자 합니다.
60분봉에서 20이평 120이평 역배열이고
60분봉에서 볼린져밴드 하단선 아래로 돌파 또는 하단선 아래 있을 때
하위봉(예로 1분봉이나 2분봉 등) 차트에서 볼린져 하선 돌파 매도로 진입하고자 합니다.
감사합니다^.^
input : 타주기분(60),BBP(20),Dv(2),P1(20),P2(120);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),SumSqrt(0),Stdv(0);
var : sum(0),BBmd(0),Bbup(0),BBdn(0);
var : sum1(0),mav1(0),sum2(0),mav2(0);
Array : CC[200](0);
#기본차트 볼밴
var1 = BollBandUp(20,2);
Var2 = BollBandDown(20,2);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 199 downto 1
{
CC[cnt] = CC[cnt-1];
}
}
CC[0] = C;
#타분봉 볼밴계산
if CC[BBP-1] > 0 then
{
sum = 0;
for cnt = 0 to BBP-1
{
sum = sum + CC[cnt];
}
BBmd = sum/BBP;
SumSqrt = 0;
For cnt = 0 To BBP - 1
{
SumSqrt = SumSqrt + (CC[cnt] - BBmd)^2;
}
Stdv = SquareRoot(SumSqrt / BBP);
BBup = BBmd + (Dv * Stdv);
BBdn = BBmd - (Dv * Stdv);
}
#타분봉 P1이평 계산
if CC[P1-1] > 0 Then
{
sum1 = 0;
For cnt = 0 to P1-1
{
sum1 = sum1 + CC[cnt];
}
mav1 = sum1/P1;
}
#타분봉 P2이평 계산
if CC[P2-1] > 0 Then
{
sum2 = 0;
For cnt = 0 to P1-1
{
sum2 = sum2 + CC[cnt];
}
mav2 = sum2/P1;
}
//타분봉 지표값들 계산이 된 상태에서
if mav1 > 0 and mav2 > 0 and BBmd > 0 Then
{
if mav1 > mav2 and C > BBup Then
{
if CrossUp(c,var1) Then
Buy();
}
if CrossDown(c,var1) Then
ExitLong();
if mav1 < mav2 and C < BBdn Then
{
if CrossDown(c,var2) Then
Sell();
}
if CrossUp(C,Var2) Then
ExitShort();
}
}
2023-04-03
1260
글번호 167842
시스템
답변완료
지표 작성 부탁드립니다.
트레이딩뷰에 있는 지표인데 예스트레이더에서 사용할 수 있도록 가공해 주시면 감사하겠습니다.
아래는 트레이딩뷰에 있는 지표 작성 코드입니다. 매번 성의있는 답변 주시는 덕에 도움 많이 받고 있습니다. 감사합니다. ~
//@version=4
study(title="Pocket Pivots", shorttitle="Pocket Pivots", overlay=true)
tenSMAlen = input(10, minval=1, title="SMA1 Length")
fiftySMAlen = input(50, minval=1, title="SMA2 Length")
PPlen = input(10, minval=5, title="Pocket Pivot Length")
PPVolLen = input(5, minval=5, title="Volume Pocket Pivot Length")
UpDay = close > open and close[0] > close[1]
VolUpDay = close[0] > close[1]
tenSMA = sma(close,tenSMAlen)
fiftySMA = sma(close,fiftySMAlen)
//Volume on the pocket pivot day has to be greater than the previous Pocket Pivot Length days - default is 10. PPvol1 must count up to PPlen
PPvol1 = 0
for i = 1 to PPlen
if volume[0] > volume[i]
PPvol1 += 1
else
PPvol1 := 0
//Volume on the pocket pivot day has to be greater than the previous Pocket Pivot Length days - default is 5. PPvol2 must count up to PPVollen
PPvol2 = 0
for i = 1 to PPVolLen
if volume[0] > volume[i]
PPvol2 += 1
else
PPvol2 := 0
//Check if price has crossed or gapped over 10 day or 50 day SMA
MAcross = open < tenSMA and close > tenSMA or open < fiftySMA and close > fiftySMA or close[1] < tenSMA and close[0] > tenSMA or close[1] < fiftySMA and close[0] > fiftySMA
//Will show indicator when Pocket Pivot Volume and KMA crosses have occured
PocketPivot1 = PPvol1 == PPlen and UpDay and MAcross
plotshape(PocketPivot1 ? 1 : na, style=shape.triangleup, location=location.belowbar, color=color.rgb(51,153,255), size=size.small)
//Will show Yellow Triangle Down indicator when Volume Pocket Pivot is met and current day close is greater than yesterday;s close
PocketPivot2 = PPvol2 == PPVolLen and VolUpDay
plotshape(PocketPivot1 != 1 and PocketPivot2 ==1 ? 1 : na, style=shape.triangledown, location=location.belowbar, color=color.rgb(225,225,0), size=size.small)
//Alerts Conditions
alertcondition(PocketPivot1 == 1, title='Pocket Pivot', message='Pocket Pivot Triggered!')
alertcondition(PocketPivot2 == 1, title='Volume Pocket Pivot', message='Volume Pocket Pivot Triggered!')
2023-04-03
1980
글번호 167834
지표