home *** CD-ROM | disk | FTP | other *** search
/ CD-X 3 / cdx_03.iso / democomp / demo / _2complx.arj / 2CLX-SRC.ZIP / INC / S3M.ASM < prev    next >
Encoding:
Assembly Source File  |  1995-08-29  |  2.1 KB  |  73 lines
  1. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  2. ;
  3. ; S3M PLAYER EXTERNAL ROUTiNES
  4. ;
  5. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  6.  
  7. S3MPLACE    DW      0
  8.  
  9. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  10.  
  11. LOADMUSiC:
  12.                 PUSHAD
  13.                 PUSH    ES DS
  14.                 MOV     DS,CS:S3MPLACE
  15.                 MOV     DX,0
  16.                 MOV     AX,0
  17.                 CALL    LOADOVERLAY
  18.                 MOV     ES,CS:S3MPLACE
  19.                 MOV     Di,0
  20.                 MOV     BX,1
  21.                 MOV     AX,0
  22.                 MOV     ECX,0
  23.                 CALL    S3MPLAY
  24.                 MOV     BX,2
  25.                 CALL    S3MPLAY
  26.                 POP     DS ES
  27.                 POPAD
  28.                 RET
  29. S3MPLAYOFF:
  30.                 PUSH    CS
  31.                 POP     DS
  32.                 MOV     BX,3
  33.                 CALL    S3MPLAY                 ;TURN OFF PLAYER
  34.                 RET
  35.  
  36. WAiTFORROW:     CMP     CS:[REALPATPOiNTER],AX
  37.                 JB      WAiTFORROW
  38.                 RET
  39.  
  40. WAiTFOR32OR0:   CMP     CS:[REALPATPOiNTER],0
  41.                 JE      WWW1
  42.                 CMP     CS:[REALPATPOiNTER],31
  43.                 JNE     WAiTFOR32OR0
  44. WWW1:           RET
  45.  
  46. NEXTROW:        PUSH    AX
  47.                 MOV     AX,CS:[REALPATPOiNTER]
  48. NEXTROWW:       CMP     AX,CS:[REALPATPOINTER]
  49.                 JE      NEXTROWW
  50.                 POP     AX
  51.                 RET
  52.  
  53. WAiTFOR4:       PUSH    AX
  54. WF4:            MOV     AX,CS:[REALPATPOiNTER]
  55.                 AND     AL,7
  56.                 JNE     WF4
  57.                 POP     AX
  58.                 RET
  59.  
  60. WAiTFOR8:       PUSH    AX
  61. WF8:            MOV     AX,CS:[REALPATPOiNTER]
  62.                 AND     AL,6
  63.                 JNE     WF8
  64.                 POP     AX
  65.                 RET
  66.  
  67. FADEMUSiC:      CALL    RASTERWAiT
  68.                 CALL    RASTERWAiT
  69.                 DEC     CS:MASTERVOLUME
  70.                 CMP     CS:MASTERVOLUME,0
  71.                 JA      FADEMUSiC
  72.                 RET
  73.