Помощь - Поиск - Пользователи - Календарь
Полная версия: Обновленная система обработки хлопка и шерсти
UoKit.com Форумы > Ultima Online : Dev > Sphere Server > Архив готовых скриптов
d`ArcZeal
По дефолту игрок собирает хлопок, преобразует его в нитки и затем из них получает Cloth bolt.
Обычно это приводит к излишнему количеству ткани и обесцениванию бинтов до 1 гп.

Данный скрипт позволяет регулировать получаемое количество ткани из хлопка и шерсти овец.


Изображение

Версия:
Скрипт для Sphere server 56b-56c

Установка:
Найдите в своих скриптах TYPEDEF T_THREAD и TYPEDEF T_YARN и замените их содержимое на этот скрипт.

Код

[TYPEDEF T_THREAD]
ON=@TARGON_ITEM
IF (<SRC.TARG.DISTANCE> > 1)
SRC.SYSMESSAGE @0486,,1 Слишком далеко.
ELIF !(<SRC.RESTEST 6 I_THREAD>)
SRC.SYSMESSAGE @0486,,1 Необходимо иметь не менее 6 шт <NAME> для создания рулона ткани.
RETURN 1
ELIF (<SRC.TARG.BASEID>==I_LOOM_UPRIGHT) || (<SRC.TARG.BASEID>==I_LOOM_WHEEL)
SRC.CONSUME=6 I_THREAD
SERV.NEWITEM=I_CLOTH_BOLT
NEW.BOUNCE
SRC.SOUND=89
SRC.ANIM=34
SRC.SYSMESSAGE @0487,,1 Вы успешно создали рулон ткани.
ENDIF
RETURN 1

[TYPEDEF T_YARN]
ON=@TARGON_ITEM
IF (<SRC.TARG.DISTANCE> > 1)
SRC.SYSMESSAGE @0486,,1 Слишком далеко.
ELIF !(<SRC.RESTEST 6 I_YARN_BALL>)
SRC.SYSMESSAGE @0486,,1 Необходимо иметь не менее 6 шт <NAME> для создания рулона ткани.
RETURN 1
ELIF (<SRC.TARG.BASEID>==I_LOOM_UPRIGHT) || (<SRC.TARG.BASEID>==I_LOOM_WHEEL)
SRC.CONSUME=6 I_YARN_BALL
SERV.NEWITEM=I_CLOTH_BOLT
NEW.BOUNCE
SRC.SOUND=89
SRC.ANIM=34
SRC.SYSMESSAGE @0487,,1 Вы успешно создали рулон ткани.
ENDIF
RETURN 1
Almond
Цитата(d`ArcZeal @ 4.1.2017, 19:23) *

По дефолту игрок собирает хлопок, преобразует его в нитки и затем из них получает Cloth bolt.
Обычно это приводит к излишнему количеству ткани и обесцениванию бинтов до 1 гп.

Данный скрипт позволяет регулировать получаемое количество ткани из хлопка и шерсти овец.
Изображение

Версия:
Скрипт для Sphere server 56b-56c

Установка:
Найдите в своих скриптах TYPEDEF T_THREAD и TYPEDEF T_YARN и замените их содержимое на этот скрипт.

Код

[TYPEDEF T_THREAD]
ON=@TARGON_ITEM
IF (<SRC.TARG.DISTANCE> > 1)
SRC.SYSMESSAGE @0486,,1 Слишком далеко.
ELIF !(<SRC.RESTEST 6 I_THREAD>)
SRC.SYSMESSAGE @0486,,1 Необходимо иметь не менее 6 шт <NAME> для создания рулона ткани.
RETURN 1
ELIF (<SRC.TARG.BASEID>==I_LOOM_UPRIGHT) || (<SRC.TARG.BASEID>==I_LOOM_WHEEL)
SRC.CONSUME=6 I_THREAD
SERV.NEWITEM=I_CLOTH_BOLT
NEW.BOUNCE
SRC.SOUND=89
SRC.ANIM=34
SRC.SYSMESSAGE @0487,,1 Вы успешно создали рулон ткани.
ENDIF
RETURN 1

[TYPEDEF T_YARN]
ON=@TARGON_ITEM
IF (<SRC.TARG.DISTANCE> > 1)
SRC.SYSMESSAGE @0486,,1 Слишком далеко.
ELIF !(<SRC.RESTEST 6 I_YARN_BALL>)
SRC.SYSMESSAGE @0486,,1 Необходимо иметь не менее 6 шт <NAME> для создания рулона ткани.
RETURN 1
ELIF (<SRC.TARG.BASEID>==I_LOOM_UPRIGHT) || (<SRC.TARG.BASEID>==I_LOOM_WHEEL)
SRC.CONSUME=6 I_YARN_BALL
SERV.NEWITEM=I_CLOTH_BOLT
NEW.BOUNCE
SRC.SOUND=89
SRC.ANIM=34
SRC.SYSMESSAGE @0487,,1 Вы успешно создали рулон ткани.
ENDIF
RETURN 1




Интересное решение.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.
Русская версия Invision Power Board © 2001-2024 Invision Power Services, Inc.