Forum Smadav

Antivirus Lokal & Impor => Antivirus Lokal Lainnya => Topik dimulai oleh: shopyan pada Desember 25, 2009, 10:41:31 PM

Judul: Bikin AntiVirus Bersama
Ditulis oleh: shopyan pada Desember 25, 2009, 10:41:31 PM
Waktu dulu saya pernah masuk forum yang isinya mengembangkan AntiVirus bersama, dan anti virus itu open source, dibuat dengan visual basic 6.0, Tapi sekarang entah kemana forum tersebut hilang  :'( saya udah coba mengembangkannya. Begitu pula link download source codenya sudah gak ada dan AntiVirusnya pun udah gak pernah di update lagi.

Nah bagaimana kalau itu kita lakukan bersama, membuat antivirus bareng-bareng.  ^-^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Desember 26, 2009, 12:38:03 AM
knp gak gabung ama developer smadav aja ??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: 4d pada Desember 31, 2009, 02:05:21 PM
klo itu mah bikin av smadav bukanbersama bro =))
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Desember 31, 2009, 02:13:56 PM
Antivirus bersama,, spt AVGEN? daru vb-bego.com ??
klo opensource dikembangkan bersama,, indo gak cocok brooo,,
-masih ego (klaim milik sendiri)
-suka seenaknya (gak kompak kerjanya)
-gak bertanggung jawab (dilepas begitu aja)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Ryan BeKaBe pada Desember 31, 2009, 02:19:30 PM
Curhat ya kau Boot? Hahaha.... Tapi benar juga tuh kata Harboot. Kalau mau, yuk kita bikin Komunitas Baru. Terus bagi-bagi tugas deh, ada yang ngelola, kaki-tangan dsb. Ada yang mau jadi Kordinatornya? Monggo....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Desember 31, 2009, 05:33:27 PM
Seru tuh,ntar ada divisi programming,divisi advertising,divisi grafik,divisi virus searching,n divisi web control n design.

Msing2 divisi ada 4atau lbih,msti cpet trknal n uptodate bgt.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: shopyan pada Januari 07, 2010, 04:53:59 AM
bener juga sih kata om harbot...gak cocok di Indonesia  ;>

Tapi sekarang kita coba, gak semua orang Indonesia berfikiran seperti itu, alangkah baiknya kita coba, karena ane dah siap persenjataan code-code yang pasti mujarab nieh.....mulai dari scan virus dalam archive (Dengan kemampuan scan yang cepat), Apps Firewall  :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MathZ pada Januari 07, 2010, 05:04:46 AM
Antivirus bersama,, spt AVGEN? daru vb-bego.com ??
klo opensource dikembangkan bersama,, indo gak cocok brooo,,
-masih ego (klaim milik sendiri)
-suka seenaknya (gak kompak kerjanya)
-gak bertanggung jawab (dilepas begitu aja)
wah indonesia bangetz nih.
bener bangetz ga cocok dgn budaya indonesia.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MathZ pada Januari 07, 2010, 05:11:13 AM
bener juga sih kata om harbot...gak cocok di Indonesia  ;>

Tapi sekarang kita coba, gak semua orang Indonesia berfikiran seperti itu, alangkah baiknya kita coba, karena ane dah siap persenjataan code-code yang pasti mujarab nieh.....mulai dari scan virus dalam archive (Dengan kemampuan scan yang cepat), Apps Firewall  :-bd

hayo TS dulu yg mulai.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Ryan BeKaBe pada Januari 07, 2010, 06:49:38 AM
Nah TS (ap sh artinya TS, oot nh gw), kau di suruh mulai duluan, skalian saja kau yg koordinirnya.
Terserah mau bagi2 sourcenya di sini atau dimana.
Cari dulu rekan2 yg berminat, trus kirimi pesan undangan! :)
Dan yg pasti, project is number 1, pacaran gak boleh, n'tar gak konsen & bakal lama klo jadi, coz waktunya kebagi. :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: sonny pada Januari 07, 2010, 06:56:29 AM
Antivirus bersama,, spt AVGEN? daru vb-bego.com ??
klo opensource dikembangkan bersama,, indo gak cocok brooo,,
-masih ego (klaim milik sendiri)
-suka seenaknya (gak kompak kerjanya)
-gak bertanggung jawab (dilepas begitu aja)
siapa bilang mas harboot (vb-bego.com)? coba lihat cms dari codenesia.com (http://smadaver.com/antivirus-lokal-lainnya/cms-*-codenesia-malware-scanner/ (http://smadaver.com/antivirus-lokal-lainnya/cms-*-codenesia-malware-scanner/)) sampai sekarang masih dikembangkan. dan pengembangnya adalah programmer2 Indonesia yg berpengalaman. cms dibuat untuk membersihkan virus yg gak bisa dibersihkan av lokal lain (contoh sality, alman, virut, conficker). Dan proyek ini masih berjalan sampai saat ini :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 08:35:37 AM
Buat kepengurusan dlu,kita mulai membedah smadav rev.2 yg opensource,bgimana?
bisa dimulai?
yg berminat silahkan tinggalkan pesan.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 11:06:36 AM
Saya Minat Gan (Bantu Doa Ya Gan) Hehehehehehehe Bercanda

Bedah SmadAV Rev 2 Boleh Tuh Gan (Bedah Nya di Rumah Sakit Daerah Aja) Hihihihihi Bercanda

Trus Bikin Database Nya Pakai Database Yang Bikinan WAV Aja dulu Kalau Bagus Pakai Yang AV Import

Heruistic Nya Pakai SmadAV Yang Rev 7.5

Engine Pakai apa Saja Yang Penting Portable (Kayak SmadAV)

Bikinnya Pakai VB Aja

Cukup sekian Usul Dari Saya Semoga Membantu
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Januari 07, 2010, 11:25:36 AM
ya udah klo jadi gw team promosi aja,
atw bantu desain,,

atw buatin web-nya,, yg gratis aja dulu,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Januari 07, 2010, 11:37:54 AM
Betul jga th bro...
Aq mw aja sh..
Tapi cukup ngak anggota 2 orang...
Kalau kamu mau saya juga mau..
Kebetulan saya pembuat AV yg lumayan jadul..
 :-\ :-\ :-\ :-\
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 12:42:06 PM
W Bantuin Cari Nama Pewarnaan Dan Juga Mencari Apa Saja Yang Paling Basic Buat AV Ini
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Januari 07, 2010, 12:52:19 PM
yeee kalau mau buat antivirus jangan pake rombak.. but buat enginenya sendiri dari pertama... dengan itu develop kedepannya akan lebih baik
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: paladin pada Januari 07, 2010, 01:18:08 PM
yang penting kualitasnya ;D ;D ;D ;D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 01:26:09 PM
Jangan Pun Kualitas AV Tanpa Database Dan Heruistic Tinggi Akan Menjadi AV Yang Baik

Lebih Beik Mengandalkan Heruistic Karena :

1.Virus Itu Banyak Variantnya
2.Kalo Virus Itu Banyak Berapa Size Yang digunakan Untuk AV Itu
3.Update Nya Mungkin Mb Bukan Kb
4.Tanpa Heruistic Juga Percuma


Akan Lebih Baik Heruistic Yang Sangat Tinggi Tanpa Database Yang Banyak
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Januari 07, 2010, 01:29:43 PM
Jangan Pun Kualitas AV Tanpa Database Dan Heruistic Tinggi Akan Menjadi AV Yang Baik

Lebih Beik Mengandalkan Heruistic Karena :

1.Virus Itu Banyak Variantnya
2.Kalo Virus Itu Banyak Berapa Size Yang digunakan Untuk AV Itu
3.Update Nya Mungkin Mb Bukan Kb
4.Tanpa Heruistic Juga Percuma


Akan Lebih Baik Heruistic Yang Sangat Tinggi Tanpa Database Yang Banyak
heuritc and yang didatabase itu berbeda bro so keduanya penting gak ada yang dikurangin and ditambah :P
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 01:39:16 PM
Jangan Pun Kualitas AV Tanpa Database Dan Heruistic Tinggi Akan Menjadi AV Yang Baik

Lebih Beik Mengandalkan Heruistic Karena :

1.Virus Itu Banyak Variantnya
2.Kalo Virus Itu Banyak Berapa Size Yang digunakan Untuk AV Itu
3.Update Nya Mungkin Mb Bukan Kb
4.Tanpa Heruistic Juga Percuma


Akan Lebih Baik Heruistic Yang Sangat Tinggi Tanpa Database Yang Banyak
heuritc and yang didatabase itu berbeda bro so keduanya penting gak ada yang dikurangin and ditambah :P



Coba Aja Bandingin PC-Media Antivirus Dengan SmadAV size Banyak Mana Database Banyak Mana Heruistic Tinggian Mana
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 02:27:21 PM
Jangan Pun Kualitas AV Tanpa Database Dan Heruistic Tinggi Akan Menjadi AV Yang Baik

Lebih Beik Mengandalkan Heruistic Karena :

1.Virus Itu Banyak Variantnya
2.Kalo Virus Itu Banyak Berapa Size Yang digunakan Untuk AV Itu
3.Update Nya Mungkin Mb Bukan Kb
4.Tanpa Heruistic Juga Percuma


Akan Lebih Baik Heruistic Yang Sangat Tinggi Tanpa Database Yang Banyak
heuritc and yang didatabase itu berbeda bro so keduanya penting gak ada yang dikurangin and ditambah :P



Coba Aja Bandingin PC-Media Antivirus Dengan SmadAV size Banyak Mana Database Banyak Mana Heruistic Tinggian Mana


Sekarang bagi tugas dulu aja,jangan komentar doang,kita ga butuh komentar,tapi butuh realisasi.
skrng bahas dulu,siapa yang mau ikut n serius gabung.
kedua kita mau buat dari VB,C++ APA DELPHI?
pkirin mateng2 basicnya !
jangan cuma komentar.
skrng jawab dlu yang mau gabung pertanyaan gw.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: andika261291 pada Januari 07, 2010, 03:28:41 PM
gw mw ikut..tp g bsa ngpa ngpain..dari vbasic aja..kali aja gw bs bntu klo pke vb..
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 03:35:27 PM
Pakai Visual Basic Aja Kali Ya (Saya Bantu Apa Ya)

1 Lagi Yang Penting Ada Yang Punya VB 6 Ga Tolong Kasih Link Plisss Butuh Banget !
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 04:23:30 PM
Gini aja bagi yang berminat tulis :
Nama(nick forum&asli) :
email :
Website/blog :
Pekerjaan :
Keahlian(pemrograman vb/c++/assembly/desain&grafis) :
Ingin menjabat sebagai :
Kota asal :
Alasan :


tapi kira2 mas zai marah ga ya kalo kita numpang disini sbg base camp?
nanti kalo udah kebentuk susunannya bisa tinggal bagi tugas dan dirapatkan,trims. :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 04:29:11 PM
Gini aja bagi yang berminat tulis :
Nama(nick forum&asli) :
email :
Website/blog :
Pekerjaan :
Keahlian(pemrograman vb/c++/assembly/desain&grafis) :
Ingin menjabat sebagai :
Kota asal :
Alasan :


tapi kira2 mas zai marah ga ya kalo kita numpang disini sbg base camp?
nanti kalo udah kebentuk susunannya bisa tinggal bagi tugas dan dirapatkan,trims. :)

Kirimnya Via PM ato Bukan Gan
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 06:47:36 PM
Gni aja,Q agak ga enak ma mas zai nih,mending buat basecamp sndri dlu dmna gtu kek?
ntar Q buatin basecamp sderhana alamatnya nyusul.
Siap2 jdi pkerja freelancer nih.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: andika261291 pada Januari 07, 2010, 07:02:07 PM
Gni aja,Q agak ga enak ma mas zai nih,mending buat basecamp sndri dlu dmna gtu kek?
ntar Q buatin basecamp sderhana alamatnya nyusul.
Siap2 jdi pkerja freelancer nih.
blh tuh usulnya....siaap..hha..ditunggu basecampnya bos...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 07:07:23 PM
yg pasti dsni rencana Qta bkan ngoprek source code orng lho,tpi build dri awal n ide sndri.
Klo ngoprek mah bkan produk sendiri itu mah.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 07:13:00 PM
yg pasti dsni rencana Qta bkan ngoprek source code orng lho,tpi build dri awal n ide sndri.
Klo ngoprek mah bkan produk sendiri itu mah.

Setuju gan Kalo Ngoprek Kan Cuma Buat Contoh Duankz Kan Mas saya Ndak Ngerti Soalnnya
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 07:18:35 PM
Btuh patner pemrograman juga neh,ayo yg bisa dibidang pemrograman klo berminat silahkan gbung.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 07:23:11 PM
Ajak Mas Harboot , Mas Kido , Mas Joris Aja Kali Aja Dia Tau Tuh Tentang Pemrograman
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 07, 2010, 07:29:18 PM
Jangan,kan mrka udh ada di divisi smadav,ga enak m mas zai.
Coba deh Q ajak yg emg bisa n minat gabung atas keinginan sndri aja.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 07, 2010, 07:31:04 PM
Iya Juga Sih Meraka Sudah Di Divisi SmadAV Ya Udah Aku Cari Yang Lain


Bagaimana Siapa Aja Yang Sudah Gabung ?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 08, 2010, 03:01:15 AM
Hayuk aku ikt pemrograman dah. Pake bhs apa tp?
Msng" punya kekurangan.
VB=> PAKE RUNTIME
C++=> PASTI ADA DLL SENDIRI. Kyk Ansav
DELPHI=> UKURAN'A JADI GEDE. Kyk PCMAV

saran pake vb-lost. Alias pengalihan fungsi runtime.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 08, 2010, 08:52:55 AM
Klo vb-lost databasenya msi nyatu ke .exe apa terpisah?
mending buat yg databasenya trpisah,biar klo update mingguan gampang,klo upgrade revisi bisa 2bln skali ato gmna gtu.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 08, 2010, 09:12:27 AM
Klo vb-lost databasenya msi nyatu ke .exe apa terpisah?
mending buat yg databasenya trpisah,biar klo update mingguan gampang,klo upgrade revisi bisa 2bln skali ato gmna gtu.

Setuju Gan Jadi Kalo Update Kayak Morphost Cuma Update Database Aja Engine nya Gak Usah
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Januari 08, 2010, 10:26:17 AM
Bahas fitur2nya dulu,,
tulis di post 1,,
lalu rame2 cari codingnya,,
satukan, beres deh,,

ada team viser,,
ngumpulin checksum virus,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 08, 2010, 11:25:05 AM
Saran dari wisnoe :
-RTP
-HEURISTIC SCAN
-QUARANTINED
-REGISTRY REPAIR
-KILLER OBJECT

dasarnya buat itu dlu,jgn yg ribet2.
SC nya saya bntu fitur RTP nya,untuk enginenya pkir bareng2...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Januari 08, 2010, 12:16:21 PM
Saya kebetulan ada AV buatan saya..
Tapi ada masalah soal sisitem RTPnya lom ada.
Dan msh jadul tampilannya
Saya butuh sukarelawan yg ngerti dan yg awam utk membuat AV open source
Kalau ada yg minat kirim lewat PM biar saya selesaikan programmingnya
 :-\ :-\ :-\ :-\
Masih 94% pembuatnnya tggal 6% lagi...
Ne saya mau buat situsnya dari blogger aja...
Hehehehe  ;D ;D ;D
Tpi comingsoon, kalau anggota dh siap dan semua memadai akan saya kasih tahu kq
Oke
 :-X :-X :-X :-X
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Yudh pada Januari 08, 2010, 12:18:43 PM
@Wisnoe:

wahh ada project AV baru nih....aku dukung :-bd... , klo dah jadi AV nya...bikin situs/web nya ya...dan sediakan tempat Buat Upload Virusnya..

Pasti aku akan nyumbang kasih Sampel-sampel virus lokal n luar... ;) :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 08, 2010, 12:37:26 PM
Q bisa buat rtp,tpi syangnya udh Q desain buat av buatan bersama ini,disini saya btuh kerjasama,bukan nglanjutin ato ngoprek av orang.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 09, 2010, 12:24:40 PM
@mas wisnu: terpisah trus di encryt gmana?
Db'a yg code ku simple bgt ntar dah. Belum di upload.

Btw mw pake db apa? Sql or apa?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 09, 2010, 01:35:25 PM
Db terserah juragan aja,klo yg mudah dibaca ya SQL.
Ni Q lg ngumpulin checksum crc32 ma md5nya,klo udh dpt bnyk Q gbungin,scannernya mw gmna?
Apa pake vb.6 ku aja yg nganggur?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Januari 09, 2010, 03:46:37 PM
Ya Sudah Buat Pakai VB aja Nanti Kalo Virus W Upload Ke Sini Nanti W Cari Variant Yang Bagusan
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 09, 2010, 06:10:43 PM
Oke,ni scannernya sapa yg mw buat,bro lucif udh DB,gw RTP.
Ayo yg lain.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 10, 2010, 04:40:53 PM
@mas wisnu: sample db ada di av qu. liat dulu. mungkin masih jelek. tapi aku minta tolong dengan sangat sekalian di test ni av ku ya mas  ^:)^ maklum aku kan masih newbie gmanaa... gtu.... hehehe....  :D

nie link'a : http://xit-blogs.webs.com/smantav/SmantAV32_1.0.5.0.Rar (http://xit-blogs.webs.com/smantav/SmantAV32_1.0.5.0.Rar)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 10, 2010, 06:27:52 PM
haduh,harus lepas piaraanku ini,yawdah bentar tak test yang nyatol berapa ekor. :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 10, 2010, 07:06:00 PM
Hehe... Kren mas wisnu peliharaannya vrus. Hehe....

Matur suwun sanget yo mas...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Duke pada Januari 11, 2010, 01:06:48 PM
Db terserah juragan aja,klo yg mudah dibaca ya SQL.
Ni Q lg ngumpulin checksum crc32 ma md5nya,klo udh dpt bnyk Q gbungin,scannernya mw gmna?
Apa pake vb.6 ku aja yg nganggur?

mau nanya ni,
av yang mau dibuat av yang pake installer ato protable?

cuman masukkan, kalo pake database sql nanti av-nya nga bisa portable kayak smadav,pcmav, & av lokal laennya. jadi harus installer kaya AVG, Norton & laen2. trus nanti perlu install SQL juga... wah.. repot...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 11, 2010, 08:28:57 PM
Db terserah juragan aja,klo yg mudah dibaca ya SQL.
Ni Q lg ngumpulin checksum crc32 ma md5nya,klo udh dpt bnyk Q gbungin,scannernya mw gmna?
Apa pake vb.6 ku aja yg nganggur?

mau nanya ni,
av yang mau dibuat av yang pake installer ato protable?

cuman masukkan, kalo pake database sql nanti av-nya nga bisa portable kayak smadav,pcmav, & av lokal laennya. jadi harus installer kaya AVG, Norton & laen2. trus nanti perlu install SQL juga... wah.. repot...

emm... Stau ku bisa deh. Kan cuma pake tbel sql'a. Trus di koneksi pake odbc kalo tak salah. Nanti di script'a di manipulasi connection strin'a jd bsa by pass dri sql.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 11, 2010, 08:33:05 PM
Db terserah juragan aja,klo yg mudah dibaca ya SQL.
Ni Q lg ngumpulin checksum crc32 ma md5nya,klo udh dpt bnyk Q gbungin,scannernya mw gmna?
Apa pake vb.6 ku aja yg nganggur?

mau nanya ni,
av yang mau dibuat av yang pake installer ato protable?

cuman masukkan, kalo pake database sql nanti av-nya nga bisa portable kayak smadav,pcmav, & av lokal laennya. jadi harus installer kaya AVG, Norton & laen2. trus nanti perlu install SQL juga... wah.. repot...

emm... Stau ku bisa deh. Kan cuma pake tbel sql'a. Trus di koneksi pake odbc kalo tak salah. Nanti di script'a di manipulasi connection strin'a jd bsa by pass dri sql.

serah lu de cif masalah database,pokonya harus jalan yak kalo digabung ma engine scannernya vb.6 nya,wkwkwkwk. . .
rtp udah ajalan,scanner aku cek masih layak pakai,tinggal karantina,layout,logo ama gabungin ma database.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 11, 2010, 08:39:12 PM
Ocre deh bos.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Januari 11, 2010, 08:50:20 PM
lah kok pake sql segala ?? and kok ada odbcnya ?? :O :O :O

gini bro gue saranin check and richeck dulu tentang structur data and how implement...

misal data yang disave itu formatnya kek gini virusname:hash contohnya :

- save data to file ( compres and crypted )
- add header ke databasenya misal : jumlah signature,tanggal release and lain2

procces load :
- decrypt and decompress
- parsing database and add  to ( anda bisa implementasikan binary trie / hashlist / atau integerlist)
- sorting data biar teruurut

Process pencarian ntar :
- anda gunain deh methode binary search ( cari google about it ) dijamin cepat ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 11, 2010, 08:54:26 PM
lah kok pake sql segala ?? and kok ada odbcnya ?? :O :O :O

gini bro gue saranin check and richeck dulu tentang structur data and how implement...

misal data yang disave itu formatnya kek gini virusname:hash contohnya :

- save data to file ( compres and crypted )
- add header ke databasenya misal : jumlah signature,tanggal release and lain2

procces load :
- decrypt and decompress
- parsing database and add  to ( anda bisa implementasikan binary trie / hashlist / atau integerlist)
- sorting data biar teruurut

Process pencarian ntar :
- anda gunain deh methode binary search ( cari google about it ) dijamin cepat ;)

sepertinya bro meong benar,untuk sql tidak dapat dibuat portable,kalo mau tau smadav terkenal karena apa?
soalnya smadav itu satu file dan sangat simpel untuk dipindahkan,kalo terdiri dari berbagai part lumayan susah dan malah bisa2 kena virus salah1 n ga jalan.

kalo bro meong mau mari sama2 buat AV disini,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 11, 2010, 08:58:15 PM
Iya jga ci.
Ya nanti ku teliti lagy. Mungkin tadi aku ada yg salah x ya penjelasannya. Hehe... Muv ya para bos.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Januari 11, 2010, 09:00:46 PM
klo mau database tetep terpisah sama induk,,
tp saat dipaket masukkin saja dalam tubuh induk, lalu ekstrak keluar,,
klo update tinggal download databasenya aja, timpa database lama, beda dgn upgrade
upgrade, perbaharui engine AV,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 11, 2010, 09:03:53 PM
klo mau database tetep terpisah sama induk,,
tp saat dipaket masukkin saja dalam tubuh induk, lalu ekstrak keluar,,
klo update tinggal download databasenya aja, timpa database lama, beda dgn upgrade
upgrade, perbaharui engine AV,,
semacam dimasukan dalam module Visual Basic bgitu mas?
itu yang atas double tolong dihapus 1.
trims  :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: lucifiarX pada Januari 11, 2010, 09:17:03 PM
Muv bos saya pake hp.

Oiya maksud'a ntu berarti di taro di res file. Kalo tak mw di install di ekstrak ke folder temp. Tp kalo di install di ekstrak ke folder installanya jadi bsa update kalo install ajah gtu yak.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: obun pada Januari 11, 2010, 11:31:04 PM
Kalo mau pake tenik CRC32 aku ada contoh AV_nya di :
tahara.wordpress.com
Silahkan dikembangkan AV itu versi portable blm pas disebut AV tapi sebagai remover biasa. (awalnya cuma ikut2an bikin AV)

Mudah2an dengan banyaknya AV semakin berkurang virus_nya.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Januari 12, 2010, 01:01:57 AM
lah kok pake sql segala ?? and kok ada odbcnya ?? :O :O :O

gini bro gue saranin check and richeck dulu tentang structur data and how implement...

misal data yang disave itu formatnya kek gini virusname:hash contohnya :

- save data to file ( compres and crypted )
- add header ke databasenya misal : jumlah signature,tanggal release and lain2

procces load :
- decrypt and decompress
- parsing database and add  to ( anda bisa implementasikan binary trie / hashlist / atau integerlist)
- sorting data biar teruurut

Process pencarian ntar :
- anda gunain deh methode binary search ( cari google about it ) dijamin cepat ;)

