home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Programmer's Library 1.3 / Microsoft-Programers-Library-v1.3.iso / sampcode / win_lrn / library / libinit.asm
Encoding:
Assembly Source File  |  1988-08-11  |  720 b   |  39 lines

  1. ?PLM = 1;
  2. ?WIN = 1;
  3. memS = 1
  4.  
  5. include cmacros.inc
  6.  
  7. externFP    <LocalInit>
  8. externFP    <UnlockSegment>
  9.  
  10. ; PUBLIC definition of LIBINST, the library instance
  11. sBegin  DATA
  12.         assumes DS,DATA
  13.         PUBLIC  _LIBINST
  14. _LIBINST dw     ?
  15. sEnd    DATA
  16.  
  17. sBegin CODE
  18. assumes CS,CODE
  19.  
  20. cProc myastart,<PUBLIC,FAR>
  21. cBegin
  22.         ;;
  23.         ;; DS = automatic data segment.
  24.         ;; CX = size of heap.
  25.         ;; DI = module handle.
  26.         ;; ES:SI = address of command line (not used).
  27.         ;;
  28.  
  29.         mov    _LIBINST,di
  30.         xor    ax,ax
  31.         cCall  LocalInit,<ds,ax,cx>
  32.         mov    ax,0ffffh
  33.         cCall  UnlockSegment,<ax>
  34. cEND    myastart
  35.  
  36. sEnd   CODE
  37.  
  38. end myastart
  39.