10 IF PEEK(152)=0 THEN OPEN1,8,1 :         LOAD "S.TOOL.OBJ",8,1
20 CLOSE 1: SYS 52618: NEW