안녕하세요 예스스탁입니다. Inputs : Period(20), Sence(1.5); Inputs : Period2(20), Sence2(1.5); input : BBP(20),dv(2); Var : VLineUp(0),VLineDn(0),HHighest(0),LLowest(0),JustChanged(FALSE),VLine(0), DBN(0); var : v1(0),v2(0),v3(0),v5(0),v6(0),T(0); Array: Highs[35](0),Lows[35](0),RRange[35](0),UpWave[1](FALSE),DnWave[1](FALSE); Var : VLineUp2(0),VLineDn2(0),HHighest2(0),LLowest2(0),JustChanged2(FALSE),VLine2(0), DBN2(0); var : v12(0),v22(0),v32(0),v52(0),v62(0),T2(0); Array: Highs2[35](0),Lows2[35](0),RRange2[35](0),UpWave2[1](FALSE),DnWave2[1](FALSE); var : BBup(0),BBmd(0),BBdn(0); If data1(STime == 180000) Then DBN = 0; DBN = DBN + 1; v1 = Period; v2 = v1 - 1; v3 = v1 - 2; v5 = Sence; v6 = data1(H-L); JustChanged = FALSE; if Data1(Index) <= v2 then { Highs[Data1(Index)] = data1(c); Lows[Data1(Index)] = data1(c); RRange[Data1(Index)] = Data1((H-L) /2); } if Data1(Index) == v1 then { if Highs[v2] >= Highs[v3] then { UpWave[1] = TRUE; HHighest = Highs[v2]; VLineUp = HHighest - (v5 * data1(MA(v6,v2))); } if Highs[v2] < Highs[v3] then { DnWave[1] = TRUE; LLowest = Lows[v2]; VLineDn = LLowest + (v5 * data1(MA(v6,v2))); } } if Data1(Index) > v1 then { if DnWave[1] and data1(c) > VLineDn then { DnWave[1] = FALSE; UpWave[1] = TRUE; JustChanged = TRUE; HHighest = data1(c); LLowest = 0; } if UpWave[1] and data1(c) < VLineUp and JustChanged == FALSE then { UpWave[1] = FALSE; DnWave[1] = TRUE; JustChanged = TRUE; LLowest = data1(c); HHighest = 0; } if JustChanged == FALSE then { if data1(c) > HHighest then HHighest = data1(c); else if data1(c) < LLowest then LLowest = data1(c); } VLineUp = HHighest - (v5 * data1(MA(v6,v2))); VLineDn = LLowest + (v5 * data1(MA(v6,v2))); if UpWave[1] then T =1; else if DnWave[1] then T = -1; } If data2(STime == 180000) Then DBN2 = 0; DBN2 = DBN2 + 1; v12 = Period2; v22 = v12 - 1; v32 = v12 - 2; v52 = Sence2; v62 = data2(H-L); JustChanged2 = FALSE; if Data2(Index) <= v22 then { Highs2[Data2(Index)] = data2(c); Lows2[Data2(Index)] = data2(c); RRange2[Data2(Index)] = Data2((H-L) /2); } if Data2(Index) == v12 then { if Highs2[v22] >= Highs2[v32] then { UpWave2[1] = TRUE; HHighest2 = Highs2[v2]; VLineUp2 = HHighest2 - (v52 * data2(MA(v62,v22))); } if Highs2[v22] < Highs2[v32] then { DnWave2[1] = TRUE; LLowest2 = Lows2[v2]; VLineDn2 = LLowest2 + (v52 * data2(MA(v62,v22))); } } if Data2(Index) > v1 then { if DnWave2[1] and data2(c) > VLineDn2 then { DnWave2[1] = FALSE; UpWave2[1] = TRUE; JustChanged2 = TRUE; HHighest2 = data2(c); LLowest2 = 0; } if UpWave2[1] and data2(c) < VLineUp2 and JustChanged2 == FALSE then { UpWave2[1] = FALSE; DnWave2[1] = TRUE; JustChanged2 = TRUE; LLowest2 = data2(c); HHighest2 = 0; } if JustChanged2 == FALSE then { if data2(c) > HHighest2 then HHighest2 = data2(c); else if data2(c) < LLowest2 then LLowest2 = data2(c); } VLineUp2 = HHighest2 - (v52 * data2(MA(v62,v22))); VLineDn2 = LLowest2 + (v52 * data2(MA(v62,v22))); if UpWave2[1] then T2 =1; else if DnWave2[1] then T2 = -1; } bbup = data1(BollBandUp(Period,dv)); bbmd = data1(ma(C,Period)); bbdn = data1(BollBandDown(Period,dv)); if T == 1 and T[1] != 1 and t2 == 1 Then Buy(); if MarketPosition == 1 Then { if T == -1 Then ExitLong(); if CrossDown(C,bbmd) and C < O Then ExitLong(); } if T == -1 and T[1] != -1 and t2 == -1 Then sell(); 즐거운 하루되세요 > 아트정 님이 쓴 글입니다. > 제목 : 추가식 > Inputs : Period(20), Sence(1.2), CC_DN(Yellow); input : BBP(20),dv(2); 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); var :T(0); var : BBup(0),BBmd(0),BBdn(0); 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)); #Plot1(VLineUp,"VLineUp"); end; if Highs[Var2] < Highs[Var3] then begin DnWave[1] = TRUE; LLowest = Lows[Var2]; VLineDn = LLowest + (Var5 * MA(Var6,Var2)); #Plot2(VLineDn,"VLineDn"); 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 T =1;#Plot1(VLineUp,"VLineUp", Red); else if DnWave[1] then T = -1;#Plot1(VLineDn,"VLineUp", CC_DN); end; if T == 1 and T[1] != 1 Then Buy(); if MarketPosition == 1 Then { if T == -1 Then ExitLong(); if CrossDown(C,bbmd) and C < O Then ExitLong(); } if T == -1 and T[1] != -1 Then sell(); 안녕하세요 위식에 추가 부탁드려요. 현식에서 date 2 조건만 추가해 주세요. date 1 date 2 분봉30 . sw2선 일치시 양선에서 매수,음선에서 매도