Some fun during lunch Message #1 Posted by Miguel Toro on 27 July 2007, 7:15 p.m.
Reading complains about the 35s unable to separate real and imaginary parts from a complex number, I made these little and unambitious programs to "help" get them apart and to try some of the new features.
Usage:
1. execute the program
2. Enter complex number as xiy  R/S
> now you see the number in polar mode
3. Enter angle  R/S
> you see the number in polar mode again
4. Enter radius  R/S
> you get both x and y separated.
With programs A and B, they are in the X and Y registers, with program C you get a vector.
Program A
A001 LBL A
A002 STOP
A003 r@a (polar mode)
A004 STOP
A005 x<>y
A006 STOP
A007 REGZ
A008 SIN
A009 x<>y
A010 *
A011 LASTx
A012 REGT
A013 COS
A014 *
A015 xiy (rectangular mode)
A016 RTN
LN=56
Program B
B001 LBL B
B002 STOP
B003 r@a
B004 STOP
B005 x<>y
B006 STOP
B007 ENTER
B008 REGY * SIN(REGT)
B009 REGY * COS(REGT)
B010 xiy
B011 RTN
LN=61
Program C
C001 LBL C
C002 STOP
C003 r@a
C004 STOP
C005 x<>y
C006 STOP
C007 [REGX*COS(REGZ),REGX*SIN(REGZ)]
C008 xiy
C009 RTN
LN=58
note: I am having fun like a little kid :)
Well, pure RPN is smaller and faster (but speed does not really matters here) and this could be just the spark for someone to write a "real" converter.
Regards,
Miguel
