Cara Menggunakan Gotoxy di Turbo Pascal

Goto xy di guanakan untuk memindahkan atau mengubah letak kordinat pada korsor,maksud dari XY adalah (KOLOM,BARIS)
 —Kolom——–>    sumbu         X

 |
 B

 A

 R

 I

 S
 |
Sumbu Y

Tujuan dari pemakaian perintah Gotoxy ini untuk mempermudah dalam melakukan perancangan terhadap layar keluaran, bukan hanya memulai dari kolom ke 1 saja, tetapi bisa di lakukan pada kolom tengah tengah layar.Dengan menggunakan Goto xy ini kita hanya cukup menuliskan perintah Write, tidak perlu mengetikan writeln.Sekarang kita akan mencoba menggunakan GOTOXY dalam program turbo pascal sebagai beriku

uses crt;

var 

nama:string[20];

kode:string[5];

jumlah:integer;

harga,bayar:real

clrscr;

gotoxy(30,9);

write('daftar penjualan toko laris');

gotoxy(30,10);

write('nama barang=',nama);

gotoxy(30,11);

write('kode barang=',kode);

gotoxy(30,12);

write('jumlah barang=',jumlah);

write('harga barang=',harga:0:5);

gotoxy(30,13);

write('jumlah pembayaran=',bayar:0:5);

readln;

end.

Setelah selesai pengetikan koding dalam turbo pascal untuk menjalankan ya pilih menu RUN atau CTRL+ F9 maka tampilan ya sebagai berikut:

daftar penjualan toko laris

               ENTER

nama barang =(MASUKAN NAMA BARANG YANG ANDA MAU)

               ENTER

kode barang = (MASUKAN KODE BARANG YANG ANDA MAU)

               ENTER

jumlah barang =  (MASUKAN JUMLAH BARANG YANG ANDA MAU)

               ENTER

harga barang = (HASIL)

jumlah pembayaran=(HASIL)

KETERANGAN:                                                                                                                  Tipe data real adalah tipe data angka yang mengandung nilai pecahan (baik positif maupun negatif).Tipe data integer adalah tipe data yang terdiri dari angka bulat (tidak mengandung nilai pecahan atau nilai desimal). Nilai ini bisa berbentuk angka positif maupun negatif. Tipe data string adalah tipe data yang bisa menampung banyak karakter sekaligus, seperti kata, atau kalimat. Secara internal di dalam pascal, string merupakan array dari tipe data char, oleh karena itu, tipe data ini sering dimasukan ke dalam array.

USES CRT /USES WINCRT : digunakan untuk memanipulasi/pengaturan layar dalam pengetikan naskah yakni menampung 80 karakter dan 25 baris

CLRSCR : untuk membersihkan isi memory dan seluruh tulisan yang berada dilayar monitor pada setiap pembacaan awal program

BEGIN : memulai program

WRITE : perintah untuk mencetak hasil pada layar dan pada baris yang sama

WRITELN : mencetak hasil pada layar dan pada baris berikutnya

READ : perintah untuk membaca data yang masukan si pemakai (posisi kursor pada baris yang sama)

READLN : perintah untuk membaca data yang dimasukan si pemakai (posisi kursor pada baris baru)

END : untuk mengakhiri program.

 SELAMAT MENCOBA...............................!!!!!