anszom

#!/usr/bin/perl

# usage: gatttool  -b FC:58:FA:xx:xx:xx --char-read --listen -a 9 | decoder.pl

my %digits = (
	'1110111' => 0,
	'0010010' => 1,
	'1011101' => 2,
	'1011011' => 3,
	'0111010' => 4,

anszom

        ; ================ B E G I N N I N G   O F   P R O C E D U R E ================

        ; Variables:
        ;    arg_0: int, 8
        ;    var_4: -4
        ;    var_8: -8


             sub_25eee8:
0025eee8         push       ebp