수고가 많으십니다.
키움에서 사용하는 요일함수입니다. 이것을 예스수식 사용자함수로 변환해주시면 감사하겠습니다.

함수명: 요일(D)

M= floor(D/100)%100;
YY=if((M+1-1) == 1 or (M+1-1) == 2, floor(D/10000)-1, floor(D/10000));
YA=floor(YY/100);
YB=YY%100;
MM=if((M+1-1) == 1, 13, if((M+1-1) == 2, 14, M));
DD= D%100;
A=(DD + floor(13*(MM+1)/5) + YB + floor(YB/4) + floor(YA/4) + YA*5)%7;
if(A==0, 6, A-1)