안녕하세요 예스스탁입니다. Inputs : Period(20), Sence(1.5), CC_DN(Yellow); Vars: VLineUp(0), VLineDn(0), HHighest(0), LLowest(0), JustChanged(FALSE), VLine(0), DBN(0); Array: Highs[35](0), Lows[35](0), RRange[35](0), UpWave[1](FALSE), DnWave[1](FALSE); If STime == 180000 Then DBN = 0; DBN = DBN + 1; Var1 = Period; Var2 = Var1 - 1; Var3 = Var1 - 2; Var5 = Sence; Var6 = H-L; JustChanged = FALSE; if CurrentBar <= Var2 then begin Highs[CurrentBar] = Close; Lows[CurrentBar] = Close; RRange[CurrentBar] = (H-L) /2; end; if CurrentBar == Var1 then begin if Highs[Var2] >= Highs[Var3] then begin UpWave[1] = TRUE; HHighest = Highs[Var2]; VLineUp = HHighest - (Var5 * MA(Var6,Var2)); end; if Highs[Var2] < Highs[Var3] then begin DnWave[1] = TRUE; LLowest = Lows[Var2]; VLineDn = LLowest + (Var5 * MA(Var6,Var2)); end; end; if CurrentBar > Var1 then begin if DnWave[1] and Close > VLineDn then begin DnWave[1] = FALSE; UpWave[1] = TRUE; JustChanged = TRUE; HHighest = Close; LLowest = 0; end; if UpWave[1] and Close < VLineUp and JustChanged == FALSE then begin UpWave[1] = FALSE; DnWave[1] = TRUE; JustChanged = TRUE; LLowest = Close; HHighest = 0; end; if JustChanged == FALSE then begin if Close > HHighest then HHighest = Close; else if Close < LLowest then LLowest = Close; end; VLineUp = HHighest - (Var5 * MA(Var6,Var2)); VLineDn = LLowest + (Var5 * MA(Var6,Var2)); if UpWave[1] then value1 = VLineUp; if DnWave[1] then value1 = VLineDn; end; Inputs : DDD(20150309), LEN(300), HL_ED(60), CC(Black); Vars : DBN1(0), KK1(0), DD1(0), KK2(0), DD2(0); var : val2(0),v1(0),v2(0); If STime >= 080000 And STime[1] < 080000 Then Begin DBN1 = 0; KK1 = 0; DD1 = 0; KK2 = 0; DD2 = 0; End; DBN1 = DBN1 + 1; If STime >= 083000 And DD1 == 0 Then Begin Val2 = O; DD1 = 1; KK1 = DBN1; v1 = 0; v2 = 0; End; if DD1 == 1 Then{ if C > val2 and CrossUp(C,value1) Then{ buy(); } if C < val2 and CrossDown(c,value1) Then{ sell(); } } 즐거운 하루되세요 > 아트정 님이 쓴 글입니다. > 제목 : 수식수정 > 89909글임니다 Inputs : Period(20), Sence(1.5), CC_DN(Yellow); Vars: VLineUp(0), VLineDn(0), HHighest(0), LLowest(0), JustChanged(FALSE), VLine(0), DBN(0); Array: Highs[35](0), Lows[35](0), RRange[35](0), UpWave[1](FALSE), DnWave[1](FALSE); If STime == 180000 Then DBN = 0; DBN = DBN + 1; Var1 = Period; Var2 = Var1 - 1; Var3 = Var1 - 2; Var5 = Sence; Var6 = H-L; JustChanged = FALSE; if CurrentBar <= Var2 then begin Highs[CurrentBar] = Close; Lows[CurrentBar] = Close; RRange[CurrentBar] = (H-L) /2; end; if CurrentBar == Var1 then begin if Highs[Var2] >= Highs[Var3] then begin UpWave[1] = TRUE; HHighest = Highs[Var2]; VLineUp = HHighest - (Var5 * MA(Var6,Var2)); end; if Highs[Var2] < Highs[Var3] then begin DnWave[1] = TRUE; LLowest = Lows[Var2]; VLineDn = LLowest + (Var5 * MA(Var6,Var2)); end; end; if CurrentBar > Var1 then begin if DnWave[1] and Close > VLineDn then begin DnWave[1] = FALSE; UpWave[1] = TRUE; JustChanged = TRUE; HHighest = Close; LLowest = 0; end; if UpWave[1] and Close < VLineUp and JustChanged == FALSE then begin UpWave[1] = FALSE; DnWave[1] = TRUE; JustChanged = TRUE; LLowest = Close; HHighest = 0; end; if JustChanged == FALSE then begin if Close > HHighest then HHighest = Close; else if Close < LLowest then LLowest = Close; end; VLineUp = HHighest - (Var5 * MA(Var6,Var2)); VLineDn = LLowest + (Var5 * MA(Var6,Var2)); end; Inputs : DDD(20150309), LEN(300), HL_ED(60), CC(Black); Vars : DBN1(0), KK1(0), DD1(0), KK2(0), DD2(0); var : val2(0),v1(0),v2(0); If STime >= 080000 And STime[1] < 080000 Then Begin DBN1 = 0; KK1 = 0; DD1 = 0; KK2 = 0; DD2 = 0; End; DBN1 = DBN1 + 1; If STime >= 083000 And DD1 == 0 Then Begin Val2 = O; DD1 = 1; KK1 = DBN1; v1 = 0; v2 = 0; End; if DD1 == 1 Then{ if C > val2 and UpWave[1] Then{ buy(); } if C < val2 and DnWave[1] Then{ sell(); } } 89909 글입니다 첨부sw2 위식에서 수정부탁드림니다 매수 sw2선 발생후 sw2선을 터치나 하락후 재상승시 매도 매수반대