Резидент на эмуляторе Windows XP: на других ПК не работает обратный отсчет

;;          ‡ў®*®Є Ї® **¦*вЁо ESC
CODEPR  SEGMENT PARA
                        ASSUME CS:CODEPR  
                         PSP:        ORG  100H                     ; ЋЎ«*бвм PSP
 BEGIN:    JMP   INIT              ; ЏҐаҐе®¤ Є з*бвЁ Ё*ЁжЁ*«Ё§*жЁЁ
 SAVEINT9 DD  ?                       ; ‘®еа**Ґ*ЁҐ бв*а®Ј® ®Ўа*Ў®взЁЄ*
 SAVEINT4A DD ?
 SAVEINT2D  DD  ?                 ; ‘®еа**Ґ*ЁҐ бв*а®Ј® ®Ўа*Ў®взЁЄ*
FLAG DB    0
kolonka db ?
stroka db ?
secsToAdd db 5d
time db 4d
temp db ?
temp2 db ?
tmp DB '0'
hex   db         '0123456789ABCDEF';    
 NEWINT9:
          CLI
          PUSH   AX             ; ‘®еа**Ґ*ЁҐ ЁбЇ®«м§гҐ¬ле ॣЁбва®ў
 ; ‚맮ў бв*а®Ј® ®Ўа*Ў®взЁЄ*
         PUSH  ES
         PUSH  DS
         PUSH CS
         POP   DS
           ;
         PUSH AX
         PUSH BX
         PUSH CX
          PUSHF
        CALL  CS:SAVEINT9      ; ‚맮ў бв*а®Ј® ®Ўа*Ў®взЁЄ*       б ў®§ўа*⮬
          MOV AH, 1
          INT   16H
          JZ  PROD
;         Џа®ўҐаЄ* а*биЁаҐ**®Ј® Є®¤*
          CMP AL , 0
          JE   EXT
           CMP AH, 1DH
; „«п зЁбв®Ј® CTRL
           JNE PROD
           MOV AH,00H
          INT 16H
PROD:
          POP CX
          POP BX
          POP AX
          JMP    END9
;        Џа®ўҐаЄ* **¦*вЁп F5
EXT:    CMP AH ,  3FH  ; Љ®¤ F5
           JE PRINT1     
           ; ЏҐз*вм бва®ЄЁ     Ї® F5
; Џа®ўҐаЄ* ўлЈаг§ЄЁ
           CMP AH , 62H       ; Ќ*¦*в* Ctrl + F5
           JNE  PROD
UNLD:
 
; ‚лЈаг§Є*
           PUSH ES
           MOV  DX,OFFSET REZMSG1     ; ‚лў®¤ б®®ЎйҐ*ЁҐ ® §*ўҐаиҐ*ЁЁ
         CALL  PRINT                ; १Ё¤Ґ*в*
         POP ES
;
          PUSH DX
          PUSH ES
 ;
; 9Ќ
        mov AX,2509H    ; ‚®ббв**®ў«Ґ*ЁҐ ®Ўа*Ў®взЁЄ* ЇаҐалў**Ёп 09H
        lds DX,CS:SAVEINT9
        int 21H
; 2DH
        mov AX,252DH    ; ‚®ббв**®ў«Ґ*ЁҐ ®Ўа*Ў®взЁЄ* ЇаҐалў**Ёп 2DH
        lds DX,CS:SAVEINT2D
        int 21H
 ; Ї®«гзЁ¬ Ё§ PSP *¤pҐб б®Ўб⢥**®Ј® ®Єp㦥*Ёп Ё ўлЈpг§Ё¬ ҐЈ®
        MOV     ES,CS:2CH
        MOV     AH,49H
        INT     21H
; ўлЈpг§Ё¬ ⥯Ґpм б*¬г Їp®Јp*¬¬г
        PUSH    CS
        POP              ES
        MOV     AH,49H
        INT     21H
; Љ®¤ ў AL ¤«п гбЇҐи*®© ўлЈаг§ЄЁ
          MOV AH,00H
         INT 16H
;
          POP  ES
        POP DX
          POP CX
          POP BX
          POP AX
;
          POP DS
          POP ES
          POP AX
          STI
          IRET
 
 ;    ‚лў®¤ 楯®зЄЁ F5
           PRINT1:
           
        ;®зЁбвЄ*
        MOV AH,0
        MOV AL,2
        INT 10H   
           
    PUSH ES
    MOV AH,07H
    INT 1AH
    
    MOV AH,02H
    INT 1AH
    
    ADD DH,1
    
    MOV AH,06H
    INT 1AH
    
    mov bl,secsToAdd
    mov temp2,bl
               ;;;;;;;;;;;;;;;;;;;;;;
         POP ES
