Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  NIL : (Yesterday, 17:14) https://ibb.co/5MNhvcM
@  Salagaa : (24 March 2019 - 23:26) Buy Icestrike imbue
@  E-D-I : (24 March 2019 - 19:21) @Ypypy po chem 1k beresh ?
@  Ypypy : (23 March 2019 - 12:00) kuplju aqua ingi
@  E-D-I : (22 March 2019 - 21:25) где этот Layer najti ?
@  Ultimate : (22 March 2019 - 18:19) куплю пушку 100 дур предложения в приват
@  Salagaa : (22 March 2019 - 12:00) Sell full nekro c norm durab - 4kk !!!
@  OBLADAET : (21 March 2019 - 22:59) Ребят! Подкиньте пожалуйста скриптов на инжу? Честное слово буду хранить только у себя и никому больше передавать не буду. Нужен рабочий автолут и на ПВП хорошие, заточенные скрипты под шард. Очень хочу магом тут полетать! Я ветеран UO с конца 1999, сфера 056 :)
@  Ultimate : (21 March 2019 - 17:13) куплю пушку 100 дуп предложения в приват
@  regi : (21 March 2019 - 11:33) :D
@  beatiful : (21 March 2019 - 11:28) Sell Hell Stallion 10kk
@  vik23 : (20 March 2019 - 22:00) mistik! mozes pom4o so shmotam na pvm
@  El-diablo : (20 March 2019 - 21:30) Юва �������� всё правильно ��
@  Ultimate : (19 March 2019 - 10:20) Buy Oldp.Terium Puwku 100 dur
@  Ювелир*ЗМ : (19 March 2019 - 00:16) да бомжы эти бестиан ...нех даже чёто расписывать xD на падсосе ,это гуманетарная помошь сервера такие нам нужны !!!если каждый воп мы бы соберались чисто гуйлдом то забей чё было бы xD Шана помошь прос
@  E-D-I : (18 March 2019 - 22:38) Posadili bljaaaaaaaaaa stavj block ne srazu ? :D
@  El-diablo : (18 March 2019 - 21:20) нам темболее ����
@  sonyplayer : (18 March 2019 - 19:23) @El-diablo еще раз повторюсь, нам пойух +)
Есть и другие игроки помимо вас +)
@  El-diablo : (18 March 2019 - 19:09) а как нас двое - трое . вы добигаете до нашей гз , почтояв у забора 5 минут , даже не забежав в гз , убегаете обратно в мун или мп . мол вы по гз не бегаете , вот т мы теперь только по воскресеньям.
@  El-diablo : (18 March 2019 - 19:05) причем тут мы вообще ? мы выходим каждый день к муну , там видем картину - как вы дружите с гвардами . мы ждём 20 минут , вы не выходите - мы идём офф . а в воскресенье , когда у нас собираются люди , мы вас гоняем в гз . если вам в кайф такой пвп , то теперь только по воскресеньям :)

Photo

Скрипты Орион


  • Please log in to reply
23 replies to this topic

#1 WelcometoOldParadise

WelcometoOldParadise

    Senior Player

  • Members
  • 491 posts
  • Gender:Male

Posted 05 December 2017 - 19:18

Перенес в отдельную тему, прошу почистить тему - http://forum.oldp.ne...howtopic=103382

 

 

Аутостарт
 

function Autostart()
{
Orion.Exec('horse');
Orion.Exec('Paralyze');
}

Аутопоизон шея
для парализ некласов меняется цвет, для браслетов if(!Orion.ObjAtLayer('Necklace')) на ('Bracelet') и тип с цветом

function zelsheja()
{
    while(!Player.Dead())
    {
        if(!Orion.ObjAtLayer('Necklace'))
        {
            Orion.EquipT('0x1088','0x0433');
            Orion.Wait(500);
        }
        else
            Orion.Wait(10);
    }
}

Таргет и аттака красного игрока, чтобы атаковать синих нужно заменить "gray|orange|red" на "blue"
 

