fishing with innate camo

SmokeBlackDeath · Post by **SmokeBlackDeath** » Fri Jan 23, 2004 5:21 pm

hello

i'm currently using a wonderful script made by PhoenixZorn to fish in the planes using a fisherman's companion. I was just wondering, if anyone would be so kind as to dedicate a little time to add a small piece of code, for a character to execute Innate Camoflage ability (druid and ranger AA, /doability 80) every 2 minutes or so. i really appreciate any and all help anyone can offer, as i'm not at all familiar with coding. thank you in advance and this is the current .mac i'm using (thank you PhoenixZorn very much)

*edit* the reason i wish for this, is to fish in plane of water, where the only place for fishing is guarded by mobs that do not in fact see invis

Code: Select all


| - Fish.mac - 
| By Phoenix and pr0ps to the original coder of this simple but effective fishing script. 
#turbo 
#include routines.mac 

#event BrokenPole "You can't fish without a pole" 
#event NoBait "You can't fish without fishing bait, go buy some." 


Sub Main 
   /cleanup 
   :Fish 
      /if $invpanel==TRUE /press i 
      /call CheckPole  
      /if $return==1 /return 
      /doability Fishing 
      /delay 65  
|This script is specific to Plane of Valor/Storms.  If anyone wishes to do so, a #include could be 
|written to figure out what zone you are in, then use the appropriate set of items. 
|As it stands, I am only PoV flagged, so thus don't care about the others yet. 
      /if "$cursor(name)"=="Tattered Cloth Sandal" /destroy 
      /if "$cursor(name)"=="Rusty Dagger" /destroy 
      /if "$cursor(name)"=="Fish Scales" /destroy 
      /if "$cursor(name)"=="Fresh Fish" /destroy 
      /if "$cursor(name)"=="Crawdad" /destroy 
      /if "$cursor(name)"=="Waterleaf Scale" /destroy 
      /if "$cursor(name)"=="Vallorian Discus" /autoinventory 
      /if "$cursor(name)"=="Storm Salmon" /autoinventory 
      /if "$cursor(name)"=="Nightmare Cichlid" /autoinventory 
      /click left auto 
      /if n $char(hp,pct)<75 /call GateMe 
   /goto :Fish 
/return 

Sub CheckPole 
   /if "$equip(primary,name)"~~"Brell's Fishin' Pole" /return 0 
   /if $invpanel==FALSE /press i 
   /if "$char(state)"=="SIT" /sit off
   /delay 4 
   /click right inv slot 0 
   /delay 11s 
   /autoinventory 
   /press i 
   /sit 
    
/return 0 
    
Sub GateMe 
   /delay 6 
   /if "$char(state)"=="SIT" /sit off
   /target myself 
   /cast "Gate" 
   /endmacro 
/return 
    


|Added next line because I had an event in which the macro didn't auto recast a new pole. 
|When I stood to cast, the macro continued as normal. 
  
Sub Event_BrokenPole 
   /call CheckPole 
/return 

Sub Event_NoBait 
   /call GateMe 
/return

SmokeBlackDeath · Post by **SmokeBlackDeath** » Fri Jan 23, 2004 5:55 pm

found something...

would adding a line

Code: Select all

/alt activate 80

before the line

Code: Select all

/doability Fishing

accomplish it?

ml2517 · Post by **ml2517** » Fri Jan 23, 2004 6:28 pm

Am I correct in assuming /doability Fishing breaks invis?

If this is the case you'll have to call it right after your /doability fishing.

I'm not sure on the refresh of that AA ability but I'd do this if fishing doesn't break invis.

I'd put this right after Sub Main:

Code: Select all

/declare CamoTimer timer

And then this right after :Fish

Code: Select all

/if n @CamoTimer<=0 {
    /alt activate 80
    /varset CamoTimer 2m
}

SmokeBlackDeath · Post by **SmokeBlackDeath** » Fri Jan 23, 2004 6:35 pm

Fishing ability does not break invis, and i thank you very much ml2517 for your prompt response and your help, i greately appreciate it