Halaman

Kamis, 13 Desember 2012

Ilmuwan Ungkap Banjir Besar di Masa Nabi Nuh

Bekas peradaban di bawah Laut Hitam terus dicari.

Aditya Gunawan
Replika perahu Nabi Nuh di Belanda
Replika perahu Nabi Nuh di Belanda (http://jasionline.com)
VIVAnews - Cerita Nabi Nuh dan banjir besar merupakan kisah paling terkenal yang bersumber dari kitab suci, baik agama Yahudi, Nasrani, juga Islam. Tapi kemudian, ahli arkeologi bawah air mengungkap bahwa mereka berhasil membuktikan kisah Nuh dan banjir besar itu.

Robert Ballard, ahli arkeologi bawah air yang sudah dikenal dunia, mengaku timnya telah menelusuri kedalaman Laut Hitam di sekitar Turki. Ini dilakukan untuk mencari bekas peradaban yang tersimpan di dasar laut, yang terpendam sejak masa Nabi Nuh.

Mengutip laman ABC News, selama ini Ballard memiliki rekam jejak untuk berhasil menemukan hal-hal yang dianggap mustahil. Pada 1985, dengan menggunakan robot yang dilengkapi pengendali jarak jauh, Ballard dan timnya menelusuri sisa reruntuhan Titanic.

Sekarang Ballard pun menggunakan teknologi robotik yang lebih canggih untuk mencari jejak Nabi Nuh. Menurut dia, dunia pada 12.000 tahun lalu terselimuti es. Namun, dia tetap berusaha mencari jejak Nabi Nuh.

Menurut Ballard, Laut Hitam dulu merupakan danau air tawar yang dikelilingi kawasan pertanian. Tapi, kemudian gletser mencair pada saat temperatur Bumi semakin menghangat pada 5600 SM, yang mengakibatkan terbentuknya sejumlah lautan.

Inilah yang mengakibatkan terjadinya banjir besar di sebagian besar kawasan dunia. Air itu kemudian mengalir melalui Selat Bosporus dari Turki, untuk kemudian menuju Laut Hitam.

"Kami bicara tentang banjir di sejarah hidup manusia. Pertanyaannya adalah, apakah ada induk dari semua banjir yang terjadi saat itu?" tutur Ballard.

Penelitian Ballard ini dilakukan mengikuti kajian yang dilakukan William Ryan dan Walter Pitman. Mereka menggambar bukti arkeologi dan antropologi, yang menyebut "10 kubik mil air dituangkan setiap hari", yang terjadi selama 300 hari.

Menurut Ryan dan Pittman, lebih dari 60.000 mil persegi daratan terendam banjir. Lalu, permukaan air danau meningkat hingga ratusan kaki, dan memicu migrasi massal hewan-hewan di seluruh Eropa. Kekuatan air sebesar 200 kali air terjun Niagara ini kemudian menyapu seluruh permukaan daratan. Karena itu, danau tersebut pun kemudian berubah menjadi air asin.

Para ilmuwan ini pun mengaku telah melakukan penanggalan karbon dan penggambaran sonar, untuk membuktikan bencana banjir Nuh itu.

"Kami ke sana untuk mencari banjir," ucap Ballard. "Tidak hanya bergerak secara perlahan, yang menyebabkan meningkatnya air laut. Tapi, juga banjir besar yang kemudian menutup daratan," kata Ballard.

Tim ini pun mengklaim telah menemukan garis pantai purba yang dipercaya sebagai bukti kisah Nuh itu. Dengan penanggalan karbon terhadap kerang yang ditemukan, maka pantai itu diperkirakan berasal dari 5000 SM.

Tapi, Ballard mengaku kesulitan untuk menemukan bahtera Nuh. Ballard hanya mengaku memiliki kemungkinan untuk menemukan masyarakat yang tersapu banjir pada 7000 tahun lalu itu.

"Sepertinya bodoh untuk berpikir bisa menemukan bahtera itu," ucapnya. "Tapi apakah bisa menemukan masyarakat yang pernah hidup di situ? Apakah bisa menemukan perkampungan yang sekarang berada di bawah laut? Jawabannya tentu saja 'ya'," tutur Ballard. (art)

Rabu, 12 Desember 2012

Nokia Pamerkan 9 Kelebihan Nokia Lumia 920 Dibandingkan iPhone 5

Setelah sebelumnya muncul iklan dari Samsung yang memaparkan kelebihan Galaxy S III dibandingkan iPhone 5, kini giliran Nokia yang mengklaim bahwa perangkat mereka lebih baik dari milik Apple. Hal tersebut mereka paparkan dalam sebuah gambar yang dipajang oleh perwakilan Nokia Inggris dalam halaman Facebooknya.
Dalam gambar tersebut, Nokia mengungkapkan paling tidak terdapat 9 kelebihan yang dimiliki oleh Nokia Lumia 920 yang memakai OS Windows Phone 8 dibanding iPhone 5. Tak ada sesuatu yang baru dalam perbandingan tersebut. Di antaranya adalah permasalahan kamera hingga aplikasi peta.
Namun yang cukup mengherankan adalah pada bagian kanan bawah, di mana Nokia membandingkan pilihan warna yang lebih banyak. Dalam penjelasannya, Nokia mengatakan terdapat lima pilihan warna, yakni hitam, putih, abu-abu, merah dan kuning. Namun dalam gambar, mereka menunjukkan warna ungu dan cyan. Permasalahan ini mungkin timbul karena proses rendering gambar yang kurang berjalan sempurna.
Perbandingan lainnya adalah dalam hal charging handphone. Nokia menjelaskan, wireless charging pada Nokia Lumia 920 benar-benar memberikan kemudahan bagi para pengguna handphone. Di sisi lain, pemilik iPhone 5 membutuhkan perangkat tambahan jika ingin memakai pin 30.

Selasa, 11 Desember 2012


J.Lo Akan Nikah pada Natal Tahun ini?

Aditya Gunawan
J.Lo (Foto: Galuh/Okezone)
LOS ANGELES - Sumber terdekat Jennifer Lopez mengungkap sebuah kabar yang mengejutkan. Diva yang belum lama ini memukau penonton di Jakarta itu dikabarkan merencanakan sebuah pesta pernikahan rahasia di hari Natal tahun ini.

Baru-baru ini, JLo tertangkap sedang berbelanja sebuah cincin berlian di Australia bersama Casper Smart. Mereka tertangkap sedang mencari perhiasan di toko perhiasan ternama, Tiffany and Co. Tepatnya di Perth, Kamis, 5 Desember 2012 muncullah spekulasi mengenai penyanyi ini akan segera maju ke altar pernikahan.

Sementara, juru bicara dari pelantun "On The Floor" ini justru berkata sebaliknya. "Jennifer dan kekasihnya tidak berbelanja cincin pernikahan," ujarnya seperti dilansir dalam Femalefirst (11/12/2012).

J.Lo saat ini sedang melakukan tour Down Under dan penari yang juga kekasihnya ikut dalam tur tersebut. Ibu dari dua anak ini juga sempat tertangkap kamera menggunakan cincin berlian pada bulan Juni lalu.

Namun, pasangan ini menolak kabar yang berhembus pada Oktober lalu mengenai pertungangan mereka, setelah sebelumnya keduanya tertangkap mengenakan cincin yang sama saat berada di Paris.

Jumat, 07 Desember 2012

Video Robot NASA Temukan "Tikus" di Mars?


Video Robot NASA Temukan "Tikus" di Mars?

Aditya Gunawan
Jum'at, 7 Desember 2012 11:14 wib
detail berita
Screenshot
CALIFORNIA - Robot Curiosity buatan badan antariksa asal Amerika Serikat, National Aeronautics and Space Administration (NASA) yang menjelajah di Mars sejak Agustus 2012, telah meneliti beberapa material serta tanah di planet merah tersebut.

Kini, misi robot senilai USD2,6 miliar itu kabarnya menemukan objek benda yang tidak asing lagi. Curiosity kabarnya menemukan benda mirip hewan pengerat. Penemuan ini sempat heboh melalui tayangan video Youtube yang diunggah baru-baru ini.

Dilansir Ibtimes, Jumat (7/12/2012), hewan pengerat hidup di Mars? ini merupakan gagasan yang muncul ke permukaan oleh pemburu Unidentified Flying Object (UFO) pekan ini. Ada sebuah perdebatan yang sedang berlangsung di antara mereka yang telah diteliti di Youtube, yakni foto NASA yang diduga diambil oleh NASA Curiosity.

Kendati demikian, objek pada gambar tersebut masih belum diketahui apakah itu merupakan batu yang kebetulan mirip tikus atau hewan pengerat.

Pengunggah video di Youtube tersebut, UFO HuntingClouds merupakan pengamat UFO yang bergelut dalam penelusuran penampakan UFO yang mereka ungkap secara online. "Ini merupakan foto dari guinea pig (tikus belanda) yang ditangkap di Mars oleh Rover Curiosity SOL 52," ungkap akun Youtube tersebut.

Ia mengatakan, ketika gambar lebih didekatkan atau zoom-in, maka Anda dapat melihat dengan jelas bentuk hewan pengerat tersebut. Anda yang penasaran, bisa melihat video Youtube tersebut melalui link ini. (fmh)

Kamis, 06 Desember 2012

Membuat Game Online (Flash)

Lagi iseng - iseng browsing ketemu situs yang menyediakan fitur untuk membuat game flash online sendiri , situs ini menyediakan fasilitas bagi pengunjung nya untuk membuat game yang mereka inginkan proses pembuatannya cukup mudah karna kita hanya harus mendrag & drop item atau musuh atau apapun yang kita inginkan ada digame kita , kita juga diberikan pilihan untuk memilih game jenis apa yang ingin kita buat. . .kalau tertarik begini caranya :
1 . buka situs sploder.com klik DISINI
2 . Lalu pilih Make a Game
3 . Lalu pilih Game seperti apa yang kita inginkan :
- Platformer : adventure
- Puzzle
- Teka - Teki
- atau Tembak2n
4 . pilih demo jika hanya ingin mencoba pilih join jika ingin game yang kita buat bisa dipublish dan dimainkan orang lain
5 . setelah itu hanya tinggal darg item yang kita inginkan didalam game ada keterangan untuk setiap item jika sudah kliklah Test untuk mengetes game yang anda buat
sekian posting kali ini 
Semoga bermanfaat
Varoek

Download Windows 8 Pro Full Activator

Akhirnya bisa memenuhi janji sekaligus permintaan sahabat Udunan untuk share windows 8 Pro, ya meskipun saya hanya sebatas mencarikan link download nya saja, tapi nggak sembarang link loh, cepat dan bisa resume, hehe. Silahkan langsung di cicip Windows 8 Pro nya.

Windows 8 memang berbeda dari windows versi sebelumnya, untuk saat ini saya masih nyaman menggunakan windows 7, mungkin hanya masalah waktu hingga saya terbiasa dengan windows terbaru ini.

Windows 8 ProDownload Windows 8 Pro Full

Cara Membuat Antivirus Sendiri




Sekarangkehadiran para virus maker (–selanjutnyadisingkatjadi VM
saja) lokaltelahmembuatgerah para user komputertanah air. Bisa
dibayangkanbiladarisekianbanyak virus lokaltidaksatu-dua yang
menghancurkan data (terutamabagi file office; word, excel, dll…). Bagi
para vendor Anti Virus (–selanjutnyadisingkatmenjadi AV saja)
fenomenainiadalahlahanbisnisuntukprodukmereka. Sebutsaja
NORMAN, yang kini men-support perusahaankonsultan virus lokal
(–VAKSIN.COM) , Symantec, McAffe, NOD32, dansebagainya. Dengan
menawarkan update definisi software AV tercepat, engine scanner paling
sensitif, dan lain-lain merupakankiatuntukmemancing para korban
virus membelidanmenggunakan software AV mereka. Bagipenulissendiri
halinimemangagakmemberatkanmengingat update file definisiatau
engine AV tsbharuslahmelaluikoneksi internet. Lalubagaimana yang
tidakmempunyaiaksessamasekali? Konsekuensinyaiyalahtertinggal
dalamhalpengenalanvarian virus baru yang padaujung-ujungnyamembuat
AV yang sudahterinstallbagai 'MacanOmpong'. Kalaukitamembuat AV
sendiribagaimana? dengan database definisi yang bisadiupdateoleh
kitabahkandapatsalingtukardenganteman? Bisasaja, dengansyarat
maumempelajarisedikitteknikpemograman.

Pertamakitaharusmengertibagaimanacarakerja
sebuah AV sederhana, padadasarnyasebuah software AV mempunyai
komponen-komponen :


1. Engine scanner, inimerupakankomponenutama AV
dalammengenalisebuah pattern virus. Engine inidapatdikelompokkan
menjadistatisdandinamis. Statisdalamhalinidapatdisebutmenjadi
spesifikterhadap pattern tertentudarisebuah file virus. Checksum
merupakansalahsatucontohdari engine statisini. Dinamisdalam
artiandiamengenaliperilaku 'umum' sebuah virus. Heuristic menjadi
salahsatucontohnya.

2. Database definition, menjadisebuahreferensidarisebuah pattern
file virus. Engine statissangatbergantungkepadakomponenini.

3. Decompress atau unpacking engine, khususuntukpengecekan file-file
yang terkompresi (*.rar, *.zip, dll) ataukompresiatau packing untuk
file PE seperti UPX, MeW ,dll.

Tidakjaranghasildaripengecekanterhadap file
suspect virus menghasilkan false-positive bahkan false-negative (–
false-positive berarti file yang bersihdianggap thread oleh AV, dan
false-negative berarti file yang 100% thread akandianggapbersih).
Semuaitudapatdiakibatkanolehketidak-sempurnaandari engine scanner
itusendiri. Misal

padacontohkasus Engine String scanner (–Engine scanner yang
menyeleksi string-string dari file text-based), biladiterapkan rule 3
out of 5 (– bila AV menemukan 3 daridaftar 5 string kategori
malicious) maka AV akanmemberikanbahwa file terindikasisebuah thread
yang positif. Padahal file tsbnyatanyatidakmenimbulkanefek
berbahayabiladijalankanataudieksekusi. Kesalahan scanning macamini
lazimditemukanuntuk file-file *.VBS, *.HTML, dll. Untukpenggunaan
engine checksum sangatbanyakditemui di beberapa software AV lokal.
Checksum yang lazimdigunakandiantaranya CRC16, CRC32, MD5, dll.
Dikarenakanmudahuntukdiimplementasikan. Engine inisendiribukannya
tanpacacat, Checksum bekerjadenganmemproses byte demi byte dari
sebuah file dengansebuahalgoritmatertenu (– tergantungdarijenis
checksum yang digunakan) sehinggamenghasilkansebuah format tertentu
dari file tsb. Contoh checksum menggunakan CRC32 danMD5 :

* calCrc = CRC32(file_name_and_path)

* calMD5 = MD5(file_name_and_path)

Makaisidari string calCrcadalah 7AF9E376,
sedangkanuntuk MD5nya adalah 529CA8050A00180790CF88B63468826A. Perlu
diketahuibila virus menerapkanrutin yang mengubah byte tertentudari
badan virus tsbsetiap kali makapenggunaan engine checksum iniakan
kurang optimal karenabila 1 byte berubahdari file maka checksum juga
akanberubah.

Mari kitabelajarmembuatsebuah AV sederhana, yang diperlukan :


1. Software Visual Basic 6.0

2. Sedikitpemahamanakanpemograman Visual Basic 6.0

3. Sampel file bersihatau virus (– opsional)

First#

Sekarangkitaakanbelajarmembuatsebuahrutinsederhanauntuk :

- Memilih file yang akandicek

- Membuka file tersebutdalam mode binary

- Memproses byte demi byte untukmenghasilkan Checksum

Buka MS-Visual Basic 6.0 anda, lalubuatlahsebuah
class module dan Form denganmenambahkansebuahobjek Textbox,
CommonDialogdan Command Button. (ObjekCommonDialogdapatditambahkan
denganmemilih Project ->COmponentatau Ctrl-T danmemilih
Microsoft Common Dialog Control 6.0) Ketikkankodeberikutpada class
module (kitaberinama class module tsbclsCrc) :


================= START HERE ====================

Private crcTable(0 To 255) As Long 'crc32

Public Function CRC32(ByRefbArrayIn() As Byte, ByVallLen As Long, Optional ByVallcrc As Long = 0) As Long

'bArrayInadalah array byte dari file yang dibaca, lLenadalahukuranatau size file

Dim lCurPos As Long 'Current position untukiterasi proses array bArrayIn

Dim lTemp As Long 'variabel temp hasilperhitungan

If lLen = 0 Then Exit Function 'keluarfungsiapabilaukuran file = 0

lTemp = lcrcXor&HFFFFFFFF


For lCurPos = 0 To lLen

lTemp = (((lTemp And &HFFFFFF00) \\ &H100) And &HFFFFFF) Xor (crcTable((lTemp And 255) XorbArrayIn(lCurPos)))

Next lCurPos

CRC32 = lTempXor&HFFFFFFFF

End Function

Private Function BuildTable() As Boolean

Dim i As Long, x As Long, crc As Long


Const Limit = &HEDB88320

For i = 0 To 255

crc = i

For x = 0 To 7

If crc And 1 Then

crc = (((crc And &HFFFFFFFE) \\ 2) And &H7FFFFFFF) Xor Limit

Else


crc = ((crc And &HFFFFFFFE) \\ 2) And &H7FFFFFFF

End If

Next x

crcTable(i) = crc

Next i

End Function

Private Sub Class_Initialize()

BuildTable


End Sub

================= END HERE ====================

Laluketikkankodeberikutdalam event Command1_Click :

================= START HERE ====================

Dim namaFileBuka As String, HasilCrc As String

Dim CCrc As New clsCrc 'bikinobjekbarudari class ClsCrc

Dim calCrc As Long

Dim tmp() As Byte 'array buat file yang dibaca

Private Sub Command1_Click()


CommonDialog1.CancelError = True 'error bila user mengklik cancel padaCommonDialog

CommonDialog1.DialogTitle = "Baca File" 'Caption commondialog

On Error GoToerorhandle 'label error handle

CommonDialog1.ShowOpen

namafilbuka = CommonDialog1.FileName

Open namafilbuka For Binary Access Read As #1 'buka file yang dipilihdenganaksesbacapada mode binary

ReDimtmp(LOF(1) - 1) As Byte 'deklarasiulanguntuk array, # Bugs Fixed #

Get #1, , tmp()

Close #1


calCrc = UBound(tmp) 'mengambilukuran file dari array

calCrc = CCrc.CRC32(tmp, calCrc) 'hitung CRC

HasilCrc = Hex(calCrc) 'diubahke format hexadesimal, karenahasilperhitungandari class CRC masihberupa numeric

Text1.Text = HasilCrc 'tampilkanhasilnya

Exit Sub

erorhandle:

If Err.Number<> 32755 Then MsgBoxErr.Description 'error number
32755 dalahbila user mengkliktombol cancel padasaatmemilih file

================= END HERE ====================


CObaandajalankan program diatasdenganmemencet
tombol F5, laluklik Command1 untukmemilihdanmembuka file. Maka
program akanmenampilkan CRC32nya.

Second#

Kodediatasdapatkitabuatmenjadisebuahrutinpengecekan file
suspect virus denganantaramembandingkanhasil CRC32nya dan database
CRC kitasendiri. Algoritmanyaadalah :

- Memilih file yang akandicek

- Membuka file tersebutdalam mode binary

- Memproses byte demi byte untukmenghasilkan Checksum

- Buka file database

- Ambilisi file baris demi baris

- Samakan Checksum hasilperhitungandengan checksum dari file


Format file database dapatkitatentukansendiri, misal :

- FluBurung.A=ABCDEFGH

- Diary.A=12345678

DimanaFluBurung.Aadalahnama virus dan ABCDEFGH dalah Crc32nya. Jika
kitamempunyai format file sepertidiatas, makakitaperlumembaca file
secarasekuensial per barissertamemisahkanantaranama virus dan
Crc32nya. Dalamhalini yang menjadipemisahadalahkarakter '='.

Buat 1 module baru (– diberinama module1) laluisidengankode :

================= START HERE ====================

Public namaVirus As String, CrcVirus As String
'deklarasivariabel global untuknamadan CRC virus Public pathExe as
String 'deklarasivariabelpenyimpanlokasi file EXE AV kita

Public Function cariDatabase(Crc As String, namaFileDB As String) As Boolean

Dim lineStr As String, tmp() As String 'variabelpenampunguntukisi file


Open namaFileDB For Input As #1 'buka file dengan mode input

Do

Line Input #1, lineStr

tmp = Split(lineStr, "=") 'pisahkanisi file bedasarkanpemisahkarakter '='

namaVirus = tmp(0) 'masukkannamaviruskevariabeldari array

CrcVirus = tmp(1) 'masukkanCrcviruskevariabeldari array

If CrcVirus = Crc Then 'bila CRC perhitungancocok/match dengan database

cariDatabase = True 'kembalikannilai TRUE

Exit Do 'keluardariperulangan


End If

Loop Until EOF(1)

Close #1

End Function

================= END HERE ====================

Lalutambahkan 1 objekbarukedalam Form, yaitu
Command button2. laluketikkan listing kodeberikutkedalam event
Command2_Click :

================= START HERE ====================

If Len(App.Path) <= 3 Then 'biladirektorikitaadalah root direktoripathEXE = App.Path Else pathEXE = App.Path& "\\" End If CommonDialog1.CancelError = True 'error bila user mengklik cancel padaCommonDialog CommonDialog1.DialogTitle = "Baca File" 'Caption commondialog On Error GoToerorhandle 'label error handle CommonDialog1.ShowOpen namafilbuka = CommonDialog1.FileName Open namafilbuka For Binary Access Read As #1 'buka file yang dipilihdenganaksesbacapada mode binary ReDimtmp(LOF(1) - 1) As Byte 'deklarasiulanguntuk array # Bugs Fixed # Get #1, , tmp() Close #1 calCrc = UBound(tmp) 'mengambilukuran file dari array calCrc = CCrc.CRC32(tmp, calCrc) 'hitung CRC HasilCrc = Hex(calCrc) 'diubahke format hexadesimal, karenahasilperhitungandari class CRC masihberupa numeric If cariDatabase(HasilCrc, pathEXE& "DB.txt") Then 'bilafungsibernilai TRUE MsgBox "Virus ditemukan : " &namaVirus 'tampilkan message Box End If Exit Sub erorhandle: If Err.Number<> 32755 Then MsgBoxErr.Description 'error number
32755 dalahbila user mengkliktombol cancel padasaatmemilih file

================= END HERE ====================

Fitur AV sederhanainidapatditambahkandengan
fitur process scanner, akses registry, real-time protection (RTP) dan
lain lain. Untuk process scanner padadasarnyaadalahteknikenumerasi
seluruh proses yang sedangberjalanpadaSistemOperasi, lalumencari
letakataulokasi file danmelakukan proses scanning. Fiturakses
registry memungkinkankitauntukmengeditsecaralangsung registry
windows apabilaaksesterhadap registry (–Regedit) diblokoleh virus.
Sedangkanfitur RTP memungkinkan AV kitaberjalansecarasimultan
dengan windows explorer untukmengscandirektoriatau file yang sedang
kita browse ataulihat. Untukketigafiturlanjutaniniakandibahas
padaartikelselanjutnya.


Kesimpulan#

Tidakharusmembeli software AV yang mahaluntukmenjagakomputerkita
dariancaman virus, kitabisamembuatnyasendiridenganfitur-fitur
yang takkalahbagusnya. Memangterdapatketidaksempurnaandalam AV
buatansendiriini, tetapisetidaknyadapatdijadikanpencegahdari
infeksi virus komputer yang semakinmerajalela. Software AV sederhana
inidilengkapioleh engine scanner statisdan database definisi. Tidak
tertutupkemungkinan software AV iniditingkatkanlebih advanced dalam
hal engine scannernya.