Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

UoKit.com Форумы _ Архив готовых скриптов _ Обновленная система обработки хлопка и шерсти

Автор: d`ArcZeal 4.1.2017, 18: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

Автор: Almond 23.2.2017, 11:59

Цитата(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 (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)