===== Jangan pernah meremehkan dirimu. Tuhan memberikanmu hidup bukan kerena kamu membutuhkannya, tapi karena seseorang membutuhkanmu ===== Bagi semua pengunjung, saya minta do'anya untuk dimudahkan dan dilancarkan skripsiku ===== Makasih =====

CARA MEMBUAT KALIMAT BERJALAN

Bismillah...



Hai sobat...
Tidak hanya manusia dan hewan yang bisa berjalan, tetapi kalimat pun bisa berjalan. Apalagi di jaman modern seperti ini, banyak sekali program-program pembuat tulisan berjalan, tapi karena saya disini membahas tentang Turbo Pascal,jadi yang akan saya jelaskan adalah cara membuat kalimat berjalan ala turbo pascal.

Cara membuatnya tidak sulit kok, hanya perlu menuliskan script dibawah ini.



Ada yang perlu diperhatikan.

1. Merubah tulisan/kalimat.
Ganti saja kalimat “SAYA SEDANG BELAJAR TURBO PASCAL” dengan kalimat yang anda inginkan.
Misal, saya ingin merubahnya menjadi kalimat “AKU CINTA INDONESIA”

Script awal:
Kalimat:=’SAYA SEDANG BELAJAR TURBO PASCAL              ‘;

Script rubahan:
Kalimat:=’AKU CINTA INDONESIA                           ‘;

2. Menambah/mengurangi lebar sisi kanan area teks berjalan.


 

Ø    Menambah area teks
Tambahkanlah spasi disebelah teks anda.
Tambah 1 spasi = tambah lebar 1 byte karakter.
Ø    Mengurangi area teks
Kurangilah spasi disebelah teks anda.
Kurangi 1 spasi = kurangi lebar 1 byte karakter.

3. Menambah/mengurangi lebar sisi kiri area teks berjalan.
Ø    Menambah area teks
Kurangilah angka “2” pada script “GOTOXY(2,5);”
Misal: GOTOXY(1,5);
Ø    Mengurangi area teks
Tambahkanlah angka “2” pada script “GOTOXY(2,5);”
Misal: GOTOXY(5,5);

4. Mengatur letak tulisan berjalan
Rubahlah angka “5” pada script “GOTOXY(2,5);”
Keterangan: angka “5” menentukan letak teks ke baris nomor 5.
Jika ingin meletakkan tulisan ke baris no.10, maka gantilah angka “5” dengan angka “10”.
Misal: GOTOXY(2,10);

5. Menambah/ mengurangi kecepatan teks berjalan
Ø    Menambah
Kurangilah angka “29000” pada script “DELAY(29000);”
Misal: DELAY(3000);
Ø    Mengurangi
Tambahkanlah angka “29000” pada script “DELAY(29000);”
Misal: DELAY(48000);

Nah... Selamat mencoba...
Ingat!!! Baca bismillah sebelum mencoba. ^_^




Nb: Silahkan sampaikan kritik dan saran anda melalui kotak komentar.


3 comments:

  1. gan program di atasuda saya coba tp ko hasil outputnya gax jalan.. gimanatu gan..??

    ReplyDelete
    Replies
    1. coba file atau hasil program mu kirim ke email ku ( ari.famuji.88@gmail.com ), nanti tak coba cari kesalahannya. :)

      Delete
  2. gan, kalo di TPW kok delay nya jadi unidentifier yah ?

    ReplyDelete
:) :( ;) :D ;;-) :-/ :x :P :-* =(( :-O X( :7 B-) :-S #:-S 7:) :(( :)) :| /:) =)) O:-) :-B =; :-c :)] ~X( :-h :-t 8-7 I-) 8-| L-) :-a :-$ [-( :O) 8-} 2:-P (:| =P~ #-o =D7 :-SS @-) :^o :-w 7:P 2):) X_X :!! \m/ :-q :-bd ^#(^ :ar!