| line |
true |
false |
branch |
|
162
|
0 |
0 |
unless open HFILE, $file |
|
217
|
0 |
0 |
if defined $arg{'ini'} |
|
256
|
0 |
0 |
$5 ? : |
|
257
|
0 |
0 |
$6 ? : |
|
265
|
0 |
0 |
$cnt == 2 ? : |
|
266
|
0 |
0 |
$cnt == 2 ? : |
|
267
|
0 |
0 |
$cnt == 2 ? : |
|
268
|
0 |
0 |
$10 ? : |
|
269
|
0 |
0 |
$11 ? : |
|
272
|
0 |
0 |
if ($cnt == 2) |
|
298
|
0 |
0 |
if ($roq =~ /O-O-O/) { } |
|
|
0 |
0 |
elsif ($roq =~ /O-O/) { } |
|
|
0 |
0 |
elsif ($fpiece =~ /^[PKQRBN]$/) { } |
|
310
|
0 |
0 |
$color eq 'White' ? : |
|
316
|
0 |
0 |
if (not defined $algebra{$wdestalpha}) { } |
|
320
|
0 |
0 |
$color eq 'White' ? : |
|
323
|
0 |
0 |
length $wpiece == 2 ? : |
|
|
0 |
0 |
$wpiece eq 'P' ? : |
|
336
|
0 |
0 |
$color eq 'White' ? : |
|
343
|
0 |
0 |
if ($$set[$_] eq $to[$t]) |
|
346
|
0 |
0 |
defined $bd->getpiece($to[$t]) ? : |
|
370
|
0 |
0 |
if ($wechec eq 'e.p.') |
|
375
|
0 |
0 |
$color eq 'White' ? : |
|
376
|
0 |
0 |
$color eq 'White' ? : |
|
379
|
0 |
0 |
$c eq 'White' ? : |
|
382
|
0 |
0 |
if ($_ eq $pred{$col} . $cto or $_ eq $suiv{$col} . $cto) |
|
387
|
0 |
0 |
if (@ep >= 1) { } |
|
402
|
0 |
0 |
if ($wdestalpha =~ /^[BRN]$/ and $wdestnum ne '') |
|
403
|
0 |
0 |
$color eq 'White' ? : |
|
410
|
0 |
0 |
if ($wdestalpha =~ /^[BRNP]$/ and $waction eq 'x') |
|
411
|
0 |
0 |
$color eq 'White' ? : |
|
413
|
0 |
0 |
if ($$bd{$loc} eq $tpiece) |
|
424
|
0 |
0 |
if ($wdestalpha =~ /^[BRN]P$/ and $waction eq 'x') |
|
425
|
0 |
0 |
$color eq 'White' ? : |
|
429
|
0 |
0 |
if ($piece eq $opp) |
|
431
|
0 |
0 |
if ($wdestalpha =~ /^([BRN])P$/) { } |
|
434
|
0 |
0 |
if ($algebra{$_ . $wx} eq $rk) |
|
440
|
0 |
0 |
if ($algebra{$_} eq $rk) |
|
468
|
0 |
0 |
if ($wpiece =~ m[^([QRBKN])/([1-8])$]) |
|
470
|
0 |
0 |
$color eq 'White' ? : |
|
473
|
0 |
0 |
if ($$bd{$case} eq $truepiece and $col == $wcol) |
|
484
|
0 |
0 |
if ($wpiece =~ /(^[QK])([QRBN]$)/) |
|
485
|
0 |
0 |
$color eq 'White' ? : |
|
491
|
0 |
0 |
if ($$bd{$case} eq $truepiece) |
|
496
|
0 |
0 |
if ($#loc < 2) { } |
|
497
|
0 |
0 |
substr($loc[0], 0, 1) lt substr($loc[1], 0, 1) ? : |
|
|
0 |
0 |
substr($loc[0], 0, 1) gt substr($loc[1], 0, 1) ? : |
|
|
0 |
0 |
$side eq 'Q' ? : |
|
523
|
0 |
0 |
if ($tpiece eq 'P' and $row == 8) |
|
528
|
0 |
0 |
if ($tpiece eq 'p' and $row == 1) |