Help with statement Select Case in BASIC

[regressist]

Hi all and sorry for what is probably a stupid question. I am trying to translate in Pascal a program written in BASIC and I am stuck with a statement for which I do not find any documentation: the statement is

Select Case x
Case 21, 24, 25, 27 To 32, 34, 35, 38
etc.

I know
Case 21 To 28

but I am puzzled by the multiple ranges which I do not know how to understand!
Thanks in advance to whomever will reply

 

[AngleWyrm]

Select Case statement

 

[regressist]

Thanks, but note that the syntax which I reported is not included

Case A, B, ..., H To M, N, ... W

 

[AngleWyrm]

If you're looking for additional assistance, then please post the code for the entire select/case statement.
You've already stated your understanding hasn't resolved the matter, so it's up to someone else to spot the issue.

 

[regressist]

Select Case X
Case 21, 24, 25, 27 To 32, 34, 35, 38
temp = temp - 1
Case 33, 36, 37, 39, 40
temp = temp - 2
End Select

 

[AngleWyrm]

Looks to me like the program makes an adjustment to temp based on categorization of x as belonging to one of three possible sets.

* A set where 1 is subtracted
* A set where 2 is subtracted
* Everything else where no change is applied

That's what this extra pair of eyes got for ya.

 

[regressist]

OK thanks but what is the set 1?

 

[canada_roy]

I realize it has been along time since the question, but I hate unanswered questions.

OK thanks but what is the set 1?

If X matches ANY of the conditions in the list, temp is reduced by 1
i.e. X can be
21,
24,
25,
any number from 27 To 32,
34,
35,
38