Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!swrinde!cs.utexas.edu!asuvax!ukma!usenet.ins.cwru.edu!ysub!psuvm!cunyvm!ndsuvm1!mtus5!jmeyers
From: JMEYERS@MTUS5.BITNET
Newsgroups: comp.sys.handhelds
Subject: Re: Progamming Flags
Message-ID: <91122.192123JMEYERS@MTUS5.BITNET>
Date: 3 May 91 00:21:23 GMT
References: <9105021444.AA14927@enuxha.eas.asu.edu>
Organization: Computing Technology Services, Michigan Technological Univ.
Lines: 46

In article <9105021444.AA14927@enuxha.eas.asu.edu>, salvato@ENUXHA.EAS.ASU.EDU
(Vincent H. Salvato) says:
>
>     I have a question regarding writing a program to set or clear a flag
>automatically.  I am going into third semester calculus an
>second semester claculus in which the whole class uses HP48sx's.  We seem to
>do
>a lot of calculations in which we either need a real
>symbolic answer.  I hate having to always check the modes menu and to see if
>symbolic is on or not.  I want to write a program that
>automaticaly turns it off and says "SYM OFF" and in turn if symbolic is
>already
>off I want it to turn it on and say "SYM ON".  I have not written anything
>with
>if statements or anything with some type of checker.
>
>                        -Vince
>                        -salvato@enuxha.eas.asu.edu

I had a little difficulty reading your file since you didn't include any
CR/LF.  However, I think that the following programm will do what you
want it to do.  I have hand typed it in so it is NOT in a down loadable
format!  This shouldn't be a problem since it is small.

<<  IF -3 SF?
    THEN -3 CF "SYM ON"
    ELSE -3 SF "SYM OFF"
    END 1 DISP 1 WAIT
>>

I named the program TSYM to stand for Toggle SYMbolic results.
If this isn't what you were looking for then please repost your
request with CR/LF inserted after about every 70 characters.  Most
systems don't allow more than 80 characters per line.
Sincerely,
Jason P. Meyers

 /========================= /========================================
| JMEYERS@mtus5.cts.mtu.edu |                                          |
|            or             | H   H PPPP        44   888   SSS  X   X  |
|   JMEYERS@MTUS5.BITNET    | H   H P   P      4 4  8   8 S      X X   |
|    HP-48 list owner       | HHHHH PPPP  ==  4  4   888   SSS    X    |
 >-------------------------<  H   H P        444444 8   8     S  X X   |
|   Michigan Technological  | H   H P            4   888   SSS  X   X  |
|        University         |                                          |
 =========================/ ========================================/