안녕하세요 예스스탁입니다. Var : value(0),T(0); var : hh(0),hd(0),ht(0),ll(0),ld(0),lt(0); var : tx1(0),tx2(0),tl1(0),tl2(0); value = 0; # 매수 / 매도청산 If CCI(9) > 0 Then value = 1; If MACD(12,26) > 0 Then value = value+1; If DIPlus(14) > DIMinus(14) Then value = value+1; If StochasticsK(12,5) > StochasticsD(12,5,5) Then value = value+1; # 매수/매도청산 If T <= 0 and value >= 3 Then { T = 1; Buy(); } value = 0; # 매도/매수청산 If CCI(9) < 0 Then value = 1; If MACD(12,26) < 0 Then value = value+1; If DIPlus(14) < DIMinus(14) Then value = value+1; If StochasticsK(12,5) < StochasticsD(12,5,5) Then value = value+1; If T >= 0 and value >= 3 Then { T = -1; Sell(); } if t == 1 and t != t[1] Then { hh = h; hd = sDate; ht = sTime; TL_SetColor(TL2,Red); if ll > 0 Then { value1 = ld; value2 = lt; value3 = ll; TL1 = TL_New(value1,Value2,Value3,sDate,sTime,Value3); TL_SetColor(TL1,Lime); TX1 = Text_New(sDate,sTime,Value3,NumToStr(Value3,2)); Text_SetStyle(TX1,2,0); } } Else { TL_SetEnd(TL1,sDate,stime,Value3); Text_SetLocation(TL1,sDate,stime,Value3); } if t == -1 and t != t[1] then { ll = l; ld = sDate; lt = sTime; TL_SetColor(TL1,Blue); if hh > 0 Then { value4 = hd; value5 = ht; value6 = hh; TL2 = TL_New(value4,Value5,Value6,sDate,sTime,Value6); TL_SetColor(TL2,Lime); TX2 = Text_New(sDate,sTime,Value6,NumToStr(Value6,2)); Text_SetStyle(TX2,2,1); } } Else { TL_SetEnd(TL2,sDate,sTime,Value6); Text_SetLocation(TX2,sDate,sTime,Value6); } if t == 1 Then { if h > hh Then { hh = h; hd = sDate; ht = sTime; } } if t == -1 Then { if l < ll Then { ll = l; ld = sDate; lt = sTime; } } 즐거운 하루되세요