[EasyUO] BlaZin' ClickR: Pet Points

If you make a Client-side script you can publish it here for other players to use
Locked
User avatar
BlaZe
Legendary Scribe
Posts: 402
Joined: Thu Dec 25, 2008 12:54 am
Location: Ann Arbor, MI; USA

[EasyUO] BlaZin' ClickR: Pet Points

Post by BlaZe »

When you get those 10 new babies from the breeder, how many people look forward to putting all those points in after leveling 'em? Not many, that's for sure.

Mass-clicking is the #1 cause of broken mouses (mice?) and with the "Mario Party"-esque style of dumping 100+ points into a pet, carpel tunnel is sure to ensue.

So I bring you the Pet Points ClickR, breeder's delight. ;)
ClickR: Pet Points GUI
ClickR: Pet Points GUI
menu.JPG (9.78 KiB) Viewed 3174 times
Just select what you want to put points in from the drop-down menu. 'Dump' will put as many possible points into the selection.


For this to work properly your pet's leveling sheet will have to be the topmost menu. In other words make sure that before you click 'Click' or 'Dump', single-click on the leveling sheet so it is in focus (and all the buttons are visible).


Revision History
v1.1: MAJOR fix on line 14 where 'or' should have been 'and' >.<

Code: Select all

; BlaZin' ClickR: Pet Points
; by BlaZe Budd of Excelsior's ßud ßrothers
; v1.1 completed 3/19/09

                ; Increase this a little only if
set %timeout 1  ; you have a TERRIBLE connection.


set #lpc 50
gosub menu
set #menuButton N/A
mainLoop:
set %clicked 0
if #menuButton <> N/A && #menuButton <> buttonStop
  {
  if #menuButton = closed
    halt
  set %button #menuButton
  set #menuButton N/A
  gosub setStat
  clickLoop:
  gosub findCont 406_535 %timeout
  if fail in #result || %times = null || #menuButton = buttonStop
    goto mainLoop
  set %X2 #contposX + %X
  set %Y2 #contPosY + %Y
  gosub click
  if done notin #result
    goto clickLoop
  }
goto mainLoop:
;;;;; ;;;;; ;;;;; ;;;;; ;;;;;
sub click
deleteJournal
gosub journalScan
if %clicked = %times || fail in #result
  {
  set %clicked 0
  return done
  }
click %X2 %Y2
set %clicked %clicked + 1
return continue
;;;;; ;;;;; ;;;;; ;;;;; ;;;;;
sub setStat
set %X 40
menu get stat
set %res #menuRes
menu getNum times null
set %times #menuRes
if %times = 0
  set %times null
if %res = 1
  set %Y 185
if %res = 2
  set %Y 210
if %res = 3
  set %Y 235
if %res = 4
  set %Y 260
if %res = 5
  set %Y 285
if %res = 6
  set %Y 310
if %res = 7
  set %Y 335
if %res = 8
  set %Y 360
if %res = 9
  set %Y 385
if %res = 10
  set %Y 410
if %res = 11
  set %Y 435
if %res = 12
  set %Y 460
if %res = 13
  set %Y 485
if %res = 14
  set %Y 510
if dump in %button
  set %times 99999
return
;;;;; ;;;;; ;;;;; ;;;;; ;;;;;
sub journalScan
for %scan 1 5
  {
  scanJournal %scan
  if cannot_gain_any_farther in #journal
    return fail
  }
return pass
;;;;; ;;;;; ;;;;; ;;;;; ;;;;;
; Find Container sub
; usage: gosub findCont %1 %2
; %1 = #contSize to look for
; %2 = timeout (in secs)
;
; returns 'pass' if found, 'fail' for a timeout
;;;;; ;;;;; ;;;;; ;;;;; ;;;;;
sub findCont
set %2 %2 * 10
set %3 #scnt2
findContLoop:
worldSave:
if world_is_saving in #sysMsg
  {
  set %3 #scnt2
  goto worldSave
  }
if #scnt2 >= %2 + %3
  return fail
if #contSize <> %1
  goto findContLoop
else
return pass
;;;;; ;;;;; ;;;;; ;;;;; ;;;;;
sub menu
	menu Clear
	menu Window Title BlaZin'
	menu Window Color Black
	menu Window Size 190 90
	menu Font Transparent #true
	menu Font Align Right
	menu Font Name Comic Sans MS
	menu Font Size 10
  menu Font Style
	menu Font Transparent #false
	menu Font Align Left
	menu Font BGColor Black
  menu Font Color Lime
	menu Text labelTimes 6 36 Times to click:
  menu Font Size 12
	menu Font Style u
	menu Font Color Green
	menu Text labelTitle 8 6 ClickR: Pet Points
	menu Font Size 10
	menu Font Style b
	menu Font Color Silver
	menu Text labelVersion 150 9 v1.0
	menu Font Size 7
	menu Font Style
	menu Font Color Lime
	menu Edit times 102 36 40 0
	menu Font BGColor Red
	menu Font Color Yellow
	menu Button buttonStop 146 36 40 22 STOP
	menu Font BGColor Green
	menu Button buttonDump 146 64 40 22 Dump
	menu Button buttonClick 102 64 40 22 Click
	menu Font Color Lime
	menu Font BGColor Black
	menu Combo Create stat 6 64 90
	menu Combo Add stat Hit Points
	menu Combo Add stat Stamina
	menu Combo Add stat Mana
	menu Combo Add stat Phys Resist
	menu Combo Add stat Fire Resist
	menu Combo Add stat Cold Resist
	menu Combo Add stat Energy Resist
	menu Combo Add stat Poison Resist
	menu Combo Add stat Min Damage
	menu Combo Add stat Max Damage
	menu Combo Add stat Armor Rating
	menu Combo Add stat Strength
	menu Combo Add stat Dexterity
	menu Combo Add stat Intelligence
  menu Combo Select stat 1
	menu Show 421 270
return
Last edited by BlaZe on Sun Mar 29, 2009 3:14 am, edited 2 times in total.
EasyUO Devotee
Download
My Popular ScripZ
Pet FightR | Doorman | TrainR: Lockpicking | HealR
User avatar
Chroma
Grandmaster Scribe
Posts: 93
Joined: Mon Dec 01, 2008 8:45 pm

Re: [EasyUO] BlaZin' ClickR: Pet Points

Post by Chroma »

:O I love it!....... Dont tell Alex, but i am secretly in love with you.
â–‘â–‘â–‘â–‘â–‘â–‘Excelsior Community Helperâ–‘â–‘â–‘â–‘â–‘â–‘
PM me in game or via MSN for Excelsior NON-GM support
User avatar
Nomadix
Master Scribe
Posts: 55
Joined: Fri Jul 31, 2009 10:13 am
Location: 127.0.0.1
Contact:

Re: [EasyUO] BlaZin' ClickR: Pet Points

Post by Nomadix »

Just used it tonight to breed up the wife's mules and OMG *drools* Saved me the pain of all those clicks! Great stuff Budd mon.
Forever Evolving, Never Changing.
Gusto Forgeman

Don't you know that the devil, he's in me
And god, she is too
My Ying hates my Yang
But whatcha gonna do?
I choose a rocky path but that's how I like it,
Life's a bowl of punch,
Go ahead and spike it!
Locked