Implementation of Lucifers Pastime
No puede seleccionar más de 25 temas
Los temas deben comenzar con una letra o número, pueden incluir guiones ('-') y pueden tener hasta 35 caracteres de largo.
|
- #!/usr/bin/perl
-
- package main;
-
- use warnings;
- use strict;
-
- use lib './';
- use LPST;
-
- my $b;
-
- # my $m1 = "F7";
- # my $m1 = "C10";
- # my $m2 = "B3";
- # my $c1 = $MG_SY;
- # my $c2 = $MG_A;
-
- # $board{$m1} = $P1.$DIV.$c1;
- # $board{$m2} = $P2.$DIV.$c2;
-
- # for my $el (get_block_cell($P1)){
- # printf("%s\n", $el);
- # }
-
- # shade_all_mvmt($P1);
- # disp_board();
-
- $b = LPST->new();
-
- # $b->shade_all_p1_mvmt();
- $b->disp_board();
|