farmpad.mac - farm quality pelts and spiderling silk

Macro depository for macros written before the user variable changes that broke all of them.

Moderator: MacroQuest Developers

Consilium
Contributing Member
Contributing Member
Posts: 100
Joined: Wed Oct 02, 2002 10:42 pm

ok now it works

Post by Consilium » Fri Oct 04, 2002 5:02 am

Aye...ok

I turned fast destroy on and it now works flawlessly.
I do see the reference to the exact xy coordinate at the end of the macro but I am not sure what resolution that is for... it doesnt seem to work for my res of 800x600.

I am currently working on changing this code to better suit my palli.... ---

-incorporate helm heals if health is low (helm.mac)
-turn and fight attacking party if within range (not sure how to do this)
-time personal buffs and recast when needed (something like buff.mac)

I will post my first try in a bit.
-SH
+Student
digitalsavior.com

Draekz
a hill giant
a hill giant
Posts: 263
Joined: Thu Aug 01, 2002 6:07 pm
Location: Winnipeg, Manitoba, Canada

Post by Draekz » Fri Oct 04, 2002 8:41 am

I was just wondering, instead of running away from a mob when a PC is near, how about having the script check the mobs health?

That way you can tell if its been engaged...if the mob is less then 9o percent health, then goto another target...generally if someones fighting the mob, by the time u reach it im sure its been hit to at least that low...or you can just add it as a secondary precautionary measure.

I figure this way if the zone is full of players, you wont just run away because someones nearby, but will target mobs health first before deciding that its engaged.

Not sure how you'd write them both together, but it must be similar to the way that clericbots find player health...sooo it'd be something like

Code: Select all


/varset v60 $target(hp,pct)

/if $v61<=89
  /call FindTarget
or something along those lines..i dont know what you'd put exactly but its an idea!

Draekz

nikeman
a lesser mummy
a lesser mummy
Posts: 70
Joined: Tue Jun 18, 2002 10:37 am

Post by nikeman » Sat Oct 05, 2002 6:50 am

/alert add 1 radius 500 "Hill Giant"
/target noalert 1

doesnt work for me i tryed this in wc with a barb vendor named maula fishcatcher ( now am not even sure why i run up to here and attack her its not like i have fish or catcher or maula barb or merchent as an alart) but i keep runing up to here and attacking here so i tryed ur hill gaint trick and it still makes me run up and attack her =/ any thing you all could sugest besides figer it out on my own :P


EDIT!
/bonk
ok am a idiot /alert add 1 npc cat so it was the CATcher part that it was snaging on if anyone eals has this problem just change cat to plains =)

nikeman
a lesser mummy
a lesser mummy
Posts: 70
Joined: Tue Jun 18, 2002 10:37 am

Post by nikeman » Sat Oct 05, 2002 8:04 am

here i changed it a bit this is for a high lvl warrior or melee who might be kos to the guards if u run past and thay are following you it will turn kill them thay have to be VARY VARY close befor it decides to atempt to kill them in the first place also kills hill gaints if any around around loots only HQ pelts also kills the pesty skellys and zombies that might attack u while ur runing around this is set for wc =)


Code: Select all



| farmpad.mac 
| farm quality pelts and spiderling silk in EC 
| for making into leather padding 
#include routines.mac 
sub Main 
   /lootn never 
   /alert clear 1
   /alert add 1 npc bear
   /alert add 1 npc kodiak 
   /alert add 1 npc spider
   /alert add 1 npc puma 
   /alert add 1 npc lion 
   /alert add 1 npc wolf 
   /alert add 1 npc orc
   /alert add 1 npc Gaint 100000
   /alert add 1 npc plains
   /alert add 1 radius 12  "a skeleton"
   /alert add 1 radius 12 "zombie"
   /alert add 1 radius 12 lesser
   /alert add 1 radius 12 guard
   /press esc 

   :Start
      /if n $char(ability,"sense heading")>0 /doability sense 
      /call findTarget 
      /varset v11 $target(id) 
      /call killTarget 
      /if n $target(id)==$char(id) /goto :Stop 
      /target corpse 
      /if n $target(id)==$v11 /call lootTarget 
   /goto :Start 

   :Stop 
   /attack off 
   /call autorun 0 
   /lootn always 
/return 

Sub findTarget 
   /target alert 1 nopcnear 60 
   /delay 2 
/return 

Sub killTarget 
   /varset v60 $target(id) 
   /if $v60==0 /return 
   /varset t0 2m 
   /varset v12 1 
   /varset v80 0 
   /face nopredict 

   :Follow 
      /if n $target(id)==$char(id) /return 
      /if "$target(id)"!="$v60" /goto :KillDone 
      /if "$target(name)"~~"corpse" /goto :KillDone 
      /face nopredict 
      /if n $target(distance)>12 /call autorun 1 
      /if n $target(distance)<15 { 
         /call autorun 0 
         /if $v12==1 { 
            /if n $target(id)==$char(id) /return 
            /call findTarget            |anti-ks code 

            /if "$target(id)"!="$v60" /goto :KillDone 
            /attack on
            /if n $char(ability,"Kick")>0 /doability kick 
            /varset v12 0 
         } 
      } 
      /if n $t0==0 /press esc 
      /varset v51 $char(x) 
      /varset v52 $char(y) 
      |/delay 1 
      /if n $v51==$char(x) /if $v52==$char(y) /call tree $v12 
   /goto :Follow 
    
   :KillDone 
   /sendkey up up 
   /attack off 
   /delay 3 
