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.


Messages - Crome969

Pages: 1 ... 112 113 [114] 115 116 ... 119
1696
Questing / Re: Item Buyer & Donator
« on: August 05, 2011, 01:30:16 PM »
Quote from: Ultima on August 05, 2011, 11:29:16 AM
Running this script on a populated production shard is high risk endeaver imo so you have to be careful! I've been nabbed one time before using SM's Battle Axe Donator.

The shard I was going to test the script on you can't mark in runes or recall directly into the Library so I need to see if I can incorporate a rail into the script before testing it out.
of course Scripts like these and some of the questing scripts are not useable for bigger Shards or hard scanning by devs. On the shard we play macroing is allowed:)

1697
Questing / Re: Item Buyer & Donator
« on: August 05, 2011, 10:26:30 AM »
Quote from: Goliath on August 05, 2011, 09:56:34 AM
So you are saying I can get Mace and Shield glasses for under 1 mil?  I have to be reading this wrong?
1,9 Mil with Axes , but need longer and 2,6 mil with bucklers but need shorter time

1698
Questing / Re: Item Buyer & Donator
« on: August 04, 2011, 09:03:45 PM »
Quote from: camotbik on August 04, 2011, 02:23:29 PM
Hello SUO. My friend yesterday asked me to help him to get mace and shield glasses. So I made him this little script to help him with his problem. The script buys bucklers from vendors and donates them to the worrior(donation vendor). It takes aproximetly 20hrs to get those glasses - A circle of buying and donating takes 64 seconds, from wich you get 720 points. So 800 000/720*64/60/60=19.75~ . I know you could buy battle axes and get the glasses cheaper(GP 711111), but I think It would be much slower and money isnt the issue here. So we use 2rbs full of vendors.
Oh yeah, almost forgot! I use razors buying agent to buy 80 bucklers at the time. And I use 1-15 rune in runebook to travel to vendors and the 16th rune - depending on runebook, is to bank or donation location.

*I dont do menus, coz I havent learn by the years how to do it, and I dont really seem to see a point in them.
*I would like to thank s7 for his recalling sub.

Thank you for time.
Hope the Conversations about in icq helped you at it:P.
I will try it,too when ur done with your glasses:)(and wanna lend me your runebooks then ^^)

Kind regards Crome

1699
OEUO Snippets /
« on: August 04, 2011, 01:22:25 PM »
Quote from: TrailMyx on August 04, 2011, 11:38:20 AM
I love useful snippets like this.  Thanks for sharing.
It was a pleasure :)
More Snippets and Scripts coming soon.

1700
Scripting Chat / Re: what script would you like to see?
« on: August 04, 2011, 10:07:49 AM »
Quote from: HardY- on August 03, 2011, 12:05:10 AM
Quote from: Dixie Wrecked on July 31, 2011, 07:20:13 AM
Quote from: HardY- on July 30, 2011, 03:32:22 PM
Another cool idea, a script for do the magical residue quest o nter mur, with recall for bank or house for pick residues.

Which quest is that, the one for the 105/110 powerscrolls?  If so, that seems like it would be a simple script to write, and could easily be edited to also do the essence or relics quests.

ye, a sript to do this would be rock, in some shard residue go very low for sell (50 - 75 each on atl) so if you do the quests you can win a lot of runic mallets and with scroll bind sell the 120 ps's
Its a pleasure to fullfill your wish..
check http://www.scriptuo.com/index.php?topic=8110.0 But its in Openuo..

Have Fun

Kind regards
Crome

1701
OpenEUO Scripts / [OUO] Gimme more Imbuing Powerscrolls! by Crome
« on: August 04, 2011, 10:06:25 AM »
Hello Community,

Following the wish of HardY of http://www.scriptuo.com/index.php?topic=7904.msg69974#new I wrote a small Script just to do that Quest at Ter Mur Royal City Soulforge.

Setup
Code: [Select]
dofile(getinstalldir().."Init.Lua")I use my own Collection of Library file. You need to get Kal in Ex Finditem Lib
from http://www.easyuo.com/forum/viewtopic.php?t=43949
and Change this line like Kal in Ex suggest in his Script.

Code: [Select]
QuestID = 0 --If you dont know do 0if you always run same Guy you can insert his ID else just leave it as 0 and use Setup of script.

Code: [Select]
QuestItemID = 11698
-- 11697 Magical Residue
-- 11698 Enchanced Essence
-- 11699 Relic FragmentsJust enter Type of the Item you need for your Wanted Script.
The 3 Types u can use are under that line in the comment "--"

Then just press Play and wait..

FAQ
Does script Restock or sort?
-No, just a simple questmaker.
I gaved my Char 2 times 500 essences and it needet about 15 seconds to fullfill 20 Times that Quest. Then i used Scrollbinder and had a 120 Imbuing in just 15Seconds!!

Have Fun!
Kind Regards

Crome

