This site is currently undergoing maintenance. Rather than shutting the site down completely, we are presenting the site in read-only mode.
You will not be able to login or post, but you can read through the site. We apologize for the inconvenience. Thank you.
Side note = Check this out
I ran it but was unable to figure out what I was doing.
Anyway, in the following code, I get "subscript out of range" if I enter the same settings as given in the other post, but instead use uppercase letters on inpus.
Suggested fix: Use LCASE$ when getting those letters.
' The Main Part of the code
FOR i = 1 TO 10
IF Rotor(i).Curr = 1 THEN R$ = Letter(Rotor(i).Sett)
IF Rotor(i).Curr = 2 THEN M$ = Letter(Rotor(i).Sett)
IF Rotor(i).Curr = 3 THEN L$ = Letter(Rotor(i).Sett)
This message has been edited by Mac36 on Dec 15, 2004 6:09 PM