要编写一个Vim函数来设置打印机页眉，可以按照以下步骤进行：

1. 打开Vim配置文件（通常是~/.vimrc）并添加以下代码：

function SetPrinterHeader()
  let header = input("Enter the header text: ")
  let lines = input("Enter the number of header lines: ")

  " Set the header text
  execute 'set printheader='.header

  " Set the number of header lines
  execute 'set printoptions=header:'.lines
endfunction

2. 保存并关闭Vim配置文件。

3. 重新打开Vim或重新加载配置文件，以便使函数生效。

4. 输入命令：call SetPrinterHeader()来调用函数。

5. 输入所需的页眉文本和页眉行数。

6. 现在，当你使用Vim的打印命令（例如:hardcopy）时，设置的页眉将被应用。

以下是一个完整的示例：

function SetPrinterHeader()
  let header = input("Enter the header text: ")
  let lines = input("Enter the number of header lines: ")

  " Set the header text
  execute 'set printheader='.header

  " Set the number of header lines
  execute 'set printoptions=header:'.lines
endfunction

" Call the function with a key mapping
nnoremap ph :call SetPrinterHeader()

在此示例中，我们还添加了一个键映射ph来调用函数，以便更轻松地访问设置打印机页眉的功能。您可以将键更改为您自己的首选键。

使用此函数和键映射，您可以在Vim中设置自定义的打印机页眉。