Monster

-- A basic monster script skeleton you can copy and modify for your own creations.
commands = {"Checar", "Hablar", "Info"}

sprite = "blank" --Always PNG. Extension is added automatically.
name = "Chara"
hp = 9000
atk = 1
def = -150
check = "Check message goes here."
dialogbubble = "rightwide" -- See documentation for what bubbles you have available.
canspare = false
cancheck = false
talk = 0
hablar = 0
golpes = 0
ins = 0

SetGlobal('fightcounter', 0)

-- Happens after the slash animation but before
function HandleAttack(attackstatus)
    if attackstatus == -1 then
        -- player pressed fight but didn't press Z afterwards
    else
        -- player did actually attack
		SetGlobal('fightcounter', GetGlobal('fightcounter') + 1)
		SetSprite("hurtchara")
		talk = talk + 1
		golpes = golpes + 1
		if talk == 1 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,noanim]Asi que prefieres\nir de esta manera?","[voice:v_sschara]Entonces,[w:5]\npresencia mi ATAQUE\nESPECIAL!"}
		     Audio.Stop("knifetrousle")
		elseif talk == 2 then
		     currentdialogue = {"[noskip][voice:v_sschara][func:SetSprite,noanim]Veo que has resistido\nmi [w:10]uhh... [w:10]ATAQUE\nMAS DEBIL!!","[noskip][voice:v_sschara]JAJAJAJ![w:5]\nPENSABAS QUE ESE\nERA MI ATAQUE\nMAS FUERTE!?","[voice:v_sschara][noskip]PUES NO! [w:10]QUE\nEMPIEZE LA\nBATALLA![w:7][func:StartSong][func:SetSprite,blank][next]"}
		elseif talk == 3 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Sabes, humano? Estoy\nentrenando para\nentrar en la\nGuardia Real!","[voice:v_sschara][func:SetSprite,blank][noskip]Crees que algun\ndia lograre\nentrar?[w:3][next]","[voice:v_sschara]NO!! [w:5]No hace falta\nque des TU opinion!"}
		elseif talk == 4 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Y hablando del rey\nde roma...","[voice:v_sschara][func:SetSprite,blank]Mas vale que te\nrindas, porque si\nno...","[voice:v_sschara]Me vere obligado a\nusar mi [color:ff0000]ATAQUE\n[color:ff0000]ESPECIAL!"}
		elseif talk == 5 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Como oyes, mi ataque\nespecial!","[voice:v_sschara]Y no tendré piedad en\nusarlo!","[voice:v_sschara]JAJAJAJA!!"}
	    elseif talk == 6 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Asi que humano,[w:10]\nmas vale que te\nprepares para mi\n[color:ff0000]ATAQUE ESPECIAL!"}
		elseif talk == 7 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Ahora mismo es un\nbuen momento para\n[color:ffff00]RENDIRTE!"}
	    elseif talk == 8 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Este es tu ultimo\naviso, [w:5]humano.","[voice:v_sschara]Si prefieres resistir\nel proximo ataque...","[voice:v_sschara]Entonces tendras que\nsobrevivir mi [color:ff0000]ATAQUE\nESPECIAL!"}
	    elseif talk == 9 then
		     currentdialogue = {"[voice:v_sschara][func:SetSprite,blank]Bien, [w:5]humano... [w:5]Yo\nte adverti...","[voice:v_sschara][noskip]Ahora... [w:5]presencia mi\n[color:ff0000]ATAQUE ESPECIAL![w:7][func:StopMusic][func:SetSprite,doggy][func:Doggy]"}
        elseif talk == 10 then
		     currentdialogue = {"[func:SetSprite,blank][voice:v_sschara][func:StartSong]Como has sobrevivido\nmi ataque especial!?","[voice:v_sschara]En fin, [w:5]creo que\nambos nos estamos\ncansando de pelear...","[noskip][voice:v_sschara]Asi que, [w:5][func:StopMusic]te\notorgo [color:ffff00]CLEMENCIA!"}
			 comments = {"Chara te esta perdonando."}
			 canspare = true
		end
    end
end

-- This handles the commands; all-caps versions of the commands list you have above.
function HandleCustomCommand(command)
    if command == "CHECAR" then
        BattleDialog({"CHARA [w:10]15 ATK [w:10]15 DEF [w:10]\nEl rey de los cuchillos!","En verdad no te quiere matar,[w:10]\rpero ten cuidado con esos\rcuchillos!"})
    elseif command == "HABLAR" then
        hablar = hablar + 1
		if hablar == 1 then
		   BattleDialog({"Hablas con Chara.","Nada paso."})
		elseif hablar == 2 then
		   BattleDialog({"Vuelves a hablar.","Se te ocurre algo..."})
		elseif hablar == 3 then
		   BattleDialog({"Hablas... [w:10]otra vez.","Parece que hablar no servira de \rnada."})
	    end
	elseif command == "INFO" then
       BattleDialog({"La batalla esta en desarrollo.","El creador es: xZetillaX", "Comenta tu opinion en mi post\rde Reddit."})
	end
end

function StartSong()
    Audio.LoadFile("knifetrousle")
	Audio.Play("knifetrousle")
end

function AttReset()
    attacknum = 1
end

function Doggy()
    Audio.LoadFile("doggy")
    Audio.Play("doggy")
end

function StopMusic()
    Audio.Stop()
end