Help for this page
#!/usr/bin/perl ... $colfrom < $colto ? 'right' : 'left') . ($toscore eq '00' ? '-slide' : ''); }
21 -8 5 21 ... = 3+9+00+10+21+21+00+7+21 = 92