sepertinya bro meong benar,untuk sql tidak dapat dibuat portable,kalo mau tau smadav terkenal karena apa?
soalnya smadav itu satu file dan sangat simpel untuk dipindahkan,kalo terdiri dari berbagai part lumayan susah dan malah bisa2 kena virus salah1 n ga jalan.

kalo bro meong mau mari sama2 buat AV disini,

mau2 aja sih bro cuman gue codingnya didelphi. so untuk membantu gue support dari belakang aja yahhh ;)

harbot : yup bisa dimasukin and ada banyak cara menuju roma, example resource,section or eof ;)

sekedar saran untuk semua yang lagi dev antivirus :
- pertama harus tentuin tujuan and temanya (seperti kalau ngarang lagu :P)
- kedua coba catat semua feture2 yang anda akan masukkan
- ketiga dari semua feture yang dimasukkan pecah2 menjadi bagian-bagian terkecil example :
 
Kode: [Pilih]
feture Fast Engine:
- hash
- bytecheck
- smalmemory

Hash : using binary trie/integerlist/hashlist
bytecheck  : using boyeermore/aho corasick/ wu manber
keempat : coba dari semua list yang telah ditulis diimplementasikan dalam bentuk snippet [potongan code] or pseucode
kelima : start codinggg
keenam : good luck ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Januari 12, 2010, 06:14:30 PM
Ya sudah bahas fitur2 aja dulu sertakan potongan kodenya juga,,
jgn lupa pakai tag [ c o d e ] supaya rapiiih,,

kepala project yg nyatuin semuanyaaa,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Wisnu Pramudya pada Januari 12, 2010, 07:55:24 PM
RTP UDAH JADI,ENGINE SCANNER DIBUAT TAPI BELUM SEMPURNA,AYO CIF UDAH JADI BELOM DATABASENYA,KALO UDAH EMAIL KE GW recxilla@gmail.com . :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Darkness Rune pada Januari 12, 2010, 10:05:12 PM
kalo gitu apa guna smadav?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Januari 12, 2010, 11:07:36 PM
@atas,,
ini diluar smadav,,
cuman iseng2 ajaaa,,

@all,,
mana kodenyaaa,,
mana tau gw bisa bantu2 koding,, heheee
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: shopyan pada Pebruari 21, 2010, 02:11:53 PM
Wah ini project dah jalan ye.... ??? koq gw gak diikut sertaiin sih  :'(

padahal Engine handal sudah siap meluncur nieh..........

Gw bisa bantu apa nieh.....??? Pembuatan web forum kah ? atau apa ?



http://www.shopyan-blogs.co.tv (http://www.shopyan-blogs.co.tv)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 21, 2010, 10:59:04 PM
mank uda jalan??
berhenti tengah jalan malah,,
post terakhir gw januari 12,, gak ada kelanjutan ???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: shopyan pada Pebruari 22, 2010, 11:07:51 AM
mank uda jalan??
berhenti tengah jalan malah,,
post terakhir gw januari 12,, gak ada kelanjutan ???

Walah koq berenti ditengah jalan gitu sih  :-\
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 22, 2010, 11:42:20 AM
gmn kelanjutannya niih??

kita mulai dari ketua ajaaa,,
sapa ketuanya, biar dia yg mikir kedepannyaaa,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: CycLopz pada Pebruari 22, 2010, 01:42:52 PM
kelanjutan nya mana nich ???

kuq berhenti dsni sich ???

Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Pebruari 22, 2010, 02:06:52 PM
Ikut yaa,, VB 6.0, user baru nii
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 22, 2010, 06:42:00 PM
wah gw baru tau ada thread ginian... :-bd :-bd
gw ikutan dung.. jadi Optimaze coder atopun Interface coder boleh..

cemana nih kelanjutannya....????  ??? ??? ???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 22, 2010, 07:33:05 PM
buat AV yg komplit aja,,
size 3-4 Mb gak masalah lah,
database external,,

komplit dalam arti banyak fitur,,
jadi uda dgn 1 AV ini udah cukup byk menggantikan fungsi2 software lain spt CCleaner, AntiPorn, dll..
gmn?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 22, 2010, 09:30:32 PM
kapan nih mulainya bro Harboot.... 8) 8)
gw kok kagak tau..
malah kesannya kok jalan sendiri....
katanya mao buat antivrus bersama.... :-\ :-\ :-\
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 22, 2010, 10:02:41 PM
gw gak tau sapa yg buat duluan,,
mending pilih ketua dulu,,

lalu kita bahas :

pertama, scan engine dan database
kedua, heuristik
ketiga, fitur2 tambahan,,

klo uda jalan baru bahas desain dan promosi,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Qie.aja pada Pebruari 22, 2010, 11:14:44 PM
Q jg ikut ngramein ah,, jd cadangan aja :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Pebruari 23, 2010, 10:50:06 AM
Segera dimulai aja  :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 23, 2010, 07:16:34 PM
iya segera dimulai aja....
bentuk panitianya....

cemana nih bos harboot...??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 23, 2010, 08:00:02 PM
Wah, mw gbung tp gw nggk bs apa2. Jd suporter ajalah, maklum msih Newbie :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 23, 2010, 08:10:42 PM
b_agoy,,
tidak ada yg tidak berguna,,

kan kita butuh team promosi, team web, team blaablaaa,,

yg penting sapa dulu neh ketua team?
yg bs program-lah,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 23, 2010, 08:28:25 PM
@harboot: saran gw yg jadi ketua team gak harus yg bisa pemrograman (bidang laen juga boleh)
yg penting  ketua team bisa memimpin dan mengkoordinasi anggotanya.. dimana/kapan ngumpulnya, apa yg mesti dilakukan.... ketua yg mengkoordinir.... lebih bagus ketua nya yg dah lama eksis dan banyak kenal dengan anggota yg laen seperti bro harboot :-bd :-bd :-bd
..... ini sih cuma saran gw...

dari gw bisa VB6 bidang Optimaze coder atopun Interface coder boleh... <=) <=)

hayooooo bagaimana yg laen....???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 23, 2010, 08:55:04 PM
@Up:
Okelah,,,, :D

Hayo sapa yg bersedia???
Ntar qt voting yah..... :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 23, 2010, 09:22:25 PM
Sya boleh ikut ngk________
Program AV sya lom bsa diluncurkan, msh mencari bugnya pda windows 7_____

Asalkan kita semua ne harus semangat____
 :-bd :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 23, 2010, 09:43:27 PM
Up: boleh.. kita ramein aja... :-bd :-bd

untuk langkah pertama kita pilih ketua team dulu....
tugas ketua team memimpin dan mengkoordinasi anggotanya.. dimana/kapan ngumpulnya, apa langkah pertama yg mesti dilakukan...membuat planning, membagikan tugas kepada anggota laen...dll

Ayo ada saran siapa yg jadi ketua team...?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 23, 2010, 09:49:05 PM
ya klo kita buat AV bersama,
bug bs kita cari bersama, promosi bersama, coding bersama,,

jangan gw deh,,
gw bantu2 aja,,

siapa yg bs meluangkan waktu byk tuk project ini?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 23, 2010, 09:51:25 PM
@ChazSD:
Km aja gmna?? :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 23, 2010, 09:55:28 PM
Tugas :
1. Pilih Ketua dan Team
2. Nama AV untuk nantinya
3. Rancang Engine AV dan database
4. Bahas Heuristik
5. Fitur2 tambahan
6. Desain AV
7. Promosi (web/blog)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 23, 2010, 10:47:30 PM
@ChazSD:
Km aja gmna?? :-bd
di post belakang ada bro Wisnoe Pramoedya 'n Astbat.... ajak mreka skalian....
keliatannya  bro Wisnoe Pramoedya dah buat RTP-nya.... tapi gimana kabarnya ya..??
bro FAKHRICKER keliatannya smangat juga tuh...... :x :x

gimana kalo tentuain dulu ketua team ama anggotanya....
biar kalo ol...bisa sma2 skalian..... jadi bahasnya lebih enak gitu.....
jangan kayak skarg... sepotong2 doang....
ayo dimulai.... monggoo mang....... <=) <=) <=)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 23, 2010, 11:38:52 PM
ya udah lw aja ketuanya,,
chazSD,,

lalu berikutnya apa??

upload aja engine AVnya,,
kita tes dulu yg mana yg akan kita gunakan,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Pebruari 25, 2010, 02:56:02 PM
pake md brapa???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: noyfb pada Pebruari 25, 2010, 03:02:15 PM
dah sampai page 9, yang ada kebanyakan ngomong aja... codingnya kapan? :D
*peace*
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MiloMen™ pada Pebruari 25, 2010, 03:11:31 PM
ya udah lw aja ketuanya,,
chazSD,,

lalu berikutnya apa??

upload aja engine AVnya,,
kita tes dulu yg mana yg akan kita gunakan,,
Kamu aja boot ketuanya, semua pasti pada setuju :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 25, 2010, 05:26:51 PM
ya udah lw aja ketuanya,,
chazSD,,

lalu berikutnya apa??

upload aja engine AVnya,,
kita tes dulu yg mana yg akan kita gunakan,,
Kamu aja boot ketuanya, semua pasti pada setuju :)
cocok tuh, gw stuju bro harboot jadi ketua, bagaimana yg laen?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 25, 2010, 11:35:28 PM
haaa,, ketua tuh harus yg punya byk waktu tuk project iniii,,
dan yg minimal bs program2 getuh,, yg punya wawasanlah,,

atw gak usah ketua aja,, keputusan tertinggi ditangan rapat anggota,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 12:16:30 AM
haaa,, ketua tuh harus yg punya byk waktu tuk project iniii,,
dan yg minimal bs program2 getuh,, yg punya wawasanlah,,

atw gak usah ketua aja,, keputusan tertinggi ditangan rapat anggota,,

Iya juga sih..... :-\ :-\ :-\
gw nya aja bisa ol dari jam 8 malam sampe jam 3 ato 4 pagi ( =)) =)) =)) =)) kelelawar mode on)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: maskuncoro pada Pebruari 26, 2010, 02:10:45 AM
Keren juga tuh. Sayang, aku ga ahli dalam hal ini... Ikut bantu doa saja...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 08:53:16 AM
shopyan kemanaaa??
yg punya ide uda kabuuur,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MiloMen™ pada Pebruari 26, 2010, 08:56:00 AM
shopyan kemanaaa??
yg punya ide uda kabuuur,,,
Pusing kali boot, hal seperti ini tidak mudah dilakukan kalo tidak serius. :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 09:01:32 AM
ya begitula,,
ini aja uda mulai gak jelaz kelanjutannya,,
gw tadinya niat support,,

klo ketua, gak kuat,, ane sedang skripsii,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: h3ndr@fum! pada Pebruari 26, 2010, 10:23:36 AM
wah bingung bikin antivirus....

klo bikin virus..susah2 gampang...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 10:32:14 AM
gmn klo buat situs informasi virus aja??
atw type blog getuh kelola bersama??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: h3ndr@fum! pada Pebruari 26, 2010, 10:33:33 AM
yupz ide yang mantap tuh...  :-bd :-bd

                           :-X :-X :-X :-X :-X :-X
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 10:39:04 AM
lebih enakz buat BLOG,,
mudah ngaturnya,,
isinya info viruz dan macam2nyaaa,,

klo mau sejalan dgn pengembangan AV juga gak berat,,
tp klo AV jujur,, ane gak bs program,, ane bs VB gak expert.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 11:16:43 AM
lebih enakz buat BLOG,,
mudah ngaturnya,,

isinya info viruz dan macam2nyaaa,,

klo mau sejalan dgn pengembangan AV juga gak berat,,
tp klo AV jujur,, ane gak bs program,, ane bs VB gak expert.
sejalan dengan buat antivirus juga bro.... oke...
gw lagi komunikasi ama bro FAKHRICKER...( tapi blom nyinggung ke pembuatan Antivirus sih)...
moga aja dia mao ikutan project...
soale gw lagi sibuk juga kayak bro Harboot (lagi buat skripsi).. makanya gw bisa ol cuma malem...
ini ol pun karena libur ... :P :P :P

jgn putus harapan dong oke.... cari juga rekan2 yg laen yg bisa pemrograman, design grapis, ato yg laennya yg punya niat tulus dan ikhlas utk membantu..... :-bd :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Astbat pada Pebruari 26, 2010, 02:38:32 PM
wah kayak nya gak jadi Baru Muncul Sekarang Nih Ane
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 02:46:54 PM
@ChazSD:
Km aja gmna?? :-bd
di post belakang ada bro Wisnoe Pramoedya 'n Astbat.... ajak mreka skalian....
keliatannya  bro Wisnoe Pramoedya dah buat RTP-nya.... tapi gimana kabarnya ya..??
bro FAKHRICKER keliatannya smangat juga tuh...... :x :x

gimana kalo tentuain dulu ketua team ama anggotanya....
biar kalo ol...bisa sma2 skalian..... jadi bahasnya lebih enak gitu.....
jangan kayak skarg... sepotong2 doang....
ayo dimulai.... monggoo mang....... <=) <=) <=)
Kalau gw sh oke2 aja______
Gimana kalau AV gw yg kalian test_______
Tpi msh dlam pengkodingan_____
maknya sya need bgt VB 6.0 yg non portabel dan bsa buka file ekstensi .frm, .frx, dan lain - lain
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 02:51:53 PM
@ChazSD:
Km aja gmna?? :-bd
di post belakang ada bro Wisnoe Pramoedya 'n Astbat.... ajak mreka skalian....
keliatannya  bro Wisnoe Pramoedya dah buat RTP-nya.... tapi gimana kabarnya ya..??
bro FAKHRICKER keliatannya smangat juga tuh...... :x :x

gimana kalo tentuain dulu ketua team ama anggotanya....
biar kalo ol...bisa sma2 skalian..... jadi bahasnya lebih enak gitu.....
jangan kayak skarg... sepotong2 doang....
ayo dimulai.... monggoo mang....... <=) <=) <=)
Kalau gw sh oke2 aja______
Gimana kalau AV gw yg kalian test_______
Tpi msh dlam pengkodingan_____
maknya sya need bgt VB 6.0 yg non portabel dan bsa buka file ekstensi .frm, .frx, dan lain - lain

di tes sih oke2 aja... tapi bagaimana dengan Label "Antivirus Bersama" -nya....
maksud dari Bikin Antivirus Bersama adalah membuat suatu anti virus secara bersama2 dengan berbagai kontribusi dari rekan2 yg laen dengan sedikit menanggalkan Label yg namanya ke-Ego-an kita... bagaimana bro..?? :-\ :-\ :-\
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 03:00:39 PM
@^": Oke juga namanya
Kasih tambahan ya
hehehe
 :D :D :D
Gimana kalau " FAV " Lebih simple yg kepanjangannya Friends Anti Virus
Atau BAV ( Bersama ANti Virus )
Atau
Digit Defender ANtivirus
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 03:14:35 PM
@^": Oke juga namanya
Kasih tambahan ya
hehehe
 :D :D :D
Gimana kalau " FAV " Lebih simple yg kepanjangannya Friends Anti Virus
Atau BAV ( Bersama ANti Virus )
Atau
Digit Defender ANtivirus
Soal nama gampang.....
sekarang soal susunan pemainnya (halllah bahasanya tuh...) bagaimana..?
Di Programming ada bro FAKHRICKER dan gw... di design graphic ada bro harboot....(mau gak ya bro harboot-nya).. :-* :-*
nah skrg kita tunggu pendapat kepala preman a.k.a bro harboot..... :D :D
bagaimana pendapat yg laen...??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 03:22:13 PM
@^: Yh bagian programming
Bukannya ngk mau sh_____
tpi sya nanti takut buat kalian menyesal_____
Sya lom mahir kali utk bahasa programming____
Maklum sya belajar VB 6.0 dri sendiri___
Dan sya msh skul klas 2 SMA ne_____
 :'( :'( :'( :'(
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 26, 2010, 03:25:35 PM
@Up:
Nggk jd mslh yg ptg niat :) :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 03:31:04 PM
@^: Thx atas pengertiannya_______
baiklah sya akan berusaha sebisa saya_______
 \m/ \m/ \m/ \m/
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 03:31:35 PM
@FAKHRICKER: namanya aja AntiVirus Bersama... ya kita buat bersama2 ... belajar 'n sharing bersama2 juga....
nah tuh bro b_agoy juga ikutan ya....? ^-^ ^-^

jgn mau kalah bro ama Morphost Antivirus bro... yg buat ntuh alumni Smansa Medan lo... (panas-panasin dikit >=) >=))

skrg dia (Morphic) kul di FK USU... denger2 bro b_agoy juga kul di kedokteran kan? nah pas kali kan (panas-panasin dikit  >=) >=) >=))
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 04:18:08 PM
@^: Oke thx  ya mas ats pemanasannya________
 ~x( ~x( ~x( ~x(

hehehehe
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 05:24:56 PM
mari kita mulai,,
pertama upload dulu engine awal yg akan kita gunakan,,
FIX dgn VB,, terserah engine darimana,, yg jelas yg open source bukan curian,,

nanti kita bedah dan edit,, gmn?

---------------------------------------------

tp yakin kita buat AV yg open source?
dishare di forum berarti bs di bajakz siapapun,,

klo professional sih gak takut dibajak,,
klo takut,, LINUX gak bs maju,, he2  :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 05:36:16 PM
@Up: oke bro... gw lagi komunikasi ama bro... FAKHRICKER ... :-\ :-\
tunggu aja upload-nya....
dari sinyal-nya sih... kayaknya bakalan ngembangin FAV (Fakhricker Antivirus).... tapi ini blom fix lo..... 8) 8)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 26, 2010, 05:40:03 PM
@ChazSD:
Hihihi...
Gw mah emg kalah jauh bgt dr dy. Aq nggk kenal yg namanya pemrograman  ;>
Tp okelah gw bntu yg lain mngkin promosiin atau ngasih2 masukan gt hehe :D :D
Atau yg lainnya sebisa gw... :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 05:47:35 PM
Seru tuh,ntar ada divisi programming,divisi advertising,divisi grafik,divisi virus searching,n divisi web control n design.

Msing2 divisi ada 4atau lbih,msti cpet trknal n uptodate bgt.

@b_agoy: bro Wisnoe Pramoedya mana ya.... dia yg ngasih ide utk bagi2 divisi kok skrg jarang keliatan? ??? ???
Programming:..............................FAKHRICKER
Advertising:.......................
Design graphic:..................................
Virus hunter:....................................
Web Control 'n Design (tempat mangkal kita):................................

ada ide siapa2 aja di posisi tersebut.... :-\ :-\ :-\
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 26, 2010, 05:52:03 PM
Iya tuh, jarang OL skrg dy...
Ini jdnya sp aja yg gbung?? ???
Mngkin gw pnya ide :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 06:18:42 PM
Iya tuh, jarang OL skrg dy...
Ini jdnya sp aja yg gbung?? ???
Mngkin gw pnya ide :D :D
apa idenya bro....
yg pasti di team: bro harboot, FAKHRICKER, gw, b_agoy ( ;) ;)  ;)...) ... sapa lagi ya yg serius.... ??? ???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 26, 2010, 06:33:04 PM
@Up:
Programming => Fakhricker
Design Graphic => Jls Harboot
Web Control => Kyaknya Wisnu nih (Cb gw hbngin dy dlu)
Nah, tnggl Virus hunter ma Advertising. Lu yg mana bro? hehe...
Ni cm ide doang. Gmna kawan2?? :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 06:47:16 PM
@Up:
Programming => Fakhricker
Design Graphic => Jls Harboot
Web Control => Kyaknya Wisnu nih (Cb gw hbngin dy dlu)
Nah, tnggl Virus hunter ma Advertising. Lu yg mana bro? hehe...
Ni cm ide doang. Gmna kawan2?? :D

nah kalo soal berburu/Hunting di gw aja 8) 8) ..Virus Hunter--- entar gw kluarin koleksi gw ... ups cencored  >=) >=)
gw juga bisa programming tapi bidang optimazed coder 'n interface coder...

eh BTW bro a_goy gimana kalo basecamp project ini kita pindahkan ke recxilla.... bilang ama bro wisnu boleh gak?
biar skalian kita ramein disana?...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 26, 2010, 07:06:20 PM
Seep2....
Ntr gw bilangin ma bro Wisnu deh :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 08:08:17 PM
@^: All sekarang kendala yg sya alami cuma kompi sya ngk ada VB 6.0
Ad ngk anak medan yg rela ngantarin CD master ke skul sya di jalan H.M Joni
nma skul sya SMA HARAPAN 2 MEDAN disamping museum negeri______

Kalau download nampaknya agak susah, kalau dari ziddu_________

Sya harap ada relawan demi kelancaran AV kita bersama_________
 ^:)^ ^:)^ ^:)^ ^:)^ ^:)^ ^:)^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 08:25:15 PM
@Up: link nya dah dikirim di FB kamu... coba cek...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 26, 2010, 09:15:34 PM
@^: Ywdh thx ya mas

lama bgt Sampe 4 mggu_______
 ;D ;D ;D ;D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 09:38:17 PM
@FR,,
masa dimedan gak ada jual CD siih??
ya sutraaa,, pakai portable 10mb juga cukup koq,,
mank kita pakai komponen luar yaaa??

Mending sample engine upload dulu,,
kita bedah program bersama,, gmn?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Pebruari 26, 2010, 09:40:37 PM
blh ikutan gk gan?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 10:03:25 PM
@FR,,
masa dimedan gak ada jual CD siih??
ya sutraaa,, pakai portable 10mb juga cukup koq,,
mank kita pakai komponen luar yaaa??

Mending sample engine upload dulu,,
kita bedah program bersama,, gmn?
ada kok bro... masalah CD VB6 sedang dibahas ama bro fakhricker....

blh ikutan gk gan?

boleh... kebetulan bro mankbut ajuz  jago programmingkan...? nih lagi nyusun pemainnya.....(tanya ketua teamnya dulu ya..si  bro harboot--- gak pa -pa kan bro... ketua tugasnya mengawasi dan merencanakan-- )


tapi bro mankbut ajuz aktif ya... :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: The Cr4sh pada Pebruari 26, 2010, 10:04:29 PM
@^: All sekarang kendala yg sya alami cuma kompi sya ngk ada VB 6.0
Ad ngk anak medan yg rela ngantarin CD master ke skul sya di jalan H.M Joni
nma skul sya SMA HARAPAN 2 MEDAN disamping museum negeri______

Kalau download nampaknya agak susah, kalau dari ziddu_________

Sya harap ada relawan demi kelancaran AV kita bersama_________
 ^:)^ ^:)^ ^:)^ ^:)^ ^:)^ ^:)^
iya, masak sekarang kalo maudownload harus matiin pop up blocker siihhh
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 26, 2010, 10:06:13 PM
ziddu susah dowload,, lambat kali,,
cari di IDWS ajaaa,,

@atas,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 10:14:50 PM
@Up: si Fakhricker lagi nyari Visual Studio 6 lengkap (VB6, VC++, VFoxPro).... vb6 nya yg lama entah ilang kemana... :-\ :-\ :-\

kalo Visual Studio 6  lengkap dah gw kasih link downloadnya pake torrent ke dia... tapi lambat katanya....
bro harboot ada link untuk download Visual Studio 6 lengkap...? :) :) :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MiloMen™ pada Pebruari 26, 2010, 10:38:23 PM
@^: All sekarang kendala yg sya alami cuma kompi sya ngk ada VB 6.0
Ad ngk anak medan yg rela ngantarin CD master ke skul sya di jalan H.M Joni
nma skul sya SMA HARAPAN 2 MEDAN disamping museum negeri______

Kalau download nampaknya agak susah, kalau dari ziddu_________

Sya harap ada relawan demi kelancaran AV kita bersama_________
 ^:)^ ^:)^ ^:)^ ^:)^ ^:)^ ^:)^
Coba sob download VB 6 di link yang sudah aku kasih dibawah :)

Kode: (download Visual Basic 6) [Pilih]
http://www5.indowebster.com/ae88ef9d0bbe7f34ddff919be30552e3.rar (ukuran: 196.26MB)

