FILTERSCRIPT - Sistema de Stripper [FAMILIASAMP.COM]

#include <a_samp>
#include <mSelection>
#include <ZCMD>

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys) {

	if(newkeys & KEY_SPRINT) {

		if(GetPVarType(playerid, "Stripper")) {
			new rand = random(6),
				iActorID = GetPVarInt(playerid, "Stripper");

			switch(rand) {
				case 0: ApplyActorAnimation(iActorID, "STRIP", "strip_E", 4.1, 1, 0, 0, 0, 0);
				case 1: ApplyActorAnimation(iActorID, "STRIP", "strip_G", 4.1, 1, 0, 0, 0, 0);
				case 2: ApplyActorAnimation(iActorID, "STRIP", "STR_A2B", 4.1, 1, 0, 0, 0, 0);
				case 3: ApplyActorAnimation(iActorID, "STRIP", "STR_Loop_A", 4.1, 1, 0, 0, 0, 0);
				case 4: ApplyActorAnimation(iActorID, "STRIP", "STR_Loop_B", 4.1, 1, 0, 0, 0, 0);
				default: ApplyActorAnimation(iActorID, "STRIP", "STR_Loop_C", 4.1, 1, 0, 0, 0, 0);
			}
		}
	}
}

public OnPlayerDisconnect(playerid, reason) {

	new iActorID = GetPVarInt(playerid, "Stripper");
	DeletePVar(playerid, "Stripper");
	DestroyActor(iActorID);
	return 1;
}


public OnPlayerModelSelectionEx(playerid, response, extraid, modelid, extralist_id) {
	switch(extraid) {

		case 2000: {
			new iActorID = CreateActor(modelid, 1203.9446, 16.5226,1000.9219, 345);
			SetPVarInt(playerid, "Stripper", iActorID);
			ApplyActorAnimation(iActorID, "DANCING", "DAN_Up_A", 4.1, 1, 0, 0, 0, 0);

			SetPlayerInterior(playerid, 2);
			SetPlayerPos(playerid, 1204.2075,17.0175,1002.5919);
			SetPlayerFacingAngle( playerid, 145.7249);
			ApplyAnimation(playerid,"Attractors","Stepsit_in",4.1,0,1,1,1,0);
			SendClientMessage(playerid, 0xFFFFFFFF, "Use ~k~~PED_SPRINT~ to make the dancer do other dances for you.");
		}
	}
	return 1;
}

CMD:strippers(playerid, params[]) {

	if(GetPVarType(playerid, "Stripper")) return SendClientMessage(playerid, 0xFFFFFFFF, "You already have a stripper. Use /stopstripper.");
	new aStrippers[14] = {152, 178, 237, 238, 243, 244, 246, 85, 256, 257, 64, 63, 87, 259};
	ShowModelSelectionMenuEx(playerid, aStrippers, sizeof(aStrippers), "Strippers", 2000, 0.0, 0.0, 0.0);
	return 1;
}

CMD:stopstripper(playerid, params[]) {

	if(GetPVarType(playerid, "Stripper")) {
		new iActorID = GetPVarInt(playerid, "Stripper");
		DeletePVar(playerid, "Stripper");
		DestroyActor(iActorID);
		ClearAnimations(playerid);
	}
	else SendClientMessage(playerid, 0xFFFFFFFF, "Use /strippers to start.");
	return 1;
}