в B0 будет храниться нужная дата
!?OBx/y/l;
!!PO998:B0/?y1;
!!VRy2:Sc;
!!IF&y1<=y2/y1>0:M^Вот вы и пришли^;
!!FU&y1<=y2/y1>0:E;
!!IF&y1=0:M^приходите через неделю^;
!!VRy3&y1=0:Sy2 +7;
!!PO998&y1=0:B0/y3;
!!FU&y1=0:E;
!!VRy3:Sy1 -y2;
!!IF&y3=7:M^через 7 дней приходите^;
!!IF&y3=6:M^через 6 дней приходите^;
.....
!!IF&y3=1:M^приходите завтра^;