home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / HPSOURCE / HPSRC_01.MSA / SOURCE_DEVPAC_VOL2.S < prev    next >
Text File  |  1987-04-21  |  849b  |  36 lines
  1. **********************************************
  2. * THE HAPPENING BOIZ PRESENT THE VOLUME      *
  3. * READ EXTENSION!!                           *
  4. *ENTER WITH A5 POINTING TO MEMORY WHERE YOU  *
  5. *WANT THE 3 VOLUMES RETURNED TO (3 BYTES!)   *
  6. *EG AREG(5)=START(3)
  7. *AFTER CALLING ROUTINE THE FIRST 3 BYTES IN  *
  8. *MEMORY BANK 3 WILL BE THE 3 CHANNEL VOLUMES *
  9. **********************************************
  10.  
  11.  
  12. CHANGE    MOVEQ.W #0,D0
  13.     MOVEQ.W #0,D1
  14.     MOVEQ.W #0,D2
  15.     MOVE.B #8,$FFFF8800.W      
  16.     MOVE.B $FFFF8800.W,D0
  17.     MOVE.B #9,$FFFF8800.W   
  18.     MOVE.B $FFFF8800.W,D1
  19.     MOVE.B #10,$FFFF8800.W  
  20.     MOVE.B $FFFF8800.W,D2
  21.     BTST #4,D0              
  22.     BEQ .L1
  23.     MOVE.B #10,D0           
  24. .L1    BTST #4,D1            
  25.            BEQ .L2
  26.     MOVE.B #10,D1
  27. .L2    BTST #4,D2        
  28.     BEQ .L3
  29.     MOVE.B #10,D2
  30. .L3     MOVE.B    D0,0(A5)
  31.     MOVE.B    D1,1(A5)
  32.     MOVE.B    D2,2(A5)
  33.     RTS
  34.     
  35.  
  36.