home *** CD-ROM | disk | FTP | other *** search
/ Popular Software (Premium Edition) / mycd.iso / DICT / DFKC / ZWH / CHCS / UNWLIB.ASM < prev    next >
Encoding:
Assembly Source File  |  1998-01-12  |  1.7 KB  |  73 lines

  1. ;
  2. ;       unwlib.asm
  3. ;
  4. code    segment
  5.         org     100h
  6.         assume  cs:code, ds:code
  7. begin:  jmp     start
  8. ;
  9. CHCSMark db      13,10,9,'CHCS'
  10. ;
  11. noCHCS  db      7, 'unwlib: CHCS/CHIS Chinese System not installed !'
  12.         db      0dh,0ah, '$'
  13. Usage   db      ' ╙├╖¿: UNWLIB [/u]', 0dh,0ah
  14.         db      '       ╚▒╩í: │╖│²╗∙▒╛┤╩┐Γ', 0dh,0ah
  15.         db      '       /u  : │╖│²╫╘╢¿╥σ┤╩┐Γ', 0dh,0ah
  16.         db      '       (╚⌠┴╜╒▀╙╔═¼╥╗┤╬╫░╚δ, ╘≥╜½╥╗╞≡│╖│²)'
  17.         db      0dh,0ah, '$'
  18. noStd   db      7, 'unwlib: ╗∙▒╛┤╩┐Γ╬┤╣╥╜╙', 0dh,0ah, '$'
  19. noUsr   db      7, 'unwlib: ╫╘╢¿╥σ┤╩┐Γ╬┤╣╥╜╙', 0dh,0ah, '$'
  20. ;
  21. start:  mov     ax, 3f00h
  22.         int     16h
  23.         mov     di, bx
  24.         lea     si, CHCSMark
  25.         mov     cx, 5
  26.         cld
  27.         repz    cmpsb
  28.         jz      Cont0
  29.         lea     dx, noCHCS
  30. PrErr:  mov     ah, 09h
  31.         int     21h
  32.         mov     ax, 4cffh
  33.         int     21h
  34. ;
  35. Cont0:  mov     bx, 0081h
  36. CmdLoop:mov     al, [bx]
  37.         inc     bx
  38.         cmp     al, ' '
  39.         je      CmdLoop
  40.         cmp     al, 09h
  41.         je      CmdLoop
  42.         cmp     al, 0dh
  43.         je      UnStdWLib
  44.         cmp     al, '/'
  45.         je      Cont1
  46. PrUse:  lea     dx, Usage
  47.         jmp     PrErr
  48. ;
  49. UnStdWLib:
  50.         mov     ax, 3e00h
  51.         int     16h
  52.         or      ax, ax
  53.         jz      isOk
  54.         lea     dx, noStd
  55.         jmp     PrErr
  56. ;
  57. Cont1:  mov     al, [bx]
  58.         or      al, 20h
  59.         cmp     al, 'u'
  60.         jne     PrUse
  61.         mov     ax, 3e01h
  62.         int     16h
  63.         or      ax, ax
  64.         jz      isOk
  65.         lea     dx, noUsr
  66.         jmp     PrErr
  67. ;
  68. isOk:   mov     ax, 4c00h
  69.         int     21h
  70. code    ends
  71.         end     begin
  72.         
  73.