- # FIXME: parse instruction
- #if (defined($transtable{$instruction})) {
- # print "\t$transtable{$instruction}";
-# if (defined($comment)) { print "; $comment"; }
-# print "\n";
-# return;
-# }
-
-# chomp;
-# $l = length;
-# if ($l == 42) {
-# print "$_\n";
-# next;
-# } elsif ($l != 33) {
-# print "$_\n";
-# next;
-# } else {
-#
-# $addr = substr($_,0,4);
-# $inst = substr($_,27,3);
-# $val = substr($_,31,2);
-#
-# #print "$val\n";
-# $daddr = (hex $addr) + 2 + convert($val);
-#
-#
-# if (defined $commands{$inst}) {
-# print "$_\t\t;";
-# printf "%4X", $daddr;
-# #print " $addr $inst $val\n";
-# print "\n";
-# }
-# }
-
+ if (defined $twobytefirst{$instruction}) {
+ $thing = substr($line,5,5);
+ if (defined $twobytesecond{$thing}) {
+ print "\t" . $twobytesecond{$thing};
+ $line =~ /$twobytesecond{$thing}(.*)$/i;
+ print "$1\n";
+ return;
+ }
+ }
+