View Single Post
Old 10-28-2001, 05:40 AM   #12
Mirac Honorguard
Red Wizard of Thay
 

Join Date: August 21, 2001
Location: Limburg, Netherlands, Europe
Age: 42
Posts: 894
Quote:
Originally posted by Lord Shield:
My Pascal is over a decade old but have some pseudo-code:

this will sort out the input letter queries:

inp_char = 1st parameter
search_String = 2nd parameter (string of letters)

wl_inp_pos = 0
wl_inp_count = 0

for a% = 1 to length(search_string)
if seg$(search_string,a%,1) = inp_char then
if wl_inp_count = 0% then
wl_inp_pos = position(this_char) !!position of first char found
end if
wl_inp_count = wl_inp_count + 1 !!counter for no. of times found
end if
next a%


hope this helps

This is the 3GL solution anyway



WOOOOW, I didn't know this was Pascal code. If I sent this to my teacher he'll get suspicious about my capacities.
All your help is appreciated and will be used!!!!

THANKS!!



------------------

Lady Menqel, Protector of IW's, smiter of evil

http://www.angelfire.com/rpg2/mirac
- Dualled Swashbuckler/Fighter
- Fellow Table Dancer of the Jerome's Table dancer group
- Spell formulater of the IW peace-keeping force
- Thanks to Sazerac for the great sig picture
Mirac Honorguard is offline