//helper function for AttacktNextHuman() and TargetNextHuman()
function FindNearestHumanEnemy()
{    
    Orion.Ignore('self');
    var friends = Orion.GetFriendList();
    for(var i = 0; i < friends.length; i++)
    {
        Orion.Ignore(friends[i]);
    }
    
    var humans = Orion.FindType("-1", "-1", "ground", "human|near|live", 18, "gray|orange|red"); //Orion.FindType('0x0190|0x0191', '-1', ground, 'near|mobile', '18');    
    if ( !humans.length )
    {
        Orion.Print( '-1', 'no humans found, resetting ignore list');
        Orion.IgnoreReset();
        return '';
    }
    return humans[0];
}

//This function will swap between players in range of 18 and attack them.
function AttacktNextHuman()
{
    var serial = FindNearestHumanEnemy();
    if(!serial.length) return;
    CharPrintDelayed(serial, '30', 'ATTACKING');
    Orion.ClientLastAttack(serial);
    Orion.Attack(serial);
    Orion.Ignore(serial);        

}

//This function will swap between players in range of 18 and target them.
function TargetNextHuman()
{
    var serial = FindNearestHumanEnemy();
    if(!serial.length) return;
    CharPrintDelayed(serial, '30', 'TARGET');
    Orion.ClientLastTarget(serial);
    Orion.TargetObject(serial);
    Orion.Ignore(serial);        
}

function CharPrintDelayed(serial, color, text)
{
    var oldUse = Orion.OptionScaleSpeech();
    var oldDelay = Orion.OptionScaleSpeechDelay();
 
    Orion.OptionScaleSpeech(true);
    Orion.OptionScaleSpeechDelay(50);
 
    Orion.CharPrint(serial, color, text);
    Orion.Wait(50);
 
    Orion.OptionScaleSpeech(oldUse);
    Orion.OptionScaleSpeechDelay(oldDelay);
}

Автотрапедс
 

function Paralyze() {
var Msg = "You are frozen and can not move";
Orion.ClearJournal(Msg);
while (!Player.Dead()) {
if (Orion.InJournal(Msg)) {
Orion.ClearJournal(Msg);
Orion.WaitTargetType("0x0E26", "0x066E");
Orion.Say('.usetraped');
} else {
Orion.Wait(100);
}
}
}

Сено

function seno()
{
var list = Orion.FindType('0x0F36', '-1', 'backpack');
if (list.length)
Orion.DropHere(list[0]);
}

Трекинг
 

function TrackPP()
{
Orion.CancelWaitMenu();
Orion.CloseMenu('Tracking');
Orion.WarMode(false);
Orion.WaitMenu('Tracking', 'Players');
Orion.UseSkill('Tracking');
}

Реколл
 

function RecallFromBook()
{
    var runeIndex = 13;
    var runebook = '0x4009727F';

    Orion.WaitGump(Orion.CreateGumpHook(runeIndex));
    Orion.UseObject(runebook);
}

Автохил
 

function Heal() {
var Timer, Msg = "You put the bloody bandage|failed";
while (!Player.Dead() && Orion.Count("bandage")) {
if (Player.Hits() < Player.MaxHits() - 1) {
Orion.ClearJournal(Msg);
Orion.BandageSelf();
Timer = Orion.Now() + 5000;
while (!Orion.InJournal(Msg) && Orion.Now() < Timer) {
Orion.Wait(100);
}
} else {
Orion.Wait(100);
}
}
}

Автоконь
 

function horse()
{
while(!Player.Dead()) {
if (Orion.ObjAtLayer('Mount')) {
Orion.Wait(200);
}
else
{
Orion.Say('.mounts');
Orion.Wait(500);
}
}
}

ПикАп