Kode: (download Portable Visual Basic 6) [Pilih]
http://www8.indowebster.com/485de1c09d27000b656ff0971088f498.rar (ukuran: 14.07MB)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 26, 2010, 10:47:23 PM
@Milomen: bro ada link download untuk Visual Studio 6 lengkap(VB 6, VC++, VFoxPro)... yg diatas cuma VB6...

Thanks..... sory kalo gw terlalu nyinyir.. :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MiloMen™ pada Pebruari 26, 2010, 11:13:10 PM
@Milomen: bro ada link download untuk Visual Studio 6 lengkap(VB 6, VC++, VFoxPro)... yg diatas cuma VB6...

Thanks..... sory kalo gw terlalu nyinyir.. :D :D
Silakan anda download Visual Studio v6.0 dibawah ini :)

Kode: (download Visual Studio v6.0 part 1) [Pilih]
http://www4.indowebster.com/5425a7a851205b2c019e77b2f3abc56f.rar (ukuran: 190.73 MB)

Kode: (download Visual Studio v6.0 part 2) [Pilih]
http://www4.indowebster.com/8a0f2db7fea508d35a57e21b07ae6d36.rar (ukuran: 68.65 MB)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 27, 2010, 02:05:11 AM
Seep....
Jln deeh... :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 27, 2010, 07:07:01 AM
@Milomen: thanks gan...
gw download dulu.... mana nih si Fakhricker.... ??? ??? ??? wooooiiiii.... ;D ;D
cendolnya menyusul gan....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MiloMen™ pada Pebruari 27, 2010, 07:12:01 AM
@Milomen: thanks gan...
gw download dulu.... mana nih si Fakhricker.... ??? ??? ??? wooooiiiii.... ;D ;D
cendolnya menyusul gan....
Sama2, senang bisa membantu :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 27, 2010, 09:24:19 AM
@all,,
Jangan lupa itu link bajakkan,,
Ingat aturan main juga yaaa,,

Mana Engine AV yg akan kita bedah??
supaya ada progress,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Pebruari 27, 2010, 11:21:11 AM
aq msh newbie ni gan....... baru belajar buat av :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 27, 2010, 12:57:06 PM
@all,,
Jangan lupa itu link bajakkan,,
Ingat aturan main juga yaaa,,

Mana Engine AV yg akan kita bedah??
supaya ada progress,,
ok bro harboot...ditunggu aja ... ni gw lagi komunikasi ama fakhricke..r
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 27, 2010, 09:11:36 PM
Eng_________IIII________ Eng_________
I'm Coming___
 8) 8) 8) 8)

SOry dh nggu lama_____
Dh siap sya fix bugnya_____

Oke siapa tim AV kita ne_____
Biar sya kasih tw link downloadnya lewat PM_______
 :D :D :D

Oh, ya ne AV buatan imam sholly, dgan nama al final virus scan______
Tp gpp kq______
Sya sudah minta izin dengan yg punya biar sya yg mengembangi selanjutnya______
Kan sayang ada AV yg nganggur ngk pernah di update____

Sya sudah nambahkan update otomatis tanpa perlu ganti file_______
 8) 8) 8)

Bug yg sudah sya fix adalah tentang pembenaran hasil value dari cheksum MD5 tentang sality____
Jadi dia false alarm dengan menyebutkan semua file .exe di anggap virus sality____
 :D :D :D

Tpi utg sudah sya fix bugnya___
Fyuh baru plang sampe dirumah ne____

Tadi fakhri ngefix AVnya dirumah teman dari jam 13.00 SIang sampe 21.10 Malam_______

Nah, siapa TIM AV kita, biar sya kirimkan link utk download source codenya lewat PM____

Udh dlu ya, fakhri mau mandi ne___
bau bgt ne badan__-  :P :P :P :P

Habis th tidur dah_______
Sampai besok____
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 27, 2010, 09:19:25 PM
gw pertamax,, ditunggu kirimannya,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 27, 2010, 09:20:13 PM
KeduaX.... ........................sampe lima kale gw ngedit =)) =)) =)) =))
yg punya hajatan dah datang rupanya... :D :D si Fakhri...

@FAKHRICKER: PM linknya bro... ke gw.. bro b_agoy, harboot...
ditunggu...biar bisa di kembangin... dianalisis dulu...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 27, 2010, 09:22:12 PM
Yupz...
Gw jgn lupa :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 27, 2010, 09:38:41 PM
Oke_______
Dh dapat semuakan______
 :D :D :D

jadi utk yg pertama tugas kita apa______
Saran saya:
- Apakah kita harus ganti nama AVnya___
- Kita ganti semua nama al virus scan dari tabnya__
- ganti tampilannya___

Kalau tugas saya hari ini/besok__
- Buat blog utk AV kita___
- Nambahin databasenya____
- Mencoba menggabungkan cheksum MD5 denga L43 G.2 Versi Mas Hirin___  :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 27, 2010, 09:53:12 PM
Bagaimana bro harboot...
jalan kita... :D :D
begadang sampe pagi.... :( :(
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 27, 2010, 09:55:06 PM
aduh repot juga,,
banyak errornya ditempat gw,,
harus fix sana sini dulu..


ne AV di copas dari 'Gee Are The Crying Machine'
(baca txt-nya)

apa ini aman kita gunakan?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: The Cr4sh pada Pebruari 27, 2010, 09:56:39 PM
wah, aku mesti harus banyak belajar vb dulu neehhh  ^:)^, cz pemahaman ku msh dikitt  :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 27, 2010, 10:00:11 PM
Sory, br kelar download. Gw liat dlu AVnya,,, :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 27, 2010, 10:01:48 PM
VBnya error,,
kita tampung saja dulu,,
enginenya uda bagus, spt-nya pembuat terdahulunya begitu serius,,

jujur klo buat gw agak lama buat mengertiin ne AV,,
uda komplex, apa kita copas scan-nya aja dulu?

maksud gw referensi AV itu bukan kita copas total,,
tp kita ambil seperlunya (otopsi),,

ada sample AV lain?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 27, 2010, 10:02:10 PM
@harboot: gw blom download inet gw lagi lemot.... jam segini....
entar repot nya...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 27, 2010, 10:07:29 PM
Di tmpt gw error nih..
(http://i50.tinypic.com/13yhycm.jpg)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 27, 2010, 10:09:39 PM
chasCD,,
ne gw upload disini aja,,
supaya downloadnya mudah,,


---------------------------------


@agoy,, yupz,,
ne AV byk pakai lib external,,
jadi gak jalan di kompi yg gak ada OCXnya,,

COMCTL32 itu 'Windows Common Controls ActiveX Control DLL'


---------------------------------


klo kita mau seriuz kita harus menguasai engine AVnya 100%,,
klo copas ne AV gw gak kuat,, mungkin yg lain bs?
takutnya suatu hari nanti ada bug gak bisa kita perbaiki,,
karna kita tdk tau salahnya dimana,, dan pengembangannyapun sulit,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 27, 2010, 10:21:05 PM
@Harboot:
Okey,,,
Cari ocx dlu klo gt hehe...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Pebruari 28, 2010, 04:45:13 AM
 ^-^ kalau al vruscan RTPnya jg hrs dperbaiki. klo pke iewacth kalo buka folder jd sngt lambat.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 09:34:15 AM
aduh repot juga,,
banyak errornya ditempat gw,,
harus fix sana sini dulu..


ne AV di copas dari 'Gee Are The Crying Machine'
(baca txt-nya)

apa ini aman kita gunakan?

Gpp mas_______
Sudah sya minta izin utk mengembanginya kq dengan yg pnya AV ne________

jadi kalau kita ganti namapun katanya gpp________
Semuanya sudah diserahkan kepada saya 100%
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 09:41:23 AM
Bah_______
Ditempat sya ngk ada masalah sama sekali mas________
Soalnya kompi sya sudah diinstal VB 6.0 yg enterprise, ngk ada bugnya_______
Sebentar ya biar kita check dlu______
 :D :D :D

Oh, ya sya sudah menguasai AV ne 80%_______
Jadi kita tinggal mengganti namanya dan mengganti skinnya_______

Kalau database sudah saya siapkan kq_______
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 10:11:28 AM
Bah_______
Ditempat sya ngk ada masalah sama sekali mas________
Soalnya kompi sya sudah diinstal VB 6.0 yg enterprise, ngk ada bugnya_______
Sebentar ya biar kita check dlu______
 :D :D :D

Oh, ya sya sudah menguasai AV ne 80%_______
Jadi kita tinggal mengganti namanya dan mengganti skinnya_______

Kalau database sudah saya siapkan kq_______
 :D :D :D

saat startup nih Av nulis entry di registry tanpa seizin user...ini perlu di perbaiki dulu...
juga ada beberapa menu yg gak jalan.. ini masih perlu dicek... :-\ :-\
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 10:28:57 AM
@^: Iya neh lagi diperbaiki jga sh_______
kalau sudah siap bilang ke saya ya_______
Soalnya sya mau ngefix updatenya____
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 28, 2010, 10:49:01 AM
@Up:
Lanjutkan dlu deh hehe... :D
Msih susah jln di kompi gw,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 10:57:51 AM
@^: Npa mas______
Knpa ngk bsa jalan di kompi mas________
 :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 11:07:23 AM
Tim FAV cba download file ini:
http://www.ziddu.com/download/5800320/scan.rar.html (http://www.ziddu.com/download/5800320/scan.rar.html)

Kalau sya agak susah downloadnya dari ziddu
katanya situ ada komponent lengkap al virus scan________

kalau ad yg siap download, upload ke thread ini ya file hasil downloadnya tadi_____

Soalnya mau fakhri bongkar_____
 :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 11:16:49 AM
ziddu to smadav
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 11:22:01 AM
@^: Thx ya mas________
 :-bd :-bd :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 11:35:02 AM
@Up:
Lanjutkan dlu deh hehe... :D
Msih susah jln di kompi gw,,,

bro b_agoy pake win vista ato win 7....?
kayak nya memang blom supprot bro.... pake aja Virtual box trus instal Xp...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 11:43:22 AM
ini AV aslinya,,
kenapa lebih baik dari yg sudah di edit yaaa??

@chasCD dan Fakhricker bisa kuasai AV-AL ?

atw kita buat project kosong lalu kita otopsi AV-AL?
atw kita edit aja si AV-AL ??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 12:09:44 PM
ini AV aslinya,,
kenapa lebih baik dari yg sudah di edit yaaa??

@chasCD dan Fakhricker bisa kuasai AV-AL ?

atw kita buat project kosong lalu kita otopsi AV-AL?
atw kita edit aja si AV-AL ??

Saran yg bagus bro..... :-bd :-bd  :-bd to the point.....
kita tunggu yg si punya hajatan ... :D :D si fakhri...

kalo dimulai dari nol memang bagus.. kita bisa belajar sama2 disini dengan yg laen.. :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 12:32:12 PM
tujuan gw dari nol,,
supaya kita bisa tau pasti 100% apa yg sudah kita buat,,

kita mulai dgn susun object,,
lalu copas code,,

gw dgn vista,,
bagoy dgn seven,,
jadi kita bs tau lgs compatible AV kita,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: noyfb pada Pebruari 28, 2010, 12:36:46 PM
supaya kita bisa tau pasti 100% apa yg sudah kita buat,,
baguslah kalau tahu apa yang dibuat, biar ga kejadian yg kek gini

(http://i969.photobucket.com/albums/ae176/r46n0/scrot/smadav-04.jpg)

(http://i969.photobucket.com/albums/ae176/r46n0/scrot/smadav-06.jpg)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 28, 2010, 12:43:42 PM
@Up:
Lanjutkan dlu deh hehe... :D
Msih susah jln di kompi gw,,,

bro b_agoy pake win vista ato win 7....?
kayak nya memang blom supprot bro.... pake aja Virtual box trus instal Xp...
Gw pke Vista SP 1 :D
Oke deh, Ni emg niat mw pke 2 OS kok :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 12:56:46 PM
ini AV aslinya,,
kenapa lebih baik dari yg sudah di edit yaaa??

@chasCD dan Fakhricker bisa kuasai AV-AL ?

atw kita buat project kosong lalu kita otopsi AV-AL?
atw kita edit aja si AV-AL ??

Saran yg bagus bro..... :-bd :-bd  :-bd to the point.....
kita tunggu yg si punya hajatan ... :D :D si fakhri...

kalo dimulai dari nol memang bagus.. kita bisa belajar sama2 disini dengan yg laen.. :)

tujuan gw dari nol,,
supaya kita bisa tau pasti 100% apa yg sudah kita buat,,


kita mulai dgn susun object,,
lalu copas code,,

gw dgn vista,,
bagoy dgn seven,,
jadi kita bs tau lgs compatible AV kita,,

quote ini di depan biar yg bersangkutan baca saran dari kita.....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 01:01:32 PM
yoyoiii,,
tiap kesimpulan kita ambil tulis di post 1 aja yakz,,
tp mulai dari 0 ini sudah FIX blom??

kita mau model AV spt apa?
tab2 diatas spt smadav, atw menu samping spt Ansav??

klo FIX dari 0,, pertama kita coba dgn form scan saja dulu,,

Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 04:57:21 PM
Okelah kalau begitu________
Tapi kalau kita buat dari 0 apakah enginenya kita ambil dari al virusscan___

Soalnya saya banyak AV luar yg nganggur ne____
Kalau kita buat dri 0, Gimana cara buat kalkulator utk menghasilkan value cheksum dari AV kita____
 :D :D :D

Permasalhan yg di al virusscan itu adalah dia menulis registry yang banyak___
kalau kalian baca kodenya pasti kalian tahu dia membuat registry di daerah mana______
kalau kalian sudah tahu, sya akan buat program uninstallnya____

Jadi ada yang tahu ngk, dia buat registry dimana aja______
 :D :D :D


Oh, ya___
Sya sudah membuat komponent pengamanan baru ne___
namanya USB_Firewall___
Dia bsa menahan serangan virus dari flashdisk___
Boleh dicoba gan__
buatan indonesia___

http://www.4shared.com/file/231395160/3929a99d/USB_Firewall.html
 (http://www.4shared.com/file/231395160/3929a99d/USB_Firewall.html)

NB:
Utk berjaga - jaga backup dlu registry kamu, supaya jika terjadi hal yg tak diinginkan bsa terselamatkan________
oke Gan_______
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 28, 2010, 05:04:53 PM
@Up:
Wah, ni rncananya AVnya portable apa installer neh?? ??? ???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 05:07:06 PM
Kalau nurut saya sh
Portable aja_________
lebih enak, kalau installer sya nampaknya agak repot____
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 28, 2010, 05:14:44 PM
Yupz...
Gw jg spendapat. Mendingan portable aja :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 05:28:08 PM
skrg kita hunting AV dulu,,
kita upload bagian scannya aja disini,,
kita pilih yg terbaik,, susah gak??

jadi kita buat dulu 1 form,,
1 command 'SCAN' (scan drive apa aja terserah,,)
bandingkan sama databasenya,, (klo mau portable, berarti database internal?)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 05:30:47 PM
yoyoiii,,
tiap kesimpulan kita ambil tulis di post 1 aja yakz,,
tp mulai dari 0 ini sudah FIX blom??

kita mau model AV spt apa?
tab2 diatas spt smadav, atw menu samping spt Ansav??

klo FIX dari 0,, pertama kita coba dgn form scan saja dulu,,


Kalau saran sya sh kayak AVG________
Tapi kalau susah, yg gampangnya kayaknya seperti SMADAV______

Tpi btw ne enginenya pki AV yg sebelumnya kan_______
Hanya ada perubahan pada tampilan dan create registrynya kan_________
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 05:34:19 PM
Wah______
Kenapa al virusscan yg portable bsa membuat database eksternal_______

kalau lebih enak kita pakai database yg eksternal aja______
Kalau internal brarti kalau kita update haru ditambah fiturnya dg______

Kalau eksternal kan lebih enak_____
jadi kalau update harus timpa aja file database yg dlu dengan yang sekarang______

 :D :D :D

Ituloh saran saya____
 ;) ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 05:35:44 PM
@All: lah gw ketinggalan.... sory tadi lagi ngeceng ama wece....  <=) <=) <=)

nah kalo di mulai dari nol ... it's ok
entar gw upload screenshoot prototype Av kita....
ditunggu tanggapannya...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 05:38:57 PM
@fakhricker,,
lw bisa gak otopsi scan crc-nya AV-AL,,??
buat dalam 1 form saja dulu,,


----------------------------------------

klo mau edit ini lbh mudah,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 05:40:14 PM
all mw ngasih saran______

Kalau enginenya kita pakai al virusscan bsa ngk_____

Soalnya sya sudah paham cara menambahkan list virus di database internalnya
 :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 05:43:00 PM
Wah______
Kenapa al virusscan yg portable bsa membuat database eksternal_______

kalau lebih enak kita pakai database yg eksternal aja______
Kalau internal brarti kalau kita update haru ditambah fiturnya dg______

Kalau eksternal kan lebih enak_____
jadi kalau update harus timpa aja file database yg dlu dengan yang sekarang______

 :D :D :D

Ituloh saran saya____
 ;) ;)

Databasenya terdiri dari dua aja.... internal dan eksternal.....
yg eksternal bisa di tambah update -nya per hari ato perminggu...
nah kalo yg internal di tambah saat upgrade revisi aja....

oke sebelum melangkah lebih jauh kita tentuain aja design formnya dulu..., fitur apa yg ada dalam av kita...(cth registry fix, process explorer, registry eksternal, dll)

NB: pake engine al virusscan juga boleh...
ditunggu tangapan yg laen....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 05:44:01 PM
@fakhricker,,
lw bisa gak otopsi scan crc-nya AV-AL,,??
buat dalam 1 form saja dulu,,
Otopsi maksudnya menambahkan databasenya______
Itu bsa saya pahami______

kalau nambah 1 form, kalian aja dlu yg buat form dengan engine AV Al scan lalu upload ya ke sini___

Soalnya sya lagi membahas AV ne lebih dalam lagi_____
oke______
^^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Pebruari 28, 2010, 05:46:33 PM
@ChazSD:
Iya gw stuju. Lagian jg si Fakhri dah paham. Hrpannya bs jd lbih mudah.. :-bd

Okey, qt tentuin fitur2 ma design,,, :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 05:49:51 PM
@ChazSD:
Iya gw stuju. Lagian jg si Fakhri dah paham. Hrpannya bs jd lbih mudah.. :-bd

Okey, qt tentuin fitur2 ma design,,, :D :D

