1
General UO Chat / Re: Unattended Macro Alert 21 October 2009
« on: October 22, 2009, 10:58:00 PM »
mmmmm.... pi. 
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.
Pages: [1] 2
2
General UO Chat / Re: Relic Fragments....
« on: October 18, 2009, 10:49:41 AM »
theres a thread on stratics all about this topic. basically if you make a ring with 13% of each resist it will yield a relic fragment ONLY if you are a gargoyle and use the queens soulforge. You could imbue other properties and still do it with a human tho, you just need to get higher intensities, ie luck @ 90.
13% resists only give 86.6% compared to the 90 from luck, lrc etc.
below is the stratics thread with various ways of achieving a relic frag.
http://vboards.stratics.com/showthread.php?t=163093
13% resists only give 86.6% compared to the 90 from luck, lrc etc.
below is the stratics thread with various ways of achieving a relic frag.
http://vboards.stratics.com/showthread.php?t=163093
3
Questing / Re: ScriptUO Heartwood Quester 1.24 with Advanced CLAw support
« on: October 15, 2009, 10:02:14 PM »
i've still yet to DL and try this out... i guess i missed out on the good days of expensive kits tho. they're down to like 4 mil on GL
4
Off Topic / Re: If you could see any live band from any time in history, who would it be?
« on: October 12, 2009, 12:37:59 PM »my other band should have been the Beetles.Most over rated band in history.
agreed.. the #1 selling record across the pond in britland is Queen's greatest hits iirc.
5
UO-Related Tutorials / Re: Imbuing for your miner/lumberjack bot!
« on: October 12, 2009, 12:43:06 AM »
i use a few different spots for LJing on moonglow island, and around jhelom + minoc.
the other spots are islands which until tonite have been amazing. the house i script out of is also on an island and tonite someone thought it was a great idea to start doing tmaps. now i got balrons, poison eles, and ancient wyrms trying to kill all my chars.
as for mining spots, i've tried different places and my most successful so far is just west of brit along the mountain side. I'd love to get better mining spots tho.
the other spots are islands which until tonite have been amazing. the house i script out of is also on an island and tonite someone thought it was a great idea to start doing tmaps. now i got balrons, poison eles, and ancient wyrms trying to kill all my chars.
as for mining spots, i've tried different places and my most successful so far is just west of brit along the mountain side. I'd love to get better mining spots tho.
6
Off Topic / Re: If you could see any live band from any time in history, who would it be?
« on: October 12, 2009, 12:29:05 AM »
queen 4 sure.. one of the best bands ever.
7
UO-Related Tutorials / Re: New Char, New Shard, an Essay.
« on: October 12, 2009, 12:26:46 AM »
pretty nice sum of money to make from (basically) nothing. hi5
8
Scripting Chat / Re: stacking boards
« on: October 11, 2009, 08:40:31 PM »
I actually got a working script a few days ago but i didnt want to post it since it uses subs that are 5 years old lol. My friend Necro (wrote the popular poisoning script on easyuo) wrote it for me.
regardless of that here is the code.
regardless of that here is the code.
Code: [Select]
set %debug #false
exevent dropC %targetBox
set %whatToMove TLK
set %tot 0
if %debug
{
set %sourceBox FSWVDRD
set %targetBox SDOTNND
goto Debug
}
redoSB:
gosub setTargToVar sourceBox Select the box with the source of boards you want to move
if #result = failed
halt
if ! #result
goto redoSB
redoTB:
gosub setTargToVar targetBox Select the box you would like to move board to
if #result = failed
halt
if ! #result
goto redoTB
gosub setupDesktop %sourceBox 0 0 %targetbox 250 0
Debug:
MainLoop:
gosub findStack
gosub moveStack #findid %moveAmount
goto MainLoop
sub findStack
finditem %whatToMove C_ , %sourceBox
if #findkind = -1
{
display OK no more boards
halt
}
if %tot >= 60000
set %tot 0
if %tot + #findstack > 60000
set %moveAmount 60000 - %tot
if %tot + #findstack <= 60000
set %moveAmount #findstack
set %tot %tot + %moveAmount
return #findid
sub moveStack
exevent drag %1 %2
wait 22
exevent dropC %targetBox
wait 22
return
;==================================
; Script Name: sub setTargToVar
; Author: Necro|FS
; Version: x.xx
; Client Tested with:
; EUO version tested with:
; Shard OSI / FS: OSI
; Revision Date:
; Public Release: 01-21-05
; Global Variables Used:
; Purpose: Setup variable for whatever you target, plus shows given message.
;==================================
sub setTargToVar
; %1 = name of the variable without the "%"
; %2 = Message to display (optional)
; if #result = failed - user cancelled the target #result = #true if it worked
; example -
; gosub setTargToVar regContainer Please target your REAGENT supply container..
; Purpose - Will set whatever you target to the variable you specify, and uses the message you specify
nameSpace Push
nameSpace local sTTV
if %0 < 1 || %0 = n/a
return
set !0 %0
for !_cnt 1 !0
{
set ! . !_cnt % . !_cnt
}
if !0 = 1
goto sTTVskip
for !_cnt 2 !0
{
if !_msg = n/a
set !_msg ! . !_cnt
else
set !_msg !_msg , #spc , ! . !_cnt
}
str left !_msg 1
set !_msgLetter #strres
str del !_msg 1 1
str lower #strres
set !sysMessages SYS in #opts
if !sysMessages
event sysmessage !_msgLetter , #strres
else
display ok !_msgLetter , #strres
sTTVskip:
set #ltargetid notpick
set #targcurs 1
sTTVTargLoop:
wait 0
if #targcurs <> 1 && #ltargetid = notpick
{
nameSpace Clear
nameSpace Pop
return #false
}
if #ltargetid = notpick
goto sTTVTargLoop
set % , !1 #ltargetid
nameSpace Clear
nameSpace Pop
return #true
;==================================
; Script Name: sub SetupDesktop
; Author: Necro|FS
; Version: 1.10
; Client Tested with: 4.0.3e
; EUO version tested with: 0096
; Shard OSI / FS: OSI / FS
; Revision Date: 08/01/04
; Public Release: 08/01/04
; Global Variables Used: n/a
; Purpose: Opens & Moves gumps to specified locations.
;==================================
sub SetupDesktop
;%1 - Gump request ( #contname )
;%2 - #ContPosX request
;%3 - #ContPosY request
;%4 - %* = optional
;@Purpose: Opens & moves gumps to specified locations;
; Can be included or called; Supports more than one container to open
;@by Necro|FS
;@Possible values for %1 = "ABCDEF" (ID of the Container) / "menu_ABCDEF" (Menu means you
; will be using a gump like the alchemy gump, the id is for the object to be used (a mortar)) /
; optionsgump (configuration) / paperdoll_gump (paperdoll) / status_gump (status) /
; text_gump (journal) / skill_gump (skills list) / spellbook_gump (spellbook) / container_gump
; (Inventory) / radar_gump (Overview) / normal_gump (UO Messenger) / PartyGump (Party Manifest)
nameSpace Push
nameSpace local subSD
set !_parm1 optionsgump_paperdoll_gump_status_gump_text_gump_
+skill_gump_spellbook_gump_container_gump_radar_gump_normal_
+gump_partygump
for !cnt2 1 %0
{
set ! . !cnt2 % . !cnt2
}
set !Runs %0 / 3
for !cnt 1 !Runs
{
set !_useEM #true
set !Parm1 3 * !cnt - 2
set !Parm2 !Parm1 + 1
set !Parm3 !Parm2 + 1
set !Parm1 ! . !Parm1
set !Parm2 ! . !Parm2
set !Parm3 ! . !Parm3
if !Parm1 notIn !_parm1
{
set !_useEM #false
goto openitSUD
}
if !Parm1 = optionsgump
set !macro 0
if !Parm1 = paperdoll_gump
set !macro 1
if !Parm1 = status_gump
set !macro 2
if !Parm1 = text_gump
set !macro 3
if !Parm1 = skill_gump
set !macro 4
if !Parm1 = spellbook_gump
set !macro 5
if !Parm1 = container_gump
set !macro 7
if !Parm1 = radar_gump
set !macro 8
if !Parm1 = normal_gump
set !macro 9
if !Parm1 = PartyGump
set !macro 10
openitSUD:
if !_useEM
event macro 8 !macro
else
{
if menu in !parm1
{
set !_menu #true
str del !parm1 1 5
set !parm1 #strres
}
set #lobjectid !Parm1
event macro 17
}
scanjournal
if You_must_wait in #journal
{
deletejournal
goto openitSUD
}
wait 10
WFSVL:
if !_menu
gosub waitForSysVar contname = generic_gump 2
if !_useEM
gosub waitForSysVar contname = !Parm1 2
if ! !_useEM && !_menu <> #true
gosub waitForSysVar contid = !Parm1 2
if ! #result
goto WFSVL
WFSV2:
else
contpos !Parm2 !Parm3
gosub waitForSysVar contposx = !Parm2 contposy = !Parm3
if ! #result
goto WFSV2
}
nameSpace Clear
nameSpace Pop
return
sub waitForSysVar
; Author: Quintok / Raziel
{
nameSpace Push
nameSpace local WFSV
set !cnt %0 / 3
if ( %0 % 3 = 1 )
set !timeOut #scnt + % . %0
else
set !timeOut #scnt + 5
for !i 1 !cnt
{
set !offset 3 * !i - 2
set !evaluation !offset + 1
set !value !offset + 2
if ! ( # . % . !offset % . !evaluation % . !value )
set !i 0
if #scnt > !timeout
{
nameSpace Clear
nameSpace Pop
return #false
}
}
}
nameSpace Clear
nameSpace Pop
return #true
9
Scripting Chat / Re: It's a good thing I made so much gold in heartwood, because...
« on: October 07, 2009, 08:51:33 PM »
i spent about 7-8 mil on gems and about 22k residue. (i did alot of it with razor b4 a script was out)
10
Scripting Chat / Re: stacking boards
« on: October 07, 2009, 07:01:11 PM »
that one just picks up boards and drops them on the same stack. me and my friend tried writing one but so far its doing the same thing, picking up so many boards and dropping them on the same stack. here is what we came up with. Any help to fix it would be sweet.
Code: [Select]
start:
set %find TLK
set %full 60000
set %wait 10
gosub getboards
gosub stacking
return
sub getboards
finditem %find
if #findstack < %full
{
set %pile #findid
return
}
ignoreitem
return
sub stacking
finditem %find
if #findid = %pile
{
ignoreitem
return
}
loop:
set %source #findid
finditem %pile
wait 5
set %count ( %full - #findstack )
exevent drag %source %count
wait 10
exevent dropC %pile
wait 10
finditem %pile
if #findstack = %full
{
goto start
}
goto loop
11
Scripting Chat / Re: stacking boards
« on: October 06, 2009, 06:01:37 PM »
thats what i do now, but i have a few hundred stacks that are 59xxx. just trying to save tedious work
12
Scripting Chat / stacking boards
« on: October 06, 2009, 03:30:11 PM »
can anyone give me some tips on how to go about writing a script to stack boards into 60k piles, i got a few hundred stacks to deal with.
thx
thx
13
Crafting / Re: Masscre' --- Magic Residue Factory !!
« on: October 05, 2009, 01:23:43 PM »
ya mine was about 3.45... i rounded down 
14
Crafting / Re: Masscre' --- Magic Residue Factory !!
« on: October 04, 2009, 08:53:55 PM »
pretty similar results, about 3 residue per 10 boards
15
Crafting / Re: Masscre' --- Magic Residue Factory !!
« on: October 04, 2009, 08:24:03 PM »
i went through approximately 400k oak boards and got about 110-115k residue. not exactly sure on the residue cuz i've been training... its over 110k for sure tho.
Pages: [1] 2