# ClrScr [prosedur].
Perintah ini digunakan untuk membersihkan layar.
sintaks:
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 :
ne hasilnya ....!!!
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