Jumat, 02 Desember 2011

# ClrScr [prosedur].
Perintah ini digunakan untuk membersihkan layar.
sintaks:

 ClrScr; [Clear screen] 
# GotoXY[prosedur].
Untuk menempatkan posisi kursor pada layar.
Sintaks:

 GotoXY(X, Y: Byte); 
Keterangan : X = sumbu X (posisi horisontal)
Y = sumbu Y (posisi vertikal)
# DelLine [prosedur].
Untuk menghapus sebuah baris pada posisi kursor dan menaikkan
baris-baris dibawahnya.
Sintaks:

 DelLine;  
# InsLine [prosedur].
Untuk menyisipkan sebuah baris pada posisi kursor dan meng-
geser kebawah tampilan-tampilan baris dibawahnya.
Sintaks:

 InsLine;  

Delay [prosedur].
Untuk menghentikan sejenak proses program.
Sintaks:

 Delay (MS: Word); 
Keterangan : variable MS = ukuran waktu dalam milisecond.
Contoh :

uses crt;
var
   x :char;
begin
     clrscr;
     gotoxy(35,10); writeln('I Love U Allah');
     Write('tunggu sebentar ...!!!');
     delay(5000);
     insline;
     gotoxy(35,11); writeln('I Love U Muhammad');
     gotoxy(01,13); writeln('tekan enter');
     delay(1000);
     gotoxy(15,12);
     delline;
     read(x);
end.

ne hasilnya ....!!!














0 komentar:

Posting Komentar

Ilmu Yang Tidak Di Amalkan Sama Dengan Kosong