sub GroupInstance
{
        ###Usage: plugin::GroupInstance("HalasWolv[S]",1,"halas",29,2,(xcoord),(ycoord),(zcoord);
        ###Akkadius of Blood of the Akkadian
        my $text = plugin::val('$text');
        my $client = plugin::val('$client');
        my $InstanceName = $_[0];
        my $InstVersion = $_[1];
        my $ZoneShortName = $_[2];
        my $Zone_ID = $_[3];
        my $Duration = $_[4];
        my $Xentrance = $_[5];
        my $Yentrance = $_[6];
        my $Zentrance = $_[7];
        my $group = $client->GetGroup();
        my $groupID = quest::getgroupidbychar($charid);
            if (defined($qglobals{"$InstanceName_$groupID"}))
            {
                my $QGlobalValue = $qglobals{"$InstanceName_$groupID"};
                quest::AssignToInstance($QGlobalValue);
                quest::MovePCInstance($Zone_ID, $QGlobalValue, $Xentrance, $Yentrance, $Zentrance);
            }
            else
            {
                my $instanceID = quest::CreateInstance($ZoneShortName, $InstVersion,($Duration * 60 * 60));
                quest::AssignToInstance($instanceID);
                quest::setglobal("$InstanceName_$groupID",$instanceID,7,"H{$Duration}");
                quest::MovePCInstance($Zone_ID, $instanceID, $Xentrance, $Yentrance, $Zentrance);
            }
        if ($groupid = 0)
        {
            quest::popup("Requirements","You need to have a group to enter this instance",0,0);
        }
}

        return 1;