generic globbing container #188

Parent #54Owner #361Flags read, fertileSource hellcore/hellcore.db

Aliases: generic globbing container, ggc

7 verbs · 63 properties · 1 children

Verbs

VerbSpecFlagsDefinerLines
enterfuncthis none thisrxd#18815
_globifythis none thisrxd#1885
occupantsthis none thisrxd#18816
occupants_oldthis none thisrxd#18815
occupants_suspendedthis none thisrxd#18813
fake_contentsthis none thisrxd#18811
occupants_old_oldthis none thisrxd#18814

Properties

PropertyDefinerFlagsOwnerValue
glob#188rc#3611
capacity#54rc#361<clear>
weight_reduction#54rc#361<clear>
opaque#54rc#361<clear>
dark#54rc#361<clear>
close_msg#54rc#361<clear>
open_msg#54rc#361<clear>
remove_msg#54rc#361<clear>
put_msg#54rc#361<clear>
empty_msg#54rc#361<clear>
contents_msg#54rc#361<clear>
open_fail_msg#54rc#361<clear>
put_fail_msg#54rc#361<clear>
closed_msg#54rc#361<clear>
closable#54rc#361<clear>
open#54rwc#3611
get_from_msg#54rc#361<clear>
max_objects#54rc#361<clear>
spill_on_break#54rc#361<clear>
peek_msg#54rc#361<clear>
clean_start_msg#54rc#361<clear>
oclean_start_msg#54rc#361<clear>
clean_finish_msg#54rc#361<clear>
oclean_finish_msg#54rc#361<clear>
break_msg#255rc#361<clear>
repair_difficulty#255rc#361<clear>
junk_on_break#255rc#361<clear>
rename_on_break#255rc#361<clear>
smashable#255rc#361<clear>
repairable#255rc#361<clear>
armor#255rc#361<clear>
held_break_msg#255rc#361<clear>
oheld_break_msg#255rc#361<clear>
handed#5rc#361<clear>
wield_msg#5rc#361<clear>
unwield_msg#5rc#361<clear>
size#5rc#361<clear>
look_place_msg#5rc#361<clear>
value#5rc#361<clear>
get_msg#5rc#361<clear>
drop_msg#5rc#361<clear>
get_fail_msg#5rc#361<clear>
junk_ok#5rc#361<clear>
floats#5rc#361<clear>
long_name_msg#5rc#361<clear>
article#5rc#361<clear>
setup_list#5rc#361<clear>
health#5rc#361<clear>
health_max#5rc#361<clear>
min_skill#5rc#361<clear>
skill#5rc#361<clear>
recipe_for#5rc#361<clear>
carried_msg#5rc#361<clear>
aliases#1rc#361{"generic globbing container", "ggc"}
description#1rc#361"A container."
object_size#1r#29{4823, 1298434455}
hidden_verbs#1rc#361<clear>
phelp_msg#1rc#361<clear>
weight#1rc#361<clear>
owner_verbs#1rc#361<clear>
plural_name#1rc#361<clear>
client_image#1rc#361<clear>
listening#1rc#361<clear>

Ancestry

Ancestors (nearest first): #54 generic container#255 generic smashable thing#5 generic thing#1 root

Children: #146 generic lockable container

Call graph

calls n188_0 #188:enterfunc n188_2 #188:occupants n188_0->n188_2 n187_1 #187:_push n188_0->n187_1 n188_1 #188:_globify n48_8 #48:suspend_if_needed n188_1->n48_8 n188_4 #188:occupants_suspended n188_4->n48_8 n188_6 #188:occupants_old_old n188_6->n48_8

Source

enterfunc

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

none

Source

1if (this.glob)
2what = args[1];
3if (is_a(what, $thing))
4if (what:can_glob())
5for x in (this:occupants($glob))
6yield;
7if (x:can_push(what))
8`x:_push(what) ! E_VERBNF => 0';
9return;
10endif
11endfor
12$glob:_push(what);
13endif
14endif
15endif

_globify

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

none

Source

1for x in (this.contents)
2x:moveto($womb);
3x:moveto(this);
4$cu:sin(0);
5endfor

occupants

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

Source

1ret = {};
2ts = (typeof(args[1]) == LIST) ? args[1] | {args[1]};
3for o in (this.contents)
4for t in (ts)
5if (is_a(o, $glob) && is_a(o.item, t))
6for i in [1..o.amount]
7ret = {@ret, o};
8endfor
9continue o;
10elseif (is_a(o, t))
11ret = {@ret, o};
12continue o;
13endif
14endfor
15endfor
16return ret;

occupants_old

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

none

Source

1"Copied from generic globbing container (#216254):occupants by chill (#241405) Thu Feb 17 13:02:35 2011 CST";
2ret = {};
3ts = (typeof(args[1]) == LIST) ? args[1] | {args[1]};
4for OBJ in (this.contents)
5for t in (ts)
6if (is_a(OBJ, $glob) && is_a(OBJ.item, t))
7for i in [1..OBJ.amount]
8ret = listappend(ret, OBJ);
9endfor
10elseif (is_a(OBJ, t))
11ret = listappend(ret, OBJ);
12endif
13endfor
14endfor
15return ret;

occupants_suspended

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

none

Source

1"Copied from generic globbing container (#216254):occupants by Gilmore (#98) Wed Feb  4 04:12:50 2009 CST";
2ret = {};
3for OBJ in (this.contents)
4$cu:sin();
5if (is_a(OBJ, $glob) && is_a(OBJ.item, args[1]))
6for i in [1..OBJ.amount]
7ret = listappend(ret, OBJ);
8endfor
9elseif (is_a(OBJ, args[1]))
10ret = listappend(ret, OBJ);
11endif
12endfor
13return ret;

fake_contents

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

none

Source

1fc = {};
2for x in (this.contents)
3if (is_a(x, $glob))
4for y in [1..x.amount]
5fc = {@fc, x};
6endfor
7else
8fc = {@fc, x};
9endif
10endfor
11return fc;

occupants_old_old

Spec this none thisFlags rxdOwner #361Definer #188

Referenced by

none

Source

1"Copied from generic globbing container (#216254):occupants_old by Spunky (#97) Thu Feb 17 13:02:23 2011 CST";
2if (args[1] == $glob)
3return pass(@args);
4else
5what = args[1];
6set = {};
7for x in (this.contents)
8$cu:sin(0);
9if (is_a(x, what) || (is_a(x, $glob) && is_a(x.item, what)))
10set = listappend(set, x);
11endif
12endfor
13return set;
14endif