CD Actual 15

home *** CD-ROM | disk | FTP | other *** search

/ CD Actual 15 / CDACTUAL15.iso / cdactual / program / asm / PS_A689.ZIP / MNEMTEST.ASM < prev next >

Wrap

Assembly Source File | 1990-02-22 | 7.4 KB | 361 lines

.org 0 abx adca 100 adcb 100 ;test the various addressing modes for this class of instruction adda # forward1 adda #forward2 adda #h'00 adda #h'ff adda 100 adda 1000 adda < forward1 ;force direct addressing adda > 100 ;force extended addressing adda forward3 adda forward4 adda 0,x adda >0,y ;force 16 bit offset adda 0,s adda <0,u ;force 8 bit offset adda -16,x adda >+15,x ;force 16 bit offset adda 127,x adda >127,x ;force 16 bit offset adda 127,y adda 127,s adda 127,u adda -128,x adda -128,y adda -128,s adda -128,u adda 1000,x adda 1000,y adda 1000,s adda 1000,u adda forward1,x adda forward1,y adda forward1,s adda forward1,u adda a,x adda b,x adda d,x adda a,y adda b,y adda d,y adda a,s adda b,s adda d,s adda a,u adda b,u adda d,u adda ,--x adda ,-x adda ,x adda ,x+ adda ,x++ adda ,--y adda ,-y adda ,y adda ,y+ adda ,y++ adda ,--u adda ,-u adda ,u adda ,u+ adda ,u++ adda ,--s adda ,-s adda ,s adda ,s+ adda ,s++ adda 0,pc adda 127,pc adda -128,pc adda 1000,pc adda forward1,pc adda [ 0,x] adda [ 0,y] adda [ 0,s] adda [ 0,u] adda [ 127,x] adda [ 127,y] adda [ 127,s] adda [ 127,u] adda [ -128,x] adda [ -128,y] adda [ -128,s] adda [ -128,u] adda [ 1000,x] adda [ 1000,y] adda [ 1000,s] adda [ 1000,u] adda [ forward1,x] adda [ forward1,y] adda [ forward1,s] adda [ forward1,u] adda [ a,x] adda [ b,x] adda [ d,x] adda [ a,y] adda [ b,y] adda [ d,y] adda [ a,s] adda [ b,s] adda [ d,s] adda [ a,u] adda [ b,u] adda [ d,u] adda [ ,--x] adda [ ,x++] adda [ ,--y] adda [ ,y++] adda [ ,--u] adda [ ,u++] adda [ ,--s] adda [ ,s++] adda [ 0,pc] adda [ 127,pc] adda [ -128,pc] adda [ 1000,pc] adda [ forward1,pc] adda [ 0] adda [ 127] adda [ -128] adda [ 1000] adda [ forward1] addb #h'00 addd 100 addd #h'ff anda 100 andb 100 andcc #00 andcc #x'ff andcc #forward1 asl forward1,x asl 100 asl 1000 asl forward2,x asl forward3 asl forward4 asl h'00,x asl h'ff,x asla aslb asr 100 asra asrb bcc reltst bcs reltst beq reltst bge reltst bgt reltst bhi reltst bhs reltst bita 100 bitb 100 ble reltst blo reltst reltst: bls reltst blt reltst bmi reltst bne reltst bpl reltst bra reltst brn reltst bsr reltst bvc reltst bvs reltst clr 100 clra clrb cmpa 100 cmpb 100 cmpd 100 cmps 100 cmpu 100 cmpx 100 cmpy 100 com 100 coma comb cwai #00 daa dec 100 deca decb eora 100 synctst1:eorb 100 exg a,b exg a,cc exg a,dp exg b,a exg b,cc exg b,dp exg cc,a exg cc,b exg cc,dp exg d,pc exg d,s exg d,u exg d,x exg d,y exg dp,a exg dp,b exg dp,cc inc 100 inca incb jmp forward1,x jmp 100 jmp 1000 jmp forward2,x jmp forward3 jmp forward4 jmp h'00,x jmp h'ff,x jsr forward1,x jsr 100 jsr 1000 jsr forward2,x jsr forward3 jsr forward4 jsr h'00,x jsr h'ff,x lbcc reltst2 lbcs reltst2 lbeq reltst2 lbge reltst2 lbgt reltst2 lbhi reltst2 lbhs reltst2 lble reltst2 reltst2: lblo reltst2 lbls reltst2 lblt reltst2 lbmi reltst2 lbne reltst2 lbpl reltst2 lbra reltst2 lbrn reltst2 lbsr reltst2 lbvc reltst2 lbvs reltst2 lda 100 ldb 100 ldd 100 lds 100 ldu 100 ldx 100 ldy 100 leas 0,x leau 0,x ldx reldata1,pcr leax 0,y reldata1:.db 100 leax reldata1,pcr ldx reldata1,pcr leax > reldata1,pcr ;force long offset leax reldata2,pcr leax < reldata2,pcr ;force short offset leay 0,x reldata2:.db 100 lsl 100 lsr 100 lsra lsrb mul neg 100 nega negb nop oraa 100 orab 100 orcc #x'00 pshs ccr pshs a pshs b pshs d pshs dpr pshs x pshs y pshs s pshs u pshs pcr pshu ccr puls a pulu b rol 100 rola rolb ror 100 rora rorb rti rts sbca 100 sbcb 100 sex sta 100 stb 100 std 100 sts 100 stu 100 stx 100 sty 100 suba 100 subb 100 subd 100 swi swi2 swi3 sync tfr a,b ;source,destination tfr a,cc tfr a,dp tfr b,a tfr b,cc tfr b,dp tfr cc,a tfr cc,b tfr cc,dp tfr d,pc tfr d,s tfr d,u tfr d,x tfr d,y tfr dp,a tfr dp,b tfr dp,cc tfr pc,d tfr pc,x tfr s,d tfr s,x tfr u,d tfr u,x tfr x,d tfr x,pc tfr x,s tfr x,u tfr x,x tfr x,x tfr x,y tfr y,d tfr y,x tst 100 tsta tstb synctst2: .equ forward1,h'00 .equ forward2,h'ff .equ forward3,100 .equ forward4,1000 .org 1000 foo: .rs 1 .setdp * >> 8 lda foo synctst3: .end