Program Untuk Menguji Intelektual (By Asriadi)

Hai sobat...Ini ada progam baru untuk menguji intelektual, sillahkan copy script di bawah ini

@ echo off
title Program Untuk Menguji Intelektual (By Asriadi)
color d
:start
echo Silahkan masukan nama anda, lalu enter
set /p name=
cls
:love
echo.
echo Ini adalah Program untuk menguji intelektual anda.
echo Program ini berupa pertanyaan yang terdiri atas 10 pertanyaan,
echo Yang mana bila anda menjawab pertanyaan dengan "BENAR". Anda
echo akan mendapat uang.
echo Dengan Ketentuan:
echo Pertanyaan Pertama senilai Rp 1.000.000,-
echo Pertanyaan Kedua senilai Rp 5.000.000,-
echo Pertanyaan Ketiga senilai Rp 10.000.000,-
echo Pertanyaan Keempat senilai Rp 20.000.000,-
echo Pertanyaan Kelima senilai Rp 35.000.000,-
echo Pertanyaan Keenam senilai Rp 50.000.000,-
echo Pertanyaan Ketujuh senilai Rp 75.000.000,-
echo Pertanyaan Kedelapan senilai Rp 100.000.000,-
echo Pertanyaan Kesembilan senilai Rp 500.000.000,-
echo Pertanyaan Kesepuluh senilai Rp 1.000.000.000,-
echo.
echo Dan bila jawaban anda "SALAH". Anda dapat mengulang program ini
echo dari pertanyaan pertama.
pause
goto question 1

