// dances

// Dances for the Spring Festival contributed by Ruen, Anfyr & Lundar

// Vequalir's Dance
// slow tempo, 4/4 time
// choreography by Ruen
// 		edit ntimes to change the length of the dance
//		(note: I didn't use pause since its works poorly with lag)

"/veqsdance"
{
	set count 0
	set ntimes 1
	label start
	if count < ntimes
		set count +1
		{
			"/pose thoughtful\r"
			"/pose thoughtful\r"
			"/pose thoughtful\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose salute\r"
			"/pose salute\r"
			"/pose salute\r"
			"/pose akimbo\r"
			"/pose akimbo\r"
			"/pose akimbo\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose akimbo\r"
			"/pose akimbo\r"
			"/pose akimbo\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose salute\r"
			"/pose salute\r"
			"/pose salute\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose thoughtful\r"
			"/pose thoughtful\r"
			"/pose thoughtful\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bow\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bow\r"
			"/pose akimbo\r"
			"/pose bow\r"
		}
		set count +1
		goto start
	end if
}

// twirl
"/twirl"

{
	set count 0
	set ntimes 1
	label start
	if count < ntimes
		set count +1
		{
			"/pose leanleft\r"
			"/pose leanleft\r"
			"/pose leanleft\r"
			"/pose leanright\r"
			"/pose leanright\r"
			"/pose leanright\r"
			"/pose attack nw\r"
			"/pose attack ne\r"
			"/pose bless\r"
			"/pose attack nw\r"
			"/pose attack ne\r"
			"/pose bless\r"
			"/pose attack nw\r"
			"/pose attack ne\r"
			"/pose bless\r"
			"/pose attack nw\r"
			"/pose attack ne\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose bless\r"
			"/pose attack ne\r"
			"/pose attack nw\r"
			"/pose bless\r"
			"/pose attack ne\r"
			"/pose attack nw\r"
			"/pose bless\r"
			"/pose attack ne\r"
			"/pose attack nw\r"
			"/pose bless\r"
			"/pose attack ne\r"
			"/pose attack nw\r"
			"/pose bless\r"
		}
		set count +1
		goto start
	end if
}

"/strut"
{
	"/pose leanright\r"
	"/pose leanright\r"
	"/pose leanright\r"
	"/pose leanright\r"
	"/pose angry\r"
	"/pose bless\r"
	"/pose angry\r"
	"/pose leanleft\r"
	"/pose leanleft\r"
	"/pose leanleft\r"
	"/pose leanleft\r"
	"/pose angry\r"
	"/pose bless\r"
	"/pose angry\r"
	"/pose leanright\r"
	"/pose leanright\r"
	"/pose leanright\r"
	"/pose leanright\r"
	"/pose angry\r"
	"/pose bless\r"
	"/pose angry\r"
	"/pose salute\r"
	"/pose attack n\r"
	"/pose attack s\r"
	"/pose salute\r"
	"/pose angry\r"
	"/pose bless\r"
	"/pose angry\r"
}

"/sweatpeas"
{
	"/pose leanright\r"
	pause 2
	"/pose akimbo\r"
	"/pose stand\r"
	"/pose leanleft\r"
	pause 2
	"/pose akimbo\r"
	"/pose stand\r"
	"/pose celebrate\r"
	"/pose seated\r"
	pause 2
	"/pose celebrate\r"
	"/pose seated\r"
	pause 2
	"/pose celebrate\r"
	"/pose seated\r"
	"/pose celebrate\r"
	"/pose seated\r"
	"/pose celebrate\r"
	"/pose seated\r"
	"/pose celebrate\r"
	"/pose seated\r"
	"/pose stand\r"
}

"/pansies"
{
	"/pose angry\r"
	"/pose bless\r"
	"/pose angry\r"
	"/pose attack sw\r"
	"/pose bless\r"
	"/pose leanright\r"
	"/pose bless\r"
	"/pose attack sw\r"
	"/pose bless\r"
	"/pose leanright\r"
	"/pose bless\r"
	"/pose attack se\r"
	"/pose bless\r"
	"/pose leanleft\r"
	"/pose bless\r"
	"/pose attack se\r"
	"/pose bless\r"
	"/pose leanleft\r"
	"/pose bless\r"
	"/pose salute\r"
	"/pose attack n\r"
	"/pose attack s\r"
	"/pose salute\r"
}



//  Dances Below this line from Lundar

// Ransa Bentil'mon - Dance of the Sappling
// Male version, male stands on partner's left( player's right )

