جلوگیری از Not Responding

[teardrop]

به نام خدا

سلام
چطوری میشه از Not Responding جلوگیری کنم.

مثل این سورس کد، که وظیفه داره بوق کامپیوتر رو به صدا در بیاره تا زمانی که کلیدی فشرده نشه.




PAGE 110,100
TITLE 'KEY_DET4.ASM' detect a special key
;-----------------------------------------------
;
; Defining Segment of Program
; ----------------------------
CODESG SEGMENT PARA 'CODE'
ASSUME SS:CODESG,DS:CODESG,CS:CODESG
ORG 100H
START: JMP MAIN ;1-Jump DATA
;-----------------------------------------------
MESSAGE DB 'to stop bell press Q or ESC','$'
;-----------------------------------------------
;
MAIN PROC NEAR
MOV AH,09H ;2-Service 9 interupt
LEA DX,MESSAGE ;3- 21H to write MESSAGE
INT 21H ;4- on monitor
NO_KEY: MOV AH,02H ;5-Service 2 interupt
MOV DL,07H ;6- 21H for writting a
INT 21H ;7- character on monitor
MOV AH,01 ;8-Service 1 interupt 16H
INT 16H ;9- for detecting a key
JZ NO_KEY ;10- if no key go NO_KEY
MOV AH,00 ;11-Else determine which
INT 16H ;12- key is preesed
CMP AL,'Q' ;13-If pressed key is
JE EXIT ;14- is Q go to EXIT
CMP AL,27 ;15-If pressed key is Esc
JE EXIT ;16- go to EXIT
JMP NO_KEY ;17-Else back to NO_KEY
EXIT:
MOV AX,4C00H ;18- End of
INT 21H ;19- processing
MAIN ENDP ; End of procedure
CODESG ENDS ; End of segment
END START ; End of program

این کار رو در زبانهای سطح بالا می تونیم با تایمر یا چند نخی استفاده کنیم.
با تشکر

[xman_1365_x]

چون برنامتون کوتاه هست و پردازنده میلیون ها دستور رو توی یک ثانیه اجرا میکنه برای همین شما نمی تونید چیزی وارد در بافر کنید برای همین برنامه هنگ میکنه
راه حلش اینه تاخیری بین دو کد کد قرار بگیره یا با نوشتن کد های دیگه مثل حلقه های هرز برای گذر زمان یا استفاده از وقفه ، برای ایجاد وقفه با زمان که من یک نمونه با تاخیر یک ثانیه براتون نوشتم که برنامه Not Responding نشه


PAGE 110,100
TITLE 'KEY_DET4.ASM' detect a special key
;-----------------------------------------------
;
; Defining Segment of Program
; ----------------------------
CODESG SEGMENT PARA 'CODE'
ASSUME SS:CODESG,DS:CODESG,CS:CODESG
ORG 100H
START: JMP MAIN ;1-Jump DATA
;-----------------------------------------------
MESSAGE DB 'to stop bell press Q or ESC','$'
;-----------------------------------------------
;
MAIN PROC NEAR
MOV AH,09H ;2-Service 9 interupt
LEA DX,MESSAGE ;3- 21H to write MESSAGE
INT 21H ;4- on monitor
NO_KEY:
MOV AH,02H ;5-Service 2 interupt
MOV DL,07H ;6- 21H for writting a
INT 21H ;7- character on monitor

;wait 1 second
mov ah,2ch
int 21h
mov bl,dh
inc bl
again:
mov ah,2ch
int 21h
cmp bl,dh
jne again


MOV AH,01 ;8-Service 1 interupt 16H
INT 16H ;9- for detecting a key
JZ NO_KEY ;10- if no key go NO_KEY

MOV AH,00 ;11-Else determine which
INT 16H ;12- key is preesed
CMP AL,'Q' ;13-If pressed key is
JE EXIT ;14- is Q go to EXIT
CMP AL,27 ;15-If pressed key is Esc
JE EXIT ;16- go to EXIT
JMP NO_KEY ;17-Else back to NO_KEY
EXIT:
MOV AX,4C00H ;18- End of
INT 21H ;19- processing
MAIN ENDP ; End of procedure
CODESG ENDS ; End of segment
END START ; End of program