Forum Sains Indonesia




*

User

Selamat datang, Pengunjung. Silahkan masuk atau mendaftar. Apakah anda lupa aktivasi email?
Mei 24, 2012, 09:49:44 AM

Masuk dengan nama pengguna, kata sandi dan lama sesi

Artikel Sains

Aku Cinta ForSa

  ForSa on FB  ForSa on Twitter

Pranala Luar

ShoutBox!

Last 10 Shouts:

 

haman11

Hari Ini jam 08:11:34 AM
ada yg tauproses daur ulang urin pada cicak gk ? ;)
 

GhostInMachine

Kemarin jam 03:52:17 PM
kk mau tanya cara upload Tulisan dong??
 

army.fice

Kemarin jam 12:22:47 AM
sepi banget sih :(
 

lustforscience

Mei 22, 2012, 08:26:02 PM
amin
 

exile_rstd

Mei 22, 2012, 08:24:55 PM
offline....
good night all  ;)
 

exile_rstd

Mei 22, 2012, 08:23:08 PM
iyaaaa jumat saya mau ujian kenaikan kelas. doain ya om Farabi, semoga ujiannya lancar dan dpt nilai memuaskan  :D
 

Farabi

Mei 22, 2012, 08:20:37 PM
KMana aja non? Sibuk belajar?
 

exile_rstd

Mei 22, 2012, 07:44:23 PM
argh lama ga buka forsa, comment di beberapa thread jd membingungkan saya. apa karena udh lama ga asah ya...
 

N E R R O

Mei 20, 2012, 07:41:57 PM
udah lama gak mampi ke forsa, sdh banyak berubah
 

bangnono_swedye

Mei 20, 2012, 05:23:03 PM
pertanyaa2 ane di forum kesehatan cuma2 diliaat2in aj, kagak ada yang komen ato ngasih jawaban :'( kebiasaan di forsa kah..?? :'(

Show 50 latest
« sebelumnya berikutnya »
Halaman: [1]   Turun

Penulis Topik: [DEMO] Pendeteksi gerakan  (Dibaca 267 kali)

0 Anggota dan 1 Pengunjung sedang melihat topik ini.

Online Farabi

  • Profesor
  • *****
  • Tulisan: 2584
  • IQ: 167
  • Gender: Pria
  • Self-Proclaim Judge. All hail safirot.
    • Lihat Profil
[DEMO] Pendeteksi gerakan
« pada: Pebruari 02, 2012, 12:04:55 PM »
http://ompldr.org/vY2wwcg/SW_Graphic.rar

Saya membuat sebuah demo untuk alat pengontrol pintu yang juga bisa dibuat untuk robot pendeteksi garis. Saya juga menyematkan source code nya di program berikut ini.
Tercatat
Informasi yang aku anggap menarik
http://farabinewsnow.blogspot.com/

Saya Indonesia ASLI.

Online Farabi

  • Profesor
  • *****
  • Tulisan: 2584
  • IQ: 167
  • Gender: Pria
  • Self-Proclaim Judge. All hail safirot.
    • Lihat Profil
Re:[DEMO] Pendeteksi gerakan
« Jawab #1 pada: Pebruari 02, 2012, 06:08:41 PM »
Ketinggalan satu lagi, ini filter untuk membuat warna menjadi hitam putuh
Kode: [Pilih]

fGrayScale proc lpBitsSrc:dword,lpBitsRslt:dword,x:dword,y:dword,w:dword,h:Dword
LOCAL _x,_y:dword
LOCAL cp,np:dword
LOCAL r,g,b:dword

xor ecx,ecx
mov ecx,y
loop_y:
push ecx
mov _y,ecx
xor ecx,ecx
mov ecx,x
loop_x:
push ecx
mov _x,ecx
invoke GetDIBPixel,_x,_y,lpBitsSrc,w,h
mov cp,eax

movzx ecx,al
mov b,ecx
shr eax,8
movzx ecx,al
mov g,ecx
shr eax,8
movzx ecx,al
mov r,ecx

xor edx,edx
mov eax,r
mov ecx,30
mul ecx
mov ecx,100
div ecx
mov r,eax

xor edx,edx
mov eax,g
mov ecx,59
mul ecx
mov ecx,100
div ecx
mov g,eax

xor edx,edx
mov eax,b
mov ecx,11
mul ecx
mov ecx,100
div ecx
mov b,eax

xor eax,eax
add eax,r
add eax,g
add eax,b

; xor edx,edx
; mov ecx,3
; div ecx

xor ecx,ecx
mov cl,al
shl ecx,8
mov cl,al
shl ecx,8
mov cl,al

invoke SetDIBPixel,_x,_y,lpBitsRslt,w,h,ecx

no_need:
pop ecx
inc ecx
cmp ecx,w
jl loop_x
pop ecx
inc ecx
cmp ecx,h
jl loop_y
done:

ret
fGrayScale endp

Tercatat
Halaman: [1]   Naik
« sebelumnya berikutnya »
 
Copyright © 2006-2011 Forum Sains Indonesia