안녕하세요 예스스탁입니다. 소리출력함수(playsound)는 함수내에 지정한 경로의 wav파일이 구동됩니다. 아래는 예스트레이더에 기본으로 제공되는 wav파일을 지정했습니다. 원하시는 wav파일의 경로와 이름으로 수정하시기 바랍니다. 게시판에서 식을 복사할 경우 경로명 중 ￦의 폰트가 깨질수 있으므로 ￦는 다시 타이핑하시기 바랍니다. input : N(10); var : ii(0),TF(0),TL(0),Box1(0),Box2(0),cnt(0); var : h5(0),l5(0),m5(0),TX(0),clr(0),clr1(0),sound(False); Array : HH[10](0),LL[10](0); if Bdate != Bdate[1] Then ii = 0; Else ii = ii +1; TF = ii%N; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1] and TF > -1) Then { var1 = O; Var2 = H; Var3 = L; var11 = var1[1]; Var4 = (Var2+Var3)/2; Var41 = Var4[1]; For cnt = 9 downto 1 { HH[cnt] = HH[cnt-1]; LL[cnt] = LL[cnt-1]; } hh[0] = Var2; ll[0] = Var3; h5 = 0; l5 = 0; For cnt = 1 to 5 { if h5 == 0 or (h5 > 0 and hh[cnt] > h5) Then h5 = hh[cnt]; if l5 == 0 or (l5 > 0 and ll[cnt] < l5) Then l5 = ll[cnt]; } m5 = (h5+l5)/2; value1 = sDate; Value2 = sTime; TL = TL_new(sDate,sTime,var4,NextBarSdate,NextBarStime,var4); TL_SetColor(TL,Green); TL_SetSize(TL,1); Box1 = Box_New(sDate,sTime,var2,NextBarSdate,NextBarStime,Var3); if var4 > m5 Then Box_SetColor(Box1,Red); Else Box_SetColor(Box1,Blue); Box_SetFill(Box1,true); TX = Text_New(sDate,sTime,L,NumToStr(TF+1,0)); Text_SetStyle(tx,2,0); Text_SetSize(tx,12); clr1 = clr[1]; sound = False; } Else { if H > Var2 Then Var2 = H; if L < var3 Then Var3 = L; Var4 = (Var2+Var3)/2; TL_SetBegin(TL,value1,Value2,var4); TL_SetEnd(TL,NextBarSdate,NextBarStime,var4); Box_SetBegin(Box1,value1,Value2,Var2); Box_SetEnd(Box1,NextBarSdate,NextBarStime,Var3); if var4 > m5 Then { clr = Red; } Else { clr = Blue; } Box_SetColor(Box1,clr); hh[0] = Var2; ll[0] = Var3; TX = Text_New(sDate,sTime,L,NumToStr(TF+1,0)); Text_SetStyle(tx,2,0); Text_SetSize(tx,12); } if NextBarOpen > 0 and sound == False and clr != clr1 Then { sound = true; PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); } //Plot1(m5); 즐거운 하루되세요 > 새벽에 님이 쓴 글입니다. > 제목 : 문의드립니다 > 안녕하세요? 1. 아래수식에 사진과같이 봉숫자가 새겨지길 원합니다 글자크기는 조정가능하도록 부탁드립니다 2.10개의 봉으로 이루어진 빨강박스들이 이어지다가 파란색박스가 만들어지는시점 그리고 파란박스후 빨간박스가시작되는시점 알림음을 1회만울리게 부탁드립니다 감사합니다 input : N(10); var : ii(0),TF(0),TL(0),Box1(0),Box2(0),cnt(0); var : h5(0),l5(0),m5(0); Array : HH[10](0),LL[10](0); if Bdate != Bdate[1] Then ii = 0; Else ii = ii +1; TF = ii%N; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1] and TF > -1) Then { var1 = O; Var2 = H; Var3 = L; var11 = var1[1]; Var4 = (Var2+Var3)/2; Var41 = Var4[1]; For cnt = 9 downto 1 { HH[cnt] = HH[cnt-1]; LL[cnt] = LL[cnt-1]; } hh[0] = Var2; ll[0] = Var3; h5 = 0; l5 = 0; For cnt = 1 to 5 { if h5 == 0 or (h5 > 0 and hh[cnt] > h5) Then h5 = hh[cnt]; if l5 == 0 or (l5 > 0 and ll[cnt] < l5) Then l5 = ll[cnt]; } m5 = (h5+l5)/2; value1 = sDate; Value2 = sTime; TL = TL_new(sDate,sTime,var4,NextBarSdate,NextBarStime,var4); TL_SetColor(TL,Green); TL_SetSize(TL,1); Box1 = Box_New(sDate,sTime,var2,NextBarSdate,NextBarStime,Var3); if var4 > m5 Then Box_SetColor(Box1,Red); Else Box_SetColor(Box1,Blue); Box_SetFill(Box1,true); } Else { if H > Var2 Then Var2 = H; if L < var3 Then Var3 = L; Var4 = (Var2+Var3)/2; TL_SetBegin(TL,value1,Value2,var4); TL_SetEnd(TL,NextBarSdate,NextBarStime,var4); Box_SetBegin(Box1,value1,Value2,Var2); Box_SetEnd(Box1,NextBarSdate,NextBarStime,Var3); if var4 > m5 Then Box_SetColor(Box1,Red); Else Box_SetColor(Box1,Blue); hh[0] = Var2; ll[0] = Var3; } //Plot1(m5);