bandageself - почему не работает? Опции

[ikorus]

В клиенте встроенный макрос bandageself не работает. Допускаю, конечно, что я просто не разобрался, как правильно его использовать, но информации по тому, как правильно я не нашел, поэтому можно считать, что не работает.

Кто-нибудь знает, как этот макрос работает?

Как альтернативу я пробую написать скрипт на хил, срабатывающий от текстовой команды, но уперся в проблему: чтобы скрипт запустить, нужен даблклик по объекту (IMG:style_emoticons/default/sad.gif) Каким еще образом можно запустить скрипт, а еще лучше - каким образом можно даблклик эмулировать в скрипте?

[RL_ka]

Ну... тебе всё-таки придётся начать погружаться в глубины eScripta, потому что даже самые простые на первый взгляд вещи требуют довольно много знаний (IMG:style_emoticons/default/smile.gif)

По поводу проверки занятости персонажа - я с таким не сталкивался, и однозначного решения не знаю, но можно попробовать проверить его занятость с помощью
character.attached

http://docs.polserver.com/pol099/objref.php#Character

Код

if (who.attached)
    SendSysMessage(who, "You are already doing something else.");
    return;
endif

[ikorus]

Код

if (who.attached)
    SendSysMessage(who, "You are already doing something else.");
    return;
endif

этот атрибут блокирует использование хила только, когда перс занят: во время медицации теперь лечиться нельзя, как и во время майнинга или другого действия в цикле (loop).

попробовал вешать свойства объекта на чара на время хила, но не срабатывает фишка - все равно хилится, не ждет, пока закончит.

Вот куски нерабочей схемы

Код

    if( GetObjProperty( who, "#HealPatient" ) )
        SendSysMessage( who, "You must wait before being able to heal yourself again." );
        return 0;
    endif

    var heal;
    SetObjProperty( who, "#HealPatient", heal );
        ...
        тут хилимся
        ...
    EraseObjProperty( who, "#HealPatient" );

На самом деле attached указывает на используемый в данный момент персонажем скрипт. Если используется (скрипт "прикреплен" к персонажу), - то нельзя будет хилить. В остальных случая можно. Получается, что нужно добавить мой скрипт в число тех, которые лочат чара, и тогда все будет правильно реализовано. А остальное - костыли

[pager]

этот атрибут блокирует использование хила только, когда перс занят:

Вот еще одно решение проблемы :
Скрипт выводит сообщение( с поддержкой множество языков ) если в группе PROC_SKILL есть процессы .Пример сообщения: Подождите пока завершится : Навык лечения.
Так же можно скрипту посылать событие с помощью функции MSendprocEvent например для того чтобы при смерти или выходе из игры персонажа, скрипт завершался мгновенно.

Если кого заинтересовало, то MsendProcEvent и другие includes лежат в пакете spawnernpc на форуме..

Код

/////////////////////////////////////////////
language.cfg
Language Rus
{
    Message_Wait_script                    Подождите пока завершится
        script_usebandage_name                            Навык лечения.

}

Language Enu
{
        Message_Wait_script                    Wait until the end
        script_usebandage_name                            Skill healing.

}

    

//////////////////////////////////////





Use uo;
Use os;
Use unicode;

Const PROC_SKILL  := “skill”;



var language_cfg          := ReadConfigFile(“:*:language”);


Program usebandage(who,bandage)
var lang      := MGetMobileLanguage(who);
if(!MGetProcDelay(who,PROC_SKILL,who,lang))
MsetProcPid(who,PROC_SKILL,”usebandage”,struct{pid := GetPid(),message := "script_usebandage_name”,level := 0});
Bandages(who,bandage,lang);
MsetProcPid(who,PROC_SKILL,”usebandage”);
endif
endprogram
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function Bandages(byref who,byref bandage,byref lang)
Код скрипта...........
...
….

endfunction

////////////////////////////////////////////////include functions ///////////////////////////////////////////////////
function MGetProcDelay(object,procname,mobile,lang,level := DEFAULT_PROC_LEVEL)
var prop     := MGetObjProperty(object,"#procpid",dictionary);
foreach name in (prop[procname].keys())
if(Cint(prop[procname][name].level) == Cint(level))
MConfigLanguageSendSysMessageUc(mobile,"message_wait_script",lang.langcode,": " + 
MGetElement(GetConfigString(language_cfg[lang.langcode],prop[procname][name].message),prop[procname][name].message + " - language_cfg not found."),lang.font,lang.color);
return 1;
endif
endforeach
endfunction
////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function MGetObjProperty(object,name,err := 0)
if(name in object.propnames())
return object.getprop(name);
else
return err;
endif
endfunction
////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function MConfigLanguageSendSysMessageUc(who,name,langcode,text := "",fount := _DEFAULT_UCFONT,color := _DEFAULT_UCCOLOR)
return SendSysMessageUc(who,CAscZ(MGetElement(GetConfigstring(language_cfg[langcode],name),name + " - language_cfg not found ") + text),langcode,fount,color);
endfunction

//////////////////////////////////////////////////////////////////////////////////////////////////////////////
function  MGetElement(structure,err := 0)
if(structure)
return structure;
else
return err;
endif
endfunction

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function MSetProcPid(mobile,procname,name,structure := 0)
set_critical(1);
Detach();
var prop := MGetObjProperty(mobile,"#procpid",dictionary);
if(!structure and !prop[procname].size() <= 1)
prop.erase(procname);
elseif(!structure)
prop[procname].erase(name);
elseif(!prop.exists(procname))
prop.insert(procname,dictionary{name -> structure});
else
prop[procname].insert(name,structure);
endif
mobile.setprop("#procpid",prop);
set_critical(0);
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////////////////
function MGetMobileLanguage(byref mobile)
return MGetObjProperty(mobile,"language",struct{langcode := "rus",font := _DEFAULT_UCFONT,color := _DEFAULT_UCCOLOR});
endfunction

Сообщение отредактировал RL_ka - 6.11.2014, 14:52