shaman plvl bot needing help still

Help section from before the user variable changes that broke all macros

Moderator: MacroQuest Developers

Flint_the_dorf
orc pawn
orc pawn
Posts: 13
Joined: Sat Oct 12, 2002 3:14 pm
Location: Atlanta, GA
Contact:

shaman plvl bot needing help still

Post by Flint_the_dorf » Fri Nov 01, 2002 1:16 am

For some reason all this does is /target the controller and stand there I can't figure out why it won't recognize the commands and it'ss starting to annoy me. If anyone could provide some help I would much appreciate it!
:lol:

Code: Select all

|druidmac modified for shammy
#include SpellSub.mac 
#include Spellbook.mac 
#chat tell 
#event RegenOff "You have stopped regenerating." 


Sub Main 
    /varset v30 $p0 
    /varset v34 $p1 
    /tell $v30 Ready 

  :a
   /doevents 
  /goto :a
/return 

Sub Event_Chat 
   /stand 
   /varset v33 $p1 
| Check if Tell is from the Controller, if not inform Controller 
   /if "$v33"!="$v30" { 
      /mqlog Tell from $p1 : $p2 
      /tell $p1 Sorry i'm really busy at the moment and not avaible for tells 
      /delay 2 
      /tell $v30 Tell from $p1 to $char(name) , i told him that i'm busy 
      /sit 
      /return 
   } 
   /target $v33
   /if "$p2"~~"00slow" /call Slowsub
   /if "$p2"~~"00heal" /call HealSub 
   /if "$p2"~~"00stamina" /call  StaminaSub 
   /if "$p2"~~"00talisman" /call TalismanSub 
   /if "$p2"~~"00Regen" /call RegenSub 
   /if "$p2"~~"00sow" /call SoWSub 
   /if "$p2"~~"00root" /call RootSub 
   /if "$p2"~~"00come" /call GoTarget 
   /if "$p2"~~"00self" /call SelfBuff 
   /if "$p2"~~"00home" /call GoHome 
   /if "$p2"~~"00sheal" /call SelfHeal 
   /if "$p2"~~"00sregen" /call Sregen
   /if "$p2"~~"00stand" /call Stand
   /if "$p2"~~"00sit" /call Sit
   /if "$p2"~~"00status" /call Status
   /if "$p2"~~"00help" /call Help 
    /doevents 
/return 

sub Slowsub
   /assist $v33
   /tell $v33 slowing %t
   /cast "spirit of wolf
   /delay 5s
   /target myself
   /delay 0s
   /tell $v33 Slowed %t i hope, Mana: $char(mana,pct), HP: $char(hp,pct)

/return

sub HealSub 
    /tell $v33 INC Heal for %T 
    /cast "greater healing"
    /delay 6s
    /target myself
    /delay 0s
   /tell $v33 Healing done, Mana: $char(mana,pct), HP: $char( 

hp,pct) 
/return    

sub StaminaSub 
    /tell $v33 INC stamina for %T 
    /cast "stamina"
    /delay 5s
    /target myself
    /delay 0s
    /tell $v33 sta Buff done, Mana: $char(mana,pct), HP: $char( 

hp,pct) 
/return 

sub TalismanSub 
    /tell $v33 INC Talisman for %T 
    /cast "talisman of altuna"
    /delay 8s
    /target myself
    /delay 0s
    /tell $v33 Talisman Buff done, Mana: $char(mana,pct), HP: $char( 

hp,pct) 
/return 
    
sub RegenSub 
    /tell $v33 INC Regeneration for %T 
    /cast "chloroplast"
    /delay 8s
    /target myself
    /delay 0s
    /tell $v33 Regeneration Buff done, Mana: $char(mana,pct), HP: 

$char(hp,pct) 
/return 
    
sub SoWSub 
    /tell $v33 INC SoW for %T 
    /cast "spirit of wolf"
    /target myself 
    /delay 0s
   /tell $v33 SoW Buff done, Mana: $char(mana,pct), HP: $char( 

hp,pct) 
/return 
    

