'aspeech.bs2       www.robotics.com

'This routine uses a Radio Shack Voice record/play back module
'part #276-1324.  One button turns on the green led and records.
'the other button plays back the pre-recorded sound.

speaker	con     9                              'speaker pin.
redled	con     10                             'red led pin.
grnled	con     11                             'green led pin.

rec	con     4                              'record.
ply	con     5                              'play.

setup
        low     speaker                         'turn off speaker.
        low     redled                           'turn on led.
        high    ply                               'setup voice module.
        high    rec

        gosub   honk                           'here we go.

main
        if in14=0 then record              'check if button1 is touched.
        if in15=0 then play                 'check if button2 is touched.
        goto    main                            'keep looping.

record
        low     grnled                         'signal start recording.
        low     rec                              'turn on record.

record1
        if in14=0 then record1           'loop until released.

        high    rec                              'turn off record.
        high    grnled                         'turn off led.
        goto main

play
        low     ply                               'start playing.
        pause   500
        high    ply

play1
        if in15=0 then play1
        goto    main

'beep beep honk honk.
honk
        freqout speaker,200,1500
        low speaker
return