cabbit hop lua

acc=0
crit=0
send_command("exec dnc.txt")
bunnymode = "blank_hop"

function get_sets()
	adhemar_body_acc={ name="Adhemar Jacket", augments={'DEX+10','AGI+10','Accuracy+15',}}
	adhemar_body_atk={ name="Adhemar Jacket", augments={'STR+10','DEX+10','Attack+15',}}
	senuna_mantle_crit={ name="Senuna's Mantle", augments={'DEX+20','Accuracy+20 Attack+20','Crit.hit rate+10',}}
	senuna_mantle_da={ name="Senuna's Mantle", augments={'DEX+20','Accuracy+20 Attack+20','"Dbl.Atk."+10',}}
	senuna_mantle_dw={ name="Senuna's Mantle", augments={'DEX+20','Accuracy+20 Attack+20','"Dual Wield"+10',}}
	senuna_mantle_ws={ name="Senuna's Mantle", augments={'DEX+20','Accuracy+20 Attack+20','DEX+10','Weapon skill damage +10%',}}
	senuna_mantle_fc_macc={}
	senuna_mantle_eva={}
	dnc_back_rf={ name="Toetapper Mantle", augments={'"Store TP"+3','"Dual Wield"+4','"Rev. Flourish"+30',}}
	dnc_back_dw={ name="Toetapper Mantle", augments={'"Store TP"+5','"Dual Wield"+5',}}
	herc_trousers_dw={ name="Herculean Trousers", augments={'Accuracy+16','"Dual Wield"+6','DEX+4','Attack+12',}}
	herc_trousers_macc={ name="Herculean Trousers", augments={'Mag. Acc.+18 "Mag.Atk.Bns."+18','Mag. Acc.+12',}}
	herc_trousers_fc={ name="Herculean Trousers", augments={'"Mag.Atk.Bns."+12','"Fast Cast"+6','STR+6',}}
	herc_trousers_tp={ name="Herculean Trousers", augments={'Accuracy+19 Attack+19','"Triple Atk."+4',}}
	herc_boots_ws={ name="Herculean Boots", augments={'Attack+23','Weapon skill damage +3%','DEX+13','Accuracy+15',}}
	herc_boots_tp={ name="Herculean Boots", augments={'Accuracy+29','"Triple Atk."+4','AGI+2','Attack+5',}}
	herc_boots_fc={ name="Herculean Boots", augments={'"Fast Cast"+6','"Mag.Atk.Bns."+2',}}
	herc_boots_macc={ name="Herculean Boots", augments={'Mag. Acc.+18 "Mag.Atk.Bns."+18','Mag. Acc.+12','"Mag.Atk.Bns."+13',}}
	herc_boots_crit={ name="Herculean Boots", augments={'Attack+27','Crit.hit rate+5','DEX+2','Accuracy+12',}}
	herc_gloves_ws={ name="Herculean Gloves", augments={'Accuracy+20','Weapon skill damage +4%','DEX+14',}}
	herc_gloves_tp={ name="Herculean Gloves", augments={'Accuracy+23','"Triple Atk."+4','Attack+6',}}
	herc_gloves_waltz={ name="Herculean Gloves", augments={'Rng.Atk.+13','"Waltz" potency +10%','INT+10',}}
	herc_gloves_crit={ name="Herculean Gloves", augments={'Attack+22','Crit.hit rate+5','DEX+7',}}
	herc_helm_fc={ name="Herculean Helm", augments={'"Fast Cast"+6','Mag. Acc.+11',}}
	herc_helm_ws={ name="Herculean Helm", augments={'Attack+22','Weapon skill damage +3%','DEX+12','Accuracy+14',}}
	herc_helm_crit={ name="Herculean Helm", augments={'Accuracy+27','Crit.hit rate+5','AGI+4',}}
	herc_helm_dw={ name="Herculean Helm", augments={'Accuracy+9 Attack+9','"Dual Wield"+5','DEX+9','Accuracy+12','Attack+3',}}
	herc_body_tp={}
	rawhide_vest_eva = {name="Rawhide Vest", augments={'HP+50','Accuracy+15','Evasion+20',}}
	rawhide_vest_tp = {name="Rawhide Vest", augments={'HP+50','"Subtle Blow"+7','"Triple Atk."+2',}}

	sets.crit = {head=herc_helm_crit, body=rawhide_vest_tp, hands=herc_gloves_crit, legs="Ta'lab Trousers", feet=herc_boots_crit, neck="Nefarious Collar +1", waist="Windbuffet Belt +1", left_ear="Cessance Earring", right_ear="Brutal Earring", left_ring="Hetairoi Ring", right_ring="Begrudging Ring", back=senuna_mantle_crit}

	if crit==1 then
		sets.tp3 =  sets.crit
	else
		sets.tp3 =  {head="dampening tam", neck="Clotharius Torque", ear1="Cessance Earring", ear2="Brutal Earring", body=rawhide_vest_tp, hands=herc_gloves_tp, ring1="Epona's Ring", ring2="Hetairoi Ring", back=senuna_mantle_da, waist="Windbuffet Belt +1", legs="Meg. Chausses +1", feet=herc_boots_tp}
	end

	sets.tp2 = set_combine(sets.tp3, {ear1="Eabani Earring", ear2="suppanomimi"})
	sets.tp1 = set_combine(sets.tp3, {ear1="Eabani Earring", body="Maculele Casaque +1", back=senuna_mantle_dw})
	sets.tp0 = set_combine(sets.tp3, {ear1="Eabani Earring", body="Maculele Casaque +1", ear2="Suppanomimi", back=senuna_mantle_dw, waist="patentia sash"})
	sets.weakness = set_combine(sets.tp0, {head=herc_helm_dw, legs=herc_trousers_dw})
	sets.accuracyfull = {head="Meghanada Visor +1", neck="ej necklace +1", ear1="dignitary's Earring", ear2="Zennaroi Earring", body="Meg. Cuirie +1", hands="meg. gloves +1", ring1="Ramuh Ring +1", ring2="Ramuh Ring +1", back=senuna_mantle_dw, waist="Olseni Belt", legs="Meg. Chausses +1", feet="meg. jam. +1"}
	sets.evasion = {head="taeon chapeau", neck="ej necklace +1", ear1="Eabani Earring", ear2="Infused Earring", body=rawhide_vest_eva, hands="rawhide gloves", ring1="Vengeful Ring", ring2="beeline ring", back="Relucent Cape", waist="Svelt. Gouriz +1", legs="Maculele Tights +1", feet="Rawhide Boots"}
	sets.healing = set_combine(sets.evasion, {head="Anwig Salade", legs="dashing subligar"})
	sets.waltz = set_combine(sets.evasion, {head="Anwig Salade", body="Maxixi Casaque +1", hands=herc_gloves_waltz, back="Toetapper Mantle", ear1="Roundel Earring", ring1="Asklepian Ring", ring2="Valseur's Ring", feet="maxixi shoes +1", legs="dashing subligar"})
	sets.idle = set_combine(sets.evasion, {ring1="Karieyh Ring", feet="Skd. Jambeaux +1", ring2="Warp Ring"})
	sets.fastcast = set_combine(sets.evasion, {body="taeon tabard", hands="leyline gloves", legs=herc_trousers_fc, feet=herc_boots_fc, neck="Orunmila's Torque", head=herc_helm_fc, ring1="Prolix Ring", ear1="Loquac. Earring", ear2="Enchntr. Earring +1", waist="moblin cest", ammo="sapience orb"})
	sets.utsu = set_combine(sets.fastcast, {neck="Magoraga Beads", back="Mujin Mantle"})
	sets.adoulin = {body="councilor's garb"}
	sets.samba = {head="Maxixi Tiara +1", back=senuna_mantle_ws}
	sets.featherstep = {feet="Maculele Toeshoes +1"}
	sets.jig = {feet="Maxixi Shoes +1", legs="Horos Tights +1"}
	sets.reverse = {hands="Maculele Bangles +1", back=dnc_back_rf}
	sets.trance ={head="Horos Tiara +1"}
	sets.violent = set_combine(sets.accuracyfull, {ammo="Pemphredo Tathlum", head="dampening tam", body="Horos Casaque +1", hands="leyline gloves", feet=herc_boots_macc, legs=herc_trousers_macc, back="Izdubar Mantle", ring1="etana ring", ring2="sangoma ring", ear1="dignitary's Earring", waist="eschan stone", neck="Sanctity Necklace", ear2="gwati earring"})
	sets.nfr = {body="Horos Casaque +1"}
	sets.reive = {neck="Ygnas's Resolve +1"}
	sets.pyrrhic = {ammo="Charis Feather", head=herc_helm_ws, neck="fotia Gorget", ear1="jupiter's pearl", ear2="dominance earring +1", body=adhemar_body_atk, hands="Adhemar Wristbands", ring1="Apate Ring", ring2="Rajas Ring", back=senuna_mantle_ws, waist="fotia Belt", legs="Adhemar Kecks", feet=herc_boots_ws}
	sets.evisceration = {ammo="Charis Feather", head=herc_helm_ws, neck="fotia Gorget", ear1="jupiter's pearl", ear2="dominance earring +1", body=adhemar_body_atk, hands="Adhemar Wristbands", ring1="Ramuh Ring +1", ring2="Ramuh Ring +1", back=senuna_mantle_crit, waist="fotia Belt", legs="lustratio subligar", feet=herc_boots_ws}
	sets.rudra = {ammo="Charis Feather", head=herc_helm_ws, neck="caro necklace", ear1="Moonshade Earring", ear2="ishvara earring", body=adhemar_body_atk, hands="meg. gloves +1", ring1="Karieyh Ring", ring2="Ramuh Ring +1", back=senuna_mantle_ws, waist="artful Belt +1", legs="Lustratio Subligar", feet=herc_boots_ws}
	sets.climactic = {head="Maculele Tiara +1", body="Meg. Cuirie +1"}
	sets.striking = {body="Maculele Casaque +1"}
