Всякие мелочные Скрипты, выкладывайте каму не жалко Опции

[GumanoiD]

Вот например плитка она не пропускает людей на райдах и пишет "Вход только для пеших"
Полезно когда не хочеш чтобы к аренам пробегали на лошадях
Координаты свои ток впишите

Код

use uo;
use os;
use unicode;

program nohorseU(who)
  var mount := GetEquipmentByLayer(who, 25);
if(mount)
MoveCharacterToLocation( who, 5710, 1195, 0 );
var textU := array{1042, 1093, 1086, 1076, 32, 1090, 1086, 1083, 1100, 1082, 1086, 32, 1076, 1083, 1103, 32, 1087, 1077, 1096, 1080, 1093};
SendSysMessageUC(who, textU", "RUS", font:=3, color:=910);
endif
endprogram

[GumanoiD]

Mass color:
Массово красит вещи на земле, находящиеся на 15 клетках от себя.
Инструкция: .masscolor N
N - Цвет
затем тыкаем на тип предмета каторые хотим перекрасить
з.ы. на земле ищит только предметы таковаже типа и цвета

Код

use uo;
use unicode;

program masscolor(who, val)
var textr := array {1059, 1082, 1072, 1078, 1080, 1090, 1077, 32, 1090, 1080, 1087, 32, 1074, 1077, 1097, 1077, 1081, 32, 1082, 1072, 1090, 1086, 1088, 1099, 1077, 32, 1093, 1086, 1090, 1080, 1090, 1077, 32, 1087, 1086, 1082, 1088, 1072, 1089, 1080, 1090, 1100, 32, 1074, 32, 1088, 1072, 1076, 1080, 1091, 1089, 1077, 32, 49, 53, 32, 1082, 1083, 1077, 1090, 1086, 1082, 46};
sendsysmessageuc(who, textr);
var itemc := target(who);
foreach item in ListItemsNearLocationOfType(who.x, who.y, who.z, 15, itemc.objtype)
if(item.color == itemc.color)
item.color := CInt(val);
endif
endforeach
endprogram