1702
Freeshard specific scripts / Re: Heartwood Fletcher Quest for Bolts
« on: August 04, 2011, 09:28:44 AM »
Hello People,

I wrote a Revision of that Script in Openuo.
you can get it here:http://www.scriptuo.com/index.php?topic=8109.0

Have fun!

Kind regards

Crome

1703
OpenEUO Scripts / [OUO] Heartwood Fletcher Runic Farmer by Crome
« on: August 04, 2011, 09:27:32 AM »

1704
OpenEUO Scripting Chat / Re: UO.Macro(17,0,'')
« on: August 04, 2011, 01:41:48 AM »
Quote from: Macrophage on June 02, 2011, 03:13:40 AM
I didn't get through your script but I find it odd you use Last object to mark your quest item. I personnally have to use LAsttarget, unless there is something different in your shard.
Would suggest the same.
Toogle Quest Via UO.Popup() then Scan the Size, Sizey -15 then you have the last entry for toggle.
Next Question is why you doing a loop like for 1 = 10?
I would Scan for marked barstools in that colour. if #amount < 10 mark
But i dont know your whole Code:)

1705
Manwincs' Script Library / Re: Mwinc. Blacksmith Recipe Checker
« on: August 04, 2011, 12:04:29 AM »
Quote from: manwinc on July 04, 2011, 12:55:40 PM
O yeah its super easy coding. Just have to enter the tool type, category, page, selection, and it will return a value %false if the recipe is missing.
Good job, and easy to modify if something would be missed:)

1706
OEUO Snippets /
« on: August 03, 2011, 11:59:38 PM »
Good Morning Community,
today i will give out some snippets of my Baselibrary.
Some are easy, some are small.. maybe some will help.

Cloning #scnt and #scnt2:

Code: [Select]
--################################--
--@scnt()
--@Purpose : Returns CurTime in Seconds
--################################--
function Scnt()
nHour,nMinute,nSeconds,nMiliSeconds = gettime()
return ((nHour*3600) + (nMinute*60)+nSeconds)
end
--################################--
--@scnt2()
--@Purpose : Returns CurTime in MiliSeconds
--################################--
function Scnt2()
nHour,nMinute,nSeconds,nMiliSeconds = gettime()
return (((nHour*3600) + (nMinute*60)+nSeconds)*10)+nMiliSeconds
end
tried to copy the #scnt and #scnt2 from easyuo:)
example:

Code: [Select]
delay = Scnt()
if(Scnt()>Delay)then
--yourCode
end


Targeting like Target s in easyuo:

Code: [Select]
--################################--
--@WaitForCursor(timeout)
--@Purpose : Simplify Shouting
--################################--
function WaitForCursor(timeout)
tmptime = timeout * 1000
for mytimeout = 1, tmptime do
if(UO.TargCurs==false)then
wait(1)
end
end
end
same function like "target 1s" is possible.
example:
Code: [Select]
WaitForCursor(5)will wait until TargCurs = true or maximum 5 seconds. Helpfull for Scripts wich use targeting via Spells or such things.

Gather Bag of Sending ID :

Code: [Select]
--################################--
--@GetBagofSending(timeout)
--@Purpose : Simplify Shouting
--@Attention! dont work Standalone!
--@Library needet : Kal In Ex Finditem
--################################--
function GetBosID()
tmp=ScanItems(true,{Name="A Bag Of Sending"},{ID=IT})
if(#tmp==0)then
print("No Bag Of Sending found get a Bag and Press play again")
pause()
GetBosID()
end
return tmp[1].ID
end
 You will need Kal in Ex Finditem to use this.
Example :
Code: [Select]
BOS = GetBosID()returns ID of Bag of Sending in Backpack in BOS

Find out the Amount of Charges at BOS
Code: [Select]
--################################--
--@GetBagofSendingCharges(ID)
--@Purpose :Returns Amount of Charges of BOS
--################################--
function GetBagofSendingCharges(BosID)
sName,sInfo = UO.Property(BosID)
b,c =string.find(sInfo,"Charges: ")
c = c + 1
return (string.sub(sInfo,c,#sInfo))
end
Simple, you want to refill your Bos when its smaller than x uses? just ask via function how many uses you have left!:)
Example:
Code: [Select]
Charges = GetBagofSendingCharges(BOS)
print(Charges)

Weight and Maxweight interactions:
If you want to make interactions when you nearly reach your maxweight:
Code: [Select]
--################################--
--@function WeightoverLimit(Factor)
--@Purpose : Returns true if Weight > % of Maxweight
--################################--
function WeightoverLimit(Factor)
if(UO.Weight>(UO.MaxWeight*(Factor/100)))then
return true
else
return false
end
end

Example:
Code: [Select]
WeightoverLimit(69)It checks if your Weight is bigger than 69% of Maxweight.

1707
OEUO Snippets /
« on: August 03, 2011, 09:41:50 AM »
Quote from: gimlet on August 03, 2011, 09:28:16 AM
Can you call an open euo function from euo (or vis versa)
well you can make a library file and Open it Via
dofile(getinstalldir().."Yourpathandfolderns..\yourlibraryfile.lua")
so i handle it like:


dofile(getinstalldir().."Library\finditem.lua")
dofile(getinstalldir().."Library\crome_base.lua")
dofile(getinstalldir().."Library\crome_Login.lua")
dofile(getinstalldir().."Library\Sending.lua")
dofile(getinstalldir().."Library\Crome_Tamer.lua")

and atleast.. all these just staying once in a file named "Init.Lua" in my Main Openuo Folder
and then i call
dofile(getinstalldir().."Init.lua")
and that file calls those Library files.
And i can use em in my script with just 1 Line in every new Script.

But if you mean OUO in EUO i must disapoint you.
Openuo uses lua, Easyuo dont know what lua is.
Maybe if you write an Integration for Luasyntax you could.
But before you do that. Do Openuo:):)

