home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #6 / amigaacscoverdisc1998-061998.iso / games / descent / source / main / ipx_esr.asm < prev    next >
Assembly Source File  |  1998-06-08  |  3KB  |  137 lines
  1. ;THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
  2. ;SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
  3. ;END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
  4. ;ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
  5. ;IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
  6. ;SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
  7. ;FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  8. ;CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  9. ;AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.  
  10. ;COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  11. ;
  12. ; $Source: f:/miner/source/main/rcs/ipx_esr.asm $
  13. ; $Revision: 2.0 $
  14. ; $Author: john $
  15. ; $Date: 1995/02/27 11:32:31 $
  16. ; 
  17. ; Ipx esr
  18. ; 
  19. ; $Log: ipx_esr.asm $
  20. ; Revision 2.0  1995/02/27  11:32:31  john
  21. ; New version 2.0, which has no anonymous unions, builds with
  22. ; Watcom 10.0, and doesn't require parsing BITMAPS.TBL.
  23. ; 
  24. ; Revision 1.2  1994/08/04  19:17:25  john
  25. ; Inbetween version of network stuff.
  26. ; 
  27. ; Revision 1.1  1994/08/02  11:41:09  john
  28. ; Initial revision
  29. ; 
  30. ; 
  31.  
  32.  
  33.  
  34. .386
  35.     option    oldstructs
  36.  
  37.     .nolist
  38.     include    types.inc
  39.     include    psmacros.inc
  40.     .list
  41.  
  42.     assume    cs:_TEXT, ds:_DATA
  43.  
  44. _DATA    segment    dword public USE32 'DATA'
  45.  
  46. rcsid    db    "$Id: ipx_esr.asm 2.0 1995/02/27 11:32:31 john Exp $"
  47.     align    4
  48.  
  49. REALREGS    STRUCT
  50.     RealEDI     dd      ?
  51.     RealESI     dd      ?
  52.     RealEBP     dd      ?
  53.     Reserved    dd      ?
  54.     RealEBX     dd      ?
  55.     RealEDX     dd      ?
  56.     RealECX     dd      ?
  57.     RealEAX     dd      ?
  58.     RealFlags   dw      ?
  59.     RealES      dw      ?
  60.     RealDS      dw      ?
  61.     RealFS      dw      ?
  62.     RealGS      dw      ?
  63.     RealIP      dw      ?
  64.     RealCS      dw      ?
  65.     RealSP      dw      ?
  66.     RealSS      dw      ?
  67. REALREGS    ENDS
  68.  
  69.  
  70. _DATA    ends
  71.  
  72. DGROUP  GROUP _DATA
  73.  
  74.  
  75. _TEXT    segment    dword public USE32 'CODE'
  76.  
  77.     public ipx_esr_
  78.  
  79. ipx_esr_:    
  80. ;    pusha
  81. ;    push ds
  82. ;    push es
  83. ;    push fs
  84. ;    push gs
  85.  
  86.  
  87.     push    eax
  88.     push    esi
  89.  
  90.     ; ds:esi = real mode ss:sp
  91.     ; es:edi = real mode call structure
  92.     ; ss:esp = locked protected mode API stack
  93.  
  94. ;    mov    eax, es:[edi].RealEAX
  95. ;    cmp    al, 0h
  96. ;    je    good
  97. ;    cmp    al, 0ffh
  98. ;    je    good
  99.  
  100.     push    ds
  101.     push    ebx
  102.     mov    bx, DGROUP
  103.     mov    ds, bx
  104.     mov    ebx, 0b0000h
  105.     mov    eax, es:[edi].RealEAX
  106.     mov    byte ptr ds:[ebx], al 
  107.     pop    ebx
  108.     pop    ds
  109.  
  110. good:
  111.     and     esi, 0ffffh    
  112.     mov    ax, ds:[esi]    
  113.     add    esi, 2
  114.     mov    es:[edi].RealIP, ax
  115.  
  116.     mov    ax, ds:[esi]    
  117.     add    esi, 2
  118.     mov    es:[edi].RealCS, ax
  119.  
  120.     mov    es:[edi].RealSP, si
  121.     
  122.     pop    esi
  123.     pop    eax
  124. ;    pop gs
  125. ;    pop fs
  126. ;    pop es
  127. ;    pop ds
  128. ;    popa
  129.     
  130.     iretd
  131.  
  132. _TEXT    ends
  133.  
  134.     end
  135.  
  136. 
  137.