안녕하세요 예스스탁입니다. Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; Condition5 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } if Condition5 == False and var1 >= B+2 Then { Condition5 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } if Condition6 == False and var1 <= B-2 Then { Condition6 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 즐거운 하루되세요 > 고성 님이 쓴 글입니다. > 제목 : 파라볼릭 크기 > Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 상승, 하락 파라볼릭의 크기가 2p 되면 세로선 추가. 감사합니다.

> 예스스탁 님이 쓴 글입니다. > 제목 : Re : 파라볼릭 크기 > 안녕하세요 예스스탁입니다. Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; Condition5 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } if Condition5 == False and var1 >= B+2 Then { Condition5 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } if Condition6 == False and var1 <= B-2 Then { Condition6 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 즐거운 하루되세요 > 고성 님이 쓴 글입니다. > 제목 : 파라볼릭 크기 > Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 상승, 하락 파라볼릭의 크기가 2p 되면 세로선 추가. 감사합니다. 선물 500틱에서 세로선 표시가 안됩니다. 2p 되는 지점에만 세로선, 확인 부탁드립니다.

안녕하세요 예스스탁입니다. 하락쪽 초기화가 빠져있어 추가했습니다. Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; Condition5 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; Condition6 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } if Condition5 == False and var1 >= B+2 Then { Condition5 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } if Condition6 == False and var1 <= B-2 Then { Condition6 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 즐거운 하루되세요 > 고성 님이 쓴 글입니다. > 제목 : Re : Re : 파라볼릭 크기 > > 예스스탁 님이 쓴 글입니다. > 제목 : Re : 파라볼릭 크기 > 안녕하세요 예스스탁입니다. Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; Condition5 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } if Condition5 == False and var1 >= B+2 Then { Condition5 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } if Condition6 == False and var1 <= B-2 Then { Condition6 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 즐거운 하루되세요 > 고성 님이 쓴 글입니다. > 제목 : 파라볼릭 크기 > Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 상승, 하락 파라볼릭의 크기가 2p 되면 세로선 추가. 감사합니다. 선물 500틱에서 세로선 표시가 안됩니다. 2p 되는 지점에만 세로선, 확인 부탁드립니다.

> 예스스탁 님이 쓴 글입니다. > 제목 : Re : Re : Re : 파라볼릭 크기 > 안녕하세요 예스스탁입니다. 하락쪽 초기화가 빠져있어 추가했습니다. Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; Condition5 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; Condition6 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } if Condition5 == False and var1 >= B+2 Then { Condition5 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } if Condition6 == False and var1 <= B-2 Then { Condition6 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 즐거운 하루되세요 > 고성 님이 쓴 글입니다. > 제목 : Re : Re : 파라볼릭 크기 > > 예스스탁 님이 쓴 글입니다. > 제목 : Re : 파라볼릭 크기 > 안녕하세요 예스스탁입니다. Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; Condition5 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } if Condition5 == False and var1 >= B+2 Then { Condition5 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } if Condition6 == False and var1 <= B-2 Then { Condition6 = true; TL_New(sDate,sTime,0,sDate,sTime,999999999); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 즐거운 하루되세요 > 고성 님이 쓴 글입니다. > 제목 : 파라볼릭 크기 > Input : af(0.02), maxAF(0.2); var : T(0),B(0),S(0),tx(0),txx(0),TL(0),box(0); var : HH(0),LL(0),B1(0),B2(0),B3(0),B4(0),S1(0),S2(0),S3(0),S4(0),H1(0),H2(0),H3(0),H4(0),L1(0),L2(0),L3(0),L4(0); var1 = CSar(af,maxAF); if CrossUp(C,var1) Then { T = 1; B = var1; B1 = B[1]; B2 = B1[1]; B3 = B2[1]; B4 = B3[1]; HH = H; H1 = HH[1]; H2 = H1[1]; H3 = H2[1]; H4 = H3[1]; if abs(S-LL) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2)); Text_SetColor(tx,Red); Text_SetSize(tx,25); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); box = Box_New(sDate,sTime,B,NextBarSdate,NextBarStime,HH); Condition1 = False; Condition3 = False; } if CrossDown(C,var1) Then { T = -1; S = var1; S1 = S[1]; S2 = S1[1]; S3 = S2[1]; S4 = S3[1]; LL = L; L1 = LL[1]; L2 = L1[1]; L3 = L2[1]; L4 = L3[1]; if abs(B-HH) < 0.7 Then Text_Delete(tx); tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2)); Text_SetColor(tx,Blue); Text_SetSize(tx,25); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); box = Box_New(sDate,sTime,S,NextBarSdate,NextBarStime,LL); Condition2 = False; Condition4 = False; } Else { if T == 1 Then { if H > HH Then HH = H; Text_SetString(tx,NumToStr(abs(HH-B),2)); Text_SetLocation(tx,sDate,sTime,HH); Box_SetEnd(box,NextBarSdate,NextBarStime,hh); if HH < B+0.4 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,90); } Else if HH >= B+0.4 and HH < B+0.5 Then { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } Else if HH >= B+0.5 and HH < B+0.65 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else if HH >= B+0.65 and HH < B+0.8 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,120); } Else if HH >= B+0.8 and HH < B+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } Else if HH >= B+1.2 and HH < B+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } Else { Box_SetColor(box,Pink); Box_SetFill(box,true,90); } if B1 > 0 and B3 > B4 and H > H1 and H1 > H2 and H2 > H3 and H3 > H4 and Condition3 == False Then { Condition3 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Green); Text_SetSize(txx,40); } if B1 > 0 and B >= B1 and H > H1 and B1 > B2 and H1 > H2 and Condition1 == False Then { Condition1 = true; Buy(); txx = Text_New(sdate,sTime,H-0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Blue); Text_SetSize(txx,35); } } if T == -1 Then { if L < LL Then LL = L; Text_SetString(tx,NumToStr(abs(LL-S),2)); Text_SetLocation(tx,sDate,sTime,LL); Box_SetEnd(box,NextBarSdate,NextBarStime,LL); if LL > S-0.4 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,120); } Else if LL <= S-0.4 and ll > S-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,150); } Else if LL <= S-0.5 and ll > S-0.65 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } Else if LL <= S-0.65 and ll > S-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } Else if LL <= S-0.8 and ll > S-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,100); } Else if LL <= S-1.2 and ll > S-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,100); } Else if LL <= S-1.6 and ll > S-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Yellow); Box_SetFill(box,true,100); } if S1 > 0 and S3 < S4 and L < L1 and L1 < L2 and L2 < L3 and L3 < L4 and Condition4 == False Then { Condition4 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"■"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Black); Text_SetSize(txx,40); } if S1 > 0 and S <= S1 and L < L1 and S1 < S2 and L1 < L2 and Condition2 == False Then { Condition2 = true; Buy(); txx = Text_New(sdate,sTime,L+0.7,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Red); Text_SetSize(txx,35); } } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); 상승, 하락 파라볼릭의 크기가 2p 되면 세로선 추가. 감사합니다. 선물 500틱에서 세로선 표시가 안됩니다. 2p 되는 지점에만 세로선, 확인 부탁드립니다. 노란색 박스에서 세로선이 나와야 되는데 안나옵니다.