1708
OEUO Snippets /
« on: August 03, 2011, 08:49:43 AM »

1709
OEUO Snippets /
« on: August 02, 2011, 10:36:09 PM »
Hello Scripuo Community,
do you know the Problem?
you want to walk in a specific amount of Tiles and must look at Charposition calulcate tiles or give a static Position?
Why cant this be a variable?
Today i want to show you a small Solution:

Code: [Select]
--########################################
--@Name          MoveTiles
--@Author        Crome696
--@Purpose       Move in looking direction or reversed direction
--@ReleaseDate 08\01\11
--@Version        1.0
--@TestedClient 7.0.16.1
--@TestShard    Osi\Osiclone
--########################################           
function MoveTiles(tmpTiles,tmprev,tolerance,timeout)
dir = UO.CharDir + 1
rev = {5,6,7,8,1,2,3,4}
if(tmprev==true)then tmpdir = rev[dir] else tmpdir = dir end
mpath = {}
mpath[1] = {(UO.CharPosX ),(UO.CharPosY - tmpTiles)}
mpath[2] = {(UO.CharPosX + tmpTiles),(UO.CharPosY - tmpTiles)}
mpath[3] = {(UO.CharPosX + tmpTiles),(UO.CharPosY)}
mpath[4] = {(UO.CharPosX + tmpTiles),(UO.CharPosY + tmpTiles)}
mpath[5] = {(UO.CharPosX ),(UO.CharPosY + tmpTiles)}
mpath[6] = {(UO.CharPosX - tmpTiles),(UO.CharPosY + tmpTiles)}
mpath[7] = {(UO.CharPosX - tmpTiles),(UO.CharPosY - tmpTiles)}
mpath[8] = {(UO.CharPosX - tmpTiles),(UO.CharPosY - tmpTiles)}
UO.Move(mpath[tmpdir][1],mpath[tmpdir][2],tolerance,timeout)
end

This function will move your Char in specific Tiles forward or reversed.

[/URL]
Example:
Code: [Select]
MoveTiles(1,false,0,0)You are Looking in Chardirection "0" then it will move 1 Tile in direction 0 without a timeout and 0 tiles tolerance
Code: [Select]
MoveTiles(1,true,0,0)Now reversing is enabled so it will move 1 tile in Chardirection 4 (Opposite of 0, view Picture)
if you set tolerance > 1 it will be done with moving if Char is within the tolerance range to wanted Tile Range.
If you set timeout >1 Moving is finished when it reached time > timeout seconds.

Usage:
In some of my Scripts i need to runaway from target. Like you need to heal or lure Monsters away. So you can use this function to move away.
Other Usage is maybe in Tilebased Skilling Scripts. you now dont need to look on your Charposition and calculate 8 tiles just use:
Code: [Select]
MoveTiles(8,true,0,0)
Hope it will be Useful for you guys,too.

Kind regards

Crome

1710
OpenEUO Scripting Tutorials / Idea to fix Repeat\Goto
« on: July 29, 2011, 11:16:23 AM »
Hello Community,
i noticed in TMs Pathfind that he working a lot with breaks
i thought a little bit about this issue and have maybe a solution:

function Goto(Mode,Statement)
if(Mode=="Set")then
myMode = Statement
end
if(Mode=="Get")then
Return MyMode
end
end




while(Goto("Get",false)==true)do -- ask if Goto true
.... --Your Code
if(...)and(Goto("Get",false)==true)then
... --Your Code
else
Goto("Set",true) -- set Goto to false and end loop
end
end

Its nearly like i solve my Problems

Another Possibility is to insert the looped Code in a function with a return
Example:

function Yourfunction(Yourparameter)
.. -- Your Code here
return "anyStatement" -- true or false
end

and then make


a = false
while(Yourfunction(Yourparameter)==false)do
 a = Yourfunction(Yourparameter)
end


Iam fresh to Openuo but maybe this Idea helps someone of you

best Regards Crome

Pages: 1 ... 112 113 [114] 115 116 ... 119