Twitch.mac help needed pls+

Need some help with that macro you're working on or aren't quite sure how to get your macro to do something? Ask here!

Moderator: MacroQuest Developers

tehnec
orc pawn
orc pawn
Posts: 10
Joined: Tue Mar 02, 2004 9:35 pm

Twitch.mac help needed pls+

Post by tehnec » Sat Mar 06, 2004 1:35 am

ok.. im trying to clash together 3 macros so that i am able to use the necro bot.... when he recieves a tell he will start feeding... when he recieves another he will stop. Also when he gets to a certain manna percentage he will sit down and when he gets to another he will stand up. I have been working with these macros for a few hours and cant seem to get it to work. here are the macro i ended up with but it doesnt seem to work... any help is appreciate... and a thanks to the orginal writer of the macro
i tried this

Code: Select all

| Feedme.mac 
| /macro twitch.mac 
| Thank you to the people who wrote these macros some have parts of more then one in them

#turbo

#include spellcast

#chat tell 

#define MANA_SIT 30

#define MANA_CAST 90

Sub Main 
/echo Feedme.mac has started 
/echo A tell "feed me" starts feeding, a tell"FM" ends feeding 

:MainLoop 
   /doevents 
  /goto :MainLoop 
/return 

Sub Event_Chat(ChatType,Sender,ChatText) 
  /if "@ChatText"~~"feed me" { 
  /pause 2s 
  /target "@Sender" 
  /sit off 
/delay 1s 
:CastLoop 
/call Cast "sedulous subversion" 
/delay 13s 
/call Cast "Covetous Subversion" 
/delay 13s

/if (n $char(mana,pct)<MANA_SIT && $char(state)=="STAND" && $char(casting)=="FALSE") /sit 

/if ($char(state)=="SIT" && n $char(mana,pct)<MANA_CAST) /goto :MainLoop

/goto :CastLoop 
} 

/if "@ChatText"~~"FM" { 
/goto :MainLoop } 

/if ($char(state)=="SIT" && n $char(mana,pct)<MANA_CAST) /goto :MainLoop

/return 
that is one... here is another

Code: Select all

| Call this macro after defining targetted skill levels and appropriate spells 
| 
| Will iterate through all skills and raise them to requested levels in order 
| The macro will auto end if the character moves. 
| 
| IMPORTANT NOTE: If you're casting a summoning spell and an item with "Summoned:" 
|                 exists on your cursor it will be DESTROYED. 



#define MANA_SIT 30         |% mana to sit and regain mana 
#define MANA_CAST 90         |% mana to stand and resume casting 

sub Main 

  /declare loc_x global         |x loc 
  /declare loc_y global         |y loc 

  |record loc of character 
  /varset loc_x $char(x) 
  /varset loc_y $char(y) 

  /Call "Sedulous Subversion"
  /Call "Covetous Subversion"
  
|=================================================================================== 
sub RaiseSkill(skill,level,spell) 

  |general notification 
  /echo - Raising @skill to @level with '@spell' 
  /echo Macro will AUTO STOP if movement is detected. 

  |return if spell not in book 
  /if $char(book,"@spell")==NULL { 
    /echo Spell '@spell' not in spellbook. 
    /return 
  } 

  :loop 
  |insert short semi-random delay 
  /delay $calc(5+$rand(5)) 

  |exit if character movement detected 
  /if (n @loc_x!=$char(x) || n @loc_y!=$char(y)) { 
    /echo Movement detected!  Ending macro. 
    /endmacro 
  } 

  |if casting a summoning spell and a summoned item on cursor, destroy it 
  /if ("@spell"~~"Summon" && "$cursor(name)"~~"Summoned:") /destroy 

  |return if this skill at desired level 
  /if n $char(skill,"@skill")>=@level { 
    /echo @skill at $char(skill,"@skill") 
    /return 
  } 

  |insure spell memorized 
  /if n $char(gem,"@spell")==0 { 
    /memspell 8 "@spell" 
    /delay 10s 
  } 

  |sit if not casting/medding and mana dropped to MANA_SIT value 
  /if (n $char(mana,pct)<MANA_SIT && $char(state)=="STAND" && $char(casting)=="FALSE") /sit 

  |if medding and mana not yet up to MANA_CAST, continue to med 
  /if ($char(state)=="SIT" && n $char(mana,pct)<MANA_CAST) /goto :loop 

  |cast if the spell has refreshed 
  /if n $char(gem,"@spell")>0 { 
    /if $char(state)=="SIT" /stand 
    /if n $target(id)!=$char(id) /target "@Sender" 
    /cast "@spell" 
  } 

  |loop 
  /goto :loop 
  /return 
I did not try to edit the guys writing. i just added the spells and thought that might work... appreciate any help that can be shed on this subject.

tehnec

tehnec
orc pawn
orc pawn
Posts: 10
Joined: Tue Mar 02, 2004 9:35 pm

Post by tehnec » Mon Mar 08, 2004 5:41 pm

Any suggestions at all?