diff --git a/perl/Brm/Lasic.pm b/perl/Brm/Lasic.pm
index f18b5be..65d22f9 100644
--- a/perl/Brm/Lasic.pm
+++ b/perl/Brm/Lasic.pm
@@ -57,6 +57,12 @@ The tty device filehandle. Avoid using directly.
 =cut
 has 'fd' => (is => 'rw', isa => 'FileHandle');
 
+=item B<seqid>
+
+Sequence id for commands. Just for internal use.
+=cut
+has 'seqid' => (is => 'rw', isa => 'Num', default => 0);
+
 =back
 
 =head2 METHODS
@@ -158,7 +164,8 @@ sub msg {
 	my $self = shift;
 
 	my (@args) = @_;
-	push @args, 1;
+	push @args, 1 + $self->seqid % 254;
+	$self->seqid($self->seqid + 1);
 
 	my $fd = $self->fd();
 	print $fd join(' ', @args)."\r\n";