From: Nick Bannon Date: Tue, 1 Jan 2002 12:58:18 +0000 (+0000) Subject: Finished mapping out all the single byte with word instructions X-Git-Tag: ROMW~132 X-Git-Url: https://git.ucc.asn.au/?a=commitdiff_plain;h=fa42dc7e1745336192e279c218e3b4c0c57c0222;p=uccvend-snackrom.git Finished mapping out all the single byte with word instructions --- diff --git a/ROM/makeasm.pl b/ROM/makeasm.pl index dde0d0d..7bf28d4 100755 --- a/ROM/makeasm.pl +++ b/ROM/makeasm.pl @@ -77,7 +77,51 @@ my %onewitharg = ('63' => "COM\t\$%s,X", 'ED' => "STAD\t\$%s,X" ); -my %onewithword = ('FF' => "STX\t%s"); +my %onewithword = ( + '70' => "NEG\t%s", + '73' => "COM\t%s", + '74' => "LSR\t%s", + '76' => "ROR\t%s", + '77' => "ASR\t%s", + '78' => "LSL\t%s", +# LSL == ASL +# '78' => "ASL\t%s", + '79' => "ROL\t%s", + '7A' => "DEC\t%s", + '7C' => "INC\t%s", + '7D' => "TST\t%s", + '7F' => "CLR\t%s", + 'B0' => "SUBA\t%s", + 'B1' => "CMPA\t%s", + 'B2' => "SBCA\t%s", + 'B3' => "SUBD\t%s", + 'B4' => "ANDA\t%s", + 'B5' => "BITA\t%s", + 'B6' => "LDAA\t%s", + 'B7' => "STAA\t%s", + 'B9' => "ADCA\t%s", + 'BA' => "ORAA\t%s", + 'BB' => "ADDA\t%s", + 'BC' => "CPX\t%s", + 'BD' => "JSR\t%s", + 'BE' => "LDS\t%s", + 'BF' => "STS\t%s", + 'F0' => "SUBB\t%s", + 'F1' => "CMPB\t%s", + 'F2' => "SBCB\t%s", + 'F3' => "ADDD\t%s", + 'F4' => "ANDB\t%s", + 'F5' => "BITB\t%s", + 'F6' => "LDAB\t%s", + 'F7' => "STAB\t%s", + 'FA' => "ORAB\t%s", + 'FB' => "ADDB\t%s", + 'F8' => "EORB\t%s", + 'F9' => "ADCB\t%s", + 'FC' => "LDD\t%s", + 'FD' => "STD\t%s", + 'FE' => "LDX\t%s", + 'FF' => "STX\t%s" ); LINE: while (<>) {