안녕하세요 예스스탁입니다. 1 주 input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4); var : HH(0),LL(0),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0),tx7(0); if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then { HH = H; LL = L; } if HH > 0 and H > HH Then HH = H; if LL > 0 and L < LL Then LL = L; if HH > 0 and LL > 0 then { var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100)); var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100)); var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100)); var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100)); var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100)); plot1(HH,"최고",BLACK); plot2(LL,"최저",BLACK); plot3(var1,"Per1%",BLACK); plot4(var2,"Per2%",BLACK); plot5(var3,"Per3%",BLACK); plot6(var4,"Per4%",BLACK); plot7(var5,"Per5%",BLACK); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); tx1 = Text_New(sdate,stime,HH,"최고"); tx2 = Text_New(sdate,stime,LL,"최저"); tx3 = Text_New(sdate,stime,var1,NumToStr(Per1,1)+"%"); tx4 = Text_New(sdate,stime,var2,NumToStr(Per2,1)+"%"); tx5 = Text_New(sdate,stime,var3,NumToStr(Per3,1)+"%"); tx6 = Text_New(sdate,stime,var4,NumToStr(Per4,1)+"%"); tx7 = Text_New(sdate,stime,var5,NumToStr(Per5,1)+"%"); } if crossup(c,var1) or CrossDown(c,var1) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var2) or CrossDown(c,var2) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var3) or CrossDown(c,var3) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var4) or CrossDown(c,var4) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var5) or CrossDown(c,var5) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); 2 월 input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4); var : HH(0),LL(0),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0),tx7(0); if bdate > bdate[1]+30 Then { HH = H; LL = L; } if HH > 0 and H > HH Then HH = H; if LL > 0 and L < LL Then LL = L; if HH > 0 and LL > 0 then { var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100)); var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100)); var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100)); var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100)); var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100)); plot1(HH,"최고",BLACK); plot2(LL,"최저",BLACK); plot3(var1,"Per1%",BLACK); plot4(var2,"Per2%",BLACK); plot5(var3,"Per3%",BLACK); plot6(var4,"Per4%",BLACK); plot7(var5,"Per5%",BLACK); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); tx1 = Text_New(sdate,stime,HH,"최고"); tx2 = Text_New(sdate,stime,LL,"최저"); tx3 = Text_New(sdate,stime,var1,NumToStr(Per1,1)+"%"); tx4 = Text_New(sdate,stime,var2,NumToStr(Per2,1)+"%"); tx5 = Text_New(sdate,stime,var3,NumToStr(Per3,1)+"%"); tx6 = Text_New(sdate,stime,var4,NumToStr(Per4,1)+"%"); tx7 = Text_New(sdate,stime,var5,NumToStr(Per5,1)+"%"); } if crossup(c,var1) or CrossDown(c,var1) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var2) or CrossDown(c,var2) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var3) or CrossDown(c,var3) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var4) or CrossDown(c,var4) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var5) or CrossDown(c,var5) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); 즐거운 하루되세요 > qha71 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다 > 안녕하세요! 수식을 좀 수정 의뢰 드립니다! 아래의 당일피보나치 수식을 당주 피보나치 와 당월 피보나치로 각각 수정을 부탁 드립니다! 감사합니다! input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4); var : HH(0),LL(0),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0),tx7(0); HH = dayhigh; LL = daylow; if HH > 0 and LL > 0 then{ var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100)); var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100)); var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100)); var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100)); var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100)); plot1(HH,"최고",BLACK); plot2(LL,"최저",BLACK); plot3(var1,"Per1%",BLACK); plot4(var2,"Per2%",BLACK); plot5(var3,"Per3%",BLACK); plot6(var4,"Per4%",BLACK); plot7(var5,"Per5%",BLACK); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); tx1 = Text_New(sdate,stime,HH,"최고"); tx2 = Text_New(sdate,stime,LL,"최저"); tx3 = Text_New(sdate,stime,var1,NumToStr(Per1,1)+"%"); tx4 = Text_New(sdate,stime,var2,NumToStr(Per2,1)+"%"); tx5 = Text_New(sdate,stime,var3,NumToStr(Per3,1)+"%"); tx6 = Text_New(sdate,stime,var4,NumToStr(Per4,1)+"%"); tx7 = Text_New(sdate,stime,var5,NumToStr(Per5,1)+"%"); } if crossup(c,var1) or CrossDown(c,var1) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var2) or CrossDown(c,var2) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var3) or CrossDown(c,var3) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var4) or CrossDown(c,var4) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); if crossup(c,var5) or CrossDown(c,var5) Then PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav");