안녕하세요 예스스탁입니다. input : af(0.1), maxAF(0.01); input : 텍스트출력(0),선굵기(5),상승세로선색(red),하락세로선색(blue),세로선굵기(1); var : T(0),cnt(0),count(0),vtl(0); var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),day1(0),day0(0),TL3(0); var : TL1(0),TL2(0),tx1(0),tx2(0),tx11(0),tx22(0),idx(0),tx99(0),tx88(0); Array : HD[20](0),HT[20](0),HH[20](0),LD[20](0),LT[20](0),LL[20](0); Array : HI[20](0),LI[20](0); var1 = CSar(af,maxAF); if bdate != bdate[1] Then { day0 = sdate; day1 = day0[1]; } if crossup(c,var1) Then { T = 1; HH[0] = H; HD[0] = sdate; HT[0] = stime; HI[0] = index; for cnt = 1 to 19 { HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; HH[cnt] = HH[cnt-1][1]; HI[cnt] = HI[cnt-1][1]; } if LL[0] > 0 Then { Condition1 = false; for cnt = 1 to 19 { if Condition1 == false and abs(LL[0]-LL[cnt]) >= PriceScale*1 and LD[cnt] <= day1 Then { Condition1 = true; TL1 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetSize(TL1,선굵기); TL_SetColor(TL1,Orange); idx = abs(LI[0]-LI[cnt]); //tx99 = Text_New(LD[0],LT[0],LL[0],NumToStr(idx,0)); Text_SetColor(tx99,Orange); Text_SetStyle(tx99,0,3); Text_SetBold(tx99,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); vtl = TL_New(sDate,sTime,0,sdate,sTime,999999999); TL_SetColor(vtl,상승세로선색); TL_SetSize(vtl,세로선굵기); } } } } if CrossDown(c,var1) Then { T = -1; LL[0] = L; LD[0] = sdate; LT[0] = stime; LI[0] = index; for cnt = 1 to 19 { LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; LI[cnt] = LI[cnt-1][1]; } if HH[0] > 0 Then { Condition2 = false; for cnt = 1 to 19 { if Condition2 == false and abs(HH[0]-HH[cnt]) >= PriceScale*1 and HD[cnt] <= day1 Then { Condition2 = true; TL2 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetSize(TL2,선굵기); TL_SetColor(TL2,green); idx = abs(HI[0]-HI[cnt]); //tx99 = Text_New(HD[0],HT[0],HH[0],NumToStr(idx,0)); Text_SetColor(tx99,green); Text_SetStyle(tx99,0,3); Text_SetBold(tx99,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); vtl = TL_New(sDate,sTime,0,sdate,sTime,999999999); TL_SetColor(vtl,하락세로선색); TL_SetSize(vtl,세로선굵기); } } } } if T == 1 then { if H > HH[0] Then { HH[0] = H; HD[0] = sdate; HT[0] = stime; if Condition3 == false and abs(HH[0]-HH[cnt]) >= PriceScale*1 and HD[cnt] <= day1 Then { Condition3 = true; TL3 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetSize(TL3,선굵기); TL_SetColor(TL3,Orange); idx = abs(HI[0]-HI[cnt]); //tx88 = Text_New(HD[0],HT[0],HH[0],NumToStr(idx,0)); Text_SetColor(tx88,Orange); Text_SetStyle(tx88,0,3); Text_SetBold(tx88,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); } } } if T == -1 then { if L < LL[0] Then { LL[0] = L; LD[0] = sdate; LT[0] = stime; if Condition3 == false and abs(LL[0]-LL[cnt]) >= PriceScale*1 and LD[cnt] <= day1 Then { Condition3 = true; TL3 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetSize(TL3,선굵기); TL_SetColor(TL3,green); idx = abs(LI[0]-LI[cnt]); //tx88 = Text_New(LD[0],LT[0],LL[0],NumToStr(idx,0)); Text_SetColor(tx88,green); Text_SetStyle(tx88,0,3); Text_SetBold(tx88,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); } } } 즐거운 하루되세요 > 유로파54 님이 쓴 글입니다. > 제목 : 문의 드립니다! > 안녕하세요! 아래수식에서 선의 발생시점에서 세로선도 동시에 발생토록 수정 부탁드립니다 * 선의 두께와 색상은 사용자지정이 가능토록 부탁합니다 감사합니다 input : af(0.1), maxAF(0.01); input : 텍스트출력(0),선굵기(5); var : T(0),cnt(0),count(0); var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),day1(0),day0(0),TL3(0); var : TL1(0),TL2(0),tx1(0),tx2(0),tx11(0),tx22(0),idx(0),tx99(0),tx88(0); Array : HD[20](0),HT[20](0),HH[20](0),LD[20](0),LT[20](0),LL[20](0); Array : HI[20](0),LI[20](0); var1 = CSar(af,maxAF); if bdate != bdate[1] Then { day0 = sdate; day1 = day0[1]; } if crossup(c,var1) Then { T = 1; HH[0] = H; HD[0] = sdate; HT[0] = stime; HI[0] = index; for cnt = 1 to 19 { HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; HH[cnt] = HH[cnt-1][1]; HI[cnt] = HI[cnt-1][1]; } if LL[0] > 0 Then { Condition1 = false; for cnt = 1 to 19 { if Condition1 == false and abs(LL[0]-LL[cnt]) >= PriceScale*1 and LD[cnt] <= day1 Then { Condition1 = true; TL1 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetSize(TL1,선굵기); TL_SetColor(TL1,Orange); idx = abs(LI[0]-LI[cnt]); //tx99 = Text_New(LD[0],LT[0],LL[0],NumToStr(idx,0)); Text_SetColor(tx99,Orange); Text_SetStyle(tx99,0,3); Text_SetBold(tx99,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); } } } } if CrossDown(c,var1) Then { T = -1; LL[0] = L; LD[0] = sdate; LT[0] = stime; LI[0] = index; for cnt = 1 to 19 { LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; LI[cnt] = LI[cnt-1][1]; } if HH[0] > 0 Then { Condition2 = false; for cnt = 1 to 19 { if Condition2 == false and abs(HH[0]-HH[cnt]) >= PriceScale*1 and HD[cnt] <= day1 Then { Condition2 = true; TL2 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetSize(TL2,선굵기); TL_SetColor(TL2,green); idx = abs(HI[0]-HI[cnt]); //tx99 = Text_New(HD[0],HT[0],HH[0],NumToStr(idx,0)); Text_SetColor(tx99,green); Text_SetStyle(tx99,0,3); Text_SetBold(tx99,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); } } } } if T == 1 then { if H > HH[0] Then { HH[0] = H; HD[0] = sdate; HT[0] = stime; if Condition3 == false and abs(HH[0]-HH[cnt]) >= PriceScale*1 and HD[cnt] <= day1 Then { Condition3 = true; TL3 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetSize(TL3,선굵기); TL_SetColor(TL3,Orange); idx = abs(HI[0]-HI[cnt]); //tx88 = Text_New(HD[0],HT[0],HH[0],NumToStr(idx,0)); Text_SetColor(tx88,Orange); Text_SetStyle(tx88,0,3); Text_SetBold(tx88,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); } } } if T == -1 then { if L < LL[0] Then { LL[0] = L; LD[0] = sdate; LT[0] = stime; if Condition3 == false and abs(LL[0]-LL[cnt]) >= PriceScale*1 and LD[cnt] <= day1 Then { Condition3 = true; TL3 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetSize(TL3,선굵기); TL_SetColor(TL3,green); idx = abs(LI[0]-LI[cnt]); //tx88 = Text_New(LD[0],LT[0],LL[0],NumToStr(idx,0)); Text_SetColor(tx88,green); Text_SetStyle(tx88,0,3); Text_SetBold(tx88,2); PlaySound("C:￦예스트레이더(x64)￦data￦Sound￦.wav"); } } }