pembuatannya kita bahas satu persatu dulu... agar yg laen bisa ngikuti perkembangannya...
jadi ketika ada erorr/bugs .. kita bisa tau letaknya dimana...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 05:53:36 PM
Oke_____
Saran saya::
Fitur:
- Registry Fixer
- 1 kill virus by user ( Sudah ada di program al virusscan, Kalau mw test cba aja klik " Scan With Sample " )
- USB Firewall ( Kalau mau coba silahkan download: http://www.4shared.com/file/231395160/3929a99d/USB_Firewall.html (http://www.4shared.com/file/231395160/3929a99d/USB_Firewall.html), untuk melindungi komputer dari serangan virus lewat flashdisk___ )
Kalau menurut kalian USB Firewall cocok dipasang utk AV kita, bilang aja, Biar sya kash tahu link utk download source code USB Firewall______

Itu aja dlu___
 :D :D :D

NB:
Berhubung program USB firewall lagi BETA, sya sarankan sebelum memakainya backup dlu Registry, agar bsa terhindar dri hal2 yg tak diinginkan_____
Tpi gpp kq, sya ngk pernah bermasalah sama sekali kq__
Tpi alangkah baiknya kalau kita waspada


Cara kerja USB Firewall__
Jalankan programnya lalu masukkan FD kamu ke kompi__
Jika FD kamu ada file autorun.inf yg aneh dia secara otomatis akan menampilkan pesan peringatan___
 :D :D :D
Ada efek soundnya___
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Pebruari 28, 2010, 07:37:10 PM
@fakhricker,,
lw bisa gak otopsi scan crc-nya AV-AL,,??
buat dalam 1 form saja dulu,,


----------------------------------------

klo mau edit ini lbh mudah,,,

Lho dia bukan pki cheksum CRC, tpi pakai cheksum MD5___
nampak dari panjangnya code value dari virus__
Sya bongkar databasenya, dia menggunakan MD5
Tpi ntah knpa ada tulisan CRC 32__
Apakah dia menggabungkan cheksum MD5 dengan CRC 32

Pkoknya yg sya teliti dari databasenya dia menggunakan cheksum MD5
^^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 09:37:26 PM
Ini design mentah Interface Av Bersama,
Gambar pertama: -- Interface.jpg
Ide awal gw ambil dari Ansav...-- alasanya interface simple terdiri dari beberapa tab aja..

Gambar kedua --- Detection.jpg
Process Scanning virus/worm gw ambil dari APTX...(rencananya RTP juga dibuat model spt ini)
--alasanya : sejauh yg gw tau belum ada AV lokal yg menggunakan teknik report model begini (kecuali APTX tentunya).... coba rekan2 perhatikan form saat proses scanning pada gambar diatas, mirip AV luarkan (Avira, Avast 4.8 ) ?...
Saat Av mendeteksi virus... akan keluar form seperti gambar dua.. ada opsi Quarantine,Clean,Delete,Ignore
Apply to all detection , Pause, Stop.

coba dites aja source codenya

gw lampirakan source code buat interface Av bersama... moga2 bisa di optimal kan lebih jauh lagi
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 09:43:58 PM
mantabz,,
@chasCD,, menggunakan mode tab spt smadav aja??
knp tidak dimasukkan dlmpicturebox aja,, manggilnya tinggal hide,,
coba lihat http://smadaver.com/antivirus-lokal-lainnya/bikin-antivirus-bersama/?action=dlattach;attach=3269


------------------------------------------------------------------


eh tab bisa pakai image/icon juga yakz?
klo bisa pakai tab aja deh,, lbh mudah,,

ada yg tau buat tombol image? commandkan gak bs ditaruh gambar,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Pebruari 28, 2010, 10:07:43 PM
Tab yg gw gunakan berasal dari komponen Micrososft Tabbde Dialog Control 6.0
emang sih sepertinya mengunakan picturebox ato frame lebih ringan dar komponen tab...
gw nunggu komen yg laen dulu... mau tau pendapat mereka...

Btw Report Detection untuk proses scanning gw terinspirasi Av luar... simulasi nya begini...
Saat proses scanning berjalan.. ketika virus dideteksi user dapat memilih option yg ada misalnya Quarantine (opsi Apply to all detections) sehingga cukup sekali klik ... virus langsung di quarantine bersamaan dengan proses scanning yg berlangsung ( tidak menunggu proses scanning selesai)... hasilnya akan ditampilkan di listview

User juga dapat memilih Ignore ( opsi Apply to all detections)...Av akan mengabaikan seluruh deteksi yg dilakukan... dan hasilnya akan ditampilkan di listview (nah di list view user yg berubah pikiran dapat memlih opsi Quarantine, Delete, Clean, melalui opsi klik kanan pada listview).

bagaimana bro..?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Pebruari 28, 2010, 10:40:16 PM
gw setuju ajaaa,,
tp apa fakhrickerrrr bs pakai template ini??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 01, 2010, 03:43:20 AM
Okey source code dah gw download :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 08:54:10 AM
Ikut yaa,, bisa VB 6 ni,, minta SCnya di fahmi_spanza@yahoo.com
Bisa juga jadi virus hunter,,, Thnks before
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Maret 01, 2010, 12:27:58 PM
gw setuju ajaaa,,
tp apa fakhrickerrrr bs pakai template ini??

Keren bro... (padahal baru tahap awal kan)

BTW... dah gw komunikasikan ke Fakhricker....mungkin dia bisa nyesuaikan sourcode Av bersama mengunakan template itu....

tinggal tunggu aja komment 'n perkembangan dari dia...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 12:34:23 PM
@Chaz : ada source code antivirus bersama gak??? bagi ke fahmi_spanza@yahoo.com
thx before,, ikut di project ni yaa, bisa bantu2 program
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 12:34:43 PM
File View Option Help buat apa saja??

Bagaimana klo Help berisi panduan digabung dengan tab About saja,,
Option dan View masuk ke setting,,

Tombol Exit kita buat lagi,, jadi tidak ada toolbar diatas,,
Supaya terlihat simple,, menu Utama 4 saja,,

Nanti Fitur2 tambahan masuk ke tools semua,,
Atasnya header saja..
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 12:36:00 PM
@frostmaster,,
tugas lw pertama,
buat pakai VB spt tampilan ini :

(http://smadaver.com/index.php?action=dlattach;topic=3281.0;attach=3280;image)

1 form aja,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 12:38:08 PM
Pake gmbar jga atau cma bntuk form??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 12:40:38 PM
bentuk form aja dulu,,

lw minat dimana? program?
VB bs sampai mana??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 12:47:24 PM
Bisa juga sih virus hunter,, program yaa sampe check string md5 n crc32
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 12:52:05 PM
ya udah buat dulu spt atas,,
kita baru sampai situ doank koq,,
blom ada isinya,,

mungkin nanti kamu bisa bantu fakhricker buat
nambah SCAN dgn crc32,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 01:53:43 PM
Ni bro
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 01:59:54 PM
ya udah itu sourcecodenya,,
kita baru sampai situ blom ada isinya,,

(lain kali klo upload gambar pakai jpg aja,, beraaattt..)

untuk team, mungkin nunggu keputusan teman2 lainnya,,
ada fakhricker, chazsd, dan b_agoy,, :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Joe Bluesser pada Maret 01, 2010, 02:10:01 PM
permisi suhu2..numpang nimbrung, usul.. gmna ntr kelak AV ne dinamai DESTROYER anti virus   ,kedengaranx komersil n sangar..  :D   .   maju terus generasi muda Indonesia :-X :-X :-X
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 02:19:49 PM
@atas : nama gampang, yg pnting jalan dulu proyeknya
@harboot : kita kan mw bongkar al virusscan kan??? atau ulang dari 0???
kalo mank bongkar bagi source codenya al virus scan
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 02:21:21 PM
@frost,, cari di pscode.com
opensource koq,,

kita mau mulai dari template diatas,,

soalnya klo cuman edit AV, kita gak bakal paham apa yg dikerjakan ne AV,,
suatu hari nanti ktemu bug, kita pasti bingung,, bug-nya darimana,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 01, 2010, 02:49:08 PM
@harboot : okelah kalo begitu... Kita pake heuristik gak???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 01, 2010, 03:44:57 PM
pakai,,
uda lw download blom?

mungkin lw punya contoh vb crc32,,
bisa upload disini,, klo gw baca buku jasakom,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Maret 01, 2010, 06:51:16 PM
wah gue gak bisa bantu2 apa coz gue codingnya di delphi.

cuman kalau butuh bantuan about teknik and lain2 pm gue aja yah...

oh iya mungkin ini sedikit membantu :

Kode: [Pilih]
program Project1;

uses
  SysUtils;

{$APPTYPE CONSOLE}

type
CharIntArray = Array[Char] of Integer;

Function PersiapkanLoncatan(const Pattern:string):CharIntArray;
var
lp,i : integer;
c : char;
begin
  lp := length(pattern);
  for c := Low(Char) to High(Char) do result[c] := lp + 1;
  for i := 1 to lp do result[Pattern[i]] := lp-i + 1;
end;

Function BMS(const Text,Pattern:string):integer;
var
m, n, k, j: Integer;
Loncatan : CharIntArray;
begin
  result := 0;
  m := Length(Pattern);
  n := Length(Text);
  Loncatan := PersiapkanLoncatan(pattern);
  k := m;
  while k <= n-1 do begin
    j := 0;
    while (j < m) and (Pattern[m-j] = Text[k-j]) do inc(j);
    if (j = m) then begin
      result := k-j+1;
      exit;
    end else k := k + Loncatan[Text[k+1]]
  end;
  if (k=n) then begin
    j := 0;
    while (j < m) and (Pattern[m-j] = Text[k-j]) do inc(j);
    if (j = m) then result := k-m+1;
  end;
end;

var
x : integer;
begin
  try
    writeln('============================================');
    writeln('Pencarian String Mengunakan Methode Boyer Moore Sunday');
    writeln('============================================');
    writeln('text = sayasedangbelajar');
    writeln('pattern = dangbel');
    write('found pattern at Position :');
    x := BMS('sayasedangbelajar','dangbel');
    writeln(x);
  except
    on E:Exception do
      Writeln(E.Classname, ': ', E.Message);
  end;
end.

diatas merupakan pencarian string dengan methode boyer moore sunday  :-bd :-bd :-bd

Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Maret 01, 2010, 08:08:24 PM
@meong: trima kasih perhatian dan bantuannya...  :D :D..

kalo ada saran dan kritik jgn sunglkan2.... :) :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 02, 2010, 04:38:33 AM
@Meong:
Makasih bro atas masukannya.... :-bd
Mngkin ada maskan yg lain dtnggu yah ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 08:22:50 AM
Ni bro codenya untuk cek dengan crc

Kode: [Pilih]
'2010 By Frostmaster
Function CEK_DENGAN_CRC(namadir As String, NamaFile As String)
'Fungsi untuk mengecek dengan metode CRC32
On Error Resume Next
  Dim ceksum As String
  Dim m_CRC As clsCRC
  Dim namavirus As String
  Set m_CRC = New clsCRC
  ceksum = Hex(m_CRC.CalculateFile(namadir & NamaFile))
  namavirus = cek_with_navi(ceksum)
  'If lblChecksum.Caption = ceksum Then namavirus = "Permintaan User"
 
 If namavirus <> "" Then
 With ListView1
 Set lvItm = .ListItems.Add
 lvItm.SubItems(1) = namavirus
 lvItm.SubItems(2) = namadir & NamaFile
 lvItm.SubItems(3) = FileLen(namadir & NamaFile)
 End With
 Call List_Process
 Bunuh namadir & NamaFile
 lblJumlahVirus = lblJumlahVirus + 1
 End If

End Function
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 08:31:17 AM
Kalo yang ini cek dengan string, mohon disesuaikan aja sama nama2 formnya biar object found

Kode: [Pilih]
'2010 By Frostmaster : Funsi untuk mengecek dengan string
Function CEK_DENGAN_STRING(namadir As String, NamaFile As String)
Dim i As Integer, ukuran As Integer
Dim namavirus As String
Dim virname(1000) As String
Dim sign(1000) As String
Dim sampel(1000) As String
Dim ukuran_asli(1000) As Long

i = 1
Do 'For i = 1 To gettotalsampel()
    sampel(i) = ambilsampel(i)
    'mengambil signature dari sampel
    sign(i) = Mid(sampel(i), 1, InStr(1, sampel(i), ":") - 1)
    'mengambil namavirus dari sampel
    virname(i) = Mid(sampel(i), Len(sign(i)) + 2, (InStr(Len(sign(i)) + 2, sampel(i), ":") - (Len(sign(i)) + 2)))
    'mengambil namavirus yg dihasilkan
    ukuran_asli(i) = Mid(sampel(i), Len(sign(i)) + 1 + Len(virname(i)) + 2, Len(sampel(i)))
       
    namavirus = stringcheck(namadir & NamaFile, hex2ascii(sign(i)), virname(i))
    'jika ada virus, tampilkan pada list
    If namavirus <> "" And namavirus <> "Selesai" Then
    With ListView1
    Set lvItm = .ListItems.Add
    lvItm.SubItems(1) = namavirus
    lvItm.SubItems(2) = namadir & NamaFile
    lvItm.SubItems(3) = FileLen(namadir & NamaFile)
    If ukuran_asli(i) < FileLen(namadir & NamaFile) Then lvItm.SubItems(4) = "File Terinfeksi"
    End With
    Call List_Process
    Bunuh namadir & NamaFile
    lblJumlahVirus = lblJumlahVirus + 1
    Exit Do
    End If
i = i + 1
Loop Until sampel(i - 1) = "Selesai:Selesai:Selesai"

End Function

Mohon kalo ada bug atau trouble diberitahu, ini untuk database external dengan extension .dll
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 02, 2010, 10:28:49 AM
@frost,,
tidak perlu module yaa??

ini sudah bawaan VBnya??
m_CRC.CalculateFile(namadir & NamaFile)

VB bs CRC ya? kirain pakai algoritma lg,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Yudh pada Maret 02, 2010, 10:54:05 AM
@harboot:

di Morphostlab , kyanya ada beberapa script boot... :) , siapa tw berguna...

Klik Beranda


http://morphostlab.co.nr
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 11:25:05 AM
@frost,,
tidak perlu module yaa??

ini sudah bawaan VBnya??
m_CRC.CalculateFile(namadir & NamaFile)

VB bs CRC ya? kirain pakai algoritma lg,,


Ni Class Module CRC32
Kode: [Pilih]
'CRC Checksum Class
'-----------------------------------
'
'(c) 2010 Frostmaster

Option Explicit

Public Enum CRCAlgorithms
CRC32
End Enum
Private m_Algorithm As Boolean

Private m_CRC16Table(0 To 255) As Long

Private m_CRC32 As Long
Private m_CRC32Asm() As Byte
Private m_CRC32Init As Boolean
Private m_CRC32Table(0 To 255) As Long

Private Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hwnd As Long, ByVal MSG As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Public Function AddBytes(ByteArray() As Byte) As Variant

  Dim ByteSize As Long
  
  
  
  'Penghitungan dengan byte array
  ByteSize = UBound(ByteArray) - LBound(ByteArray) + 1

  On Local Error GoTo 0
  Call CallWindowProc(VarPtr(m_CRC32Asm(0)), VarPtr(m_CRC32), VarPtr(ByteArray(LBound(ByteArray))), VarPtr(m_CRC32Table(0)), ByteSize)

  
NoData:
  'Return the current CRC value
  AddBytes = Value
  
End Function

Public Property Let Algorithm(New_Value As CRCAlgorithms)

  'Membuat algoritma baru
  m_Algorithm = New_Value



    If (Not m_CRC32Init) Then Call InitializeCRC32

 
  Call Clear
  
End Property
Public Property Get Algorithm() As CRCAlgorithms

  Algorithm = m_Algorithm
  
End Property

Public Function CalculateBytes(ByteArray() As Byte) As Variant

  'Reset the current CRC calculation
  Call Clear
  
  'Calculate the CRC from the bytearray
  'and return the current CRC value
  CalculateBytes = AddBytes(ByteArray)
  
End Function

Public Function CalculateFile(FileName As String) As Variant

  On Error GoTo bawah
  Dim Filenr As Integer
  Dim ByteArray() As Byte
  
  'Make sure the file contains data
  'to avoid errors later below
  If (FileLen(FileName) = 0) Then Exit Function
  
  'Open the file in binary mode, read
  'the data into a bytearray and then
  'close the file
  Filenr = FreeFile
  Open FileName For Binary As #Filenr
  ReDim ByteArray(0 To LOF(Filenr) - 1)
  Get #Filenr, , ByteArray()
  Close #Filenr
  
  'Now send the bytearray to the function
  'that can calculate a CRC from it
  CalculateFile = CalculateBytes(ByteArray)
bawah:
  Exit Function

End Function

Public Property Get Value() As Variant

   Value = (Not m_CRC32)
  
End Property

Public Property Let Value(New_Value As Variant)

  m_CRC32 = New_Value
  
End Property

Public Sub Clear()

  m_CRC32 = &HFFFFFFFF
  
End Sub

Private Sub InitializeCRC32()

  Dim i As Long
  Dim sASM As String
  
  m_CRC32Table(0) = &H0
  m_CRC32Table(1) = &H77073096
  m_CRC32Table(2) = &HEE0E612C
  m_CRC32Table(3) = &H990951BA
  m_CRC32Table(4) = &H76DC419
  m_CRC32Table(5) = &H706AF48F
  m_CRC32Table(6) = &HE963A535
  m_CRC32Table(7) = &H9E6495A3
  m_CRC32Table(8) = &HEDB8832
  m_CRC32Table(9) = &H79DCB8A4
  m_CRC32Table(10) = &HE0D5E91E
  m_CRC32Table(11) = &H97D2D988
  m_CRC32Table(12) = &H9B64C2B
  m_CRC32Table(13) = &H7EB17CBD
  m_CRC32Table(14) = &HE7B82D07
  m_CRC32Table(15) = &H90BF1D91
  m_CRC32Table(16) = &H1DB71064
  m_CRC32Table(17) = &H6AB020F2
  m_CRC32Table(18) = &HF3B97148
  m_CRC32Table(19) = &H84BE41DE
  m_CRC32Table(20) = &H1ADAD47D
  m_CRC32Table(21) = &H6DDDE4EB
  m_CRC32Table(22) = &HF4D4B551
  m_CRC32Table(23) = &H83D385C7
  m_CRC32Table(24) = &H136C9856
  m_CRC32Table(25) = &H646BA8C0
  m_CRC32Table(26) = &HFD62F97A
  m_CRC32Table(27) = &H8A65C9EC
  m_CRC32Table(28) = &H14015C4F
  m_CRC32Table(29) = &H63066CD9
  m_CRC32Table(30) = &HFA0F3D63
  m_CRC32Table(31) = &H8D080DF5
  m_CRC32Table(32) = &H3B6E20C8
  m_CRC32Table(33) = &H4C69105E
  m_CRC32Table(34) = &HD56041E4
  m_CRC32Table(35) = &HA2677172
  m_CRC32Table(36) = &H3C03E4D1
  m_CRC32Table(37) = &H4B04D447
  m_CRC32Table(38) = &HD20D85FD
  m_CRC32Table(39) = &HA50AB56B
  m_CRC32Table(40) = &H35B5A8FA
  m_CRC32Table(41) = &H42B2986C
  m_CRC32Table(42) = &HDBBBC9D6
  m_CRC32Table(43) = &HACBCF940
  m_CRC32Table(44) = &H32D86CE3
  m_CRC32Table(45) = &H45DF5C75
  m_CRC32Table(46) = &HDCD60DCF
  m_CRC32Table(47) = &HABD13D59
  m_CRC32Table(48) = &H26D930AC
  m_CRC32Table(49) = &H51DE003A
  m_CRC32Table(50) = &HC8D75180
  m_CRC32Table(51) = &HBFD06116
  m_CRC32Table(52) = &H21B4F4B5
  m_CRC32Table(53) = &H56B3C423
  m_CRC32Table(54) = &HCFBA9599
  m_CRC32Table(55) = &HB8BDA50F
  m_CRC32Table(56) = &H2802B89E
  m_CRC32Table(57) = &H5F058808
  m_CRC32Table(58) = &HC60CD9B2
  m_CRC32Table(59) = &HB10BE924
  m_CRC32Table(60) = &H2F6F7C87
  m_CRC32Table(61) = &H58684C11
  m_CRC32Table(62) = &HC1611DAB
  m_CRC32Table(63) = &HB6662D3D
  m_CRC32Table(64) = &H76DC4190
  m_CRC32Table(65) = &H1DB7106
  m_CRC32Table(66) = &H98D220BC
  m_CRC32Table(67) = &HEFD5102A
  m_CRC32Table(68) = &H71B18589
  m_CRC32Table(69) = &H6B6B51F
  m_CRC32Table(70) = &H9FBFE4A5
  m_CRC32Table(71) = &HE8B8D433
  m_CRC32Table(72) = &H7807C9A2
  m_CRC32Table(73) = &HF00F934
  m_CRC32Table(74) = &H9609A88E
  m_CRC32Table(75) = &HE10E9818
  m_CRC32Table(76) = &H7F6A0DBB
  m_CRC32Table(77) = &H86D3D2D
  m_CRC32Table(78) = &H91646C97
  m_CRC32Table(79) = &HE6635C01
  m_CRC32Table(80) = &H6B6B51F4
  m_CRC32Table(81) = &H1C6C6162
  m_CRC32Table(82) = &H856530D8
  m_CRC32Table(83) = &HF262004E
  m_CRC32Table(84) = &H6C0695ED
  m_CRC32Table(85) = &H1B01A57B
  m_CRC32Table(86) = &H8208F4C1
  m_CRC32Table(87) = &HF50FC457
  m_CRC32Table(88) = &H65B0D9C6
  m_CRC32Table(89) = &H12B7E950
  m_CRC32Table(90) = &H8BBEB8EA
  m_CRC32Table(91) = &HFCB9887C
  m_CRC32Table(92) = &H62DD1DDF
  m_CRC32Table(93) = &H15DA2D49
  m_CRC32Table(94) = &H8CD37CF3
  m_CRC32Table(95) = &HFBD44C65
  m_CRC32Table(96) = &H4DB26158
  m_CRC32Table(97) = &H3AB551CE
  m_CRC32Table(98) = &HA3BC0074
  m_CRC32Table(99) = &HD4BB30E2
  m_CRC32Table(100) = &H4ADFA541
  m_CRC32Table(101) = &H3DD895D7
  m_CRC32Table(102) = &HA4D1C46D
  m_CRC32Table(103) = &HD3D6F4FB
  m_CRC32Table(104) = &H4369E96A
  m_CRC32Table(105) = &H346ED9FC
  m_CRC32Table(106) = &HAD678846
  m_CRC32Table(107) = &HDA60B8D0
  m_CRC32Table(108) = &H44042D73
  m_CRC32Table(109) = &H33031DE5
  m_CRC32Table(110) = &HAA0A4C5F
  m_CRC32Table(111) = &HDD0D7CC9
  m_CRC32Table(112) = &H5005713C
  m_CRC32Table(113) = &H270241AA
  m_CRC32Table(114) = &HBE0B1010
  m_CRC32Table(115) = &HC90C2086
  m_CRC32Table(116) = &H5768B525
  m_CRC32Table(117) = &H206F85B3
  m_CRC32Table(118) = &HB966D409
  m_CRC32Table(119) = &HCE61E49F
  m_CRC32Table(120) = &H5EDEF90E
  m_CRC32Table(121) = &H29D9C998
  m_CRC32Table(122) = &HB0D09822
  m_CRC32Table(123) = &HC7D7A8B4
  m_CRC32Table(124) = &H59B33D17
  m_CRC32Table(125) = &H2EB40D81
  m_CRC32Table(126) = &HB7BD5C3B
  m_CRC32Table(127) = &HC0BA6CAD
  m_CRC32Table(128) = &HEDB88320
  m_CRC32Table(129) = &H9ABFB3B6
  m_CRC32Table(130) = &H3B6E20C
  m_CRC32Table(131) = &H74B1D29A
  m_CRC32Table(132) = &HEAD54739
  m_CRC32Table(133) = &H9DD277AF
  m_CRC32Table(134) = &H4DB2615
  m_CRC32Table(135) = &H73DC1683
  m_CRC32Table(136) = &HE3630B12
  m_CRC32Table(137) = &H94643B84
  m_CRC32Table(138) = &HD6D6A3E
  m_CRC32Table(139) = &H7A6A5AA8
  m_CRC32Table(140) = &HE40ECF0B
  m_CRC32Table(141) = &H9309FF9D
  m_CRC32Table(142) = &HA00AE27
  m_CRC32Table(143) = &H7D079EB1
  m_CRC32Table(144) = &HF00F9344
  m_CRC32Table(145) = &H8708A3D2
  m_CRC32Table(146) = &H1E01F268
  m_CRC32Table(147) = &H6906C2FE
  m_CRC32Table(148) = &HF762575D
  m_CRC32Table(149) = &H806567CB
  m_CRC32Table(150) = &H196C3671
  m_CRC32Table(151) = &H6E6B06E7
  m_CRC32Table(152) = &HFED41B76
  m_CRC32Table(153) = &H89D32BE0
  m_CRC32Table(154) = &H10DA7A5A
  m_CRC32Table(155) = &H67DD4ACC
  m_CRC32Table(156) = &HF9B9DF6F
  m_CRC32Table(157) = &H8EBEEFF9
  m_CRC32Table(158) = &H17B7BE43
  m_CRC32Table(159) = &H60B08ED5
  m_CRC32Table(160) = &HD6D6A3E8
  m_CRC32Table(161) = &HA1D1937E
  m_CRC32Table(162) = &H38D8C2C4
  m_CRC32Table(163) = &H4FDFF252
  m_CRC32Table(164) = &HD1BB67F1
  m_CRC32Table(165) = &HA6BC5767
  m_CRC32Table(166) = &H3FB506DD
  m_CRC32Table(167) = &H48B2364B
  m_CRC32Table(168) = &HD80D2BDA
  m_CRC32Table(169) = &HAF0A1B4C
  m_CRC32Table(170) = &H36034AF6
  m_CRC32Table(171) = &H41047A60
  m_CRC32Table(172) = &HDF60EFC3
  m_CRC32Table(173) = &HA867DF55
  m_CRC32Table(174) = &H316E8EEF
  m_CRC32Table(175) = &H4669BE79
  m_CRC32Table(176) = &HCB61B38C
  m_CRC32Table(177) = &HBC66831A
  m_CRC32Table(178) = &H256FD2A0
  m_CRC32Table(179) = &H5268E236
  m_CRC32Table(180) = &HCC0C7795
  m_CRC32Table(181) = &HBB0B4703
  m_CRC32Table(182) = &H220216B9
  m_CRC32Table(183) = &H5505262F
  m_CRC32Table(184) = &HC5BA3BBE
  m_CRC32Table(185) = &HB2BD0B28
  m_CRC32Table(186) = &H2BB45A92
  m_CRC32Table(187) = &H5CB36A04
  m_CRC32Table(188) = &HC2D7FFA7
  m_CRC32Table(189) = &HB5D0CF31
  m_CRC32Table(190) = &H2CD99E8B
  m_CRC32Table(191) = &H5BDEAE1D
  m_CRC32Table(192) = &H9B64C2B0
  m_CRC32Table(193) = &HEC63F226
  m_CRC32Table(194) = &H756AA39C
  m_CRC32Table(195) = &H26D930A
  m_CRC32Table(196) = &H9C0906A9
  m_CRC32Table(197) = &HEB0E363F
  m_CRC32Table(198) = &H72076785
  m_CRC32Table(199) = &H5005713
  m_CRC32Table(200) = &H95BF4A82
  m_CRC32Table(201) = &HE2B87A14
  m_CRC32Table(202) = &H7BB12BAE
  m_CRC32Table(203) = &HCB61B38
  m_CRC32Table(204) = &H92D28E9B
  m_CRC32Table(205) = &HE5D5BE0D
  m_CRC32Table(206) = &H7CDCEFB7
  m_CRC32Table(207) = &HBDBDF21
  m_CRC32Table(208) = &H86D3D2D4
  m_CRC32Table(209) = &HF1D4E242
  m_CRC32Table(210) = &H68DDB3F8
  m_CRC32Table(211) = &H1FDA836E
  m_CRC32Table(212) = &H81BE16CD
  m_CRC32Table(213) = &HF6B9265B
  m_CRC32Table(214) = &H6FB077E1
  m_CRC32Table(215) = &H18B74777
  m_CRC32Table(216) = &H88085AE6
  m_CRC32Table(217) = &HFF0F6A70
  m_CRC32Table(218) = &H66063BCA
  m_CRC32Table(219) = &H11010B5C
  m_CRC32Table(220) = &H8F659EFF
  m_CRC32Table(221) = &HF862AE69
  m_CRC32Table(222) = &H616BFFD3
  m_CRC32Table(223) = &H166CCF45
  m_CRC32Table(224) = &HA00AE278
  m_CRC32Table(225) = &HD70DD2EE
  m_CRC32Table(226) = &H4E048354
  m_CRC32Table(227) = &H3903B3C2
  m_CRC32Table(228) = &HA7672661
  m_CRC32Table(229) = &HD06016F7
  m_CRC32Table(230) = &H4969474D
  m_CRC32Table(231) = &H3E6E77DB
  m_CRC32Table(232) = &HAED16A4A
  m_CRC32Table(233) = &HD9D65ADC
  m_CRC32Table(234) = &H40DF0B66
  m_CRC32Table(235) = &H37D83BF0
  m_CRC32Table(236) = &HA9BCAE53
  m_CRC32Table(237) = &HDEBB9EC5
  m_CRC32Table(238) = &H47B2CF7F
  m_CRC32Table(239) = &H30B5FFE9
  m_CRC32Table(240) = &HBDBDF21C
  m_CRC32Table(241) = &HCABAC28A
  m_CRC32Table(242) = &H53B39330
  m_CRC32Table(243) = &H24B4A3A6
  m_CRC32Table(244) = &HBAD03605
  m_CRC32Table(245) = &HCDD70693
  m_CRC32Table(246) = &H54DE5729
  m_CRC32Table(247) = &H23D967BF
  m_CRC32Table(248) = &HB3667A2E
  m_CRC32Table(249) = &HC4614AB8
  m_CRC32Table(250) = &H5D681B02
  m_CRC32Table(251) = &H2A6F2B94
  m_CRC32Table(252) = &HB40BBE37
  m_CRC32Table(253) = &HC30C8EA1
  m_CRC32Table(254) = &H5A05DF1B
  m_CRC32Table(255) = &H2D02EF8D

  'Create a bytearray to hold the
  'precompiled assembler code
  sASM = "5589E557565053518B45088B008B750C8B7D108B4D1431DB8A1E30C3C1E80833049F464975F28B4D088901595B585E5F89EC5DC21000"
  ReDim m_CRC32Asm(0 To Len(sASM) \ 2 - 1)
  For i = 1 To Len(sASM) Step 2
    m_CRC32Asm(i \ 2) = Val("&H" & Mid$(sASM, i, 2))
  Next
  
  'Mark the CRC32 algorithm as initialized
  m_CRC32Init = True

