Prev: solving x^2=const for x / root simplifications
Next: Error in SOLVEVX
From: Loucks80 on 5 Dec 2007 09:48
I wrote a program that helps me a whole lot at work on my TI 85. Now i
have the HP 48GII and need to get the same program on this calculator.
I would love to use the Inform box similar to the financial feature
with the solve function built in. I will post the TI program below, if
anyone could help me with this i would be greatly appriciative. Thank
you so much!

Prompt SF
Prompt IPR
Prompt SDIA
Prompt EDIA
Prompt DCUT
Prompt TRAVEL
Prompt RPMLIM

Time=0 (Time Counter)

While SDIA>=EDIA

RPM=SF/(SDIA*.2618)

IF RPM>RPMLIM (IF RPM Reached RPM LIMIT)
THEN

IPM=RPMLIM*IPR (Calculates inches per min per pass using
Limit)
TIM=TRAVEL/IPM (Calculates time per pass)
TIM+TIME STO TIME (Adds Time)
SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)

ELSE (IF RPM is Below RPM LIMIT)

IPM=RPM*IPR (Calculates inches per min per pass using
Limit)
TIM=TRAVEL/IPM (Calculates time per pass)
TIM+TIME STO TIME (Adds Time)
SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
End

End

DISP TIME (Shows time in Min)
DISP"MIN"

From: mnhollinger on 6 Dec 2007 12:56
On Dec 5, 9:48 am, Loucks80 <louck...(a)yahoo.com> wrote:
> I wrote a program that helps me a whole lot at work on my TI 85. Now i
> have the HP 48GII and need to get the same program on this calculator.
> I would love to use the Inform box similar to the financial feature
> with the solve function built in. I will post the TI program below, if
> anyone could help me with this i would be greatly appriciative. Thank
> you so much!
>
> Prompt SF
> Prompt IPR
> Prompt SDIA
> Prompt EDIA
> Prompt DCUT
> Prompt TRAVEL
> Prompt RPMLIM
>
> Time=0 (Time Counter)
>
> While SDIA>=EDIA
>
> RPM=SF/(SDIA*.2618)
>
> IF RPM>RPMLIM (IF RPM Reached RPM LIMIT)
> THEN
>
> IPM=RPMLIM*IPR (Calculates inches per min per pass using
> Limit)
> TIM=TRAVEL/IPM (Calculates time per pass)
> TIM+TIME STO TIME (Adds Time)
> SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
>
> ELSE (IF RPM is Below RPM LIMIT)
>
> IPM=RPM*IPR (Calculates inches per min per pass using
> Limit)
> TIM=TRAVEL/IPM (Calculates time per pass)
> TIM+TIME STO TIME (Adds Time)
> SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
> End
>
> End
>
> DISP TIME (Shows time in Min)
> DISP"MIN"

Could you post some examples with numerical data? Also, see Page 675
- "Input through input forms" in your calculator manual.
From: fbynum2 on 6 Dec 2007 18:31
On Dec 5, 9:48 am, Loucks80 <louck...(a)yahoo.com> wrote:
> I wrote a program that helps me a whole lot at work on my TI 85. Now i
> have the HP 48GII and need to get the same program on this calculator.
> I would love to use the Inform box similar to the financial feature
> with the solve function built in. I will post the TI program below, if
> anyone could help me with this i would be greatly appriciative. Thank
> you so much!
>
> Prompt SF
> Prompt IPR
> Prompt SDIA
> Prompt EDIA
> Prompt DCUT
> Prompt TRAVEL
> Prompt RPMLIM
>
> Time=0 (Time Counter)
>
> While SDIA>=EDIA
>
> RPM=SF/(SDIA*.2618)
>
> IF RPM>RPMLIM (IF RPM Reached RPM LIMIT)
> THEN
>
> IPM=RPMLIM*IPR (Calculates inches per min per pass using
> Limit)
> TIM=TRAVEL/IPM (Calculates time per pass)
> TIM+TIME STO TIME (Adds Time)
> SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
>
> ELSE (IF RPM is Below RPM LIMIT)
>
> IPM=RPM*IPR (Calculates inches per min per pass using
> Limit)
> TIM=TRAVEL/IPM (Calculates time per pass)
> TIM+TIME STO TIME (Adds Time)
> SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
> End
>
> End
>
> DISP TIME (Shows time in Min)
> DISP"MIN"

