<pre>function getPICTs  toComputer  put "PICT" into resType  if there is not a menu resType then    appendResMenu resType    return menu resType  end if  return menu resTypeend getPICTs</pre>