"/mbentil"
{
	set j 0
	label firstloop
	if j < 2
	{
		set i 0
		label lrloop
		if i < 4
		{
			"/pose leanright\r"
			"/pose leanleft\r"
			set i + 1
			goto lrloop
		}
		end if
		
		"/pose angry\r"
		pause 4
		
		set j + 1
		goto firstloop
	}
	end if
	
	set k 0
	label secondloop
	if k < 2
	{
		set l 0
		label flaploop
		if l < 4
		{
			"/pose akimbo\r"
			"/pose angry\r"
			set l + 1
			goto flaploop
		}
		end if
		
		"/pose sit\r"
		"/pose angry\r"
		
		pause 2
		set k + 1
		goto secondloop
	}
	end if

	"/pose bless\r"
	
	pause 8

	"/pose sit\r"
	"/pose stand\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose sit\r"
	"/pose stand\r"
	
	"/pose attack s\r"
	"/pose attack se\r"
	"/pose attack e\r"
	"/pose attack ne\r"
	"/pose attack n\r"
	"/pose attack nw\r"
	"/pose attack w\r"
	"/pose attack sw\r"
	"/pose attack s\r"
	
	pause 2
	
	"/pose celebrate\r"
	"/yell A'viva!\r"
	pause 6
	"/pose celebrate\r"
	pause 6
	"/pose celebrate\r"
	pause 5
	"/pose celebrate\r"
	pause 5
	"/pose celebrate\r"
}

// Ransa Bentil'mon - Dance of the Sappling
// Female version, female stands on partner's right( player's left )
	
"/fbentil"
{
	set j 0
	label firstloop
	if j < 2
	{
		set i 0
		label lrloop
		if i < 4
		{
			"/pose leanleft\r"
			"/pose leanright\r"
			set i + 1
			goto lrloop
		}
		end if
		
		"/pose angry\r"
		pause 4
		
		set j + 1
		goto firstloop
	}
	end if
	
	set k 0
	label secondloop
	if k < 2
	{
		set l 0
		label flaploop
		if l < 4
		{
			"/pose akimbo\r"
			"/pose angry\r"
			set l + 1
			goto flaploop
		}
		end if
		
		"/pose sit\r"
		"/pose angry\r"
		
		pause 2
		set k + 1
		goto secondloop
	}
	end if

	"/pose bless\r"
	
	pause 8

	"/pose sit\r"
	"/pose stand\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose sit\r"
	"/pose stand\r"
	
	"/pose attack s\r"
	"/pose attack sw\r"
	"/pose attack w\r"
	"/pose attack nw\r"
	"/pose attack n\r"
	"/pose attack ne\r"
	"/pose attack e\r"
	"/pose attack se\r"
	"/pose attack s\r"
	
	pause 2
	
	"/pose celebrate\r"
	"/yell A'viva!\r"
	pause 6
	"/pose celebrate\r"
	pause 6
	"/pose celebrate\r"
	pause 5
	"/pose celebrate\r"
	pause 5
	"/pose celebrate\r"
}
	
// Unnamed Couple Dance
// Male leads, female follows( can be switched depending on 
prefrence )
// Warning: may take a bit of coordination

// Male part

"/mpt1"
{
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose stand s\r"
}

// Female part

"/fpt1"
{
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose stand s\r"
}

// Male part

"/mpt2"
{
	"/pose sit\r"
	"/pose stand s\r"
	"/pose sit\r"
	"/pose stand s\r"
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose stand s\r"
}

// Female part

"/fpt2"
{
"/pose attack e\r"
	"/pose attack w\r"
	"/pose sit\r"
	"/pose stand s\r"
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose stand s\r"
}

// Together

"/mpt3"
{
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose stand s\r"
	"/pose sit\r"
	"/pose stand s\r"
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose stand s\r"
	"/pose sit\r"
	"/pose stand s\r"
	"/pose attack ne\r"
	"/pose attack sw\r"
	"/pose attack nw\r"
	"/pose attack se\r"
	"/pose attack ne\r"
	"/pose attack sw\r"
	"/pose attack nw\r"
	"/pose attack se\r"
	"/pose attack ne\r"
	"/pose attack sw\r"
	"/pose stand s\r"
	"/pose attack e\r"
	"/pose attack ne\r"
	"/pose attack e\r"
	"/pose attack se\r"
	"/pose attack e\r"
	"/pose attack ne\r"
	"/pose attack e\r"
	"/pose attack se\r"
	"/pose attack e\r"
	"/pose attack s\r"
	"/pose attack w\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose attack w\r"
	"/pose attack nw\r"
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack sw\r"
	"/pose attack se\r"
	"/pose attack sw\r"
	"/pose attack se\r"
	"/pose attack sw\r"
	"/pose attack nw\r"
	"/pose attack ne\r"
	"/pose attack se\r"
	pause 2
	"/pose attack s\r"
	pause 3
	"/pose bless\r"
}

