Program Aritmatika Dasar Pada Batch File

@echo off
echo Nama : Kgs. A. Rahman
echo Kelas : 4 TCA
echo NIM : 0611 3070 1277
:awal
ECHO *******************************************
echo Operasi Aritmatika Dasar Pada Batch File
echo.
echo *******************************************
echo.
echo [1].Penjumlahan 
echo [2].Pengurangan
echo [3].Pembagian
echo [4].Perkalian
echo [5].Exit
echo -------------------------------------------------------------

echo -------------------------------------------------------------
echo Silahkan Masukkan Pilihan Anda
set/p "pil=Pilih: "
echo -------------------------------------------------------------
if %pil%==''goto awal
if %pil%==1 goto tambah
if %pil%==2 goto kurang
If %pil%==3 goto bagi
if %pil%==4 goto kali
If %pil%==5 exit
echo.

:tambah
echo PROGRAM PENJUMLAHAN
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
set/a b=b1+b2
echo Hasil Penjumlahannya Adalah= %b%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

:kurang
echo PROGRAM PENGURANGAN
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
set/a b=b1-b2
echo Hasil Pengurangannya Adalah= %b%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

:bagi
echo PROGRAM PEMBAGIAN
set /p a=Masukkan Bilangan Ke-1 :
set /p b=Masukkan Bilangan Ke-2 :
set /A x=a/b
set /a k1=(a-x*b)*10/b
set /a k2=((a-x*b)*10-(k1*b))*10/b
if errorlevel 1 goto start
if /i %k1% lss 0 set /a k1=0-k1
if /i %k2% lss 0 set /a k2=0-k2
echo.
echo Hasil Pembagiannya Adalah = %x%,%k1%%k2%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

:kali
echo PROGRAM PERKALIAN
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
set/a b=b1*b2
echo Hasil Perkaliannya Adalah= %b%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

Program Search Engine Pada Batch File

@echo off
:google
cls
echo Nama : Kgs. A. Rahman
echo Kelas : 4 TCA
echo NIM : 0611 3070 1277

echo ____________________________________________________________________________
echo.
echo ###### Program Batch File Search Engine Pada Internet #######
echo.
echo  [1] Test Koneksi Jaringan Internet                              
echo  [2] Program Pemanggil URL Website
echo  [3] Program Searching / Browsing Google
echo  [4] Program Searching Image Google                                          
echo  [5] Exit        
echo.                                                      
echo #############################################################
echo ____________________________________________________________________________
echo.
set /p "pil=Masukkan Nomor Pilihan Anda : "
If %pil%== 1 Goto Ping
If %pil%== 2 Goto URL
If %pil%== 3 Goto Search
IF %pil%== 4 Goto Image
If %pil%== 5 Exit
If %pil%== else Goto salah
cls
:salah
cls
echo Pilihan yang anda masukkan Salah, Tekan Apa Saja Untuk Mencoba Lagi !!
pause>nul
Goto google

:ping
cd\
cls
c:
cd Windows
cd System32
Ping www.google.com
echo.
echo.
echo Proses Test Koneksi Selesai, Tekan Apa Saja Untuk Kembali Ke Menu Utama !!
pause>nul
Goto google

:URL
cls
echo ##############################
echo.
echo PROGRAM PEMANGGIL URL WEBSITE
eChO.
echo ##############################
echo.
echo.
echo Silahkan Masukkan Web Address Yang Ingin Anda Kunjungi :
set /p "url=http://"
start http://%url%
echo.
echo.
cls
Set /p "opsi= Masukkan 1 untuk Kembali Ke Menu Utama dan 2 untuk Kembali Ke Program URL: "
If %opsi%== 1 Goto Google
If %opsi%== 2 Goto URL
If %opsi%== else Exit

:Search
cls
echo ____________________________________________________
echo.
echo ####################################################
echo   Search Engine The BlackMAn 4 TCA with Google.com
echo ####################################################
echo.
echo ____________________________________________________
echo.
set /p "key= Silahkan Searching / Browsing Apa Saja Disini :> "

start "title" "http://www.google.co.id/#hl=id&source=hp&q=%key%&btnG=Penelusuran+Google&aq=f&aqi=g10&aql=&oq=&gs_rfai=&fp=89afce78654b8ad0"

cls
Set /p "opsi= Masukkan 1 untuk Kembali Ke Menu Utama dan 2 untuk Kembali Ke Search Engine: "
If %opsi%== 1 Goto Google
If %opsi%== 2 Goto Search
If %opsi%== else Exit

:Image
cls
echo _________________________________________________________
echo.
echo #########################################################
echo   Search Engine Image The BlackMAn 4 TCA with Google.com
echo #########################################################
echo.
echo _________________________________________________________
echo.
set /p "key= Silahkan Searching / Browsing Apa Saja Disini :> "

start "title" "http://image.google.com/images?q=%key%
cls
Set /p "opsi= Masukkan 1 untuk Kembali Ke Menu Utama dan 2 untuk Kembali Ke Search Image: "
If %opsi%== 1 Goto Google
If %opsi%== 2 Goto Image
If %opsi%== else Exit

Pause