Notes
Akaki's Notes
Поиск по всему миру.
foreach object in ( ListObjectsInBox(0, 0, -130, 6144, 4096, 130 ) )
if( object.IsA( POLCLASS_ITEM ))
...
elseif( object.IsA( POLCLASS_NPC ))
...
endif
endforeach// Глобальный проп
var realm_info := GetGlobalProperty( "Realm" );
realm_info := realm_info["britannia"];
// Поиск
foreach object in ( ListObjectsInBox(0, 0, -130, realm_info.width, realm_info.height, 130 ) )
if( object.IsA( POLCLASS_ITEM ))
...
elseif( object.IsA( POLCLASS_NPC ))
...
endif
endforeach
// Если в базе такого глобального пропа нету, выполнить:
if( GetGlobalProperty( "Realm" ) == error)
EraseGlobalProperty( "Realm ");
var realm := dictionary;
var word := struct;
word.+width := 6144;
word.+height := 4096;
realm["britannia"] := word;
SetGlobalProperty("Realm", realm);
endifРезервация объекта
ReserveItem( thing );
ReleaseItem( thing );Start_Script()
Start_Script(":accounts:textcmd/admin/acctinfo", { mobile, targ.acctname });program textcmd_AccountInfo( mobile, acctname )
// Добавить в код этот момент, есил скрипт не запускается:
if( Lower( TypeOf( mobile )) == "array" )
acctname := mobile[2];
mobile := mobile[1];
endifRandomEntry()
Заменить:
// returns random array entry
***.RandomEntry();На
Last updated
Was this helpful?