Soundex: Difference between revisions

Soundex (view source)

20 bytes added , 2 years ago

→‎{{header|PureBasic}}: Before it returned wrong code in some words (e.g. Lloyd, Pfister)

2,131

edits

Revision as of 21:15, 24 July 2021 (view source) Jjuanhdez (talk \| contribs) (Soundex en FreeBASIC) ← Older edit		Revision as of 21:29, 24 July 2021 (view source) Jjuanhdez (talk \| contribs) (→‎{{header\|PureBasic}}: Before it returned wrong code in some words (e.g. Lloyd, Pfister)) Newer edit →
Line 4,012: word = UCase(word) code = Mid(word,1,1) previous = ""getCode(Left(word, 1)) For i = 2 To (Len(word) + 1) current = getCode(Mid(word, i, 1))