안녕하세요 예스스탁입니다. 1 Var : nday1(0,data1),week1(0,data1),cond1(false,data1),daycnt1(-1,data1),val1(0,data1); var : h1(0,data1),l1(0,data1); Var : nday2(0,data2),week2(0,data2),cond2(false,data2),daycnt2(-1,data2),val2(0,data2); var : h2(0,data2),l2(0,data2); nday1 = data1(Date - Int(Date/100)*100); week1 = data1(DayOfWeek(Date)); If nday1 >= 8 And nday1 <= 14 And week1 == 4 Then Cond1 = true; Else Cond1 = false; if data1(date != date[1] and cond1 == false and cond1[1] == true) Then daycnt1 = 0; if data1(date != date[1]) Then { daycnt1 = daycnt1+1; if daycnt1 == 1 Then { H1 = data1(h); L1 = data2(L); } } if daycnt1 == 1 Then val1 = data1(lowd(0)); if daycnt1 >= 1 then { if data1(H) > h1 Then h1 = data1(h); if data1(L) < L1 Then L1 = data1(L); } nday2 = data2(Date - Int(Date/100)*100); week2 = data2(DayOfWeek(Date)); If nday2 >= 8 And nday2 <= 14 And week2 == 4 Then Cond2 = true; Else Cond2 = false; if data2(date != date[1] and cond2 == false and cond2[1] == true) Then daycnt2 = 0; if data2(date != date[1]) Then { daycnt2 = daycnt2+1; if daycnt2 == 1 Then { h2 = data2(h); l2 = data2(l); } } if daycnt2 == 1 Then val2 = data2(lowd(0)); if daycnt2 >= 1 then { if data2(H) > h2 Then h2 = data2(h); if data2(L) < L2 Then L2 = data2(L); } plot1(data1(highD(1)),"d1전일고가"); plot2(data1(LowD(1)),"d1전일저가"); plot3(val1,"d1첫날저가"); plot4(h1,"d1월고"); plot5(l1,"d1월저"); plot6(data2(highD(1)),"d2전일고가"); plot7(data2(LowD(1)),"d2전일저가"); plot8(val2,"d2첫날저가"); plot9(h2,"d2월고"); plot10(l2,"d2월저"); var : tx1(0,data1),tx2(0,data1),tx3(0,data1),tx4(0,data1),tx5(0,data1); var : tx6(0,data1),tx7(0,data1),tx8(0,data1),tx9(0,data1),tx10(0,data1); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); Text_Delete(tx8); Text_Delete(tx9); Text_Delete(tx10); tx1 = Text_New(sdate,stime,data1(highD(1)),"d1전일고가"); tx2 = Text_New(sdate,stime,data1(LowD(1)),"d1전일저가"); tx3 = Text_New(sdate,stime,val1,"d1첫날저가"); tx4 = Text_New(sdate,stime,h1,"d1월고"); tx5 = Text_New(sdate,stime,l1,"d1월저"); tx6 = Text_New(sdate,stime,data2(highD(1)),"d2전일고가"); tx7 = Text_New(sdate,stime,data2(LowD(1)),"d2전일저가"); tx8 = Text_New(sdate,stime,val2,"d2첫날저가"); tx9 = Text_New(sdate,stime,h2,"d2월고"); tx10 = Text_New(sdate,stime,l2,"d2월저"); 2 2개의 종가가 같으면 출력되는 내용입니다. 교차하면 data1의 종가가 그려지게 수정해 드립니다. var : value(0,data1); if crossup(data1(H),data2(L)) or CrossDown(data1(L),data2(H)) Then value = data1(c); plot1(value1); 3 input : 콜월고(1.2),콜월저(2.5),풋월고(3.5),풋월저(4.85); var : tx1(0),tx2(0),tx3(0),tx4(0); plot1(콜월고); plot2(콜월저); plot3(풋월고); plot4(풋월저); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); tx1 = Text_New(sdate,stime,콜월고,"콜월고"); tx2 = Text_New(sdate,stime,콜월저,"콜월저"); tx3 = Text_New(sdate,stime,풋월고,"풋월고"); tx4 = Text_New(sdate,stime,풋월저,"풋월저"); 4 playsound안에 wav파일의 경로와 파일명지정하셔야 합니다. if min(C,O)-L > abs(C-O) or H-max(C,O) > abs(C-O) then { plotpaintbar(H,L,"강조"); PlaySound(); } 즐거운 하루되세요 > qha71 님이 쓴 글입니다. > 제목 : 수정 의뢰드립니다! > 안녕하세요! 아래 수식은 지난번에 만들어주신건데 잘 사용하고 있습니다! 다름이 아니라 챠트에서 수많은 라인선을 색으로만 구분하는것 보다 좀 더 명확하게 구분을 하고저 라인 끝에 ( 예 : d1전일고가 , d1전일저가 ) 이런 식으로 텍스트가 표시 되면 매매에 좀 더 도움이 될것 같으니 수정을 좀 부탁드립니다. 항상 노고에 감사드립니다! Var : nday1(0,data1),week1(0,data1),cond1(false,data1),daycnt1(-1,data1),val1(0,data1); var : h1(0,data1),l1(0,data1); Var : nday2(0,data2),week2(0,data2),cond2(false,data2),daycnt2(-1,data2),val2(0,data2); var : h2(0,data2),l2(0,data2); nday1 = data1(Date - Int(Date/100)*100); week1 = data1(DayOfWeek(Date)); If nday1 >= 8 And nday1 <= 14 And week1 == 4 Then Cond1 = true; Else Cond1 = false; if data1(date != date[1] and cond1 == false and cond1[1] == true) Then daycnt1 = 0; if data1(date != date[1]) Then { daycnt1 = daycnt1+1; if daycnt1 == 1 Then { H1 = data1(h); L1 = data2(L); } } if daycnt1 == 1 Then val1 = data1(lowd(0)); if daycnt1 >= 1 then { if data1(H) > h1 Then h1 = data1(h); if data1(L) < L1 Then L1 = data1(L); } nday2 = data2(Date - Int(Date/100)*100); week2 = data2(DayOfWeek(Date)); If nday2 >= 8 And nday2 <= 14 And week2 == 4 Then Cond2 = true; Else Cond2 = false; if data2(date != date[1] and cond2 == false and cond2[1] == true) Then daycnt2 = 0; if data2(date != date[1]) Then { daycnt2 = daycnt2+1; if daycnt2 == 1 Then { h2 = data2(h); l2 = data2(l); } } if daycnt2 == 1 Then val2 = data2(lowd(0)); if daycnt2 >= 1 then { if data2(H) > h2 Then h2 = data2(h); if data2(L) < L2 Then L2 = data2(L); } plot1(data1(highD(1)),"d1전일고가"); plot2(data1(LowD(1)),"d1전일저가"); plot3(val1,"d1첫날저가"); plot4(h1,"d1월고"); plot5(l1,"d1월저"); plot6(data2(highD(1)),"d2전일고가"); plot7(data2(LowD(1)),"d2전일저가"); plot8(val2,"d2첫날저가"); plot9(h2,"d2월고"); plot10(l2,"d2월저"); ---------------------------------------------------------- 아래 수식도 만들어 주신건데 콜풋 교차시 동일가발생하면 라인이 그어지게 되어 있는데 셀제 적용하면 아무것도 나타나지 않습니다! 제가 뭐 잘못 적용한것일까요? var : value(0,data1); if data1(c) == data2(c) Then value = data1(c); plot1(value1); --------------------------------------------------------------------------------- 임의의 가격선을 아래와 같이 직접 만들어 출력하고 싶습니다 제가 원하는 가격선에 (예: 콜월저, 콜월고.....등등 ) 텍스트를 추가 할 수 있도록 수정을 부탁드립니다! plot1(1.20); "콜월고" plot2(2.50); "콜월저" plot3(3.50); "풋월고" plot4(4.85); "풋월저" ------------------------------------------------------------------------- 아래 수식은 몸통보다 아래 꼬리가 긴 봉을 찾는 강조식입니다 이 수식을 양봉 음봉 산관 없이 몸통보다 3배이상 긴 아래 꼬리 와 윗꼬리가 긴 봉을 찾는 식으로 수정을 부탁드려요! 봉이 완성 되면 알람도 울릴 수 있도록 수정 부탁드립니다. if min(C,O)-L > abs(C-O) then plotpaintbar(H,L,"강조");