$thing->{o} = $sd->[7] unless $sd->[7] eq $main::mycall;
$thing->{i} = $sd->[3] if $sd->[3];
$thing->{Aranea} = Aranea::genmsg($thing, [qw(f c b t o i)]);
$thing->{o} = $sd->[7] unless $sd->[7] eq $main::mycall;
$thing->{i} = $sd->[3] if $sd->[3];
$thing->{Aranea} = Aranea::genmsg($thing, [qw(f c b t o i)]);