Category

Development Platform
Home > SourceCode/Document > Internet-Socket-Network > TCP/IP Stack > View Code
INTEL.ASM
Package: wattcp.rar　[view]
Upload User: better800
Upload Date: 2022-06-13
Package Size: 1853k
Code Size: 1k
Category:

TCP/IP Stack

Development Platform:

DOS

INTEL.ASM：Code Content
  1. PAGE    66,132
  2. ;
  3. ;
  4. ;
  5. ;
  6. ;
  7. ;
  8. ;
  9. ;
  10. ;  intel - convert intel <--> bigendian
  11. ;
  12. ;
  13. ;  (c) 1990 Erick Engelke
  14. ;
  15. ;
  16. ;
  17. include masmdefs.hsm
  18. include model.hsm
  20. codedef intel
  21. datadef
  23. cstart  intel
  25. ;*************************************************************************
  26. ;  USAGE:  ULONG intel( ULONG val )
  27. ;          - convert to intel format
  28. ;*************************************************************************
  29. cpublic intel
  30. mov AX, +@AB + 2 [BP]
  31. mov DX, +@AB + 0 [BP]
  32. xchg AL, AH
  33. xchg DL, DH
  34. creturn intel
  35. ;*************************************************************************
  36. ;  USAGE:  UINT intel16( UINT val )
  37. ;          - convert to intel format
  38. ;*************************************************************************
  39. cpublic intel16
  40. mov AX, +@AB [BP]
  41. xchg AL, AH
  42. creturn intel16
  43. cend    intel
  44.         end