Lines Matching refs:ptr
13 register struct permonst *ptr;
19 ptr = mon->data;
20 atyp = (ptr->maligntyp==A_NONE) ? A_NONE : sgn(ptr->maligntyp);
25 ptr = &mons[PM_WIZARD_OF_YENDOR];
26 atyp = (ptr->maligntyp==A_NONE) ? A_NONE : sgn(ptr->maligntyp);
29 if (is_dprince(ptr) || (ptr == &mons[PM_WIZARD_OF_YENDOR])) {
33 } else if (is_dlord(ptr)) {
37 } else if (is_ndemon(ptr)) {
39 (!rn2(6)) ? ndemon(atyp) : monsndx(ptr);
42 dtype = (is_lord(ptr) && !rn2(20)) ? llord() :
43 (is_lord(ptr) || !rn2(6)) ? lminion() : monsndx(ptr);
45 } else if (ptr == &mons[PM_ANGEL]) {
294 struct permonst *ptr;
297 ptr = mkclass(S_ANGEL,0);
298 if (ptr && !is_lord(ptr))
299 return(monsndx(ptr));
310 struct permonst *ptr;
313 ptr = mkclass(S_DEMON, 0);
314 if (ptr && is_ndemon(ptr) &&
315 (atyp == A_NONE || sgn(ptr->maligntyp) == sgn(atyp)))
316 return(monsndx(ptr));