커뮤니티
부탁 드립니다.
2015-02-17 10:49:12
139
글번호 83276
그물망 지표를 토대로 재가공 하고 싶습니다.
그물망지표를 보면 그 폭이 수렴 했다가 펼쳐지고 다시 재수렴 하는 과정을 거칩니다.
그물망의 폭에 대해 분석하는 지표를 만들고 싶습니다.
1. 그물망의 폭에 대한 스토캐스틱 지표
2. 그물망의 폭에 대한 볼린져 밴드 지표
3. 그물망의 폭에 대한 rsi 지표
4. 그물망의 폭에 대한 절대치 값 즉 폭 위아래 길이를 재서 그 수치를 절대값으로 나타낼 수 있는 지표가 있었으면 좋겠습니다.
감사합니다
답변 1
예스스탁 예스스탁 답변
2015-02-17 14:37:02
안녕하세요
예스스탁입니다.
1.
Input : Period(5);
Input : sto1(10),sto2(5),sto3(5);
var : HH(0),LL(0),cnt(0),RR(0);
Var : Value_Lowest(0), Value_Highest(0),fk(0),sk(0),sd(0);
Array : mav[100](0);
mav[1] = ma(c,Period*1);
mav[2] = ma(c,Period*2);
mav[3] = ma(c,Period*3);
mav[4] = ma(c,Period*4);
mav[5] = ma(c,Period*5);
mav[6] = ma(c,Period*6);
mav[7] = ma(c,Period*7);
mav[8] = ma(c,Period*8);
mav[9] = ma(c,Period*9);
mav[10] = ma(c,Period*10);
mav[11] = ma(c,Period*11);
mav[12] = ma(c,Period*12);
mav[13] = ma(c,Period*13);
mav[14] = ma(c,Period*14);
mav[15] = ma(c,Period*15);
mav[16] = ma(c,Period*16);
mav[17] = ma(c,Period*17);
mav[18] = ma(c,Period*18);
mav[19] = ma(c,Period*19);
mav[20] = ma(c,Period*20);
mav[21] = ma(c,Period*21);
mav[22] = ma(c,Period*22);
mav[23] = ma(c,Period*23);
mav[24] = ma(c,Period*24);
mav[25] = ma(c,Period*25);
mav[26] = ma(c,Period*26);
mav[27] = ma(c,Period*27);
mav[28] = ma(c,Period*28);
mav[29] = ma(c,Period*29);
mav[30] = ma(c,Period*30);
mav[31] = ma(c,Period*31);
mav[32] = ma(c,Period*32);
mav[33] = ma(c,Period*33);
mav[34] = ma(c,Period*34);
mav[35] = ma(c,Period*35);
mav[36] = ma(c,Period*36);
mav[37] = ma(c,Period*37);
mav[38] = ma(c,Period*38);
mav[39] = ma(c,Period*39);
mav[40] = ma(c,Period*40);
mav[41] = ma(c,Period*41);
mav[42] = ma(c,Period*42);
mav[43] = ma(c,Period*43);
mav[44] = ma(c,Period*44);
mav[45] = ma(c,Period*45);
mav[46] = ma(c,Period*46);
mav[47] = ma(c,Period*47);
mav[48] = ma(c,Period*48);
mav[49] = ma(c,Period*49);
mav[50] = ma(c,Period*10);
if mav[50] > 0 then{
HH = mav[1];
LL = mav[1];
for cnt = 1 to 50
{
if mav[cnt] > HH Then
HH = mav[cnt];
if mav[cnt] < LL Then
LL = mav[cnt];
}
RR = HH-LL;
Value_Lowest = Lowest(RR, sto1);
Value_Highest = Highest(RR, sto2);
FK = (RR - Value_Lowest) / (Value_Highest - Value_Lowest) * 100;
SK = ema(FK,sto2);
sD = ema(SK,sto3);
plot1(sk);
plot1(sd);
PlotBaseLine1(20);
PlotBaseLine2(80);
}
2.
Input : Period(5);
Input : bbp(20),dv(2);
var : HH(0),LL(0),cnt(0),RR(0);
Var : mid(0),bbup(0),bbdn(0);
Array : mav[100](0);
mav[1] = ma(c,Period*1);
mav[2] = ma(c,Period*2);
mav[3] = ma(c,Period*3);
mav[4] = ma(c,Period*4);
mav[5] = ma(c,Period*5);
mav[6] = ma(c,Period*6);
mav[7] = ma(c,Period*7);
mav[8] = ma(c,Period*8);
mav[9] = ma(c,Period*9);
mav[10] = ma(c,Period*10);
mav[11] = ma(c,Period*11);
mav[12] = ma(c,Period*12);
mav[13] = ma(c,Period*13);
mav[14] = ma(c,Period*14);
mav[15] = ma(c,Period*15);
mav[16] = ma(c,Period*16);
mav[17] = ma(c,Period*17);
mav[18] = ma(c,Period*18);
mav[19] = ma(c,Period*19);
mav[20] = ma(c,Period*20);
mav[21] = ma(c,Period*21);
mav[22] = ma(c,Period*22);
mav[23] = ma(c,Period*23);
mav[24] = ma(c,Period*24);
mav[25] = ma(c,Period*25);
mav[26] = ma(c,Period*26);
mav[27] = ma(c,Period*27);
mav[28] = ma(c,Period*28);
mav[29] = ma(c,Period*29);
mav[30] = ma(c,Period*30);
mav[31] = ma(c,Period*31);
mav[32] = ma(c,Period*32);
mav[33] = ma(c,Period*33);
mav[34] = ma(c,Period*34);
mav[35] = ma(c,Period*35);
mav[36] = ma(c,Period*36);
mav[37] = ma(c,Period*37);
mav[38] = ma(c,Period*38);
mav[39] = ma(c,Period*39);
mav[40] = ma(c,Period*40);
mav[41] = ma(c,Period*41);
mav[42] = ma(c,Period*42);
mav[43] = ma(c,Period*43);
mav[44] = ma(c,Period*44);
mav[45] = ma(c,Period*45);
mav[46] = ma(c,Period*46);
mav[47] = ma(c,Period*47);
mav[48] = ma(c,Period*48);
mav[49] = ma(c,Period*49);
mav[50] = ma(c,Period*10);
if mav[50] > 0 then{
HH = mav[1];
LL = mav[1];
for cnt = 1 to 50
{
if mav[cnt] > HH Then
HH = mav[cnt];
if mav[cnt] < LL Then
LL = mav[cnt];
}
RR = HH-LL;
mid = ma(c,BBP);
BBup = mid+std(RR,BBP)*dv;
BBdn = mid-std(RR,BBP)*dv;
plot1(mid);
plot2(BBup);
plot3(BBdn);
}
3.
Input : Period(5);
Inputs: Length(14),sig(10);
var : HH(0),LL(0),cnt(0),RR(0);
Var : mid(0),bbup(0),bbdn(0);
Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),rSIV(0),RSIS(0);
Array : mav[100](0);
mav[1] = ma(c,Period*1);
mav[2] = ma(c,Period*2);
mav[3] = ma(c,Period*3);
mav[4] = ma(c,Period*4);
mav[5] = ma(c,Period*5);
mav[6] = ma(c,Period*6);
mav[7] = ma(c,Period*7);
mav[8] = ma(c,Period*8);
mav[9] = ma(c,Period*9);
mav[10] = ma(c,Period*10);
mav[11] = ma(c,Period*11);
mav[12] = ma(c,Period*12);
mav[13] = ma(c,Period*13);
mav[14] = ma(c,Period*14);
mav[15] = ma(c,Period*15);
mav[16] = ma(c,Period*16);
mav[17] = ma(c,Period*17);
mav[18] = ma(c,Period*18);
mav[19] = ma(c,Period*19);
mav[20] = ma(c,Period*20);
mav[21] = ma(c,Period*21);
mav[22] = ma(c,Period*22);
mav[23] = ma(c,Period*23);
mav[24] = ma(c,Period*24);
mav[25] = ma(c,Period*25);
mav[26] = ma(c,Period*26);
mav[27] = ma(c,Period*27);
mav[28] = ma(c,Period*28);
mav[29] = ma(c,Period*29);
mav[30] = ma(c,Period*30);
mav[31] = ma(c,Period*31);
mav[32] = ma(c,Period*32);
mav[33] = ma(c,Period*33);
mav[34] = ma(c,Period*34);
mav[35] = ma(c,Period*35);
mav[36] = ma(c,Period*36);
mav[37] = ma(c,Period*37);
mav[38] = ma(c,Period*38);
mav[39] = ma(c,Period*39);
mav[40] = ma(c,Period*40);
mav[41] = ma(c,Period*41);
mav[42] = ma(c,Period*42);
mav[43] = ma(c,Period*43);
mav[44] = ma(c,Period*44);
mav[45] = ma(c,Period*45);
mav[46] = ma(c,Period*46);
mav[47] = ma(c,Period*47);
mav[48] = ma(c,Period*48);
mav[49] = ma(c,Period*49);
mav[50] = ma(c,Period*10);
if mav[50] > 0 then{
HH = mav[1];
LL = mav[1];
for cnt = 1 to 50
{
if mav[cnt] > HH Then
HH = mav[cnt];
if mav[cnt] < LL Then
LL = mav[cnt];
}
RR = HH-LL;
If CurrentBar == 1 AND Length > 0 Then Begin
UpSum = 0;
DownSum = 0;
For Counter = 0 To Length - 1 Begin
UpAmt = RR[Counter] - RR[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 = RR[0] - RR[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;
RSIS = ma(RSIV,sig);
plot1(RSIV);
plot2(RSIS);
}
4.폭
Input : Period(5);
Inputs: Length(14),sig(10);
var : HH(0),LL(0),cnt(0),RR(0);
Var : mid(0),bbup(0),bbdn(0);
Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),rSIV(0),RSIS(0);
Array : mav[100](0);
mav[1] = ma(c,Period*1);
mav[2] = ma(c,Period*2);
mav[3] = ma(c,Period*3);
mav[4] = ma(c,Period*4);
mav[5] = ma(c,Period*5);
mav[6] = ma(c,Period*6);
mav[7] = ma(c,Period*7);
mav[8] = ma(c,Period*8);
mav[9] = ma(c,Period*9);
mav[10] = ma(c,Period*10);
mav[11] = ma(c,Period*11);
mav[12] = ma(c,Period*12);
mav[13] = ma(c,Period*13);
mav[14] = ma(c,Period*14);
mav[15] = ma(c,Period*15);
mav[16] = ma(c,Period*16);
mav[17] = ma(c,Period*17);
mav[18] = ma(c,Period*18);
mav[19] = ma(c,Period*19);
mav[20] = ma(c,Period*20);
mav[21] = ma(c,Period*21);
mav[22] = ma(c,Period*22);
mav[23] = ma(c,Period*23);
mav[24] = ma(c,Period*24);
mav[25] = ma(c,Period*25);
mav[26] = ma(c,Period*26);
mav[27] = ma(c,Period*27);
mav[28] = ma(c,Period*28);
mav[29] = ma(c,Period*29);
mav[30] = ma(c,Period*30);
mav[31] = ma(c,Period*31);
mav[32] = ma(c,Period*32);
mav[33] = ma(c,Period*33);
mav[34] = ma(c,Period*34);
mav[35] = ma(c,Period*35);
mav[36] = ma(c,Period*36);
mav[37] = ma(c,Period*37);
mav[38] = ma(c,Period*38);
mav[39] = ma(c,Period*39);
mav[40] = ma(c,Period*40);
mav[41] = ma(c,Period*41);
mav[42] = ma(c,Period*42);
mav[43] = ma(c,Period*43);
mav[44] = ma(c,Period*44);
mav[45] = ma(c,Period*45);
mav[46] = ma(c,Period*46);
mav[47] = ma(c,Period*47);
mav[48] = ma(c,Period*48);
mav[49] = ma(c,Period*49);
mav[50] = ma(c,Period*10);
if mav[50] > 0 then{
HH = mav[1];
LL = mav[1];
for cnt = 1 to 50
{
if mav[cnt] > HH Then
HH = mav[cnt];
if mav[cnt] < LL Then
LL = mav[cnt];
}
RR = HH-LL;
plot1(RR);
}
즐거운 하루되세요
> alsk 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 그물망 지표를 토대로 재가공 하고 싶습니다.
그물망지표를 보면 그 폭이 수렴 했다가 펼쳐지고 다시 재수렴 하는 과정을 거칩니다.
그물망의 폭에 대해 분석하는 지표를 만들고 싶습니다.
1. 그물망의 폭에 대한 스토캐스틱 지표
2. 그물망의 폭에 대한 볼린져 밴드 지표
3. 그물망의 폭에 대한 rsi 지표
4. 그물망의 폭에 대한 절대치 값 즉 폭 위아래 길이를 재서 그 수치를 절대값으로 나타낼 수 있는 지표가 있었으면 좋겠습니다.
감사합니다