ScriptUO
Official ScriptUO EasyUO Scripts => Submit your Script => Topic started by: camotbik on October 02, 2011, 06:50:07 AM
-
;======================================================================
; Script Name: Dirty Miner.
; Author: CAMOTbIK
; Version: 0.3 Beta
; Client Tested with: 7.0.10.4
; EUO version tested with: 1.5 235
; Shard OSI / FS: FS WWW.UOMW.NET
; Revision Date: 2011/09/29
; Public Release: 2011/12/15
; Global Variables Used: None
; Purpose: To mine.
; --------------------------------------------------------------------
;========================== INFO =====================================
; --------------------------------------------------------------------
; You need atleast 35 Magery/Chivalry for traveling - please specify the
; travel method you will be using at %travelmethod. R - Magery, C - Chivalry
; e.g. set %travelmethod r - will use recall.
; --------------------------------------------------------------------
; Script uses several runebooks so make sure you specify how many of
; them you will be using.
; e.g. set %miningbooks 7 - would use 7 runebooks.
; --------------------------------------------------------------------
; Script can make his own tools if needed, just keep some iron ingots
; in your %toolbag. The bag as well can contain shovels if you dont
; want/can't make your own tools.
; --------------------------------------------------------------------
;========================== CHANGELOG ================================
; --------------------------------------------------------------------
; v0.1b [ New Statistics menu, Tool making[if there are no tools in %toolbag]
; minor bugfixes and overall code optimization.
; --------------------------------------------------------------------
;========================== EDITABLES ================================
; --------------------------------------------------------------------
set %travelmethod r ; r - recall ; c - sacred journey
set %miningbooks 7 ; HOW MUCH MINING BOOKS WILL WE USE?
set %homebook YBTXMMD ; RUNEBOOK WITH A RUNE TO HOME
set %homerune 1 ; RUNE NUMBER TO HOME IN HOMEBOOK
set %miningbook1 LZTXMMD ; MINING BOOK 1
set %miningbook2 USSXMMD ; MINING BOOK 2
set %miningbook3 QKNLKMD ; MINING BOOK 3
set %miningbook4 IBNLKMD ; MINING BOOK 4
set %miningbook5 MUNLKMD ;
set %miningbook6 FOFAEND ;
set %miningbook7 DZGAEND ;
set %storage CHQWSMD ; STORAGE BOX FOR ORE
set %toolbag YBQWSMD ; BAG WITH SHOVELS
*Special thanks to Freddy for his recalling sub, which is found at http://www.scriptuo.com/index.php?topic=8427.0
*As well I would like to thank the author of all the minable tyles variable, but I have no idea who he's, as I have seen those variables in many scripts.
* Thanks to Neo for inspiration to make a new menu.
(https://lh5.googleusercontent.com/-PDojDokoAck/TohCGfBbPhI/AAAAAAAAEIM/53NRFEP7xzk/super.jpg)
(https://lh5.googleusercontent.com/-neb4U2uAr1o/ULt7oT_wS4I/AAAAAAAAFVI/2R0QehFpG_w/s312/mstatistis.JPG)
-
This is an early alfa so any sugesstions/feedback will be appriciated.
Some feedback/suggestions after reading through it a little bit:
- You can't mine a spot again in less than 1 second after you've mined last time. You should put a wait in you mining sub to make sure that happens... Otherwise you'll get those "You must wait" messages...
- An option to choose Recall or Sacred journey would be nice
- You should add a proper gumpwait to when you open the bag to check for tools. It can cause those "You must wait" messages too and mess up the script...
Hopes this helps, I don't have time to check for more stuff right now, but I will once I can...
neo
-
This is an early alfa so any sugesstions/feedback will be appriciated.
Some feedback/suggestions after reading through it a little bit:
- You can't mine a spot again in less than 1 second after you've mined last time. You should put a wait in you mining sub to make sure that happens... Otherwise you'll get those "You must wait" messages...
We dont have any message, but i did put a %waittime variable for that
- An option to choose Recall or Sacred journey would be nice
done
- You should add a proper gumpwait to when you open the bag to check for tools. It can cause those "You must wait" messages too and mess up the script...
well it was a proper gumpwait, but i did put a wait 20 in it now, for people with slow connection
Thanks.
-
We dont have any message, but i did put a %waittime variable for that
- Well, it's luck if the cycle works for you, but if you're going to publish something, it should work for others too right? :)
done
- Cool
well it was a proper gumpwait, but i did put a wait 20 in it now, for people with slow connection
- Don't think you can call spamming event macro 17 with no wait until #contid = %id a proper gumpwait :)
All-in-all, good effort man, hope to be able to try this out later today! :)
-
Thx for using my sub:D
FYI there was a serious bug where the script could not recall with rune 11 or 12. You might want to update the sub in your script.
http://www.scriptuo.com/index.php?topic=8427.0
-
updated a unfinished script, but some one could have use from it. Plus could you send this thread to debug section as i wont continue working on this script anymore?
-
Script moved to inactive scripts. (If you disagree with the move please pm me.)
If you decide you wish to support this script again we can move it into debug.
-
I have updated the script a while ago, and as i found it today, i had a thought to share it with you as I remember it was the fastest mining script I have ever seen on the public market. Testers feedback would be appreciated.
If some1 wants to use the statistics seperated, with his own mining script, to see the difference in Ore-per-Hour, you can grab it bellow.
;=====================================================================
; Script Name: Mining Statistics
; Author: CAMOTbIK
; Version: 0.1 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.5 235
; Shard OSI / FS: FS uomw.net
; Revision Date: 2012/12/09
; Public Release: 2012/12/09
; Global Variables Used: None
; Purpose: To gather overall mining statistics..
;=====================================================================
;========================== USAGE ====================================
; 1) Copy the script in to your mining script.
; 2) Input Gosub Menu as your first line in script.
; 3) Use Gosub Update, right before/after you pickup ore for unloading
; example.
;
; finditem %mined_stuff C_ , #backpackid
; while #findcnt > 0
; {
; gosub update
; exevent drag #findid #findstack
; exevent dropc %storage
; wait 20
; finditem %mined_stuff C_ , #backpackid
; }
;
; 4) To use status changes, use "menu set status_label test"
;=====================================================================
;========================== MENU =====================================
;=====================================================================
sub Menu
set %stats_ore TVJ_DWJ_EWJ_GWJ_
set %starttime #scnt
set %ironcnt 0
set %dullcoppercnt 0
set %shadowironcnt 0
set %coppercnt 0
set %bronzecnt 0
set %goldencnt 0
set %agapitecnt 0
set %veritecnt 0
set %valoritecnt 0
set %Turquoisecnt 0
set %EcruCitrinecnt 0
set %FireRubycnt 0
set %PerfectEmeraldcnt 0
set %BlueDiamondcnt 0
set %DarkSapphirecnt 0
set %oph 0
set %runtime 0
menu Clear
menu Window Title #charname
menu Window Color BtnFace
menu Window Size 340 307
menu Font Transparent #true
menu Font Align Right
menu Font Name Arial
menu Font Size 10
menu Font Style b
menu Font Color WindowText
menu Font Transparent #false
menu Font Align Left
menu Text EUOLabel3 119 8 Statistics
menu Text EUOLabel10 28 60 Ore types
menu Font Color 1461
menu Text EUOLabel11 28 80 Iron
menu Font Color $0021657F
menu Text EUOLabel12 28 100 Dull Copper
menu Font Color $00011627
menu Text EUOLabel13 28 120 Shadow Iron
menu Font Color Grey
menu Text EUOLabel14 28 140 Copper
menu Font Color $00004C81
menu Text EUOLabel16 28 160 Bronze
menu Font Color $0000DCDC
menu Text EUOLabel17 28 180 Golden
menu Font Color 13
menu Text EUOLabel18 28 200 Agapite
menu Font Color 22021
menu Text EUOLabel2 28 220 Verite
menu Font Color Navy
menu Text EUOLabel4 28 240 Valorite
menu Font Color WindowText
menu Text EUOLabel19 184 60 Other Stuff
menu Font Color 9836075
menu Text EUOLabel20 184 180 Dark Sapphire
menu Font Color red
menu Text EUOLabel21 184 120 Fire Ruby
menu Font Color green
menu Text EUOLabel22 184 140 Perfect Emerald
menu Font Color $00BFAC4D
menu Text EUOLabel23 184 160 Blue Diamond
menu Font Color 39823
menu Text EUOLabel24 184 100 Ecru Citrine
menu Font Color blue
menu Text EUOLabel25 184 80 Turquoise
menu Font Color WindowText
menu Text ironcnt 115 80 %ironcnt
menu Text dullcoppercnt 115 100 %dullcoppercnt
menu Text shadowironcnt 115 120 %shadowironcnt
menu Text coppercnt 115 140 %coppercnt
menu Text bronzecnt 115 160 %bronzecnt
menu Text goldencnt 115 180 %goldencnt
menu Text agapitecnt 115 200 %agapitecnt
menu Text veritecnt 115 220 %veritecnt
menu Text valoritecnt 115 240 %valoritecnt
menu Text Turquoisecnt 293 80 %Turquoisecnt
menu Text EcruCitrinecnt 293 100 %EcruCitrinecnt
menu Text FireRubycnt 293 120 %FireRubycnt
menu Text PerfectEmeraldcnt 293 140 %PerfectEmeraldcnt
menu Text BlueDiamondcnt 293 160 %BlueDiamondcnt
menu Text DarkSapphirecnt 293 180 %DarkSapphirecnt
menu Text runtime 116 280 %runtime
menu Font Size 9
menu Text orehourlabel 44 36 Ore/Hour:
menu Font Size 10
menu Text oph 122 36 %oph
menu Font Size 9
menu Text EUOLabel1 28 264 Status
menu Text runlabel 28 280 Time Running:
menu Font Color Red
menu Text status_label 72 264 Idle
menu Font Color WindowText
menu Show
return
;=====================================================================
;========================== UPDATE ===================================
;=====================================================================
Sub Update
if #findtype in VWS
{
set %FireRubycnt %FireRubycnt + #findstack
menu set FireRubycnt %FireRubycnt
}
if #findtype in ZWS
{
set %Turquoisecnt %Turquoisecnt + #findstack
menu set Turquoisecnt %Turquoisecnt
}
if #findtype in GXS
{
set %BlueDiamondcnt %BlueDiamondcnt + #findstack
menu set BlueDiamondcnt %BlueDiamondcnt
}
if #findtype in TWS
{
set %EcruCitrinecnt %EcruCitrinecnt + #findstack
menu set EcruCitrinecnt %EcruCitrinecnt
}
if #findtype in UWS
{
set %PerfectEmeraldcnt %PerfectEmeraldcnt + #findstack
menu set PerfectEmeraldcnt %PerfectEmeraldcnt
}
if #findtype in AXS
{
set %DarkSapphirecnt %DarkSapphirecnt + #findstack
menu set DarkSapphirecnt %DarkSapphirecnt
}
if #findtype in %stats_ore
{
set %counter_ore %counter_ore + #findstack
set %opm ( ( %counter_ore * 60 ) / ( #scnt - %starttime ) )
set %oph %opm * 60
menu set oph %oph
if #findcol = 0
{
set %ironcnt %ironcnt + #findstack
menu set ironcnt %ironcnt
}
if #findcol = 2419
{
set %dullcoppercnt %dullcoppercnt + #findstack
menu set dullcoppercnt %dullcoppercnt
}
if #findcol = 2406
{
set %shadowironcnt %shadowironcnt + #findstack
menu set shadowironcnt %shadowironcnt
}
if #findcol = 2413
{
set %coppercnt %coppercnt + #findstack
menu set coppercnt %coppercnt
}
if #findcol = 2418
{
set %bronzecnt %bronzecnt + #findstack
menu set bronzecnt %bronzecnt
}
if #findcol = 2213
{
set %goldencnt %goldencnt + #findstack
menu set goldencnt %goldencnt
}
if #findcol = 2425
{
set %agapitecnt %agapitecnt + #findstack
menu set agapitecnt %agapitecnt
}
if #findcol = 2207
{
set %veritecnt %veritecnt + #findstack
menu set veritecnt %veritecnt
}
if #findcol = 2219
{
set %valoritecnt %valoritecnt + #findstack
menu set valoritecnt %valoritecnt
}
}
set %currenttime #scnt
set %time %currenttime - %starttime
set %hh %time / 3600
set %rest1 %time % 3600
set %minutes %rest1 / 60
if %minutes < 10
set %mm 0 , %minutes
else
set %mm %minutes
set %seconds %rest1 % 60
if %seconds < 10
set %ss 0 , %seconds
else
set %ss %seconds
set %runtime %hh , h , : , %mm , m , : , %ss , s
menu set runtime %runtime
set %oph ( %counter_ore * 3600 ) / %time
menu set oph %oph
menu set status_label ...
return
-
For those who play on osi, your make tools XY cordinates could differ from my runuo freeshard. As I have no account on osi, i can't test the menus out. Basically the changes should be made here
Sub Make_tools
finditem %tinker_tools C_ , #backpackid
while #findcnt <= 1
{
finditem %tinker_tools C_ , #backpackid
if #findcnt > 0
{
menu set status_label Crafting , #spc , Tinker , #spc , Tools
set #lobjectid #findid
event macro 17
gosub waitforgump 530_465
if %first_time = #true
{
gosub OffsetClick 27 113 ; < --------- Selection menu on the left, tools.
wait 10
gosub waitforgump 530_465
set %first_time #false
}
gosub OffsetClick 233 131 < ----- Selection menu on the right, next page
gosub waitforgump 530_465
gosub OffsetClick 29 415 < ----- Selection menu on the right Tinker tools.
finditem %tinker_tools C_ , #backpackid
}
else
{
menu set status_label Out , #spc , of , #spc , Tinker , #spc , Tools , #spc , Stoped.
stop
}
}
return
The same goes for shovels
Sub Make_shovel
finditem %shovel C_ , #backpackid
while #findcnt < %shovels_to_carry
{
finditem %tinker_tools C_ , #backpackid
if #findcnt > 0
{
menu set status_label Crafting , #spc , Shovel
set #lobjectid #findid
event macro 17
gosub waitforgump 530_465
if %first_time = #true
{
gosub OffsetClick 27 113 ; < ------ Selection menu on the left
wait 10
gosub waitforgump 530_465
set %first_time #false
}
gosub OffsetClick 384 273 < ---- selection menu on the right next page i guess
wait 10
gosub waitforgump 530_465
gosub OffsetClick 235 70 < ---- selection menu on the right
gosub waitforgump 530_465
gosub OffsetClick 29 415 < ---- selection menu on the right
finditem %shovel C_ , #backpackid
}
}
return
If you would provide me the cordinates I could update the script for osi players as well.
-
Here the Click you are looking for. Hope that help.
OSI make tinker tool click
Sub Make_tools
finditem %tinker_tools C_ , #backpackid
while #findcnt <= 1
{
finditem %tinker_tools C_ , #backpackid
if #findcnt > 0
{
menu set status_label Crafting , #spc , Tinker , #spc , Tools
set #lobjectid #findid
event macro 17
gosub waitforgump 530_465
if %first_time = #true
{
gosub OffsetClick 30 130 ; < --------- Selection menu on the left, tools.
wait 10
gosub waitforgump 530_497
set %first_time #false
}
gosub OffsetClick 230 130 < ----- Selection menu on the right Tinker tools. ( tinker tool)
finditem %tinker_tools C_ , #backpackid
}
else
{
menu set status_label Out , #spc , of , #spc , Tinker , #spc , Tools , #spc , Stoped.
stop
}
}
return
OSI make shovel click
Sub Make_shovel
finditem %shovel C_ , #backpackid
while #findcnt < %shovels_to_carry
{
finditem %tinker_tools C_ , #backpackid
if #findcnt > 0
{
menu set status_label Crafting , #spc , Shovel
set #lobjectid #findid
event macro 17
gosub waitforgump 530_497
if %first_time = #true
{
gosub OffsetClick 30 130 ; < ------ Selection menu on the left
wait 10
gosub waitforgump 530_497
set %first_time #false
}
gosub OffsetClick 375 270 < ---- selection menu on the right next page i guess
wait 10
gosub waitforgump 530_497
gosub OffsetClick 230 70 < ---- selection menu on the right (shovel)
finditem %shovel C_ , #backpackid
}
}
return
Make last is at 270 450
-
Glad to see you back CAMoTbik..... how is the script going ??
-
EN, I haven't scripted for a while, but now I'm back in the business. Scripting on stealth though, as it's more fun.
-
great news! :D
-
EN, I haven't scripted for a while, but now I'm back in the business. Scripting on stealth though, as it's more fun.
Welcome back! What kind of script are currently working on? I am learning how to script, I tried using stealth and then went back to easyuo.
-
EN, I haven't scripted for a while, but now I'm back in the business. Scripting on stealth though, as it's more fun.
Welcome back! What kind of script are currently working on? I am learning how to script, I tried using stealth and then went back to easyuo.
Thanks for the greets! I'm working on automated mining/lumber script for the moment, as i just returned and I need to get some of that gold to get me going.
Nice to hear that you are learning, its fun to learn new stuff. Easyuo works fine, until you have like 15 accounts that you want to do stuff, for example mine and lumber, then it starts to get messy. Still, EasyUO works great for a lot of stuff - especially for fast scripts. If you need any advice on Easyuo scripts, hit me up, i'm really interested in debbuging stuff - the most favorite section on this forums )