| version 1.50 | | version 1.51 |
|---|
| | |
| /* | | /* |
| * static char *rcsid_time_c = | | * static char *rcsid_time_c = |
| * "$Id: time.c,v 1.50 2003/01/08 08:39:21 mwedel Exp $"; | | * "$Id: time.c,v 1.51 2003/01/17 04:38:35 garbled Exp $"; |
| */ | | */ |
| | | |
| /* | | /* |
| | |
| } | | } |
| } | | } |
| | | |
| | | /* |
| | | * Will duplicate a specified object placed on top of it. |
| | | * connected: what will trigger it. |
| | | * level: multiplier. 0 to destroy. |
| | | * other_arch: the object to look for and duplicate. |
| | | */ |
| | | |
| | | void move_duplicator(object *op) { |
| | | object *tmp; |
| | | |
| | | if (op->above == NULL) |
| | | return; |
| | | for (tmp=op->above; tmp != NULL; tmp=tmp->above) { |
| | | if (strcmp(op->other_arch->name, tmp->arch->name) == 0) { |
| | | if (op->level == 0) { |
| | | remove_ob(tmp); |
| | | free_object(tmp); |
| | | } else { |
| | | tmp->nrof *= op->level; |
| | | } |
| | | break; |
| | | } |
| | | } |
| | | } |
| | | |
| /* move_creator (by peterm) | | /* move_creator (by peterm) |
| it has the creator object create it's other_arch right on top of it. | | it has the creator object create it's other_arch right on top of it. |