안녕하세요 예스스탁입니다. 예스랭귀지에서 시간은 6자리입니다. if (sdate != sdate[1] and stime >= 090000) or (sdate == sdate[1] and stime >= 0900 and stime[1] < 090000) then 첨부하신 수식에는 시간이 4자리(0900)로 지정된 부분이 있습니다. 090000으로 지정하셔야 합니다. 항생과 같이 별도의 시간으로 하루를 판단하는 종목이 아니면 일반적으로 영업일 변경시간을 기준으로 하므로 if Bdate != bdate[1] then 으로 지정하시면 됩니다. input : n(2.5); var : VV(0),dd(0),hh(0),ll(0),h1(0),l1(0); if bdate != bdate[1] then { vv = O; hh = h; ll = l; h1 = hh[1]; l1 = ll[1]; dd = h1-l1; if h1 > 0 and l1 > 0 then { var1 = vv; var11 = vv+(dd*0.236); var12 = vv+(dd*0.382); var13 = vv+(dd*0.500); var14 = vv+(dd*0.618); var15 = vv+(dd*0.764); var16 = vv+(dd*1.000); var17 = vv+(dd*1.236); var18 = vv+(dd*1.382); var19 = vv+(dd*1.500); var20 = vv+(dd*1.618); var21 = vv+(dd*1.764); var22 = vv+(dd*2.000); var31 = vv-(dd*0.236); var32 = vv-(dd*0.382); var33 = vv-(dd*0.500); var34 = vv-(dd*0.618); var35 = vv-(dd*0.764); var36 = vv-(dd*1.000); var37 = vv-(dd*1.236); var38 = vv-(dd*1.382); var39 = vv-(dd*1.500); var40 = vv-(dd*1.618); var41 = vv-(dd*1.764); var42 = vv-(dd*2.000); Text_Delete(value1); Text_Delete(value11); Text_Delete(value12); Text_Delete(value13); Text_Delete(value14); Text_Delete(value15); Text_Delete(value16); Text_Delete(value17); Text_Delete(value18); Text_Delete(value19); Text_Delete(value20); Text_Delete(value21); Text_Delete(value22); value1 = Text_New(sdate,stime,var1,"0.00% : "+NumToStr(var1,2)); value11 = Text_New(sdate,stime,var11,"+23.6% : "+NumToStr(var11,2)); value12 = Text_New(sdate,stime,var12,"+38.2% : "+NumToStr(var12,2)); value13 = Text_New(sdate,stime,var13,"+50.0% : "+NumToStr(var13,2)); value14 = Text_New(sdate,stime,var14,"+61.8% : "+NumToStr(var14,2)); value15 = Text_New(sdate,stime,var15,"+76.4% : "+NumToStr(var15,2)); value16 = Text_New(sdate,stime,var16,"+100.0% : "+NumToStr(var16,2)); value17 = Text_New(sdate,stime,var17,"+123.6% : "+NumToStr(var17,2)); value18 = Text_New(sdate,stime,var18,"+138.2% : "+NumToStr(var18,2)); value19 = Text_New(sdate,stime,var19,"+150.0% : "+NumToStr(var19,2)); value20 = Text_New(sdate,stime,var20,"+161.8% : "+NumToStr(var20,2)); value21 = Text_New(sdate,stime,var21,"+176.4% : "+NumToStr(var21,2)); value22 = Text_New(sdate,stime,var22,"+200.0% : "+NumToStr(var22,2)); Text_Delete(value31); Text_Delete(value32); Text_Delete(value33); Text_Delete(value34); Text_Delete(value35); Text_Delete(value36); Text_Delete(value37); Text_Delete(value38); Text_Delete(value39); Text_Delete(value40); Text_Delete(value41); Text_Delete(value42); value31 = Text_New(sdate,stime,var31,"-23.6% : "+NumToStr(var31,2)); value32 = Text_New(sdate,stime,var32,"-38.2% : "+NumToStr(var32,2)); value33 = Text_New(sdate,stime,var33,"-50.0% : "+NumToStr(var33,2)); value34 = Text_New(sdate,stime,var34,"-61.8% : "+NumToStr(var34,2)); value35 = Text_New(sdate,stime,var35,"-76.4% : "+NumToStr(var35,2)); value36 = Text_New(sdate,stime,var36,"-100.0% : "+NumToStr(var36,2)); value37 = Text_New(sdate,stime,var37,"-123.6% : "+NumToStr(var37,2)); value38 = Text_New(sdate,stime,var38,"-138.2% : "+NumToStr(var38,2)); value39 = Text_New(sdate,stime,var39,"-150.0% : "+NumToStr(var39,2)); value40 = Text_New(sdate,stime,var40,"-161.8% : "+NumToStr(var40,2)); value41 = Text_New(sdate,stime,var41,"-176.4% : "+NumToStr(var41,2)); value42 = Text_New(sdate,stime,var42,"-200.0% : "+NumToStr(var42,2)); } } Else { if h > hh Then hh = h; if l < ll Then ll = l; Text_SetLocation(value1,sdate,stime,var1); Text_SetLocation(value11,sdate,stime,var11); Text_SetLocation(value12,sdate,stime,var12); Text_SetLocation(value13,sdate,stime,var13); Text_SetLocation(value14,sdate,stime,var14); Text_SetLocation(value15,sdate,stime,var15); Text_SetLocation(value16,sdate,stime,var16); Text_SetLocation(value17,sdate,stime,var17); Text_SetLocation(value18,sdate,stime,var18); Text_SetLocation(value19,sdate,stime,var19); Text_SetLocation(value20,sdate,stime,var20); Text_SetLocation(value21,sdate,stime,var21); Text_SetLocation(value22,sdate,stime,var22); Text_SetLocation(value31,sdate,stime,var31); Text_SetLocation(value32,sdate,stime,var32); Text_SetLocation(value33,sdate,stime,var33); Text_SetLocation(value34,sdate,stime,var34); Text_SetLocation(value35,sdate,stime,var35); Text_SetLocation(value36,sdate,stime,var36); Text_SetLocation(value37,sdate,stime,var37); Text_SetLocation(value38,sdate,stime,var38); Text_SetLocation(value39,sdate,stime,var39); Text_SetLocation(value40,sdate,stime,var40); Text_SetLocation(value41,sdate,stime,var41); Text_SetLocation(value42,sdate,stime,var42); } plot1(var1); plot11(var11); plot12(var12); plot13(var13); plot14(var14); plot15(var15); plot16(var16); plot17(var17); plot18(var18); plot19(var19); plot20(var20); plot21(var21); plot22(var22); plot31(var31); plot32(var32); plot33(var33); plot34(var34); plot35(var35); plot36(var36); plot37(var37); plot38(var38); plot39(var39); plot40(var40); plot41(var41); plot42(var42); 즐거운 하루되세요 > qha71 님이 쓴 글입니다. > 제목 : 수정의뢰드려요 > 안녕하세요! 아래 수식은 지난번에 만들어 주신 항생전일고저 피보나치입니다! 그 아래는 제가 일반 해선 (오일이나 골드 등)용으로 시간만 변경을 준것인데 챠트가 이상하게 변해 버리네요! 머가 잘못된건지 잘 모르겠습니다! 수정 좀 부탁드려요! 감사합니다! -------------------------------------------------------------------------- 항생전일고저 피보나치 input : n(2.5); var : VV(0),dd(0),hh(0),ll(0),h1(0),l1(0); if (sdate != sdate[1] and stime >= 101500) or (sdate == sdate[1] and stime >= 101500 and stime[1] < 101500) then { vv = O; hh = h; ll = l; h1 = hh[1]; l1 = ll[1]; dd = h1-l1; if h1 > 0 and l1 > 0 then { var1 = vv; var11 = vv+(dd*0.236); var12 = vv+(dd*0.382); var13 = vv+(dd*0.500); var14 = vv+(dd*0.618); var15 = vv+(dd*0.764); var16 = vv+(dd*1.000); var17 = vv+(dd*1.236); var18 = vv+(dd*1.382); var19 = vv+(dd*1.500); var20 = vv+(dd*1.618); var21 = vv+(dd*1.764); var22 = vv+(dd*2.000); var31 = vv-(dd*0.236); var32 = vv-(dd*0.382); var33 = vv-(dd*0.500); var34 = vv-(dd*0.618); var35 = vv-(dd*0.764); var36 = vv-(dd*1.000); var37 = vv-(dd*1.236); var38 = vv-(dd*1.382); var39 = vv-(dd*1.500); var40 = vv-(dd*1.618); var41 = vv-(dd*1.764); var42 = vv-(dd*2.000); Text_Delete(value1); Text_Delete(value11); Text_Delete(value12); Text_Delete(value13); Text_Delete(value14); Text_Delete(value15); Text_Delete(value16); Text_Delete(value17); Text_Delete(value18); Text_Delete(value19); Text_Delete(value20); Text_Delete(value21); Text_Delete(value22); value1 = Text_New(sdate,stime,var1,"0.00% : "+NumToStr(var1,2)); value11 = Text_New(sdate,stime,var11,"+23.6% : "+NumToStr(var11,2)); value12 = Text_New(sdate,stime,var12,"+38.2% : "+NumToStr(var12,2)); value13 = Text_New(sdate,stime,var13,"+50.0% : "+NumToStr(var13,2)); value14 = Text_New(sdate,stime,var14,"+61.8% : "+NumToStr(var14,2)); value15 = Text_New(sdate,stime,var15,"+76.4% : "+NumToStr(var15,2)); value16 = Text_New(sdate,stime,var16,"+100.0% : "+NumToStr(var16,2)); value17 = Text_New(sdate,stime,var17,"+123.6% : "+NumToStr(var17,2)); value18 = Text_New(sdate,stime,var18,"+138.2% : "+NumToStr(var18,2)); value19 = Text_New(sdate,stime,var19,"+150.0% : "+NumToStr(var19,2)); value20 = Text_New(sdate,stime,var20,"+161.8% : "+NumToStr(var20,2)); value21 = Text_New(sdate,stime,var21,"+176.4% : "+NumToStr(var21,2)); value22 = Text_New(sdate,stime,var22,"+200.0% : "+NumToStr(var22,2)); Text_Delete(value31); Text_Delete(value32); Text_Delete(value33); Text_Delete(value34); Text_Delete(value35); Text_Delete(value36); Text_Delete(value37); Text_Delete(value38); Text_Delete(value39); Text_Delete(value40); Text_Delete(value41); Text_Delete(value42); value31 = Text_New(sdate,stime,var31,"-23.6% : "+NumToStr(var31,2)); value32 = Text_New(sdate,stime,var32,"-38.2% : "+NumToStr(var32,2)); value33 = Text_New(sdate,stime,var33,"-50.0% : "+NumToStr(var33,2)); value34 = Text_New(sdate,stime,var34,"-61.8% : "+NumToStr(var34,2)); value35 = Text_New(sdate,stime,var35,"-76.4% : "+NumToStr(var35,2)); value36 = Text_New(sdate,stime,var36,"-100.0% : "+NumToStr(var36,2)); value37 = Text_New(sdate,stime,var37,"-123.6% : "+NumToStr(var37,2)); value38 = Text_New(sdate,stime,var38,"-138.2% : "+NumToStr(var38,2)); value39 = Text_New(sdate,stime,var39,"-150.0% : "+NumToStr(var39,2)); value40 = Text_New(sdate,stime,var40,"-161.8% : "+NumToStr(var40,2)); value41 = Text_New(sdate,stime,var41,"-176.4% : "+NumToStr(var41,2)); value42 = Text_New(sdate,stime,var42,"-200.0% : "+NumToStr(var42,2)); } } Else { if h > hh Then hh = h; if l < ll Then ll = l; Text_SetLocation(value1,sdate,stime,var1); Text_SetLocation(value11,sdate,stime,var11); Text_SetLocation(value12,sdate,stime,var12); Text_SetLocation(value13,sdate,stime,var13); Text_SetLocation(value14,sdate,stime,var14); Text_SetLocation(value15,sdate,stime,var15); Text_SetLocation(value16,sdate,stime,var16); Text_SetLocation(value17,sdate,stime,var17); Text_SetLocation(value18,sdate,stime,var18); Text_SetLocation(value19,sdate,stime,var19); Text_SetLocation(value20,sdate,stime,var20); Text_SetLocation(value21,sdate,stime,var21); Text_SetLocation(value22,sdate,stime,var22); Text_SetLocation(value31,sdate,stime,var31); Text_SetLocation(value32,sdate,stime,var32); Text_SetLocation(value33,sdate,stime,var33); Text_SetLocation(value34,sdate,stime,var34); Text_SetLocation(value35,sdate,stime,var35); Text_SetLocation(value36,sdate,stime,var36); Text_SetLocation(value37,sdate,stime,var37); Text_SetLocation(value38,sdate,stime,var38); Text_SetLocation(value39,sdate,stime,var39); Text_SetLocation(value40,sdate,stime,var40); Text_SetLocation(value41,sdate,stime,var41); Text_SetLocation(value42,sdate,stime,var42); } plot1(var1); plot11(var11); plot12(var12); plot13(var13); plot14(var14); plot15(var15); plot16(var16); plot17(var17); plot18(var18); plot19(var19); plot20(var20); plot21(var21); plot22(var22); plot31(var31); plot32(var32); plot33(var33); plot34(var34); plot35(var35); plot36(var36); plot37(var37); plot38(var38); plot39(var39); plot40(var40); plot41(var41); plot42(var42); ----------------------------------------------------------------------------------- 항생수식을 해선 전일고저 피보나치로 변경한 수식 input : n(2.5); var : VV(0),dd(0),hh(0),ll(0),h1(0),l1(0); if (sdate != sdate[1] and stime >= 090000) or (sdate == sdate[1] and stime >= 0900 and stime[1] < 090000) then { vv = O; hh = h; ll = l; h1 = hh[1]; l1 = ll[1]; dd = h1-l1; if h1 > 0 and l1 > 0 then { var1 = vv; var11 = vv+(dd*0.236); var12 = vv+(dd*0.382); var13 = vv+(dd*0.500); var14 = vv+(dd*0.618); var15 = vv+(dd*0.764); var16 = vv+(dd*1.000); var17 = vv+(dd*1.236); var18 = vv+(dd*1.382); var19 = vv+(dd*1.500); var20 = vv+(dd*1.618); var21 = vv+(dd*1.764); var22 = vv+(dd*2.000); var31 = vv-(dd*0.236); var32 = vv-(dd*0.382); var33 = vv-(dd*0.500); var34 = vv-(dd*0.618); var35 = vv-(dd*0.764); var36 = vv-(dd*1.000); var37 = vv-(dd*1.236); var38 = vv-(dd*1.382); var39 = vv-(dd*1.500); var40 = vv-(dd*1.618); var41 = vv-(dd*1.764); var42 = vv-(dd*2.000); Text_Delete(value1); Text_Delete(value11); Text_Delete(value12); Text_Delete(value13); Text_Delete(value14); Text_Delete(value15); Text_Delete(value16); Text_Delete(value17); Text_Delete(value18); Text_Delete(value19); Text_Delete(value20); Text_Delete(value21); Text_Delete(value22); value1 = Text_New(sdate,stime,var1,"0.00% : "+NumToStr(var1,2)); value11 = Text_New(sdate,stime,var11,"+23.6% : "+NumToStr(var11,2)); value12 = Text_New(sdate,stime,var12,"+38.2% : "+NumToStr(var12,2)); value13 = Text_New(sdate,stime,var13,"+50.0% : "+NumToStr(var13,2)); value14 = Text_New(sdate,stime,var14,"+61.8% : "+NumToStr(var14,2)); value15 = Text_New(sdate,stime,var15,"+76.4% : "+NumToStr(var15,2)); value16 = Text_New(sdate,stime,var16,"+100.0% : "+NumToStr(var16,2)); value17 = Text_New(sdate,stime,var17,"+123.6% : "+NumToStr(var17,2)); value18 = Text_New(sdate,stime,var18,"+138.2% : "+NumToStr(var18,2)); value19 = Text_New(sdate,stime,var19,"+150.0% : "+NumToStr(var19,2)); value20 = Text_New(sdate,stime,var20,"+161.8% : "+NumToStr(var20,2)); value21 = Text_New(sdate,stime,var21,"+176.4% : "+NumToStr(var21,2)); value22 = Text_New(sdate,stime,var22,"+200.0% : "+NumToStr(var22,2)); Text_Delete(value31); Text_Delete(value32); Text_Delete(value33); Text_Delete(value34); Text_Delete(value35); Text_Delete(value36); Text_Delete(value37); Text_Delete(value38); Text_Delete(value39); Text_Delete(value40); Text_Delete(value41); Text_Delete(value42); value31 = Text_New(sdate,stime,var31,"-23.6% : "+NumToStr(var31,2)); value32 = Text_New(sdate,stime,var32,"-38.2% : "+NumToStr(var32,2)); value33 = Text_New(sdate,stime,var33,"-50.0% : "+NumToStr(var33,2)); value34 = Text_New(sdate,stime,var34,"-61.8% : "+NumToStr(var34,2)); value35 = Text_New(sdate,stime,var35,"-76.4% : "+NumToStr(var35,2)); value36 = Text_New(sdate,stime,var36,"-100.0% : "+NumToStr(var36,2)); value37 = Text_New(sdate,stime,var37,"-123.6% : "+NumToStr(var37,2)); value38 = Text_New(sdate,stime,var38,"-138.2% : "+NumToStr(var38,2)); value39 = Text_New(sdate,stime,var39,"-150.0% : "+NumToStr(var39,2)); value40 = Text_New(sdate,stime,var40,"-161.8% : "+NumToStr(var40,2)); value41 = Text_New(sdate,stime,var41,"-176.4% : "+NumToStr(var41,2)); value42 = Text_New(sdate,stime,var42,"-200.0% : "+NumToStr(var42,2)); } } Else { if h > hh Then hh = h; if l < ll Then ll = l; Text_SetLocation(value1,sdate,stime,var1); Text_SetLocation(value11,sdate,stime,var11); Text_SetLocation(value12,sdate,stime,var12); Text_SetLocation(value13,sdate,stime,var13); Text_SetLocation(value14,sdate,stime,var14); Text_SetLocation(value15,sdate,stime,var15); Text_SetLocation(value16,sdate,stime,var16); Text_SetLocation(value17,sdate,stime,var17); Text_SetLocation(value18,sdate,stime,var18); Text_SetLocation(value19,sdate,stime,var19); Text_SetLocation(value20,sdate,stime,var20); Text_SetLocation(value21,sdate,stime,var21); Text_SetLocation(value22,sdate,stime,var22); Text_SetLocation(value31,sdate,stime,var31); Text_SetLocation(value32,sdate,stime,var32); Text_SetLocation(value33,sdate,stime,var33); Text_SetLocation(value34,sdate,stime,var34); Text_SetLocation(value35,sdate,stime,var35); Text_SetLocation(value36,sdate,stime,var36); Text_SetLocation(value37,sdate,stime,var37); Text_SetLocation(value38,sdate,stime,var38); Text_SetLocation(value39,sdate,stime,var39); Text_SetLocation(value40,sdate,stime,var40); Text_SetLocation(value41,sdate,stime,var41); Text_SetLocation(value42,sdate,stime,var42); } plot1(var1); plot11(var11); plot12(var12); plot13(var13); plot14(var14); plot15(var15); plot16(var16); plot17(var17); plot18(var18); plot19(var19); plot20(var20); plot21(var21); plot22(var22); plot31(var31); plot32(var32); plot33(var33); plot34(var34); plot35(var35); plot36(var36); plot37(var37); plot38(var38); plot39(var39); plot40(var40); plot41(var41); plot42(var42);