480 RCODE = PEEK(778): IF RC = 2 THEN MM = MM +2:LV = LV +1: VTAB 23: HTAB 1: PRINT "5 YEARS LATER...";: IF LV - INT(LV/5) *5 = 0 THEN SP = SP +1: VTAB 24: HTAB 1: INVERSE : PRINT "FREE SHIP AWARDED TO YOU!";: NORMAL : VTAB 23
490 POKE 771,LV
500 POKE 34,22
510 IF RCODE = 1 THEN 650
520 IF RCODE = 3 THEN 1530
530 IF RCODE = 4 THEN 1510
540 GOSUB 760
550 LE = PEEK(779):LE = LE +1: IF LE >9 THEN LE = 9
560 POKE 779,LE
570 IF LV - INT(LV/2) *2 = 0 AND LV >4 THEN SM = SM +1: HTAB 17: VTAB 22 *(SM <10) +1: PRINT "THE ALIENS ARE BUILDING!";: IF SM >9 THEN SM = 9: HTAB 17: VTAB 23: PRINT "CONSTRUCTION COMPLETED!";
1220 NEXT : IF SM <9 THEN FOR I = SM +1 TO 9: POKE 25362 +I,0: NEXT
1230 RETURN
1240 END
1250 INVERSE : PRINT "PLEASE WAIT";: NORMAL : PRINT "...";
1260 IF RM% THEN RETURN
1270 RM% = 1
1280 LAC = 24576:CA = 0: FOR H = 0 TO 2:BYTE = 31: FOR I = 0 TO 3:BYTE = BYTE +1: FOR J = 0 TO 1: FOR K = 0 TO 7: POKE LAC +CA,BYTE +(4 *K):CA = CA +1: NEXT K,J,I,H
1290 POKE LAC +CA,255:CA = CA +1: IF CA <256 THEN 1290