Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  Buldozer : (Yesterday, 22:56) Davajte uzhe reshim kto tut shto adekvatno pishit a kto net - kamu prosta ban nuzhen na forume:)
@  Buldozer : (Yesterday, 22:55) Stoljka let vsjo vseh ustraevaet po pvp priboram a kakueta pjatjorku postojanno shtota neustraevaet, i vot ani berut temi sozdajut i nojut
@  Buldozer : (Yesterday, 22:54) http://forum.oldp.ne...howtopic=104135 A vi bolshe takih ljudej slushajte tipo Lancelota i togda ,vsjo na servere vobshe vparjadke budet:)
@  Gogogo : (13 November 2018 - 17:42) Sell veteran plawik 60durba 5kk sell full gods chain+ shield 20kkSell 2 gods bow 23 durb i 69 20kk
@  kirko : (13 November 2018 - 15:14) cjo ze ti posti udaljaew?
@  kirko : (13 November 2018 - 15:14) Djukok
@  kirko : (13 November 2018 - 15:14) ;
@  Gogogo : (13 November 2018 - 14:48) buy RP
@  Gogogo : (12 November 2018 - 23:37) Sell 2 gods bow 23 durb i 69 20kk
@  Gogogo : (12 November 2018 - 23:36) Sell veteran plawik 60durba 5kk sell full gods chain+ shield 20kk
@  Gogogo : (12 November 2018 - 22:17) nu tak odevjtesj i idem draca
@  Imobilaizer : (12 November 2018 - 22:02) @Gogogo idem 3x3 4x4 nazivaite luboe mesto i vremja, a tak sidite v gz
@  Gogogo : (12 November 2018 - 21:44) @Djukok muti varki lutshi
@  Djukok : (12 November 2018 - 20:19) @GA GA GA Тебе не то что молчанки, тебя уже пора по 1.2 сажать. Но пока молчанка...
@  GA GA GA : (12 November 2018 - 19:11) Idi ikonu s Djukokom protri ot pyli,fanat Djuka Nr1
@  OLDPFUN : (12 November 2018 - 19:06) da che ti nojiw~? pravdo to estj gdeto no ti neponemajew eto nekomu neinteresno!
@  GA GA GA : (12 November 2018 - 18:57) Na forume nazovesh Aigara krisoj kotoraja obvorovivaet Acc (4to dokazanno) -MOL4ANKA ... V tom zhe topike Aigar nazivaet Lancelota-Narkomanom,Bomzhom i t.d (Ja s etim soglasen,no eto daleko ne FAKT :) - Vse normalno-Aigar molodec,mol4anki net... i eto po vashemu adekvatno? i takih primerov 1000000....
@  GA GA GA : (12 November 2018 - 18:50) Shanu davno pofig na server,da i shan vsegda prikrival Staff servera,butj to Nil libo Djuk...vspomni kak vy plakali 4to Nil palit Seerom i t.d...Shanu vygodno 4to djuk delaet vsju 4ernuju rabotu...sazaet v jail,otve4aet na PageGM i t.d ...
@  Imobilaizer : (12 November 2018 - 18:27) @GA GA GA i shan ego prikrivaet?
@  GA GA GA : (12 November 2018 - 15:32) @Djukok,kakie ne adkvatnye posti? Vsem uzhe nadoeli tvoi,ne adkvatnie postupki...mol4anki svoim ne daet,v jail nikogo iz svoih ne sazaet...a drugim mol4anki,jaili 4to eto za STAFF takoj? :D :D :D

Photo

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


  • Please log in to reply
22 replies to this topic

#1 WelcometoOldParadise

WelcometoOldParadise

    Senior Player

  • Members
  • 488 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
  • 20778 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
  • 807 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
  • 20778 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
  • 488 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
  • 488 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
  • 488 posts
  • Gender:Male

Posted 05 May 2018 - 18:20

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

#20 opas

opas

    Soviet

  • Members
  • 967 posts
  • Gender:Male

Posted 05 May 2018 - 20:17

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

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

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

{

Orion.Ignore(corpse);

break;

}

 

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






1 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users


    Bing (1)