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

커뮤니티

수식부탁합니다

프로필 이미지
스캘퍼
2019-01-28 21:35:43
234
글번호 125680
답변완료
어느 회원님 수식입니다. 피보나치인데 고가,중심,저가만 두고 다 지워버렸습니다. 지표도 지워버렸구요. 중심에만 지표값을 추가해주시면 감사하겠습니다. Input:ShortPeriod(5),LongPeriod(20),선두께(0); Var:j(0),ma1(0),ma2(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0),ZZ[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0); r[0] = 0; r[3] = 0.50; r[6] = 1; For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } ma1 = Ema(C,ShortPeriod); ma2 = Ema(C,LongPeriod); If ma1 < ma2 Then { If ma1[1] >= ma2[1] Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; ZZ[j+1] = ZZ[j]; } LoVal[0] = L; LoBar[0] = 0; ZZ[0] = L; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); TL_SetColor(TL2[j],MAGENTA); } } Else If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; ZZ[0] = L; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { TL_SetEnd(TL2[j],date22,time22,fr[j]); } } } Else If ma1 > ma2 Then { If ma1[1] <= ma2[1] Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; ZZ[j+1] = ZZ[j]; } HiVal[0] = H; HiBar[0] = 0; ZZ[0] = H; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); TL3[j] = TL_New(date31,time31,fr[j],date32,time32,fr[j]); TL_SetColor(TL3[j],BLACK); } } Else If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; ZZ[0] = H; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { TL_SetEnd(TL3[j],date32,time32,fr[j]); } } } TL_SetSize(TL1,1); TL_SetSize(TL2[3],선두께); TL_SetSize(TL3[3],선두께);
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2019-01-29 11:42:11

안녕하세요 예스스탁입니다. 중심선만 값 표시되게 추가해 드립니다. Input:ShortPeriod(5),LongPeriod(20),선두께(0); Var:j(0),ma1(0),ma2(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0),ZZ[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0); r[0] = 0; r[3] = 0.50; r[6] = 1; For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } ma1 = Ema(C,ShortPeriod); ma2 = Ema(C,LongPeriod); If ma1 < ma2 Then { If ma1[1] >= ma2[1] Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; ZZ[j+1] = ZZ[j]; } LoVal[0] = L; LoBar[0] = 0; ZZ[0] = L; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); TL_SetColor(TL2[j],MAGENTA); } tx = Text_New(sdate,stime,fr[3],NumToStr(fr[3],2)); Text_SetColor(tx,MAGENTA); } Else If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; ZZ[0] = L; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { TL_SetEnd(TL2[j],date22,time22,fr[j]); } Text_SetLocation(tx,sdate,stime,fr[3]); } } Else If ma1 > ma2 Then { If ma1[1] <= ma2[1] Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; ZZ[j+1] = ZZ[j]; } HiVal[0] = H; HiBar[0] = 0; ZZ[0] = H; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); TL3[j] = TL_New(date31,time31,fr[j],date32,time32,fr[j]); TL_SetColor(TL3[j],BLACK); } tx = Text_New(sdate,stime,fr[3],NumToStr(fr[3],2)); Text_SetColor(tx,BLACK); } Else If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; ZZ[0] = H; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { TL_SetEnd(TL3[j],date32,time32,fr[j]); } Text_SetLocation(tx,sdate,stime,fr[3]); } } TL_SetSize(TL1,1); TL_SetSize(TL2[3],선두께); TL_SetSize(TL3[3],선두께); 즐거운 하루되세요 > 스캘퍼 님이 쓴 글입니다. > 제목 : 수식부탁합니다 > 어느 회원님 수식입니다. 피보나치인데 고가,중심,저가만 두고 다 지워버렸습니다. 지표도 지워버렸구요. 중심에만 지표값을 추가해주시면 감사하겠습니다. Input:ShortPeriod(5),LongPeriod(20),선두께(0); Var:j(0),ma1(0),ma2(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0),ZZ[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0); r[0] = 0; r[3] = 0.50; r[6] = 1; For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } ma1 = Ema(C,ShortPeriod); ma2 = Ema(C,LongPeriod); If ma1 < ma2 Then { If ma1[1] >= ma2[1] Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; ZZ[j+1] = ZZ[j]; } LoVal[0] = L; LoBar[0] = 0; ZZ[0] = L; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); TL_SetColor(TL2[j],MAGENTA); } } Else If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; ZZ[0] = L; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { TL_SetEnd(TL2[j],date22,time22,fr[j]); } } } Else If ma1 > ma2 Then { If ma1[1] <= ma2[1] Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; ZZ[j+1] = ZZ[j]; } HiVal[0] = H; HiBar[0] = 0; ZZ[0] = H; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); TL3[j] = TL_New(date31,time31,fr[j],date32,time32,fr[j]); TL_SetColor(TL3[j],BLACK); } } Else If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; ZZ[0] = H; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { TL_SetEnd(TL3[j],date32,time32,fr[j]); } } } TL_SetSize(TL1,1); TL_SetSize(TL2[3],선두께); TL_SetSize(TL3[3],선두께);
등록