커뮤니티
Reverse 지표 타주기 수식 부탁드려요
2022-06-20 21:05:58
1076
글번호 160029
안녕하세요!
reverse 지표에 대한 타주기 수식 부탁드려요!!
타분봉간 60분 reverse를 1분에 표시...
** reverse 지표 **
------------------
Input : Short(12), Long(24);
value1 = accumN(C-C[1],Short);
value2 = accumN(C-C[1],Long);
value3 = iff(C>C[1],C-C[1],0);
value4 = iff(C<C[1],C-C[1],0);
If value1 > 0 Then
plot1(value1*(-100)/accumN(value3,Short), "reverse1");
Else
plot1(value1*100/accumN(value4,Short), "reverse1");
If value2 > 0 then
plot2(value2*(-100)/accumN(value3,Long),"reverse2");
Else
plot2(value2*100/accumN(value4,Long),"reverse2");
PlotBaseLine1(0, "기준선 0");
PlotBaseLine2(75, "기준선 75");
PlotBaseLine3(-75, "기준선 -75");
-----------------------------------------
답변 1
예스스탁 예스스탁 답변
2022-06-21 09:08:17
안녕하세요
예스스탁입니다.
input : 분(60),Short(12), Long(24);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : accumN1(0),accumN2(0),accumN3(0),accumN4(0),accumN5(0),accumN6(0);
Array : CC[100](0);
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 = TimeToMinutes(stime)%분;
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 = 99 downto 1
{
CC[cnt] = CC[cnt-1];
}
}
CC[0] = C;
if CC[max(short,Long)] > 0 Then
{
AccumN1 = 0;
AccumN2 = 0;
AccumN3 = 0;
AccumN4 = 0;
AccumN5 = 0;
AccumN6 = 0;
For cnt = 0 to max(short,Long)
{
if cnt < short Then
{
accumN1 = accumN1 + (CC[cnt]-CC[cnt+1]);
if CC[cnt] > CC[cnt+1] Then
accumN2 = accumN2 + (CC[cnt]-CC[cnt+1]);
if CC[cnt] < CC[cnt+1] Then
accumN3 = accumN3 + (CC[cnt]-CC[cnt+1]);
}
if cnt < long Then
{
accumN4 = accumN4 + (CC[cnt]-CC[cnt+1]);
if CC[cnt] > CC[cnt+1] Then
accumN5 = accumN5 + (CC[cnt]-CC[cnt+1]);
if CC[cnt] < CC[cnt+1] Then
accumN6 = accumN6 + (CC[cnt]-CC[cnt+1]);
}
}
If accumN1 > 0 Then
plot1(accumN1*(-100)/accumN2, "reverse1");
Else
plot1(accumN1*100/accumN3, "reverse1");
If accumN4 > 0 then
plot2(accumN4*(-100)/accumN5,"reverse2");
Else
plot2(accumN4*100/accumN6,"reverse2");
PlotBaseLine1(0, "기준선 0");
PlotBaseLine2(75, "기준선 75");
PlotBaseLine3(-75, "기준선 -75");
}
}
즐거운 하루되세요
> 단팥빵 님이 쓴 글입니다.
> 제목 : Reverse 지표 타주기 수식 부탁드려요
> 안녕하세요!
reverse 지표에 대한 타주기 수식 부탁드려요!!
타분봉간 60분 reverse를 1분에 표시...
** reverse 지표 **
------------------
Input : Short(12), Long(24);
value1 = accumN(C-C[1],Short);
value2 = accumN(C-C[1],Long);
value3 = iff(C>C[1],C-C[1],0);
value4 = iff(C<C[1],C-C[1],0);
If value1 > 0 Then
plot1(value1*(-100)/accumN(value3,Short), "reverse1");
Else
plot1(value1*100/accumN(value4,Short), "reverse1");
If value2 > 0 then
plot2(value2*(-100)/accumN(value3,Long),"reverse2");
Else
plot2(value2*100/accumN(value4,Long),"reverse2");
PlotBaseLine1(0, "기준선 0");
PlotBaseLine2(75, "기준선 75");
PlotBaseLine3(-75, "기준선 -75");
-----------------------------------------