native CreateObjectHorca(&slots, &Float:x, &Float:y, &Float:z, &Float:a); //to create the object from the gallows.
native DestroyObjectHorca(&slots); //to destroy the object of the gallows.
native IsPlayerInRangeOfHorca(playerid, &Float:distance); //to check if the player is near the object for the gallows.

#include <a_samp>
#include <zcmd>
#include <a_Horca>

public OnFilterScriptInit() {
    print("\n**************************************");
    print("     Old Gallows in SA-MP 'Object'   ");
    print("           Date: 14/07/2013            ");
    print("             Author: OTACON              ");
    print("      --* loaded with success!!. *--      ");
    print("***************************************\n");

    CreateObjectHorca(0, -1248.1201,-357.7491,14.1484,314.3095); //SLOT 1
    CreateObjectHorca(1, -1243.1990,-362.6151,14.1484,310.8629); //SLOT 2
    CreateObjectHorca(2, -1237.1652,-368.5380,14.1484,318.5919); //SLOT 3
    return true;
}
public OnFilterScriptExit() {
    print("\n**************************************");
    print("     Old Gallows in SA-MP 'Object'   ");
    print("           Date: 14/07/2013            ");
    print("             Author: OTACON              ");
    print("     --* downloaded with success!!. *--    ");
    print("***************************************\n");

    DestroyObjectHorca(0); //SLOT 1
    DestroyObjectHorca(1); //SLOT 2
    DestroyObjectHorca(2); //SLOT 3
    return true;
}
COMMAND:test(playerid, params[]) {
    if(!IsPlayerConnected(playerid)) return true;
    if(IsPlayerInRangeOfHorca(playerid, 3.0)) SendClientMessage(playerid, -1, "    [ ! ] are in position of the object!.");
    else SendClientMessage(playerid, -1, "    [ ! ] are not in position of the object!.");
    return true;
}