No replies to this topic

[planatahodetc]

Скрипт для настоящих люмпенов и маргиналов из принципа отказавшихся вести экономическую деятельность.

//************* configured for https://oldp.net/index.php ********
// begging in BRITANIA
// for correct work on your server, enter the seller's ID and, if necessary, change the route coordinates

function LUMPIN()
{
        // id of vendors for begging **************************************
        
        vendor_arr = ["0x0008E2BB" , "0x0008C061" , "0x0008E10D" , "0x0008C039" , "0x0008CB16"     , "0x0008E13E"    , "0x0008E156"     , "0x0008D03F"     ,                         "0x0008E14C"    , "0x0008B2E3"     , "0x0008E2C7"    , "0x0008C1A1"     , "0x0008E283"    , "0x0008E468"     , "0x0008E485"     , "0x00092FF7"     , "0x0008B78A"     ,                 "0x0008D192"    , "0x0008E4C6"     , "0x0008E4D4"    , "0x0008D188" ,
"0x0008D299", "0x0008C32C", "0x0008D3DE", "0x0008C556", "0x0008D3F3" , "0x0008D292" , "0x0008C1E5" , "0x0008E693" , "0x0008E66E" , "0x0008D42A" , "0x0008E642" , "0x0008E659" , "0x00065819" , "0x0008C4B9" , "0x0008C4C4"

    ];


waitVendor_arr = [ ] ;
        for (var i = 0; i < vendor_arr.length; i++)
        {
                waitVendor_arr[i] = 0;
        }


Orion.SetBadLocation(1453, 1695); //teleport coord
Orion.SetBadLocation(1488, 1586);




// run around city and try find vendors *******************************
find_ven();
Orion.WalkTo (1432 ,1734,20, 1);
find_ven();
Orion.WalkTo (1462,1697,0, 1);
find_ven();
Orion.WalkTo (1492,1682,20, 1);
find_ven();
Orion.WalkTo (1472,1606,20, 1);
find_ven();
Orion.WalkTo (1434,1573,30, 1);
find_ven();
Orion.WalkTo (1492,1572,30, 1);
find_ven();
Orion.WalkTo (1487,1638,20, 1);
find_ven();    
        
                
        


        
        

function find_ven()    
{
    for (var a = 0; a < vendor_arr.length; a++)
        {
                
                if ( waitVendor_arr[a] < Orion.Now() )
                {
                        var res =Orion.FindObject(vendor_arr[a]);
                        if (res)
                        {                

                                Orion.Say('test' + a);
                                var ser = res.Serial();
                                Orion.ClientLastTarget(ser);
                                Orion.TargetSystemSerial(ser);

                                Orion.WalkTo(res.X(), res.Y(), res.Z(), 1);
                                Orion.Follow(ser);
                                scanJ();
                                waitVendor_arr[a] = Orion.Now() +900000; //15 min dont toch this vendor
                        }
                        else
                                { TextWindow.Open(); //Test print
                                    TextWindow.Print(vendor_arr[a]);
                                    TextWindow.Print(a);
                                }
                }
                                else TextWindow.Print( Orion.Now() - waitVendor_arr[a] );
        }
}        
        
function scanJ ()
{

    msgs = ['Begging ended' ,
                 'Of course,' ,
                 'You put the gold coin' ,
                 'Oh, I have no money now|You must wait to use that' ,
                 'You are already begging' ,
                 'is too far away' ,
                 'You must wait to use that' ,
                 'You can use this skill only on humans' ,
                 'with thoughts of battle'
        ];
Orion.ClearJournal();    
Orion.JournalIgnoreCase(true );
Orion.UseSkill('Begging' );
Orion.WaitTargetObject(Orion.ClientLastTarget() );

var tim = Orion.Now() + 50000 ;
while (tim >Orion.Now() )
    {
    Orion.Wait(1000);
    //Orion.Say('xz');

    if (Orion.FindObject(self).X() > 2000 ) //teleported BY mistake
        {
        TextWindow.Open();
        TextWindow.Print('-==========PISEC==========-');
        Orion.WalkTo(4413 ,1144, 0, 0); //go back to teleport
        }

    if ( Orion.InJournal(msgs[7]) ) //wrong Target (ONLY VENDORS)
        {
        Orion.Say('netot');
        break;
        }
    if ( Orion.InJournal(msgs[3]) ) // target need rest
        {
        Orion.Wait(1000);
        Orion.Say('thenx');
        Orion.ClearJournal();    
        break;
        }
    if (Orion.InJournal(msgs[0]) )            // try one more time
        {
        Orion.Say('dEngi daVaj');
        Orion.UseSkill('Begging' );
        Orion.WaitTargetObject(Orion.ClientLastTarget() );
        Orion.ClearJournal();    
        var tim = Orion.Now() + 50000 ;
        continue;
        }
    if (Orion.InJournal(msgs[5]) )            // try one more time
        {
        var tar = Orion.FindObject ( Orion.ClientLastTarget() );
        Orion.WalkTo(tar.X(), tar.Y(), tar.Z(), 1);
    
        Orion.Follow(Orion.ClientLastTarget());
        Orion.UseSkill('Begging' );
        Orion.WaitTargetObject(Orion.ClientLastTarget() );
        Orion.ClearJournal();    
        var tim = Orion.Now() + 50000 ;
        continue;
        }
    
    
    }
Orion.Wait(1000);    
Orion.Say('goodbye');    
}            
                            
        

        

}

            
                                
        




function ViewRangNORM()
{
Orion.ClientViewRange(20);
//Orion.Say(Orion.ClientViewRange() );
Orion.Info();
}