"/fpt3"
{
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose stand s\r"
	"/pose sit\r"
	"/pose stand s\r"
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose attack w\r"
	"/pose attack e\r"
	"/pose stand s\r"
	"/pose sit\r"
	"/pose stand s\r"
	"/pose attack nw\r"
	"/pose attack se\r"
	"/pose attack ne\r"
	"/pose attack sw\r"
	"/pose attack nw\r"
	"/pose attack se\r"
	"/pose attack ne\r"
	"/pose attack sw\r"
	"/pose attack nw\r"
	"/pose attack se\r"
	"/pose stand s\r"
	"/pose attack w\r"
	"/pose attack nw\r"
	"/pose attack w\r"
	"/pose attack sw\r"
	"/pose attack w\r"
	"/pose attack nw\r"
	"/pose attack w\r"
	"/pose attack sw\r"
	"/pose attack w\r"
	"/pose attack s\r"
	"/pose attack e\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose leanleft\r"
	"/pose leanright\r"
	"/pose attack e\r"
	"/pose attack ne\r"
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack n\r"
	pause 2
	"/pose stand n\r"
	pause 2
	"/pose attack se\r"
	"/pose attack sw\r"
	"/pose attack se\r"
	"/pose attack sw\r"
	"/pose attack se\r"
	"/pose attack ne\r"
	"/pose attack nw\r"
	"/pose attack sw\r"
	pause 2
	"/pose attack s\r"
	pause 3
	"/pose bless\r"
}

// Another unnamed dance
// Male and female versions

"/mvers"
{
	"/pose stand s\r"
	"/pose seated\r"
	"/pose sit\r"
	"/pose seated\r"
	"/pose stand s\r"
	"/pose seated\r"
	"/pose sit\r"
	"/pose seated\r"
	"/pose stand s\r"
	"/pose celebrate\r"
	"/pose angry\r"
	"/pose akimbo\r"
	"/pose angry\r"
	"/pose akimbo\r"
	"/pose angry\r"
	"/pose attack nw\r"
	"/pose attack ne\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose attack sw\r"
	"/pose attack se\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose bless\r"
	"/pose sit\r"
	"/pose attack w\r"
	"/pose sit\r"
	"/pose attack e\r"
	"/pose sit\r"
	"/pose attack w\r"
	"/pose sit\r"
	"/pose attack e\r"
	"/pose sit\r"
	"/pose attack s\r"
	"/pose stand\r"
	"/pose salute\r"
	"/pose stand\r"
	"/pose salute\r"
	"/pose stand\r"
	"/pose salute\r"
	"/pose cry\r"
	"/pose surprised\r"
	pause 4
	"/pose surprised\r"
	pause 4
	"/pose surprised\r"
	"/pose lie\r"
}

"/fvers"
{
	"/pose stand s\r"
	"/pose seated\r"
	"/pose sit\r"
	"/pose seated\r"
	"/pose stand s\r"
	"/pose seated\r"
	"/pose sit\r"
	"/pose seated\r"
	"/pose stand s\r"
	"/pose celebrate\r"
	"/pose angry\r"
	"/pose akimbo\r"
	"/pose angry\r"
	"/pose akimbo\r"
	"/pose angry\r"
	"/pose attack ne\r"
	"/pose attack nw\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose attack se\r"
	"/pose attack sw\r"
	"/pose sit\r"
	"/pose stand\r"
	"/pose bless\r"
	"/pose sit\r"
	"/pose attack e\r"
	"/pose sit\r"
	"/pose attack w\r"
	"/pose sit\r"
	"/pose attack e\r"
	"/pose sit\r"
	"/pose attack w\r"
	"/pose sit\r"
	"/pose attack s\r"
	"/pose stand\r"
	"/pose salute\r"
	"/pose stand\r"
	"/pose salute\r"
	"/pose stand\r"
	"/pose salute\r"
	"/pose cry\r"
	"/pose surprised\r"
	pause 4
	"/pose surprised\r"
	pause 4
	"/pose surprised\r"
	"/pose lie\r"
}


// Anfyr's dance

"/fyrransa"
                              {
                                    set count 0
                                    set ntimes 4
                                    label start
                                    if count < ntimes
                                          set count +1
                                          {
                            "/pose sit\r"
                            "/pose kneel\r"
                            "/pose kneel\r"
                            "/pose kneel\r"
                            "/pose sit\r"
                            "/pose sit\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose attack e\r"
                            "/pose attack w\r"
                            "/pose attack s\r"
                            "/pose akimbo\r"
                            "/pose akimbo\r"
                            "/pose akimbo\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose attack e\r"
                            "/pose attack w\r"
                            "/pose attack s\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose kneel\r"
                            "/pose lie\r"
                            "/pose sit\r"
                            "/pose celebrate\r"
                            "/pose akimbo\r"
                            "/pose celebrate\r"
                            "/pose bless\r"
                            "/pose bless\r"
                            "/pose bless\r"
                            "/pose thoughtful\r"
                            "/pose thoughtful\r"
                            "/pose thoughtful\r"
                            "/pose attack e\r"
                            "/pose attack w\r"
                            "/pose attack s\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose bless\r"
                            "/pose bless\r"
                            "/pose bless\r"
                            "/pose bow\r"
                            "/pose akimbo\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose bow\r"
                            "/pose sit\r"
                                         }
                                    end if
                              }




// end of file