3245 IF ISP7 THEN PRINT CHR$(7) : GOTO 3230