Author Topic: SOT sorter  (Read 18794 times)

0 Members and 1 Guest are viewing this topic.

Offline slyoneTopic starter

  • Full Member
  • ***
  • Posts: 135
  • Activity:
    0%
  • Reputation Power: 2
  • slyone has no influence.
  • Gender: Male
  • Respect: +40
  • Referrals: 1
    • View Profile
Re: SOT sorter
« Reply #15 on: June 13, 2010, 05:53:13 AM »
0
Version 1.1 Updates: -Updated Instructions
                             -Updated R bag;                      
                             -Fixed placement of Animal
                             Lore and Arms Lore
                             -Fixes Evaluating to Evaluat
Started playing back at the Second Age

Offline Ultima

  • Insane Scripter
  • *
  • Posts: 1580
  • Activity:
    0%
  • Reputation Power: 26
  • Ultima is on the verge of being accepted.Ultima is on the verge of being accepted.Ultima is on the verge of being accepted.Ultima is on the verge of being accepted.Ultima is on the verge of being accepted.
  • Gender: Male
  • Respect: +160
  • Referrals: 4
    • View Profile
Re: SOT sorter
« Reply #16 on: July 15, 2010, 11:20:47 PM »
0
Finally got around to using this script this afternoon. I used wooden containers I already had secured and it worked no problem. Ended up with 15 or so 5.0 point SOT's and opened up about 250 extra storage spaces.

Now everything is tucked away nice and neat in alphabetized containers.  Organizing scrolls from future Champion Spawn Hunting will be a snap as everything is ready to go.

Very handy! Great tool for organizing and consolidating the homestead.  8)

Offline 12TimesOver

  • Another Day, Another Vendetta
  • Global Moderator
  • *
  • *
  • Posts: 3694
  • Activity:
    0%
  • Reputation Power: 41
  • 12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.12TimesOver is a force to reckon with.
  • Gender: Male
  • Respect: +321
  • Referrals: 2
    • View Profile
Re: SOT sorter
« Reply #17 on: May 15, 2011, 04:10:20 AM »
0
Moved to the Script Library, thanks Slyone!

X

« Last Edit: May 15, 2011, 12:08:24 PM by 12TimesOver »
When they come for me I'll be sitting at my desk
     with a gun in my hand wearing a bulletproof vest
My, my, my how the time does fly
     when you know you're gonna die by the end of the night

Offline mardybm

  • Newbie
  • *
  • Posts: 3
  • Activity:
    0%
  • Reputation Power: 1
  • mardybm has no influence.
  • Respect: 0
  • Referrals: 0
    • View Profile
