90 	struct monst   *mtmp;  in amulet()  local
95 	for (mtmp = fmon; mtmp; mtmp = mtmp->nmon)  in amulet()
96 		if (mtmp->data->mlet == '1' && mtmp->msleep && !rn2(40))  in amulet()
99 					mtmp->msleep = 0;  in amulet()
100 					if (dist(mtmp->mx, mtmp->my) > 2)  in amulet()
109 wiz_hit(struct monst *mtmp)  in wiz_hit()  argument
112 	if (mtmp->minvent && mtmp->minvent->olet == AMULET_SYM &&  in wiz_hit()
113 	    mtmp->minvent->spe == 0) {  in wiz_hit()
115 		fall_down(mtmp);  in wiz_hit()
128 					mtmp->mx = otmp->ox;  in wiz_hit()
129 					mtmp->my = otmp->oy;  in wiz_hit()
131 					mpickobj(mtmp, otmp);  in wiz_hit()
132 					pmon(mtmp);  in wiz_hit()
146 		if (hitu(mtmp, d(mtmp->data->damn, mtmp->data->damd))  in wiz_hit()
147 		    && !rn2(20) && stealamulet(mtmp)) {  in wiz_hit()
151 		inrange(mtmp);	/* try magic */  in wiz_hit()
156 inrange(struct monst *mtmp)  in inrange()  argument
161 	if (mtmp->data->mlet != '1' && mtmp->mcan)  in inrange()
165 	if (inroom(u.ux, u.uy) != inroom(mtmp->mx, mtmp->my))  in inrange()
167 	tx = u.ux - mtmp->mx;  in inrange()
168 	ty = u.uy - mtmp->my;  in inrange()
171 		switch (mtmp->data->mlet) {  in inrange()
174 			buzz(-1, mtmp->mx, mtmp->my, sgn(tx), sgn(ty));  in inrange()
185 			if (mtmp->mcan || rn2(2)) {  in inrange()
186 				if (canseemon(mtmp))  in inrange()
188 					      Monnam(mtmp));  in inrange()
192 					mtmp->mspeed = 0;  in inrange()
193 					mtmp->minvis = 0;  in inrange()
196 					mtmp->mcan = 0;  in inrange()
198 				if (canseemon(mtmp)) {  in inrange()
200 						pline("%s hypnotizes you.", Monnam(mtmp));  in inrange()
205 						      Monnam(mtmp));  in inrange()
231 						clonewiz(mtmp);  in inrange()
234 					if (mtmp->mspeed == MSLOW)  in inrange()
235 						mtmp->mspeed = 0;  in inrange()
237 						mtmp->mspeed = MFAST;  in inrange()
240 					mtmp->minvis = 1;  in inrange()
249 					buzz(-rnd(3), mtmp->mx, mtmp->my, sgn(tx), sgn(ty));  in inrange()
255 			done_in_by(mtmp);  in inrange()
262 	struct monst   *mtmp;  in aggravate()  local
264 	for (mtmp = fmon; mtmp; mtmp = mtmp->nmon) {  in aggravate()
265 		mtmp->msleep = 0;  in aggravate()
266 		if (mtmp->mfroz && !rn2(5))  in aggravate()
267 			mtmp->mfroz = 0;  in aggravate()
272 clonewiz(struct monst *mtmp)  in clonewiz()  argument
276 	if ((mtmp2 = makemon(PM_WIZARD, mtmp->mx, mtmp->my)) != NULL) {  in clonewiz()
280 		pmon(mtmp);  in clonewiz()