Ich möchte, das man sich den Pool aussuchen kann, der errechnet werden woll. wie geht das? Es soll nach der Zeile geschehen so so viel Platz ist.

  • #! /usr/bin/perl
    print "Shadowrun- Poolgenerator\n";
    print "Dieser Generator ist geschrieben worden um die verschieden Poole bei Shadowrun\n berechnen zu lassen\n";
    print "Bitte geben sie ihre Attribute an.\n";
    print "Konstitution\n";
    chomp ($kon = <STDIN>);
    print "Schnelligkeit\n";
    chomp ($schn = <STDIN>);
    print "Staerke\n";
    chomp ($sta = <STDIN>);
    print "Charisma\n";
    chomp ($cha = <STDIN>);
    print "Inteligenz\n";
    chomp ($inte = <STDIN>);
    print "Willenskraft\n";
    chomp ($will = <STDIN>);
    print "MPCP- Wert des Cyberdecks\n";
    chomp ($mpcp = <STDIN>);
    print "modi der Riggerkontrolle\n";
    chomp ($modi = <STDIN>);
    print "Magie- Attribut\n";
    chomp ($mage = <STDIN>);
    print "Im folgenden wählen Sie bitte die einzelnen Poole aus.\n";


    $kampf= $schn+$inte+$will/2;
    print "Der Kampfpool beträgt $kampf\n";
    $steuer= $schn+$inte+$modi;
    print "Der Steuerpool beträgt $steuer\n";
    $hack= $inte+$mpcp/3;
    print "Der Hackingpool beträgt $hack\n";
    $mgp= $inte+$will+$mage/3;
    print "Der Zauberpool beträgt $mgp\n";
    $ast= $inte+$cha+$will/2;
    print "Der Astralpool beträgt $ast\n";