[LadyAwa]

Duzo bardziej bys mi pomogl, jakbys wczesniej nadmienil, ze katalog SCRIPTS znajduje sie w katalogu uzytkownika, a nie w folderze programu. Ale wszystko dziala, jest ok, wiec wielkie dzieki Rozumiem, ze dla innego koloru wystarczy tylko zmienic liczbe w odcieniu?

Aha, nie ma jakiegos sposobu, zeby zaznaczyc wieksza ilosc plikow przed ich otwarciem? Normalnie robie to shiftem, ale ze skryptem nie dziala

[Ziomioslaw]

Duzo bardziej bys mi pomogl, jakbys wczesniej nadmienil, ze katalog SCRIPTS znajduje sie w katalogu uzytkownika, a nie w folderze programu.

Na jedno wychodzi.

Ale wszystko dziala, jest ok, wiec wielkie dzieki Rozumiem, ze dla innego koloru wystarczy tylko zmienic liczbe w odcieniu?

Tak.

Aha, nie ma jakiegos sposobu, zeby zaznaczyc wieksza ilosc plikow przed ich otwarciem? Normalnie robie to shiftem, ale ze skryptem nie dziala

W załączonym linku był opisany sposób, trzeba by było lekko zmodyfikować ten skrypt:

Kod:

(define (change-hue filesNames)
	(let* ((filelist (cadr (file-glob filesNames 1))))
		(while (not (null? filelist))
			(let* (
					; Pobranie nazwy pliku
					(fileName (car filelist))
					; Otwarcie pliku:
					(image (car (file-tga-load 1 fileName fileName)))
					; Pobranie warstwy
					(darwable (car (gimp-image-flatten image)))
				)

				; Barwienie
				(gimp-colorize darwable 244 50 0)
				; Zapis do pliku
				(file-tga-save 1 image darwable fileName fileName 1 0)
			)
			; Zmiejszenie listy plików o jeden.
			(set! filelist (cdr filelist))
		)
	)
)

(script-fu-register "change-hue"
	"<Image>/Script-Fu/Zmiana odcienia"
	"Otwiera, zmienia odcień i zapisuje plik tga."
	"Ziomioslaw"
	"Ziomioslaw"
	"Styczen 2009"
	""
	SF-STRING "Pliki:" "<nie znane>"
)

Tutaj uwaga, wymieniłem SF-FILENAME na SF-STRING. Trzeba Ci będzie podać tam ścieżkę zakończoną wzorcem, np.:

Kod:

/home/LadyAwa/poligon/*.tga

Zasadniczo skrypt powinien być wywoływany jak podano na tamtej stronie, ale na Windowsie to oczywiście dość trudne;)

Nie wiem jak skrypt poradzi sobie ze spacjami w nazwach folderów, albo jak woógle sobie radzi - nie testowałem go.
Pozdrawiam.

PS.: Tak, wiem, że nie masz Linuksa.

[LadyAwa]

Wyglada na to, ze cos jest nie tak:

Wystąpił błąd podczas wykonywania change-hue:

Error: eval: unbound variable: fileName

Moja sciezka:
E:\MONIKA!!!\Pracownia_RoSB\SKINS\yest2\Default!\Textures\

[Ziomioslaw]

No, literówka była już poprawione:

Kod:

					; Pobranie nazwy pliku
					(fileName (car filelist))

A było filename.

A co do ścieżki to powinna być raczej taka:

Kod:

E:\MONIKA!!!\Pracownia_RoSB\SKINS\yest2\Default!\Textures\*.tga

[LadyAwa]

Wszystko wydawalo sie ok, ale ten skrypt zakolorowuje na bialo przezroczystosc. Przez to skorka nie dziala w grze. Sorry ze tak sie czepiam, ale naprawde mi na tym zalezy

[Ziomioslaw]

Znowu ja.
Chyba wiem, co zwaliłem:P

Spróbuj teraz:

Kod:

(define (change-hue filesNames)
	(let* ((filelist (cadr (file-glob filesNames 1))))
		(while (not (null? filelist))
			(let* (
					; Pobranie nazwy pliku
					(fileName (car filelist))
					; Otwarcie pliku:
					(image (car (file-tga-load 1 fileName fileName)))
					; Pobranie warstwy
					(darwable (car (gimp-image-get-active-layer image)))
				)

				; Barwienie
				(gimp-colorize darwable 244 50 0)
				; Zapis do pliku
				(file-tga-save 1 image darwable fileName fileName 1 0)
			)
			; Zmiejszenie listy plików o jeden.
			(set! filelist (cdr filelist))
		)
	)
)

(script-fu-register "change-hue"
	"<Image>/Script-Fu/Zmiana odcienia"
	"Otwiera, zmienia odcień i zapisuje plik tga."
	"Ziomioslaw"
	"Ziomioslaw"
	"Styczen 2009"
	""
	SF-STRING "Pliki:" "E:\MONIKA!!!\Pracownia_RoSB\SKINS\yest2\Default!\Textures\*.tga"
)

[LadyAwa]

Teraz jest juz super, najpierw cos sie mieszalo z jasnoscia ale juz wrocilo do normy. Dzieki za poswiecony mi czas i wielki szacun ze sie na tym znasz

A tu dziekuje ci moja testerka Wiola:



Temat do zamkniecia