Path: utzoo!utgpu!cs.utexas.edu!sdd.hp.com!wuarchive!uunet!pilchuck!ssc!markz From: markz@ssc.UUCP (Mark Zenier) Newsgroups: alt.sources Subject: Frankenstein Cross Assembler, Motorola 6811 "Flavor", part 1 of 2 Message-ID: <603@ssc.UUCP> Date: 5 Dec 90 06:11:08 GMT Organization: SSC, Inc., Seattle, WA Lines: 1813 Archive-name: Frankasm/As681101 Submitted-by: markz@ssc.uucp ---- Cut Here and feed the following to sh ---- #!/bin/sh # This is Frankasm/As6811, a shell archive (shar 3.43) # made 12/04/1990 08:45 UTC by markz@ssc.uucp # Source directory /usr/mark/frank.shar # # existing files will NOT be overwritten unless -c is specified # This format requires very little intelligence at unshar time. # "if test", "echo", "true", and "sed" may be needed. # # This shar contains: # length mode name # ------ ---------- ------------------------------------------ # 1479 -r--r----- as6811.1 # 12794 -r--r----- as6811.doc # 4409 -r--r----- as6811.tst # 10977 -r--r----- as6811.tut # 59735 -r--r--r-- as6811.y # # ============= as6811.1 ============== if test -f 'as6811.1' -a X"$1" != X"-c"; then echo 'x - skipping as6811.1 (File already exists)' else echo 'x - extracting as6811.1 (Text)' sed 's/^X//' << 'SHAR_EOF' > 'as6811.1' && X.TH AS6811 1L X.SH NAME Xas6811 \- cross assemblers for microcomputers X.SH SYNOPSIS X.nf Xas6811 [-p cpu] [-l listfile] [-o hexfile] [-d] [-s symbolfile] input X.fi X.SH DESCRIPTION XThe as6811 command assembles the input file into a Xtext output file representing the program memory for a microcomputer. X XOptions X.IP "-p cpu" XOverride the instruction set selection. X.RS 10 XValid Values for Cpu X.RS 5 X6811, 6801, 6803, 6802, 6808, 6800 X.RE X.RE X.IP "-l listfile" XOutput a file formated with the memory address, data, and source input lines. X.IP "-o hexfile" XOutput the memory data image in a form accepted by most prom programmers. X.IP "-h hexfile" XSame as \-o. X.IP \-d XSave the intermediate data file (see FILE) and abort the execution at the Xend of processing. X.IP "-s symbolfile" XPrint the symbol table values and names, one per line in the specified file. X.SH FILES X/usr/tmp/frtXXXXXX X.SH SEE ALSO XFrankenstein Cross Assemblers Users Manual (file base.doc) XAppendix for as6811 Frankenstein Assembler (file as6811.doc) X.SH NOTES XThere is only one input file. X XThe program can select which subset of instructions is accepted. XThe program first uses the name with which it is invoked. XThis is scanned for a substring which indicates which set to use. XThe -p options overrides this selction by performing the same substring Xsearch. XFinally the input file can select which subset to use with the CPU statement. X XThere should only be one executable file with all of its names linked to it. SHAR_EOF true || echo 'restore of as6811.1 failed' fi # ============= as6811.doc ============== if test -f 'as6811.doc' -a X"$1" != X"-c"; then echo 'x - skipping as6811.doc (File already exists)' else echo 'x - extracting as6811.doc (Text)' sed 's/^X//' << 'SHAR_EOF' > 'as6811.doc' && X.HM A 1 1 1 1 1 1 X.H 1 "Appendix for as6811 Frankenstein Assembler" X.H 2 "Pseudo Operations" X.H 3 "Standard Pseudo Operation Mnemonics" X.VL 40 5 1 X.LI "End" XEND X.LI "File Inclusion" XINCL XINCLUDE X.LI "If" XIF X.LI "Else" XELSE X.LI "End If" XENDI X.LI "Equate" XEQU X.LI "Set" XSET X.LI "Org" XORG X.LI "Reserve Memory" XRESERVE XRMB X.LI "Define Byte Data" XBYTE XDB XFCB X.LI "Define Word Data" XDW XFDB XWORD X.LI "Define String Data" XFCC XSTRING X.LI "Define Character Set Translation" XCHARSET X.LI "Define Character Value" XCHARDEF XCHD X.LI "Use Character Translation" XCHARUSE X.LE X.H 3 "Machine Dependent Pseudo Operations" X.H 4 "Instruction Set Selection" X.DS I N XCPU string X.DE XThe instruction set can be specified in the source file with the CPU Xpseudooperation. XThe string, delimited by quotes or apostrophes, is scanned for a Xsubstring which selects which instruction set is used. XWhen the program is invoked, this operation is performed on the name of Xthe program, then the -p optional argument, if any, and then any CPU Xstatements. XThe last one selects which subset of the instructions the assembler will Xaccept. XThe instruction set can be changed at any place in the source file. X.VL 30 5 1 X.LI "Instruction Set" XSubstrings X.LI "68hc11" X11 X.LI "6801" X01 X03 X.LI "6800" X00 X02 X08 X.LE X.H 2 "Instructions" X.H 3 "Instruction List" X.TS H X; Xl l l. XOpcode Syntax Selection Criteria X.sp X.TH X.sp XABA X.sp XABX TS6801PLUS X.sp XABY TS6811 X.sp XADC ACCUM '#' expr REGA XADC ACCUM '#' expr REGB XADC ACCUM expr REGA+DIRECT XADC ACCUM expr REGA+EXTENDED XADC ACCUM expr REGB+DIRECT XADC ACCUM expr REGB+EXTENDED XADC ACCUM indexed REGA+REGX XADC ACCUM indexed REGA+REGY+TS6811 XADC ACCUM indexed REGB+REGX XADC ACCUM indexed REGB+REGY+TS6811 X.sp XADCA '#' expr XADCA expr DIRECT XADCA expr EXTENDED XADCA indexed REGX XADCA indexed REGY+TS6811 X.sp XADCB '#' expr XADCB expr DIRECT XADCB expr EXTENDED XADCB indexed REGX XADCB indexed REGY+TS6811 X.sp XADD ACCUM '#' expr REGA XADD ACCUM '#' expr REGB XADD ACCUM expr REGA+DIRECT XADD ACCUM expr REGA+EXTENDED XADD ACCUM expr REGB+DIRECT XADD ACCUM expr REGB+EXTENDED XADD ACCUM indexed REGA+REGX XADD ACCUM indexed REGA+REGY+TS6811 XADD ACCUM indexed REGB+REGX XADD ACCUM indexed REGB+REGY+TS6811 X.sp XADDA '#' expr XADDA expr DIRECT XADDA expr EXTENDED XADDA indexed REGX XADDA indexed REGY+TS6811 X.sp XADDB '#' expr XADDB expr DIRECT XADDB expr EXTENDED XADDB indexed REGX XADDB indexed REGY+TS6811 X.sp XADDD '#' expr 0+TS6801PLUS XADDD expr DIRECT+TS6801PLUS XADDD expr EXTENDED+TS6801PLUS XADDD indexed REGX+TS6801PLUS XADDD indexed REGY+TS6811 X.sp XAND ACCUM '#' expr REGA XAND ACCUM '#' expr REGB XAND ACCUM expr REGA+DIRECT XAND ACCUM expr REGA+EXTENDED XAND ACCUM expr REGB+DIRECT XAND ACCUM expr REGB+EXTENDED XAND ACCUM indexed REGA+REGX XAND ACCUM indexed REGA+REGY+TS6811 XAND ACCUM indexed REGB+REGX XAND ACCUM indexed REGB+REGY+TS6811 X.sp XANDA '#' expr XANDA expr DIRECT XANDA expr EXTENDED XANDA indexed REGX XANDA indexed REGY+TS6811 X.sp XANDB '#' expr XANDB expr DIRECT XANDB expr EXTENDED XANDB indexed REGX XANDB indexed REGY+TS6811 X.sp XASL ACCUM REGA XASL ACCUM REGB XASL expr XASL indexed REGX XASL indexed REGY+TS6811 X.sp XASLA X.sp XASLB X.sp XASLD TS6801PLUS X.sp XASR ACCUM REGA XASR ACCUM REGB XASR expr XASR indexed REGX XASR indexed REGY+TS6811 X.sp XASRA X.sp XASRB X.sp XBCC expr X.sp XBCLR expr ',' expr TS6811 XBCLR indexed ',' expr REGX+TS6811 XBCLR indexed ',' expr REGY+TS6811 X.sp XBCS expr X.sp XBEQ expr X.sp XBGE expr X.sp XBGT expr X.sp XBHI expr X.sp XBHS expr X.sp XBIT ACCUM '#' expr REGA XBIT ACCUM '#' expr REGB XBIT ACCUM expr REGA+DIRECT XBIT ACCUM expr REGA+EXTENDED XBIT ACCUM expr REGB+DIRECT XBIT ACCUM expr REGB+EXTENDED XBIT ACCUM indexed REGA+REGX XBIT ACCUM indexed REGA+REGY+TS6811 XBIT ACCUM indexed REGB+REGX XBIT ACCUM indexed REGB+REGY+TS6811 X.sp XBITA '#' expr XBITA expr DIRECT XBITA expr EXTENDED XBITA indexed REGX XBITA indexed REGY+TS6811 X.sp XBITB '#' expr XBITB expr DIRECT XBITB expr EXTENDED XBITB indexed REGX XBITB indexed REGY+TS6811 X.sp XBLE expr X.sp XBLO expr X.sp XBLS expr X.sp XBLT expr X.sp XBMI expr X.sp XBNE expr X.sp XBPL expr X.sp XBRA expr X.sp XBRCLR expr ',' expr ',' expr TS6811 XBRCLR indexed ',' expr ',' expr REGX+TS6811 XBRCLR indexed ',' expr ',' expr REGY+TS6811 X.sp XBRN expr TS6801PLUS X.sp XBRSET expr ',' expr ',' expr TS6811 XBRSET indexed ',' expr ',' expr REGX+TS6811 XBRSET indexed ',' expr ',' expr REGY+TS6811 X.sp XBSET expr ',' expr TS6811 XBSET indexed ',' expr REGX+TS6811 XBSET indexed ',' expr REGY+TS6811 X.sp XBSR expr X.sp XBVC expr X.sp XBVS expr X.sp XCBA X.sp XCLC X.sp XCLI X.sp XCLR ACCUM REGA XCLR ACCUM REGB XCLR expr XCLR indexed REGX XCLR indexed REGY+TS6811 X.sp XCLRA X.sp XCLRB X.sp XCLV X.sp XCMP ACCUM '#' expr REGA XCMP ACCUM '#' expr REGB XCMP ACCUM expr REGA+DIRECT XCMP ACCUM expr REGA+EXTENDED XCMP ACCUM expr REGB+DIRECT XCMP ACCUM expr REGB+EXTENDED XCMP ACCUM indexed REGA+REGX XCMP ACCUM indexed REGA+REGY+TS6811 XCMP ACCUM indexed REGB+REGX XCMP ACCUM indexed REGB+REGY+TS6811 X.sp XCMPA '#' expr XCMPA expr DIRECT XCMPA expr EXTENDED XCMPA indexed REGX XCMPA indexed REGY+TS6811 X.sp XCMPB '#' expr XCMPB expr DIRECT XCMPB expr EXTENDED XCMPB indexed REGX XCMPB indexed REGY+TS6811 X.sp XCOM ACCUM REGA XCOM ACCUM REGB XCOM expr XCOM indexed REGX XCOM indexed REGY+TS6811 X.sp XCOMA X.sp XCOMB X.sp XCPD '#' expr TS6811 XCPD expr DIRECT+TS6811 XCPD expr EXTENDED+TS6811 XCPD indexed REGX+TS6811 XCPD indexed REGY+TS6811 X.sp XCPX '#' expr XCPX expr DIRECT XCPX expr EXTENDED XCPX indexed REGX XCPX indexed REGY+TS6811 X.sp XCPY '#' expr TS6811 XCPY expr DIRECT+TS6811 XCPY expr EXTENDED+TS6811 XCPY indexed REGX+TS6811 XCPY indexed REGY+TS6811 X.sp XDAA X.sp XDEC ACCUM REGA XDEC ACCUM REGB XDEC expr XDEC indexed REGX XDEC indexed REGY+TS6811 X.sp XDECA X.sp XDECB X.sp XDES X.sp XDEX X.sp XDEY TS6811 X.sp XEOR ACCUM '#' expr REGA XEOR ACCUM '#' expr REGB XEOR ACCUM expr REGA+DIRECT XEOR ACCUM expr REGA+EXTENDED XEOR ACCUM expr REGB+DIRECT XEOR ACCUM expr REGB+EXTENDED XEOR ACCUM indexed REGA+REGX XEOR ACCUM indexed REGA+REGY+TS6811 XEOR ACCUM indexed REGB+REGX XEOR ACCUM indexed REGB+REGY+TS6811 X.sp XEORA '#' expr XEORA expr DIRECT XEORA expr EXTENDED XEORA indexed REGX XEORA indexed REGY+TS6811 X.sp XEORB '#' expr XEORB expr DIRECT XEORB expr EXTENDED XEORB indexed REGX XEORB indexed REGY+TS6811 X.sp XFDIV TS6811 X.sp XIDIV TS6811 X.sp XINC ACCUM REGA XINC ACCUM REGB XINC expr XINC indexed REGX XINC indexed REGY+TS6811 X.sp XINCA X.sp XINCB X.sp XINS X.sp XINX X.sp XINY TS6811 X.sp XJMP expr XJMP indexed REGX XJMP indexed REGY+TS6811 X.sp XJSR expr DIRECT+CPU6800 XJSR expr DIRECT+TS6801PLUS XJSR expr EXTENDED XJSR indexed REGX XJSR indexed REGY+TS6811 X.sp XLDA ACCUM '#' expr REGA XLDA ACCUM '#' expr REGB XLDA ACCUM expr REGA+DIRECT XLDA ACCUM expr REGA+EXTENDED XLDA ACCUM expr REGB+DIRECT XLDA ACCUM expr REGB+EXTENDED XLDA ACCUM indexed REGA+REGX XLDA ACCUM indexed REGA+REGY+TS6811 XLDA ACCUM indexed REGB+REGX XLDA ACCUM indexed REGB+REGY+TS6811 X.sp XLDAA '#' expr XLDAA expr DIRECT XLDAA expr EXTENDED XLDAA indexed REGX XLDAA indexed REGY+TS6811 X.sp XLDAB '#' expr XLDAB expr DIRECT XLDAB expr EXTENDED XLDAB indexed REGX XLDAB indexed REGY+TS6811 X.sp XLDD '#' expr TS6801PLUS XLDD expr DIRECT+TS6801PLUS XLDD expr EXTENDED+TS6801PLUS XLDD indexed REGX+TS6801PLUS XLDD indexed REGY+TS6811 X.sp XLDS '#' expr XLDS expr DIRECT XLDS expr EXTENDED XLDS indexed REGX XLDS indexed REGY+TS6811 X.sp XLDX '#' expr XLDX expr DIRECT XLDX expr EXTENDED XLDX indexed REGX XLDX indexed REGY+TS6811 X.sp XLDY '#' expr TS6811 XLDY expr DIRECT+TS6811 XLDY expr EXTENDED+TS6811 XLDY indexed REGX+TS6811 XLDY indexed REGY+TS6811 X.sp XLSL ACCUM REGA XLSL ACCUM REGB XLSL expr XLSL indexed REGX XLSL indexed REGY+TS6811 X.sp XLSLA X.sp XLSLB X.sp XLSLD TS6801PLUS X.sp XLSR ACCUM REGA XLSR ACCUM REGB XLSR expr XLSR indexed REGX XLSR indexed REGY+TS6811 X.sp XLSRA X.sp XLSRB X.sp XLSRD TS6801PLUS X.sp XMUL TS6801PLUS X.sp XNEG ACCUM REGA XNEG ACCUM REGB XNEG expr XNEG indexed REGX XNEG indexed REGY+TS6811 X.sp XNEGA X.sp XNEGB X.sp XNOP X.sp XORA ACCUM '#' expr REGA XORA ACCUM '#' expr REGB XORA ACCUM expr REGA+DIRECT XORA ACCUM expr REGA+EXTENDED XORA ACCUM expr REGB+DIRECT XORA ACCUM expr REGB+EXTENDED XORA ACCUM indexed REGA+REGX XORA ACCUM indexed REGA+REGY+TS6811 XORA ACCUM indexed REGB+REGX XORA ACCUM indexed REGB+REGY+TS6811 X.sp XORAA '#' expr XORAA expr DIRECT XORAA expr EXTENDED XORAA indexed REGX XORAA indexed REGY+TS6811 X.sp XORAB '#' expr XORAB expr DIRECT XORAB expr EXTENDED XORAB indexed REGX XORAB indexed REGY+TS6811 X.sp XPSH ACCUM REGA XPSH ACCUM REGB XPSH INDEX REGX+TS6801PLUS XPSH INDEX REGY+TS6811 X.sp XPSHA X.sp XPSHB X.sp XPSHX TS6801PLUS X.sp XPSHY TS6811 X.sp XPUL ACCUM REGA XPUL ACCUM REGB XPUL INDEX REGX+TS6801PLUS XPUL INDEX REGY+TS6811 X.sp XPULA X.sp XPULB X.sp XPULX TS6801PLUS X.sp XPULY TS6811 X.sp XROL ACCUM REGA XROL ACCUM REGB XROL expr XROL indexed REGX XROL indexed REGY+TS6811 X.sp XROLA X.sp XROLB X.sp XROR ACCUM REGA XROR ACCUM REGB XROR expr XROR indexed REGX XROR indexed REGY+TS6811 X.sp XRORA X.sp XRORB X.sp XRTI X.sp XRTS X.sp XSBA X.sp XSBC ACCUM '#' expr REGA XSBC ACCUM '#' expr REGB XSBC ACCUM expr REGA+DIRECT XSBC ACCUM expr REGA+EXTENDED XSBC ACCUM expr REGB+DIRECT XSBC ACCUM expr REGB+EXTENDED XSBC ACCUM indexed REGA+REGX XSBC ACCUM indexed REGA+REGY+TS6811 XSBC ACCUM indexed REGB+REGX XSBC ACCUM indexed REGB+REGY+TS6811 X.sp XSBCA '#' expr XSBCA expr DIRECT XSBCA expr EXTENDED XSBCA indexed REGX XSBCA indexed REGY+TS6811 X.sp XSBCB '#' expr XSBCB expr DIRECT XSBCB expr EXTENDED XSBCB indexed REGX XSBCB indexed REGY+TS6811 X.sp XSEC X.sp XSEI X.sp XSEV X.sp XSTA ACCUM expr REGA+DIRECT XSTA ACCUM expr REGA+EXTENDED XSTA ACCUM expr REGB+DIRECT XSTA ACCUM expr REGB+EXTENDED XSTA ACCUM indexed REGA+REGX XSTA ACCUM indexed REGA+REGY+TS6811 XSTA ACCUM indexed REGB+REGX XSTA ACCUM indexed REGB+REGY+TS6811 X.sp XSTAA expr DIRECT XSTAA expr EXTENDED XSTAA indexed REGX XSTAA indexed REGY+TS6811 X.sp XSTAB expr DIRECT XSTAB expr EXTENDED XSTAB indexed REGX XSTAB indexed REGY+TS6811 X.sp XSTD expr DIRECT+TS6801PLUS XSTD expr EXTENDED+TS6801PLUS XSTD indexed REGX+TS6801PLUS XSTD indexed REGY+TS6811 X.sp XSTOP TS6811 X.sp XSTS expr DIRECT XSTS expr EXTENDED XSTS indexed REGX XSTS indexed REGY+TS6811 X.sp XSTX expr DIRECT XSTX expr EXTENDED XSTX indexed REGX XSTX indexed REGY+TS6811 X.sp XSTY expr DIRECT+TS6811 XSTY expr EXTENDED+TS6811 XSTY indexed REGX+TS6811 XSTY indexed REGY+TS6811 X.sp XSUB ACCUM '#' expr REGA XSUB ACCUM '#' expr REGB XSUB ACCUM expr REGA+DIRECT XSUB ACCUM expr REGA+EXTENDED XSUB ACCUM expr REGB+DIRECT XSUB ACCUM expr REGB+EXTENDED XSUB ACCUM indexed REGA+REGX XSUB ACCUM indexed REGA+REGY+TS6811 XSUB ACCUM indexed REGB+REGX XSUB ACCUM indexed REGB+REGY+TS6811 X.sp XSUBA '#' expr XSUBA expr DIRECT XSUBA expr EXTENDED XSUBA indexed REGX XSUBA indexed REGY+TS6811 X.sp XSUBB '#' expr XSUBB expr DIRECT XSUBB expr EXTENDED XSUBB indexed REGX XSUBB indexed REGY+TS6811 X.sp XSUBD '#' expr TS6801PLUS XSUBD expr DIRECT+TS6801PLUS XSUBD expr EXTENDED+TS6801PLUS XSUBD indexed REGX+TS6801PLUS XSUBD indexed REGY+TS6811 X.sp XSWI X.sp XTAB X.sp XTAP X.sp XTBA X.sp XTEST X.sp XTPA X.sp XTST ACCUM REGA XTST ACCUM REGB XTST expr XTST indexed REGX XTST indexed REGY+TS6811 X.sp XTSTA X.sp XTSTB X.sp XTSX X.sp XTSY TS6811 X.sp XTXS X.sp XTYS TS6811 X.sp XWAI X.sp XXGDX TS6811 X.sp XXGDY TS6811 X.TE X.H 3 "Selection Criteria Keywords" X.VL 25 5 X.LI CPU6800 XThe instruction is only valid for the 6800 instruction set. X.LI CPU6801 XThe instruction is only valid for the 6801 instruction set. X.LI TS6801PLUS XThe instruction is valid for the 6801 and 68hc11. X.LI TS6811 XThe instruction is only valid for the 68hc11 instruction set. X.LI REGA XThe instruction can use the A accumulator. X.LI REGB XThe instruction can use the B accumulator. X.LI REGX XThe instruction can use the X index register. X.LI REGY XThe instruction can use the Y index register. X.LI DIRECT XThe instruction can use the direct addressing mode. XThe expression must have a value between 0 and 255 that is defined when the Xinstruction is processed in the input pass. X.LI EXTENDED XThe instruction can use the extended addressing mode. X.LE X.H 3 "Notes" X.H 4 "Apostrophes" XThe apostrophes in the syntax field are a notation used for the Xparser generator and are not put in the assembler source statements. X.H 4 "Indexed Addressing" XThe indexed addressing is represented in two ways. XEither "expression, index register" or "index register, expression" is Xaccepted by the assembler. Index register is X for all instruction sets Xand X or Y for the 6811. X.H 2 "Reserved Symbols" X.H 3 "Machine Dependent Reserved Symbols" XA XB XX XY Xa Xb Xx Xy X.H 3 "Standard Reserved Symbols" XAND XDEFINED XEQ XGE XGT XHIGH XLE XLOW XLT XMOD XNE XNOT XOR XSHL XSHR XXOR Xand Xdefined Xeq Xge Xgt Xhigh Xle Xlow Xlt Xmod Xne Xnot Xor Xshl Xshr Xxor X.TC 1 1 7 SHAR_EOF true || echo 'restore of as6811.doc failed' fi # ============= as6811.tst ============== if test -f 'as6811.tst' -a X"$1" != X"-c"; then echo 'x - skipping as6811.tst (File already exists)' else echo 'x - extracting as6811.tst (Text)' sed 's/^X//' << 'SHAR_EOF' > 'as6811.tst' && X org $99 Xm equ $40 Xd fdb 123H X org $1234 Xe fdb 678 X org $2000 Xo set $66 Xi equ 32H X aba X abx X aby X adc a #i X adc a d X adc a e X adc a o,x X adc a o,y X adc b #i X adc b d X adc b e X adc b o,x X adc b o,y X adca #i X adca d X adca e X adca o,x X adca o,y X adcb #i X adcb d X adcb e X adcb o,x X adcb o,y X add a #i X add a d X add a e X add a o,x X add a o,y X add b #i X add b d X add b e X add b o,x X add b o,y X adda #i X adda d X adda e X adda o,x X adda o,y X addb #i X addb d X addb e X addb o,x X addb o,y X addd #i X addd d X addd e X addd o,x X addd o,y X and a #i X and a d X and a e X and a o,x X and a o,y X and b #i X and b d X and b e X and b o,x X and b o,y X anda #i X anda d X anda e X anda o,x X anda o,y X andb #i X andb d X andb e X andb o,x X andb o,y X asl a X asl b X asl e X asl o,x X asl o,y X asla X aslb X asld X asr a X asr b X asr e X asr o,x X asr o,y X asra X asrb X bcc *-4 X bclr d,m X bclr o,x,m X bclr o,y,m X bcs *-4 X beq *-4 X bge *-4 X bgt *-4 X bhi *-4 X bhs *-4 X bit a #i X bit a d X bit a e X bit a o,x X bit a o,y X bit b #i X bit b d X bit b e X bit b o,x X bit b o,y X bita #i X bita d X bita e X bita o,x X bita o,y X bitb #i X bitb d X bitb e X bitb o,x X bitb o,y X ble *-4 X blo *-4 X bls *-4 X blt *-4 X bmi *-4 X bne *-4 X bpl *-4 X bra *-4 X brclr d,m,*+5 X brclr o,x,m,*+5 X brclr o,y,m,*+5 X brn *-4 X brset d,m,*+5 X brset o,x,m,*+5 X brset o,y,m,*+5 X bset d,m X bset o,x,m X bset o,y,m X bsr *-4 X bvc *-4 X bvs *-4 X cba X clc X cli X clr a X clr b X clr e X clr o,x X clr o,y X clra X clrb X clv X cmp a #i X cmp a d X cmp a e X cmp a o,x X cmp a o,y X cmp b #i X cmp b d X cmp b e X cmp b o,x X cmp b o,y X cmpa #i X cmpa d X cmpa e X cmpa o,x X cmpa o,y X cmpb #i X cmpb d X cmpb e X cmpb o,x X cmpb o,y X com a X com b X com e X com o,x X com o,y X coma X comb X cpd #i X cpd d X cpd e X cpd o,x X cpd o,y X cpx #i X cpx d X cpx e X cpx o,x X cpx o,y X cpy #i X cpy d X cpy e X cpy o,x X cpy o,y X daa X dec a X dec b X dec e X dec o,x X dec o,y X deca X decb X des X dex X dey X eor a #i X eor a d X eor a e X eor a o,x X eor a o,y X eor b #i X eor b d X eor b e X eor b o,x X eor b o,y X eora #i X eora d X eora e X eora o,x X eora o,y X eorb #i X eorb d X eorb e X eorb o,x X eorb o,y X fdiv X idiv X inc a X inc b X inc e X inc o,x X inc o,y X inca X incb X ins X inx X iny X jmp e X jmp o,x X jmp o,y X jsr d X jsr e X jsr o,x X jsr o,y X lda a #i X lda a d X lda a e X lda a o,x X lda a o,y X lda b #i X lda b d X lda b e X lda b o,x X lda b o,y X ldaa #i X ldaa d X ldaa e X ldaa o,x X ldaa o,y X ldab #i X ldab d X ldab e X ldab o,x X ldab o,y X ldd #i X ldd d X ldd e X ldd o,x X ldd o,y X lds #i X lds d X lds e X lds o,x X lds o,y X ldx #i X ldx d X ldx e X ldx o,x X ldx o,y X ldy #i X ldy d X ldy e X ldy o,x X ldy o,y X lsl a X lsl b X lsl e X lsl o,x X lsl o,y X lsla X lslb X lsld X lsr a X lsr b X lsr e X lsr o,x X lsr o,y X lsra X lsrb X lsrd X mul X neg a X neg b X neg e X neg o,x X neg o,y X nega X negb X nop X ora a #i X ora a d X ora a e X ora a o,x X ora a o,y X ora b #i X ora b d X ora b e X ora b o,x X ora b o,y X oraa #i X oraa d X oraa e X oraa o,x X oraa o,y X orab #i X orab d X orab e X orab o,x X orab o,y X psh a X psh b X psh x X psh y X psha X pshb X pshx X pshy X pul a X pul b X pul x X pul y X pula X pulb X pulx X puly X rol a X rol b X rol e X rol o,x X rol o,y X rola X rolb X ror a X ror b X ror e X ror o,x X ror o,y X rora X rorb X rti X rts X sba X sbc a #i X sbc a d X sbc a e X sbc a o,x X sbc a o,y X sbc b #i X sbc b d X sbc b e X sbc b o,x X sbc b o,y X sbca #i X sbca d X sbca e X sbca o,x X sbca o,y X sbcb #i X sbcb d X sbcb e X sbcb o,x X sbcb o,y X sec X sei X sev X sta a d X sta a e X sta a o,x X sta a o,y X sta b d X sta b e X sta b o,x X sta b o,y X staa d X staa e X staa o,x X staa o,y X stab d X stab e X stab o,x X stab o,y X std d X std e X std o,x X std o,y X stop X sts d X sts e X sts o,x X sts o,y X stx d X stx e X stx o,x X stx o,y X sty d X sty e X sty o,x X sty o,y X sub a #i X sub a d X sub a e X sub a o,x X sub a o,y X sub b #i X sub b d X sub b e X sub b o,x X sub b o,y X suba #i X suba d X suba e X suba o,x X suba o,y X subb #i X subb d X subb e X subb o,x X subb o,y X subd #i X subd d X subd e X subd o,x X subd o,y X swi X tab X tap X tba X test X tpa X tst a X tst b X tst e X tst o,x X tst o,y X tsta X tstb X tsx X tsy X txs X tys X wai X xgdx X xgdy X end SHAR_EOF true || echo 'restore of as6811.tst failed' fi # ============= as6811.tut ============== if test -f 'as6811.tut' -a X"$1" != X"-c"; then echo 'x - skipping as6811.tut (File already exists)' else echo 'x - extracting as6811.tut (Text)' sed 's/^X//' << 'SHAR_EOF' > 'as6811.tut' && X00000040 m 00000099 d 00001234 e X00000066 o 00000032 i X 0x99 org $99 X 0x40 m equ $40 X0099 01 23 d fdb 123H X 0x1234 org $1234 X1234 02 a6 e fdb 678 X 0x2000 org $2000 X 0x66 o set $66 X 0x32 i equ 32H X2000 1b aba X2001 3a abx X2002 18 3a aby X2004 89 32 adc a #i X2006 99 99 adc a d X2008 b9 12 34 adc a e X200b a9 66 adc a o,x X200d 18 a9 66 adc a o,y X2010 c9 32 adc b #i X2012 d9 99 adc b d X2014 f9 12 34 adc b e X2017 e9 66 adc b o,x X2019 18 e9 66 adc b o,y X201c 89 32 adca #i X201e 99 99 adca d X2020 b9 12 34 adca e X2023 a9 66 adca o,x X2025 18 a9 66 adca o,y X2028 c9 32 adcb #i X202a d9 99 adcb d X202c f9 12 34 adcb e X202f e9 66 adcb o,x X2031 18 e9 66 adcb o,y X2034 8b 32 add a #i X2036 9b 99 add a d X2038 bb 12 34 add a e X203b ab 66 add a o,x X203d 18 ab 66 add a o,y X2040 cb 32 add b #i X2042 db 99 add b d X2044 fb 12 34 add b e X2047 eb 66 add b o,x X2049 18 eb 66 add b o,y X204c 8b 32 adda #i X204e 9b 99 adda d X2050 bb 12 34 adda e X2053 ab 66 adda o,x X2055 18 ab 66 adda o,y X2058 cb 32 addb #i X205a db 99 addb d X205c fb 12 34 addb e X205f eb 66 addb o,x X2061 18 eb 66 addb o,y X2064 c3 00 32 addd #i X2067 d3 99 addd d X2069 f3 12 34 addd e X206c e3 66 addd o,x X206e 18 e3 66 addd o,y X2071 84 32 and a #i X2073 94 99 and a d X2075 b4 12 34 and a e X2078 a4 66 and a o,x X207a 18 a4 66 and a o,y X207d c4 32 and b #i X207f d4 99 and b d X2081 f4 12 34 and b e X2084 e4 66 and b o,x X2086 18 e4 66 and b o,y X2089 84 32 anda #i X208b 94 99 anda d X208d b4 12 34 anda e X2090 a4 66 anda o,x X2092 18 a4 66 anda o,y X2095 c4 32 andb #i X2097 d4 99 andb d X2099 f4 12 34 andb e X209c e4 66 andb o,x X209e 18 e4 66 andb o,y X20a1 48 asl a X20a2 58 asl b X20a3 78 12 34 asl e X20a6 68 66 asl o,x X20a8 18 68 66 asl o,y X20ab 48 asla X20ac 58 aslb X20ad 05 asld X20ae 47 asr a X20af 57 asr b X20b0 77 12 34 asr e X20b3 67 66 asr o,x X20b5 18 67 66 asr o,y X20b8 47 asra X20b9 57 asrb X20ba 24 fa bcc *-4 X20bc 15 99 40 bclr d,m X20bf 1d 66 40 bclr o,x,m X20c2 18 1d 66 40 bclr o,y,m X20c6 25 fa bcs *-4 X20c8 27 fa beq *-4 X20ca 2c fa bge *-4 X20cc 2e fa bgt *-4 X20ce 22 fa bhi *-4 X20d0 24 fa bhs *-4 X20d2 85 32 bit a #i X20d4 95 99 bit a d X20d6 b5 12 34 bit a e X20d9 a5 66 bit a o,x X20db 18 a5 66 bit a o,y X20de c5 32 bit b #i X20e0 d5 99 bit b d X20e2 f5 12 34 bit b e X20e5 e5 66 bit b o,x X20e7 18 e5 66 bit b o,y X20ea 85 32 bita #i X20ec 95 99 bita d X20ee b5 12 34 bita e X20f1 a5 66 bita o,x X20f3 18 a5 66 bita o,y X20f6 c5 32 bitb #i X20f8 d5 99 bitb d X20fa f5 12 34 bitb e X20fd e5 66 bitb o,x X20ff 18 e5 66 bitb o,y X2102 2f fa ble *-4 X2104 25 fa blo *-4 X2106 23 fa bls *-4 X2108 2d fa blt *-4 X210a 2b fa bmi *-4 X210c 26 fa bne *-4 X210e 2a fa bpl *-4 X2110 20 fa bra *-4 X2112 13 99 40 01 brclr d,m,*+5 X2116 1f 66 40 01 brclr o,x,m,*+5 X211a 18 1f 66 40 00 brclr o,y,m,*+5 X211f 21 fa brn *-4 X2121 12 99 40 01 brset d,m,*+5 X2125 1e 66 40 01 brset o,x,m,*+5 X2129 18 1e 66 40 00 brset o,y,m,*+5 X212e 14 99 40 bset d,m X2131 1c 66 40 bset o,x,m X2134 18 1c 66 40 bset o,y,m X2138 8d fa bsr *-4 X213a 28 fa bvc *-4 X213c 29 fa bvs *-4 X213e 11 cba X213f 0c clc X2140 0e cli X2141 4f clr a X2142 5f clr b X2143 7f 12 34 clr e X2146 6f 66 clr o,x X2148 18 6f 66 clr o,y X214b 4f clra X214c 5f clrb X214d 0a clv X214e 81 32 cmp a #i X2150 91 99 cmp a d X2152 b1 12 34 cmp a e X2155 a1 66 cmp a o,x X2157 18 a1 66 cmp a o,y X215a c1 32 cmp b #i X215c d1 99 cmp b d X215e f1 12 34 cmp b e X2161 e1 66 cmp b o,x X2163 18 e1 66 cmp b o,y X2166 81 32 cmpa #i X2168 91 99 cmpa d X216a b1 12 34 cmpa e X216d a1 66 cmpa o,x X216f 18 a1 66 cmpa o,y X2172 c1 32 cmpb #i X2174 d1 99 cmpb d X2176 f1 12 34 cmpb e X2179 e1 66 cmpb o,x X217b 18 e1 66 cmpb o,y X217e 43 com a X217f 53 com b X2180 73 12 34 com e X2183 63 66 com o,x X2185 18 63 66 com o,y X2188 43 coma X2189 53 comb X218a 1a 83 00 32 cpd #i X218e 1a 93 99 cpd d X2191 1a b3 12 34 cpd e X2195 1a a3 66 cpd o,x X2198 cd a3 66 cpd o,y X219b 8c 00 32 cpx #i X219e 9c 99 cpx d X21a0 bc 12 34 cpx e X21a3 ac 66 cpx o,x X21a5 cd ac 66 cpx o,y X21a8 18 8c 00 32 cpy #i X21ac 18 9c 99 cpy d X21af 18 bc 12 34 cpy e X21b3 1a ac 66 cpy o,x X21b6 18 ac 66 cpy o,y X21b9 19 daa X21ba 4a dec a X21bb 5a dec b X21bc 7a 12 34 dec e X21bf 6a 66 dec o,x X21c1 18 6a 66 dec o,y X21c4 4a deca X21c5 5a decb X21c6 34 des X21c7 09 dex X21c8 18 09 dey X21ca 88 32 eor a #i X21cc 98 99 eor a d X21ce b8 12 34 eor a e X21d1 a8 66 eor a o,x X21d3 18 a8 66 eor a o,y X21d6 c8 32 eor b #i X21d8 d8 99 eor b d X21da f8 12 34 eor b e X21dd e8 66 eor b o,x X21df 18 e8 66 eor b o,y X21e2 88 32 eora #i X21e4 98 99 eora d X21e6 b8 12 34 eora e X21e9 a8 66 eora o,x X21eb 18 a8 66 eora o,y X21ee c8 32 eorb #i X21f0 d8 99 eorb d X21f2 f8 12 34 eorb e X21f5 e8 66 eorb o,x X21f7 18 e8 66 eorb o,y X21fa 03 fdiv X21fb 02 idiv X21fc 4c inc a X21fd 5c inc b X21fe 7c 12 34 inc e X2201 6c 66 inc o,x X2203 18 6c 66 inc o,y X2206 4c inca X2207 5c incb X2208 31 ins X2209 08 inx X220a 18 08 iny X220c 7e 12 34 jmp e X220f 6e 66 jmp o,x X2211 18 6e 66 jmp o,y X2214 9d 99 jsr d X2216 bd 12 34 jsr e X2219 ad 66 jsr o,x X221b 18 ad 66 jsr o,y X221e 86 32 lda a #i X2220 96 99 lda a d X2222 b6 12 34 lda a e X2225 a6 66 lda a o,x X2227 18 a6 66 lda a o,y X222a c6 32 lda b #i X222c d6 99 lda b d X222e f6 12 34 lda b e X2231 e6 66 lda b o,x X2233 18 e6 66 lda b o,y X2236 86 32 ldaa #i X2238 96 99 ldaa d X223a b6 12 34 ldaa e X223d a6 66 ldaa o,x X223f 18 a6 66 ldaa o,y X2242 c6 32 ldab #i X2244 d6 99 ldab d X2246 f6 12 34 ldab e X2249 e6 66 ldab o,x X224b 18 e6 66 ldab o,y X224e cc 00 32 ldd #i X2251 dc 99 ldd d X2253 fc 12 34 ldd e X2256 ec 66 ldd o,x X2258 18 ec 66 ldd o,y X225b 8e 00 32 lds #i X225e 9e 99 lds d X2260 be 12 34 lds e X2263 ae 66 lds o,x X2265 18 ae 66 lds o,y X2268 ce 00 32 ldx #i X226b de 99 ldx d X226d fe 12 34 ldx e X2270 ee 66 ldx o,x X2272 cd ee 66 ldx o,y X2275 18 ce 00 32 ldy #i X2279 18 de 99 ldy d X227c 18 fe 12 34 ldy e X2280 1a ee 66 ldy o,x X2283 18 ee 66 ldy o,y X2286 48 lsl a X2287 58 lsl b X2288 78 12 34 lsl e X228b 68 66 lsl o,x X228d 18 68 66 lsl o,y X2290 48 lsla X2291 58 lslb X2292 05 lsld X2293 44 lsr a X2294 54 lsr b X2295 74 12 34 lsr e X2298 64 66 lsr o,x X229a 18 64 66 lsr o,y X229d 44 lsra X229e 54 lsrb X229f 04 lsrd X22a0 3d mul X22a1 40 neg a X22a2 50 neg b X22a3 70 12 34 neg e X22a6 60 66 neg o,x X22a8 18 60 66 neg o,y X22ab 40 nega X22ac 50 negb X22ad 01 nop X22ae 8a 32 ora a #i X22b0 9a 99 ora a d X22b2 ba 12 34 ora a e X22b5 aa 66 ora a o,x X22b7 18 aa 66 ora a o,y X22ba ca 32 ora b #i X22bc da 99 ora b d X22be fa 12 34 ora b e X22c1 ea 66 ora b o,x X22c3 18 ea 66 ora b o,y X22c6 8a 32 oraa #i X22c8 9a 99 oraa d X22ca ba 12 34 oraa e X22cd aa 66 oraa o,x X22cf 18 aa 66 oraa o,y X22d2 ca 32 orab #i X22d4 da 99 orab d X22d6 fa 12 34 orab e X22d9 ea 66 orab o,x X22db 18 ea 66 orab o,y X22de 36 psh a X22df 37 psh b X22e0 3c psh x X22e1 18 3c psh y X22e3 36 psha X22e4 37 pshb X22e5 3c pshx X22e6 18 3c pshy X22e8 32 pul a X22e9 33 pul b X22ea 38 pul x X22eb 18 38 pul y X22ed 32 pula X22ee 33 pulb X22ef 38 pulx X22f0 18 38 puly X22f2 49 rol a X22f3 59 rol b X22f4 79 12 34 rol e X22f7 69 66 rol o,x X22f9 18 69 66 rol o,y X22fc 49 rola X22fd 59 rolb X22fe 46 ror a X22ff 56 ror b X2300 76 12 34 ror e X2303 66 66 ror o,x X2305 18 66 66 ror o,y X2308 46 rora X2309 56 rorb X230a 3b rti X230b 39 rts X230c 10 sba X230d 82 32 sbc a #i X230f 92 99 sbc a d X2311 b2 12 34 sbc a e X2314 a2 66 sbc a o,x X2316 18 a2 66 sbc a o,y X2319 c2 32 sbc b #i X231b d2 99 sbc b d X231d f2 12 34 sbc b e X2320 e2 66 sbc b o,x X2322 18 e2 66 sbc b o,y X2325 82 32 sbca #i X2327 92 99 sbca d X2329 b2 12 34 sbca e X232c a2 66 sbca o,x X232e 18 a2 66 sbca o,y X2331 c2 32 sbcb #i X2333 d2 99 sbcb d X2335 f2 12 34 sbcb e X2338 e2 66 sbcb o,x X233a 18 e2 66 sbcb o,y X233d 0d sec X233e 0f sei X233f 0b sev X2340 97 99 sta a d X2342 b7 12 34 sta a e X2345 a7 66 sta a o,x X2347 18 a7 66 sta a o,y X234a d7 99 sta b d X234c f7 12 34 sta b e X234f e7 66 sta b o,x X2351 18 e7 66 sta b o,y X2354 97 99 staa d X2356 b7 12 34 staa e X2359 a7 66 staa o,x X235b 18 a7 66 staa o,y X235e d7 99 stab d X2360 f7 12 34 stab e X2363 e7 66 stab o,x X2365 18 e7 66 stab o,y X2368 dd 99 std d X236a fd 12 34 std e X236d ed 66 std o,x X236f 18 ed 66 std o,y X2372 cf stop X2373 9f 99 sts d X2375 bf 12 34 sts e X2378 af 66 sts o,x X237a 18 af 66 sts o,y X237d df 99 stx d X237f ff 12 34 stx e X2382 ef 66 stx o,x X2384 cd ef 66 stx o,y X2387 18 df 99 sty d X238a 18 ff 12 34 sty e X238e 1a ef 66 sty o,x X2391 18 ef 66 sty o,y X2394 80 32 sub a #i X2396 90 99 sub a d X2398 b0 12 34 sub a e X239b a0 66 sub a o,x X239d 18 a0 66 sub a o,y X23a0 c0 32 sub b #i X23a2 d0 99 sub b d X23a4 f0 12 34 sub b e X23a7 e0 66 sub b o,x X23a9 18 e0 66 sub b o,y X23ac 80 32 suba #i X23ae 90 99 suba d X23b0 b0 12 34 suba e X23b3 a0 66 suba o,x X23b5 18 a0 66 suba o,y X23b8 c0 32 subb #i X23ba d0 99 subb d X23bc f0 12 34 subb e X23bf e0 66 subb o,x X23c1 18 e0 66 subb o,y X23c4 83 00 32 subd #i X23c7 93 99 subd d X23c9 b3 12 34 subd e X23cc a3 66 subd o,x X23ce 18 a3 66 subd o,y X23d1 3f swi X23d2 16 tab X23d3 06 tap X23d4 17 tba X23d5 00 test X23d6 07 tpa X23d7 4d tst a X23d8 5d tst b X23d9 7d 12 34 tst e X23dc 6d 66 tst o,x X23de 18 6d 66 tst o,y X23e1 4d tsta X23e2 5d tstb X23e3 30 tsx X23e4 18 30 tsy X23e6 35 txs X23e7 18 35 tys X23e9 3e wai X23ea 8f xgdx X23eb 18 8f xgdy X end X ERROR SUMMARY - ERRORS DETECTED 0 X - WARNINGS 0 SHAR_EOF true || echo 'restore of as6811.tut failed' fi true || echo 'restore of as6811.y failed' echo End of part 1, continue with part 2 exit 0 Brought to you by Super Global Mega Corp .com