소스 검색

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); return ($AXIS{$chr1}, $chr2);
} }


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


# disp_0("C1"); # disp_0("C1");


불러오는 중...
취소
저장