Pink Mouse Head :3

@name Animal Head BY PCL
@inputs
@outputs
@persist [MainColor OEarColor IEarColor NoseColor EyeColor]:vector EarAngle:number
@trigger

E=owner()

if(first()|clk("redraw"))
{

MainColor = vec(585,0,75)   #color of head
OEarColor = vec(181,0,71)     #color of outer ear
IEarColor = vec(200,255,255)  #color of inner ear
NoseColor = vec(0,0,0)        #eye color
EyeColor = vec(0,0,0)         #nose color
EarAngle = 20                 #angle to be added/subtracted to get the ears angle
                                                                                                                                                                                                                                                                                                                                                                                       print(_HUD_PRINTCENTER,"This E2 was made by PCLally")
runOnChat(1)

holoCreate(1)
holoModel(1,"hq_icosphere")
holoAng(1,E:attachmentAng("anim_attachment_head"))
holoPos(1,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(1,E,"anim_attachment_head")
holoScale(1,vec(2.4,2.2,2.2))
holoColor(1,MainColor)
holoAlpha(1,255)
holoPos(1,holoEntity(1):toWorld(vec(0,5,0)))
holoAng(1,holoEntity(1):toWorld(ang(0,0,100)))

#left eye
holoCreate(2)
holoModel(2,"hqcylinder")
holoAng(2,E:attachmentAng("anim_attachment_head"))
holoPos(2,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(2,E,"anim_attachment_head")
holoScale(2,vec(0.3,0.3,0.2))
holoColor(2,EyeColor)
holoAlpha(2,255)
holoPos(2,holoEntity(1):toWorld(vec(3,-11.8,-3)))
holoAng(2,holoEntity(1):toWorld(ang(90,90,0)))

#right eye
holoCreate(3)
holoModel(3,"hqcylinder")
holoAng(3,E:attachmentAng("anim_attachment_head"))
holoPos(3,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(3,E,"anim_attachment_head")
holoScale(3,vec(0.3,0.3,0.2))
holoColor(3,EyeColor)
holoAlpha(3,255)
holoPos(3,holoEntity(1):toWorld(vec(-3,-11.8,-3)))
holoAng(3,holoEntity(1):toWorld(ang(90,90,0)))

#nose
holoCreate(4)
holoModel(4,"prism")
holoAng(4,E:attachmentAng("anim_attachment_head"))
holoPos(4,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(4,E,"anim_attachment_head")
holoScale(4,vec(0.3,0.1,0.3))
holoColor(4,NoseColor)
holoAlpha(4,255)
holoPos(4,holoEntity(1):toWorld(vec(0,-18.09,5)))
holoAng(4,holoEntity(1):toWorld(ang(180,0,0)))

#left outer ear
holoCreate(5)
holoModel(5,"hq_icosphere")
holoAng(5,E:attachmentAng("anim_attachment_head"))
holoPos(5,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(5,E,"anim_attachment_head")
holoScale(5,vec(1.5,0.3,2.5))
holoColor(5,OEarColor)
holoAlpha(5,255)
holoPos(5,holoEntity(1):toWorld(vec(15,0,-15)))
holoAng(5,holoEntity(1):toWorld(ang(180-EarAngle,0,0)))
holoShadow(5,0)

#right outer ear
holoCreate(6)
holoModel(6,"hq_icosphere")
holoAng(6,E:attachmentAng("anim_attachment_head"))
holoPos(6,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(6,E,"anim_attachment_head")
holoScale(6,vec(1.5,0.3,2.5))
holoColor(6,OEarColor)
holoAlpha(6,255)
holoPos(6,holoEntity(1):toWorld(vec(-15,0,-15)))
holoAng(6,holoEntity(1):toWorld(ang(180+EarAngle,0,0)))
holoShadow(6,0)

#left inner ear
holoCreate(7)
holoModel(7,"hq_icosphere")
holoAng(7,E:attachmentAng("anim_attachment_head"))
holoPos(7,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(7,E,"anim_attachment_head")
holoScale(7,vec(1.2,0.3,2.2))
holoColor(7,IEarColor)
holoAlpha(7,255)
holoPos(7,holoEntity(1):toWorld(vec(15,-0.2,-15)))
holoAng(7,holoEntity(1):toWorld(ang(160,0,0)))
holoShadow(7,0)

#right inner ear
holoCreate(8)
holoModel(8,"hq_icosphere")
holoAng(8,E:attachmentAng("anim_attachment_head"))
holoPos(8,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(8,E,"anim_attachment_head")
holoScale(8,vec(1.2,0.3,2.2))
holoColor(8,IEarColor)
holoAlpha(8,255)
holoPos(8,holoEntity(1):toWorld(vec(-15,-0.2,-15)))
holoAng(8,holoEntity(1):toWorld(ang(200,0,0)))
holoShadow(8,0)

#snout
holoCreate(9)
holoModel(9,"hq_dome")
holoAng(9,E:attachmentAng("anim_attachment_head"))
holoPos(9,E:attachmentPos("anim_attachment_head"))
holoParentAttachment(9,E,"anim_attachment_head")
holoScale(9,vec(1,1.2,2))
holoColor(9,MainColor)
holoAlpha(9,255)
holoPos(9,holoEntity(1):toWorld(vec(0,-6.7,5)))
holoAng(9,holoEntity(1):toWorld(ang(90,270,0)))
holoShadow(9,0)
}

LastSaid=owner():lastSaid():lower():explode(" ")
LastSaid1=LastSaid:string(1)
LastSaid2=LastSaid:string(2)

if(LastSaid1=="/hredraw")
{
    hideChat(1)
    printColor(vec(100,255,100),"redrawing...")
    timer("redraw",1000)
}

elseif(LastSaid1=="/vm1"&chatClk(owner()))
{
    hideChat(1)
    holoVisible(1,E,1)
    holoVisible(2,E,1)
    holoVisible(3,E,1)
    holoVisible(4,E,1)
    holoVisible(5,E,1)
    holoVisible(6,E,1)
    holoVisible(7,E,1)
    holoVisible(8,E,1)
    holoVisible(9,E,1)
}

if(LastSaid1=="/vm2"&chatClk(owner()))
{
    hideChat(1)
    holoVisible(1,E,0)
    holoVisible(2,E,0)
    holoVisible(3,E,0)
    holoVisible(4,E,0)
    holoVisible(5,E,0)
    holoVisible(6,E,0)
    holoVisible(7,E,0)
    holoVisible(8,E,0)
    holoVisible(9,E,0)
}