커뮤니티

26577관련 문의입니다.

프로필 이미지
2012-10-08 15:14:46
256
글번호 55401
답변완료
상승시 박스 모양으로 붉게 하락시 박스가 파랗게 표시할수있게 부탁드립니다. 감사합니다.
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2012-10-08 16:18:31

안녕하세요 예스스탁입니다. Variables: FUBarHigh(0), FUBarLow(0), SUBarHigh(0), SUBarLow(0), TUBarHigh(0), TUBarLow(0), FLBarHigh(0), FLBarLow(0), SLBarHigh(0), SLBarLow(0), TLBarHigh(0), TLBarLow(0), UpCount(0), DownCount(0), UpNew(0), DnNew(0), UpRev(0), DnRev(0), PlotHigh(0), PlotLow(0), Color(0); If Close > UpNew Then { If DownCount < 3 Then { If UpCount == 0 Then { UpCount = UpCount + 1; DownCount = 0; FUBarHigh = Close; FUBarLow = UpNew; SUBarHigh = 0; SUBarLow = 0; TUBarHigh = 0; TUBarLow = 0; FLBarHigh = 0; FLBarLow = 0; SLBarHigh = 0; SLBarLow = 0; TLBarHigh = 0; TLBarLow = 0; UpNew = FUBarHigh; DnNew = FUBarLow; PlotHigh = FUBarHigh; PlotLow = FUBarLow; Color = 7; } If UpCount == 1 Then If Close > UpNew Then { UpCount = UpCount + 1; SUBarHigh = Close; SUBarLow = FUBarHigh; UpNew = SUBarHigh; DnNew = SUBarLow; PlotHigh = SUBarHigh; PlotLow = SUBarLow; Color = 8; } If UpCount == 2 Then If Close > UpNew Then { UpCount = UpCount + 1; TUBarHigh = Close; TUBarLow = SUBarHigh; UpNew = TUBarHigh; DnNew = TUBarLow; PlotHigh = TUBarHigh; PlotLow = TUBarLow; Color = 7; } If UpCount == 3 Then If Close > UpNew Then { FUBarHigh = SUBarHigh; FUBarLow = SUBarLow; SUBarHigh = TUBarHigh; SUBarLow = TUBarLow; TUBarHigh = Close; TUBarLow = SUBarHigh; UpNew = TUBarHigh; DnNew = TUBarLow; PlotHigh = TUBarHigh; PlotLow = TUBarLow; If Color == 7 Then Color = 8; Else Color = 7; } } If DownCount == 3 Then { UpRev = FLBarHigh; If Close > UpRev Then { UpCount = UpCount + 1; DownCount = 0; FUBarHigh = Close; FUBarLow = TLBarHigh; SUBarHigh = 0; SUBarLow = 0; TUBarHigh = 0; TUBarLow = 0; FLBarHigh = 0; FLBarLow = 0; SLBarHigh = 0; SLBarLow = 0; TLBarHigh = 0; TLBarLow = 0; UpNew = FUBarHigh; DnNew = FUBarLow; PlotHigh = FUBarHigh; PlotLow = FUBarLow; Color = 7; } } } If Close < DnNew Then { If UpCount < 3 Then { If DownCount == 0 Then { DownCount = DownCount + 1; UpCount = 0; FLBarHigh = DnNew; FLBarLow = Close; SLBarHigh = 0; SLBarLow = 0; TLBarHigh = 0; TLBarLow = 0; FUBarHigh = 0; FUBarLow = 0; SUBarHigh = 0; SUBarLow = 0; TUBarHigh = 0; TUBarLow = 0; UpNew = FLBarHigh; DnNew = FLBarLow; PlotHigh = FLBarHigh; PlotLow = FLBarLow; Color = 6; } If DownCount == 1 Then If Close < DnNew Then { DownCount = DownCount + 1; SLBarHigh = FLBarLow; SLBarLow = Close; UpNew = SLBarHigh; DnNew = SLBarLow; PlotHigh = SLBarHigh; PlotLow = SLbarLow; Color = 5; } If DownCount == 2 Then If Close < DnNew Then { DownCount = DownCount + 1; TLBarHigh = SLBarLow; TLBarLow = Close; UpNew = TLBarHigh; DnNew = TLBarLow; PlotHigh = TLBarHigh; PlotLow = TLBarLow; Color = 6; } If DownCount == 3 Then If Close < DnNew Then { FLBarHigh = SLBarHigh; FLBarLow = SLBarLow; SLBarHigh = TLBarHigh; SLBarLow = TLBarLow; TLBarHigh = SLBarLow; TLBarLow = Close; UpNew = TLBarHigh; DnNew = TLBarLow; PlotHigh = TLBarHigh; PlotLow = TLBarLow; If Color == 6 Then Color = 5; Else Color = 6; } } If UpCount == 3 Then { DnRev = FUBarLow; If Close < DnRev Then { DownCount = DownCount + 1; UpCount = 0; FLBarHigh = TUBarLow; FLBarLow = Close; SLBarHigh = 0; SLBarLow = 0; TLBarHigh = 0; TLBarLow = 0; FUBarHigh = 0; FUBarLow = 0; SUBarHigh = 0; SUBarLow = 0; TUBarHigh = 0; TUBarLow = 0; UpNew = FLBarHigh; DnNew = FLBarLow; PlotHigh = FLBarHigh; PlotLow = FLBarLow; Color = 6; } } } if PlotHigh > PlotHigh[1] Then var1 = 1; if PlotHigh < PlotHigh[1] Then var1 = -1; if var1 == 1 Then{ Plot1(PlotHigh,"High Bar",RED); Plot2(PlotLow,"Low Bar",RED); } Else{ Plot1(PlotHigh,"High Bar",BLUE); Plot2(PlotLow,"Low Bar",BLUE); } 즐거운 하루되세요 > 괌 님이 쓴 글입니다. > 제목 : 26577관련 문의입니다. > 상승시 박스 모양으로 붉게 하락시 박스가 파랗게 표시할수있게 부탁드립니다. 감사합니다.