I'd agree with the BASIC assumption, except the comma delimited variables before there are line-numbers should be colons, and the "is not equal 0" part is utter gibberish in any dialect of BASIC I'm aware of. The "end while" is also a bit off since in BASIC dialects that have WHILE typically use WEND.
Actually has me thinking it might be COMAL or something similar, except that COMAL uses := instead of = on assignments.
That's really kind of a strange hodge-podge. It has the telltales and structure of three different languages.