안녕하세요 예스스탁입니다. Input: len1(11), s1(0.36), s2(2.7); var : ii(0),j(0); array : hvalue[10,2](0),lvalue[10,2](0); If SwingHigh(1,high,len1,len1,len1*2+1)==len1 Then{ Var1=999999; For ii = 9 DownTo 1 { hvalue[ii,0]=hvalue[ii-1,0]; hvalue[ii,1]=hvalue[ii-1,1]; } hvalue[0,0]=SwingHigh(1,high,len1,len1,len1*2+1); hvalue[0,1]=index; For j = 1 To 9 { If hvalue[j,0] > hvalue[0,0] Then{ Var1=j; j=11; } } } If Var1<=10 Then Var10=(hvalue[0,0]-hvalue[Var1,0])/(hvalue[0,1]-hvalue[Var1,1])*SwingHigh(1,high,len1,len1,len1*2+1)+hvalue[0,0]; Else Var10=999999; If SwingLow(1,low,len1,len1,len1*2+1)==len1 Then{ Var2=999999; For ii = 9 downTo 1 { lvalue[ii,0]=lvalue[ii-1,0]; lvalue[ii,1]=lvalue[ii-1,1]; } lvalue[0,0]=SwingLow(1,low,len1,len1,len1*2+1); lvalue[0,1]=index; For j = 1 To 9{ If lvalue[j,0]<lvalue[0,0] Then{ Var2=j; j=11; } } } If Var2<=10 Then Var11=(lvalue[0,0]-lvalue[Var2,0])/(lvalue[0,1]-lvalue[Var2,1])* SwingLow(1,low,len1,len1,len1*2+1)+lvalue[0,0]; Else Var11=99999; If sdate<>sdate[1] Then{ Var50=TotalTrades; } If TotalTrades-var50 == 0 Then 즐거운 하루되세요 > rlaxoeh 님이 쓴 글입니다. > 제목 : ct인데요.. 예스로 바꿔 주세요 > 안녕 하세요 Input: len1(11), s1(0.36), s2(2.7) Set hvalue=Arrays(10,2) Set lvalue=Arrays(10,2) If shba(1,high,len1,len1)=len1 Then Var1=999999 For i = 9 To 1 Step - 1 hvalue(i,0)=hvalue(i-1,0) hvalue(i,1)=hvalue(i-1,1) Next hvalue(0,0)=shva(1,high,len1,len1) hvalue(0,1)=barnum For j = 1 To 9 If hvalue(j,0)>hvalue(0,0) Then Var1=j j=11 End If Next End If If Var1<=10 Then Var10=(hvalue(0,0)-hvalue(Var1,0))/(hvalue(0,1)-hvalue(Var1,1)) _ * shba(1,high,len1,len1)+hvalue(0,0) Else Var10=999999 End If If slba(1,low,len1,len1)=len1 Then Var2=999999 For i = 9 To 1 Step - 1 lvalue(i,0)=lvalue(i-1,0) lvalue(i,1)=lvalue(i-1,1) Next lvalue(0,0)=slva(1,low,len1,len1) lvalue(0,1)=barnum For j = 1 To 9 If lvalue(j,0)<lvalue(0,0) Then Var2=j j=11 End If Next End If If Var2<=10 Then Var11=(lvalue(0,0)-lvalue(Var2,0))/(lvalue(0,1)-lvalue(Var2,1)) _ * slba(1,low,len1,len1)+lvalue(0,0) Else Var11=99999 End If If tdate<>tdate(1) Then Var50=currententrynum End If If currententrynum-var50 = 0 Then