--- orig/rpggame/rpgobjset.h
+++ mod/rpggame/rpgobjset.h
@@ -43,6 +43,7 @@
         #undef N
 
         CCOMMAND(r_model,       "s",   (rpgobjset *self, char *s), { self->stack[0]->model = self->stringpool(s); });
+        CCOMMAND(r_get_model,   "",    (rpgobjset *self), { result(self->stack[0]->model); });
         CCOMMAND(r_spawn,       "s",   (rpgobjset *self, char *s), { self->spawn(self->stringpool(s)); });
         CCOMMAND(r_contain,     "s",   (rpgobjset *self, char *s), { self->stack[0]->decontain(); self->stack[1]->add(self->stack[0], atoi(s)); });
         CCOMMAND(r_pop,         "i",   (rpgobjset *self, int *num), { self->popobj(*num); });