안녕하세요 예스스탁입니다. 1-1 국선,해성 var : 고점(0),저점(0); Array : TTx[30](0); 고점 = DayHigh(1); 저점 = DayLow(1); var1 = 고점-저점; plot1(저점+var1*3.000); plot2(저점+var1*2.618); plot3(저점+var1*2.500); plot4(저점+var1*2.382); plot5(저점+var1*2.000); plot6(저점+var1*1.618); plot7(저점+var1*1.500); plot8(저점+var1*1.382); plot9(저점+var1*1.000); plot10(저점+var1*0.618); plot11(저점+var1*0.500); plot12(저점+var1*0.382); plot13(저점+var1*0); plot14(저점+var1*0.382); plot15(저점-var1*0.500); plot16(저점-var1*0.618); plot17(저점-var1*1.000); plot18(저점-var1*1.382); plot19(저점-var1*1.500); plot20(저점-var1*1.618); plot21(저점-var1*2.000); plot22(저점-var1*2.382); plot23(저점-var1*2.500); plot24(저점-var1*2.618); plot25(저점-var1*3.000); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*3.000,"300.0% : "+NumToStr(저점+var1*3.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*2.500,"250.0% : "+NumToStr(저점+var1*2.500,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*2.382,"238.2% : "+NumToStr(저점+var1*2.382,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.318,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.00,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*0.000,"0.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*2.382,"-238.2% : "+NumToStr(저점-var1*2.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*2.500,"-250.0% : "+NumToStr(저점-var1*2.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*3.000,"-300.0% : "+NumToStr(저점-var1*3.000,2)); 1-2 항셍 var : 고점(0),저점(0),hh(0),ll(0),hh1(0),ll1(0); Array : Tx[30](0); if (sdate != sdate[1] and stime >= 101500) or (sdate == sdate[1] and stime >= 101500 and stime[1] < 101500) Then { hh = h; ll = l; hh1 = hh[1]; ll1 = ll[1]; } if h > hh Then hh = h; if l < ll Then ll = l; if hh1 > 0 and ll1 > 0 then { 고점 = hh1; 저점 = ll1; var1 = 고점-저점; plot1(저점+var1*3.000); plot2(저점+var1*2.618); plot3(저점+var1*2.500); plot4(저점+var1*2.382); plot5(저점+var1*2.000); plot6(저점+var1*1.618); plot7(저점+var1*1.500); plot8(저점+var1*1.382); plot9(저점+var1*1.000); plot10(저점+var1*0.618); plot11(저점+var1*0.500); plot12(저점+var1*0.382); plot13(저점+var1*0); plot14(저점+var1*0.382); plot15(저점-var1*0.500); plot16(저점-var1*0.618); plot17(저점-var1*1.000); plot18(저점-var1*1.382); plot19(저점-var1*1.500); plot20(저점-var1*1.618); plot21(저점-var1*2.000); plot22(저점-var1*2.382); plot23(저점-var1*2.500); plot24(저점-var1*2.618); plot25(저점-var1*3.000); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*3.000,"300.0% : "+NumToStr(저점+var1*3.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*2.500,"250.0% : "+NumToStr(저점+var1*2.500,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*2.382,"238.2% : "+NumToStr(저점+var1*2.382,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.318,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.00,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*0.000,"0.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*2.382,"-238.2% : "+NumToStr(저점-var1*2.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*2.500,"-250.0% : "+NumToStr(저점-var1*2.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*3.000,"-300.0% : "+NumToStr(저점-var1*3.000,2)); } 2-1 국선 해선 var : 고점(0),저점(0); Array : Tx[30](0); 고점 = DayHigh(0); 저점 = DayLow(0); var1 = 고점-저점; if var1/PriceScale > 100 then { plot1(저점+var1*3.000); plot2(저점+var1*2.618); plot3(저점+var1*2.500); plot4(저점+var1*2.382); plot5(저점+var1*2.000); plot6(저점+var1*1.618); plot7(저점+var1*1.500); plot8(저점+var1*1.382); plot9(저점+var1*1.000); plot10(저점+var1*0.618); plot11(저점+var1*0.500); plot12(저점+var1*0.382); plot13(저점+var1*0); plot14(저점+var1*0.382); plot15(저점-var1*0.500); plot16(저점-var1*0.618); plot17(저점-var1*1.000); plot18(저점-var1*1.382); plot19(저점-var1*1.500); plot20(저점-var1*1.618); plot21(저점-var1*2.000); plot22(저점-var1*2.382); plot23(저점-var1*2.500); plot24(저점-var1*2.618); plot25(저점-var1*3.000); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*3.000,"300.0% : "+NumToStr(저점+var1*3.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*2.500,"250.0% : "+NumToStr(저점+var1*2.500,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*2.382,"238.2% : "+NumToStr(저점+var1*2.382,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.318,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.00,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*0.000,"0.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*2.382,"-238.2% : "+NumToStr(저점-var1*2.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*2.500,"-250.0% : "+NumToStr(저점-var1*2.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*3.000,"-300.0% : "+NumToStr(저점-var1*3.000,2)); } 2-2 항셍 var : 고점(0),저점(0),hh(0),ll(0),hh1(0),ll1(0); Array : Tx[30](0); if (sdate != sdate[1] and stime >= 101500) or (sdate == sdate[1] and stime >= 101500 and stime[1] < 101500) Then { hh = h; ll = l; hh1 = hh[1]; ll1 = ll[1]; } if h > hh Then hh = h; if l < ll Then ll = l; 고점 = hh; 저점 = ll; var1 = 고점-저점; if hh > 0 and ll > 0 and var1/PriceScale >= 100 then { plot1(저점+var1*3.000); plot2(저점+var1*2.618); plot3(저점+var1*2.500); plot4(저점+var1*2.382); plot5(저점+var1*2.000); plot6(저점+var1*1.618); plot7(저점+var1*1.500); plot8(저점+var1*1.382); plot9(저점+var1*1.000); plot10(저점+var1*0.618); plot11(저점+var1*0.500); plot12(저점+var1*0.382); plot13(저점+var1*0); plot14(저점+var1*0.382); plot15(저점-var1*0.500); plot16(저점-var1*0.618); plot17(저점-var1*1.000); plot18(저점-var1*1.382); plot19(저점-var1*1.500); plot20(저점-var1*1.618); plot21(저점-var1*2.000); plot22(저점-var1*2.382); plot23(저점-var1*2.500); plot24(저점-var1*2.618); plot25(저점-var1*3.000); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*3.000,"300.0% : "+NumToStr(저점+var1*3.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*2.500,"250.0% : "+NumToStr(저점+var1*2.500,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*2.382,"238.2% : "+NumToStr(저점+var1*2.382,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.318,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.00,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*0.000,"0.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*2.382,"-238.2% : "+NumToStr(저점-var1*2.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*2.500,"-250.0% : "+NumToStr(저점-var1*2.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*3.000,"-300.0% : "+NumToStr(저점-var1*3.000,2)); } 3 input : 고점(100),저점(200); Array : Tx[30](0); var1 = 고점-저점; plot1(저점+var1*3.000); plot2(저점+var1*2.618); plot3(저점+var1*2.500); plot4(저점+var1*2.382); plot5(저점+var1*2.000); plot6(저점+var1*1.618); plot7(저점+var1*1.500); plot8(저점+var1*1.382); plot9(저점+var1*1.000); plot10(저점+var1*0.618); plot11(저점+var1*0.500); plot12(저점+var1*0.382); plot13(저점+var1*0); plot14(저점+var1*0.382); plot15(저점-var1*0.500); plot16(저점-var1*0.618); plot17(저점-var1*1.000); plot18(저점-var1*1.382); plot19(저점-var1*1.500); plot20(저점-var1*1.618); plot21(저점-var1*2.000); plot22(저점-var1*2.382); plot23(저점-var1*2.500); plot24(저점-var1*2.618); plot25(저점-var1*3.000); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*3.000,"300.0% : "+NumToStr(저점+var1*3.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*2.500,"250.0% : "+NumToStr(저점+var1*2.500,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*2.382,"238.2% : "+NumToStr(저점+var1*2.382,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.318,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.00,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*0.000,"0.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*2.382,"-238.2% : "+NumToStr(저점-var1*2.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*2.500,"-250.0% : "+NumToStr(저점-var1*2.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*3.000,"-300.0% : "+NumToStr(저점-var1*3.000,2)); 4-1 Var : UpTail(0),DnTail(0),Height(0),Body(0); UpTail = H-Max(C,O); DnTail = Min(C,O)-L; Body = Abs(C-O); #몸통길이의 2/3에 해당하는 틱수 var1 = Floor(body*(2/3))/PriceScale; if body >= PriceScale*10 and (uptail == body or dntail == body) Then plot1(h,"검색"); if body >= PriceScale*10 and (uptail == var1*PriceScale or dntail == var1*PriceScale) Then plot2(h,"검색"); if body >= PriceScale*10 and (uptail > body or dntail > body) Then plot3(h,"검색"); 4-2 Var : UpTail(0),DnTail(0),Height(0),Body(0); UpTail = H-Max(C,O); DnTail = Min(C,O)-L; Body = Abs(C-O); #몸통길이의 2/3에 해당하는 틱수 var1 = Floor(body*(2/3))/PriceScale; if body >= PriceScale*10 and (uptail == body or dntail == body) Then PlotPaintBar(h,l,"강조"); if body >= PriceScale*10 and (uptail == var1*PriceScale or dntail == var1*PriceScale) Then PlotPaintBar(h,l,"강조"); if body >= PriceScale*10 and (uptail > body or dntail > body) Then PlotPaintBar(h,l,"강조"); 즐거운 하루되세요 > qha71 님이 쓴 글입니다. > 제목 : 수식의뢰 드려요 > 안녕하세요! 수식 의뢰 드립니다! 1. 전일 고점과 저점 피보나치 (첨부그림 참조해 주세요!) 장이 시작되면 자동으로 생성 될 수 있도록 부탁드립니다! 예) 그림에서와 같은 당일 상승인 경우, 전일 저점 A = 1.5018 전일 고점 B = 1.5144 우선 B에서 A를 뺍니다. B &#8212; A (1.5144 - 1.5018) = 0.0126 0.382 (38.2%)선 표시 값 = 1.5144 (전일고점) &#8212; 0.0126 (전고-전저값) x 0.382 = 1.5096 0.500 (50.0%)선 표시 값 = 1.5144 (전일고점) &#8212; 0.0126 (전고-전저값) x 0.500 = 1.5081 0.618 (61.8%)선 표시 값 = 1.5144 (전일고점) &#8212; 0.0126 (전고-전저값) x 0.618 = 1.5066 즉, 피보나치를구하는 공식은 다음과 같습니다. 상승장의 경우 C = B &#8212; (B &#8212; A) x N% 피보나치은 다음과 같이 구할 수 있습니다. 1.382 (138.2%)선 표시 값 = 1.5144 + 0.0126 x 0.382 = 1.5192 1.618 (161.8%)선 표시 값 = 1.5144 + 0.0126 x 0.618 = 1.5222 2.000 (200.0%)선 표시 값 = 1.5144 + 0.0126 x 1.000 = 1.5270 즉, 피보나치 익스텐션 (100% 이상)을 구하는 공식은 다음과 같습니다. D = B + (B &#8212; A) x N% 하락장의 경우는 반대로 계산하면 됩니다. 정리해서 말씀드리면 3.000 (300.0%) 2.618 (261.8%) 2.500 (250.0%) 2.382 (238.2%) 2.000 (200.0%) 1.618 (161.8%) 1.500 (150.0%) 1.382 (138.2%) (100%) 0.618 (61.8%) 0.500 (50.0%) 0.382 (38.2%) (0%) 기준 - 0.382 (-38.2%) - 0.500 (-50.0%) - 0.618 (-61.8%) (-100%) - 1.382 (-138.2%) - 1.500 (-150.0%) - 1.618 (-161.8%) - 2.000 (-200.0%) - 2.382 (-238.2%) - 2.500 (-250.0%) - 2.618 (-261.8%) - 3.000 (-300.0%) 국선 / 해선 / 항생 매매용으로 각각 부탁드립니다. ----------------------------------------------------------------------------------- 2. 만약 당일 움직임이 100틱이 넘은 경우는 당일의 고점과 저점을 기준으로 피보나치선 수식이 자동 생성되도록 해 주세요! (수식 조건은 위와 동일 합니다!) ----------------------------------------------------------------------------------- 3. 당일 임의의 고점과 저점 피보나치 ( 아래 첨부된 수식을 위 1번의 조건과 동일하게 수정해 주세요) 아래 수식 처럼 제가 직접 수치을 수동으로 입력할 수 있도록 만들어 주세요! 감사합니다! input : 고점(350),저점(340); Array : Tx[30](0); var1 = 고점-저점; plot1(저점+var1*0.000); plot2(저점+var1*0.236); plot3(저점+var1*0.382); plot4(저점+var1*0.500); plot5(저점+var1*0.618); plot6(저점+var1*0.764); plot7(저점+var1*1.000); plot8(저점+var1*1.236); plot9(저점+var1*1.382); plot10(저점+var1*1.500); plot11(저점+var1*1.618); plot12(저점+var1*1.764); plot13(저점+var1*2.000); plot14(저점+var1*2.618); plot15(저점-var1*0.236); plot16(저점-var1*0.382); plot17(저점-var1*0.500); plot18(저점-var1*0.618); plot19(저점-var1*0.764); plot20(저점-var1*1.000); plot21(저점-var1*1.236); plot22(저점-var1*1.382); plot23(저점-var1*1.500); plot24(저점-var1*1.618); plot25(저점-var1*1.764); plot26(저점-var1*2.000); plot27(저점-var1*2.618); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*0.000,"00.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*0.236,"23.6% : "+NumToStr(저점+var1*0.236,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*0.764,"76.4% : "+NumToStr(저점+var1*0.764,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.000,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.236,"123.6% : "+NumToStr(저점+var1*1.236,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.382,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*1.764,"176.4% : "+NumToStr(저점+var1*1.764,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.236,"-23.6% : "+NumToStr(저점-var1*0.236,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*0.764,"-76.4% : "+NumToStr(저점-var1*0.764,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*1.236,"-123.6% : "+NumToStr(저점-var1*1.236,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*1.764,"-176.4% : "+NumToStr(저점-var1*1.764,2)); text_Delete(Tx[26]); tx[26] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[27]); tx[27] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2)); ----------------------------------------------------------------------------------- 4. 검색식과 강조식 좀 부탁드립니다! 상승장 변곡, 하락장 변곡 (망치, 해머형) 모두 동일 합니다! 꼬리 제외하고 몸통크기 조건 (10틱이상) 조건1 : 상승시 또는 하락시 꼬리가 몸통길이만큼 길어진 캔들이 발생한 경우의 검색식과 강조식 조건2 : 상승시 또는 하락시 꼬리가 몸통길이의 2/3 길이의 캔들이 발생한 경우의 검색식과 강조식 조건3 : 상승시 또는 하락시 꼬리가 몸통길이보다 더 길어진 캔들이 발생한 경우의 검색식과 강조식