End Sub
Private Sub Class_Initialize()

  'The default algorithm is CRC32
  Algorithm = CRC32
  
End Sub

Ni kode Search String

Kode: [Pilih]
Option Explicit

Private Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hwnd As Long, ByVal MSG As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Private Declare Function MapViewOfFile Lib "kernel32.dll" (ByVal hFile As Long, _
                                                           ByVal dwDesiredAccess As Long, _
                                                           ByVal dwFileOffsetHigh As Long, _
                                                           ByVal dwFileOffsetLow As Long, _
                                                           ByVal dwNumberOfBytesToMap As Long) As Long
Private Declare Function CreateFileMapping Lib "kernel32.dll" Alias "CreateFileMappingA" (ByVal hFile As Long, _
                                                           ByVal lpAttributes As Long, ByVal flProtect As Long, _
                                                           ByVal dwMaximumSizeHigh As Long, _
                                                           ByVal dwMaximumSizeLow As Long, _
                                                           ByVal lpName As String) As Long
Private Declare Function UnmapViewOfFile Lib "kernel32.dll" (ByVal lpBaseAddress As Long) As Boolean

Private Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, _
                                                                        ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, _
                                                                        ByVal lpSecurityAttributes As Long, _
                                                                        ByVal dwCreationDisposition As Long, _
                                                                        ByVal dwFlagsAndAttributes As Long, _
                                                                        ByVal hTemplateFile As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Private Const FILE_ATTRIBUTE_NORMAL As Long = &H80
Private Const OPEN_EXISTING As Long = 3
Private Const GENERIC_READ As Long = &H80000000
Private Const FILE_MAP_READ As Long = &H4
Private Const PAGE_READONLY As Long = &H2
Private Const INVALIDHANDLE As Long = -1
Private Const CLOSEDHANDLE As Long = 0

Private hFile As Long
Private hFileMap As Long
Private hMapView As Long
Private mBaseAddr As Long
Private mFileSize As Long

Private m_StrBuffer As String

Public Enum eCharCode
        ANSISTD_CHAR
        UNICODE_CHAR
End Enum

Private Const sASM As String = "5589E55756505351528B45088B7D0C8B088B58044381FB010000007F2D31C089FE8B5D148A21FCAC38E0740E4B81FB0000000075F2E99500000089F12B4D0C8B4508894808E9A10000008A118A710189FE8B4D088B5904438B098A074638D0742589F02B450C01D83B45147F6231C08A064638D0741089F02B450C01D83B45147F4D31C0EBE98A064638F075E58D7EFF81FB0200000074448A61028A0681C60200000038E075A881FB03000000742D8A41038A66FF38E0759681C10200000081EB0200000081FB02000000740FEBC98B450831DB895808E90F0000008D47FF89C12B4D0C418B45088948085A595B585E5F89EC5DC21000"

Private m_PatData(0 To 2) As Long
Private m_PatArray() As Byte
Private m_PatString As String
Private m_PatLength As Long
Private m_PatChrLen As Long
Private m_PatFormat As eCharCode

Private m_STRC32Asm() As Byte

Private Sub Class_Initialize()

  Dim i As Long

  ReDim m_STRC32Asm(0 To Dec(LenB(sASM) \ 2))
  For i = 1 To Len(sASM) Step 2
    m_STRC32Asm(i \ 2) = Val("&H" & ASMMid(sASM, i, 2))
  Next
  
End Sub

Private Function CloseMapFile()
    
        UnmapViewOfFile hMapView
        CloseHandle hFileMap
        CloseHandle hFile
        hMapView = CLOSEDHANDLE
        hFileMap = CLOSEDHANDLE
        hFile = INVALIDHANDLE
        mBaseAddr = CLOSEDHANDLE
        mFileSize = CLOSEDHANDLE
        
End Function

Public Function FileMapSearch(ByVal FileName As String, ByVal SearchText As String) As Long

FileMapSearch = 0
mFileSize = FileLen(FileName)

If mFileSize > 0 Then

    hFile = CreateFile(FileName, GENERIC_READ, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0)
    hFileMap = CreateFileMapping(hFile, 0, PAGE_READONLY, 0, 0, vbNullString)
    hMapView = MapViewOfFile(hFileMap, FILE_MAP_READ, 0, 0, 0)
    
    On Local Error GoTo NoData
    If Not hMapView = CLOSEDHANDLE Then
       mBaseAddr = hMapView
       FileMapSearch = InstrFIND(SearchText, 1, ANSISTD_CHAR)
    End If

NoData:
    CloseMapFile
End If
  
End Function

Private Function InstrFIND(ByVal msText As String, Optional ByVal StartAt As Long = 1, Optional chrFormat As eCharCode = ANSISTD_CHAR) As Long
'Dim Offset As Long

    'If LenB(msText) = 0 Then
    '    InstrFIND = 1
    '    Exit Function
    'End If

    If (Not m_PatString = msText) Or (Not m_PatFormat = chrFormat) Then
        m_PatString = msText
        m_PatFormat = chrFormat
        m_PatChrLen = Inc(chrFormat)
        InitializePattern chrFormat
    End If

    If mFileSize > 5120 Then mFileSize = 5120
    Call CallWindowProc(ASMVarPtrByte(m_STRC32Asm(0)), ASMVarPtrLong(m_PatData(0)), ByVal mBaseAddr, ByVal 0&, mFileSize)

    InstrFIND = m_PatData(2)
    
End Function

Private Sub InitializePattern(Optional charFormat As eCharCode = ANSISTD_CHAR)

   m_PatLength = Len(m_PatString)
   If m_PatLength > 0 Then
  
      If charFormat = ANSISTD_CHAR Then
        ReDim m_PatArray(Dec(m_PatLength)) ' - 1)
        m_PatArray = StrConv(m_PatString, vbFromUnicode)
      Else
        m_PatArray = m_PatString
        m_PatLength = Inc(UBound(m_PatArray)) ' + 1
      End If

      m_PatData(0) = ASMVarPtrByte(m_PatArray(0))
      m_PatData(1) = CLng(Dec(m_PatLength)) ' - 1)
      m_PatData(2) = CLng(0)
      
   End If

End Sub

Mohon di cek,, ada ngambil sedikit dari salah satu av tapi gak asal copas bro,, dah dikurangin kemungkinan false detectnya, coz banyak btul false detectnya sebelumnya, mohon dikoreksi
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 11:41:04 AM
Kode: [Pilih]
[code]Ni Module Assembly n Fungsi
Private miaLCaseTable(0 To 65535) As Long
Private miaUCaseTable(0 To 65535) As Long
Private miaAsciiToUnicodeTable(0 To 255) As Long
Private miaAsciiTable(0 To 255) As Byte
Private miaUnicodeToAsciiTable(0 To 65535) As Byte
Private miaShiftTable(256) As Long

Private Sub ASM_DEF()
'#asm'  ;option scoped
'#asm'  .686p
'#asm'  .mmx
'#asm'  .xmm
'#asm'  .model flat, stdcall
'#asm'  includelib c:\masm32\lib\kernel32.lib
'#asm'  includelib c:\masm32\lib\oleaut32.lib
'#asm'  includelib c:\masm32\lib\user32.lib
'#asm'
'#asm'  SysAllocString PROTO STDCALL :DWORD
'#asm'  SysAllocStringByteLen PROTO STDCALL :DWORD, :DWORD
'#asm'  SysAllocStringLen PROTO STDCALL :DWORD, :DWORD
'#asm'  SysFreeString PROTO STDCALL :DWORD
'#asm'  SysReAllocString PROTO STDCALL :DWORD, :DWORD
'#asm'  SysReAllocStringLen PROTO STDCALL :DWORD, :DWORD, :DWORD
'#asm'  SysStringByteLen PROTO STDCALL :DWORD
'#asm'  SysStringLen PROTO STDCALL :DWORD
'#asm'
'#asm'  VectorFromBstr PROTO STDCALL :DWORD
'#asm'  BstrFromVector PROTO STDCALL :DWORD
'#asm'
'#asm'  CharLowerA PROTO STDCALL :DWORD
'#asm'  CharUpperA PROTO STDCALL :DWORD
'#asm'
'#asm'  MultiByteToWideChar PROTO STDCALL :DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD
'#asm'  WideCharToMultiByte PROTO STDCALL :DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD
'#asm'
'#asm'  CP_THREAD_ACP equ 3
'#asm'
'#asm'  HeapAlloc PROTO STDCALL :DWORD,:DWORD,:DWORD
'#asm'  HeapCreate PROTO STDCALL :DWORD,:DWORD,:DWORD
'#asm'  HeapDestroy PROTO STDCALL : DWORD
'#asm'  HeapFree PROTO STDCALL :DWORD,:DWORD,:DWORD
'#asm'  GetProcessHeap PROTO STDCALL
'#asm'
'#asm'  SAFEARRAYBOUND STRUCT DWORD
'#asm'      cElements DWORD ?
'#asm'      lLbound   DWORD ?
'#asm'  SAFEARRAYBOUND ENDS
'#asm'
'#asm'  SAFEARRAY1D   STRUCT      DWORD
'#asm'      cDims       BYTE        ?
'#asm'     fFeatures   BYTE        ?
'#asm'      cbElements  DWORD       ?
'#asm'      cLocks      DWORD       ?
'#asm'      pvData      DWORD       ?
'#asm'      rgsabound   SAFEARRAYBOUND  1 DUP (<>)
'#asm'  SAFEARRAY1D ENDS
'#asm'
'#asm' MAXCHARS equ 256
'#asm'
'#asm'  EXTRN _Assembly:BYTE  ;we need this to access variables that are declared in the module "MStringASM"
'#asm' offset_shift_table  equ 16
'#asm'  offset_LCLUT_ARRAY  equ 16
'#asm'  offset_UCLUT_ARRAY  equ 44
'#asm'  offset_ATWLUT_ARRAY  equ 72
'#asm'  offset_ASCIILUT_ARRAY  equ 100
'#asm'  offset_WTALUT_ARRAY  equ 128

End Sub

