X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=blobdiff_plain;f=gui.pl;h=acdb94fd23154bae49e3f1d6ed7027c925068058;hb=972687391b212153ee34a6ecf616fd1c1a53d01b;hp=6d3295ee0fa8dcecf48960206d8b38dfdfb74c15;hpb=041b40ba9d04693394c1472224cbb4285a0280c3;p=slotcarman.git diff --git a/gui.pl b/gui.pl index 6d3295e..acdb94f 100755 --- a/gui.pl +++ b/gui.pl @@ -10,7 +10,7 @@ use SCX::GUI; use SCX::Track; use SCX::Reader; -my $gui = SCX::GUI->new({ img_height => 80 }); +my $gui = SCX::GUI->new({ img_height => 100 }); my $track = SCX::Track->new({ gui => $gui }); my $reader; @@ -22,6 +22,10 @@ eval { }); }; +if ($@) { + print STDERR "Demo mode only: $@"; +} + $track->car(0)->set_model('F1 Ferrari'); $track->car(1)->set_model('F1 McLaren'); $track->car(2)->set_model('F1 Williams');