haptek emotion needed

[onthecuttingedge2005]

can someone with hap knowledge make a surpised.hap for HAL?

this way I can include the facial emotion in the advanced emotions script.

thanks
Jerry

[Carl2]

OTC, 
  I'll give it a shot and let you know what I come up with.
Carl2

[Carl2]

Here it is a surpised.hap , copy and paste in notepad, save as (all files) with .hap.
This is a happy surprise like a birthday vs surprise this monster will eat you.
Happy smile wide eyes.



#Haptek  Version= 1.00 Name= Hap_Happy  HapType= command FileType= text
##standard
\SetSwitchIntensity [switch= expMouthHappy f0= 0.600000 t= 0.7]
\SetSwitchIntensity [switch= expMouthSad f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= expBrowsSad f0= 0.000000 t= 0.4]

\SetSwitchIntensity [switch= expMouthMad f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= expBrowsMad f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= expEyesTrust f0= -1.200000 t= 0.3]
\SetSwitchIntensity [switch= Trust f0= -1.200000 t= 0.4]

\SetSwitchIntensity [switch= expEyesDistrust f0 = -1.8000 t= 0.4]
\SetSwitchIntensity [switch= antiDistrust f0= 0.200000 t= 0.3]
\SetSwitchIntensity [switch= blinks f0= 1.200000 t= 0.2]

\SetSwitch [switch= ego state= mid]

\SetSwitch [switch= agressMaster state= confront]

\SetSwitchIntensity [switch= energyHigh f0= 0.775000 t= 0.4]
\SetSwitchIntensity [switch= energyLow f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= talkBob f0= 1.262500 t= 0.4]
\SetSwitchIntensity [switch= headEvadeHighE f0= 0.200000 t= 0.4]
\SetSwitchIntensity [switch= headEvadeLowE f0= 0.225000 t= 0.4]
\SetSwitchIntensity [switch= HighEnergyNoise f0= 0.775000 t= 0.4]
\SetSwitchIntensity [switch= LowEnergyNoise f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= browTalk f0= 0.775000 t= 0.4]
\SetSwitchIntensity [switch= visemes f0= 1.310000 t= 0.4]

Carl2

[onthecuttingedge2005]

very good carl, can the eye brows raise a little higher and can the mouth be opened wider in ahh, I base my surprised emotion on google image searches. getting close.

[Carl2]

  I'll give it a try, Higher eyebrows and open the mouth more.  Glad to help.
Carl2

[Carl2]

  I also did an image search for surprised, came up with the same or similar image.  Hi eyebrows, eyes wide, mouth open.   Just ran through the emotion hap in Characters, put them into the player no open mouths, we can raise the eyebrows a little, if we go to far it looks strange.  The mouth can be opened using a set reg command but it stays with the character,  ao another emotion added after still has the open mouth.  We are limited to what is in the emotion haps.  I was just looking through the Def hap that is compressed in the htr, we could go through the swithes and state names for an animation that would end.  Just thought we can get her to say" Ohhhh"  that will open her mouth for a while.  Let you know I make out.
Carl2

[Carl2]

  This is a two part set, the frist sets the switches and loads a text hap that Hal reads for the open mouth.

#Haptek  Version= 1.00 Name= Surprised  HapType= command FileType= text
##standard

\load [file= [C:\Program Files (x86)\Zabaware\Ultra Hal Assistant 6\Characters\SendTxt.hap]]

\SetSwitchIntensity [switch= expMouthHappy f0= 0.600000 t= 0.8]

\SetSwitchIntensity [switch= expMouthSad f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= expBrowsSad f0= 0.000000 t= 0.4]

\SetSwitchIntensity [switch= expMouthMad f0= 0.000000 t= 0.4]
\SetSwitchIntensity [switch= expBrowsMad f0= -0.000000 t= 0.4]

\SetSwitchIntensity [switch= expEyesTrust f0= -1.600000 t= 0.3]
\SetSwitchIntensity [switch= Trust f0= -1.600000 t= 0.4]

\SetSwitchIntensity [switch= expEyesDistrust f0 = -1.8000 t= 0.4]
\SetSwitchIntensity [switch= antiDistrust f0= 0.200000 t= 0.2]
\SetSwitchIntensity [switch= blinks f0= 1.200000 t= 0.2]

\SetSwitchIntensity [switch= expBrowsCurious f0= 1.2000 t= 0.8]

\SetSwitch [switch= ego state= high ]

\SetSwitch [switch= agressMaster state= confront]

\SetSwitchIntensity [switch= energyHigh f0= 1.200000 t= 0.4]
\SetSwitchIntensity [switch= energyLow f0= 0.200000 t= 0.4]
\SetSwitchIntensity [switch= talkBob f0= 1.40000 t= 0.4]
\SetSwitchIntensity [switch= headEvadeHighE f0= 0.600000 t= 0.4]
\SetSwitchIntensity [switch= headEvadeLowE f0= 0.200000 t= 0.4]
\SetSwitchIntensity [switch= HighEnergyNoise f0= 1.200000 t= 0.4]
\SetSwitchIntensity [switch= LowEnergyNoise f0= 0.200000 t= 0.4]
\SetSwitchIntensity [switch= browTalk f0= 0.700000 t= 0.4]
\SetSwitchIntensity [switch= visemes f0= 1.280000 t= 0.4]

The second Hap is

#Haptek  Version= 1.00 Name= Surprised 2 of 2  HapType= command FileType= text
##standard
OHWow

Of course both can be changed to suit your taste, the switches discribe the areas they work in.
Carl2