end

function self_command(str)
	if string.find(str, "normalAcc") then
		acc=0
	elseif string.find(str, "fullAcc") then
		acc=1
	end
	bunnymode = str
	windower.add_to_chat(8,'bunnymode: '..bunnymode)
	windower.add_to_chat(8,'fullacc: '..acc)
end

function tpset(spell, action, spellMap, eventArgs)


	if acc==1 then
		equip(sets.accuracyfull)
		return
	elseif buffactive['Weakness'] and player.equipment.sub ~= "Airy Buckler" then
		equip(sets.weakness)
		return
	elseif oldammo == "Amar Cluster"  then
		equip(sets.evasion)
		return
	elseif player.equipment.sub == "Airy Buckler" then
		equip(sets.tp3)
		return
	end

	local myHaste = 0
	local rdmHaste = 0
	for i=1,party.count do
		if party[i].name == "Koru-Moru" then
			rdmHaste = 1
		end
	end

	if buffactive['Mighty Guard'] then
		myHaste = myHaste +1
	end

	if buffactive[33] then
		if rdmHaste == 1 then
			myHaste = myHaste +2
		else
			myHaste = myHaste +1
		end
	end

	if buffactive[580] then
		myHaste = myHaste +2
	end

	if buffactive.march then
		myHaste = myHaste + buffactive.march
	end

	if myHaste >= 3 then
		equip(sets.tp3)
	elseif myHaste == 2 then
		equip(sets.tp2)
	elseif myHaste == 1 then
		equip(sets.tp1)
	elseif myHaste == 0 then
		equip(sets.tp0)
	end