Public Function ASMVarPtrLong(ByRef ptr As Long) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'VarPtr for integers
Public Function ASMVarPtrInt(ByRef ptr As Long) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'VarPtr for bytes
Public Function ASMVarPtrByte(ByRef ptr As Byte) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'VarPtr for strings
Public Function ASMVarPtrStr(ByRef ptr As String) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'StrPtr
Public Function ASMStrPtr(ByVal ptr As String) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function
 Public Function ASMStrReverse(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'  push ebp
'#asm'
'#asm'  ;Calculate the string length
'#asm'  mov ebx, [esp+20]
'#asm'  test ebx, ebx
'#asm'  jz ASMStrReverseFinish
'#asm'  mov edi, [ebx-4]
'#asm'  ;Create a new string
'#asm'  INVOKE SysAllocStringByteLen, 0, edi
'#asm'  test eax, eax
'#asm'  jz ASMStrReverseFinish
'#asm'      ;int 3
'#asm'      mov ebp, edi
'#asm'      mov esi, eax
'#asm'      add ebx, edi
'#asm'      ;and ebp, 7
'#asm'      sub ebx, 8
'#asm'      ;add ebp, ebp
'#asm'      sub edi, 8
'#asm'      ;mov ebx, edi
'#asm'      ;ReverseString loop
'#asm'      align 16
'#asm'  @@:
'#asm'      ;prefetchnta [ebx+32]
'#asm'          mov edx, [ebx]
'#asm'          mov ecx, [ebx+4]
'#asm'          rol edx, 16
'#asm'          rol ecx, 16
'#asm'          sub ebx, 8
'#asm'          mov [eax], ecx
'#asm'          mov [eax+4], edx
'#asm'          add eax, 8
'#asm'          sub edi ,8
'#asm'          db 3Eh
'#asm'          jge @B
'#asm'  @@:
'#asm'          test ebp, 7
'#asm'          jz ASMStrReverseFinishResult
'#asm'          add edi, 12
'#asm'          add ebx, 4
'#asm'
'#asm'          mov edx, [ebx]
'#asm'          rol edx, 16
'#asm'          sub ebx, 4
'#asm'          mov [eax], edx
'#asm'          add eax, 4
'#asm'          sub edi, 4
'#asm'
'#asm'          mov ebp, edi
'#asm'          and ebp, 1
'#asm'          ;add ebp, ebp
'#asm'          test ebp, 3
'#asm'          jz ASMStrReverseFinishResult
'#asm'          add edi, 6
'#asm'          add ebx, 2
'#asm'
'#asm'          mov dx, [ebx]
'#asm'          sub ebx, 2
'#asm'          mov [eax], dx
'#asm'          add eax, 2
'#asm'          sub edi, 2
'#asm'
'#asm'  ASMStrReverseFinishResult:
'#asm'      mov eax, esi
'#asm'  ASMStrReverseFinish:
'#asm'  pop ebp
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret 4
End Function

Public Function ASMLen(ByRef sString As String) As Long
'#asm'.pureasm
'#asm'  mov eax,dword ptr [esp+4]    ;eax = pointer to first char of the string
'#asm'  mov eax,[eax]
'#asm'  test eax, eax          ;if eax=0
'#asm'  jz ASMLenFinish                ;then goto ASMLenFinish
'#asm'  mov eax,dword ptr [eax-4]   ;eax = length of the string --- see here is a length
'#asm'  shr eax, 1              ;eax /2 -- divide it by 2, because length of each BSTR char is 2
'#asm'  ASMLenFinish:
'#asm'  ret 4
End Function

Public Function ASMNewString(ByRef sString As String) As String
'#asm'.pureasm
'#asm'
'#asm'  mov ecx, [esp+4]
'#asm'  mov eax,[ecx]           ;eax = pointer to first char of the string
'#asm'  test eax, eax           ;if eax=0
'#asm'  jz strlen               ;then goto strlen
'#asm'  mov eax, [eax-4]        ;eax = length of the string --- see here is a length
'#asm'  shr eax, 1              ;eax /2 -- divide it by 2, because length of each BSTR char is 2
'#asm'  strlen:
'#asm'  INVOKE SysAllocStringLen, [ecx], eax   ;create a new string
'#asm'  ret 4
End Function
Public Function ASMLCaseChr(ByVal iCharacter As Long) As Long
'#asm'.pureasm
'#asm' ;Function for testing purposes
'#asm'  ;int 3
'#asm'  mov ecx, dword ptr _Assembly+offset_LCLUT_ARRAY  ;get an array pointer
'#asm'  ;ASSUME ecx:ptr SAFEARRAY1D
'#asm'  ;mov edx, [ecx].pvData                    ;get pointer to data
'#asm'  mov eax, 0
'#asm'  mov ax, [esp+4]
'#asm'  ;shl eax, 1
'#asm'  mov ax, [ecx+eax*2]                          ;Get array item at item eax
'#asm'  ret 2
End Function
Public Function ASMUCaseChr(ByVal iCharacter As Long) As Long
'#asm'.pureasm
'#asm' ;Function for testing purposes
'#asm'  ;int 3
'#asm'  mov ecx, dword ptr _Assembly+offset_UCLUT_ARRAY  ;get an array pointer
'#asm'  ;ASSUME ecx:ptr SAFEARRAY1D
'#asm'  ;mov edx, [ecx].pvData                    ;get pointer to data
'#asm'  mov eax, 0
'#asm'  mov ax, [esp+4]
'#asm'  ;shl eax, 1
'#asm'  mov ax, [ecx+eax*2]                          ;Get array item at item eax
'#asm'  ret 2
End Function
Public Function ASMLeft(ByVal sString As String, ByVal lCharCount As Long) As String
'#asm'.pureasm
'#asm'  mov eax, [esp+4]
'#asm'  mov ecx, [esp+8]
'#asm'  mov edx, [eax-4]
'#asm'  add ecx, ecx
'#asm'  .IF ecx <= edx
'#asm'      INVOKE SysAllocStringByteLen, eax, ecx
'#asm'  .ELSE
'#asm'      INVOKE SysAllocStringByteLen, eax, edx
'#asm'  .ENDIF
'#asm'
'#asm'  ret 8
End Function
Public Function ASMMid(ByVal sString As String, ByVal lStart As Long, ByVal lCharCount As Long) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  ;int 3
'#asm'  mov eax, [esp+8]
'#asm'  mov ebx, [esp+12]
'#asm'  mov ecx, [esp+16]
'#asm'  mov edx, [eax-4]
'#asm'  sub ebx, 1
'#asm'  add ecx, ecx
'#asm'  add ebx, ebx
'#asm'  add eax, ebx
'#asm'  ;add ebx, ecx
'#asm'  ;int 3
'#asm'  .IF ebx <= edx
'#asm'      add ebx, ecx
'#asm'      ;int 3
'#asm'      .IF ebx > edx
'#asm'          sub ebx, edx
'#asm'          sub ecx, ebx
'#asm'      .ENDIF
'#asm'      INVOKE SysAllocStringByteLen, eax, ecx
'#asm'  .ELSE
'#asm'      INVOKE SysAllocStringByteLen, 0, 0
'#asm'  .ENDIF
'#asm'
'#asm'  pop ebx
'#asm'  ret 12
End Function

Public Function ASMRight(ByVal sString As String, ByVal lCharCount As Long) As String
'#asm'.pureasm
'#asm'  mov eax, [esp+4]
'#asm'  mov edx, [esp+8]
'#asm'  mov ecx, [eax-4]
'#asm'  add edx, edx
'#asm'  .IF edx <= ecx
'#asm'      sub ecx, edx
'#asm'      add eax, ecx
'#asm'      INVOKE SysAllocStringByteLen, eax, edx
'#asm'  .ELSE
'#asm'      INVOKE SysAllocStringByteLen, eax, ecx
'#asm'  .ENDIF
'#asm'
'#asm'  ret 8
End Function
Public Function ASMLCase(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'  push ebp
'#asm'  mov esi, [esp+20]
'#asm'  test esi, esi
'#asm'  db 2Eh
'#asm'  jz ASMLCaseFinish
'#asm'  mov ebx, [esi-4]
'#asm'  test ebx, ebx
'#asm'  db 2Eh
'#asm'  jz ASMLCaseFinish
'#asm'  align 4
'#asm'  INVOKE SysAllocStringByteLen, 0, ebx
'#asm'  push eax
'#asm'  mov ebp, ebx
'#asm'  xor ecx, ecx
'#asm'  xor edx, edx
'#asm'  shr ebx, 2
'#asm'  mov edi, dword ptr _Assembly+offset_LCLUT_ARRAY
'#asm'  align 4
'#asm'  @@:
'#asm'      mov cx, [esi]
'#asm'      mov dx, [esi+2]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov dx, [edi+edx*2]
'#asm'      mov [eax], cx
'#asm'      mov [eax+2], dx
'#asm'      add esi, 4
'#asm'      add eax, 4
'#asm'      sub ebx, 1
'#asm'      db 3Eh
'#asm'      jnz @B
'#asm'
'#asm'  test ebp, 3
'#asm'  db 3Eh
'#asm'  jz @F
'#asm'      mov cx, [esi]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov [eax], cx
'#asm'
'#asm'  @@:
'#asm'  pop eax
'#asm'  ASMLCaseFinish:
'#asm'  pop ebp
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret 4
End Function
Public Function ASMUCase(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'  push ebp
'#asm'  mov esi, [esp+20]
'#asm'  test esi, esi
'#asm'  db 2Eh
'#asm'  jz ASMUCaseFinish
'#asm'  mov ebx, [esi-4]
'#asm'  test ebx, ebx
'#asm'  db 2Eh
'#asm'  jz ASMUCaseFinish
'#asm'  align 4
'#asm'  INVOKE SysAllocStringByteLen, 0, ebx
'#asm'  push eax
'#asm'  mov ebp, ebx
'#asm'  xor ecx, ecx
'#asm'  xor edx, edx
'#asm'  shr ebx, 2
'#asm'  mov edi, dword ptr _Assembly+offset_UCLUT_ARRAY
'#asm'  align 4
'#asm'  @@:
'#asm'      mov cx, [esi]
'#asm'      mov dx, [esi+2]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov dx, [edi+edx*2]
'#asm'      mov [eax], cx
'#asm'      mov [eax+2], dx
'#asm'      add esi, 4
'#asm'      add eax, 4
'#asm'      sub ebx, 1
'#asm'      db 3Eh
'#asm'      jnz @B
'#asm'
'#asm'  test ebp, 3
'#asm'  db 3Eh
'#asm'  jz @F
'#asm'      mov cx, [esi]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov [eax], cx
'#asm'
'#asm'  @@:
'#asm'  pop eax
'#asm'  ASMUCaseFinish:
'#asm'  pop ebp
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret 4
End Function
Public Function ASMChrW(ByVal iNumber As Long) As String
'#asm'.pureasm
'#asm' ;int 3
'#asm' INVOKE SysAllocStringByteLen, 0, 2
'#asm' mov edx, [esp+4]
'#asm' mov [eax], dx
'#asm' ret 4
End Function
Public Function ASMAscW(ByVal sString As String) As Integer
'#asm'.pureasm
'#asm' mov eax, [esp+4]
'#asm' movzx eax, word ptr [eax]
'#asm' ret 4
End Function
Public Function ASMChr(ByVal bNumber As Byte) As String
'#asm'.pureasm
'#asm' ;int 3
'#asm' INVOKE SysAllocStringByteLen, 0, 2
'#asm' mov edx, [esp+4]
'#asm' mov ecx, dword ptr _Assembly+offset_ATWLUT_ARRAY
'#asm' movzx ecx, word ptr [ecx+edx*2]
'#asm' mov [eax], ecx
'#asm' ret 4
End Function
Public Function ASMAsc(ByVal sString As String) As Byte
'#asm'.pureasm
'#asm' ;int 3
'#asm' push edi
'#asm' mov eax, [esp+8]
'#asm' mov edi, dword ptr _Assembly+offset_WTALUT_ARRAY
'#asm' mov eax, [eax]
'#asm' test eax, eax
'#asm' jz @F
'#asm' movzx eax, byte ptr [edi+eax]
'#asm' test eax, eax
'#asm' jnz @F
'#asm' mov eax, 63
'#asm' @@:
'#asm' pop edi
'#asm' ret 4
End Function
Public Function ASMRTrim(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push edi
'#asm'  ;std
'#asm'  ;int 3
'#asm'  mov edx, [esp+8]
'#asm'  mov ecx, [edx-4]
'#asm'  test ecx,ecx
'#asm'  jz ASMRTrimFinish
'#asm'  mov edi, edx
'#asm'  ;mov eax, 32
'#asm'  add edi, ecx
'#asm'  sub edi, 2
'#asm'  shr ecx, 1
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  sub edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  ;repe scasw
'#asm'  add ecx, 1
'#asm'  ;cld
'#asm'  ASMRTrimFinish:
'#asm'  INVOKE SysAllocStringLen, edx, ecx
'#asm'  pop edi
'#asm'  ret 4
End Function
Public Function ASMLTrim(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push edi
'#asm'  ;int 3
'#asm'  mov edi, [esp+8]
'#asm'  mov ecx, [edi-4]
'#asm'  test ecx,ecx
'#asm'  jz ASMLTrimFinish
'#asm'  shr ecx, 1
'#asm'  ;mov eax, 32
'#asm'  ;repe scasw
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  add edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  add ecx, 1
'#asm'  sub edi, 2
'#asm'  ASMLTrimFinish:
'#asm'  INVOKE SysAllocStringLen, edi, ecx
'#asm'  pop edi
'#asm'  ret 4
End Function
Public Function ASMTrim(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push edi
'#asm'  ;int 3
'#asm'  mov edx, [esp+8]
'#asm'  mov ecx, [edx-4]
'#asm'  test ecx,ecx
'#asm'  jz ASMTrimFinish
'#asm'
'#asm'  mov edi, edx
'#asm'  ;mov eax, 32
'#asm'  shr ecx, 1
'#asm'  ;repe scasw
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  add edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  add ecx, 1
'#asm'  sub edi, 2
'#asm'  mov edx, edi
'#asm'  ;std
'#asm'  lea edi, [edi+ecx*2-2]
'#asm'  ;repe scasw
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  sub edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  add ecx, 1
'#asm'  ;cld
'#asm'  ASMTrimFinish:
'#asm'  INVOKE SysAllocStringLen, edx, ecx
'#asm'  pop edi
'#asm'  ret 4
End Function
Public Sub ASMCreateCaseConversionTable()
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'
'#asm'  mov ebx, 0FFFFh
'#asm'  mov esi, dword ptr _Assembly+offset_UCLUT_ARRAY
'#asm'  mov edi, dword ptr _Assembly+offset_LCLUT_ARRAY
'#asm'  ;int 3
'#asm'
'#asm'  @@:
'#asm'  INVOKE CharLowerA, ebx
'#asm'  mov [edi+ebx*2], ax
'#asm'  INVOKE CharUpperA, ebx
'#asm'  mov [esi+ebx*2], ax
'#asm'  sub ebx, 1
'#asm'  jnz @B
'#asm'  ;int 3
'#asm'  ;mov esi, dword ptr _Assembly+offset_ATWLUT_ARRAY
'#asm'  xor eax, eax
'#asm'  mov esi, dword ptr _Assembly+offset_ATWLUT_ARRAY
'#asm'  mov edi, dword ptr _Assembly+offset_ASCIILUT_ARRAY
'#asm'  mov ebx, dword ptr _Assembly+offset_WTALUT_ARRAY
'#asm'  ;int 3
'#asm'  @@:
'#asm'  mov [edi+eax], eax
'#asm'  add eax, 1
'#asm'  cmp eax, 256
'#asm'  jnz @B
'#asm'  INVOKE MultiByteToWideChar,CP_THREAD_ACP,0,edi,256,esi,512
'#asm'  xor eax, eax
'#asm'  xor ecx, ecx
'#asm'  ;int 3
'#asm'  @@:
'#asm'  movzx eax, word ptr [esi+ecx*2]
'#asm'  mov [ebx+eax], ax
'#asm'  add ecx, 1
'#asm'  cmp ecx, 256
'#asm'  jnz @B
'#asm'
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret
End Sub

Public Sub ASMvbaCopyBytes(ByVal Length As Long, ByVal Destination As Long, ByVal Source As Long)

'#asm'  ;.pureasm
'#asm'
'#asm'  mov ecx, [esp+4]        ;1  - ecx = 1.param
'#asm'  push esi                ;2  - save esi
'#asm'  mov esi, [esp+16]       ;3  - esi = 3.param
'#asm'  push edi                ;4  - save edi
'#asm'  mov edi, [esp+16]       ;5  - edi = 2.param
'#asm'  mov eax, ecx            ;6  - eax = ecx
'#asm'  mov edx, edi            ;7  - edx = edi
'#asm'  shr ecx, 2              ;8  - ecx = ecx/4
'#asm'  rep movsd               ;9  - perform dword-copy
'#asm'  mov ecx, eax            ;10 - ecx = eax
'#asm'  mov eax, edx            ;11 - eax = edx
'#asm'  and ecx, 3              ;12 - ecx = ecx mod 4
'#asm'  rep movsb               ;13 - perform byte copy
'#asm'  pop edi                 ;14 - restore edi
'#asm'  pop esi                 ;15 - restore esi
'#asm'  retn 12                 ;16 - return
'#asm'

End Sub

Public Function Inc(ByVal a As Long) As Long

'#asm'
'#asm'  mov eax,[esp+4]   ;eax = a
'#asm'  inc eax ; 1 ;[esp+8]   ;eax = eax + b
'#asm'  ret 4              ;remove parameters from the stack
'#asm'

End Function

Public Function Dec(ByVal a As Long) As Long

'#asm'
'#asm'  mov eax,[esp+4]   ;eax = a
'#asm'  dec eax ; 1 ;[esp+8]   ;eax = eax + b
'#asm'  ret 4              ;remove parameters from the stack
'#asm'

End Function

Public Sub InitAssembly()
    ASMCreateCaseConversionTable
End Sub

[/code]

Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 11:44:05 AM
Kode: [Pilih]
Sorry yang diatas, salah,,
Ni kode fungsi,


[code]Public TempDb As String
Public Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long

Public Const TH32CS_SNAPHEAPLIST = &H1
Public Const TH32CS_SNAPPROCESS = &H2
Public Const TH32CS_SNAPTHREAD = &H4
Public Const TH32CS_SNAPMODULE = &H8
Public Const TH32CS_SNAPALL = (TH32CS_SNAPHEAPLIST Or TH32CS_SNAPPROCESS Or TH32CS_SNAPTHREAD Or TH32CS_SNAPMODULE)
Public Const TH32CS_INHERIT = &H80000000
Public Const MAX_PATH As Integer = 260
Public Type PROCESSENTRY32
    dwSize As Long
    cntUsage As Long
    th32ProcessID As Long
    th32DefaultHeapID As Long
    th32ModuleID As Long
    cntThreads As Long
    th32ParentProcessID As Long
    pcPriClassBase As Long
    dwFlags As Long
    szExeFile As String * MAX_PATH
End Type
Public Declare Function CreateToolhelp32Snapshot Lib "kernel32" (ByVal lFlags As Long, ByVal lProcessID As Long) As Long
Public Declare Function Process32First Lib "kernel32" (ByVal hSnapShot As Long, uProcess As PROCESSENTRY32) As Long
Public Declare Function Process32Next Lib "kernel32" (ByVal hSnapShot As Long, uProcess As PROCESSENTRY32) As Long
Public Declare Function OpenProcess Lib "kernel32.dll" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Public Declare Function TerminateProcess Lib "kernel32.dll" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Public Declare Function CloseHandle Lib "kernel32.dll" (ByVal hHandle As Long) As Long
Public Const PROCESS_ALL_ACCESS = &H1F0FFF
'Enum the path
Public Const PROCESS_QUERY_INFORMATION As Long = &H400
Public Const PROCESS_VM_READ = &H10
Public Declare Function EnumProcessModules Lib "psapi.dll" ( _
    ByVal hProcess As Long, _
    ByRef lphModule As Long, _
    ByVal cb As Long, _
    ByRef cbNeeded As Long) As Long
Public Declare Function GetModuleFileNameExA Lib "psapi.dll" ( _
    ByVal hProcess As Long, _
    ByVal hModule As Long, _
    ByVal ModuleName As String, _
    ByVal nSize As Long) As Long
 Public ProcessID(100) As Long
 Public path(100) As String
 Public jmlProcess As Integer
 
 

Public Declare Function MoveFile Lib "kernel32" Alias "MoveFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String) As Long

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long


Public Const BIF_RETURNONLYFSDIRS = 1
Public Const BIF_DONTGOBELOWDOMAIN = 2
Declare Function SHBrowseForFolder Lib _
"shell32" (lpbi As BrowseInfo) As Long
Declare Function SHGetPathFromIDList Lib "shell32" (ByVal pidList _
As Long, ByVal lpBuffer As String) As Long
Declare Function lstrcat Lib "kernel32" _
Alias "lstrcatA" (ByVal lpString1 As String, ByVal _
lpString2 As String) As Long
Public Type BrowseInfo
hWndOwner As Long
pIDLRoot As Long
pszDisplayName As Long
lpszTitle As Long
ulFlags As Long
lpfnCallback As Long
lParam As Long
iImage As Long
End Type
[/code]
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 02, 2010, 12:37:12 PM
ok dah,, kita lg nyari rumah dulu,,
nanti dikabariiii,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Maret 02, 2010, 12:58:05 PM
Kode: [Pilih]
[code]Ni Module Assembly n Fungsi
Private miaLCaseTable(0 To 65535) As Long
Private miaUCaseTable(0 To 65535) As Long
Private miaAsciiToUnicodeTable(0 To 255) As Long
Private miaAsciiTable(0 To 255) As Byte
Private miaUnicodeToAsciiTable(0 To 65535) As Byte
Private miaShiftTable(256) As Long

Private Sub ASM_DEF()
'#asm'  ;option scoped
'#asm'  .686p
'#asm'  .mmx
'#asm'  .xmm
'#asm'  .model flat, stdcall
'#asm'  includelib c:\masm32\lib\kernel32.lib
'#asm'  includelib c:\masm32\lib\oleaut32.lib
'#asm'  includelib c:\masm32\lib\user32.lib
'#asm'
'#asm'  SysAllocString PROTO STDCALL :DWORD
'#asm'  SysAllocStringByteLen PROTO STDCALL :DWORD, :DWORD
'#asm'  SysAllocStringLen PROTO STDCALL :DWORD, :DWORD
'#asm'  SysFreeString PROTO STDCALL :DWORD
'#asm'  SysReAllocString PROTO STDCALL :DWORD, :DWORD
'#asm'  SysReAllocStringLen PROTO STDCALL :DWORD, :DWORD, :DWORD
'#asm'  SysStringByteLen PROTO STDCALL :DWORD
'#asm'  SysStringLen PROTO STDCALL :DWORD
'#asm'
................
...................
....................
...................
.................


'#asm'  mov ecx, eax            ;10 - ecx = eax
'#asm'  mov eax, edx            ;11 - eax = edx
'#asm'  and ecx, 3              ;12 - ecx = ecx mod 4
'#asm'  rep movsb               ;13 - perform byte copy
'#asm'  pop edi                 ;14 - restore edi
'#asm'  pop esi                 ;15 - restore esi
'#asm'  retn 12                 ;16 - return
'#asm'

End Sub

Public Function Inc(ByVal a As Long) As Long

'#asm'
'#asm'  mov eax,[esp+4]   ;eax = a
'#asm'  inc eax ; 1 ;[esp+8]   ;eax = eax + b
'#asm'  ret 4              ;remove parameters from the stack
'#asm'

End Function

Public Function Dec(ByVal a As Long) As Long

'#asm'
'#asm'  mov eax,[esp+4]   ;eax = a
'#asm'  dec eax ; 1 ;[esp+8]   ;eax = eax + b
'#asm'  ret 4              ;remove parameters from the stack
'#asm'

End Function

Public Sub InitAssembly()
    ASMCreateCaseConversionTable
End Sub

[/code]


ini pake ThunderVB kan?....
coba kamu fokus pada peningkatan kecepatan scanning pake engine APTX..(menggunakan Assmbly+ThunderVB)...

ini di butuhkan pada project ini...silahkan kamu perdalam dulu...
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 01:28:10 PM
Iya, tapi kalo khusus meningkatkan speed scan, ada ni,,

Modules

Kode: [Pilih]
'// CPU Booster ... menambah kec. kerja ... hingga 5x By Frostmaster
Public Function CopyToMemory(ByVal Destination As Long, ByVal Source As Long, ByVal Length As Long)

    Set mem = New cCPUBooster
   
    If nSIMD > esMMX Then
        Call mem.CopyMemSSE(Source, Destination, Length)
    ElseIf nSIMD > esNone Then
        Call mem.CopyMemMMX(Source, Destination, Length)
    Else
        Call ASMvbaCopyBytes(Length, Destination, Source)
    End If
End Function

Ni Class modulenya
Kode: [Pilih]
Option Explicit

Public Enum eSIMD_Support
  esNone = 0
  esMMX
  esSSE
  esSSE2
  esSSE3
End Enum

'Private Declare Sub vbaCopyBytes Lib "msvbvm60" Alias "__vbaCopyBytes" (ByVal Length As Long, ByRef Dest As Any, ByRef Src As Any)
'Private Declare Sub RtlMoveMemory Lib "kernel32" (Destination As Any, Source As Any, ByVal Length As Long)
'Private Declare Sub RtlFillMemory Lib "kernel32" (Destination As Any, ByVal Length As Long, ByVal Fill As Byte)

Private Const CODE_SIMD_LVL As String = "9C580FBAF815509D9C5A31D0740431C0EB2753B8010000000FA231C00FBAE2177316400FBAE219730F400FBAE21A7308400FBAE1007301405B8B542408890231C0C20800"
Private Const CODE_COPY_MMX As String = "56578B7C24108B7424148B4C241889C829F929C183E10729C87E210F77F3A489C183E007C1E903741329F70F6F060F7F043783C6084975F301F70F7701C1F3A45F5EC21000"
Private Const CODE_COPY_SSE As String = "56578B7C24108B7424148B4C241889C829F929C183E10F29C87E230F77F3A489C183E00FC1E904741529F7660F6F06660F7F043783C6104975F10F7701F701C1F3A45F5EC21000"
Private Const CODE_FILL_MMX As String = "578B7C240C8B4424108B54241489D1C1E10809CA89D1C1E21009CA89F983E10729C8E30A881783C70183E90175F689C183E007C1E90374180F7752520F6F042483C4080F7F0783C70883E90175F50F7789C1E30A881783C70183E90175F65FC21000"
Private Const CODE_FILL_SSE As String = "578B7C240C8B4424108B54241489D1C1E10809CA89D1C1E21009CA89F983E10F29C8E30A881783C70183E90175F689C183E00FC1E904741B0F7752525252660F6F042483C4100F7F0783C71083E90175F50F7789C1E30A881783C70183E90175F65FC21000"

Private pMe     As Long
Private nEntry  As Long
Private sCode() As String

Private Sub Class_Initialize()
  Dim nSIMD As eSIMD_Support
 
  'Call RtlMoveMemory(pMe, ByVal ObjPtr(Me), 4)
  Call ASMvbaCopyBytes(4, pMe, ByVal ObjPtr(Me))
  Call Redirect(CODE_SIMD_LVL)
 
  nSIMD = SIMD_Support
  If nSIMD > esNone Then
   
    Call Redirect(CODE_COPY_MMX)
    Call Redirect(CODE_FILL_MMX)
    If nSIMD >= esSSE Then Call Redirect(CODE_COPY_SSE)
   
  End If
     
End Sub

Public Function SIMD_Support() As eSIMD_Support
End Function

Public Sub CopyMemMMX(ByVal Source As Long, ByVal Destination As Long, ByVal Length As Long)
  'Call RtlMoveMemory(ByVal Source, ByVal Destination, Length)
  Call ASMvbaCopyBytes(Length, ByVal Destination, ByVal Source)
End Sub

'Public Sub FillMemMMX(ByVal Source As Long, ByVal Length As Long, ByVal Fill As Byte)
'  Call RtlFillMemory(ByVal Source, Length, Fill)
'End Sub

Public Sub CopyMemSSE(ByVal Source As Long, ByVal Destination As Long, ByVal Length As Long)
  'Call RtlMoveMemory(ByVal Source, ByVal Destination, Length)
  Call ASMvbaCopyBytes(Length, ByVal Destination, ByVal Source)
End Sub

'Public Sub FillMemSSE(ByVal Source As Long, ByVal Length As Long, ByVal Fill As Byte)
'  Call RtlFillMemory(ByVal Source, Length, Fill)
'End Sub

Private Sub Redirect(ByVal sHexCode As String)
  Dim i     As Long
  Dim nLen  As Long
  Dim s     As String
 
  nLen = LenB(sHexCode)
 
  For i = 1 To nLen Step 2
    s = s & ASMChr(Val("&H" & ASMMid(sHexCode, i, 2)))
  Next
 
  ReDim Preserve sCode(0 To nEntry)
  sCode(nEntry) = s
  'Call RtlMoveMemory(ByVal pMe + &H1C + (nEntry * 4), StrPtr(sCode(nEntry)), 4)
  Call ASMvbaCopyBytes(4, ByVal pMe + &H1C + (nEntry * 4), StrPtr(sCode(nEntry)))
 
  nEntry = Inc(nEntry) ' + 1
End Sub

Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 02, 2010, 02:24:05 PM
Sory baru OL
Soalnya sya ada tugas yg harus dikerjakan lagi_________

Oh, ya sya dgr dri CazSD katanya ada mw gabung ke Forum kita ya____

Btw biar sya aja yg menganalisan calon anggota TIM kita___

Sya akan melakukan testing

Soalnya jika kita menggunakan cheksum MD5 dengan versi al virus dengan versi FrostMaster akan berubah nilai hash dari value virus utk databsenya nanti____

Sya harap FrostMaster Bersiap2 soalnya dia akan sy testing dengan testing yg agak cocok utk programer___

Mulai sekarang jika ada yang mau gabung ke AV kita harap hubungi
- Jika ingin menjadi programer, enginering, Fixer av kami harap hubungi Saya ( FAKHRICKER )
- Jika ingin menjadi divisi Design Sma om Harboot
- Jika ingin menjadi TIM Viser hubungi om ChasZD dan b_Agoy

Kita akan buat TIM tambahan yaitu pemasaran AV kita kebeberapa situs dan SE ( Search Engine )__
Jika ada yg mau gabung contact Sya aja____

No HP sya: 081396748758
Oke no Miscall____

Oke sya lagi buat program dgn VB 6.0 Utk membongkar database eksternal kita___
Sya harapkan kita menggunakan engine dri al virusscan____
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 02, 2010, 02:26:47 PM
Oh ya jka ada yg yg kurang berkenan di hati anda tentang ys sya buat di atas___
Silahkan ngomong aja___
Jgn sungkan2  :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 02, 2010, 02:29:33 PM
semua team lewat fakh dan bagoy aja,,
sementara gak usah promosi dan lain2 dulu,,

AVnya aja blom jadi,, :(

yang penting niatnya juga coiii,,
klo pintar lalu kita ditinggal gmn??

Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 02:34:19 PM
Siap bro
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 02, 2010, 02:48:58 PM
Kita ambil Heuristik ma RTP dari al juga ya bro???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Maret 02, 2010, 07:26:51 PM
kalau rtpnya mungkin bisa baca tutor gue disini tentang hooking
http://www.jasakom.com/content.php?393-Hooking-With-Import-Table-Patching-in-Delphi

kalau gak mengerti pm gue aja ;)

btw design patternnya bagaimana ??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Maret 02, 2010, 07:46:34 PM
kalau rtpnya mungkin bisa baca tutor gue disini tentang hooking
http://www.jasakom.com/content.php?393-Hooking-With-Import-Table-Patching-in-Delphi

kalau gak mengerti pm gue aja ;)

btw design patternnya bagaimana ??

thanks atas infonya bro.. akan kami pelajari dulu... :-bd :-bd :-bd

untuk pengembangan ke tahap Advanced mungkin kami akan butuh saran2 dari bro meong....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 02, 2010, 08:25:33 PM
semua team lewat fakh dan bagoy aja,,
sementara gak usah promosi dan lain2 dulu,,

AVnya aja blom jadi,, :(

yang penting niatnya juga coiii,,
klo pintar lalu kita ditinggal gmn??


Ya om_______
Jgan gtu dg______
Kita masih membutuhkan semua TIM______

Sya harap TIM kita slalu ada selama AV ini masih Ada di Dunia ini______
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 02, 2010, 08:43:01 PM
salah tanggap niih,,
maksud gw terima anggota tim baru lewat fakhri dan bagoy,,
fakhri bisa tes program, bagoy tes wawasan dan sosial,,

fakhri,, gak enakz klo kita bahas tll banyak disini,,
pindah rumah baru giiih,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 02, 2010, 09:08:23 PM
Oke bos_______

Kalau ad yg mw joint di TIm BAV contact sya atau b_agoy ya________
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Maret 03, 2010, 01:41:55 AM
mas harboot mungkin sebelum coding bisa diperjelas dulu design patternnya. misalnya pada engine : feture xx,feture yyy. nah ini gunanya biar ntar pass coding permasalahan bisa dipecah2 menjadi bagian kecil. ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 03, 2010, 05:48:02 AM
@meong,, ya kita sudah mulai coding,,
dan kita bahas 1 per 1 koq,,

skrg lg fokus dgn scannernya dulu,,
(coz ini yg utama),,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 03, 2010, 06:55:37 AM
Yupz, biar bs dpke dlu ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 03, 2010, 11:25:14 AM
Sya lagi Ngasih Gambaran Utk interface_____
Sya harapkan semua ngumpul di forum TIM
Oke TIM

Om frost lagi saya test kemampuan dia______
 :D :D :D :D

tguu hasilnya________
 :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 03, 2010, 02:40:22 PM
@Up:
Udah bro.... ;)

@All:
Bagi yg mau gbung PM gw,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: meong pada Maret 03, 2010, 08:48:35 PM
harboot : ya sudah ini menurut saya ada 2 method untuk scan

baca lansung dari hardisk atau map to memory :

kekurangan dan keuntungan :

baca hardisk :
- tidak membutuhkan memory yang banyak
- process pencarian lambat karena tergantung dari kecepatan hardisk membaca

map to memory :
- membutuhkan memory yang banyak (sesuai besar dari file).
- process pencarian cepat

so mau pilih mana ?? :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 03, 2010, 08:59:34 PM
map to memory mirip kinerja cheksum L43 G.2 Scan cepat tapi dia makan banyak resource RAM________
 :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 04, 2010, 10:37:51 AM
Tugas pertama apa???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 04, 2010, 11:22:09 AM
@Up:
Sbntar bro, ntr klo udah deal gw kabarin yah,,, ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 04, 2010, 01:36:03 PM
Deal apa bro???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ChazSD pada Maret 04, 2010, 02:09:29 PM
Deal apa bro???

nunggu kabar dari Fahkri....

gimana bro soal thunderVB + Assembly kemaren?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Maret 04, 2010, 02:32:06 PM
Kode: [Pilih]
Setelah dilihat dan dites menggunakan beberapa antivirus yang open source (SmadΔV 2.3 , Fajr Anvi 4, dan Navi) setingan yang paling cepat untuk APTX adalah
[code]
'//Powered by ThunderVB and MASM
'//APTX Function for optimaze scanning process
'//Edited by Frostmaster 2010


Option Explicit


Private miaLCaseTable(0 To 65535) As Long
Private miaUCaseTable(0 To 65535) As Long
Private miaAsciiToUnicodeTable(0 To 255) As Long
Private miaAsciiTable(0 To 255) As Byte
Private miaUnicodeToAsciiTable(0 To 65535) As Byte
Private miaShiftTable(256) As Long

Private Sub ASM_DEF()
'#asm'  ;option scoped
'#asm'  .686p
'#asm'  .mmx
'#asm'  .xmm
'#asm'  .model flat, stdcall
'#asm'  includelib c:\masm32\lib\kernel32.lib
'#asm'  includelib c:\masm32\lib\oleaut32.lib
'#asm'  includelib c:\masm32\lib\user32.lib
'#asm'
'#asm'  SysAllocString PROTO STDCALL :DWORD
'#asm'  SysAllocStringByteLen PROTO STDCALL :DWORD, :DWORD
'#asm'  SysAllocStringLen PROTO STDCALL :DWORD, :DWORD
'#asm'  SysFreeString PROTO STDCALL :DWORD
'#asm'  SysReAllocString PROTO STDCALL :DWORD, :DWORD
'#asm'  SysReAllocStringLen PROTO STDCALL :DWORD, :DWORD, :DWORD
'#asm'  SysStringByteLen PROTO STDCALL :DWORD
'#asm'  SysStringLen PROTO STDCALL :DWORD
'#asm'
'#asm'  VectorFromBstr PROTO STDCALL :DWORD
'#asm'  BstrFromVector PROTO STDCALL :DWORD
'#asm'
'#asm'  CharLowerA PROTO STDCALL :DWORD
'#asm'  CharUpperA PROTO STDCALL :DWORD
'#asm'
'#asm'  MultiByteToWideChar PROTO STDCALL :DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD
'#asm'  WideCharToMultiByte PROTO STDCALL :DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD
'#asm'
'#asm'  CP_THREAD_ACP equ 3
'#asm'
'#asm'  HeapAlloc PROTO STDCALL :DWORD,:DWORD,:DWORD
'#asm'  HeapCreate PROTO STDCALL :DWORD,:DWORD,:DWORD
'#asm'  HeapDestroy PROTO STDCALL : DWORD
'#asm'  HeapFree PROTO STDCALL :DWORD,:DWORD,:DWORD
'#asm'  GetProcessHeap PROTO STDCALL
'#asm'
'#asm'  SAFEARRAYBOUND STRUCT DWORD
'#asm'      cElements DWORD ?
'#asm'      lLbound   DWORD ?
'#asm'  SAFEARRAYBOUND ENDS
'#asm'
'#asm'  SAFEARRAY1D   STRUCT      DWORD
'#asm'      cDims       BYTE        ?
'#asm'     fFeatures   BYTE        ?
'#asm'      cbElements  DWORD       ?
'#asm'      cLocks      DWORD       ?
'#asm'      pvData      DWORD       ?
'#asm'      rgsabound   SAFEARRAYBOUND  1 DUP (<>)
'#asm'  SAFEARRAY1D ENDS
'#asm'
'#asm' MAXCHARS equ 256
'#asm'
'#asm'  EXTRN _Assembly:BYTE  ;we need this to access variables that are declared in the module "MStringASM"
'#asm' offset_shift_table  equ 16
'#asm'  offset_LCLUT_ARRAY  equ 16
'#asm'  offset_UCLUT_ARRAY  equ 44
'#asm'  offset_ATWLUT_ARRAY  equ 72
'#asm'  offset_ASCIILUT_ARRAY  equ 100
'#asm'  offset_WTALUT_ARRAY  equ 128

End Sub

Public Function ASMVarPtrLong(ByRef ptr As Long) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'VarPtr for integers
Public Function ASMVarPtrInt(ByRef ptr As Long) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'VarPtr for bytes
Public Function ASMVarPtrByte(ByRef ptr As Byte) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'VarPtr for strings
Public Function ASMVarPtrStr(ByRef ptr As String) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function

'StrPtr
Public Function ASMStrPtr(ByVal ptr As String) As Long
'#asm'.pureasm

'#asm'
'#asm'  mov eax, [esp+4]
'#asm'  ret 4
'#asm'

End Function
 Public Function ASMStrReverse(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'  push ebp
'#asm'
'#asm'  ;Calculate the string length
'#asm'  mov ebx, [esp+20]
'#asm'  test ebx, ebx
'#asm'  jz ASMStrReverseFinish
'#asm'  mov edi, [ebx-4]
'#asm'  ;Create a new string
'#asm'  INVOKE SysAllocStringByteLen, 0, edi
'#asm'  test eax, eax
'#asm'  jz ASMStrReverseFinish
'#asm'      ;int 3
'#asm'      mov ebp, edi
'#asm'      mov esi, eax
'#asm'      add ebx, edi
'#asm'      ;and ebp, 7
'#asm'      sub ebx, 8
'#asm'      ;add ebp, ebp
'#asm'      sub edi, 8
'#asm'      ;mov ebx, edi
'#asm'      ;ReverseString loop
'#asm'      align 16
'#asm'  @@:
'#asm'      ;prefetchnta [ebx+32]
'#asm'          mov edx, [ebx]
'#asm'          mov ecx, [ebx+4]
'#asm'          rol edx, 16
'#asm'          rol ecx, 16
'#asm'          sub ebx, 8
'#asm'          mov [eax], ecx
'#asm'          mov [eax+4], edx
'#asm'          add eax, 8
'#asm'          sub edi ,8
'#asm'          db 3Eh
'#asm'          jge @B
'#asm'  @@:
'#asm'          test ebp, 7
'#asm'          jz ASMStrReverseFinishResult
'#asm'          add edi, 12
'#asm'          add ebx, 4
'#asm'
'#asm'          mov edx, [ebx]
'#asm'          rol edx, 16
'#asm'          sub ebx, 4
'#asm'          mov [eax], edx
'#asm'          add eax, 4
'#asm'          sub edi, 4
'#asm'
'#asm'          mov ebp, edi
'#asm'          and ebp, 1
'#asm'          ;add ebp, ebp
'#asm'          test ebp, 3
'#asm'          jz ASMStrReverseFinishResult
'#asm'          add edi, 6
'#asm'          add ebx, 2
'#asm'
'#asm'          mov dx, [ebx]
'#asm'          sub ebx, 2
'#asm'          mov [eax], dx
'#asm'          add eax, 2
'#asm'          sub edi, 2
'#asm'
'#asm'  ASMStrReverseFinishResult:
'#asm'      mov eax, esi
'#asm'  ASMStrReverseFinish:
'#asm'  pop ebp
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret 4
End Function

Public Function ASMLen(ByRef sString As String) As Long
'#asm'.pureasm
'#asm'  mov eax,dword ptr [esp+4]    ;eax = pointer to first char of the string
'#asm'  mov eax,[eax]
'#asm'  test eax, eax          ;if eax=0
'#asm'  jz ASMLenFinish                ;then goto ASMLenFinish
'#asm'  mov eax,dword ptr [eax-4]   ;eax = length of the string --- see here is a length
'#asm'  shr eax, 1              ;eax /2 -- divide it by 2, because length of each BSTR char is 2
'#asm'  ASMLenFinish:
'#asm'  ret 4
End Function

Public Function ASMNewString(ByRef sString As String) As String
'#asm'.pureasm
'#asm'
'#asm'  mov ecx, [esp+4]
'#asm'  mov eax,[ecx]           ;eax = pointer to first char of the string
'#asm'  test eax, eax           ;if eax=0
'#asm'  jz strlen               ;then goto strlen
'#asm'  mov eax, [eax-4]        ;eax = length of the string --- see here is a length
'#asm'  shr eax, 1              ;eax /2 -- divide it by 2, because length of each BSTR char is 2
'#asm'  strlen:
'#asm'  INVOKE SysAllocStringLen, [ecx], eax   ;create a new string
'#asm'  ret 4
End Function
Public Function ASMLCaseChr(ByVal iCharacter As Long) As Long
'#asm'.pureasm
'#asm' ;Function for testing purposes
'#asm'  ;int 3
'#asm'  mov ecx, dword ptr _Assembly+offset_LCLUT_ARRAY  ;get an array pointer
'#asm'  ;ASSUME ecx:ptr SAFEARRAY1D
'#asm'  ;mov edx, [ecx].pvData                    ;get pointer to data
'#asm'  mov eax, 0
'#asm'  mov ax, [esp+4]
'#asm'  ;shl eax, 1
'#asm'  mov ax, [ecx+eax*2]                          ;Get array item at item eax
'#asm'  ret 2
End Function
Public Function ASMUCaseChr(ByVal iCharacter As Long) As Long
'#asm'.pureasm
'#asm' ;Function for testing purposes
'#asm'  ;int 3
'#asm'  mov ecx, dword ptr _Assembly+offset_UCLUT_ARRAY  ;get an array pointer
'#asm'  ;ASSUME ecx:ptr SAFEARRAY1D
'#asm'  ;mov edx, [ecx].pvData                    ;get pointer to data
'#asm'  mov eax, 0
'#asm'  mov ax, [esp+4]
'#asm'  ;shl eax, 1
'#asm'  mov ax, [ecx+eax*2]                          ;Get array item at item eax
'#asm'  ret 2
End Function
Public Function ASMLeft(ByVal sString As String, ByVal lCharCount As Long) As String
'#asm'.pureasm
'#asm'  mov eax, [esp+4]
'#asm'  mov ecx, [esp+8]
'#asm'  mov edx, [eax-4]
'#asm'  add ecx, ecx
'#asm'  .IF ecx <= edx
'#asm'      INVOKE SysAllocStringByteLen, eax, ecx
'#asm'  .ELSE
'#asm'      INVOKE SysAllocStringByteLen, eax, edx
'#asm'  .ENDIF
'#asm'
'#asm'  ret 8
End Function
Public Function ASMMid(ByVal sString As String, ByVal lStart As Long, ByVal lCharCount As Long) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  ;int 3
'#asm'  mov eax, [esp+8]
'#asm'  mov ebx, [esp+12]
'#asm'  mov ecx, [esp+16]
'#asm'  mov edx, [eax-4]
'#asm'  sub ebx, 1
'#asm'  add ecx, ecx
'#asm'  add ebx, ebx
'#asm'  add eax, ebx
'#asm'  ;add ebx, ecx
'#asm'  ;int 3
'#asm'  .IF ebx <= edx
'#asm'      add ebx, ecx
'#asm'      ;int 3
'#asm'      .IF ebx > edx
'#asm'          sub ebx, edx
'#asm'          sub ecx, ebx
'#asm'      .ENDIF
'#asm'      INVOKE SysAllocStringByteLen, eax, ecx
'#asm'  .ELSE
'#asm'      INVOKE SysAllocStringByteLen, 0, 0
'#asm'  .ENDIF
'#asm'
'#asm'  pop ebx
'#asm'  ret 12
End Function

Public Function ASMRight(ByVal sString As String, ByVal lCharCount As Long) As String
'#asm'.pureasm
'#asm'  mov eax, [esp+4]
'#asm'  mov edx, [esp+8]
'#asm'  mov ecx, [eax-4]
'#asm'  add edx, edx
'#asm'  .IF edx <= ecx
'#asm'      sub ecx, edx
'#asm'      add eax, ecx
'#asm'      INVOKE SysAllocStringByteLen, eax, edx
'#asm'  .ELSE
'#asm'      INVOKE SysAllocStringByteLen, eax, ecx
'#asm'  .ENDIF
'#asm'
'#asm'  ret 8
End Function
Public Function ASMLCase(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'  push ebp
'#asm'  mov esi, [esp+20]
'#asm'  test esi, esi
'#asm'  db 2Eh
'#asm'  jz ASMLCaseFinish
'#asm'  mov ebx, [esi-4]
'#asm'  test ebx, ebx
'#asm'  db 2Eh
'#asm'  jz ASMLCaseFinish
'#asm'  align 4
'#asm'  INVOKE SysAllocStringByteLen, 0, ebx
'#asm'  push eax
'#asm'  mov ebp, ebx
'#asm'  xor ecx, ecx
'#asm'  xor edx, edx
'#asm'  shr ebx, 2
'#asm'  mov edi, dword ptr _Assembly+offset_LCLUT_ARRAY
'#asm'  align 4
'#asm'  @@:
'#asm'      mov cx, [esi]
'#asm'      mov dx, [esi+2]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov dx, [edi+edx*2]
'#asm'      mov [eax], cx
'#asm'      mov [eax+2], dx
'#asm'      add esi, 4
'#asm'      add eax, 4
'#asm'      sub ebx, 1
'#asm'      db 3Eh
'#asm'      jnz @B
'#asm'
'#asm'  test ebp, 3
'#asm'  db 3Eh
'#asm'  jz @F
'#asm'      mov cx, [esi]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov [eax], cx
'#asm'
'#asm'  @@:
'#asm'  pop eax
'#asm'  ASMLCaseFinish:
'#asm'  pop ebp
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret 4
End Function
Public Function ASMUCase(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'  push ebp
'#asm'  mov esi, [esp+20]
'#asm'  test esi, esi
'#asm'  db 2Eh
'#asm'  jz ASMUCaseFinish
'#asm'  mov ebx, [esi-4]
'#asm'  test ebx, ebx
'#asm'  db 2Eh
'#asm'  jz ASMUCaseFinish
'#asm'  align 4
'#asm'  INVOKE SysAllocStringByteLen, 0, ebx
'#asm'  push eax
'#asm'  mov ebp, ebx
'#asm'  xor ecx, ecx
'#asm'  xor edx, edx
'#asm'  shr ebx, 2
'#asm'  mov edi, dword ptr _Assembly+offset_UCLUT_ARRAY
'#asm'  align 4
'#asm'  @@:
'#asm'      mov cx, [esi]
'#asm'      mov dx, [esi+2]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov dx, [edi+edx*2]
'#asm'      mov [eax], cx
'#asm'      mov [eax+2], dx
'#asm'      add esi, 4
'#asm'      add eax, 4
'#asm'      sub ebx, 1
'#asm'      db 3Eh
'#asm'      jnz @B
'#asm'
'#asm'  test ebp, 3
'#asm'  db 3Eh
'#asm'  jz @F
'#asm'      mov cx, [esi]
'#asm'      mov cx, [edi+ecx*2]
'#asm'      mov [eax], cx
'#asm'
'#asm'  @@:
'#asm'  pop eax
'#asm'  ASMUCaseFinish:
'#asm'  pop ebp
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret 4
End Function
Public Function ASMChrW(ByVal iNumber As Long) As String
'#asm'.pureasm
'#asm' ;int 3
'#asm' INVOKE SysAllocStringByteLen, 0, 2
'#asm' mov edx, [esp+4]
'#asm' mov [eax], dx
'#asm' ret 4
End Function
Public Function ASMAscW(ByVal sString As String) As Integer
'#asm'.pureasm
'#asm' mov eax, [esp+4]
'#asm' movzx eax, word ptr [eax]
'#asm' ret 4
End Function
Public Function ASMChr(ByVal bNumber As Byte) As String
'#asm'.pureasm
'#asm' ;int 3
'#asm' INVOKE SysAllocStringByteLen, 0, 2
'#asm' mov edx, [esp+4]
'#asm' mov ecx, dword ptr _Assembly+offset_ATWLUT_ARRAY
'#asm' movzx ecx, word ptr [ecx+edx*2]
'#asm' mov [eax], ecx
'#asm' ret 4
End Function
Public Function ASMAsc(ByVal sString As String) As Byte
'#asm'.pureasm
'#asm' ;int 3
'#asm' push edi
'#asm' mov eax, [esp+8]
'#asm' mov edi, dword ptr _Assembly+offset_WTALUT_ARRAY
'#asm' mov eax, [eax]
'#asm' test eax, eax
'#asm' jz @F
'#asm' movzx eax, byte ptr [edi+eax]
'#asm' test eax, eax
'#asm' jnz @F
'#asm' mov eax, 63
'#asm' @@:
'#asm' pop edi
'#asm' ret 4
End Function
Public Function ASMRTrim(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push edi
'#asm'  ;std
'#asm'  ;int 3
'#asm'  mov edx, [esp+8]
'#asm'  mov ecx, [edx-4]
'#asm'  test ecx,ecx
'#asm'  jz ASMRTrimFinish
'#asm'  mov edi, edx
'#asm'  ;mov eax, 32
'#asm'  add edi, ecx
'#asm'  sub edi, 2
'#asm'  shr ecx, 1
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  sub edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  ;repe scasw
'#asm'  add ecx, 1
'#asm'  ;cld
'#asm'  ASMRTrimFinish:
'#asm'  INVOKE SysAllocStringLen, edx, ecx
'#asm'  pop edi
'#asm'  ret 4
End Function
Public Function ASMLTrim(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push edi
'#asm'  ;int 3
'#asm'  mov edi, [esp+8]
'#asm'  mov ecx, [edi-4]
'#asm'  test ecx,ecx
'#asm'  jz ASMLTrimFinish
'#asm'  shr ecx, 1
'#asm'  ;mov eax, 32
'#asm'  ;repe scasw
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  add edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  add ecx, 1
'#asm'  sub edi, 2
'#asm'  ASMLTrimFinish:
'#asm'  INVOKE SysAllocStringLen, edi, ecx
'#asm'  pop edi
'#asm'  ret 4
End Function
Public Function ASMTrim(ByVal sString As String) As String
'#asm'.pureasm
'#asm'  push edi
'#asm'  ;int 3
'#asm'  mov edx, [esp+8]
'#asm'  mov ecx, [edx-4]
'#asm'  test ecx,ecx
'#asm'  jz ASMTrimFinish
'#asm'
'#asm'  mov edi, edx
'#asm'  ;mov eax, 32
'#asm'  shr ecx, 1
'#asm'  ;repe scasw
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  add edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  add ecx, 1
'#asm'  sub edi, 2
'#asm'  mov edx, edi
'#asm'  ;std
'#asm'  lea edi, [edi+ecx*2-2]
'#asm'  ;repe scasw
'#asm'  @@:
'#asm'  movzx eax, word ptr[edi]
'#asm'  sub edi, 2
'#asm'  sub ecx, 1
'#asm'  db 2Eh
'#asm'  jz @F
'#asm'  cmp eax, 32
'#asm'  db 3Eh
'#asm'  je @B
'#asm'  @@:
'#asm'  add ecx, 1
'#asm'  ;cld
'#asm'  ASMTrimFinish:
'#asm'  INVOKE SysAllocStringLen, edx, ecx
'#asm'  pop edi
'#asm'  ret 4
End Function
Public Sub ASMCreateCaseConversionTable()
'#asm'.pureasm
'#asm'  push ebx
'#asm'  push esi
'#asm'  push edi
'#asm'
'#asm'  mov ebx, 0FFFFh
'#asm'  mov esi, dword ptr _Assembly+offset_UCLUT_ARRAY
'#asm'  mov edi, dword ptr _Assembly+offset_LCLUT_ARRAY
'#asm'  ;int 3
'#asm'
'#asm'  @@:
'#asm'  INVOKE CharLowerA, ebx
'#asm'  mov [edi+ebx*2], ax
'#asm'  INVOKE CharUpperA, ebx
'#asm'  mov [esi+ebx*2], ax
'#asm'  sub ebx, 1
'#asm'  jnz @B
'#asm'  ;int 3
'#asm'  ;mov esi, dword ptr _Assembly+offset_ATWLUT_ARRAY
'#asm'  xor eax, eax
'#asm'  mov esi, dword ptr _Assembly+offset_ATWLUT_ARRAY
'#asm'  mov edi, dword ptr _Assembly+offset_ASCIILUT_ARRAY
'#asm'  mov ebx, dword ptr _Assembly+offset_WTALUT_ARRAY
'#asm'  ;int 3
'#asm'  @@:
'#asm'  mov [edi+eax], eax
'#asm'  add eax, 1
'#asm'  cmp eax, 256
'#asm'  jnz @B
'#asm'  INVOKE MultiByteToWideChar,CP_THREAD_ACP,0,edi,256,esi,512
'#asm'  xor eax, eax
'#asm'  xor ecx, ecx
'#asm'  ;int 3
'#asm'  @@:
'#asm'  movzx eax, word ptr [esi+ecx*2]
'#asm'  mov [ebx+eax], ax
'#asm'  add ecx, 1
'#asm'  cmp ecx, 256
'#asm'  jnz @B
'#asm'
'#asm'  pop edi
'#asm'  pop esi
'#asm'  pop ebx
'#asm'  ret
End Sub

Public Sub ASMvbaCopyBytes(ByVal Length As Long, ByVal Destination As Long, ByVal Source As Long)

'#asm'  ;.pureasm
'#asm'
'#asm'  mov ecx, [esp+4]        ;1  - ecx = 1.param
'#asm'  push esi                ;2  - save esi
'#asm'  mov esi, [esp+16]       ;3  - esi = 3.param
'#asm'  push edi                ;4  - save edi
'#asm'  mov edi, [esp+16]       ;5  - edi = 2.param
'#asm'  mov eax, ecx            ;6  - eax = ecx
'#asm'  mov edx, edi            ;7  - edx = edi
'#asm'  shr ecx, 2              ;8  - ecx = ecx/4
'#asm'  rep movsd               ;9  - perform dword-copy
'#asm'  mov ecx, eax            ;10 - ecx = eax
'#asm'  mov eax, edx            ;11 - eax = edx
'#asm'  and ecx, 3              ;12 - ecx = ecx mod 4
'#asm'  rep movsb               ;13 - perform byte copy
'#asm'  pop edi                 ;14 - restore edi
'#asm'  pop esi                 ;15 - restore esi
'#asm'  retn 12                 ;16 - return
'#asm'

End Sub

Public Function Inc(ByVal a As Long) As Long

'#asm'
'#asm'  mov eax,[esp+4]   ;eax = a
'#asm'  inc eax ; 1 ;[esp+8]   ;eax = eax + b
'#asm'  ret 4              ;remove parameters from the stack
'#asm'

End Function

Public Function Dec(ByVal a As Long) As Long

'#asm'
'#asm'  mov eax,[esp+4]   ;eax = a
'#asm'  dec eax ; 1 ;[esp+8]   ;eax = eax + b
'#asm'  ret 4              ;remove parameters from the stack
'#asm'

End Function

Public Sub InitAssembly()
    ASMCreateCaseConversionTable
End Sub[/code]


Dengan perincian total time :
SmadΔV : Scan 1 HDD = 98762 file dengan waktu 31menit 18detik
Fajr Anvi : 98762 file dengan waktu 34menit 07detik
Navi : 98762 file dengan waktu 29menit 47detik

SmadΔV : Scan 1 Folder = 3149 file dengan waktu 1menit 37detik
Fajr Anvi : 3149 file dengan waktu 2menit 53detik
Navi : 3149 file dengan waktu 2menit 13detik

Sedangkan settingan ThunderVB biasa
SmadΔV : 98762 47menit 39detik
Fajr Anvi : 98762 50menit pas
Navi : 98762 43menit 17detik
Assembly ni juga menggunakan Unicode sederhana

Untuk engine utama kita (al VirusScan)
Kecepatannya luar biasa 98762 file dalam 27menit 41detik
Kemungkinan Engine ini sudah dilengkapi memory booster, mungkin kita akan memakai CPU Booster untuk lebih mempercepat
tapi  cpu booster menggunakan konsumsi lebih pada baterai
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 04, 2010, 03:26:23 PM
Weww,,,, :D :D
Oke2 Frost :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 16, 2010, 09:34:10 AM
Saking sibuknya yg laen forum kita cma sya yg OL
wkwkwkw______

 :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: MiloMen™ pada Maret 16, 2010, 09:36:28 AM
Saking sibuknya yg laen forum kita cma sya yg OL
wkwkwkw______

 :D :D :D :D
Tenang sob, nanti ada saya disana :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 16, 2010, 09:39:18 AM
hahaha

Gpp kk_____
Mungkin yg lain lagi sibuk sma real life atw sibuk mengcoding AV kita_______

 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 16, 2010, 09:56:09 AM
@Up:
Sama aja...
Kmrn2 cm gw doang yg OL dsna. Serem bangeeet,,,, >=) >=)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 18, 2010, 12:52:15 AM
gw OL mulu koq,,
cuman tkadang bingung mau balas apa,,
blom melihat progress,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: heru08 pada Maret 19, 2010, 11:25:07 AM
dari awal pda ngmong aja_ kpan av nya jdi. buktikan donk.. apa yg udah ada di publkasikan dlu biar pd cba bru drvisi lg.. jgn ngmg aja
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 20, 2010, 11:41:22 PM
dari awal pda ngmong aja_ kpan av nya jdi. buktikan donk.. apa yg udah ada di publkasikan dlu biar pd cba bru drvisi lg.. jgn ngmg aja
Dari awal ngomong aja gmna mksd lu?? ??? ???
Cb lu liat dr page 1. Yg posting sm pa kagak orangnya??
TSnya ja dah ilang. Ni jg lg brusha bkin bro,,,, :)
Lu tau ndri kan klo bkin AV sm2 msti jg hrs nyamain persepsi. Smw btuh proses bro, nggk kyak bkin AV sndri yg smw keputusan ada ditngan founder tunggal seutuhnya... :P :P :P
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Maret 21, 2010, 02:10:59 AM
hahaaa,,

perkembangan juga gak kita bahas di forum ini brooo,,
kita diskusi di forum lain,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: aricil28 pada April 11, 2010, 07:26:45 PM
okeh, ide bgus tuh tapi gmna buat source virus na kan skrg byk bgd virus2 yg mnyebar skrg. hehe
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada April 12, 2010, 12:33:58 PM
@^: Maksudnya buat virus dengan Source open gtu_______
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: heru08 pada April 15, 2010, 11:41:09 AM
kapan jadinyaaaaaaaaaaaa
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: brerong inguh pada April 15, 2010, 04:59:31 PM
boleh  ikutan gbung gak?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: AURA pada April 15, 2010, 05:08:01 PM
Maaf kalo agak kasar. TAPI KAPAN KALIAN AKAN MEMBUAT AV, KALAU HANYA BERDISKUSI !!!
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada April 15, 2010, 05:10:08 PM
kapan jadinyaaaaaaaaaaaa
Bntar bro, lg nyelesein fitur2nya ma msih diskusi mslh desain, lambang AV dsb. Maklumlah otak org bnyak hehe... :D

boleh  ikutan gbung gak?
Terserah ma tmen2. Yg lain gmna??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: krztna17 pada April 15, 2010, 05:29:01 PM
Maaf kalo agak kasar. TAPI KAPAN KALIAN AKAN MEMBUAT AV, KALAU HANYA BERDISKUSI !!!

Bener tuh ,, gag gmpang buat AV bersama tuh !!
Perlu biaya jg !! Perlu diskusi ttg nama , logo , dll !!
btw ,, bcorannya nmanya bkalan apa ??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: brerong inguh pada April 15, 2010, 05:36:01 PM
herru08 om HR ya? lama gk da kabar \m/ :D :D :D :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada April 15, 2010, 05:48:08 PM
Maaf kalo agak kasar. TAPI KAPAN KALIAN AKAN MEMBUAT AV, KALAU HANYA BERDISKUSI !!!

Bener tuh ,, gag gmpang buat AV bersama tuh !!
Perlu biaya jg !! Perlu diskusi ttg nama , logo , dll !!
btw ,, bcorannya nmanya bkalan apa ??
Kemungkinan besar msih AVB (Anti Virus Bersama)... :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Uko Corleone pada April 15, 2010, 06:19:04 PM
ah dari pada repot2 bikin av mendingan bareng2 bikin gabungan av indo :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: krztna17 pada April 15, 2010, 06:38:07 PM
Lha yg bagi keuntungan'ny gmn ?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada April 15, 2010, 10:10:24 PM
Maaf kalo agak kasar. TAPI KAPAN KALIAN AKAN MEMBUAT AV, KALAU HANYA BERDISKUSI !!!

hahaaaa,,, gak tau dia,,,, proyek rahasia,,,

sementara bikin AVB dulu,, nanti bikin program lainnya,,,
emank kerjasama itu agak sulit,, apalg lokasinya berjauhan,,

dan kita diskusi tidak disiniii,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada April 16, 2010, 01:44:12 PM
sorry ya brow aq jarang ikut di forum. selain karena byk pekerjaan.koneksi aq jg lemot. im2 akhir2 ini parah bget. bsa 1kb/sc
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: heru08 pada April 18, 2010, 09:02:58 PM
TUNJUKIN DONK DAH SAMPAI DIMANA BIAR PADA TAHU HASIL NYA DISKUSIIIIIII ITU
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada April 18, 2010, 09:46:58 PM
@^: Ne sya kash bocorannya sedikit
msh dalam tahap Beta 1
Blum Closed Beta
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada April 18, 2010, 09:59:51 PM
sipp mdh2an cpet selesai
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Beruang pada April 18, 2010, 10:13:21 PM
Maaf kalo agak kasar. TAPI KAPAN KALIAN AKAN MEMBUAT AV, KALAU HANYA BERDISKUSI !!!

hahaaaa,,, gak tau dia,,,, proyek rahasia,,,

sementara bikin AVB dulu,, nanti bikin program lainnya,,,
emank kerjasama itu agak sulit,, apalg lokasinya berjauhan,,

dan kita diskusi tidak disiniii,,
masih kaku ente...
kan teknologi udah canggih, kta bisa shring file lwat mna aja...iyakan-iyakan ? :D

nah mslah uang, kta pkirn dlu mw bkin full gratis pa plus donasi ?
klo donasi drpda pusing2 mkrin bgi duitnya gmna, mending kita kumplin di "gudang" truz klo da bncna apa2 kta sumbangin dah... :D

amal-untuk-amal-untuk-kita-untuk-akhirat :D :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada April 18, 2010, 11:36:59 PM
@atas,,
ber-UANG,, hehee,,,

kita gak mikir profit sementara ini,,
dibuat dulu dan org lain senang,,,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada April 19, 2010, 12:17:45 AM
Betuuuul.... :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Beruang pada April 19, 2010, 05:23:27 PM
@atas,,
ber-UANG,, hehee,,,

kita gak mikir profit sementara ini,,
dibuat dulu dan org lain senang,,,,
owh... :( jdi pmkran ane slah donk ? :D
mav2... ^:)^

btw, oom... :-\
nma acunku bkan ber-uang yg itu... :D
tp, beruang hewan...... ;)

ckckck, kocak nmanya bsa banyak arti... :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada April 19, 2010, 05:59:16 PM
bisa diterima masyarakat indonesia aja udah syukur.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada April 19, 2010, 08:44:52 PM
Tidak kq mas
Kami tidak mau mencari keuntungan dri proyek ini

Ingat sejarah awal Mula AV lokal berdiri th dri PCMAV, KAV, Nasester, Ninja Ceria, dst mereka membuat AV hanya untuk membantu user semata
Itulah sejarah terciptanya AV lokal
 :-bd :-bd :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada April 19, 2010, 09:46:24 PM
betul betul betul
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: kinuk_cool pada April 19, 2010, 10:08:44 PM
ya kan untuk kepentingan bangsa sendiri
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Beruang pada April 22, 2010, 06:55:36 PM
loh kok gak da perkembangan lg ? :o :( ???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: krztna17 pada April 22, 2010, 07:00:18 PM
avb fokus ke virus lokal pa luar ?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Ran_TH pada April 22, 2010, 08:10:29 PM
Mereka diskusinya pada di forum laen :D Forum privat tapi gak terlalu rahasia sih,,
Ane mau daftar tapi malu :D Gak punya kemampuan apa-apa :-[
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada April 22, 2010, 08:35:03 PM
Sabar dunk______
AVB lagi ditambahkan plugin USB Firewall ( Ituloh seperti smadlock, tpi bedanya ne bsa menahan serangan autrun.inf dari USB, dan ada RTPnya ) Utk melihat dan mereview USB Firewall silahkan baca trit ane di: http://smadaver.com/antivirus-lokal-lainnya/usb-firewall/ (http://smadaver.com/antivirus-lokal-lainnya/usb-firewall/)
Th USB firewall msh tahap BETA. Nanti kalau dh siap AVB akan memasuki BETA 2_______
Soalnya kendalanya RTP USB Firewall, sma RTP AVB bentrok_____
Maknya kami akan mengfix dlu bugnya
 :D :D :D

@Ran_TH : Gpp mas, sya pn jga seperti itu mas. Sya cuma mau mendalami bahasa pemrograman VB  ^:)^ ^:)^ ^:)^
Team kami saling membantu satu sma yang lain_ Jadi ngk ada egois dan ngk ada kerja sendiri. Semuanya harus berkerja sama

@krztna♫ : Kami akan mendeteksi virus luar dan lokal____
Insyaallah bsa dan akan kami coba mengalahkan teknik virus Luar sana______
Mohon doanya ya
 ^:)^ ^:)^ ^:)^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Yudh pada April 22, 2010, 08:41:25 PM
mAS fakhricker....  bagi2 juga dong ilmunya ya di antivirus lokal sebelah yang Warnanya IJO juga... :D :D

tetap semangat yoo...!!  nanti aku bantuin ngumpulin sampel juga deh....  :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada April 22, 2010, 09:00:05 PM
Rencananya mau berbagi ilmu juga
Karena berbagi itu Indah
 :-bd :-bd :-bd

Tpi akan sya sumbangkan kpda AV yg benar2 100% FREE, ngk butuh uang utk menambahkan fitur2 yg lain__
 :D :D :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Beruang pada April 22, 2010, 09:39:31 PM
oh, rahasia nih ??? :D hmm... :P

ok deh slmat berjuang, mski gak bs pa2, bkal w dkung meski cma pke DO'A... :-bd :-bd :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Uko Corleone pada April 26, 2010, 02:22:32 PM
Sabar dunk______
AVB lagi ditambahkan plugin USB Firewall ( Ituloh seperti smadlock, tpi bedanya ne bsa menahan serangan autrun.inf dari USB, dan ada RTPnya ) Utk melihat dan mereview USB Firewall silahkan baca trit ane di: http://smadaver.com/antivirus-lokal-lainnya/usb-firewall/ (http://smadaver.com/antivirus-lokal-lainnya/usb-firewall/)
Th USB firewall msh tahap BETA. Nanti kalau dh siap AVB akan memasuki BETA 2_______
Soalnya kendalanya RTP USB Firewall, sma RTP AVB bentrok_____
Maknya kami akan mengfix dlu bugnya
 :D :D :D

@Ran_TH : Gpp mas, sya pn jga seperti itu mas. Sya cuma mau mendalami bahasa pemrograman VB  ^:)^ ^:)^ ^:)^
Team kami saling membantu satu sma yang lain_ Jadi ngk ada egois dan ngk ada kerja sendiri. Semuanya harus berkerja sama

