PASCAL EKRAN KOMUTLARI
Ekrana görüntü aktarmak, klavye tuşlarını kontrol etmek ve pc hoparlöründen ses çıkarmak için kullanılırlar. Bu komutlar dos için CRT, windows için WINCRT unitinde toplanmıştır. Kullanmak istediğiniz uniti programın en başında USES kısmında belirtmelisiniz. Aksi halde programın derlenmesi sırasında “Unknown identifier” hatası alırsınız.
A) CLRSCR (Procedure):
CLRSCR;
Ekranı temizlemek için kullanılır ve kursör 1. satır, 1. sütuna konumlanır.
B) CLREOL (Procedure):
CLREOL;
Kursörün bulunduğu yerden satır sonuna kadar olan kısmı siler.
C) DELLINE (Procedure):
DELLINE;
Kursörün bulunduğu satırı siler ve alt satırları birer satır yukarı kaydırır.
Ç) INSLINE (Procedure):
INSLINE;
Kursörün bulunduğu satıra yeni bir satır ekler ve alttaki satırları birer satır aşağı kaydırır.
D) HIGHVIDEO (Procedure):
HIGHVIDEO;
Ekrana yazılacak yazının parlak olarak görünmesini sağlar.
E) LOWVIDEO (Procedure):
LOWVIDEO;
Ekrana yazılacak yazının mat olarak görünmesini sağlar.
F) NORMVIDEO (Procedure):
NORMVIDEO;
Ekranı normal durumuna getirir. HIGHVIDEO veya LOWVIDEO kullanıldıktan sonra kullanılmalıdır.
Uses crt;
Begin;
Clrscr;
Highvideo;
Writeln(‘parlak yazi’);
Lowvideo;
Writeln(‘mat yazi’);
Normvideo;
Writeln(‘normal yazi’);
Readln;
End.
G) DELAY (Procedure):
DELAY(süre);
Programın çalışmasını belirtilen süre kadar durdurur. Süre milisaniye cinsindendir.
H) WHEREX (Procedure):
WHEREX;
Kursörün bulunduğu sütun numarasını verir. Sonuç byte cinsindendir.
I) WHEREY (Procedure):
WHEREY;
Kursörün bulunduğu satır numarasını verir. Sonuç byte cinsindendir.
İ) SOUND (Procedure):
SOUND(Frekans);
Verilen frekansta ses üretmek için kullanılır. Sesin süresi DELAY ile belirlenir.
J) NOSOUND (Procedure):
NOSOUND;
SOUND komutuyla üretilen sesin kesilmesini sağlar. Bu komut kullanılıncaya kadar hoparlörden ses çıkışı devam eder.
USES CRT;
Begin
Sound(1250);
Delay(5000);
Nosound;
END.
// 1250 frekansındaki ses 5 saniye süre ile üretilir.