ScriptUO

Scripting Resources & Utilities => Stealth Client => Stealth scripts => Topic started by: dxrom on June 07, 2013, 01:00:32 PM

Title: [V4 , Pascal] [UO:R FS] Automatic Item ID and Sorter
Post by: dxrom on June 07, 2013, 01:00:32 PM

Been wanting to do this for awhile and finally got around to it last night.

This sorting method is intended for Pre-AOS servers where Gumps and Clilocs aren't currently seen by stealth or even tooltips.

Code: [Select]

(*Written by dxrom for ScriptUO.com
as a working concept on sorting items
without the use of clicocs and gump ids
or tooltips

Like always, the CONST list is user specific
and is where you setup your sort OUT containers.

The user must define item types withing the
cardinal arrays of T1-3, add more as needed.
For this example I use armor and the array
contents are hardly finished, it just contains
what I had at the time of testing.*)
Declare any item types here you wish to sort.

Code: [Select]

T1:=[$1412,$13BB,$140E,$1408,$140C,$13D6,$140A,$1413];
Use DefineItem procedure to sort items.

Code: [Select]

procedure DefineItem(Item:Array of Cardinal;Source:Cardinal;Dest:Cardinal;Name:String);

Example:
DefineItem(T1,SortBag,I1Cont,'invuln');
That example sifts through all the item types withing the T1 array (helms and gorgets) within the sorting bag for items that have "invuln" in the name, if it finds any it will deposit it into the container I1Cont, set in the initial CONSTs.

Another example could be, if you wanted to sort maps you would setup a container for each map at the top in CONST, BlankMapCont, SeaChartCont. Then input the type that a map is into the cardinal arrays where T1-2 are currently, M1. Then lastly you would call the DefineItem procedure, DefineItem(M1,SortBag,BlankMapCont,'map'); , DefineItem(M1,SortBag,SeaChartCont,'sea chart');.

And it's that simple.

Title: Re: Automatic Item Sorter, a working concept for Pre-AOS servers.
Post by: dxrom on June 07, 2013, 06:27:55 PM

Here's a list of pre-aos armors. Ringmail, Platemail, Chainmail, Studded, Leather (Female and male variants)

Code: [Select]

    T1:=[$1408,$1409,$140A,$140B,$140C,$140D,$140E,$140F,$1412,$1419,
        $13BB,$13C0,$13C7,$13D6,$1DB9,$1DBA,$1413]; //Helms,Necks
    T2:=[$1410,$1414,$1417,$1418,
        $13C5,$13C6,$13CD,$13CE,$13D4,$13D5,$13DC,$13DD,$13EB,$13EE,
        $13EF,$13F2]; //Hands,Arms;
    T3:=[$1411,$1415,$1416,$1417,
        $13BE,$13BF,$13C3,$13C4,$13CB,$13CC,$13D2,$13D3,$13DA,$13DB,
        $13E1,$13E2,$13EC,$13ED,$13F0,$13F1,$1C00,$1C01,$1C02,$1C03,
        $1C04,$1C05,$1C06,$1C07,$1C08,$1C09,$1C0A,$1C0B,$1C0C,$1C0D]; //Chest,Legs
Wont bother updating code with it as it's preference to what to filter.