开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 操作系统开发 > 查看源码
NLSSUPT.ASM
资源名称：840.rar　[点击查看]
上传用户：dcs7469208
上传日期：2010-01-02
资源大小：443k
文件大小：3k
源码类别：

操作系统开发

开发平台：

DOS

NLSSUPT.ASM：源码内容
  1. ; File:
  2. ;                         nls.asm
  3. ; Description:
  4. ;     Assembly support routines for nls functions.
  5. ;
  6. ;                       Copyright (c) 1995
  7. ;                       Pasquale J. Villani
  8. ;                       All Rights Reserved
  9. ;
  10. ; This file is part of DOS-C.
  11. ;
  12. ; DOS-C is free software; you can redistribute it and/or
  13. ; modify it under the terms of the GNU General Public License
  14. ; as published by the Free Software Foundation; either version
  15. ; 2, or (at your option) any later version.
  16. ;
  17. ; DOS-C is distributed in the hope that it will be useful, but
  18. ; WITHOUT ANY WARRANTY; without even the implied warranty of
  19. ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  20. ; the GNU General Public License for more details.
  21. ;
  22. ; You should have received a copy of the GNU General Public
  23. ; License along with DOS-C; see the file COPYING.  If not,
  24. ; write to the Free Software Foundation, 675 Mass Ave,
  25. ; Cambridge, MA 02139, USA.
  26. ;
  27. ; $Logfile:   C:/dos-c/src/kernel/nlssupt.asv  $
  28. ;
  29. ; $Header:   C:/dos-c/src/kernel/nlssupt.asv   1.2   16 Jan 1997 12:46:44   patv  $
  30. ;
  31. ; $Log:   C:/dos-c/src/kernel/nlssupt.asv  $
  32. ;  
  33. ;     Rev 1.2   16 Jan 1997 12:46:44   patv
  34. ;  pre-Release 0.92 feature additions
  35. ;  
  36. ;     Rev 1.1   29 May 1996 21:03:38   patv
  37. ;  bug fixes for v0.91a
  38. ;  
  39. ;     Rev 1.0   19 Feb 1996  3:24:04   patv
  40. ;  Added NLS, int2f and config.sys processing
  41. ;
  43. page    60,132
  44. title   Assembly support routines for nls functions.
  46. IFDEF ??version
  47. _TEXT           segment byte public 'CODE'
  48. DGROUP          group   _DATA,_BSS,_BSSEND              ; small model
  49. assume  cs:_TEXT,ds:DGROUP,ss:DGROUP
  50. _TEXT           ends
  52. _DATA           segment word public 'DATA'
  53. _DATA           ends
  55. _BSS            segment word public 'BSS'
  56. _BSS            ends
  58. _BSSEND         segment byte public 'STACK'
  59. _BSSEND         ends
  61. ELSE
  62. _TEXT           segment byte public 'CODE'
  63. _TEXT           ends
  65. _DATA           segment word public 'DATA'
  66. _DATA           ends
  68. CONST           segment word public 'CONST'
  69. CONST           ends
  71. _BSS            segment word public 'BSS'
  72. _BSS            ends
  74. _BSSEND         segment byte public 'STACK'
  75. _BSSEND         ends
  77. DGROUP          group   CONST,_DATA,_BSS,_BSSEND        ; small/tiny model
  78. assume  ds:DGROUP, ss:DGROUP
  79. ENDIF
  81. _TEXT           segment
  82. assume  cs: _TEXT
  83. public  _CharMapSrvc
  84. extrn   _internalUpcase:near
  85. ;
  86. ; CharMapSrvc:
  87. ;       User callable character mapping service.
  88. ;       Part of Function 38h
  89. ;
  90. _CharMapSrvc    proc    far
  91. push    ds
  92. push    es
  93. push    bp
  94. push    si
  95. push    di
  96. push    dx
  97. push    cx
  98. push    bx
  100. mov     dx, seg DGROUP
  101. mov     ds, dx
  103. push    ax
  104. call    _internalUpcase
  105. add     sp, 2 
  107. pop     bx
  108. pop     cx
  109. pop     dx
  110. pop     di
  111. pop     si
  112. pop     bp
  113. pop     es
  114. pop     ds
  115. retf                            ; Return far
  116. _CharMapSrvc    endp
  119. _TEXT           ends
  121. end