function pilesos()
{
while (!Player.Dead())
{
Orion.Wait(50);
var items = Orion.FindType('0xFFFF', '0xFFFF', ground, 'items', 2);
for (var i = 0; i < items.length; i++)
{
var obj = Orion.FindObject(items[i]);
if (obj != null && !obj.Locked())
{
Orion.MoveItem(items[i], 0, backpack);
Orion.Wait(50);
}
}
}
}
function paralyzka() {
Orion.Say('.useparalyze');
Orion.WaitTargetObject('lasttarget');
}

function poizanka() {
Orion.Say('.usepoison');
Orion.WaitTargetObject('lasttarget');
}

function massdispel() {
Orion.UseType('0x183C', '0x0427');
}

function massdetect() {
Orion.UseType('0x183C', '0x0447');
}

function masspoison() {
Orion.UseType('0x1832', '0x0487');
}

Атака мобов. AttackNextHuman для гуманойдов (некры эльфы и тд. так же можно использовать для атаки играков)  Monster для всех остальных.

function AttackNextHuman(){
    var Target = Orion.FindType("-1", "-1", "ground", "human|near|live", 18, "gray|orange|red");
    if (Target.length != 0) {
        Orion.Attack(Target[0]);
        Orion.Ignore(Target[0]);
    } else {
        Orion.IgnoreReset();
        Target = Orion.FindType("-1", "-1", "ground", "human|near|live", 18, "gray|orange|red");
        if (Target.length != 0) {
            Orion.Attack(Target[0]);
            Orion.Ignore(Target[0]);
        }
    }
}

function AttackNextMonster(){
    var Target = Orion.FindType("!0x0190|!0x0191", "-1", "ground", "near|live", 18, "gray|red");
    if (Target.length != 0) {
        Orion.Attack(Target[0]);
        Orion.Ignore(Target[0]);
    } else {
        Orion.IgnoreReset();
        Target = Orion.FindType("!0x0190|!0x0191", "-1", "ground", "near|live", 18, "gray|red");
        if (Target.length != 0) {
            Orion.Attack(Target[0]);
            Orion.Ignore(Target[0]);
        }
    }
}

 



#2 Fckyou7

Fckyou7

    Advanced Player

  • Members
  • 321 posts

Posted 05 December 2017 - 19:26

красавчик !

#3 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 05 December 2017 - 19:51

function AutoLoot()
{
    while (true)
    {
        if (Player.Dead())
        {
            Orion.Wait(500);
            continue;
        }
        var corpses = Orion.FindType('0x2006', '-1', ground, '', 'usedistance');
        for (var c = 0; c < corpses.length; c++)
        {
            var serial = corpses[c]
            Orion.WaitTargetObject(serial);
            Orion.UseType('knife');
            Orion.Wait(300);
            Orion.UseObject(serial);
            Orion.Wait(300);
            var list = Orion.FindList('Loot', serial);
            Orion.ResetIgnoreList();   
            for (var i = 0; i < list.length; i++)
            {
                Orion.MoveItem(list[i], 0,backpack);
                Orion.Wait('moveitemdelay');
            }
            Orion.Ignore(serial);
            Orion.Wait(500);
        }
        Orion.Wait(500);
    }
}

Автолут. смысл такой - лутит с листа Loot в закладках List > Find. Если сдох то висит ждет когда реснешся перезапускать не надо... А да лутит не послений трупик а который найдет))



#4 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 05 December 2017 - 21:35

Пылесос переделал на тотже лист Loot

function pilesos()
{
      while (!Player.Dead())
       {
        Orion.Wait(50);
        var list = Orion.FindList('Loot', ground);
        for (var i = 0; i < list.length; i++)
             {
              var obj = Orion.FindObject(list[i]);
              if (obj != null && !obj.Locked())
                {
                   Orion.MoveItem(list[i], 0, backpack);
                   Orion.Wait(50);
                 }
              }
          }
}


#5 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 05 December 2017 - 21:55

Если в этой строке

var Target = Orion.FindType("!0x0190|!0x0191", "-1", "ground", "near|live", 18, "gray|red");

