////////// Party Checker //////////

Procedure CheckPartyNumber
IsRed 1165, 70
// First Person
Set PartyMembers = 1
Else
// There is No Party
Set PartyMembers = 0
//Exit
End

IsRed 1165, 115
//Second Person
Set PartyMembers = 2
Else
// Party request, only the leader exists, but no 2nd member yet
Set PartyMembers = 1
//Exit
End

IsRed 1165, 160
// 3rd Person
Set PartyMembers = 3
End

IsRed 1165, 205
Set PartyMembers = 4
End

IsRed 1165, 255
Set PartyMembers = 5
End

IsRed 1165, 295
Set PartyMembers = 6
End

IsRed 1165, 340
Set PartyMembers = 7
End

IsRed 1165, 385
Set PartyMembers = 8
End
End