My suggestion, Iain, is to try it out yourself :-(December 9 2004 at 6:59 AM
Response to Any suggestions for improvement? This is a simulation of the Enigma.
After a lot of work trying to fix your strange character set so quote and hyphen were correct, I still bombed immediately.
Sett AS INTEGER
Knock AS STRING
Curr AS INTEGER
You can't have a variable length string in a TYPE. Anyway, Rotor(i).Knock or the equivalent is not used anywhere in the program. So I just deleted that line to get past that error.
But the I bombed on
IF A$ = "A" OR IF A$ = "N" THEN
There is no such thing as 'OR IF'!
Of course, I could change this line to
IF (A$ = "A") OR (A$ = "N") THEN
and continue, but instead, I lost interest and am suggesting that you should get the program to run in QBasic. Then save in an ASCII file and post that file.
Newbies usually go to www.qbasic.com and click on
The QBasic Forum
Forum regulars have their own ways, which include
The QBasic Community Forums