The size of the current procedure exceeds QBasic's internal limits. Make the procedure smaller by dividing it into several procedures.