안녕하세요 예스스탁입니다. var : mav1(0),mav2(0),mav3(0),T1(0),T2(0),T3(0); var : bTL1(0),bTL2(0),bTL3(0); var : sTL1(0),sTL2(0),sTL3(0); mav1 = ma(c,5); mav2 = ma(c,20); mav3 = ma(c,60); if mav1 > mav1[1] Then T1 = 1; if mav1 < mav1[1] Then T1 = -1; if T1 == 1 and T1[1] != 1 Then var1 = 0; // if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav3 > mav3[1] Then{ 60이평포함 if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav1 > mav2 Then { var1 = var1+1; if MarketPosition <= 0 and var1 == 1 Then { buy("5매수"); value11 = sDate; value12 = sTime; value13 = H; value14 = (H+L)/2; value15 = L; TL_Delete(bTL1); TL_Delete(bTL2); TL_Delete(bTL3); bTL1 = TL_New(value11,value12,value13,NextBarSdate,NextBarStime,value13); bTL2 = TL_New(value11,value12,value14,NextBarSdate,NextBarStime,value14); bTL3 = TL_New(value11,value12,value15,NextBarSdate,NextBarStime,value15); TL_SetExtRight(bTL1,true); TL_SetExtRight(bTL2,true); TL_SetExtRight(bTL3,true); TL_SetColor(bTL1,Red); TL_SetColor(bTL2,Red); TL_SetColor(bTL3,Red); } } if MarketPosition == 1 Then { if H > value13 Then value13 = H; if L < value15 Then value15 = L; value14 = (value13+value15)/2; TL_SetBegin(bTL1,value11,value12,value13); TL_SetBegin(bTL2,value11,value12,value14); TL_SetBegin(bTL3,value11,value12,value15); TL_SetEnd(bTL1,NextBarSdate,NextBarStime,value13); TL_SetEnd(bTL2,NextBarSdate,NextBarStime,value14); TL_SetEnd(bTL3,NextBarSdate,NextBarStime,value15); } if T1 == -1 and T1[1] != -1 Then var2 = 0; // if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav3 < mav3[1] Then{ 60이평포함 if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav1 < mav2 Then { var2 = var2+1; if MarketPosition >= 0 and var2 == 1 Then { sell("5매도"); value21 = sDate; value22 = sTime; value23 = H; value24 = (H+L)/2; value25 = L; TL_Delete(sTL1); TL_Delete(sTL2); TL_Delete(sTL3); sTL1 = TL_New(value21,value22,value23,NextBarSdate,NextBarStime,value23); sTL2 = TL_New(value21,value22,value24,NextBarSdate,NextBarStime,value24); sTL3 = TL_New(value21,value22,value25,NextBarSdate,NextBarStime,value25); TL_SetExtRight(sTL1,true); TL_SetExtRight(sTL2,true); TL_SetExtRight(sTL3,true); TL_SetColor(sTL1,Blue); TL_SetColor(sTL2,Blue); TL_SetColor(sTL3,Blue); } } if MarketPosition == -1 Then { if H > value23 Then value23 = H; if L < value25 Then value25 = L; value24 = (value23+value25)/2; TL_SetBegin(sTL1,value21,value22,value23); TL_SetBegin(sTL2,value21,value22,value24); TL_SetBegin(sTL3,value21,value22,value25); TL_SetEnd(sTL1,NextBarSdate,NextBarStime,value23); TL_SetEnd(sTL2,NextBarSdate,NextBarStime,value24); TL_SetEnd(sTL3,NextBarSdate,NextBarStime,value25); } 즐거운 하루되세요 > 라몬 님이 쓴 글입니다. > 제목 : 확인 부탁드립니다. > 안녕하세요 아래 수식을 다시한번 확인 부탁드립니다. 글로 표현하자니 제가 잘 표현하지 못한것 같습니다. 매도(매수)신호 1봉의 3등분이 아니라 매도신호봉과 매수신호봉까지의 고가,중심,저가 입니다. 감사합니다 var : mav1(0),mav2(0),mav3(0),T1(0),T2(0),T3(0); var : bTL1(0),bTL2(0),bTL3(0); var : sTL1(0),sTL2(0),sTL3(0); mav1 = ma(c,5); mav2 = ma(c,20); mav3 = ma(c,60); if mav1 > mav1[1] Then T1 = 1; if mav1 < mav1[1] Then T1 = -1; if T1 == 1 and T1[1] != 1 Then var1 = 0; // if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav3 > mav3[1] Then{ 60이평포함 if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav1 > mav2 Then { var1 = var1+1; if MarketPosition <= 0 and var1 == 1 Then { buy("5매수"); value1 = H; value2 = (H+L)/2; value3 = L; TL_Delete(bTL1); TL_Delete(bTL2); TL_Delete(bTL3); bTL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1); bTL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2); bTL3 = TL_New(sDate,sTime,value3,NextBarSdate,NextBarStime,value3); TL_SetExtRight(bTL1,true); TL_SetExtRight(bTL2,true); TL_SetExtRight(bTL3,true); TL_SetColor(bTL1,Red); TL_SetColor(bTL2,Red); TL_SetColor(bTL3,Red); } } if T1 == -1 and T1[1] != -1 Then var2 = 0; // if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav3 < mav3[1] Then{ 60이평포함 if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav1 < mav2 Then { var2 = var2+1; if MarketPosition >= 0 and var2 == 1 Then { sell("5매도"); value4 = H; value5 = (H+L)/2; value6 = L; TL_Delete(sTL1); TL_Delete(sTL2); TL_Delete(sTL3); sTL1 = TL_New(sDate,sTime,value4,NextBarSdate,NextBarStime,value4); sTL2 = TL_New(sDate,sTime,value5,NextBarSdate,NextBarStime,value5); sTL3 = TL_New(sDate,sTime,value6,NextBarSdate,NextBarStime,value6); TL_SetExtRight(sTL1,true); TL_SetExtRight(sTL2,true); TL_SetExtRight(sTL3,true); TL_SetColor(sTL1,Blue); TL_SetColor(sTL2,Blue); TL_SetColor(sTL3,Blue); } }