/return 

Sub Tree 
   /delay 3 
   /if $p0==0 /return 
   /sendkey up up 
   /sendkey down down 
   /delay 2 
   /sendkey up down 
   /sendkey down ctrl 
   /if n $rand(99)>50 { 
      /sendkey down right 
   } else { 
      /sendkey down left 
   } 
   /delay 3 
   /sendkey up right 
   /sendkey up left 
   /sendkey up ctrl 
   /varset v80 0 
/return 

Sub lootTarget 
   /delay 2 
   :gotocorpse 
   /if n $target(distance)>10 { 
      /face 
      /sendkey down up 
      /goto :gotocorpse 
   } 
   /sendkey up up 

   /face 
   /loot 
   /delay 10 
    
   /varset v10 0 
   :LootLoop 
      /click left corpse $v10 
      /delay 5 
      /if "$cursor(name)"=="NULL" /goto :LootDone 
      /if "$cursor(name)"~~"silk" { 
         /click left auto 
      } else /if "$cursor(name)"~~"High" { 
         /click left auto 
      } else { 
         /click left destroy 
         /delay 1 
         /click left 458 420 
         /delay 1 
      } 
      /varadd v10 1 
   /goto :LootLoop 
    
   :LootDone 
   /delay 3 
   /press esc 
   /delay 2 
/return

Zorg
a lesser mummy
a lesser mummy
Posts: 44
Joined: Fri Oct 18, 2002 7:01 pm

Post by Zorg » Sat Oct 19, 2002 2:37 am

Everything seems to be working fine in this script with the latest release EXCEPT that I've seen myself occasionally destroy a non-ruined pelt. I'm not sure why, the code governing item destroy seems very clear. If it doesn't include 'quality' in the name it's gone. However, I've seen myself junk low quality pelts

nikeman
a lesser mummy
a lesser mummy
Posts: 70
Joined: Tue Jun 18, 2002 10:37 am

Post by nikeman » Sat Oct 19, 2002 8:42 am

thats becouse i changed it for farming hq pelts only but u can go back and put that in quilty if ya like

macrolover
a ghoul
a ghoul
Posts: 107
Joined: Sun Jul 14, 2002 9:19 am

question

Post by macrolover » Tue Oct 22, 2002 5:33 am

how would one edit this script to not target mobs within a certain radius of other mobs?

User avatar
Fippy
a snow griffon
a snow griffon
Posts: 499
Joined: Tue Jul 16, 2002 10:42 am

Post by Fippy » Tue Oct 22, 2002 5:36 am

Code: Select all

/alert add 1 Lion
/alert add 2 radius 500 giant

/target alert 1 notnearalert 2

where alert 1 is the lit of mobs to target and alert 2 are the mobs to avoid.


or look at hunter.mac

Fippy

Daghita
decaying skeleton
decaying skeleton
Posts: 6
Joined: Fri Nov 08, 2002 5:21 pm

Post by Daghita » Sun Nov 10, 2002 12:35 pm

Using the NewUI, my guy goes around kickin' the crap out of everything, but NEVER loots a darned thing. Although he doesn't get stuck on corpses. During the process I keep seeing it refer to a /click event for either left or right and needing the location, not sure if that has anything to do with it.

I can only assume that it has something to do with the LootLoop. Maybe coordinates? Maybe delay? I'm also playing at 1024x768...
-Daghita

Macromancer
orc pawn
orc pawn
Posts: 11
Joined: Thu Oct 31, 2002 8:34 pm

The problem..

Post by Macromancer » Sun Nov 10, 2002 12:59 pm

Is that the NewUI doesn't support /click.. At all. Sorry

Zynid
decaying skeleton
decaying skeleton
Posts: 5
Joined: Wed Nov 13, 2002 10:01 am

Post by Zynid » Sat Nov 16, 2002 10:52 am

Fippy wrote:

Code: Select all

/alert add 1 Lion
/alert add 2 radius 500 giant

/target alert 1 notnearalert 2

where alert 1 is the lit of mobs to target and alert 2 are the mobs to avoid.


or look at hunter.mac

Fippy
I am trying to hunt spiders that drop spider silk and not spiderling silk. I added the line

Code: Select all

/alert add 2 spiderling
to my alert list. Then changed

Code: Select all

  /target alert 1 nopcnear 60
to

Code: Select all

/target alert 1 nopcnear 60 noalert 2
and the macro just began attacking whatever npc was closest to me. Spiders, lions, vendors, whatever was closest.

User avatar
Fippy
a snow griffon
a snow griffon
Posts: 499
Joined: Tue Jul 16, 2002 10:42 am

Post by Fippy » Sat Nov 16, 2002 11:16 am

looks like it may be a bug. It appears the noalert 2 is overriding alert 1 ni the /target.

Maybe you could just have a check after you target and if it is a spiderling then retarget.
Fippy

This is my girl. But Rizwank had her first :-)
[img]http://www.btinternet.com/~artanor/images/fairy_bounce09.gif[/img]

Zynid
decaying skeleton
decaying skeleton
Posts: 5
Joined: Wed Nov 13, 2002 10:01 am

Post by Zynid » Sat Nov 16, 2002 3:45 pm

Fippy wrote:Maybe you could just have a check after you target and if it is a spiderling then retarget.
Fippy -

I do not do macros, I can do some minor editting, but I am lost anywhere else. Could you tell me how to put in a check like that?