; ЋзЁбвЄ* ЎгдҐа* Є«*ўЁ*вгал
          PUSH ES
        MOV AX , 40H
        MOV ES , AX
         MOV BX , ES:1AH
          MOV  ES:1CH , BX
;
           POP ES
          JMP PROD
  ;
END9:
            POP DS
            POP ES
            POP AX
            STI
          IRET
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
 NEWINT4A PROC FAR
 PUSH AX ; ‘®еа**Ґ*ЁҐ ЁбЇ®«м§гҐ¬ле ॣЁбва®ў
PUSH CX
PUSH BX
PUSH DX
 
;®зЁбвЄ*
MOV AH,0
MOV AL,2
INT 10H
 
 
mov ah,2     ;‡*Їа®б ** гбв**®ўЄг Єгаб®а*
    mov bh,0     ;ќЄа** 0
        mov dh,2     ;*®¬Ґа бва®ЄЁ
        mov dl,69    ;*®¬Ґа бв®«Ўж*
        int 10h      ;ЏҐаҐ¤*з* гЇа*ў«Ґ*Ёп ў BIOS
        
 
cmp secstoadd,0
je lf
 
            
            
    MOV AH,07H
    INT 1AH
            
    MOV AH,02H
    INT 1AH
    
    ADD DH,1
    
    MOV AH,06H
    INT 1AH
    
    mov dl,secstoadd
    call trans1
    
    dec secstoadd
    jmp lnf
 
lf: 
    MOV AH,07H
    INT 1AH 
    
    mov ah,2     ;‡*Їа®б ** гбв**®ўЄг Єгаб®а*
    mov bh,0     ;ќЄа** 0
        mov dh,0     ;*®¬Ґа бва®ЄЁ
        mov dl,0   ;*®¬Ґа бв®«Ўж*
        int 10h      ;ЏҐаҐ¤*з* гЇа*ў«Ґ*Ёп ў BIOS
    
    mov bl,temp2
    mov secsToAdd,bl
    
    
    mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    
            
    mov al,'‡'
    int 10h
    call cursor_sdvig
    mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    mov al,'‚'
    int 10h
    call cursor_sdvig
        mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    mov al,'Ћ'
    int 10h
    call cursor_sdvig
        mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    mov al,'Ќ'
    int 10h
 
    call cursor_sdvig
        mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    mov al,'Ћ'
int 10h
    call cursor_sdvig
        mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    mov al,'Љ'
    int 10h
call cursor_sdvig
    mov AH,09h
    mov cx,1
    mov bh,0h
    mov bl,7h
    mov al,'!'
    int 10h
    call cursor_sdvig
lnf:                        
;MOV  DX,OFFSET REZMSG2     ; ‚лў®¤ б®®ЎйҐ*Ёп, Ї®зҐ¬г *Ґ Ё¤Ґв?
;        CALL  PRINT 
; ‚®ббв**®ў«Ґ*ЁҐ ॣЁбва®ў Ё ўл§®ў бв*а®Ј® ®Ўа*Ў®взЁЄ* ЎҐ§ ў®§ўа*в*
POP CX
POP BX
POP AX
POP DX
JMP CS:SAVEINT4A ; ‚맮ў бв*а®Ј® ®Ўа*Ў®взЁЄ*
IRET
NEWINT4A ENDP
 
PUTCH PROC 
MOV AH, 09H
mov cx,1
mov bh,0h
mov bl,7h
INT 10H
RET
PUTCH ENDP
 
 PRINT   PROC
            PUSH DI
            PUSH  AX
            PUSH CX
            PUSH  DX
            PUSH  BX
         MOV     DI,DX
;   Џ®§ЁжЁп Єгаб®а* ў **з*«Ґ
         MOV     AH,03H
         MOV     BH,00H
         INT     10H
;
          MOV  CX , 70
 
; жЁЄ« ўлў®¤* Ё Їа®ўҐаЄЁ бЁ¬ў®«®ў бва®ЄЁ
LOOP1:   MOV     AL,DS:[DI]
         CMP     AL,'$'      ; Љ®*Ґж бва®ЄЁ ¤«п ўлў®¤*
         JE      FIN
