Metropoli BBS
VIEWER: delay.asm MODE: TEXT (ASCII)
include qlib.inc
include stdio.inc
include dos.inc
include conio.inc

.code
main proc
  mov ebx,0  ;counter

  call clrscr

@@:
  callp sleep,1
  callp gotoxy,1,1
  callp printf,"Timer = %i \n",ebx
  inc ebx
  call kbhit
  cmp al,0
  jz @b
  call getch
@@:
  callp delay,1000
  callp gotoxy,1,1
  callp printf,"Timer = %i \n",ebx
  inc ebx
  call kbhit
  cmp al,0
  jz @b
  call getch

  ret
main endp

end

[ RETURN TO DIRECTORY ]