@krztna♫ : Kami akan mendeteksi virus luar dan lokal____
Insyaallah bsa dan akan kami coba mengalahkan teknik virus Luar sana______
Mohon doanya ya
 ^:)^ ^:)^ ^:)^

kapan avnya di release? :-X
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada April 26, 2010, 04:26:43 PM
@Up:
Udah tuh di topik Anti Virus Bersama di sebelah :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Uko Corleone pada April 26, 2010, 04:30:27 PM
@Up:
Udah tuh di topik Anti Virus Bersama di sebelah :D :D

ha??
maksudnya disebelah
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada April 26, 2010, 04:57:03 PM
Ampun deeeeh,,,,, :(
Disini mksdnyaaa..... http://smadaver.com/antivirus-lokal-lainnya/antivirus-bersama/
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Uko Corleone pada April 26, 2010, 05:03:48 PM
Ampun deeeeh,,,,, :(
Disini mksdnyaaa..... http://smadaver.com/antivirus-lokal-lainnya/antivirus-bersama/

kirain di halaman sebelah :D

sorry2 maklum masih gaptek :P
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada April 26, 2010, 08:58:49 PM
Msh Beta 1 kk
Blum Close Beta
 :D :D :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: SeChild pada Mei 27, 2010, 07:20:07 PM
dah jadi lom av bersmanya ??
dah lama g ngikutin perkembanganya, klo dah jadi, bisa tau g d mana dunludnya ????
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Mei 27, 2010, 07:46:29 PM
Gak tau juga gw,, uda bisa dibilang sudah jadi blom??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Beruang pada Mei 27, 2010, 08:04:18 PM
oh, kyana aktu itu udah pernah dkasih link unduhannya, tpi lum smpet ngerasain ntuh av udah di detect sma avast seb trojan  ~x(
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mentalist pada Juni 03, 2010, 05:23:21 PM
Waktu dulu saya pernah masuk forum yang isinya mengembangkan AntiVirus bersama, dan anti virus itu open source, dibuat dengan visual basic 6.0, Tapi sekarang entah kemana forum tersebut hilang  :'( saya udah coba mengembangkannya. Begitu pula link download source codenya sudah gak ada dan AntiVirusnya pun udah gak pernah di update lagi.

Nah bagaimana kalau itu kita lakukan bersama, membuat antivirus bareng-bareng.  ^-^

Boleh tuh ide yang kreatif
kalau memang dilakukan ya aku mau ikut deh
hehehe...buat nambah pengetahuan
Thanks ya buat infonya  ;) ;D ;) ;D ;) ;D ;)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Juni 03, 2010, 10:01:42 PM
Aq di Forum Avb gk da temen yg ol
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Juni 04, 2010, 12:12:44 PM
@mankbut,, gw OL,,
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Juni 04, 2010, 01:30:25 PM
Aq Dah krm source fs-2 sob dsana.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: c0d3HitLER pada Juni 04, 2010, 01:41:40 PM
Aq Dah krm source fs-2 sob dsana.
makasih kirim source ke aku ya, timnya siapa saja?
aku perlu kenal nih :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Juni 04, 2010, 01:58:14 PM
Aq Dah krm source fs-2 sob dsana.
makasih kirim source ke aku ya, timnya siapa saja?
aku perlu kenal nih :-bd

