X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=PA.pm;fp=PA.pm;h=62382dd8bf65da26587baf787473d0a309c3d140;hb=6f1b756bc7abf8b4a6b06550b37b84ad06259097;hp=0eb0412d4e36684466de99709c44ae6d981446f9;hpb=3614f618f8ff7f59e885710dd387a61f2b16ff4a;p=NDIRC.git

diff --git a/PA.pm b/PA.pm
index 0eb0412..62382dd 100644
--- a/PA.pm
+++ b/PA.pm
@@ -141,6 +141,13 @@ sub shipEff {
 			}
 			while (my $t = $st->fetchrow_hashref()){
 				my $number = calcEff($s,$t,$amount,$eff);
+				if ($eff){
+					$number *= 0.60 if $tn eq 't2';
+					$number *= 0.30 if $tn eq 't3';
+				}else{
+					$number /= 0.60 if $tn eq 't2';
+					$number /= 0.30 if $tn eq 't3';
+				}
 				$value = prettyValue($number*$t->{cost}/100);
 				my $name = shipColor($t->{name},$t->{type});
 				$text .= " $ND::B$number$ND::O $name ($t->{init}:$value),";