RPN: Script

		Contents	Links	Search

RPN Scripts

RPN Documentation

Submit Script

Conversion
Conversions
Convert
Euro
Euro_Calculator
Soundex
Engineering
Feet_&_Inch
Units
Water
Entertainment
Master_Mind
Sticks!
Finance
Annuity
Euro_Calculator
TVM_Financial_Functions
Math
3D_Vectors_v1.2
Base
Base_Conversions
Complex_Arithmetic
Complex_Math
Discrete_Math
EBBases
Fractions
Fractions
Least
Logs_&_Powers
Misc
Regressions
Scientific
Scientific_Functions
Scientific_Programmable
Simple_Complex_Math
Standard_Normal_Distribution
Trig
Misc
Health
Husband's_Calculator
Physics
Angle_of_View
Depth_of_Field
Physics_Functions
Time
Clock
Julian
Multiple_Timer
Stop5Watch
Stopwatch
Timer
Utility
Board_Foot_Calculator
Calendar_Functions
Checkbook_II
MiniG
Stack_Handling_and_Saving
WindChill

Soundex

James Cook - email

summary

Converts name into Soundex code for genealogy research.

instructions

Soundex is a script to encode a name into a "sounds like"
code used by the US Census. Simply tap out
the name you wish to convert to Soundex code. Script will stop accepting
letters after the Soundex code
has been satisfied. Script sets calculator mode to Base 36 to display
first letter of code. Script
returns to Base 10 on exit.

code

RPN.2.b+4\Soundex\
{o}#'36'UbCa;
{c}#'10'Ub;
[a]0Xa0Xb;
[b]c(0:1:2:3:0:1:2:0:0:2:2:4:5:5:0:1:2:6:2:3:0:1:0:2:0:2);
[e]xac(g1CbXb#'46656'*#'466560'+1xa+Xa:
Cbg1xb=0!(g10=0!(g1Xb#'1296'*+1xa+Xa:Xb):Xb):
Cbg1xb=0!(g10=0!(g1Xb#'36'*+1xa+Xa:Xb):Xb):
Cbg1xb=0!(g10=0!(g1Xb+1xa+Xa:Xb):Xb):
D'Soundex code for this name is\
complete.  Any additional\
letters will be ignored.'d1d1Ca);
"Soundex";
"A"0Ce;
"B"1Ce;
"C"2Ce;
"D"3Ce;
"E"4Ce;
"F"5Ce;
"G"6Ce;
"H"7Ce;
"I"8Ce;
"J"9Ce;
"K"#'10'Ce;
~
"L"#'11'Ce;
"M"#'12'Ce;
"N"#'13'Ce;
"O"#'14'Ce;
"P"#'15'Ce;
"Q"#'16'Ce;
"R"#'17'Ce;
"S"#'18'Ce;
"T"#'19'Ce;
"U"#'20'Ce;
"V"#'21'Ce;
~
"W"#'22'Ce;
"X"#'23'Ce;
"Y"#'24'Ce;
"Z"#'25'Ce;
"New "Ca;
"?:Help"D'Soundex Calculator\James E. Cook (c) 
1999\Jim_Cook@ieee.org'd1;

top

August 03, 2001
contact