//***************NPC*******************

Monsters
        Saibaman
            name="Saibaman"
            icon='Saibaman.dmi'
            density=1
            New()
                src.str=rand(1,3)
                src.def=rand(1,3)
                src.eva=3
                src.wis=rand(1,3)
                src.Wander()
            proc
                Damage(mob/M)
                    do
                        if(get_dist(src,M)== 1)
                            var/random=rand(1,2)
                            if(random==1)
                                Battle(src,M,"punch","#FF00CC")
                            else
                                Battle(src,M,"kick","#00FF00")
                            sleep(20)
                    while(get_dist(src,M) == 1)
                    src.Approach(M)

//***********Seperate Proc****************

Battle(mob/M,mob/N,type,color)
        var/totalevasion=N.eva-M.eva
        if(totalevasion>0)
            var/random=rand(1,4)
            if(random==1)
                M << "<font color=[color]>[N.name] dodges your brutal assault"
                N << "<font color=[color]>You dodge [M.name]'s brutal assault"
                N.loc=locate(M.x,M.y+3,M.z)
                return
            if(random==2)
                M << "<font color=[color]>[N.name] dodges your brutal assault"
                N << "<font color=[color]>You dodge [M.name]'s brutal assault"
                N.loc=locate(M.x,M.y-3,M.z)
                return
            if(random==3)
                M << "<font color=[color]>[N.name] dodges your brutal assault"
                N << "<font color=[color]>You dodge [M.name]'s brutal assault"
                N.loc=locate(M.x+3,M.y,M.z)
                return
            else
                M << "<font color=[color]>[N.name] dodges your brutal assault"
                N << "<font color=[color]>You dodge [M.name]'s brutal assault"
                N.loc=locate(M.x-3,M.y,M.z)
                return