안녕하세요 예스스탁입니다. 1 input : 봉수(5); var : S(0),HH(0); s = S + 1; if S%봉수 == 0 Then HH = highest(H,봉수); Plot1(HH); FixPlotShift(1,-(봉수/2)); 2 input : 봉수(5); var : S(0),A(0),As(0),B(0),Bs(0); s = S + 1; if S%봉수 == 1 Then { A = O; As = S; } if S%봉수 == 0 Then { B = C; Bs = S; } var1 = iff(봉수-1 < 0,0,봉수-1); var2 = iff(봉수-2 < 0,0,봉수-2); var3 = iff(봉수-3 < 0,0,봉수-3); var4 = iff(봉수-4 < 0,0,봉수-4); var5 = iff(봉수-2 < 0,0,봉수-2); if As < bs Then { Plot1(A); Plot2(A); Plot3(A); Plot4(A); Plot5(A); } FixPlotShift(1,-var1); FixPlotShift(2,-var2); FixPlotShift(3,-var3); FixPlotShift(4,-var4); 3 input : 봉수(5); var : S(0),A(0),As(0),B(0),Bs(0); s = S + 1; if S%봉수 == 1 Then { A = O; As = S; } if S%봉수 == 0 Then { B = C; Bs = S; } var1 = iff(봉수-1 < 0,0,봉수-1); var2 = iff(봉수-2 < 0,0,봉수-2); var3 = iff(봉수-3 < 0,0,봉수-3); var4 = iff(봉수-4 < 0,0,봉수-4); var5 = iff(봉수-2 < 0,0,봉수-2); if As < bs Then { Plot1(B); Plot2(B); Plot3(B); Plot4(B); Plot5(B); } FixPlotShift(1,-var1); FixPlotShift(2,-var2); FixPlotShift(3,-var3); FixPlotShift(4,-var4); 4 input : 봉수(5); var : S(0),A(0),As(0),B(0),Bs(0); s = S + 1; if S%봉수 == 1 Then { A = O; As = S; } if S%봉수 == 0 Then { B = C; Bs = S; } var1 = iff(봉수-1 < 0,0,봉수-1); var2 = iff(봉수-2 < 0,0,봉수-2); var3 = iff(봉수-3 < 0,0,봉수-3); var4 = iff(봉수-4 < 0,0,봉수-4); var5 = iff(봉수-2 < 0,0,봉수-2); if As < bs Then { Plot1(min(A,B)); Plot2(min(A,B)); Plot3(min(A,B)); Plot4(min(A,B)); Plot5(min(A,B)); } FixPlotShift(1,-var1); FixPlotShift(2,-var2); FixPlotShift(3,-var3); FixPlotShift(4,-var4); 5 input : 봉수(5); var : S(0),A(0),As(0),B(0),Bs(0),LL(0); s = S + 1; if S%봉수 == 1 Then { A = O; As = S; } if S%봉수 == 0 Then { B = C; Bs = S; LL = lowest(L,봉수); } if As < bs Then { Plot1(min(A,B)); Plot2(LL); } FixPlotShift(1,-(봉수/2)); FixPlotShift(2,-(봉수/2)); 6 input : short(12),long(26),signal(8),증폭(10); var : MACDV(0),MACDS(0),A(0),MC1(0),PP(0),MC2(0),MM(0); MACDV = macd(short,long); MACDS = ema(MACDV,signal); A = MACDV-MACDS; if CrossUp(A,0) Then MC1 = O; PP = MC1-A*증폭; if CrossDown(A,0) Then MC2 = c; MM = MC2+A*(-증폭); if A > 0 Then var1 = PP; Else var1 = MM; Plot1(var1); if var1 > var1[1] Then var2 = var1; if var1 < var1[1] Then var3 = var1; Plot2(var2); plot3(Var3); 7 input : short(12),long(26),signal(8),증폭(10); var : MACDV(0),MACDS(0),A(0),MC1(0),PP(0),MC2(0),MM(0),b(0); MACDV = macd(short,long); MACDS = ema(MACDV,signal); A = MACDV-MACDS; if CrossUp(A,0) Then MC1 = O; PP = MC1-A*증폭; if CrossDown(A,0) Then MC2 = c; MM = MC2+A*(-증폭); if A > 0 Then var1 = PP; Else var1 = MM; Var2 = Ema(var1,signal); Plot1(var1); Plot2(var2); 즐거운 하루되세요 > 이대표 님이 쓴 글입니다. > 제목 : 수식전환 부탁요 > 다음 수식을 예스수식으로 전환부탁드립니다. <1> s=sum(1); HH=valuewhen(1,s%봉수==0,Highest(H,봉수)); shift(if(s%봉수==0,HH,0),-(봉수/2)) 지표설정 봉수 5 <2> 수식1 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-1)<0, 0, (봉수-1)); shift(if(As<Bs,A,0),-D) 수식2 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-2)<0, 0, (봉수-2)); shift(if(As<Bs,A,0),-D) 수식3 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-3)<0, 0, (봉수-3)); shift(if(As<Bs,A,0),-D) 수식4 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-4)<0, 0, (봉수-4)); shift(if(As<Bs,A,0),-D) 수식5 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); if(As<Bs,A,0) 봉수 5 <3> 수식1 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-1)<0, 0, (봉수-1)); shift(if(As<Bs,B,0),-D) 수식2 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-2)<0, 0, (봉수-2)); shift(if(As<Bs,B,0),-D) 수식3 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-3)<0, 0, (봉수-3)); shift(if(As<Bs,B,0),-D) 수식4 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-4)<0, 0, (봉수-4)); shift(if(As<Bs,B,0),-D) 수식5 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); if(As<Bs,B,0) 봉수 5 <4> 수식1 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-1)<0, 0, (봉수-1)); shift(if(As<Bs,min(A,B),0),-D) 수식2 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-2)<0, 0, (봉수-2)); shift(if(As<Bs,min(A,B),0),-D) 수식3 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-3)<0, 0, (봉수-3)); shift(if(As<Bs,min(A,B),0),-D) 수식4 s=sum(1); A=valuewhen(1,s%봉수==1,O);ㅃ As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); D=if((봉수-4)<0, 0, (봉수-4)); shift(if(As<Bs,min(A,B),0),-D) 수식5 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); if(As<Bs,min(A,B),0) 봉수 5 <5> 수식1 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); shift(if(As<Bs,min(A,B),0),-(봉수/2)) 수식2 s=sum(1); A=valuewhen(1,s%봉수==1,O); As=valuewhen(1,s%봉수==1,s); B=valuewhen(1,s%봉수==0,C); Bs=valuewhen(1,s%봉수==0,s); LL=Valuewhen(1,s%봉수==0,Lowest(L,봉수)); shift(if(As<Bs,LL,0),-(봉수/2)) 봉수 5 <6> 수식1 A = MACD(short,long)-eavg(MACD(short,long),signal); Mc1 = ValueWhen(1, CrossUp(A, 0), O); P = Mc1 - A*증폭; Mc2 = ValueWhen(1, CrossDown(A, 0), C); M = Mc2 + A*(-증폭); b=if(A>0, P, M) 수식2 if(b>b(1),b,0) 수식3 if(b<b(1),b,0) short 12 long 26 signal 9 증폭 10 <7> 수식1 A = MACD(short,long); Mc1 = ValueWhen(1, CrossUp(A, 0), (C+O)/2); P = Mc1 - A*증폭; Mc2 = ValueWhen(1, CrossDown(A, 0), (C+O)/2); M = Mc2 + A*(-증폭); if(A>0, P, M) 수식2 A = MACD(short,long); Mc1 = ValueWhen(1, CrossUp(A, 0), (C+O)/2); P = Mc1 - A*증폭; Mc2 = ValueWhen(1, CrossDown(A, 0), (C+O)/2); M = Mc2 + A*(-증폭); eavg(if(A>0, P, M), signal) short 12 long 26 signal 9 증폭 10