예스스탁
예스스탁 답변
2020-11-16 15:32:41
안녕하세요
예스스탁입니다.
1 지표
input : rocPeriod(1),rsiPeriod(3),oversoldLevel(30),overboughtLevel(70);
Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0);
var : price(0),lbrrsi(0),buySetup(False),sellSetup(False);
price = proc(rocPeriod);
If CurrentBar == 1 AND rsiPeriod > 0 Then Begin
UpSum = 0;
DownSum = 0;
For Counter = 0 To rsiPeriod - 1 Begin
UpAmt = price[Counter] - price[Counter+1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpSum = UpSum + UpAmt;
DownSum = DownSum + DownAmt;
End;
UpAvg = UpSum / rsiPeriod;
DownAvg = DownSum / rsiPeriod;
End
Else
If CurrentBar > 1 AND rsiPeriod > 0 Then Begin
UpAmt = price[0] - price[1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpAvg = (UpAvg[1] * (rsiPeriod - 1) + UpAmt) / rsiPeriod;
DownAvg = (DownAvg[1] * (rsiPeriod - 1) + DownAmt) / rsiPeriod;
End;
If UpAvg + DownAvg <> 0 Then
lbrrsi = 100 * UpAvg / (UpAvg + DownAvg);
Else
lbrrsi = 0;
buySetup = lbrrsi < oversoldLevel;
sellSetup = lbrrsi > overboughtLevel;
#plotshape(buySetup, color=green, style=shape.triangleup, location=location.bottom)
#plotshape(sellSetup, color=red, style=shape.triangledown, location=location.top)
plot1(lbrrsi,"lbrrsi");
PlotBaseLine1(overboughtLevel,"Overbought");
PlotBaseLine2(oversoldLevel,"Oversold");
2 시스템
input : rocPeriod(1),rsiPeriod(3),oversoldLevel(30),overboughtLevel(70);
Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0);
var : price(0),lbrrsi(0),buySetup(False),sellSetup(False);
price = proc(rocPeriod);
If CurrentBar == 1 AND rsiPeriod > 0 Then Begin
UpSum = 0;
DownSum = 0;
For Counter = 0 To rsiPeriod - 1 Begin
UpAmt = price[Counter] - price[Counter+1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpSum = UpSum + UpAmt;
DownSum = DownSum + DownAmt;
End;
UpAvg = UpSum / rsiPeriod;
DownAvg = DownSum / rsiPeriod;
End
Else
If CurrentBar > 1 AND rsiPeriod > 0 Then Begin
UpAmt = price[0] - price[1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpAvg = (UpAvg[1] * (rsiPeriod - 1) + UpAmt) / rsiPeriod;
DownAvg = (DownAvg[1] * (rsiPeriod - 1) + DownAmt) / rsiPeriod;
End;
If UpAvg + DownAvg <> 0 Then
lbrrsi = 100 * UpAvg / (UpAvg + DownAvg);
Else
lbrrsi = 0;
buySetup = lbrrsi < oversoldLevel;
sellSetup = lbrrsi > overboughtLevel;
if buySetup == true and buySetup[1] == False Then
Buy();
if sellSetup == true and sellSetup[1] == False Then
Sell();
즐거운 하루되세요
> 도여니 님이 쓴 글입니다.
> 제목 : 수식문의부탁드립니다.
> trading view있는 수식 부탁드리겠습니다.
감사합니다.
https://www.tradingview.com/script/fBpVB1ez-Momentum-Pinball-Indicator/