안녕하세요 예스스탁입니다. Input: len(3.2), len1(0.34 ), len2(0.07); var : cond1(false),cond2(false); If opend(0)>closed(1) then{ Var1=(highd(1)+closed(1)+2*lowd(1))/2-lowd(1); Var2=(highd(1)+closed(1)+2*lowd(1))/2-highd(1); } Else if opend(0)<closed(1) then{ Var1=(2*highd(1)+closed(1)+lowd(1))/2-lowd(1); Var2=(2*highd(1)+closed(1)+lowd(1))/2-highd(1); } Else{ Var1=(highd(1)+2*closed(1)+lowd(1))/2-lowd(1); Var2=(highd(1)+2*closed(1)+lowd(1))/2-highd(1); } Var3=(Var1+var2)/2; Cond1 = sdate==exitdate(1) And marketposition(1)==1; Cond2 = sdate==exitdate(1) And marketposition(1)==-1; If stime < 150000 then{ If Cond1==False then{ If opend(0)>var1 then{ buy("매수1",Atstop,opend(0)+(Var1-var2)*len1); } If opend(0)<=var1 And opend(0)>=var2 then{ If lowd(0)<var2 And high<var2+(Var1-var2)*len1 then{ buy("역매수",Atstop,Var2+(Var1-var2)*len2); } } If opend(0)<var2 then{ buy("매수2",Atstop,Var2); } } If Cond2==False then{ If opend(0)>var1 then{ sell("매도1",Atstop,Var1); } If opend(0)<=var1 And opend(0)>=var2 then{ If highd(0)>var1 And low>var1-(Var1-var2)*len1 then{ sell("역매도",Atstop,Var1-(Var1-var2)*len2); } } If opend(0)<var2 then{ sell("매도2",Atstop,opend(0)-(Var1-var2)*len1); } } } If MarketPosition<>0 then{ exitlong("매수청산",Atstop,Highest(high,barssinceentry+1)-atr(20)*len); exitshort("매도청산",Atstop,Lowest(low,BarsSinceEntry+1)+atr(20)*len); } 즐거운 하루되세요 > leekss1 님이 쓴 글입니다. > 제목 : 예스랭귀지로----------- > 수고하십니다 예스랭귀지로변경해 주실수있나요 Input: len(3.2), len1(0.34 ), len2(0.07) If opend>closed(1) Then Var1=(highd(1)+closed(1)+2*lowd(1))/2-lowd(1) Var2=(highd(1)+closed(1)+2*lowd(1))/2-highd(1) Elseif opend<closed(1) Then Var1=(2*highd(1)+closed(1)+lowd(1))/2-lowd(1) Var2=(2*highd(1)+closed(1)+lowd(1))/2-highd(1) Else Var1=(highd(1)+2*closed(1)+lowd(1))/2-lowd(1) Var2=(highd(1)+2*closed(1)+lowd(1))/2-highd(1) End If Var3=(Var1+var2)/2 Cond1= tdate=exitdate(1) And position(1)=1 Cond2= tdate=exitdate(1) And position(1)=-1 If ttime<1500 Then If Cond1=False Then If opend>var1 Then Call buy("매수1",Atstop,Def,opend+(Var1-var2)*len1) End If If opend<=var1 And opend>=var2 Then If lowd<var2 And high<var2+(Var1-var2)*len1 Then Call buy("역매수",Atstop,Def,Var2+(Var1-var2)*len2) End If End If If opend<var2 Then Call buy("매수2",Atstop,Def,Var2) End If End If If Cond2=False Then If opend>var1 Then Call sell("매도1",Atstop,Def,Var1) End If If opend<=var1 And opend>=var2 Then If highd>var1 And low>var1-(Var1-var2)*len1 Then Call sell("역매도",Atstop,Def,Var1-(Var1-var2)*len2) End If End If If opend<var2 Then Call sell("매도2",Atstop,Def,opend-(Var1-var2)*len1) End If End If End If If position<>0 Then Call exitlong("매수청산",Atstop,hhv(1,high,barnumsinceentry+1)-atr(20)*len) Call exitshort("매도청산",Atstop,llv(1,low,barnumsinceentry+1)+atr(20)*len) End If