home *** CD-ROM | disk | FTP | other *** search
/ The Equalizer BBS / equalizer-bbs-collection_2004.zip / equalizer-bbs-collection / DEMOSCENE-STUFF / WM_SRC.ZIP / PLAYER.INC < prev    next >
Text File  |  1995-10-13  |  398b  |  30 lines
  1.  
  2.  
  3. PLAYER_FUNCTION PROC NEAR    ;funcion de llamada al player
  4.     PUSH    DS
  5.     push    es
  6.     push    fs
  7.     push    gs
  8.  
  9.     push    player
  10.     pop    es
  11.         push    data1
  12.     pop    ds
  13.     SHL     BP,2
  14.     ADD     BP,0100H
  15.  
  16.     push    cs
  17.     push    offset Player_return    ; Dirección de retorno
  18.  
  19.     push    player
  20.     push    bp
  21.     retf                ; Salto al player
  22. Player_return:
  23.     pop    gs
  24.     pop    fs
  25.     pop    es
  26.     POP     DS
  27.     RET
  28. PLAYER_FUNCTION ENDP
  29.  
  30.