summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2014-06-16 22:54:18 -0400
committerJesse Luehrs <doy@tozt.net>2014-06-16 22:54:18 -0400
commit9cdb41b9182286fe654dfb760d914fddc135c4ec (patch)
tree5a19ff25204326073fe2c541fabd14c9119c4e35
parent172d8a9e6f6050bc3d4223c96b0818460831f1c5 (diff)
downloadgames-smtnocturne-demons-9cdb41b9182286fe654dfb760d914fddc135c4ec.tar.gz
games-smtnocturne-demons-9cdb41b9182286fe654dfb760d914fddc135c4ec.zip
add all_demons to the script
-rwxr-xr-xbin/smt5
1 files changed, 5 insertions, 0 deletions
diff --git a/bin/smt b/bin/smt
index 5307ad3..ac901f6 100755
--- a/bin/smt
+++ b/bin/smt
@@ -9,6 +9,7 @@ use Games::SMTNocturne::Demons;
sub _demon { Games::SMTNocturne::Demons::demon(@_) }
sub _demons_of_type { Games::SMTNocturne::Demons::demons_of_type(@_) }
+sub _all_demons { Games::SMTNocturne::Demons::all_demons(@_) }
sub _fuse { Games::SMTNocturne::Demons::fuse(@_) }
sub _fusions_for { Games::SMTNocturne::Demons::fusions_for(@_) }
@@ -48,6 +49,10 @@ sub demons_of_type {
print join("\n", _demons_of_type($type)), "\n";
}
+sub all_demons {
+ print join("\n", _all_demons), "\n";
+}
+
sub fuse {
my ($demon1, $demon2, $sacrifice) = @_;
print _fuse($demon1, $demon2, { sacrifice => $sacrifice, %$options }), "\n";