커뮤니티

수식 부탁드립니다.

프로필 이미지
천년대로
2024-10-28 08:36:07
628
글번호 184636
답변완료
안녕하세요? 아래의 수식을 적용했는데 점크기와 점색상과 경고소리의 반응이 전혀 없어요! 여러가지 사운드의 파일을 변화시켜 적용해보고, 잠크기와, 색상도 조정해 봤는데도 점크기, 색상변화가 없는데 다시 점검부탁드리겠습니다. 여러번 부탁드려서 죄송합니다, 마지막으로 점검 부탁합니다. 감사합니다. input : Period(250),선두께(3); Var:상승색(LightGreen), 하락색(Blue); Var: 점크기(50),상승점(Red), 하락점(Blue); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0),tl9(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); var : box1(0),box2(0),box3(0),box4(0); Plot1(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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; box1 = Box_New(sdate,stime,LoVal[0]-0.25,NextBarSdate,NextBarStime,LoVal[0]-0.50); Box_SetColor(box1,Green); Box_SetFill(box1,true); box2 = box1[1]; Box_SetEnd(box2,Sdate,Stime,LoVal[1]-0.50); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Box_SetBegin(box1,sDate,sTime,LoVal[0]-0.25); Box_SetEnd(box2,Sdate,Stime,LoVal[1]-0.50); } } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; box3 = Box_New(sdate,stime,HiVal[0]+0.25,NextBarSdate,NextBarStime,HiVal[0]+0.50); Box_SetColor(box3,Yellow); Box_SetFill(box3,true); box4 = box3[1]; Box_SetEnd(box3,Sdate,Stime,HiVal[1]+0.50); } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Box_SetBegin(box3,sDate,sTime,HiVal[0]+0.25); Box_SetEnd(box4,Sdate,Stime,HiVal[1]+0.50); } } Box_SetEnd(box1,NextBarSdate,NextBarStime,LoVal[0]-0.5); Box_SetEnd(box3,NextBarSdate,NextBarStime,HiVal[0]+0.5); TL_SetSize(TL1,선두께); var : tx99(0); if T == -1 and T != T[1] Then { tx99 = text_new(sDate,sTime,L,"■"); Text_SetStyle(tx,2,0); Text_SetColor(tx,하락점); Text_SetSize(Tx,점크기); if NextBarOpen > 0 Then { PlaySound("C:NHTader₩data₩Sound₩sound8.wav"); } } if T == 1 and T != T[1] Then { tx99 = text_new(sDate,sTime,L,"■"); Text_SetStyle(tx,2,0); Text_SetColor(tx,상승점); Text_SetSize(Tx,점크기); if NextBarOpen > 0 Then { PlaySound("C:₩NHTrader₩data₩Sound₩sound8.wav"); } }
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2024-10-28 11:43:38

