NK model with credit

Guys, I’m trying to replicate a NewKeynesian Model with credits.
I can not understand why it run, but it’s completely wrong.
Ps. I’m a novice of dynare!
This is my .mod file:

var c y r pi i ls ld d im efp; 

varexo e u v; 
 
parameters sigma varphi beta phipi phiy epsilon alpha theta gamma thetac alphac gammac;

sigma = 1;
varphi = 1;
beta = 0.99;
phipi = 1.05;
phiy=0.27;
epsilon=6;
alpha=1/3;
theta=2/3;
thetac= 0.48; 
alphac=  1.2;
gammac= 0.1;


model(linear);

#bigtheta=(1-alpha)/(1-alpha+alpha*epsilon);
#lambda=bigtheta*(1-theta)*(1-beta*theta)/theta;
#kappa=lambda*(sigma+((varphi+alpha)/(1-alpha)));
#psi_ya=(varphi+1)/(sigma*(1-alpha)+(varphi+alpha));

c=c(+1)-sigma*(im - pi(1));
pi=beta*pi(+1)+kappa*(y-psi_ya); 
c=y;
i-pi(+1)*phipi=y*(phiy)+e;
r=i+-pi(+1);
ls = alphac*efp+gammac*d+u; 
ld = -thetac*efp+v;
d=y;
ls=ld;
efp= im-i;

end; 



steady;

check;

shocks;
var v= 0.75^2;
var u = 0.75^2;
var e = 1^2;


end;

stoch_simul(irf=12);

What exactly is your problem? A standard NK model is at https://github.com/JohannesPfeifer/DSGE_mod/blob/master/Gali_2015/Gali_2015_chapter_3.mod

I think my equation are wrong because it gives to me a very weird graph.
thank you for your reply, I’ll try to use your like as a benchmark for my model.