IsImage ->
Arg Name : String 
  - Is_image = -1 ..                                                           /* Не знаем, что за файл  */

If Name '.png', '.gif', '.jpg', '.jpeg' then
 Is_image = 1                                                                  /* Возможно, это картинка */
Else
 Is_image = 0                                                                  /* Но если нет - то нет   */
;

If !FileSize Name then Is_image = 0                                            /* Нет, это не картинка   */
If !ImageSize Name IMG_WIDTH then Is_image = 0                                 /* Нет, это не картинка   */
If !ImageSize Name IMG_HEIGHT then Is_image = 0                                /* Нет, это не картинка   */

/
