English
- Visual C++源码
- Visual Basic源码
- C++ Builder源码
- Java源码
- Delphi源码
- C/C++源码
- PHP源码
- Perl源码
- Python源码
- Asm源码
- Pascal源码
- Borland C++源码
- Others源码
- SQL源码
- VBScript源码
- JavaScript源码
- ASP/ASPX源码
- C#源码
- Flash/ActionScript源码
- matlab源码
- PowerBuilder源码
- LabView源码
- Flex源码
- MathCAD源码
- VBA源码
- IDL源码
- Lisp/Scheme源码
- VHDL源码
- Objective-C源码
- Fortran源码
- tcl/tk源码
- QT源码
SEMAPHOR.ASM
资源名称：wattcp.rar [点击查看]
上传用户：better800
上传日期：2022-06-13
资源大小：1853k
文件大小：1k
源码类别：
TCP/IP协议栈
开发平台：
DOS
- PAGE 66,132
- ;
- ;
- ;
- ;
- ;
- ;
- ;
- ;
- ; semaphor
- ;
- ; perform semaphor stuff
- ;
- ; (c) 1990 Erick Engelke
- ;
- ;
- ;
- include masmdefs.hsm
- include model.hsm
- codedef semaphor
- datadef
- ;*************************************************************************
- ; USAGE: int sem_up( UINT far * p)
- ; 1 on failure
- ; 0 on success
- ;*************************************************************************
- cstart semaphor
- cpublic sem_up
- mov AX, 1
- les DI, +@AB [BP] ; get pointer
- xchg AX, word ptr ES:[DI] ; perform swap
- creturn sem_up
- cend semaphor
- end
