Jump to content
Electronics-Lab.com Community

ziizoo

Members
  • Posts

    3
  • Joined

  • Last visited

    Never

Posts posted by ziizoo

  1. please help me find the right software for this program...
    i make a project about speech recognition..
    i use HM2007 chip for this project.. my project is to convert a voice to text...

    if anyone know about this project, please help me guys... :(
    URGENT!!!
    Thank You..

    PROGRAM:

    define osc 20
    
    DEFINE LCD_DREG		PORTD	'LCD data port
    DEFINE LCD_DBIT		0	'LCD data starting bit 0 or 4
    DEFINE LCD_RSREG	PORTC	'LCD register select port
    DEFINE LCD_RSBIT	7	'LCD register select bit
    DEFINE LCD_EREG		PORTC	'LCD enable port
    DEFINE LCD_EBIT		5	'LCD enable bit
    DEFINE LCD_RWREG	PORTC	'LCD read/write port
    DEFINE LCD_RWBIT	6	'LCD read/write bit
    DEFINE LCD_BITS		8	'LCD bus size 4 or 8
    DEFINE LCD_LINES	2	'Number lines on LCD
    DEFINE LCD_COMMANDUS	2000	'Command delay time in us
    DEFINE LCD_DATAUS	50	'Data delay time in us
    
    TRISD = %00000000	'Set port D as output
    TRISC = %00000000	'Set port C as output
    TRISB = %11111111	'Set port B as input
    low	PORTC.6		'Set the R/W bit to low
    
    pause 1000					'wait until the LCD initializes
    
    
    SCAN:
    
    LCDOUT	$FE,1					'clear LCD display
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$0 AND PORTB.3=$0 AND PORTB.4=$0 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"plz train the HM"
    
    IF PORTB.0=$0 AND PORTB.1=$1 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$0 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"one"
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$0 AND PORTB.3=$1 AND PORTB.4=$0 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"two"
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$0 AND PORTB.3=$0 AND PORTB.4=$1 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"left"
    
    IF PORTB.0=$1 AND PORTB.1=$1 AND PORTB.2=$0 AND PORTB.3=$0 AND PORTB.4=$1 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"jump"
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$1 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"gil"
    
    IF PORTB.0=$0 AND PORTB.1=$1 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$1 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"three"
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$0 AND PORTB.3=$1 AND PORTB.4=$1 AND
    PORTB.5=$0 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"stop"
    
    IF PORTB.0=$0 AND PORTB.1=$1 AND PORTB.2=$0 AND PORTB.3=$0 AND PORTB.4=$0 AND
    PORTB.5=$1 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"text"
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$0 AND
    PORTB.5=$1 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"point"
    
    IF PORTB.0=$1 AND PORTB.1=$0 AND PORTB.2=$0 AND PORTB.3=$1 AND PORTB.4=$0 AND
    PORTB.5=$1 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"socks"
    
    IF PORTB.0=$0 AND PORTB.1=$0 AND PORTB.2=$0 AND PORTB.3=$1 AND PORTB.4=$1 AND
    PORTB.5=$1 AND PORTB.6=$0 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"green"
    
    IF PORTB.0=$1 AND PORTB.1=$0 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$1 AND
    PORTB.5=$0 AND PORTB.6=$1 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"word too long"
    
    IF PORTB.0=$0 AND PORTB.1=$1 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$0 AND
    PORTB.5=$1 AND PORTB.6=$1 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"word too short"
    
    IF PORTB.0=$1 AND PORTB.1=$1 AND PORTB.2=$1 AND PORTB.3=$0 AND PORTB.4=$1 AND
    PORTB.5=$1 AND PORTB.6=$1 AND PORTB.7=$0 THEN LCDOUT $FE.$C0,	"word no match"
    
    pause 1000			'delay for 1 second before scanning the next word
    
    GOTO SCAN
    
    END



    Moderator Edit:
    Added code tags.
    Removed block capitals from thread title.

×
  • Create New...