The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Games::Nintendo::Mario::SMB2 -- a class for vegetable-throwing Italian plumbers (and friends)

SYNOPSIS

  use Games::Nintendo::Mario::SMB2;

  my $liege = Games::Nintendo::Mario::SMB2->new(name => 'Peach');
  
  # below outputs "Peach: 1/3"
  print
    $liege->name . ": " . $liege->hearts . "/" . $liege->max_hearts . "\n";

  $liege->powerup('heart');    # 2/3
  $liege->damage;              # 1/3
  $liege->powerup('mushroom'); # 1/4
  $liege->powerup('heart');    # 2/4
  $liege->powerup('mushroom'); # 2/5
  $liege->powerup('heart');    # 3/5

  print "I'm feeling ", $liege->state, "!\n"; # She's feeling super.

  $liege->powerup('mushroom'); # Nothing happens.

  $liege->damage for (1 .. 3); # cue the Mario Death Music

DESCRIPTION

This class subclasses Games::Nintendo::Mario (and G::N::M::Hearts), providing a model of the behavior of the Mario Brothers in Super Mario Brothers 2. All of the methods described in the Mario interface exist as documented.

NAMES

The plumber may be named Mario or Luigi, or a non-plumbing character named Peach or Toad may be created.

STATES

$hero->state will return 'dead' if he has no hearts, 'normal' if he has one heart, and 'super' if he has more than one heart. State may not be set during construction; set hearts instead.

POWERUPS

Valid powerups are: mushroom or heart

AUTHORS

Ricardo SIGNES <rjbs@cpan.org>

COPYRIGHT

Copyright 2003 by Ricardo Signes <rjbs@cpan.org>

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html