




610 IF i$="save" THEN OPENOUT"!ASS A$":FOR n=1 TO en-1:PRINT#9,k(n),a$(n):NEXT:CLOSEOUT:GOTO 450
620 IF i$="load" THEN OPENIN"!ASS A$"":n=1:WHILE EOF<>-1:INPUT#9,k(n),a$(n):n=n+1:WEND:CLOSEIN:en=n:GOTO 450
630 IF i$="saveb" THEN SAVE"!ASS LM"",b,30000,k(en-1)-30000:GOTO 450
610 IF i$="save" THEN OPENOUT"assemble.asm":FOR n=1 TO en-1:PRINT#9,k(n),a$(n):NEXT:CLOSEOUT:GOTO 450
620 IF i$="load" THEN OPENIN"assemble.asm":n=1:WHILE EOF<>-1:INPUT#9,k(n),a$(n):n=n+1:WEND:CLOSEIN:en=n:GOTO 450
630 IF i$="saveb" THEN SAVE"ass",b,30000,k(en-1)-30000:GOTO 450