Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Помогите сделать цикл для скрипта Gimp 
V
    Опции темы
BlackRu
Дата 6.1.2012, 03:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 431
Регистрация: 14.9.2009

Репутация: нет
Всего: 4



Подскажите, надо в цикле выполнить три процедуры, увеличивая счетчик слоев на 1 - от 1 до 20, т.е., видимо подставляя переменную 
в 1-ой процедуре там, где третья по счету единица, в 2-ой и третьей, вроде бы понятно, где smile
Код

1. (plug-in-edge  1 1 1 2.0 2 0)
2. (gimp-invert 1)
3. (gimp-desaturate 1)

Фух, разобрался с переменными:

Код

(let*
 ((x 2) 
 (set! (plug-in-edge  1 1 x 2.0 2 0))))

(let*
 ((x 2) 
 (set! (gimp-invert x))))

(let*
 ((x 2) 
 (set! (gimp-desaturate  x))))


Но вот как сделать цикл, который бы присваивал поочередно x значения от 1 до 20 и при этом не возвращал ошибку при отсутствии слоя, пока не пойму.
Буду рад помощи

Это сообщение отредактировал(а) BlackRu - 6.1.2012, 16:14


--------------------
Удалена администрацией форума
PM MAIL WWW Skype   Вверх
k0rvin
Дата 18.1.2012, 11:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 442
Регистрация: 24.1.2010

Репутация: нет
Всего: 5



Ни с чем ты не разобрался. Почитай хоть немного про Scheme

Код

(let loop ((x 1))
  (when (<= x 20)
    (plug-in-edge 1 1 x 2.0 2 0)
    (gimp-invert x)
    (gimp-desaturate x)
    (loop (- x 1))))



--------------------
“Object-oriented design is the roman numerals of computing.” — Rob Pike
All software sucks
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума LISP
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Lisp — это целое семейство языков. Всегда указывайте в теме используемый диалект (Common Lisp, Scheme и т.д.).
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | LISP | Следующая тема »


 




[ Время генерации скрипта: 0.0425 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.