Guest User

Untitled

a guest
Sep 4th, 2018
160
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.        
  2.  
  3.  
  4.  
  5. *prog
  6.         ORG     $8000
  7. MAIN        MOVEA.L          #A,A0
  8.         MOVEA.L #B,A1
  9.         CLR     D0
  10.        
  11.        
  12. LOOP        MOVE.B  (A0)+,D0
  13.         BEQ     FINE
  14.         CMP     #32,D0
  15.         BEQ     LOOP
  16. SPOSTA  MOVE.B  D0,(A1)+
  17.         BRA     LOOP
  18.  
  19.  
  20. FINE        JMP     FINE
  21.        
  22.  
  23.  
  24.  
  25.  
  26.  
  27.  
  28. *AREA DATI
  29.         ORG     $8200               *il prof ci tiene che dai uno spazio diverso per l'area dati
  30. A       DC.B        'uno due tre',0
  31. B       DS.B        100
  32. SYSA        EQU     $2000
  33.        
  34.         END         MAIN
Add Comment
Please, Sign In to add comment