Games::Nintendo::Mario::SMBTLL - a class for long-lost Italian plumbers


Games-Nintendo-Mario documentation Contained in the Games-Nintendo-Mario distribution.

Index


Code Index:

NAME

Top

Games::Nintendo::Mario::SMBTLL - a class for long-lost Italian plumbers

VERSION

Top

version 0.204

SYNOPSIS

Top

  use Games::Nintendo::Mario::SMBLL;

  my $hero = new Games::Nintendo::Mario::SMB
                   name  => 'Luigi',
                   state => 'normal';

  $hero->powerup('mushroom'); # doop doop doop!
  $hero->powerup('flower');   # change clothes

  $hero->powerup('poison_mushroom'); # uh oh!
  $hero->damage;                     # cue the Mario Death Music

DESCRIPTION

Top

This class subclasses Games::Nintendo::Mario, providing a model of the behavior of the Mario Brothers in Super Mario Brothers: The Lost Levels. All of the methods described in the Mario interface exist as documented.

NAMES

The plumber may be named Mario or Luigi.

STATES

The plumber's state may be any of: normal, super, or fire

POWERUPS

Valid powerups are: mushroom, poison_mushroom, and flower

METHODS

Top

games

This ruleset reflects Mario in Super Mario Bros.: The Lost Levels, the original Japanese sequel to SMB, later released as SMBTLL in the US (and now available on the Wii Virtual Console).

AUTHOR

Top

Ricardo SIGNES <rjbs@cpan.org>

COPYRIGHT

Top


Games-Nintendo-Mario documentation Contained in the Games-Nintendo-Mario distribution.

use strict;
use warnings;
package Games::Nintendo::Mario::SMBTLL;

our $VERSION = '0.204';

use base qw(Games::Nintendo::Mario::SMB);

sub _items  { qw[mushroom flower poison_mushroom] }

sub _goto_hash { 
  my ($self) = @_;

  my $goto_hash = $self->SUPER::_goto_hash;

  return {
    %$goto_hash,
    poison_mushroom => $goto_hash->{damage}
  }
}

sub games {
  return (
    'Super Mario Bros.: The Lost Levels',
    # 'Super Mario Bros. 2: For Super Players',
  );
}

"It's-a me!  Mario!";

__END__