end

function precast(spell, action, spellMap, eventArgs)
	if player.equipment.ammo ~= "Sapience Orb" and player.equipment.ammo ~= "Charis Feather" and player.equipment.ammo ~= "Pemphredo Tathlum" then
		oldammo = player.equipment.ammo
	end

	if spell.type=="Waltz" then
		if spell.english=="Healing Waltz" and player.tp >= 200 then
			equip(sets.healing)
		else
			equip(sets.waltz)
		end
	elseif spell.type=="Step" and player.tp >= 100 then
		if spell.english=="Feather Step" then
			equip(set_combine(sets.accuracyfull, sets.featherstep))
		else
			equip(sets.accuracyfull)
		end
	elseif spell.type=="Trust" then
		equip(sets.fastcast)
	elseif spell.type == "Samba" and player.tp >= 350 then
		equip(sets.samba)
	elseif spell.english=="Reverse Flourish" then
		equip(sets.reverse)
	elseif spell.english=="Violent Flourish" then
		equip(sets.violent)
	elseif spell.type == "WeaponSkill" and player.tp >= 1000 then
		local wsset = {}
		if acc==1 then
			if buffactive['Climactic Flourish'] then
				send_command('input /echo climactic success')
				equip(set_combine(sets.accuracyfull, sets.climactic))
			else
				equip(sets.accuracyfull)
				return
			end
		end
		if spell.english=="Rudra's Storm" or spell.english=="Shark Bite" then
			wsset = sets.rudra
			if player.tp == 3000 then
				wsset = set_combine(sets.wsset, {ear1="dominance earring +1"})
			end
		elseif spell.english=="Pyrrhic Kleos" then
			wsset = sets.pyrrhic
		else
			wsset = sets.evisceration
		end

		if buffactive['Reive Mark'] then
			wsset = set_combine(wsset, sets.reive)
		end
		if buffactive['Climactic Flourish'] then
			send_command('input /echo climactic success')
			wsset = set_combine(wsset, sets.climactic)
		end
		if buffactive['Striking Flourish'] then
			send_command('input /echo striking success')
			wsset = set_combine(wsset, sets.striking)
		end

		equip(wsset)
	elseif spell.type=="Jig" then
		equip(sets.jig)
	elseif spell.english=="Trance" then
		equip(sets.trance)
	elseif spell.english=="No Foot Rise" then
		equip(sets.nfr)
	elseif spell.type=="Ninjutsu" then
		equip(sets.utsu)
	end
end

function idle()
	if world.area:contains("Adoulin") then
		equip(set_combine(sets.idle, sets.adoulin))
	elseif buffactive['Reive Mark'] then
		equip(set_combine(sets.idle, sets.reive))
	else
		equip(sets.idle)
	end
end

function midcast(spell)
	if spell.english=="Apururu (UC)" then
		equip({body="Apururu Unity Shirt"})
	end
end

function aftercast(spell)
	if crit==1 then
		equip({ammo="charis feather"})
	else
		equip({ammo=oldammo})
	end
    if player.status == "Idle" then
		idle()
    else
		tpset(spell, action, spellMap, eventArgs)
	end
end

function status_change(new,old)
	if old == "Idle" and new == "Engaged" then
		tpset()
	elseif new == "Idle" then
		idle()
	end
end