Cara mengakses modul Voice Recognition V2 dengan BASCOM AVR

Cara mengakses modul Voice Recognition V2 dengan BASCOM AVR

          Di hari yang gelap ini saya akan menjelaskan bagaimana cara mengakses modul yang benar2 sangat bagus sekali untuk otomasi atau untuk kendali, yaitu voice recognition v2, selain modul ini sebenarnya ada lagi, sebagai kompetitornya yaitu modul voice recognition EASY VR, namun jika dilihat dari harganya modul EASY VR lebih mahal dibanding modul voice recognition V2. maka dari itu mengapa saya memilih modul ini, selain harganya yang terjangkau, modul ini bisa mengakses 15 suara berbeda, bisa dibilang cukup besar., modul voice recognition ini adalah modul yang bisa menerima suara dari yang kita rekam sebelumnya, sehingga dari rekaman suara tersebut, kita bisa mengendalikan sesuatu, seperti kendali led, lampu atau motor, bisa juga di aplikasikan ke robot. berikut adalah  skematik dan cara pemasangannya.

a. Skematik minimum system

b. Cara menambahkan Led

c. langkah-langkah RECORD 

-Record dengan menggunakan komputer laptop / PC

-sehingga terisi semua atau sebagian command pada GROUP

-kemudian import GROUP yang akan diakses misal GROUP 1 dengan "0xAA21"

-setelah itu modul siap digunakan.

d. Program Bascom AVR

$regfile = "m16def.dat"
$crystal = 12000000
$baud = 9600

Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2
Config Lcdpin = Pin , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5
Config Lcd = 16 * 2

Dim Comm As Byte

Upperline
Lcd "LOADING"
Wait 1

Print Chr(&Haa);
Print Chr(&H37);
Wait 1

Print Chr(&Haa);
Print Chr(&H21);
Wait 1

Ddrd.6 = 1
Ddrd.7 = 1

Cls
Cursor Off

Do

  Comm = Waitkey()

  Select Case Comm

    Case &H11 :
    'Cls
    Upperline
    Lcd "ada data 1A"
    Portd.6 = 1

    Case &H12 :
    'Cls
    Upperline
    Lcd "ada data 2B"
    Portd.6 = 0

    Case &H13 :
    'Cls
    Upperline
    Lcd "ada data 3C"
    Portd.7 = 1

    Case &H14 :
    'Cls
    Upperline
    Lcd "ada data 4D"
    Portd.7 = 0

    Case &H15 :
    'Cls
    Upperline
    Lcd "ada data 5E"
    Portd.6 = 1
    Portd.7 = 1

  End Select

Loop

e. VIDEO HASILNYA

Modulnya bisa didownlod di link berikut

download