:question 1
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Jawablah pertanyaan berikut dengan memilih jawaban a, b, c atau d
echo.
echo Pertanyaan Pertama
echo ===========***********@@@@@))))))-----((((((@@@@@************============
echo.
echo. Siapakah nama presiden Indonesia yang pertama?
echo.-------------------------------------------------------------------------
echo. a. Bung Hatta ! c. Abdur Rahman Wahid
echo.-------------------------------------------------------------------------
echo. b. Ir. Soekarno ! d. Megawati
echo.-------------------------------------------------------------------------
set /p "jawaban1=Jawaban anda>"
if %jawaban1%==b goto A
if not %jawaban1%==b goto A1

:A
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 1.000.000,-
echo karna telah menjawab pertanyaan pertama dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 2

:question 2
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Kedua
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo Siapakah gubenur Sumatera Barat periode 2010-2015?
echo.-------------------------------------------------------------------------
echo. a. Asriadi ! c. Riko Putra Shaleh
echo.-------------------------------------------------------------------------
echo. b. Haidil Jamuan ! d. Irwan Prayitno
echo.-------------------------------------------------------------------------
set /p "jawaban2=Jawaban anda>"
if %jawaban2%==d goto B
if not %jawaban2%==d goto B1

:B
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 5.000.000,-
echo karna telah menjawab pertanyaan kedua dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 3

:question 3
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Ketiga
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Apa Bahasa Inggris nya "Saya Cinta Kamu"?
echo.-------------------------------------------------------------------------
echo. a. I like you ! c. I love you
echo.-------------------------------------------------------------------------
echo. b. I Miss you ! d. I need you
echo.-------------------------------------------------------------------------
set /p "jawaban3=Jawaban anda>"
if %jawaban3%==c goto C
if not %jawaban3%==c goto C1

:C
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 10.000.000,-
echo karna telah menjawab pertanyaan ketiga dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 4

:question 4
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Keempat
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Apa Bahasa Inggris nya "Kamu Manis Sekali"?
echo.-------------------------------------------------------------------------
echo. a. You very sweet ! c. You very happy
echo.-------------------------------------------------------------------------
echo. b. You very hot ! d. You very beutiful
echo.-------------------------------------------------------------------------
set /p "jawaban4=Jawaban anda>"
if %jawaban4%==a goto D
if not %jawaban4%==a goto D1

:D
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 20.000.000,-
echo karna telah menjawab pertanyaan keempat dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 5

:question 5
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Kelima
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Kapan negara Indonesia merdeka?
echo.-------------------------------------------------------------------------
echo. a. 15 Agustus 1945 ! c. 17 Agustus 1945
echo.-------------------------------------------------------------------------
echo. b. 16 Agustus 1945 ! d. 18 Agustus 1945
echo.-------------------------------------------------------------------------
set /p "jawaban5=Jawaban anda>"
if %jawaban5%==c goto E
if not %jawaban5%==c goto E1

:E
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 35.000.000,-
echo karna telah menjawab pertanyaan kelima dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 6

:question 6
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Keenam
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Siapakah nama ayah dari rasulullah Muhammad SAW ?
echo.-------------------------------------------------------------------------
echo. a. Abdullah ! c. Abu Thalib
echo.-------------------------------------------------------------------------
echo. b. Abdul Muthalib ! d. Abu Lahab
echo.-------------------------------------------------------------------------
set /p "jawaban6=Jawaban anda>"
if %jawaban6%==a goto F
if not %jawaban6%==a goto F1

:F
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 50.000.000,-
echo karna telah menjawab pertanyaan keenam dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 7

:question 7
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Ketujuh
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Kapan nabi Muhammad SAW lahir ke dunia?
echo.-------------------------------------------------------------------------
echo. a. 15 Rabi'ul Awal Tahun Gajah ! c. 13 Rabi'ul Awal Tahun Gajah
echo.-------------------------------------------------------------------------
echo. b. 14 Rabi'ul Awal Tahun Gajah ! d. 12 Rabi'ul Awal Tahun Gajah
echo.-------------------------------------------------------------------------
set /p "jawaban7=Jawaban anda>"
if %jawaban7%==d goto G
if not %jawaban7%==d goto G1

:G
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 75.000.000,-
echo karna telah menjawab pertanyaan ketujuh dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 8

:question 8
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Kedelapan
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Di Negara manakah letaknya Mesjid Aqsa?
echo.-------------------------------------------------------------------------
echo. a. Mekah ! c. Irak
echo.-------------------------------------------------------------------------
echo. b. Palestina ! d. Iran
echo.-------------------------------------------------------------------------
set /p "jawaban8=Jawaban anda>"
if %jawaban8%==b goto H
if not %jawaban8%==b goto H1

:H
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 100.000.000,-
echo karna telah menjawab pertanyaan kedelapan dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 9

:question 9
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Kesembilan
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Dimanakah Piala Dunia Football 2010 diadakan?
echo.-------------------------------------------------------------------------
echo. a. Afrika Utara ! c. Inggris
echo.-------------------------------------------------------------------------
echo. b. Eropa ! d. Afrika Selatan
echo.-------------------------------------------------------------------------
set /p "jawaban9=Jawaban anda>"
if %jawaban9%==d goto I
if not %jawaban9%==d goto I1

:I
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 500.000.000,-
echo karna telah menjawab pertanyaan Kesembilan dengan BENAR
echo Tekan tombol ENTER untuk menuju ke pertanyaan berikutnya!
echo.
pause
goto question 10

:question 10
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Pertanyaan Kesepuluh
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo. Siapakah pemilik blog yang berjudul SENYUMAN ASRIADI?
echo.-------------------------------------------------------------------------
echo. a. Ari Asriadi ! c. Asriadi
echo.-------------------------------------------------------------------------
echo. b. Asriadi Ari ! d. Ari
echo.-------------------------------------------------------------------------
set /p "jawaban10=Jawaban anda>"
if %jawaban10%==c goto J
if not %jawaban10%==c goto J1

:J
echo. T J A --------) B
echo. E A N --------) E
echo. R W D --------) N
echo. N A A --------) A
echo. Y B --------) R
echo. A A
echo. T N
echo. A
echo.
echo %name% anda mendapatkan uang senilai Rp 1.000.000.000,-
echo karna telah menjawab pertanyaan Kesepuluh dengan BENAR.
echo %name% semoga anda menjadi orang yang intelektual dan berguna
echo bagi diri anda dan orang disekitar anda.
pause
goto End
:end
echo.
echo.
echo Trimakasih Perancang Program
echo ( A S R I A D I )
echo ============***********@@@@@))))))-----((((((@@@@@***********============
echo.
echo %name% trimakasih atas partisipasi nya. Dalam Program Untuk Menguji
echo Intelektual ini. Dan jangan lupa untuk memberitahu ku
echo di no HP ku 087895247160 atau di emailku asriadikreatif@gmail.com
echo bahwa anda telah berhasil menjawab dengan benar program ini.
echo Kalau mau...Aku punya alamat web nih. Tolong kunjungi ya!!!
echo di http://asriadikreatif.blogspot.com
echo http://asriadi1991.wordpress.com
echo http://pantunasriadi1991.wordpress.com
echo.
echo =============================*****~~~~~*****=============================
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
pause
exit


:A1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% anda belum mendapatkan uang. Karena jawaban anda SALAH
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER...!!!
pause
goto question 1

:B1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 1.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:C1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 5.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:D1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 10.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:E1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 20.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:F1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 35.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:G1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 50.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:H1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 75.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:I1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 500.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

:J1
echo. T J A --------) S
echo. E A N --------) A
echo. R W D --------) L
echo. N A A --------) A
echo. Y B --------) H
echo. A A
echo. T N
echo. A
echo.
echo %name% jawaban anda SALAH dan anda hanya mendapatkan
echo uang senilai Rp 500.000.000,- Tapi cuma dalam mimpi ya...He...He..He...,
echo Silahkan mencoba kembali!
echo Untuk mengulang kembali, Silahkan tekan tombol ENTER !!!
echo.
pause
goto question 1

Kemudian Pastekan di Notepad
Setelah itu simpan dengan Nama "Program Untuk Menguji Intelektual By Asriadi.bat"
Jadi deh,...
Tinggal kamu buka aja tu program,,,, Bisakan?



By: Asriadi