home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1996 May
/
PCW596.iso
/
polskie
/
eduk
/
genfast
/
demo_09.pak
/
HALT.DA_
< prev
next >
Wrap
Text File
|
1996-02-08
|
451b
|
20 lines
; Program ten pokazuje w jaki sposób natychmiastowo
; zakoñczyì dziaÆanie aplikacji (w dowolnym momencie
; jej wykonywania)
[1]
@ShowScreen;
@Sound(200,2000);
; przywrócenie trybu tekstowego 3 (80x25 znaków)
@A:=3;
@Interrupt($10);
; zakoñczenie programu (procesu) z kodem powrotu 0 (dwie ostatnie cyfry)
; i powrót do DOS'u
@A:=$4C00;
@Interrupt($21);
; poniºszy kod juº nie zostanie wykonany...
@Sound(400,2000);
@CheckEvents;