kirre's Monk Scriptz

[kirre]

Ok the first is a modifyed combat.mac Made specily for a Monk. Focused will Discipline (new combat system) is commented out and set to hot key #7. Take out the |** and **| to activate it and enter the key ya want.

The 2nd is a Skill Pumper. This skill pumper assumes you have a right click toy to deal damage to yourself. I use a "Ball of Velium" REQ level 40 and drops in velks lab (rare drop very short range). Any Right click item will work. This script will right click to said amount of HP (default 200) then bind would till said amount (default 50%). Then start again. When skill gets to said amount (default 200) it will start the SKILLZ section. This section will train FD, Intimidation, and Mend.

Don't use this right in the open, you will get noticed. Here are the to scripts.

Code: Select all

Sub Main 
:Start 
/if "$combat"=="TRUE" { 
/if $char(ability,"Flying Kick")>0 /doability "Flying Kick" 
/if $char(ability,"Disarm")>0 /doability "Disarm" 
|** /click 7 **| } 
/delay 1s 
/goto :Start 
/return 

Code: Select all

#event OutOfBandages "You can't bandage" 

 Sub Main
 	/declare HpStop global
 	/varset HpStop 200 
	/call Check

 Sub Check
 	:start
 	/if n $char(hp,cur)<@HpStop { 
 		/if n $char(skill,"Bind Wound")!=2 /call DoBindWound 
 	} else {
 		/if n $char(skill,"Bind Wound")==200 /call DoSkills 
 		/if "$target()"=="FALSE" /target myself
 		/click right
		/delay 8s
		/goto :start
		/return
 	}

 sub DoBindWound
 	:BW
 	/target myself
 	/doability "Bind Wound" 
 	/if n $char(hp,pct)<50 {
	/goto :BW 
	/echo Binding
 	} else /if n $char(hp,pct)>50 {
	/echo Starting Over
	/call Check
 	} /if n $char(hp,pct)==50 {
	/echo Starting Over
	/call Check 
}
/return

 sub DoSkills
 	:SK
 	/if $char(ability,"Feign Death")!=2 /doability "Feign Death"
 	/delay 1s
 	/stand
 	/target pc
 	/if $char(ability,"Intimidation")!=2 /doability "Intimidation"
	/delay 2s
	/click Right
 	/if $char(ability,"Mend")!=2 /doability "Mend"
	/delay 2s
 	/goto :SK

 Sub Event_OutOfBandages 
	/call DoSkills

Would like to give credit where credit is do. 1st script was practicly made by DKAA (thx). 2nd Script was made by a very tired inorpo, although broken it was the outline for the modifyed one i just posted. Thx guys. W/ that said Feel Free to comment.

chow
kirre

[Catt]

Below is what I've been using in combat, works well for me, may for you as well.

Code: Select all

| monk.mac
| By Catt
| no false starts when throwing, works 3 special attacks
| only tries to disarm if close enough
 
sub main 
/declare skill global
/varset skill 1
:start 
/if $combat==TRUE {
	/delay 1s
	/if $combat!=TRUE /goto :start
	/if n @skill==1 {
		:Eagle
		/delay 1s
		/if n $char(ability,"Eagle Strike")<0 /goto :Eagle
		/if n $char(ability,"Eagle Strike")>0 {
			/doability "Eagle Strike"
		}
	}
	/if n @skill==2 {
		:Dragon
		/delay 1s
		/if n $char(ability,"Dragon Punch")<0 /goto :Dragon
		/if n $char(ability,"Dragon Punch")>0 {
			/doability "Dragon Punch"
		}
	}
	/if n @skill>=3 {
		:Flying
		/delay 1s
		/if n $char(ability,"Flying Kick")<0 /goto :Flying
		/if n $char(ability,"Flying Kick")>0 {
			/doability "Flying Kick"
			/varset skill 0
		}
	}
	/if n $char(ability,"Disarm")>0 {
		if n $target(distance)<=10 /doability "Disarm"
	}
	/varadd skill 1
}
/delay 1s
/goto :start 
/return