안녕하세요. 예스스탁 입니다. 소리 출력 함수(playsound)는 함수 내에 지정한 경로의 wav 파일이 구동됩니다. 아래는 예스트레이더에 기본으로 제공되는 wav 파일을 지정했습니다. 원하시는 wav 파일의 경로와 이름으로 수정하시기 바랍니다. 게시판에서 식을 복사할 경우 경로명 중 ￦의 폰트가 깨질 수 있으므로 ￦는 다시 타이핑하시기 바랍니다 input : Period(200); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); var : box(0),box1(0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } box = box_New(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Lime); Box_SetFill(box,true,30); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.9 Then Text_Delete(tx); tx = text_New(sDate,stime,value11,NumToStr(((value12-value11)/PriceScale),0)); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,1); Text_SetSize(tx,30); Text_SetBold(tx,1); PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date22 = date[0]; time22 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(((value12-value11)/PriceScale),0)); Text_SetLocation(tx,sDate,sTime,value11); PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } box = Box_New(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Magenta); Box_SetFill(box,true,30); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.9 Then Text_Delete(tx); tx = text_New(sDate,stime,value11,NumToStr(((value12-value11)/PriceScale),0)); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,0); Text_SetSize(tx,30); Text_SetBold(tx,1); PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(((value12-value11)/PriceScale),0)); Text_SetLocation(tx,sDate,sTime,value11); PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); } } //Plot1(C); 즐거운 하루 보내세요. > 새벽에 님이 쓴 글입니다. > 제목 : 문의드립니다 > 안녕하세요? 아래수식에서 3가지를 수정하고싶습니다 1.사진에표시한 검은실선 라인을 없애주세요 2.사진의 숫자 -11.5 와 17.75 를 몇point 방식이아닌 호가창에서 몇칸 오르고내렸나? 즉 46 과 71 로 표시되었으면 합니다 3.빨강과 파랑의 각 숫자가 표현되었을시및 업데이트될때도 알림음을 듣고싶습니다 예를들어 동일 방향에서의 박스가 더커져서 수치 갱신이있다면 알림음1회 발생 감사드립니다 input : Period(200); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); var : box(0),box1(0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } box = box_New_self(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Lime); Box_SetFill(box,true,30); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.9 Then Text_Delete(tx); tx = text_New_self(sDate,stime,value11,NumToStr(value12-value11,2)); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,1); Text_SetSize(tx,30); Text_SetBold(tx,1); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date22 = date[0]; time22 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value11); } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } box = Box_New_self(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Magenta); Box_SetFill(box,true,30); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.9 Then Text_Delete(tx); tx = text_New_self(sDate,stime,value11,NumToStr(value12-value11,2)); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,0); Text_SetSize(tx,30); Text_SetBold(tx,1); } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value11); } } Plot1(c);