I have translated the program into user rpl, but am hesitant in
publishing it until I can test it. Please do send example inputs and
expected output, so I can verify that my translation is indeed
functioning properly.
From: mnhollinger on 6 Dec 2007 20:33
On Dec 6, 6:31 pm, fbyn...(a)nc.rr.com wrote:
> On Dec 5, 9:48 am, Loucks80 <louck...(a)yahoo.com> wrote:
>
>
>
>
>
> > I wrote a program that helps me a whole lot at work on my TI 85. Now i
> > have the HP 48GII and need to get the same program on this calculator.
> > I would love to use the Inform box similar to the financial feature
> > with the solve function built in. I will post the TI program below, if
> > anyone could help me with this i would be greatly appriciative. Thank
> > you so much!
>
> > Prompt SF
> > Prompt IPR
> > Prompt SDIA
> > Prompt EDIA
> > Prompt DCUT
> > Prompt TRAVEL
> > Prompt RPMLIM
>
> > Time=0 (Time Counter)
>
> > While SDIA>=EDIA
>
> > RPM=SF/(SDIA*.2618)
>
> > IF RPM>RPMLIM (IF RPM Reached RPM LIMIT)
> > THEN
>
> > IPM=RPMLIM*IPR (Calculates inches per min per pass using
> > Limit)
> > TIM=TRAVEL/IPM (Calculates time per pass)
> > TIM+TIME STO TIME (Adds Time)
> > SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
>
> > ELSE (IF RPM is Below RPM LIMIT)
>
> > IPM=RPM*IPR (Calculates inches per min per pass using
> > Limit)
> > TIM=TRAVEL/IPM (Calculates time per pass)
> > TIM+TIME STO TIME (Adds Time)
> > SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
> > End
>
> > End
>
> > DISP TIME (Shows time in Min)
> > DISP"MIN"
>
> I have translated the program into user rpl, but am hesitant in
> publishing it until I can test it. Please do send example inputs and
> expected output, so I can verify that my translation is indeed
> functioning properly.- Hide quoted text -
>
> - Show quoted text -

Don't be afraid to publish your program on this site because no one
here is going to judge your work. It looks like you do work in a
machine shop, am I correct? Why don't you run the programs on both
machines simultaneously and compare the results? Debugging is tedious
work so you have to be tenacious about it. Can you place comments
next to all of your TI 85 valuables to explain what they represent?
From: fbynum2 on 6 Dec 2007 21:46
On Dec 6, 8:33 pm, mnhollin...(a)yahoo.com wrote:
> On Dec 6, 6:31 pm, fbyn...(a)nc.rr.com wrote:
>
>
>
>
>
> > On Dec 5, 9:48 am, Loucks80 <louck...(a)yahoo.com> wrote:
>
> > > I wrote a program that helps me a whole lot at work on my TI 85. Now i
> > > have the HP 48GII and need to get the same program on this calculator.
> > > I would love to use the Inform box similar to the financial feature
> > > with the solve function built in. I will post the TI program below, if
> > > anyone could help me with this i would be greatly appriciative. Thank
> > > you so much!
>
> > > Prompt SF
> > > Prompt IPR
> > > Prompt SDIA
> > > Prompt EDIA
> > > Prompt DCUT
> > > Prompt TRAVEL
> > > Prompt RPMLIM
>
> > > Time=0 (Time Counter)
>
> > > While SDIA>=EDIA
>
> > > RPM=SF/(SDIA*.2618)
>
> > > IF RPM>RPMLIM (IF RPM Reached RPM LIMIT)
> > > THEN
>
> > > IPM=RPMLIM*IPR (Calculates inches per min per pass using
> > > Limit)
> > > TIM=TRAVEL/IPM (Calculates time per pass)
> > > TIM+TIME STO TIME (Adds Time)
> > > SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
>
> > > ELSE (IF RPM is Below RPM LIMIT)
>
> > > IPM=RPM*IPR (Calculates inches per min per pass using
> > > Limit)
> > > TIM=TRAVEL/IPM (Calculates time per pass)
> > > TIM+TIME STO TIME (Adds Time)
> > > SDIA-(DCUT*2) STO SDIA (Subtracts depth of cut from diameter)
> > > End
>
> > > End
>
> > > DISP TIME (Shows time in Min)
> > > DISP"MIN"
>
> > I have translated the program into user rpl, but am hesitant in
> > publishing it until I can test it. Please do send example inputs and
> > expected output, so I can verify that my translation is indeed
> > functioning properly.- Hide quoted text -
>
> > - Show quoted text -
>
> Don't be afraid to publish your program on this site because no one
> here is going to judge your work. It looks like you do work in a
> machine shop, am I correct? Why don't you run the programs on both
> machines simultaneously and compare the results? Debugging is tedious
> work so you have to be tenacious about it. Can you place comments
> next to all of your TI 85 valuables to explain what they represent?- Hide quoted text -
>
> - Show quoted text -

You have me confused with the original sender. I was just responding
to his ask for help, but needed some examples so I could test the user
rpl code I was working on.
 | 
Pages: 1
Prev: solving x^2=const for x / root simplifications
Next: Error in SOLVEVX