FGETCS.ASM 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. ;
  2. ; Command & Conquer Red Alert(tm)
  3. ; Copyright 2025 Electronic Arts Inc.
  4. ;
  5. ; This program is free software: you can redistribute it and/or modify
  6. ; it under the terms of the GNU General Public License as published by
  7. ; the Free Software Foundation, either version 3 of the License, or
  8. ; (at your option) any later version.
  9. ;
  10. ; This program is distributed in the hope that it will be useful,
  11. ; but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13. ; GNU General Public License for more details.
  14. ;
  15. ; You should have received a copy of the GNU General Public License
  16. ; along with this program. If not, see <http://www.gnu.org/licenses/>.
  17. ;
  18. ;***************************************************************************
  19. ;** C O N F I D E N T I A L --- W E S T W O O D S T U D I O S **
  20. ;***************************************************************************
  21. ;* *
  22. ;* Project Name : Get the code selector *
  23. ;* *
  24. ;* File Name : FGETCS.ASM *
  25. ;* *
  26. ;* Programmer : Jeff Wilson *
  27. ;* *
  28. ;* Start Date : March 28, 1994 *
  29. ;* *
  30. ;* Last Update : March 28, 1994 [] *
  31. ;* *
  32. ;*-------------------------------------------------------------------------*
  33. ;* Functions: *
  34. ;* GetCs -- Return the current Data selector. *
  35. ;* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
  36. IDEAL
  37. P386
  38. MODEL USE32 FLAT
  39. GLOBAL GetCs :NEAR
  40. ;============================================================================
  41. CODESEG
  42. ;***************************************************************************
  43. ;* GETCS -- Return the current Data selector. *
  44. ;* *
  45. ;* *
  46. ;* *
  47. ;* INPUT: NONE *
  48. ;* *
  49. ;* OUTPUT: UWORD selector of the default code segment *
  50. ;* *
  51. ;* WARNINGS: *
  52. ;* *
  53. ;* HISTORY: *
  54. ;* 03/28/1994 jaw: Created. *
  55. ;*=========================================================================*
  56. PROC GetCs C near
  57. xor eax,eax
  58. mov ax,cs
  59. ret
  60. ;====================
  61. ENDP GetCs
  62. END
  63.