;        ЏҐз*вм бЁ¬ў®«* ** нЄа**
           INC  DI
         MOV     BH,0
         MOV     AH,0AH
         PUSH CX
         MOV     CX,0001H
         INT     10H
         POP CX
; Ќ®ў*п Ї®§ЁжЁп Єгаб®а*
NEXT4:   MOV     AH,02H
           INC   DL
         MOV     BH,00H
         INT     10H
         JMP     LOOP1
;  Љ®*Ґж жЁЄ«* ўлў®¤*
FIN:
            POP BX
            POP DX
            POP CX
            POP AX
            POP  DI     ; ‚®ббв**®ў«Ґ*ЁҐ б⥪*
         RET
PRINT   ENDP
 
 cursor_position proc
push ax 
push bx 
push dx
mov ah,03h 
mov bh,00h 
int 10h
 
mov stroka,dh 
mov kolonka,dl
 
pop dx 
pop bx 
pop ax 
ret
 
cursor_position endp
;;;
cursor_sdvig proc
push ax
call cursor_position 
inc kolonka 
call print_position
 
pop ax 
ret
 
cursor_sdvig endp
;;
print_position proc
push ax 
push dx
mov ah,02h 
mov dh,stroka 
mov dl,kolonka 
int 10h
 
pop dx 
pop ax 
ret 
print_position endp
;;;
 
NEWINT2D  PROC FAR
                     CLI
                     PUSH DS
;
                   PUSH CS
                     POP   DS
                CMP AH, 0EEh   ; б®Ўб⢥**л© Є®¤
                JE  MY_OBR
                JMP OLD_OBR
; Ќ®ўл© ®Ўа*Ў®взЁЄ
MY_OBR:    CMP AL , 1  ; Џа®ўҐаЄ* **«ЁзЁп
                   JE  EXIT_2F
                       CMP  AL, 2   ; ‚лЈаг§Є*
                       JE UNLOAD
                  ;;;;;;;;;
 EXIT_2F:  MOV AL, 0FFH ; …бвм ў Ї*¬пвЁ
                      STI
                      POP DS
                      IRET
 ;
 UNLOAD:
 ; ‚®ббв**®ў«Ґ*ЁҐ ®Ўа*Ў®взЁЄ®ў
           PUSH CS
           POP   DS
           MOV  DX,OFFSET REZMSG1     ; ‚лў®¤ б®®ЎйҐ*ЁҐ ® §*ўҐаиҐ*ЁЁ
;        CALL  PRINT                ; १Ё¤Ґ*в*
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
         PUSH DX
         PUSH ES
 
; 9Ќ
        mov AX,2509H    ; ‚®ббв**®ў«Ґ*ЁҐ ®Ўа*Ў®взЁЄ* ЇаҐалў**Ёп 09H
        lds DX,CS:SAVEINT9
        int 21H
; 2DH
        mov AX,252DH    ; ‚®ббв**®ў«Ґ*ЁҐ ®Ўа*Ў®взЁЄ* ЇаҐалў**Ёп 2DH
        lds DX,CS:SAVEINT2D
        int 21H
        
; 4AH
        mov AX,254AH    ; ‚®ббв**®ў«Ґ*ЁҐ ®Ўа*Ў®взЁЄ* ЇаҐалў**Ёп 4ЂH
        lds DX,CS:SAVEINT4A
        int 21H
 ; Ї®«гзЁ¬ Ё§ PSP *¤pҐб б®Ўб⢥**®Ј® ®Єp㦥*Ёп Ё ўлЈpг§Ё¬ ҐЈ®
        MOV     ES,CS:2CH
        MOV     AH,49H
        INT     21H
; ўлЈpг§Ё¬ ⥯Ґpм б*¬г Їp®Јp*¬¬г
        PUSH    CS
        POP              ES
        MOV     AH,49H
        INT     21H
; Љ®¤ ў AL ¤«п гбЇҐи*®© ўлЈаг§ЄЁ
        MOV AL, 0FFH
        POP DX
        STI
        POP ES
        POP DS
          IRET
 
OLD_OBR:  MOV AL, 0   ; **и १Ё¤Ґ*в *Ґ гбв**®ў«Ґ*
            STI
            POP DS
        JMP     CS:SAVEINT2D      ; ‚맮ў бв*а®Ј® ®Ўа*Ў®взЁЄ*   2FH
NEWINT2D  ENDP
 
REZMSG1 db 'TSR ўлЈа㦥** (Ctrl+F5 - TSR part)!','$'
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; —*бвм Ё*ЁжЁ*«Ё§*жЁЁ
 
