gashapwn/lpst
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

lpst.pl - wow i mixed up the y axis and the x axis... i mean damn

Browse Source
This commit is contained in:
gashapwn 2021-04-04 00:41:03 +00:00
parent fccff335bf
commit 6fefa7125c
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lpst.pl
View File

@ -218,7 +218,7 @@ sub disp_3(){
return $HEX_3; return $HEX_3;
} }
sub disp_x_axis($$$$){ sub disp_y_axis($$$$){
my ($s0, $s1, $s2, $r0) = @_; my ($s0, $s1, $s2, $r0) = @_;
my $n0; my $n0;
@ -249,7 +249,7 @@ sub disp_0($){
$r0 = shift; $r0 = shift;
($s0, $s1, $s2) = disp_x_axis($s0, $s1, $s2, $r0); ($s0, $s1, $s2) = disp_y_axis($s0, $s1, $s2, $r0);
for my $i (1..11){ for my $i (1..11){
($s0, $s1, $s2) = add_cell($s0, $s1, $s2, $r0, $i); ($s0, $s1, $s2) = add_cell($s0, $s1, $s2, $r0, $i);
} }
@ -277,7 +277,7 @@ sub disp_row($){
return $row; return $row;
} }
sub disp_y_axis(){ sub disp_x_axis(){
my $s0; my $s0;
$s0 = $PAD_AXIS; $s0 = $PAD_AXIS;
@ -321,7 +321,7 @@ sub disp_board(){
$b .= disp_row($i); $b .= disp_row($i);
} }
$b .= disp_trailing_row(); $b .= disp_trailing_row();
$b .= disp_y_axis(); $b .= disp_x_axis();
$b =~ s/$TRAIL_1$TRAIL_3\n/\n/m; $b =~ s/$TRAIL_1$TRAIL_3\n/\n/m;
for my $i (1..11-1){ for my $i (1..11-1){