안녕하세요 예스스탁입니다. 이평과, 지표1~4는 축이 다른 값들이므로 각각 지표식으로 작성해 차트에 적용하셔야 합니다. 1-1. 지표식(이평) input : N(10); var : 이평(0),양봉수(0),음봉수(0),양봉몸통길이(0),음봉몸통길이(0); var : 매수호가잔량(0),매도호가잔량(0),양봉거래량(0),음봉거래량(0); var : 지표1(0),지표2(0),지표3(0),지표4(0); 이평 = ma(C,N); 양봉수 = countif(C>O,N); 음봉수 = countif(C<O,N); 양봉몸통길이 = accumN(iff(C>O,abs(C-O),0),N); 음봉몸통길이 = accumN(iff(C<O,abs(C-O),0),N); 매수호가잔량 = AccumN(bids,N); 매도호가잔량 = AccumN(asks,N); 양봉거래량 = accumN(iff(C>O,V,0),N); 음봉거래량 = accumN(iff(C<O,V,0),N); 지표1 = 양봉수/음봉수; 지표2 = 양봉몸통길이/음봉몸통길이; 지표3 = 매수호가잔량/매도호가잔량; 지표4 = 양봉거래량/음봉거래량; plot1(이평); 1-2 지표식(지표1,지표2,지표3,지표4) input : N(10); var : 이평(0),양봉수(0),음봉수(0),양봉몸통길이(0),음봉몸통길이(0); var : 매수호가잔량(0),매도호가잔량(0),양봉거래량(0),음봉거래량(0); var : 지표1(0),지표2(0),지표3(0),지표4(0); 이평 = ma(C,N); 양봉수 = countif(C>O,N); 음봉수 = countif(C<O,N); 양봉몸통길이 = accumN(iff(C>O,abs(C-O),0),N); 음봉몸통길이 = accumN(iff(C<O,abs(C-O),0),N); 매수호가잔량 = AccumN(bids,N); 매도호가잔량 = AccumN(asks,N); 양봉거래량 = accumN(iff(C>O,V,0),N); 음봉거래량 = accumN(iff(C<O,V,0),N); 지표1 = 양봉수/음봉수; 지표2 = 양봉몸통길이/음봉몸통길이; 지표3 = 매수호가잔량/매도호가잔량; 지표4 = 양봉거래량/음봉거래량; plot1(지표1); plot2(지표2); plot3(지표3); plot4(지표4); 1-3 시스템식 input : N(10); var : 이평(0),양봉수(0),음봉수(0),양봉몸통길이(0),음봉몸통길이(0); var : 매수호가잔량(0),매도호가잔량(0),양봉거래량(0),음봉거래량(0); 이평 = ma(C,N); 양봉수 = countif(C>O,N); 음봉수 = countif(C<O,N); 양봉몸통길이 = accumN(iff(C>O,abs(C-O),0),N); 음봉몸통길이 = accumN(iff(C<O,abs(C-O),0),N); 매수호가잔량 = AccumN(bids,N); 매도호가잔량 = AccumN(asks,N); 양봉거래량 = accumN(iff(C>O,V,0),N); 음봉거래량 = accumN(iff(C<O,V,0),N); value1 = iff(양봉수/음봉수 >= 1 ,1,0); value2 = iff(양봉몸통길이/음봉몸통길이 >= 1 ,1,0); value3 = iff(매수호가잔량/매도호가잔량 >= 1 ,1,0); value4 = iff(양봉거래량/음봉거래량 >= 1 ,1,0); if value1+value2+value3+value4 >= 3 Then buy("매수1"); if value1+value2+value3+value4 <= 1 Then sell("매도1"); if value1/value2 > 1 Then buy("매수2"); if value3/value4 > 1 Then sell("매도2"); 2-1 지표식(이평) input : MM(30),N(10); var : TF(0),cnt(0),Csum(0); var : 이평(0),양봉수(0),음봉수(0),양봉몸통길이(0),음봉몸통길이(0); var : 매수호가잔량(0),매도호가잔량(0),양봉거래량(0),음봉거래량(0); var : 지표1(0),지표2(0),지표3(0),지표4(0); Array : OO[50](0),CC[50](0),Bid[50](0),Ask[50](0),VV[50](0); TF = TimeToMinutes(stime)%MM; if dayindex == 0 or (TF < TF[1] and stime > stime[1]) Then{ OO[0] = O; VV[0] = 0; for cnt = 1 to 49{ OO[cnt] = OO[cnt-1][1]; CC[cnt] = CC[cnt-1][1]; bid[cnt] = bid[cnt-1][1]; ask[cnt] = ask[cnt-1][1]; } } CC[0] = C; Bid[0] = bids; Ask[0] = asks; VV[0] = VV[0] + V; Csum = 0; 양봉수 = 0; 음봉수 = 0; 양봉몸통길이 = 0; 음봉몸통길이 = 0; 매수호가잔량 = 0; 매도호가잔량 = 0; 양봉거래량 = 0; 음봉거래량 = 0; if CC[N] > 0 Then{ for cnt = 0 to N-1{ Csum = Csum+CC[cnt]; 매수호가잔량 = 매수호가잔량+Bid[cnt]; 매도호가잔량 = 매도호가잔량+Ask[cnt]; if CC[cnt] > OO[cnt] Then{ 양봉수 = 양봉수+1; 양봉몸통길이 = 양봉몸통길이+abs(CC[cnt]-OO[cnt]); 양봉거래량 = 양봉거래량+VV[0]; } if CC[cnt] < OO[cnt] Then{ 음봉수 = 음봉수+1; 음봉몸통길이 = 음봉몸통길이+abs(CC[cnt]-OO[cnt]); 음봉거래량 = 음봉거래량+VV[0]; } } 이평 = Csum/N; 지표1 = 양봉수/음봉수; 지표2 = 양봉몸통길이/음봉몸통길이; 지표3 = 매수호가잔량/매도호가잔량; 지표4 = 양봉거래량/음봉거래량; plot1(이평); } 2-2 지표식(지표1,지표2,지표3,지표4) input : MM(30),N(10); var : TF(0),cnt(0),Csum(0); var : 이평(0),양봉수(0),음봉수(0),양봉몸통길이(0),음봉몸통길이(0); var : 매수호가잔량(0),매도호가잔량(0),양봉거래량(0),음봉거래량(0); var : 지표1(0),지표2(0),지표3(0),지표4(0); Array : OO[50](0),CC[50](0),Bid[50](0),Ask[50](0),VV[50](0); TF = TimeToMinutes(stime)%MM; if dayindex == 0 or (TF < TF[1] and stime > stime[1]) Then{ OO[0] = O; VV[0] = 0; for cnt = 1 to 49{ OO[cnt] = OO[cnt-1][1]; CC[cnt] = CC[cnt-1][1]; bid[cnt] = bid[cnt-1][1]; ask[cnt] = ask[cnt-1][1]; } } CC[0] = C; Bid[0] = bids; Ask[0] = asks; VV[0] = VV[0] + V; Csum = 0; 양봉수 = 0; 음봉수 = 0; 양봉몸통길이 = 0; 음봉몸통길이 = 0; 매수호가잔량 = 0; 매도호가잔량 = 0; 양봉거래량 = 0; 음봉거래량 = 0; if CC[N] > 0 Then{ for cnt = 0 to N-1{ Csum = Csum+CC[cnt]; 매수호가잔량 = 매수호가잔량+Bid[cnt]; 매도호가잔량 = 매도호가잔량+Ask[cnt]; if CC[cnt] > OO[cnt] Then{ 양봉수 = 양봉수+1; 양봉몸통길이 = 양봉몸통길이+abs(CC[cnt]-OO[cnt]); 양봉거래량 = 양봉거래량+VV[0]; } if CC[cnt] < OO[cnt] Then{ 음봉수 = 음봉수+1; 음봉몸통길이 = 음봉몸통길이+abs(CC[cnt]-OO[cnt]); 음봉거래량 = 음봉거래량+VV[0]; } } 이평 = Csum/N; 지표1 = 양봉수/음봉수; 지표2 = 양봉몸통길이/음봉몸통길이; 지표3 = 매수호가잔량/매도호가잔량; 지표4 = 양봉거래량/음봉거래량; plot1(지표1); plot2(지표2); plot3(지표3); plot4(지표4); } 2-3 시스템식 input : MM(30),N(10); var : TF(0),cnt(0),Csum(0); var : 이평(0),양봉수(0),음봉수(0),양봉몸통길이(0),음봉몸통길이(0); var : 매수호가잔량(0),매도호가잔량(0),양봉거래량(0),음봉거래량(0); var : 지표1(0),지표2(0),지표3(0),지표4(0); Array : OO[50](0),CC[50](0),Bid[50](0),Ask[50](0),VV[50](0); TF = TimeToMinutes(stime)%MM; if dayindex == 0 or (TF < TF[1] and stime > stime[1]) Then{ OO[0] = O; VV[0] = 0; for cnt = 1 to 49{ OO[cnt] = OO[cnt-1][1]; CC[cnt] = CC[cnt-1][1]; bid[cnt] = bid[cnt-1][1]; ask[cnt] = ask[cnt-1][1]; } } CC[0] = C; Bid[0] = bids; Ask[0] = asks; VV[0] = VV[0] + V; Csum = 0; 양봉수 = 0; 음봉수 = 0; 양봉몸통길이 = 0; 음봉몸통길이 = 0; 매수호가잔량 = 0; 매도호가잔량 = 0; 양봉거래량 = 0; 음봉거래량 = 0; if CC[N] > 0 Then{ for cnt = 0 to N-1{ Csum = Csum+CC[cnt]; 매수호가잔량 = 매수호가잔량+Bid[cnt]; 매도호가잔량 = 매도호가잔량+Ask[cnt]; if CC[cnt] > OO[cnt] Then{ 양봉수 = 양봉수+1; 양봉몸통길이 = 양봉몸통길이+abs(CC[cnt]-OO[cnt]); 양봉거래량 = 양봉거래량+VV[0]; } if CC[cnt] < OO[cnt] Then{ 음봉수 = 음봉수+1; 음봉몸통길이 = 음봉몸통길이+abs(CC[cnt]-OO[cnt]); 음봉거래량 = 음봉거래량+VV[0]; } } 이평 = Csum/N; 지표1 = 양봉수/음봉수; 지표2 = 양봉몸통길이/음봉몸통길이; 지표3 = 매수호가잔량/매도호가잔량; 지표4 = 양봉거래량/음봉거래량; value1 = iff(지표1 >= 1 ,1,0); value2 = iff(지표2 >= 1 ,1,0); value3 = iff(지표3 >= 1 ,1,0); value4 = iff(지표4 >= 1 ,1,0); if value1+value2+value3+value4 >= 3 Then buy("매수1"); if value1+value2+value3+value4 <= 1 Then sell("매도1"); if value1/value2 > 1 Then buy("매수2"); if value3/value4 > 1 Then sell("매도2"); } 즐거운 하루되세요 > 미수예스 님이 쓴 글입니다. > 제목 : 봉갯수세기 > 아래와 같이 지표와 시스템을 작성해보고 싶습니다 1.일봉이며 10이평표시, 지표1(양봉수/음봉수), 지표2(양봉몸통길이/음봉몸통길이) 지표3(bids/asks), 지표4(양봉거래량/음봉거래량) 매수1 : 지표4가지중에서 3개이상 1보다 큰조건 만족할 경우 매도1 : 지표4가지중에서 3개이상 1보다 작은조건 만족할 경우 매수2 : 지표1/지표2가 1보다 큰경우 매도2 : 지표3/지표3가 1보다 큰경우 리버스 진입가능 2.5분봉차트에서 위조건과 동일하게 30분봉의 10이평 지표 및 매매