home *** CD-ROM | disk | FTP | other *** search
/ Popular Software (Premium Edition) / mycd.iso / DICT / DFKC / ZWH / CHCS / UNKEY.ASM < prev    next >
Encoding:
Assembly Source File  |  1998-01-12  |  2.0 KB  |  67 lines
  1. ;
  2. ;       unkey.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, 'unkey: CHCS/CHIS Chinese System not installed !'
  12.                 db      0dh,0ah, '$'
  13. Usage           db      '│╔╚╗┬δ╧╡═│║║╫╓╩Σ╚δ╖¿─ú┐Θ╨╢│÷│╠╨≥ UNKEY Version 1.0'
  14.                 db      0dh,0ah
  15.                 db      0dh,0ah, '╙├╖¿: UNKEY F#', 0dh,0ah
  16.                 db      '      F#(F2 - F8) ╬¬╥¬╨╢│÷╩Σ╚δ╖¿╦∙╢╘╙ª╡─╣ª─▄╝ⁿ├√'
  17.                 db      0dh,0ah, '$'
  18. noKey           db      7, 'unkey: F8╝ⁿ╔╧╬┤╣╥╜╙╩Σ╚δ╖¿─ú┐Θ', 0dh,0ah, '$'
  19. ;
  20. start:          mov     ax, 3f00h
  21.                 int     16h
  22.                 mov     di, bx
  23.                 lea     si, CHCSMark
  24.                 mov     cx, 5
  25.                 cld
  26.                 repz    cmpsb
  27.                 jz      Cont0
  28.                 lea     dx, noCHCS
  29. PrErr:          mov     ah, 09h
  30.                 int     21h
  31.                 mov     ax, 4cffh
  32.                 int     21h
  33. ;
  34. Cont0:          mov     bx, 0081h
  35. CmdLoop:        mov     al, [bx]
  36.                 inc     bx
  37.                 cmp     al, ' '
  38.                 je      CmdLoop
  39.                 cmp     al, 09h
  40.                 je      CmdLoop
  41.                 cmp     al, 'f'
  42.                 je      Cont1
  43.                 cmp     al, 'F'
  44.                 je      Cont1
  45. PrUse:          lea     dx, Usage
  46.                 jmp     PrErr
  47. ;
  48. Cont1:          mov     al, [bx]
  49.                 cmp     al, '2'
  50.                 jb      PrUse
  51.                 cmp     al, '8'
  52.                 ja      PrUse
  53.                 mov     byte ptr noKey+9, al
  54.                 sub     al, '1'
  55.                 mov     ah, 34h
  56.                 int     16h
  57.                 or      ax, ax
  58.                 jz      Cont2
  59.                 lea     dx, noKey
  60.                 jmp     PrErr
  61. ;
  62. Cont2:          mov     ax, 4c00h
  63.                 int     21h
  64. code            ends
  65.                 end     begin
  66.         
  67.