Saturday, October 07, 2006

Group 7 _ Prototype 3 _ Stan, Sara, Orama, Lola

Resolved last weeks problems and we were able to wire Flexinol to respond to the Pressure Sensor "Flexiforce"

Code Provided by Group from Last Year , - (Amy Campos, Nazli et al. )

' Flexiforce Simple.bs2
' Displays R/C Discharge Time in BASIC Stamp DEBUG Window
' {$STAMP BS2}
' {$PBASIC 2.5}
' {$PORT COM15}

rawForce VAR Word '(sets up variable FOR when pressure is applied TO sensor)
sensorPin CON 15 '(port that sensor is plugged into)

HIGH sensorPin '(activates sensor)
RCTIME sensorPin,1,rawForce
DEBUG HOME, "Flexiforce raw output = ", DEC rawForce,CR
IF rawForce > 0 THEN
HIGH 2 '(activates flexinol wire)
PAUSE 1000 '(reaction time FOR flexinol wire)
GOTO Measure

Comments: Post a Comment

<< Home

This page is powered by Blogger. Isn't yours?