sob kamu daftar dulu Ma fkhri / boz Harboot :D Trus km bisa ambil sourcenya di forum AVB
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: c0d3HitLER pada Juni 04, 2010, 07:31:07 PM
Aq Dah krm source fs-2 sob dsana.
makasih kirim source ke aku ya, timnya siapa saja?
aku perlu kenal nih :-bd

sob kamu daftar dulu Ma fkhri / boz Harboot :D Trus km bisa ambil sourcenya di forum AVB
iya nanti saya kontak lewat FB :-bd
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Juni 06, 2010, 01:31:35 PM
Jah,, knp gw bos-nya??
fakhri bos-nya,, hueeeheheee
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Juni 06, 2010, 08:41:46 PM
Jah,, knp gw bos-nya??
fakhri bos-nya,, hueeeheheee

ha..ha.... kan enak kalau jd boz....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: sevenfold96 pada Juni 07, 2010, 01:56:04 PM
ok
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Juni 07, 2010, 07:10:27 PM
maaf y tlt blx. coz lg sibuk ujian n laptop ane blum siap d perbaiki.
oh, y kalau ad mw gbung jd anggota team pm aj sy atw contact fb ane d: fakhriqerenz@gmail.com

dvsi avb ad 3:
1. PROGRAMMING yg diisi sya, mankbut, frostmaster
2. LABORARY/VISER yg diisi oleh b_agoy, milomen
3. DESAIGNER yg diisi oleh harboot.
kalau mw daftar tggl ketik: nama (spasi) divisi yg kmu inginkan. krm ke pm atw pesan d fb ane d: FAKHRI KYLE MAXIMILLION
stlh itu kmu akn dksh ujian yg sesuai dgn divisi yg kmu inginkan.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada Juni 08, 2010, 04:47:35 AM
Satu lagi, selain nama dan divisi, harap disertakan alasan juga, krna kta mw cri anggota yg komitmen. Bisa PM ke aku juga, atau FB : fahmi_spanza@yahoo.com
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Yudh pada Juni 08, 2010, 10:59:15 AM
maaf y tlt blx. coz lg sibuk ujian n laptop ane blum siap d perbaiki.
oh, y kalau ad mw gbung jd anggota team pm aj sy atw contact fb ane d: fakhriqerenz@gmail.com

dvsi avb ad 3:
1. PROGRAMMING yg diisi sya, mankbut, frostmaster
2. LABORARY/VISER yg diisi oleh b_agoy, milomen
3. DESAIGNER yg diisi oleh harboot.
kalau mw daftar tggl ketik: nama (spasi) divisi yg kmu inginkan. krm ke pm atw pesan d fb ane d: FAKHRI KYLE MAXIMILLION
stlh itu kmu akn dksh ujian yg sesuai dgn divisi yg kmu inginkan.
dikasih ujian?? apa ya ujiannya?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: mankbut ajuz pada Juni 08, 2010, 02:11:52 PM
maaf y tlt blx. coz lg sibuk ujian n laptop ane blum siap d perbaiki.
oh, y kalau ad mw gbung jd anggota team pm aj sy atw contact fb ane d: fakhriqerenz@gmail.com

dvsi avb ad 3:
1. PROGRAMMING yg diisi sya, mankbut, frostmaster
2. LABORARY/VISER yg diisi oleh b_agoy, milomen
3. DESAIGNER yg diisi oleh harboot.
kalau mw daftar tggl ketik: nama (spasi) divisi yg kmu inginkan. krm ke pm atw pesan d fb ane d: FAKHRI KYLE MAXIMILLION
stlh itu kmu akn dksh ujian yg sesuai dgn divisi yg kmu inginkan.
dikasih ujian?? apa ya ujiannya?
gak taw maz yudha cz q gak dikasi ujian.....
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Juni 08, 2010, 02:30:51 PM
yudha. siapa th..
nma asli mas mankbut y.

kalau mas mankbut mmg special ngk ujian d karenakan waktu it avb lg bth bgt programmer. n brkt mas mankbut avb bsa jga berkembang
tp ngk lpa jga bantuan dr team lain.
Judul: bKuTaCjDHqUxYruWb
Ditulis oleh: krztna17 pada Juni 08, 2010, 02:49:28 PM
ilpnWM  <a href="http://cnjyoadvqwva.com/">cnjyoadvqwva</a>, uixcdbdsaesv (http://uixcdbdsaesv.com/), [link=http://hbgwvnkeyuxt.com/]hbgwvnkeyuxt[/link], http://isgztytfgbok.com/
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Juni 08, 2010, 04:40:13 PM
tnang tampilan avb minimalis n stay cool. krna yg desainnya adlh mas harboot.
^^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: gedeagas pada September 04, 2011, 06:46:20 PM
Gan Ada Divisi Web Programing Gak :mewek

Ane Bisanya VB.NET Pas Nyoba VB 0.6 Ternyata Semua Kodenya Beda * Yang Sama Juga Ada Tapi Dikit
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: gedeagas pada September 04, 2011, 06:48:01 PM
Sori gan Dopost
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada September 04, 2011, 08:26:57 PM
Sori gan Dopost

Sori gan,, AVB skrg dipegang fakhricker,,
Gak semua member di Topik ini ikutan lg kyaknya..
Coba lgs PM dia saja. Rasanya masih berjalan..
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Frostmaster pada September 04, 2011, 08:57:52 PM
Saya masih siap bang boot, cuma bingung aja si fakhricker kok lost contact ya
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada September 04, 2011, 09:40:25 PM
Saya masih siap bang boot, cuma bingung aja si fakhricker kok lost contact ya

Saya yg sudah out :D
Coba aja lgs PM dia,, atw web-nya..
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: RifqiSah pada November 01, 2011, 04:51:59 PM
Saya ikutan .....

saya udah buat av, ada yang mau ikut ?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Nofrijon pada November 01, 2011, 06:45:09 PM
aku ikut kk
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: RifqiSah pada November 06, 2011, 04:38:12 PM
aku ikut kk
ikut sama saya ?
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: A.Alief pada Pebruari 29, 2012, 04:42:43 PM
Udah Jadi belum nie AV nya
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Aming Anjas Asmara Pamungkas pada Juli 01, 2012, 12:16:23 PM
saya ikut ya??
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada Juli 01, 2012, 02:07:24 PM
saya ikut ya??

Hahaaa,, kyaknya uda bubar gan.
Langsung hubungi TS aja.

Lupa ngasih tau moderator buat lock.
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Aming Anjas Asmara Pamungkas pada Juli 01, 2012, 02:36:56 PM
hm,,,
gtu ya gan???
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: b_agoy pada Maret 03, 2013, 03:34:17 AM
Sesuai permintaan agan Fakhricker topik ane buka kembali :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Maret 04, 2013, 10:39:51 AM
Hai ada yang masih ingat kepada saya
 :D
Long time no see  :D
udah 2 tahun aja ya, gak terasa  ;D

Maaf soal kejadian 2 tahun yg lalu yg mendadak lost contact itu karena saya klas 3 SMA dan tau kan balada anak SMA kelas 3, percintaan, dan kuliah (maklum udah jadi anak kuliah  :P)
:P
dan sekarang ntah kenapa tba2 ane teringat menghidupan kembali project ini
 :D
Perkembangan terakhir project ini adalah
Penambahan fitur enkripsi dan dekripsi pada AV nya
cma itu dulu kayaknya gak work atau work ya
 =))

Dan sekarang data itu sedang di laptop lama
dan sekarang sedang dalam perjalanan kemari, karena laptopnya d suatu kota yang lumayan jauh dari sini
sebelum melanjutkannya apa ada yang kasih saran, atau ada SC AV yg keren atau apa ada yang tau perkembangan terbaru selain metode PE atau apa ada super virus seperti conficker atau sality yang terakhir ane tau dari perkembangan virus
 ^-^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: My_Fate pada Maret 31, 2013, 11:05:41 PM
minta izin dlu aja bang..  :D
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: wirasukma pada April 02, 2013, 04:44:27 PM
Curhat ya kau Boot? Hahaha.... Tapi benar juga tuh kata Harboot. Kalau mau, yuk kita bikin Komunitas Baru. Terus bagi-bagi tugas deh, ada yang ngelola, kaki-tangan dsb. Ada yang mau jadi Kordinatornya? Monggo....

Saya Yang Jadi Koordinatornya. Akan Saya TanggungJawab.. :)
Asal Serius Aja. Jangan Kaya Budaya Indonesia Tadi.. ^_^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: wirasukma pada April 02, 2013, 05:05:55 PM
Untuk Aplikasinya, Kita Pakai VB6. Kita Padukan Dengan FireBird / Assembly.. ^_^
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ★ harboot ★ pada April 03, 2013, 06:58:09 AM
Hai ada yang masih ingat kepada saya
 :D
Long time no see  :D
udah 2 tahun aja ya, gak terasa  ;D

Maaf soal kejadian 2 tahun yg lalu yg mendadak lost contact itu karena saya klas 3 SMA dan tau kan balada anak SMA kelas 3, percintaan, dan kuliah (maklum udah jadi anak kuliah  :P)
:P
dan sekarang ntah kenapa tba2 ane teringat menghidupan kembali project ini
 :D
Perkembangan terakhir project ini adalah
Penambahan fitur enkripsi dan dekripsi pada AV nya
cma itu dulu kayaknya gak work atau work ya
 =))

Dan sekarang data itu sedang di laptop lama
dan sekarang sedang dalam perjalanan kemari, karena laptopnya d suatu kota yang lumayan jauh dari sini
sebelum melanjutkannya apa ada yang kasih saran, atau ada SC AV yg keren atau apa ada yang tau perkembangan terbaru selain metode PE atau apa ada super virus seperti conficker atau sality yang terakhir ane tau dari perkembangan virus
 ^-^

Saya Yang Jadi Koordinatornya. Akan Saya TanggungJawab.. :)
Asal Serius Aja. Jangan Kaya Budaya Indonesia Tadi.. ^_^

Untuk Aplikasinya, Kita Pakai VB6. Kita Padukan Dengan FireBird / Assembly.. ^_^

Bagus pd semangat..
Saya jadi penonton saja..
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: wirasukma pada April 03, 2013, 04:04:07 PM
Sekarang Projectnya Sampai Mana?
 
Gimana Struktur Organisasinya? Kaya Ketua, Koordinatornya, atau Gimana Gitu..
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: My_Fate pada April 03, 2013, 05:04:06 PM
ane juga jadi supporter aja, soalnya g bsa pake sofware untuk buatnya... hehehhe :)
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: Ignasius Dewanto pada Mei 22, 2013, 03:43:07 PM
w ngeburu virus bakal database....
Bos Zai, database virus Smadavnya boleh dipake nggak?
Note: Semoga gak mudah dilumpuhin kaya cerita VB.NarutoVsSakura itu......
Judul: Re: Bikin AntiVirus Bersama
Ditulis oleh: ZianPlaspark pada Mei 26, 2013, 10:47:47 AM
AV Open Source yang enak di edit-edit apa ya?

Saya newbie maaf
Judul: Re:Bikin AntiVirus Bersama
Ditulis oleh: FAKHRICKER pada Mei 27, 2018, 11:14:03 AM
Wahhhh topikk lama banget ini hehehehe
:)
Antivirus bersama
:)
Judul: Re:Bikin AntiVirus Bersama
Ditulis oleh: Heru budi s pada Mei 28, 2018, 10:05:25 PM
Silahkan dilanjut...kebangkan kreatifitas kalian :-bd
Judul: Re:Bikin AntiVirus Bersama
Ditulis oleh: hamaboi pada Juni 20, 2018, 09:29:53 PM
@Harbot Untuk project ente Tidak terdeteksi oleh RTP Di Windows 7 Keatas
Judul: Re:Bikin AntiVirus Bersama
Ditulis oleh: Adosindos pada Juli 05, 2018, 04:33:14 PM
Understand the details that you have taken it is very useful.