loop4.lsp 2 KB