Changeset 432 for veekun/trunk/lib/Vee/Schema

Timestamp:

05/23/08 02:41:12 (22 months ago)

Author:

eevee

Message:

Changed breeding chain calculator to interpret its Pokemon input as a target rather than.. whatever it was before. (#309)
Also added some more detail on reading the results.

Files:

• veekun/trunk/lib/Vee/Schema/EvoChains.pm (modified) (1 diff)

veekun/trunk/lib/Vee/Schema/EvoChains.pm

@@ -23 +23 @@
 __PACKAGE__->has_many(pokemon => 'Vee::Schema::Pokemon', 'evo_chain_id');
 
+=head2 baby_form
+
+Returns the baby Pokemon in this chain, if any.
+
+=cut
+
+sub baby_form {
+    my ($self) = @_;
+
+    return $self->pokemon( \ 'FIND_IN_SET(flags, "baby")' )->single;
+}
+
+=head2 basic_form
+
+Returns the basic form of this Pokemon.
+
+=cut
+
+sub basic_form {
+    my ($self) = @_;
+
+    return $self->pokemon(
+        \ 'NOT FIND_IN_SET(flags, "baby")',
+    {
+        order_by => 'id ASC',
+    })->first;
+}
+
+=head2 egg_forms
+
+Returns any Pokemon that can result from a breeding in this chain.
+
+=cut
+
+sub egg_forms {
+    my ($self) = @_;
+    my @ret;
+
+    my $baby_form  = $self->baby_form;
+    if ($baby_form) {
+        push @ret, $baby_form;
+    }
+
+    my $basic_form = $self->basic_form;
+    if (not $baby_form
+        or $self->baby_item)  # e.g. Munchlax with incense
+    {
+        push @ret, $basic_form;
+    }
+
+    return @ret;
+}
+
 =head1 SEE ALSO