home *** CD-ROM | disk | FTP | other *** search
/ SeeIn AO / ALICE-CD.BIN / Šj”­ƒlƒbƒg�•‚»‚Ì‘¼ / nv_mini / source / nvsound.adv < prev    next >
Text File  |  1998-08-28  |  1KB  |  50 lines
  1. ;================================================================================
  2. ; NVSYSTEM-mini ë╣èyè╓îW                                 programmed by ALICE SOFT
  3. ;================================================================================
  4.  
  5. **InitSound:
  6.     ~PlayCd 0,0:
  7.     ~PlayMidi 0,0:
  8.     ~PlayPcm 0,1,1:
  9.     ~0,0:
  10.  
  11. **RemoveSound:
  12.     ~PlayCd 0,0:
  13.     ~PlayMidi 0,0:
  14.     ~PlayPcm 0,1,1:
  15.     ~0,0:
  16.  
  17. ;================================================================================
  18. **PlayCd vPlayCd,fPlayCd:
  19.     SL fPlayCd:
  20.     SS vPlayCd:
  21.     ~0,0:
  22.  
  23. **PlayMidi vPlayMidi,fPlayMidi:
  24.     { vPlayMidi=0:SG 0,0:}
  25.     { vPlayMidi\0:SL fPlayMidi,    SG 1,vPlayMidi:}
  26.     ~0,0:
  27.  
  28. **PlayPcm vPlayPcm,fPlayPcm,fPcmWait:
  29.     US a01,30:
  30.     SP vPlayPcm,fPlayPcm:
  31.     { vPlayPcm\0:
  32.         { fPlayPcm\0:
  33.             { fPcmWait=TRUE:
  34.                 !a01:TRUE!
  35.                 <@ a01=TRUE:SU a01,a02:>
  36.             }
  37.         }
  38.     }
  39.     { vPlayPcm=0:ST 0:}
  40.     UG a01,30:
  41.     ~0,0:
  42.  
  43. ;================================================================================
  44. **RecoverSound:
  45.     ~PlayCd   vPlayCd  ,fPlayCd:
  46.     ~PlayMidi vPlayMidi,fPlayMidi:
  47.     {(fPlayPcm=0)*(vPlayPcm\0):~PlayPcm vPlayPcm,fPlayPcm,fPcmWait:~0,0:}
  48.     ~PlayPcm 0,1,1:
  49.     ~0,0:
  50.