浏览代码

lpst.pl - added comments. im an idiot who forgot how they built their own datastructures...

master
gashapwn 3 年前
父节点
当前提交
53a6d0ae44
共有 1 个文件被更改,包括 4 次插入2 次删除
  1. +4
    -2
      lpst.pl

+ 4
- 2
lpst.pl 查看文件

@@ -381,6 +381,8 @@ sub cell_index($){
return ($AXIS{$chr1}, $chr2);
}

# Creates a hash of the the form
# $board{cell_notation} = piece_enum
%board = map {
$_ => $EMPTY_CELL
} map {
@@ -391,10 +393,10 @@ sub cell_index($){
$AXIS_RV{$_}
}(1...11);

$board{1}{1} = $P1.$DIV.$MG_A;
$board{"C3"} = $P1.$DIV.$MG_A;


printf("%s\n", $board{3}{3});
printf("%s\n", $board{"C3"});
# disp_board();

# disp_0("C1");


正在加载...
取消
保存