안녕하세요 예스스탁입니다. 점크기와 색상변경 부분을 수정해 드립니다. 소리는 봉완성시에 조건충족하면 1회 출력하게 되어 있습니다. 미완성시에 조건이 충족되면 출력되게 해드립니다. input : Period(250),선두께(3); Var:상승색(LightGreen), 하락색(Blue); Var: 점크기(20),상승점(Red), 하락점(Blue); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0),tl9(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); var : box1(0),box2(0),box3(0),box4(0); Plot1(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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; box1 = Box_New(sdate,stime,LoVal[0]-0.25,NextBarSdate,NextBarStime,LoVal[0]-0.50); Box_SetColor(box1,Green); Box_SetFill(box1,true); box2 = box1[1]; Box_SetEnd(box2,Sdate,Stime,LoVal[1]-0.50); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Box_SetBegin(box1,sDate,sTime,LoVal[0]-0.25); Box_SetEnd(box2,Sdate,Stime,LoVal[1]-0.50); } } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; box3 = Box_New(sdate,stime,HiVal[0]+0.25,NextBarSdate,NextBarStime,HiVal[0]+0.50); Box_SetColor(box3,Yellow); Box_SetFill(box3,true); box4 = box3[1]; Box_SetEnd(box3,Sdate,Stime,HiVal[1]+0.50); } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Box_SetBegin(box3,sDate,sTime,HiVal[0]+0.25); Box_SetEnd(box4,Sdate,Stime,HiVal[1]+0.50); } } Box_SetEnd(box1,NextBarSdate,NextBarStime,LoVal[0]-0.5); Box_SetEnd(box3,NextBarSdate,NextBarStime,HiVal[0]+0.5); TL_SetSize(TL1,선두께); var : tx99(0); if T == -1 and T != T[1] Then { tx99 = text_new(sDate,sTime,L,"■"); Text_SetStyle(tx99,2,0); Text_SetColor(tx99,하락점); Text_SetSize(tx99,점크기); PlaySound("C:NHTader₩data₩Sound₩sound8.wav"); } if T == 1 and T != T[1] Then { tx99 = text_new(sDate,sTime,L,"■"); Text_SetStyle(tx99,2,0); Text_SetColor(tx99,상승점); Text_SetSize(tx99,점크기); PlaySound("C:₩NHTrader₩data₩Sound₩sound8.wav"); } 즐거운 하루되세요 > 천년대로 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다. > 안녕하세요? 아래의 수식을 적용했는데 점크기와 점색상과 경고소리의 반응이 전혀 없어요! 여러가지 사운드의 파일을 변화시켜 적용해보고, 잠크기와, 색상도 조정해 봤는데도 점크기, 색상변화가 없는데 다시 점검부탁드리겠습니다. 여러번 부탁드려서 죄송합니다, 마지막으로 점검 부탁합니다. 감사합니다. input : Period(250),선두께(3); Var:상승색(LightGreen), 하락색(Blue); Var: 점크기(50),상승점(Red), 하락점(Blue); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0),tl9(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); var : box1(0),box2(0),box3(0),box4(0); Plot1(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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; box1 = Box_New(sdate,stime,LoVal[0]-0.25,NextBarSdate,NextBarStime,LoVal[0]-0.50); Box_SetColor(box1,Green); Box_SetFill(box1,true); box2 = box1[1]; Box_SetEnd(box2,Sdate,Stime,LoVal[1]-0.50); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Box_SetBegin(box1,sDate,sTime,LoVal[0]-0.25); Box_SetEnd(box2,Sdate,Stime,LoVal[1]-0.50); } } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; box3 = Box_New(sdate,stime,HiVal[0]+0.25,NextBarSdate,NextBarStime,HiVal[0]+0.50); Box_SetColor(box3,Yellow); Box_SetFill(box3,true); box4 = box3[1]; Box_SetEnd(box3,Sdate,Stime,HiVal[1]+0.50); } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Box_SetBegin(box3,sDate,sTime,HiVal[0]+0.25); Box_SetEnd(box4,Sdate,Stime,HiVal[1]+0.50); } } Box_SetEnd(box1,NextBarSdate,NextBarStime,LoVal[0]-0.5); Box_SetEnd(box3,NextBarSdate,NextBarStime,HiVal[0]+0.5); TL_SetSize(TL1,선두께); var : tx99(0); if T == -1 and T != T[1] Then { tx99 = text_new(sDate,sTime,L,"■"); Text_SetStyle(tx,2,0); Text_SetColor(tx,하락점); Text_SetSize(Tx,점크기); if NextBarOpen > 0 Then { PlaySound("C:NHTader₩data₩Sound₩sound8.wav"); } } if T == 1 and T != T[1] Then { tx99 = text_new(sDate,sTime,L,"■"); Text_SetStyle(tx,2,0); Text_SetColor(tx,상승점); Text_SetSize(Tx,점크기); if NextBarOpen > 0 Then { PlaySound("C:₩NHTrader₩data₩Sound₩sound8.wav"); } }