• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

한가지부탁드립니다..

프로필 이미지
야크
2011-05-31 10:58:22
653
글번호 39252
답변완료

첨부 이미지

그림1
그림1
늘 감사하게 생각하고 있습니다.. 골드 대드 색갈변하게 부탁드립니다... 첨부합니다.
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2011-05-31 15:03:54

안녕하세요 예스스탁입니다. 1. Tema기준 볼린져밴드 INPUTS: LENGTH(26),Dv(2); VAR: TEMA1(0),SumSqrt(0), Avgv(0), Counter(0),Stdv(0),upv(0),dnv(0); TEMA1 = (3 * Ema(c,LENGTH)) - (3 * Ema(Ema(c,LENGTH),LENGTH)) + (Ema(Ema(Ema(c,LENGTH),LENGTH),LENGTH)); If Length != 0 Then Begin Avgv = TEMA1; SumSqrt = 0; For Counter = 0 To Length - 1 Begin SumSqrt = SumSqrt + (c[Counter] - Avgv) * (c[Counter] - Avgv); End; Stdv = SquareRoot(SumSqrt / Length); End Else Stdv = 0; upv = TEMA1+Stdv*Dv; dnv = TEMA1-Stdv*Dv; if C > tema1 Then plot1(Tema1,"1",RED); Else plot1(Tema1,"1",blue); plot2(upv); plot3(dnv); 2. tema기준 envelope INPUTS: LENGTH(26),Percent(5); VAR: TEMA1(0),SumSqrt(0), Avgv(0), Counter(0),Stdv(0),upv(0),dnv(0); TEMA1 = (3 * Ema(c,LENGTH)) - (3 * Ema(Ema(c,LENGTH),LENGTH)) + (Ema(Ema(Ema(c,LENGTH),LENGTH),LENGTH)); upv = TEMA1+TEMA1 * (Percent / 100); dnv = TEMA1-TEMA1 * (Percent / 100); if C > tema1 Then plot1(Tema1,"1",RED); Else plot1(Tema1,"1",blue); plot2(upv); plot3(dnv); 즐거운 하루되세요 > 야크 님이 쓴 글입니다. > 제목 : 한가지부탁드립니다.. > 늘 감사하게 생각하고 있습니다.. 골드 대드 색갈변하게 부탁드립니다... 첨부합니다.
등록