안녕하세요 예스스탁입니다. 수식상으로 특별히 문제가 있어 보이는 부분은 없습니다. 다만 션샤인 보조1호의 경우 data1의 값을 저장받는 변수는 선언하실때 (0,data1)로 하셔야 합니다. 그래야 [1],[2]로 이전값 참조를 할때 주중목 봉을 기준으로 한봉전 두봉전 값을 가져오게 됩니다. ##### 션샤인 보조_1호 ##### Input: DIP(28); var : DP10(0,data1),DM10(0,data1),ZZ1(0,data1),var6(0,data1),var11(0,data1); var : DP20(0,data2),DM20(0,data2),ZZ2(0,data2),VV6(0,data2),vv11(0,data2); ## data1 ## DP10 = data1(ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); DM10 = data1(ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); ZZ1 = data1(ema(accum(ema(ema(DP10-DM10, 2), 2)),20)); if ZZ1 > ZZ1[1] Then var6 = 1; Else var6 = 0; if var6 == 1 and var6[2] == 1 Then var11 = 1 ; if var6 == 0 and var6[2] == 0 Then var11 = -1; ## data2 ## DP20 = data2(ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); DM20 = data2(ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); ZZ2 = data2(ema(accum(ema(ema(DP20-DM20, 3), 3)),20)); if ZZ2 > ZZ2[1] Then vv6 = 1; Else vv6 = 0; if vv6 == 1 and vv6[2] == 1 Then vv11 = 1 ; if vv6 == 0 and vv6[2] == 0 Then vv11 = -1; ##### 션샤인 보조_2호 ##### input : short1(12),long1(26),signal1(9),af(0.8),maxaf(0.2); var : XX1(0,data1),YY1(0,data1),var7(0,data1),var8(0,data1),var9(0,data1),var12(0,data1); var : XX2(0,data2),YY2(0,data2),vv7(0,data2),vv8(0,data2),vv9(0,data2),vv12(0,data2); ## data1 ## var7 = data1(MACD(short1,long1)); var8 = data1(ema(var7,Signal1)); var9 = data1(sar(af,maxaf)); if var7 > var8 Then{ if C > var9 Then XX1 = 6; Else XX1 = 2; } Else{ if var9 > C Then XX1 = -6; Else XX1 = -2; } if var7 > 0 Then YY1 = 10; Else YY1 = -10; if (XX1+YY1)>0 Then var12 = 1; if (XX1+YY1)<0 Then var12 = -1; ## data2 ## vv7 = data2(MACD(short1,long1)); vv8 = data2(ema(vv7,Signal1)); vv9 = data2(sar(af,maxaf)); if vv7 > vv8 Then{ if C > vv9 Then XX2 = 6; Else XX2 = 2; } Else{ if vv9 > C Then XX2 = -6; Else XX2 = -2; } if vv7 > 0 Then YY2 = 10; Else YY2 = -10; if (XX2+YY2)>0 Then vv12 = 1; if (XX2+YY2)<0 Then vv12 = -1; 즐거운 하루되세요 > 조민철 님이 쓴 글입니다. > 제목 : 타주기 식 검증 > 항상 감사드립니다 아래 타주기챠트식에 대해 오류를 수정해주시기 바랍니다 ##### 션샤인 보조_1호 ##### Input: DIP(28); var : DP10(0,data2),DM10(0,data2),ZZ1(0,data1),var6(0,data2),var11(0,data2); var : DP20(0,data2),DM20(0,data2),ZZ2(0,data2),VV6(0,data2),vv11(0,data2); ## data1 ## DP10 = data1(ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); DM10 = data1(ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); ZZ1 = data1(ema(accum(ema(ema(DP10-DM10, 2), 2)),20)); if ZZ1 > ZZ1[1] Then var6 = 1; Else var6 = 0; if var6 == 1 and var6[2] == 1 Then var11 = 1 ; if var6 == 0 and var6[2] == 0 Then var11 = -1; ## data2 ## DP20 = data2(ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); DM20 = data2(ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),DIP)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),DIP)*100); ZZ2 = data2(ema(accum(ema(ema(DP20-DM20, 3), 3)),20)); if ZZ2 > ZZ2[1] Then vv6 = 1; Else vv6 = 0; if vv6 == 1 and vv6[2] == 1 Then vv11 = 1 ; if vv6 == 0 and vv6[2] == 0 Then vv11 = -1; ##### 션샤인 보조_2호 ##### input : short1(12),long1(26),signal1(9),af(0.8),maxaf(0.2); var : XX1(0,data1),YY1(0,data1),var7(0,data1),var8(0,data1),var9(0,data1),var12(0,data1); var : XX2(0,data2),YY2(0,data2),vv7(0,data2),vv8(0,data2),vv9(0,data2),vv12(0,data2); ## data1 ## var7 = data1(MACD(short1,long1)); var8 = data1(ema(var7,Signal1)); var9 = data1(sar(af,maxaf)); if var7 > var8 Then{ if C > var9 Then XX1 = 6; Else XX1 = 2; } Else{ if var9 > C Then XX1 = -6; Else XX1 = -2; } if var7 > 0 Then YY1 = 10; Else YY1 = -10; if (XX1+YY1)>0 Then var12 = 1; if (XX1+YY1)<0 Then var12 = -1; ## data2 ## vv7 = data2(MACD(short1,long1)); vv8 = data2(ema(vv7,Signal1)); vv9 = data2(sar(af,maxaf)); if vv7 > vv8 Then{ if C > vv9 Then XX2 = 6; Else XX2 = 2; } Else{ if vv9 > C Then XX2 = -6; Else XX2 = -2; } if vv7 > 0 Then YY2 = 10; Else YY2 = -10; if (XX2+YY2)>0 Then vv12 = 1; if (XX2+YY2)<0 Then vv12 = -1; 감사합니다