Mengusir Nyamuk dengan Assembly

Hal yang paling menyebalkan bagi kita jika sedang asyik-asyiknya bermain komputer kemudian ditemani oleh nyamuk-nyamuk malam. Apalagi lagi asyik-asyiknya mengetik tugas yang kita kerjakan eh nyamuknya keenakan menggigit kaki dan tangan kita. Udah sakit, gatal lagi. Pokoknya nyamuk memang membuat kita merasa terganggu. Tenang ini ada solusinya. Kita tahu bahwa manusia hanya bisa mendengar suara di antara daerah infrasonik dan ultrasonik kira-kira 20 sampai 20000 hz. Fakta yang ada, suara yang memiliki frekuensi lebih dari 20000 hz ini membuat nyamuk merasa terganggu sehingga jika kita memasang alat yang dapat mengeluarkan suara dengan frekuensi serupa maka nyamuk-nyamuk akan pergi. Dan suara dengan frekuensi sebesar itu tidak bisa ditangkap oleh telinga kita sehingga kita tidak akan merasa terganggu. Kalau begitu kita harus beli alatnya dong. Tidak usah! Selama kita beraktivitas dengan berkomputer ria, alatnya sudah di depan mata. Alatnya ya komputer Anda sendiri. Caranya adalah Kita membuat program yang dapat memerintah komputer untuk menghasilkan frekuensi suara yang kita inginkan. Program itu kita bisa buat melalui Bahasa Assembly. Berikut ini adalah script-nya yang diambil dari buku S'to tentang Pemrograman Assembly.

NoPCsound  MACRO 
  IN AL,61h   ; Ambil data Port 61h 
  AND AL,0FCh   ; Matikan bit ke 6 & 7 
  OUT 61h,AL   ; Masukkan nilainya pada Port 61h
  ENDM 
PCsound  MACRO Hz 
  MOV AL,0B6h 
  OUT 43h,AL   ; Persiapkan Timer 
  
  MOV DX,0012h  
  MOV AX,3540h   ; Bagi 123540H dengan frekwensi 
  MOV BX,Hz   ; yang akan dihasilkan. 
  DIV BX    ; < 123540:Hz > , hasil pada AX 
  
  OUT 42h,AL   ; Masukkan byte rendah dahulu. 
  MOV AL,AH   ; Port hanya dapat melalui AL/AX
  OUT 42h,AL   ; Masukkan byte tingginya. 
  
  IN AL,61h   ; Ambil data port 61h 
  OR AL,03   ; Jadikan Bit ke 6 & 7 menjadi 1 
  OUT 61h,AL   ; Bunyikan speaker 
  ENDM 
;/=========================================================\; 
; Program : NYAMUK.ASM ; ; Author : S’to ; 
; Fungsi : membunyikan speaker dan mengatur ; 
; frekwensinya melalui Timer. ; 
; Frekwensi yang dihasilkan dapat ;
; digunakan untuk mengusir nyamuk ; 
;\=========================================================/; 
 .MODEL SMALL 
 .CODE
 ORG 100h 
Proses :
 PCsound 25000 ; Frekwensi untuk mengusir nyamuk. 
 MOV AH,00
 
 INT 16h ;Readkey 
 
 NoPCsound ; Matikan suara. 
 INT 20h ; selesai
END Proses

Program Assembly ini akan menghasilkan suara dengan frekuensi 25000 hz. Suara dengan frekuensi sebesar itu sudah cukup membuat nyamuk merasa terganggu dan membuatnya pergi. Kalau Anda iseng, Anda juga bisa mengatur frekuensi suara sesuai kehendak Anda. Selamat bereksperimen! dan tentunya Happy night without mosquito