Re: SOT sorter
« Reply #18 on: February 29, 2012, 02:02:20 AM »
0
Thanks, slyone
Your script really helped me!
Still no SoT books on my freeshard :(

Offline slyoneTopic starter

  • Full Member
  • ***
  • Posts: 135
  • Activity:
    0%
  • Reputation Power: 2
  • slyone has no influence.
  • Gender: Male
  • Respect: +40
  • Referrals: 1
    • View Profile
Re: SOT sorter
« Reply #19 on: February 29, 2012, 04:23:15 AM »
0
Glad to hear it helped!
Started playing back at the Second Age

Offline Gemviper

  • Sr. Member
  • *
  • Posts: 481
  • Activity:
    0%
  • Reputation Power: 0
  • Gemviper hides in shadows.
  • Respect: +57
  • Referrals: 2
    • View Profile
Re: SOT sorter
« Reply #20 on: November 29, 2015, 08:12:13 AM »
0
Just a bug report - It doesn't seem to detect eval intel pinks, otherwise still works great.

A quick look at the code shows that it's searching for "evaluat" but pinks are named "eval intelligence", simple fix.

It's also missing Fletching
« Last Edit: November 29, 2015, 08:21:34 AM by Gemviper »

Offline slyoneTopic starter

  • Full Member
  • ***
  • Posts: 135
  • Activity:
    0%
  • Reputation Power: 2
  • slyone has no influence.
  • Gender: Male
  • Respect: +40
  • Referrals: 1
    • View Profile
Re: SOT sorter
« Reply #21 on: December 26, 2015, 07:31:40 PM »
0
Just a bug report - It doesn't seem to detect eval intel pinks, otherwise still works great.

A quick look at the code shows that it's searching for "evaluat" but pinks are named "eval intelligence", simple fix.

It's also missing Fletching

Thanks for the feedback.  I made the updates you mentioned and posted version 1.2.  I don't have the SOT's to test this version so I apologize in advance if I introduced a bug into version 1.2 .  I'm leaving version 1.1 up until I have time to more fully test the update.
Started playing back at the Second Age

Offline Ketchup

  • Full Member
  • ***
  • Posts: 138
  • Activity:
    0%
  • Reputation Power: 3
  • Ketchup has no influence.
  • Respect: +18
  • Referrals: 0
    • View Profile
Re: SOT sorter
« Reply #22 on: December 28, 2015, 03:41:16 AM »
0
Thought its about time I did something around here, anyway here is an update for the eval and fletching, this fully works on OSI, add this to your main post if you like.
Code: [Select]
;===================================================
; Script Name: SOT/PS Sorter
; Author: slyone
; Version: 1.1
; Public Release: 10-23-2009
; Revision Date: 4-7-2010
; Purpose:  Sort your SOT's/PS's in Alphabetical Order
; Instructions: -Bag up a bunch of SOT's OR PS's to sort
;               Note: The script doesn't differentiate
;                b/w SOT's and PS's.
;               -This script supports multiple bags
;               of scrolls
;               -Secure 10 empty BACKPACKS or POUCHES
;               -Be close enough to all of your secures
;               to drag and drop the scrolls on them
;               -Press Play!
; Acknowledgements:  Thanks to C2 and Mystre for the
;                    help on the routines and subs!
;===================================================
; Version 1.1 Updates: -Updated Instructions
;                      -Updated R bag
;                      -Fixed placement of Animal
;                      Lore and Arms Lore
;===================================================
;;;;;;;;;;;;;;setup procedure;;;;;;;;;;;;;;;;;;;;;;;
;sot scroll id
set %sotscroll TVH
;position for sot bag
set %sotbagposx 10
set %sotbagposy 10
;x positions for scrolls within backpacks
set %scrollposx1 50
set %scrollposx2 80
set %scrollposx3 110
set %scrollposx4 140
;y positions for scrolls within backpacks
set %scrollposy1 60
set %scrollposy2 100

;setup the backpacks
gosub bag_setup

sotsort:
;setup sot bag
set %sotbag DQQTGOD
wait 20
set #lobjectid %sotbag
event macro 17
wait 20
contpos %sotbagposx %sotbagposy
wait 10

;;;;;;;;;;;;;;sorting code;;;;;;;;;;;;;;;;;;;;;;;;;;
repeat
  finditem %sotscroll C_ , %sotbag
  wait 20
  for #findindex 1 #findcnt
    {
      event property #findid
      ;seperate scrolls into 10 bags
      ;bag 1
      if animal in #property
        {
          gosub checkif lore %bag1 %scrollposx3 %scrollposy1
          gosub checkif taming %bag1 %scrollposx4 %scrollposy1
        }
      gosub checkif alch %bag1 %scrollposx1 %scrollposy1
      gosub checkif anat %bag1 %scrollposx2 %scrollposy1
      ; moved animal lore to if statement
      ; moved animal taming to if statement
      gosub checkif arms %bag1 %scrollposx1 %scrollposy2
      gosub checkif archer %bag1 %scrollposx2 %scrollposy2
      ;bag 2
      gosub checkif begging %bag2 %scrollposx1 %scrollposy1
      gosub checkif black %bag2 %scrollposx2 %scrollposy1
      gosub checkif fletching %bag2 %scrollposx3 %scrollposy1
      gosub checkif bushido %bag2 %scrollposx4 %scrollposy1
      ;bag 3
      gosub checkif camp %bag3 %scrollposx1 %scrollposy1
      gosub checkif carpentry %bag3 %scrollposx2 %scrollposy1
      gosub checkif carto %bag3 %scrollposx3 %scrollposy1
      gosub checkif chiv %bag3 %scrollposx4 %scrollposy1
      gosub checkif cook %bag3 %scrollposx1 %scrollposy2
      ;bag 4
      gosub checkif detect %bag4 %scrollposx1 %scrollposy1
      gosub checkif disco %bag4 %scrollposx2 %scrollposy1
      gosub checkif intelligence %bag4 %scrollposx3 %scrollposy1
      ;bag 5
      gosub checkif fencing %bag5 %scrollposx1 %scrollposy1
      gosub checkif fishing %bag5 %scrollposx2 %scrollposy1
      gosub checkif focus %bag5 %scrollposx3 %scrollposy1
      gosub checkif foren %bag5 %scrollposx4 %scrollposy1
      gosub checkif glass %bag6 %scrollposx1 %scrollposy2
      ;bag 6
      gosub checkif healing %bag6 %scrollposx1 %scrollposy1
      gosub checkif herd %bag6 %scrollposx2 %scrollposy1
      gosub checkif hiding %bag6 %scrollposx3 %scrollposy1
      gosub checkif imbuing %bag6 %scrollposx4 %scrollposy1
      gosub checkif inscription %bag6 %scrollposx1 %scrollposy2
      gosub checkif item %bag6 %scrollposx2 %scrollposy2
      gosub checkif lock %bag6 %scrollposx3 %scrollposy2
      gosub checkif lumber %bag6 %scrollposx4 %scrollposy2
      ;bag 7
      gosub checkif mace %bag7 %scrollposx1 %scrollposy1
      gosub checkif mage %bag7 %scrollposx2 %scrollposy1
      gosub checkif mason %bag7 %scrollposx3 %scrollposy1
      gosub checkif meditat %bag7 %scrollposx4 %scrollposy1
      gosub checkif mining %bag7 %scrollposx1 %scrollposy2
      gosub checkif music %bag7 %scrollposx2 %scrollposy2
      gosub checkif myst %bag7 %scrollposx3 %scrollposy2
      ;bag 8
      gosub checkif necro %bag8 %scrollposx1 %scrollposy1
      gosub checkif ninji %bag8 %scrollposx2 %scrollposy1
      gosub checkif parry %bag8 %scrollposx3 %scrollposy1
      gosub checkif peace %bag8 %scrollposx4 %scrollposy1
      gosub checkif poison %bag8 %scrollposx1 %scrollposy2
      gosub checkif provo %bag8 %scrollposx2 %scrollposy2
      gosub checkif remove %bag8 %scrollposx3 %scrollposy2
      gosub checkif resist %bag8 %scrollposx4 %scrollposy2
      ;bag 9
      gosub checkif snoop %bag9 %scrollposx1 %scrollposy1
      gosub checkif spellweav %bag9 %scrollposx2 %scrollposy1
      gosub checkif spirit %bag9 %scrollposx3 %scrollposy1
      gosub checkif stealing %bag9 %scrollposx4 %scrollposy1
      gosub checkif stealth %bag9 %scrollposx1 %scrollposy2
      gosub checkif sword %bag9 %scrollposx2 %scrollposy2
      ;bag 10
      gosub checkif tact %bag10 %scrollposx1 %scrollposy1
      gosub checkif tailor %bag10 %scrollposx2 %scrollposy1
      gosub checkif taste %bag10 %scrollposx3 %scrollposy1
      gosub checkif throw %bag10 %scrollposx4 %scrollposy1
      gosub checkif tinker %bag10 %scrollposx1 %scrollposy2
      gosub checkif track %bag10 %scrollposx2 %scrollposy2
      gosub checkif veter %bag10 %scrollposx3 %scrollposy2
      gosub checkif wrest %bag10 %scrollposx4 %scrollposy2
    }
  until #charghost = yes || #findkind = -1
display yesno Are You Sorting Another Bag?
if #dispRes = yes
 goto sotsort
display All Finished!
halt

;;;;;;;;;;;;;;subs;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

sub bag_setup
  ;setup bag 1
  set %bag1 NFOLEOD
  wait 20
  gosub openandmove 70 300 %bag1
  ;setup bag 2
  set %bag2 OFOLEOD
  wait 20
  gosub openandmove 70 550 %bag2
  ;setup bag 3
  set %bag3 YBULEOD
  wait 20
  gosub openandmove 250 300 %bag3
  ;setup bag 4
  set %bag4 BCULEOD
  wait 20
  gosub openandmove 250 550 %bag4
  ;setup bag 5
  set %bag5 SXTLEOD
  wait 20
  gosub openandmove 430 300 %bag5
  ;setup bag 6
  set %bag6 GFOLEOD
  wait 20
  gosub openandmove 430 550 %bag6
  ;setup bag 7
  set %bag7 NXTLEOD
  wait 20
  gosub openandmove 610 300 %bag7
  ;setup bag 8
  set %bag8 OXTLEOD
  wait 20
  gosub openandmove 610 550 %bag8
  ;setup bag 9
  set %bag9 DCULEOD
  wait 20
  gosub openandmove 790 300 %bag9
  ;setup bag 10
  set %bag10 TXTLEOD
  wait 20
  gosub openandmove 790 550 %bag10
  return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

sub targets
  set #targcurs 1
  target
  while #targcurs = 1
    wait 0
  return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

sub dragndrop ;%1 = %dragid, %2 = %dropcontid, %3 = contposx_skill, %4 = contposy_skill
  set %dragid %1
  set %dropcontid %2
  set %contposx_skill %3
  set %contposy_skill %4
  exevent drag %dragid
  wait 15
  exevent dropc %dropcontid %contposx_skill %contposy_skill
  wait 10
  return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

sub checkif ;%1 = skill, %2 = bag for skill, %3 = contposx_skill, %4 = contposy_skill
  if %1 in #property
    {
      gosub dragndrop #findid %2 %3 %4
    }
  return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

sub openandmove ;%1 = contposx, %2 = contposy, %3 = secure
  ;open container
  set #lobjectid %3
  event macro 17
  wait 20
  ;move
  contpos %1 %2
  wait 10
  return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



Offline Hordeboy1903

  • Newbie
  • *
  • Posts: 7
  • Activity:
    0%
  • Reputation Power: 1
  • Hordeboy1903 has no influence.
  • Respect: 0
  • Referrals: 0
    • View Profile
Re: SOT sorter
« Reply #23 on: December 02, 2016, 09:05:44 PM »
0
nice

Tags: