home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / assemblr / library / asm_kit / commlib.asm < prev    next >
Assembly Source File  |  1985-06-21  |  3KB  |  140 lines
  1. ; I/O MODULE FILE COMMLIB.ASM
  2. ;------------------- CODE AREA STARTS --------------------------
  3. ;
  4. codes          segment
  5. ;
  6. ;+++++++++++++++++ PUBLIC DECLARATIONS START +++++++++++++++++++
  7. ;
  8. public          cominit,cominck,comout,comon,comoff
  9. ;
  10. ;+++++++++++++++++ PUBLIC DECLARATIONS END +++++++++++++++++++++
  11. ;
  12. assume          cs:codes
  13. ;
  14. ;--------------------- routine begins --------------------------
  15. ;
  16. ;ROUTINE TO INITIALIZE A COMMUNICATIONS    LINE
  17. ;
  18. cominit          proc far
  19. ;
  20.           mov  ah,0
  21.           int  14h
  22.           ret
  23. ;
  24. cominit          endp
  25. ;
  26. ;----------------------    routine    ends ---------------------------
  27. ;
  28. ;
  29. ;--------------------- routine begins --------------------------
  30. ;
  31. ;ROUTINE TO CHECK FOR INPUT FROM A COMMUNICATIONS LINE
  32. ;
  33. cominck          proc far
  34. ;
  35.           push ds
  36.           push dx
  37.           push si
  38. ;
  39.           mov  si,dx
  40.           add  si,si
  41.           mov  dx,40h
  42.           mov  ds,dx
  43.           mov  dx,[si]
  44.           add  dx,5
  45.           in   al,dx
  46.           test al,1
  47.           jz   cominckexit
  48. ;
  49.           mov  dx,[si]
  50.           in   al,dx
  51. cominckexit:
  52. ;
  53.           pop  si
  54.           pop  dx
  55.           pop  ds
  56.           ret
  57. ;
  58. cominck          endp
  59. ;
  60. ;----------------------    routine    ends ---------------------------
  61. ;
  62. ;
  63. ;--------------------- routine begins --------------------------
  64. ;
  65. ;ROUTINE TO SEND OUTPUT    TO A COMMUNICATIONS LINE
  66. ;
  67. comout          proc far
  68. ;
  69.           mov  ah,1
  70.           int  14h
  71.           ret
  72. ;
  73. comout          endp
  74. ;
  75. ;----------------------    routine    ends ---------------------------
  76. ;
  77. ;
  78. ;--------------------- routine begins --------------------------
  79. ;
  80. ;ROUTINE TO TURN ON INPUT FROM A COMMUNICATIONS    LINE
  81. ;
  82. comon          proc far
  83. ;
  84.           push ds
  85.           push dx
  86.           push si
  87. ;
  88.           mov  si,dx
  89.           add  si,si
  90.           mov  dx,40h
  91.           mov  ds,dx
  92.           mov  dx,[si]
  93.           add  dx,4
  94.           mov  al,3
  95.           out  dx,al
  96. ;
  97.           pop  si
  98.           pop  dx
  99.           pop  ds
  100.           ret
  101. ;
  102. comon          endp
  103. ;
  104. ;----------------------    routine    ends ---------------------------
  105. ;
  106. ;
  107. ;--------------------- routine begins --------------------------
  108. ;
  109. ;ROUTINE TO TURN OFF INPUT FROM    A COMMUNICATIONS LINE
  110. ;
  111. comoff          proc far
  112. ;
  113.           push ds
  114.           push dx
  115.           push si
  116. ;
  117.           mov  si,dx
  118.           add  si,si
  119.           mov  dx,40h
  120.           mov  ds,dx
  121.           mov  dx,[si]
  122.           add  dx,4
  123.           mov  al,2
  124.           out  dx,al
  125. ;
  126.           pop  si
  127.           pop  dx
  128.           pop  ds
  129.           ret
  130. ;
  131. comoff          endp
  132. ;
  133. ;----------------------    routine    ends ---------------------------
  134. ;
  135. codes          ends
  136. ;
  137. ;--------------------- code area ends --------------------------
  138.           end
  139. ;---------------------------------------------------------------
  140.