API tools faq
paste
Guest User

Untitled

a guest
Sep 5th, 2018
80
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
M68000 Assembler 0.33 KB | None | 0 0
raw download clone embed print report
  1.         ORG     $8000
  2.  
  3. MAIN        MOVE.L  #A,A0
  4.         MOVE.L  #B,A1
  5.         CLR     D0
  6.         CLR     D1
  7.  
  8. CONTA       MOVE.B  (A0)+,D0
  9.         BEQ     INVERT
  10.         ADDQ        #1,D1
  11.         BRA     CONTA
  12.  
  13. INVERT  MOVE.B  -(A0),D2
  14.        
  15.         MOVE.B  (D2)+,(A1)+
  16.         ADDQ        #-1,D1
  17.         TST     D1
  18.         BNE     INVERT
  19.         STOP        #$2000
  20.  
  21. *AREA DATI
  22.         ORG     $8200
  23. A       DC.B        'UNO DUE TRE',0
  24. B       DS.B        100
  25.        
  26.         END     MAIN
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!