INIT:    CLI                ; ‡*ЇаҐв ЇаҐалў**Ё©
; “бв**®ўЄ* DS
         PUSH CS
         POP DS
 ; Їа®ўҐаЄ* Ї*а*¬Ґва®ў
         MOV AL ,   CS:80H
         CMP AL, 0
         JNE INIT_UND               ; …бвм Ї*а*¬Ґвал
; Џа®ўҐаЄ* ў Ї*¬пвЁ
INIT1:         PUSH CS
                     POP DS
                MOV AH, 0EEh
                MOV AL, 1   ; Џа®ўҐаЄ* **«ЁзЁп
                INT 2Dh
                CMP  AL, 0FFh
                JNE INIT2   ; ЇҐаҐе®¤ Ґб«Ё १Ё¤Ґ*в *Ґ(!) ў Ї*¬пвЁ (** §*Јаг§Єг)
;  ‘®®ЎйҐ*ЁҐ  ® ⮬, з⮠㦥 §*Ја㦥*
         MOV AH , 09H
         MOV DX, OFFSET MSG_INMEM
         INT    21H
         ; ‚л室 Ё§ Їа®Ја*¬¬л   ЎҐ§ гбв**®ўЄЁ १Ё¤Ґ*в*
EXITTSR:
        MOV AL, 0
        MOV AH, 4CH
        STI
        INT 21H
 ; ‚л§аг§Є*    Ё«Ё бЇа*ўЄ*
 INIT_UND:
 ; …бвм Ї*а*¬Ґвал
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;      а*§Ў®аЄ* Ї*а*¬Ґва®ў
       MOV SI ,  OFFSET ( PSP + 81H)
       LODSB            ; ЇҐаўл© Їа®ЎҐ«
       LODSB
       CMP    AL , '/'
       JNE     ERR_PAR
       LODSB              ; бЁ¬ў®« Ї*а*¬Ґва*
       CMP   AL , '?'
       JE    INIT_HELP
       CMP   AL , 'U'
       JE    INIT_UND1
       CMP   AL , 'u'
       JE    INIT_UND1
       JMP  ERR_PAR
 ; ‚лЈаг§Є*       १Ё¤Ґ*в*
 INIT_UND1:
        MOV AH , 0EEH
        MOV AL,2
        INT 2Dh
        CMP AL , 0FFH
        JE  INIT3
 ;      ‘®®ЎйҐ*ЁҐ ® ⮬ зв® *Ґв ўлЈаг§ЄЁ
        MOV AH , 09H
         MOV DX, OFFSET MSG_NOUNLD
         INT    21H
         JMP    EXITTSR
  ; ‘®®ЎйҐ*ЁҐ ® ўлЈаг§ЄҐ
 INIT3:
        MOV AH , 09H
         MOV DX, OFFSET MSG_UNLD
         INT    21H
         JMP    EXITTSR
; ‘Їа*ўЄ*
INIT_HELP:
         MOV AH , 09H
         MOV DX, OFFSET MSG_Help
         INT    21H
         JMP    EXITTSR
ERR_PAR:
         MOV AH , 09H
         MOV DX, OFFSET MSG_Param
         INT    21H
         JMP    EXITTSR
; Џ®«гзҐ*ЁҐ *¤аҐб* бв*а®Ј® ®Ўа*Ў®взЁЄ*        9
 
; €*ЁжЁ*«Ё§*жЁп
INIT2:           
        ;;;;;
                        CLI
                         MOV    AH, 35H   ;
                         MOV    AL, 09H   ;
                         INT 21H
                         MOV    WORD  PTR  SAVEINT9 , BX   ;
                         MOV     WORD  PTR  SAVEINT9+2 , ES   
                         MOV    AH,25H   ;
                         MOV    AL, 09H   ;    
                         MOV    DX, OFFSET   NEWINT9
                         INT       21H
                         
                         
                         ; Џ®«гзҐ*ЁҐ *¤аҐб* бв*а®Ј® ®Ўа*Ў®взЁЄ*
MOV AH, 35H
MOV AL, 4AH ; Ќ®¬Ґа ЇаҐалў**Ёп
INT 21H
; ‘®еа**Ґ*ЁҐ *¤аҐб* бв*а®Ј® ®Ўа*Ў®взЁЄ*
MOV WORD PTR SAVEINT4A, BX
MOV WORD PTR SAVEINT4A + 2 , ES
; “бв**®ўЄ* *®ў®Ј® ®Ўа*Ў®взЁЄ* ў ўҐЄв®а ЇаҐалў**Ёп
MOV AH, 25H
MOV AL, 4AH ; Ќ®¬Ґа ЇаҐалў**Ёп
MOV DX, OFFSET NEWINT4A
INT 21H
            
