Mimpi 1 Detik

Script ngobrol dengan komputernya sudah berjalan dengan baik, tapi kurang terasa natural karena semua tulisan langsung muncul secara beruntun tanpa jeda (cuma ada jeda saat komputer bertanya).

Hal tersebut terjadi karena komputer mengerjakan perintah yang diberikan secepat mungkin. Supaya terlihat lebih natural kita akan buat jeda dalam percakapannya. Kita akan suruh komputer tidur sejenak beberapa saat. Perintahnya adalah

SLEEP [lama tidurnya dalam mikrosekon]

1 detik itu = 1000 mikrosekon. Jadi kalau mau menyuruh komputer tidur selama 1 detik, ketik perintahnya:

SLEEP 1000

Kalau mau menyuruh tidur 1 menit? 1 menit itu 60 detik, jadi ketik perintahnya:

SLEEP 60000

Kita masukan perintah tersebut ke script kita yang terakhir

Sub Main
  DIM jawaban AS String
  DIM nama_komputer AS String
  DIM umur_komputer AS Integer
  DIM umur_user AS Integer
  DIM selisih_umur As Integer

  nama_komputer = "Kompie"
  umur_komputer = 20
  
  PRINT "Hallo nama saya " + nama_komputer
  SLEEP 1000
  INPUT "Nama kamu siapa ?", jawaban
  PRINT "Hallo " + jawaban + ", " + nama_komputer + " senang berkenalan dengan anda"
  
  SLEEP 1000
  INPUT "Ngomong-ngomong, umur kamu berapa sih?", umur_user
  selisih_umur = umur_user - umur_komputer
  PRINT "Wah ternyata umur kita beda " + STRING(selisih_umur) + " tahun"
End Sub

Coba run, bagaimana, lebih terlihat natural bukan, jadi ada jeda dalam percakapannya.

Silahkan bereksperimen dengan penempatan perintah SLEEP dan lama tidurnya untuk mendapatkan alur percakapan yang paling natural menurut anda

Bagikan ke teman-teman mu di sosmed


Download aplikasi FastTrack Online Course dari Play Store supaya bisa mendapatkan notifikasi ketika ada materi baru

Diskusi

  • 1

    Script

    eko.firdaus

    Sub Main
    DIM jawaban AS String
    DIM nama_komputer AS String
    DIM umur_komputer AS Integer
    DIM umur_user AS Integer
    DIM selisih_umur As Integer

    nama_komputer = “Kompie”
    umur_komputer = 20

    PRINT “Hallo nama saya ” + nama_komputer
    SLEEP 1000
    INPUT “Nama kamu siapa ?”,jawaban
    PRINT “Hallo ” + jawaban + “, ” + nama_komputer + ” senang berkenalan dengan anda”

    SLEEP 1000
    INPUT “Ngomong-ngomong, umur kamu berapa sih?”,umur_user
    print umur_user

    selisih_umur = umur_user – umur_komputer

    PRINT “Wah ternyata umur kita beda ” + STRING(selisih_umur) + ” tahun”
    end sub

    ( Koreksi Kang )

  • 2

    help

    Adoel Doel

    Error(1 of 1) Encountered”An” “In at line 13 column 30. Was expecting one of boolean byte double float integer long short string variant”complex” real” “imaginary not” ll VII true false <BOOLEAN CONSTANT

    • Adoel Doel

      <INTEGER CONSTANT <LONG CONSTANT <FLOAT CONSTANT <DOUBLE CONSTANT <STRING CONSTANT at line 13, column 28

    • Arie Agung

      perintah inputnya kurang variable, silahkan tambahkan jadi

      INPUT “Nama kamu siapa ?”, jawaban

  • 1

    tlg di koreksi kang ari

    lay412

    Sub Main
    DIM jawaban AS String
    DIM nama_komputer AS String
    DIM umur_komputer AS Integer
    DIM umur_user AS Integer
    DIM selisih_umur As Integer

    nama_komputer = “grey”
    umur_komputer = 20

    PRINT “Hallo nama saya ” + nama_komputer
    SLEEP 2000
    INPUT “Nama kamu siapa ?”, jawaban
    PRINT “Hallo ” + jawaban + “, ” + nama_komputer + ” senang berjumpa dengan anda”
    PRINT “umur aku?”,umur_komputer
    SLEEP 2000
    INPUT “Ngomong-ngomong, umur kamu berapa sih?”, umur_user
    selisih_umur = umur_user – umur_komputer
    PRINT “Wah ternyata umur kita beda ” + STRING(selisih_umur) + ” tahun”
    End Sub

    • admin

      siip!

  • 0

    الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ.

    Bk Elektrik

    sub main
    dim nama_komputer as string
    nama_komputer = “marka”
    print “haloooo nama saya ” + nama_komputer
    dim umur_komputer as integer
    umur_komputer = 4
    print “umur ” + string ( umur_komputer)+ ” tahun”
    sleep 3000
    dim umur_user as integer
    input “berapa umur anda?”,umur_user
    dim selisih_umur as integer
    selisih_umur = umur_user – umur_komputer
    print “wah…wah…umur kita beda ” + string(selisih_umur) + ” tahun”
    sleep 2300
    dim jawaban1 as string
    input “siapa nama anda?…..”,jawaban1
    sleep 1000
    dim jawaban2 as string
    input “alamat”,jawaban2
    sleep 2000
    print “anda yakin ” + jawaban1 +”,anda tinggal di ” + jawaban2 + ” silahkan follow ” +nama_komputer
    end sub

  • 0

    Begini Bener gak kang

    Zhaida Brotherprint

    SUB MAIN

    DIM jawaban AS String
    DIM Nama_Gadget AS String
    Nama_Gadget = “Haries”
    PRINT Nama_Gadget +” : Hai Nama saya ” + Nama_Gadget + ” Pemilik Gadget ini”

    Sleep 3000

    INPUT “Siapa nama kamu?”, jawaban
    PRINT Nama_Gadget +” : Siapa nama kamu ?”
    PRINT jawaban +” : Nama saya ” +jawaban
    PRINT Nama_Gadget +” : Hallo ” + jawaban
    PRINT jawaban +” : Hallo juga “+ Nama_Gadget

    Sleep 3000

    DIM umur As String
    DIM Usiaku As String
    Usiaku = “27”

    INPUT “Berapa usia kamu ” +jawaban + ” ?”, umur
    PRINT Nama_Gadget +” : Berapa usia kamu “+ jawaban+” ?”
    PRINT jawaban+ ” : Usiaku ” +umur+ ” Tahun”
    PRINT Nama_Gadget +” : Owh, Usiaku “+ Usiaku +” Tahun”

    DIM UmurUser As Integer
    DIM Usia_Saya As Integer
    DIM Beda_Umur As Integer
    UmurUser = Umur
    Usia_Saya = Usiaku
    Beda_Umur = UmurUser – Usia_Saya

    PRINT jawaban +” : Wah, ternyata usia kita beda “+ String (Beda_Umur)+ ” Tahun”

    Sleep 4000

    DIM Alamat As String
    DIM Alamatku As String
    Alamatku = “Jalan Tambora Dalam”

    INPUT “Rumahmu dimana ” + jawaban + “?”, Alamat
    PRINT Nama_Gadget +” : Rumahmu dimana “+ jawaban +” ?”
    PRINT jawaban +” : Aku sih tinggal di “, Alamat
    PRINT Nama_Gadget +” : Kalo Rumahku sih di “, Alamatku

    END SUB