답변완료
수식 문의
RSI가 과열권, 중심선, 침체권, 이 세 값을
이탈, 돌파하기 위해서 종목에서 어떤 가격을 넘어야 하는지
점을 찍어 확인 하는 지표를 구했습니다.
제대로 작동한다면 그림처럼 뿌려질 것이나
이상하게 잘 되지 않습니다.
무엇이 문제인지 확인 부탁드립니다.
감사합니다.
Input : Length(9);
Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),RSIV(0),Current(0);
var : cnt1(0),current1(0),UpAmt1(0),DownAmt1(0),UpAvg1(0),DownAvg1(0),RSIv1(0);
var : cnt2(0),current2(0),UpAmt2(0),DownAmt2(0),UpAvg2(0),DownAvg2(0),RSIv2(0);
var : upPrice(0),dnPrice(0);
If CurrentBar == 1 AND Length > 0 Then Begin
UpSum = 0;
DownSum = 0;
For Counter = 0 To Length - 1 Begin
UpAmt = C[Counter] - C[Counter+1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpSum = UpSum + UpAmt;
DownSum = DownSum + DownAmt;
End;
UpAvg = UpSum / Length;
DownAvg = DownSum / Length;
End
Else If CurrentBar > 1 AND Length > 0 Then Begin
UpAmt = C[0] - C[1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpAvg = (UpAvg[1] * (Length - 1) + UpAmt) / Length;
DownAvg = (DownAvg[1] * (Length - 1) + DownAmt) / Length;
End;
If UpAvg + DownAvg <> 0 Then
RSIv = 100 * UpAvg / (UpAvg + DownAvg);
Else
RSIv = 0;
IF rsiv >= 30 AND rsiv <= 70 Then{
for cnt1 = 0 to 100{
Current1 = C+PriceScale*cnt1;
UpAmt1 = current1 - C[1];
If UpAmt1 >= 0 Then
DownAmt1 = 0;
Else Begin
DownAmt1 = -UpAmt1;
UpAmt1 = 0;
End;
UpAvg1 = (UpAvg[1] * (Length - 1) + UpAmt1) / Length;
DownAvg1 = (DownAvg[1] * (Length - 1) + DownAmt1) / Length;
If UpAvg1 + DownAvg1 <> 0 Then
RSIv1 = 100 * UpAvg1 / (UpAvg1 + DownAvg1);
Else
RSIv1 = 0;
IF rsiv1 <= 50 Then{
upPrice = CURRENT1;
cnt1 = 101;
}
}
for cnt2 = 0 to 100{
Current2 = C-PriceScale*cnt1;
UpAmt2 = current2 - C[1];
If UpAmt2 >= 0 Then
DownAmt2 = 0;
Else Begin
DownAmt2 = -UpAmt2;
UpAmt2 = 0;
End;
UpAvg2 = (UpAvg[1] * (Length - 1) + UpAmt2) / Length;
DownAvg2 = (DownAvg[1] * (Length - 1) + DownAmt2) / Length;
If UpAvg2 + DownAvg2 <> 0 Then
RSIv2 = 100 * UpAvg2 / (UpAvg2 + DownAvg2);
Else
RSIv2 = 0;
IF rsiv2 <= 50 Then{
dnPrice = CURRENT2;
cnt2 = 101;
}
}
plot1(upPrice);
plot2(dnPrice);
}
2022-05-31
936
글번호 159471
지표
답변완료
수식변경문의드립니다
절반=valuewhen(1,(최고값(고가(1),봉)<최고값(고가,봉)),((최고값(고가,봉)+최저값(저가,봉))/2));
최고값(고가, 시간)-(((최고값(고가, 시간)-절반)/0.5)*0.5)
이 두개수식을 같은값을 뽑아낼수있는 다른 수식으로 바꿔주실수있나용??
2022-05-31
808
글번호 159466
사용자 함수
답변완료
수식 부탁드립니다.
아래 수식에 추가로 입력변수(1000)를 넣어서
장시작과 함께 “당일실매수거래량” 고점에서 분봉캔들 종가에 고점라인(RGB)을 긋고, 시장이 반락하다가 “당일실매수거래량”이 다시 1000개이상 상승하면 분봉캔들에 고점라인(RGB)이 갱신되어(전 고점라인보다가는 내려오겠지요) 그으지기를 원합니다.
또 동시에
장시작과 함께 “당일실매수거래량” 저점에서 분봉캔들 종가에 저점라인(RGB)을 긋고, 시장이 반등하다가 “당일실매수거래량”이 다시 1000개이상 하락하면 분봉캔들에 저점라인(RGB)이 갱신되어 그으지기를 원합니다.
수고스러움에 늘 감사를 드립니다.
오늘도 좋은시간 되시길 바랍니다.
input : R1(255),G1(0),B1(0);
input : R2(0),G2(0),B2(255);
var : hh(0),ll(0);
if Bdate != Bdate[1] Then
var1 = 0;
var1 = var1 + (Upvol-DownVol);
if CurrentDate == sDate Then
Plot1(var1,"당일실매수거래량",iff(var1 > 0,RGB(243,97,220),RGB(102,152,253)));
if Bdate != Bdate[1] Then
{
hh = var1;
ll = var1;
}
Else
{
if var1 > hh Then
hh = var1;
if var1 < ll Then
ll = var1;
}
if CurrentDate == sDate Then
{
Plot2(hh,"최고");
Plot3(ll,"최저");
}
2022-05-31
922
글번호 159464
지표