; Џ®«гзҐ*ЁҐ *¤аҐб* бв*а®Ј® ®Ўа*Ў®взЁЄ*        2D
         MOV    AH, 35H
         MOV    AL, 2DH    ; Ќ®¬Ґа ЇаҐалў**Ёп
         INT 21H
;  ‘®еа**Ґ*ЁҐ *¤аҐб* бв*а®Ј® ®Ўа*Ў®взЁЄ*
         MOV     WORD  PTR  SAVEINT2D , BX
         MOV     WORD  PTR  SAVEINT2D +2 , ES
;  “бв**®ўЄ* *®ў®Ј® ®Ўа*Ў®взЁЄ* ў ўҐЄв®а ЇаҐалў**Ёп            2D
         MOV     AH,25H
         MOV     AL, 2DH   ; Ќ®¬Ґа ЇаҐалў**Ёп
         MOV     DX, OFFSET   NEWINT2D
         INT     21H
         
        ;®зЁбвЄ*
        MOV AH,0
        MOV AL,2
        INT 10H
        
         call inputsecs 
        call cursor_sdvig
; ‚лў®¤ б®®ЎйҐ*Ёп ® §*Јаг§ЄҐ १Ё¤Ґ*в*
         MOV AH , 09H
         MOV DX, OFFSET MSG
         INT    21H
            
 
                
                         ;;;;;;;
                         
                         MOV     AX, 3100H
                         MOV     DX, (init - begin +10FH)/16    
                         STI
                         INT       21H
                         
     inputSecondsMsg DB 'Џ®¦*«г©бв*, ўўҐ¤ЁвҐ зЁб«® ᥪг*¤, §*¤*о饥 ®Ўа*в*л© ®вбзҐв в*©¬Ґа*', 10, 13, '$'
 
InputSecs PROC
 
push AX
push DX
 
mov AH, 09h
mov DX, offset inputSecondsMsg
int 21h
 
pop DX
pop AX
 
mov AH, 02h
mov DL, '>'
int 21h
mov DI, 0
 
lInpt:
mov AH, 08h
int 21h
cmp AL, 13
je lDone
cmp Al, '9'
ja lInpt
cmp Al, '0'
jb lInpt
mov AH, 02h
mov DL, AL
int 21h
sub AL, '0'
xor AH, AH
mov CX, AX
mov AX, DI
mov BX, 10
mul BX
add AX, CX
mov DI, AX
jmp lInpt
mov AX, DI
lDone:
mov AX, DI
mov secsToAdd,AL
 
ret
InputSecs ENDP
 
;ЇҐаҐў®¤ ў ¤ҐбпвЁз*
TRANS1 proc
mov al,dl
mov tmp,al
;push bx
lea bx,hex
shr al,4
shl al,4
sub tmp,al
shr al,4
 
xlat hex
;mov dl,al
;pop bx
call PUTCH
lea bx,hex
int 10h
mov al,tmp
xlat hex
;mov dl,al
call PUTCH
int 10h
ret
TRANS1 endp
        
;  „***лҐ з*бвЁ Ё*ЁжЁ*«Ё§*жЁЁ
MSG      DB '‘в*ав TSR Їа®Ја*¬¬л!', 10,13,'$'
MSG_INMEM DB  'TSR 㦥 ў Ї*¬пвЁ!', 10,13,'$'
MSG_UNLD  DB  'TSR was unloaded (Init part)!', 10,13,'$'
MSG_NOUNLD     DB  'TSR *Ґ ў Ї*¬пвЁ!', 10,13,'$'
MSG_Help     DB  'Ђўа*¬гЄ „.Њ.,1 ў*аЁ**в, €“5-51, 2012', 10,13,'Parameters: /? - help , /U or /u - unload TSR ', 10,13,'€*¤®*¬*¦рЇп!',10,13,'$'         ; Џ®б«Ґ¤*Ё© ⥪бв "€*д®а¬*жЁп" - ўўҐ¤Ґ* ў Є®¤Ґ ASCII!!!
MSG_Param     DB  'Error - command line parameters!', 10,13,'$'
        
CODEPR  ENDS
            END     BEGIN