0 REM GOTO 100 GOTO 110 : REM JUMP TO A SPECIFIC LINE 110 RUN 120 : REM START THE PROGRAM RUNNING FROM A SPECIFIC LINE 120 IF 1 GOTO 130 : REM CONDITIONAL JUMP 130 IF 1 THEN 140 : REM THEN ALSO WORKS IN PLACE OF GOTO 140 IF 1 THEN GOTO 150 : REM BE VERBOSE BY USING THEN GOTO 150 ON A GOTO 170, 180, 190 : REM JUMP A SPECIFIC LINE NUMBER IN THE LIST INDEXED BY THE VALUE OF A STARTING AT 1, IF A IS OUT OF RANGE DO NOT JUMP 160 ON ERR GOTO 270 : REM WHEN AN ERROR OCCURS JUMP TO A SPECIFIC LINE 170 GOSUB 180 : REM JUMP TO LINE 180, PUSHING THE CURRENT PLACE ON THE STACK 180 POP : REM POP THE CURRENT PLACE FROM THE STACK, EFFECTIVELY MAKING THE PREVIOUS LINE A JUMP 190 CALL -151 : REM CALL ANY MACHINE LANGUAGE SUBROUTINE, IT MIGHT RETURN, IT MIGHT NOT 200 & : REM CALL THE USER-DEFINED AMPERSAND ROUTINE, IT MIGHT RETURN, IT MIGHT NOT 210 ? USR(0) : REM CALL THE USER-DEFINED FUNCTION, IT MIGHT RETURN, IT MIGHT NOT 220 S = 6 : ?CHR$(4)"PR#"S : REM CALL THE ROM ROUTINE IN SLOT S 230 S = 6 : ?CHR$(4)"IN#"S : REM CALL THE ROM ROUTINE IN SLOT S 240 ?CHR$(4)"RUN PROGRAM" : REM RUN A BASIC PROGRAM FROM DISK 250 ?CHR$(4)"BRUN BINARY PROGRAM": REM RUN A MACHINE LANGUAGE BINARY PROGRAM FROM DISK 260 ?CHR$(4)"EXEC PROGRAM.EX" : REM EXECUTE THE TEXT THAT IS CONTAINED IN THE FILE PROGRAM.EX 270 RESUME : REM JUMP BACK TO THE STATEMENT THAT CAUSED THE ERROR 280 STOP : REM BREAK THE PROGRAM 290 END : REM END THE PROGRAM 300 GOTO : REM NO LINE NUMBER, JUMPS TO LINE 0