Home > CBM > BASIC > Keywords > Goto | |||||||||||||||||||||||||||||||||||||||||||||||||||||||
* zero or more spaces (hex 20) may appear between CB and A4
~ or ~ ON selector GOTO lineNumber [ , lineNumber ] ...
GOTO can be used for unconditional program flow re-direction. However it is typically used in conjunction with a decision making process. The most typical case being the IF/THEN/ELSE construct. Since some BASIC versions lack ELSE, excpect them to have more instances of pure GOTOs. Although the main (trailing) argument to GOTO, the lineNumber, is simply a number, CBM BASIC does not allow the number to be contained in a variable or calculated from an expression. Why, why, why? It seems to make a RENUMBER routine more complex, but the original version(s) of CBM BASIC did not have RENUMBER so the answer must be something else... You might need to ask Bill Gates! Anyway, a kludgy method around the "no variables, no expressions" restriction is the use of the ON preposition. When this is present, the selector is evaluated. If the result is less than 0 (or greater than 255), then an ILLEGAL QUANTITY ERROR is generated. Otherwise the selector's value (call it N) is used to select the Nth lineNumber in the list. Not all N possibilities need to be entered. If N is greater than the number of lineNumbers following GOTO, then the GOTO is completely ignored and the statment following it (whether on the same line or the next line) will be executed instead. If N is less/equal to the count of lineNumbers listed, then Nth one is used. Not all N values need to have a corresponding lineNumber, but for any N that is actually choosen, its corresponding line number must exist in the program or an UNDEF'D STATEMENT ERROR occurs. If the Nth lineNumber is "empty" (no number) and is selected, then instead a SYNTAX ERROR message will be generated (all other cases work as described above). If the Nth lineNumber is junk then everything will run fine when N is > 0 and N < junk entry, but when N = 0 or N >= to the junk entry, you will also get SYNTAX ERROR. Sorry if that seems complex! Now you know why I call it a kludge. Some examples are below. Also it should be noted that ON/GOTO is very similar (and more compact) than the SELECT/CASE of VisualBASIC or SWITCH/CASE of C. Anyway, it is cleaner and faster than a long chain of IF/THEN/ELSE statements, which would otherwise be needed. If GOTO is executed in direct mode, the BASIC interpreter will change its internal state from from "direct mode" to "run mode". While the concept may seem obvious, the details are not well-documented! See this topic for details. When this happens, BASIC updates a secret variable (sets it to 128). It is secret because BASIC provides no way to read the value (except for machine-specific PEEK). Example 1:
Example 2 with junk:
© H2Obsession, 2014 |