ChampionMacrosSH

/*	This macro file can be loaded by selecting all, copying and pasting into a championmacrossh txt folder and adding
include "championmacrossh txt" */
include "Default"
set gInStoneForm 0
set gLavaRecently 0

"/macros"
{
	message "0 or /bo - Boost Shoulders"
	message "1 or /s - Toggle Stoneform"
	message "   Shift-1 Shield & Restone"
	message "   Ctrl-1 Restone no shield"
	message "2 or /lava - Lavacloak"
	message "3 or /junk - Junk Mode"
	message "   Shift-3 Super Junk Mode"
	message "4 or /tag - Tag Mode"
	message "   Shift-4 Super Tag Mode"
	message "5 or /d - Defense Mode"
	message "6 or /dps - DPS Mode"
	message "   Shift-6 Combat Mode"
	message "7 or /ss - Start Sheildstone"
	message "8 or /sse - End Shieldstone"
	message "9 or /charge - Unequip all ites"
	message "+ - Force Unstone"
	message "- - Force Stone"
}

"/bo" call boost
"/boost" call boost
numpad-0 call boost
numpad-1 call stone
shift-numpad-1 call restone
control-numpad-1 call restonenoshield
"/s" call stone
"/stone" call stone
"/restone"call restone
numpad-2 call lava
"/lava" call lava
numpad-3 call junk
"/junk" call junk
shift-numpad-3 call superjunk
"/sjunk" call superjunk
numpad-4 call tag
shift-numpad-4 call supertag
"/tag" call tag
"/stag" call supertag
numpad-5 call defense
"/d" call defense
numpad-6 call dps
"/dps" call dps
shift-numpad-6 call combat
"/combat" call combat
numpad-7 call shieldon
"/ss" call shieldon
numpad-8 call shieldoff
"/sse" call shieldoff
numpad-9 call charge
"/charge" call charge


boost
{
	"/useitem shoulder\r"
	message "*Boosting "
	pause 62
	//really in 6 frames but who's counting
	message "*Boost ending in 1 second "
}
restone
{
		call shieldon
		"/unequip Stonegirdle\r"
		pause 3
		"/equip Stonegirdle\r"
		"/useitem Stonegirdle\r"
		call shieldoff
		pause 1
		"/unequip Shieldstone\r"
		pause 1
		"/unequip Shieldstone\r"
		pause 1
		"/equip shieldstone\r"
		setglobal gInStoneForm 1
		pause 10
		"/pose sit\r"
		call stoneWarning
}
restonenoshield
{
		"/unequip Stonegirdle\r"
		pause 6
		"/equip Stonegirdle\r"
		"/useitem Stonegirdle\r"
		setglobal gInStoneForm 1
		pause 12
		"/pose sit\r"
		call stoneWarning
}
stone
{
	if @my waist_item != "Stonegirdle"
		"/equip Stonegirdle\r"
	end if
	if gInStoneForm == 0
		"/useitem Stonegirdle\r"
		"/unequip right\r"
		setglobal gInStoneForm 1
		pause 2
		"/useitem Stonegirdle\r"
		pause 7
		"/action sparks up a fatty \r"
		pause 8
		"/pose sit\r"
		call stoneWarning
	else if gInStoneForm == 1
		setglobal gInStoneForm 0
		"/unequip Stonegirdle\r"
		"/equip Fell Blade\r"
		pause 1
		"/equip Stonegirdle\r"
	end if
}

stoneWarning
{
	pause 540 //number of seconds x 4 (roughly)
	//This number needs to be updated for your level of stone form, 540 pause is 300 ranks
	if gInStoneForm == 1
		setglobal gInStoneForm 0
		 message "*** Losing Stoneform Soon ***"
		 message "*** Losing Stoneform Soon ***"
		 message "*** Losing Stoneform Soon ***"
	end if
}

Numpad-+
{
	message "*Force unstoning"
	setglobal gInStoneForm 0
	"/unequip Stonegirdle\r"
}
 
numpad-minus
{
	message "*Force Stoning"
	if @my waist_item != "Stonegirdle"
		"/equip Stonegirdle\r"
	end if

	"/useitem Stonegirdle\r"
	"/unequip right\r"
	setglobal gInStoneForm 1
	call stoneWarning
}

lava
{
	if @my cloak_item != "Lava Cloak"
		"/equip LavaCloak\r"
	end if
	"/useitem lavacloak\r"
	if gLavaRecently == 0
		"/action burns a spliff\r"
		setglobal gLavaRecently 1
		pause 45
		call finishLava
	end if
}
finishLava
{
	if gLavaRecently == 1
		"/unequip LavaCloak\r"
		setglobal gLavaRecently 0
	end if
}
junk
{
	"/equip Tell Blade\r"
	"/equip Balthite Pauldron\r"
	"/unequip left\r"
	message "*Junk mode "
}
superjunk
{
	"/equip Labrys\r"
	"/equip Balthite Pauldron\r"
	"/unequip left\r"
	message "*Super Junk mode "
}
tag
{
	"/equip Atkite Pauldron\r"
	"/equip Balthite\r"
	message "*Tagging mode "
}
supertag
{
	"/equip Atkite Pauldron\r"
	"/equip Iron Shield\r"
	message "*Super Tagging mode "
}

defense
{
	"/equip Dethite Pauldron\r"
	"/equip Iron Shield\r"
	message "*Defense mode "
}
dps
{
	"/equip Darkite\r"
	"/equip Balthite Pauldron\r"
	message "*DPS mode "
}
combat
{
	"/equip Darkite\r"
	"/equip Atkite Pauldron\r"
	message "*Combat mode "
}

shieldoff
{
	"/useitem finger /cancel\r"
}
shieldon
{
	if @my finger_item != "Shieldstone"
		"/equip shieldstone\r"
	end if
	"/useitem finger\r"
}
//note this is a myth, unequipping ites doesn't recover spirit any faster
charge
{
	"/unequip shoulder\r"
	"/equip Iron Shield\r"
	message "*Fast recharging mode "
}