Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - TramMoonstone

Pages: [1]
1
Inactive Submissions / Tramstone's Leather Imbue Picker
« on: June 18, 2011, 01:14:18 AM »
This is my 1st real script!

Now i am not sure how it will handle different screen resolutions and if you have moved any of your crafting gumps but it should work just fine. Let me know if you find any bugs or if you would like to see some nicety's as this script is the basics only.

It is working flawlessly for me but it has only been tested on one other machine and I need feedback to find any "other machine" issues.
 
 
Code: [Select]
Tramstone's Leather Imbue Picker
; Author: Tramoonstone
; Version: 1,0
; This script will find NPC value resists on tailor made leather armor for imbueing
 ;What you need:
 ;1 secure to save possible imbueables
 ;1 secure with leather "Note the script will currently use ALL leather types"
 ;So be sure you dont have horned or barbed in the resource secure or main pack!
 ;1 salvage bag in your main pack
 ;Have sewing kits in your pack as the script does not make more!
 ;Make one of the items you want the script to make so it is the make last item
 ;BE SURE that there are NO armor pices in you pack when you start(including the one you used to set make last)
 
 ;What it does:
 ;makes one leather armor piece at a time and evaluates it for NPC values
 ;If it has an NPC value or one really high it will drop it to a keep secure if not to a salvage bag
 ;when out of leather will restock from the secure
 ;when getting overloaded will use salvage bag
 set %sewingkit HAG
 set %itemtomake KDZ_LDZ_YGY_AHY_JKH_KKH_HKH_QKH_NJL_VKH_ZIQ_LJQ_JJQ_GJQ_MJQ_LLH_ALH_XKH_MLH_YKH_XGY_NGY_UGY_TGY_ZGY_WGY
 set %material JJG

 gosub setup

 loop:
 gosub weightcheck
 gosub resourcechck
 gosub makeone
 wait 10
 gosub checkone
 goto loop
 sub setup
 event macro 31
 wait 20
 event macro 8 2
 contpos 700 400
 wait 20
 set #nextcposx 400
 set #nextcposy 0
 wait 20
 event macro 8 7
 wait 20
 set %backpackID #contid
 wait 20
 msg open keep secure ID now $
 set #nextcposx 625
 set #nextcposy 0
 wait 100
 set %keeppack #lObjectID
 wait 20
 msg open salvage bag ID now $
 set #nextcposx 850
 set #nextcposy 0
 wait 100
 set %cutpack #lObjectID
 wait 20
 msg open resource secure now $
 set #nextcposx 850
 set #nextcposy 200
 wait 100
 set %resourceid #lObjectID
 wait 20
 event macro 13 21
 wait 200
 return

 sub makeone
 finditem %sewingkit C_ , %backpackID
 event property #findid
 set #lobjectid #findid
 wait 20
 event macro 17
 wait 50
 click 335 505
 return
 sub checkone
finditem %itemtomake C_ , %backpackID
event property #findid
if exceptional notin #property
        {
          finditem %itemtomake C_ , %backpackID
          exevent drag #findid
          wait 6
          exevent dropc %cutpack
          wait 6
          return
          }
if 14% in #property || 2% in #property || 3% in #property || 4% in #property
 {
          finditem %itemtomake C_ , %backpackID
          exevent drag #findid
          wait 6
          exevent dropc %keeppack
          wait 6
          return
          }

else
          {
          finditem %itemtomake C_ , %backpackID
          exevent drag #findid
          wait 6
          exevent dropc %cutpack
          wait 6
          return
          }
 sub resourcechck
 finditem %material C_ , %backpackID
 if #findstack < 15 || #findkind = -1
 {
 wait 20
 set #nextcposx 400
 set #nextcposy 0
 event macro 8 7
 wait 30
 finditem %cutpack C_ , %backpackID
 set #lobjectid #findid
 set #nextcposx 850
 set #nextcposy 0
 event macro 17
 finditem %material C_ , %resourceid
 wait 10
 event drag #findid
 wait 20
 msg 100 $
 wait 20
 click 565 785
 wait 10
 return
 }
 else
 return
 sub weightcheck
 if #weight > 300
 {
 wait 20
 event macro 8 7
 wait 30
 click 470 75
 wait 30
 click 500 100
 wait 30
 finditem %cutpack C_ , %backpackID
 set #lobjectid #findid
 set #nextcposx 850
 set #nextcposy 0
 event macro 17
 return
 }
 else
 return

2
New member introductions / Heya! Im Trammoonstone
« on: April 19, 2011, 06:25:34 PM »
Hello everybody! :o

Im Trammoonstone ya can call me trammy. Ive been playing UO for quite some time on and off since T2A was introduced! Anyhow I work outdoors and play inside. Hehe I guess that kinda backwards for most but I like it that way.

Ive played a few mmos over the years but UO seems to pull me back every time. Some of the other games are SWG(pre-cu) vanguard before sony ruined them both  :'( and darkfall. While darkfall was supposed to be the pre AoS UO "sequel" it didnt really pull it off as well as I had hoped. I did do quite well starting a clan owning a full city and founding the largest alliance ever on agon! Only lasted a few months before I realized all the downsides to the game were ...well... damming.

But back to the intro:

I mostly play uo as a sampire/tamer, yea I know that sounds weird. If we ever have a thread debating silly templates Ill throw down with ya. Also I have a discord provok mage that I run with just short of "as much" as the tamer. I play on atlantic.

Also of note I occasionally make a run on a fresh account with no resources from scratch just to see how good the scripts are coming along. Once on legends I was able to own a keep inside of a single month of play remake both of my main characters and legendary my mules as well as compete for the high end items at in game auctions with no duping or buying gold! That said I can not script from scratch but I do alter minor lines of code and play unattended.

With that I will say Im glad to have found this community and look forward to bantering about UO or other great games ya all have a hankering to.

Thanks for the opportunity
TramMoonstone

Pages: [1]