типы поменять на -1 будет атачить всех серых и красных независимо от того монстр или плеер, если убрать восклицательные знаки то будет атачить только человеков, флаг human ищет кроме людей еще и мертвяков вобщем он не нужен в этом случае, а то масло масленое получается найди мертвяка и заигнорь его флагом live.



#6 Артемий Шан

Артемий Шан

    Lord British

  • Administrators
  • 20891 posts
  • Gender:Male

Posted 05 December 2017 - 22:21

Молодец! Надо просвещать наших игроков :)


Наш канал в discord - mIRC возвращается в новой оболочке!

In God We Trust!

#7 nekt0

nekt0
  • Members
  • 3 posts

Posted 06 December 2017 - 00:41

nado nagrazdatj teh,kto deljatsa scriptami, i pomogajut ostolnim!



#8 :)))))

:)))))

    Master

  • Members
  • 830 posts
  • Gender:Male
  • Location:Latvia,Riga

Posted 06 December 2017 - 01:14

nado nagrazdatj teh,kto deljatsa scriptami, i pomogajut ostolnim!

Nu tak I otblagodari,esli tebe pomogli,v 4em problema? :D



#9 Артемий Шан

Артемий Шан

    Lord British

  • Administrators
  • 20891 posts
  • Gender:Male

Posted 06 December 2017 - 01:32

nado nagrazdatj teh,kto deljatsa scriptami, i pomogajut ostolnim!

Администрация всегда поощряет качественную работу :) Но это можете сделать и вы сами! Вот к примеру Кози, многие предлагали помочь вещами, после всех его падений на видео :D


Наш канал в discord - mIRC возвращается в новой оболочке!

In God We Trust!

#10 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 06 December 2017 - 10:58

function Invis()
{
   if (!Player.Hidden())  // если не в хайде и не в инвизе
     Orion.EquipT('0x1b7a', '0x0427');  //одевает хамелеон щит
     Orion.Wait('moveitemdelay');
     Orion.Unequip('LeftHand'); //и снимает его
}

function Poisoned()
{
 if (Player.Poisoned()) //если отравлен
    Orion.BandageSelf(); //кидает на себя бинтик
}

ну а там кто что юзает инвизки, спелы и тд... главное принцип :D



#11 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 06 December 2017 - 12:07

function ChangeSield()
{
     Orion.EquipT('0x1b7a', '0x0427');
     Orion.Wait(50);
     Orion.UseObject('Shield');
}

на вкладке лист обьект забиваем любимый щит с назаванием Shield.  При запуске меняет щит на хамелеон и обратно надевает любимый :D  Кстати Шан хетч и кит не одеваются через эквип только через юзанье...( ну это так к сведению)



#12 WelcometoOldParadise

WelcometoOldParadise

    Senior Player

  • Members
  • 491 posts
  • Gender:Male

Posted 06 December 2017 - 12:29

function ChangeSield()
{
     Orion.EquipT('0x1b7a', '0x0427');
     Orion.Wait(50);
     Orion.UseObject('Shield');
}

на вкладке лист обьект забиваем любимый щит с назаванием Shield.  При запуске меняет щит на хамелеон и обратно надевает любимый :D  Кстати Шан хетч и кит не одеваются через эквип только через юзанье...( ну это так к сведению)

 

Проще будет через UseType, так как если ты воин то скорее всего ты с хейтер щитом или двуручкой, если арчер то тип бова и тд.



#13 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 06 December 2017 - 13:32

через тайп ну фиг знает... окажется какой нить щит не в комплект и потеряеш бонус... можно смену вепа и шита написать по кнопке... типа если в левой руке щит одеваем халбу... и наоборот)) проверка по графике в слоях. ну а пока пвм костерчики на одной кнопке включение - выключение. кидает супер под себя пока не нажмеш кнопку второй раз.

