use warnings;
use strict;

use lib '.';

use Step;

my $s = Step->new(
    pins => [12, 16, 20, 21],
    speed => 'full'
);


#$s->cw(90);
$s->ccw(90);