sub RootSub 
    /assist $v33 
    /delay 6 
    /tell $v33 Rooting %T 
    /cast "instill"
    /delay 4s   
    /target myself
    /delay 0s
    /tell $v33 %T is rooted, Mana: $char(mana,pct), HP: $char( 

hp,pct) 
    /target $v33 
/return 

sub SelfBuff 
    /press F1 
    /tell $v33 Casting SoW now on myself 
    /cast "spirit of wolf"
    /delay 5s
    /tell $v33 Casting Talisman now on myself 
    /cast "talisman of altuna"
    /delay 8s
    /tell $v33 Casting Stamina now on myself
    /cast "stamina"
    /delay 4s 
    /target myself 
    /delay 0s
    /tell $v33 Selfbuffs done, Mana: $char(mana,pct), HP: $char( 

hp,pct) 
    /target $v33 
/return 

sub GoHome 
   /stand 
   /sit 
   /tell $v33 Camping... 
   /camp desktop 
   /unload 
/return 


sub GoTarget 
   /stand 
   /target $v33 
   /face 
   /varset v90 $target(id) 
   /varset t0 5m 
   /tell $v33 I'm coming 
   :CloserAF 
      /doevents 
      /if "$target(id)"!="$v90" /goto :EndAF 
      /if n $target(distance)>5 /call AutoRun 1 
      /if n $target(distance)<10 /goto :EndAf 
      /face 
      /doevents 
      /if n $t0==0 /press esc 
   /goto :CloserAF 

   :EndAF 
   /call AutoRun 0 
   /tell $v33 stopped 
   /doevents 
/return 

sub AutoRun 
   /if $p0==$v80 /return 
   /varset v80 $p0 
   /if $p0==1 /sendkey down up 
   /if $p0==0 /sendkey up up 
/return 


sub SelfHeal 
   /press F1 
   /tell $v33 INC Heal for %T 
   /cast "greater healing"
   /delay 5s
   /target myself
   /delay 0s
   /tell $v33 Healing done, Mana: $char(mana,pct) HP: $char( 

hp,pct) 
   /target $v33 
/return 


sub Nuke 
    /assist $v33 
    /delay 6 
    /tell $v33 Nuking %T 
    /press 3
    /delay 12s
    /target myself
    /delay 0s
    /tell $v33 Nuke on %T done, Mana: $char(mana,pct), HP: $char 

(hp,pct) 
    /target $v33 
/return 

sub Sregen
  /target myself
  /tell $v33 Regening self
  /cast "chloroplast"
  /delay 8s
  /target myself
  /delay 0s
  /tell $v33 regen done Mana: $char(mana,pct), HP: $char(hp,pct)
  /target $v33
/return

sub Stand
  /tell $v33 Standing, master 
   /delay 1s
   /stand
/return

sub Sit
 /tell $v33 Sitting, master
  /delay 1s
  /sit
/return

sub Status
  /target myself
  /delay 0s
  /tell $v33 HP: $char(hp,pct) Mana: $char(mana,pct)
/return
 
sub Event_RegenOff 
   /tell $v33 HP Regeneration Buff needs to be recasted. 
/return 


sub Help 
    /tell $v33 heal, talisman, regen, sow, root, come, self, home, sheal, status 
    /tell $v33 nuke, slow that is all!
/return 


Flint

Lurker_005
a lesser mummy
a lesser mummy
Posts: 51
Joined: Thu Oct 17, 2002 12:08 pm

Post by Lurker_005 » Fri Nov 01, 2002 11:49 am

I noticed your matching for commands that have 00 in front of them. Are you sending tells with 00? 00slow 00heal ect..

If that isn't it, try putting an /echo $p2 before your /doevents

Code: Select all

    /if "$p2"~~"00help" /call Help
    /echo $p2
    /doevents
and see what it echos, or if it makes it that far.

Also noticed you cast Sow in your Slowsub!