function Camp()
 {
    if (Orion.GetGlobal('camp') == 11)
       {
        Orion.SetGlobal('camp', '00');
        Orion.Terminate('Camp');
        }
    else
        {
        Orion.SetGlobal('camp', '11');
        }
    while (Orion.Count('0x0DE1') > 5)
     {
     Orion.Say('.camp super');
     Orion.Wait(31000)
     }
     Orion.SetGlobal('camp', '00');
}
  


#14 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 06 December 2017 - 13:39

кстати есть еще GetSerial() тоесть можно делать проверку на серийник чара и если он воин то двуручка например халба, а если арчер то лук ну и тд. Просто у многих есть твинки, а автолоад только 1)))



#15 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 06 December 2017 - 23:36

Ломаем пандорки в смысле локпик

function Lockpick()
{
    Orion.AddObject('box', '0');
    Orion.AddObject('box');
    Orion.Wait(100);
    while (Orion.HaveTarget())
        Orion.Wait(100);
    var obj = Orion.FindObject('box');
   if (obj != null) 
   {     
     Orion.ClearJournal();
     while (!Orion.InJournal('Box unlocked.'))
       {
        Orion.ClearJournal("You fail|You must");        
        Orion.WaitTargetObject('box');
        Orion.UseType('0x14FB');
        Orion.WaitJournal("Box unlocked.|You fail|You must", Orion.Now(), Orion.Now() + 25000, "sys");
        Orion.Wait(10000); // задержка между юзами настраиваем под себя
        }
      }
}


#16 WelcometoOldParadise

WelcometoOldParadise

    Senior Player

  • Members
  • 491 posts
  • Gender:Male

Posted 07 December 2017 - 12:19


function Camp()
 {
    if (Orion.GetGlobal('camp') == 11)
       {
        Orion.SetGlobal('camp', '00');
        Orion.Terminate('Camp');
        }
    else
        {
        Orion.SetGlobal('camp', '11');
        }
    while (Orion.Count('0x0DE1') > 5)
     {
     Orion.Say('.camp super');
     Orion.Wait(31000)
     }
     Orion.SetGlobal('camp', '00');
}
  

чуть чуть изменить и можно магу на каст лайтинга/фса переделать для пвм :)



#17 Bambr

Bambr

    Novice

  • Members
  • 38 posts

Posted 07 December 2017 - 14:06

Ну яж говорю главное принцип юзанья одной кнопки)) включил - выключил...



#18 Godzilla

Godzilla

    OldParadise Veteran

  • Members
  • 1278 posts
  • Gender:Male
  • Location:Oldp.net / Туманный Альбион

Posted 05 May 2018 - 14:36

Народ , помогите пожалуйста Чайнику разобраться , Обьясните по шагово каким образом настроить и запускать Auto loot ?

Мне тупо что бы gp лоотал , больше ничего не надо )  :mellow: Вроде вставил , вроде запустил , труп открывается и ничего не происходит. EasyUo был куда проще и понятней , так же как инжект - тёмный лес.

 

 

Уже сам разобрался , дорабатываю скрипт под себя. 


On OldParadise , eGames , Bless Since 2007

Godzilla

WindFlake

Kuklavod


#19 WelcometoOldParadise

WelcometoOldParadise

    Senior Player

  • Members
  • 491 posts
  • Gender:Male

Posted 05 May 2018 - 18:20

Лут этот кривоват, там нет игнора на трупы и будет один и тот же труп открывать если в радиусе «usedistence» будет находиться, до компа доберусь выложу по лучше если остался после бэкапа системы

#20 opas

opas

    Soviet

  • Members
  • 970 posts
  • Gender:Male

Posted 05 May 2018 - 20:17

Лучше всего долбить лут авторежиме и игнорить трупы по факту отдаления на 2 клетки. 

В моем скрипте так 

if (Orion.GetDistance(corpse.Serial())>2)

{

Orion.Ignore(corpse);

break;

}

 

corpse делаем отдельной функцией.






3 user(s) are reading this topic

0 members, 3 guests, 0 anonymous users