home *** CD-ROM | disk | FTP | other *** search
/ The Equalizer BBS / equalizer-bbs-collection_2004.zip / equalizer-bbs-collection / DEMOSCENE-STUFF / IMPHOB10.ZIP / IMP10_EX.ZIP / W_GEMMIS.ZIP / LOAD_M32.INC < prev    next >
Text File  |  1994-09-01  |  499b  |  38 lines
  1. mem32_int=252
  2.  
  3. mem32_find_segment_type macro
  4. mem32_here=$
  5. push ax
  6. mem32_size=$-mem32_here
  7. org mem32_here
  8. endm
  9.  
  10. switch_prot macro seg,off
  11. mem32_find_segment_type
  12.     mov eax,cr0
  13.     or al,1
  14.     mov cr0,eax
  15.     db 0eah
  16. if mem32_size eq 1
  17.     dw offset off
  18. else
  19.     dd offset off
  20. endif
  21.     dw seg&_selector
  22. endm
  23.  
  24. switch_real macro seg,off
  25. mem32_find_segment_type
  26.     mov eax,cr0
  27.     and al,0feh
  28.     mov cr0,eax
  29.     db 0eah
  30. if mem32_size eq 1
  31.     dw offset off
  32. else
  33.     dd offset off
  34. endif
  35.     dw seg
  36. endm
  37.  
  38.