Guitar-scale version 0.02
=========================
The README is used to introduce the module and provide instructions on
how to install the module, any machine dependencies it may have (for
example C compilers and installed libraries) and any other information
that should be provided before the module is installed.
A README file is required for CPAN modules since CPAN extracts the
README file from a module distribution so that people browsing the
archive can use it get an idea of the modules uses. It is usually a
good idea to provide version information here so that people can
decide whether fixes for the module are worth downloading.
INSTALLATION
To install this module type the following:
perl Makefile.PL
make
make test
make install
NAME
Guitar::Scale.pm - confirm the guitar scale.
SYNOPSIS
use Guitar::Scale;
# .. preview scale
Guitar::Scale::pv('C', 'Blues');
# .. Other
Guitar::Scale::pv('B', 'Spanish');
# .. Other
Guitar::Scale::pv('C#', 'HeavyMetal');
# .. Your Handmade Scale
Guitar::Scale::pv('F', '201000010000');
DESCRIPTION
I can view the guitar scale easily.
In addition, it is also possible to check by shifting the base sound.
OBJECT INTERFACE
These are the methods in C<use Guitar::Scale> object interface.
C<scale>
C<pv> can see the sound of all of the finger board.
pv($key, $type, [mode]);
C<key>
E F F# Gb G G# Ab A A# Bb B C C# Db D D# Eb
C<type>
'HeavyMetal'
'Minor'
'HarmonicMinor'
'MelodicMinor'
'Pentatonic'
'Blues'
'Diminished'
'Dorian'
'Ionian'
'Phrygian'
'Lydian'
'Mixolydian'
'Aeolian'
'WholeTone'
'Major'
'Japanese'
'Sobaya'
'Spanish'
'Roumanian'
'Egyptian'
'Hawaiian'
'Hindu'
'Ryukyu'
C<mode> is optional; the default is '0'.
0: normal preview -> <>+<>+--+<>+
1: binary preview -> 201101010101
Handmade Scale
Guitar::Scale::pv('E', '201000010000');
Set the fingerboard the second argument.
Be a binary of 12 digits starting from C<2> Always.
Assume the E first because the bass sound.
Example:
[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+ => '200101110010'
Example
Guitar::Scale::pv('A', 'Blues');
<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+
--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+
<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+
<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+
[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+
<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+--+--+<>+--+[]+--+--+<>+--+<>+<>+<>+
00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
--: none.
<>: active.
[]: base.
Example
Guitar::Scale::pv('A', 'Blues' ,1);
1001020010111001020010111
0101110010200101110010200
1020010111001020010111001
1110010200101110010200101
2001011100102001011100102
1001020010111001020010111
0: none.
1: active.
2: base.
HeavyMetal
HeavyMetal scale is the original scale of Mitsuru Yasuda.
AUTHOR
Mitsuru Yasuda, dsyrtm@cpan.org
COPYRIGHT & LICENSE
Copyright (C) 2013 by Mitsuru Yasuda &
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.14.2 or,
at your option, any later version of Perl 5 you may have available.