converting code between stamp 2 and Basic X chip??
Archiver
Posts: 46,084
THis is sorta of a off ball question , ive been researching net
media's basic X chips (www.basicx.com) and they seem be more "faster"
as ill say for my application im trying to build.... my application
is a fuel injection system for gasoline engines, and ill admit ive
had the basic stamp 2 running my system for a while now and works
fine but i want to "upgrade" its allibilites for a better system...
the basic x seems have a lot more options and commands and my
favorite of all intrupts (for a low price of 30 bucks a chip [noparse]:)[/noparse] ...
thats the kicker, im on a budjet ... anyways hear is my sample code i
want to beable to use on the basic x chip its very simple of how it
flows and is mostly setup for if then commands (my favorite for
emulated inturupts heh) anyways hear it is....
TB_POS VAR NIB ' used for thottle postion sensor
X VAR WORD ' variable for pulse out command
X0 CON 0 ' constants for pulse out varible
X1 CON 4000
X2 CON 4111
X3 CON 4222
X4 CON 4333
X5 CON 4444
X6 CON 4555
X7 CON 4666
INPUT 14 ' sensor input
INPUG 10 ' sensor input
BOOTUP: ' system bootup
DEBUG CLS, "SYSTEM BOOTING"
PAUSE 500
DEBUG CR, "SYSTEM OK!"
IF IN14 = 0 THEN STUCK ' used for if sensor condition is
already true
INJECT: ' injector subroutine
HIGH 9 ' ADC input pin
LOW 9 ' ADC input pin
SHIFTIN 10,8,MSBPOST,[noparse][[/noparse]TB_POS\3]' shfit in MAX187 ADC inofmration
LOOKUP TB_POS, [noparse][[/noparse]X0,X1,X2,X3,X4,X5,X6,X7],X ' lookup table for
thottole and pulse out constants
PULSEOUT 12,X ' pulse out result from the lookup
table
IF IN14 = 0 THEN TB2 ' check see if sensor condtion is
still true, if so then goto TB2 '
subroutine and wait for the condtion to become false
MAIN: ' main program loop, wait for sensor
condition to become true,
IF IN14 = 0 THEN INJECT ' if not then loop over and over
GOTO MAIN
TB2: ' program loop for sensor condition
if sensor condition is still
IF IN14 = 0 THEN TB2 ' true then loop over and over, if
not go back to main loop
GOTO MAIN
STUCK: ' program loop for sensor if sensor
condition during system bootup
IF IN14 = 0 THEN STUCK ' is true, hear it will wait for
sensor to become false and start
GOTO MAIN ' the main program loop
if anyone can help me or point in right direction id apperiate it,
ive tried posting this on the Basic X fourm but they seem to want
charge me on how to conver it over even tho im a hobbiyst and im
doing this for my own ( i want my gokarts to go faster) ...
Sean...
media's basic X chips (www.basicx.com) and they seem be more "faster"
as ill say for my application im trying to build.... my application
is a fuel injection system for gasoline engines, and ill admit ive
had the basic stamp 2 running my system for a while now and works
fine but i want to "upgrade" its allibilites for a better system...
the basic x seems have a lot more options and commands and my
favorite of all intrupts (for a low price of 30 bucks a chip [noparse]:)[/noparse] ...
thats the kicker, im on a budjet ... anyways hear is my sample code i
want to beable to use on the basic x chip its very simple of how it
flows and is mostly setup for if then commands (my favorite for
emulated inturupts heh) anyways hear it is....
TB_POS VAR NIB ' used for thottle postion sensor
X VAR WORD ' variable for pulse out command
X0 CON 0 ' constants for pulse out varible
X1 CON 4000
X2 CON 4111
X3 CON 4222
X4 CON 4333
X5 CON 4444
X6 CON 4555
X7 CON 4666
INPUT 14 ' sensor input
INPUG 10 ' sensor input
BOOTUP: ' system bootup
DEBUG CLS, "SYSTEM BOOTING"
PAUSE 500
DEBUG CR, "SYSTEM OK!"
IF IN14 = 0 THEN STUCK ' used for if sensor condition is
already true
INJECT: ' injector subroutine
HIGH 9 ' ADC input pin
LOW 9 ' ADC input pin
SHIFTIN 10,8,MSBPOST,[noparse][[/noparse]TB_POS\3]' shfit in MAX187 ADC inofmration
LOOKUP TB_POS, [noparse][[/noparse]X0,X1,X2,X3,X4,X5,X6,X7],X ' lookup table for
thottole and pulse out constants
PULSEOUT 12,X ' pulse out result from the lookup
table
IF IN14 = 0 THEN TB2 ' check see if sensor condtion is
still true, if so then goto TB2 '
subroutine and wait for the condtion to become false
MAIN: ' main program loop, wait for sensor
condition to become true,
IF IN14 = 0 THEN INJECT ' if not then loop over and over
GOTO MAIN
TB2: ' program loop for sensor condition
if sensor condition is still
IF IN14 = 0 THEN TB2 ' true then loop over and over, if
not go back to main loop
GOTO MAIN
STUCK: ' program loop for sensor if sensor
condition during system bootup
IF IN14 = 0 THEN STUCK ' is true, hear it will wait for
sensor to become false and start
GOTO MAIN ' the main program loop
if anyone can help me or point in right direction id apperiate it,
ive tried posting this on the Basic X fourm but they seem to want
charge me on how to conver it over even tho im a hobbiyst and im
doing this for my own ( i want my gokarts to go faster) ...
Sean...
Comments
misunderstanding.
Your post is completely inappropriate and you have been placed under
moderation. That means that we will read your posts before they make it
to the list. Any future posts referencing competitive products that do
not serve the interests of the BASIC Stamp community will cause your
immediate removal from our list.
And now let me tell you a little story: Before working for Parallax, I
had designed a successful product around the BS2. It was so successful,
in fact, that my boss wanted a bigger and better version. That other
company had been asking me to write about their products (I write a
column for Nuts & Volts magazine) and they looked good at the time, so I
asked them to assist in porting my BS2 application to their device --
since they proclaimed that anything a BASIC Stamp could do, they could
do better and faster. Guess what? They couldn't port my program --
what worked perfectly on a stock BS2 could not be ported to their
product. This is not an indictment of their micro. They use Visual
BASIC as their programming model and VB is designed to run on desktop
computers, not embedded microcontrollers. I'm not saying that you can't
accomplish what you want to do, I'm just saying that the design of VB
might make it a little less straightforward than PBASIC which was always
designed to run on a small microcontroller.
Talk is cheap. Our competitors have no difficulty sullying our good
name, taking pot-shots at us, abusing our trademarks and intellectual
property ... but where are they when their customers need help? If you
had any idea how many times competitors' (any of them) customers pick up
the phone and call OUR customer service department for help you would be
shocked. But maybe not. You had the nerve to come ask BASIC Stamp
users for help, and I checked the other list, you didn't post the same
question there (at least in the last couple of days).
Okay, I'm done ranting. No product is perfect ... not ours, not theirs,
but we -- if anyone -- have shown a dedication to our customers via the
voluminous material and devoted service we provide at no charge. The
app notes from the other guys? Please ... how many times can they be
referenced right back to something originally created by Parallax? Far
too often in my opinion. And if you think that ANY microcontroller
running BASIC can do interrupts, you're mistaken. BASIC is not
reentrant (What do you think happens, for example, if an interrupt is
triggered in the middle of a PULSIN or PULSOUT instruction? Think about
it ... how do you deal with the timing?). The best you can do is poll
between BASIC language instructions, something we do in the BS2p -- and
we're honest about what you can and can't do with polling.
Please feel free to return your BASIC Stamp for a full refund. If
you're not happy with it, we'd rather return your money so you can
purchase something that will make you happy.
To other list members I apologize for my apparent temper. Having been
associated with Parallax for the past ten years I find this post highly
offensive and insulting, and couldn't not say anything.
-- Jon Williams
-- Applications Engineer, Parallax
-- Dallas Office
Original Message
From: djrevolution99 [noparse]/noparse]mailto:[url=http://forums.parallaxinc.com/group/basicstamps/post?postID=kvPQcdshZpNQDkA8azeUrG2QdR22ezMCahthShFHEnkgvsmUhjmrcge6B5AAWNk8NpQ5rHFz8mW2tEYaBffMd9Iq]djrevolution99@y...[/url
Sent: Thursday, January 08, 2004 8:55 PM
To: basicstamps@yahoogroups.com
Subject: [noparse][[/noparse]basicstamps] converting code between stamp 2 and Basic X
chip??
THis is sorta of a off ball question , ive been researching net
media's basic X chips (www.basicx.com) and they seem be more "faster"
as ill say for my application im trying to build.... my application
is a fuel injection system for gasoline engines, and ill admit ive
had the basic stamp 2 running my system for a while now and works
fine but i want to "upgrade" its allibilites for a better system...
the basic x seems have a lot more options and commands and my
favorite of all intrupts (for a low price of 30 bucks a chip [noparse]:)[/noparse] ...
thats the kicker, im on a budjet ... anyways hear is my sample code i
want to beable to use on the basic x chip its very simple of how it
flows and is mostly setup for if then commands (my favorite for
emulated inturupts heh) anyways hear it is....
TB_POS VAR NIB ' used for thottle postion sensor
X VAR WORD ' variable for pulse out command
X0 CON 0 ' constants for pulse out varible
X1 CON 4000
X2 CON 4111
X3 CON 4222
X4 CON 4333
X5 CON 4444
X6 CON 4555
X7 CON 4666
INPUT 14 ' sensor input
INPUG 10 ' sensor input
BOOTUP: ' system bootup
DEBUG CLS, "SYSTEM BOOTING"
PAUSE 500
DEBUG CR, "SYSTEM OK!"
IF IN14 = 0 THEN STUCK ' used for if sensor condition is
already true
INJECT: ' injector subroutine
HIGH 9 ' ADC input pin
LOW 9 ' ADC input pin
SHIFTIN 10,8,MSBPOST,[noparse][[/noparse]TB_POS\3]' shfit in MAX187 ADC inofmration
LOOKUP TB_POS, [noparse][[/noparse]X0,X1,X2,X3,X4,X5,X6,X7],X ' lookup table for
thottole and pulse out constants
PULSEOUT 12,X ' pulse out result from the lookup
table
IF IN14 = 0 THEN TB2 ' check see if sensor condtion is
still true, if so then goto TB2 '
subroutine and wait for the condtion to become false
MAIN: ' main program loop, wait for sensor
condition to become true,
IF IN14 = 0 THEN INJECT ' if not then loop over and over
GOTO MAIN
TB2: ' program loop for sensor condition
if sensor condition is still
IF IN14 = 0 THEN TB2 ' true then loop over and over, if
not go back to main loop
GOTO MAIN
STUCK: ' program loop for sensor if sensor
condition during system bootup
IF IN14 = 0 THEN STUCK ' is true, hear it will wait for
sensor to become false and start
GOTO MAIN ' the main program loop
if anyone can help me or point in right direction id apperiate it,
ive tried posting this on the Basic X fourm but they seem to want
charge me on how to conver it over even tho im a hobbiyst and im
doing this for my own ( i want my gokarts to go faster) ...
Sean...
To UNSUBSCRIBE, just send mail to:
basicstamps-unsubscribe@yahoogroups.com
from the same email address that you subscribed. Text in the Subject
and Body of the message will be ignored.
Yahoo! Groups Links
To visit your group on the web, go to:
http://groups.yahoo.com/group/basicstamps/
To unsubscribe from this group, send an email to:
basicstamps-unsubscribe@yahoogroups.com
Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
This message has been scanned by WebShield. Please report SPAM to
abuse@p....
> To other list members I apologize for my apparent temper.
> Having been associated with Parallax for the past ten years
> I find this post highly offensive and insulting [noparse][[/noparse]...]
Quite alright, Jon. I did too, and I'm only a Stamp customer and that only
for a few months. Well said.
Gary
Alan Bradford
Plasma Technologies
In a message dated 1/9/2004 12:34:11 PM Eastern Standard Time,
jwilliams@p... writes:
Please feel free to return your BASIC Stamp for a full refund. If
you're not happy with it, we'd rather return your money so you can
purchase something that will make you happy.
To other list members I apologize for my apparent temper. Having been
associated with Parallax for the past ten years I find this post highly
offensive and insulting, and couldn't not say anything.
-- Jon Williams
-- Applications Engineer, Parallax
-- Dallas Office
[noparse][[/noparse]Non-text portions of this message have been removed]
Well said indeed. I share Gary's opinions, and I am a returning user
for the Stamp.
Gregg C Levine hansolofalcon@w...
"The Force will be with you...Always." Obi-Wan Kenobi
"Use the Force, Luke."· Obi-Wan Kenobi
(This company dedicates this E-Mail to General Obi-Wan Kenobi )
(This company dedicates this E-Mail to Master Yoda )
>
Original Message
> From: Gary W. Sims [noparse]/noparse]mailto:[url=http://forums.parallaxinc.com/group/basicstamps/post?postID=mTJNVrCqPSFLyvFkinwKp9GwATaJnodqqzN4uVxGUapsrmWpv9pvEIgO19Bs4qZsT9-AskBUCVsue3X9yvQ]simsgw@c...[/url
> Sent: Friday, January 09, 2004 3:01 PM
> To: basicstamps@yahoogroups.com
> Subject: Re: [noparse][[/noparse]basicstamps] converting code between stamp 2 and Basic
X chip??
>
> >
> > To other list members I apologize for my apparent temper.
> > Having been associated with Parallax for the past ten years
> > I find this post highly offensive and insulting [noparse][[/noparse]...]
>
> Quite alright, Jon. I did too, and I'm only a Stamp customer and
that only
> for a few months. Well said.
>
> Gary
>
>
>