Rabu, 19 September 2012

Tutorial menggunakan TURBO BASIC

Turbo Basic adalah program BASIC yang sederhana. Saya akan menulis sedikit tutorial tentang Turbo Basic.
Jika anda belum mempunyai program turbo basic. anda bisa download disini
, juga disertakan beberapa contohnya.
(password = faishal)
  • Membuat Tulisan Berjalan
  • Membuat tulisan dalam turbo basic berjalan, anda bisa menulis kode dibawah ini pada turbo basic anda.
    Teks$=” Lamongan Kota Adipura”
    for i = 1 to 30 step 0.0003
       Locate 4,(-20+Len(Teks$)+i)
       ? Teks$
    Next i
    jika dijalankan maka akan tampil seperti ini :
    jalan
  • Membuat Program mengurutkan Data
  • Ini adalah contoh program dalam turbo untuk mengurutkan data string
    Dim nama$(100)
    input "Berapa banyak nama yang mau diurutkan";n
    for i = 1 to n
       ? "Data Ke-";n
       input nama$(i)
    next i
    ? "Data Sebelum Diurutkan :"
    for i = 1 to n
       ? nama$(i)
    next i
    'Proses Pengurutan
    for i = 1 to n-1
       for j = 1 to n-1
          if nama$(j) > nama$(j+1) then
             swap nama$(j), nama$(j+1)
          end if
       next j
    next i
    ?
    ? "Data Setelah Diurutkan :"
    for i = 1 to n
       ? nama$(i)
    next i
    end
    jika dijalankan maka akan tampil seperti ini :
    urut

1 komentar: