PDA

View Full Version : Minigun Tank and rancher [Help Pro's](REP+)


Ballu Miaa
22/12/2011, 02:18 AM
This is an FilterScript by Mean! It Create's a Minigun on tanks and You can shoot them by space!
I tried to edit this FS inorder to create a Minigun on a FBI Rancher[Model-490] , I changed the Offset with vae and used in there but doesnt help! No Minigun show's up , But when i use Mean's original FS , the minigun is visible! What i want is :
1. Someone to edit the FS and make it for FBI Rancher[490]. according to the given functions.
2. Someone to make a Function OnVehicleDeath(vehicleid, killerid) that it destroy's the minigun and create's it again,attach's it on the New Position of the FBI Rancher/Vehicle!

Please give me suggestions on what to do. I'm posting an edited link of the Original FS Which i made for FBI Rancher and it doesnt show up Miniguns! http://pastebin.com/kXip8p4g

Thanks for reading!


// Tank minigun script by Mean.
// I don't care about the credits much, but don't
// be self-ish.


#include < a_samp >
#include < a_npc >

#define MAX_MINIGUNS 5
#undef MAX_PLAYERS
#define MAX_PLAYERS 100
new
mgun[ MAX_MINIGUNS ]
,minigunnum = 0
,vehhasminigun[ MAX_VEHICLES ]
,laser[ MAX_PLAYERS ]
;

#define PUB:%1(%2) forward %1(%2); public %1(%2)

GetXYInFrontOfPlayer(playerid, &Float:x, &Float:y, Float:distance)
{
new Float:a;
GetPlayerPos(playerid, x, y, a);
GetPlayerFacingAngle(playerid, a);
if (GetPlayerVehicleID(playerid))
{
GetVehicleZAngle(GetPlayerVehicleID(playerid), a);
}
x += (distance * floatsin(-a, degrees));
y += (distance * floatcos(-a, degrees));
}

public OnFilterScriptInit( ) {
for( new i = 0; i < MAX_VEHICLES; ++i )
vehhasminigun[ i ] = 0;
SetTimer( "check", 5000, 1 );
SetTimer( "loop", 500, 1 );
print( "Miniguns on tanks by Mean loaded." );
return 1;
}

PUB:check( ) {
for( new i = 0; i < MAX_VEHICLES; ++i ) {
new model = GetVehicleModel( i );
if( model == 432 ) {
if( vehhasminigun[ i ] == 0 ) {
vehhasminigun[ i ] = 1;
mgun[ minigunnum ] = CreateObject( 2985, 0, 0, 0, 0, 0, 0 );
AttachObjectToVehicle( mgun[ minigunnum ], i, 0.74, 3.37, -0.25, 0.00, 0.00, 89.47 );
minigunnum ++;
}
}
}
return 1;
}

PUB:loop( ) {
for( new i = 0; i < MAX_PLAYERS; ++i ) {
if( IsPlayerConnected( i ) ) {
new vehicleid = GetPlayerVehicleID( i );
new model = GetVehicleModel( vehicleid );
if( model == 432 ) {
new
keys
,ud
,lr
;
GetPlayerKeys( i, keys, ud, lr );
if( keys & 128 ) {
SetPlayerAttachedObject( i, 0, 18695, 1, 0.379999, 1.799999, -2.700000, 0.000000, 0.000000, 0.000000, 1.000000, 1.000000, 1.000000 );
laser[ i ] = CreateObject( 19084, 0.75, 3.84, 0.86, 0.00, 0.00, 92.61 );
AttachObjectToVehicle( laser[ i ], vehicleid, 0.73, 4.18, 0.86, 0.00, 0.00, 88.03 );
PlayerPlaySound( i, 1135, 0.0, 0.0, 0.0 );
SetTimerEx( "destroy", 250, 0, "i", i );

new
Float:x
,Float:y
,Float:z
,Float:x2
,Float:y2
;
GetPlayerPos( i, x2, y2, z );
#pragma unused x2
#pragma unused y2
GetXYInFrontOfPlayer( i, x, y, 5.0 );
for( new u = 0; u < MAX_PLAYERS; ++u ) {
if( IsPlayerInRangeOfPoint( u, 6.0, x, y, z ) && u != i ) {
new Float:hp;
GetPlayerHealth( u, hp );
SetPlayerHealth( u, hp - 5 );
PlayerPlaySound( u, 1135, 0.0, 0.0, 0.0 );

if( hp < 1 )
CallLocalFunction( "OnPlayerDeath", "ddd", u, i, 38 );
}
}
}
}
}
}
return 1;
}

PUB:destroy( i ) {
RemovePlayerAttachedObject( i, 0 );
DestroyObject( laser[ i ] );
return 1;
}

public OnPlayerDeath( playerid, killerid, reason ) {
// Paste your OnPlayerDeath here!
return 1;
}

Ballu Miaa
22/12/2011, 03:38 AM
Suggestions will be helpful as well. I need this ASAP! I need to Update my Server

XFlawless
22/12/2011, 04:07 AM
You just have to replace model == 432 with model == 490.

xxjackoxx
22/12/2011, 04:37 AM
// Tank minigun script by Mean.
// I don't care about the credits much, but don't
// be self-ish.


#include < a_samp >
#include < a_npc >

#define MAX_MINIGUNS 5
#undef MAX_PLAYERS
#define MAX_PLAYERS 100
new
mgun[ MAX_MINIGUNS ]
,minigunnum = 0
,vehhasminigun[ MAX_VEHICLES ]
,laser[ MAX_PLAYERS ]
;

#define PUB:%1(%2) forward %1(%2); public %1(%2)

GetXYInFrontOfPlayer(playerid, &Float:x, &Float:y, Float:distance)
{
new Float:a;
GetPlayerPos(playerid, x, y, a);
GetPlayerFacingAngle(playerid, a);
if (GetPlayerVehicleID(playerid))
{
GetVehicleZAngle(GetPlayerVehicleID(playerid), a);
}
x += (distance * floatsin(-a, degrees));
y += (distance * floatcos(-a, degrees));
}

public OnFilterScriptInit( ) {
for( new i = 0; i < MAX_VEHICLES; ++i )
vehhasminigun[ i ] = 0;
SetTimer( "check", 5000, 1 );
SetTimer( "loop", 500, 1 );
print( "Miniguns on tanks by Mean loaded." );
return 1;
}

PUB:check( ) {
for( new i = 0; i < MAX_VEHICLES; ++i ) {
new model = GetVehicleModel( i );
if( model == 490 ) {
if( vehhasminigun[ i ] == 0 ) {
vehhasminigun[ i ] = 1;
mgun[ minigunnum ] = CreateObject( 2985, 0, 0, 0, 0, 0, 0 );
AttachObjectToVehicle( mgun[ minigunnum ], i, 0.74, 3.37, -0.25, 0.00, 0.00, 89.47 );
minigunnum ++;
}
}
}
return 1;
}

PUB:loop( ) {
for( new i = 0; i < MAX_PLAYERS; ++i ) {
if( IsPlayerConnected( i ) ) {
new vehicleid = GetPlayerVehicleID( i );
new model = GetVehicleModel( vehicleid );
if( model == 490 ) {
new
keys
,ud
,lr
;
GetPlayerKeys( i, keys, ud, lr );
if( keys & 128 ) {
SetPlayerAttachedObject( i, 0, 18695, 1, 0.379999, 1.799999, -2.700000, 0.000000, 0.000000, 0.000000, 1.000000, 1.000000, 1.000000 );
laser[ i ] = CreateObject( 19084, 0.75, 3.84, 0.86, 0.00, 0.00, 92.61 );
AttachObjectToVehicle( laser[ i ], vehicleid, 0.73, 4.18, 0.86, 0.00, 0.00, 88.03 );
PlayerPlaySound( i, 1135, 0.0, 0.0, 0.0 );
SetTimerEx( "destroy", 250, 0, "i", i );

new
Float:x
,Float:y
,Float:z
,Float:x2
,Float:y2
;
GetPlayerPos( i, x2, y2, z );
#pragma unused x2
#pragma unused y2
GetXYInFrontOfPlayer( i, x, y, 5.0 );
for( new u = 0; u < MAX_PLAYERS; ++u ) {
if( IsPlayerInRangeOfPoint( u, 6.0, x, y, z ) && u != i ) {
new Float:hp;
GetPlayerHealth( u, hp );
SetPlayerHealth( u, hp - 5 );
PlayerPlaySound( u, 1135, 0.0, 0.0, 0.0 );

if( hp < 1 )
CallLocalFunction( "OnPlayerDeath", "ddd", u, i, 38 );
}
}
}
}
}
}
return 1;
}

PUB:destroy( i ) {
RemovePlayerAttachedObject( i, 0 );
DestroyObject( laser[ i ] );
return 1;
}

public OnPlayerDeath( playerid, killerid, reason ) {
// Paste your OnPlayerDeath here!
return 1;
}

:) Fixed

Ballu Miaa
22/12/2011, 07:57 AM
// Tank minigun script by Mean.
// I don't care about the credits much, but don't
// be self-ish.


#include < a_samp >
#include < a_npc >

#define MAX_MINIGUNS 5
#undef MAX_PLAYERS
#define MAX_PLAYERS 100
new
mgun[ MAX_MINIGUNS ]
,minigunnum = 0
,vehhasminigun[ MAX_VEHICLES ]
,laser[ MAX_PLAYERS ]
;

#define PUB:%1(%2) forward %1(%2); public %1(%2)

GetXYInFrontOfPlayer(playerid, &Float:x, &Float:y, Float:distance)
{
new Float:a;
GetPlayerPos(playerid, x, y, a);
GetPlayerFacingAngle(playerid, a);
if (GetPlayerVehicleID(playerid))
{
GetVehicleZAngle(GetPlayerVehicleID(playerid), a);
}
x += (distance * floatsin(-a, degrees));
y += (distance * floatcos(-a, degrees));
}

public OnFilterScriptInit( ) {
for( new i = 0; i < MAX_VEHICLES; ++i )
vehhasminigun[ i ] = 0;
SetTimer( "check", 5000, 1 );
SetTimer( "loop", 500, 1 );
print( "Miniguns on tanks by Mean loaded." );
return 1;
}

PUB:check( ) {
for( new i = 0; i < MAX_VEHICLES; ++i ) {
new model = GetVehicleModel( i );
if( model == 490 ) {
if( vehhasminigun[ i ] == 0 ) {
vehhasminigun[ i ] = 1;
mgun[ minigunnum ] = CreateObject( 2985, 0, 0, 0, 0, 0, 0 );
AttachObjectToVehicle( mgun[ minigunnum ], i, 0.74, 3.37, -0.25, 0.00, 0.00, 89.47 );
minigunnum ++;
}
}
}
return 1;
}

PUB:loop( ) {
for( new i = 0; i < MAX_PLAYERS; ++i ) {
if( IsPlayerConnected( i ) ) {
new vehicleid = GetPlayerVehicleID( i );
new model = GetVehicleModel( vehicleid );
if( model == 490 ) {
new
keys
,ud
,lr
;
GetPlayerKeys( i, keys, ud, lr );
if( keys & 128 ) {
SetPlayerAttachedObject( i, 0, 18695, 1, 0.379999, 1.799999, -2.700000, 0.000000, 0.000000, 0.000000, 1.000000, 1.000000, 1.000000 );
laser[ i ] = CreateObject( 19084, 0.75, 3.84, 0.86, 0.00, 0.00, 92.61 );
AttachObjectToVehicle( laser[ i ], vehicleid, 0.73, 4.18, 0.86, 0.00, 0.00, 88.03 );
PlayerPlaySound( i, 1135, 0.0, 0.0, 0.0 );
SetTimerEx( "destroy", 250, 0, "i", i );

new
Float:x
,Float:y
,Float:z
,Float:x2
,Float:y2
;
GetPlayerPos( i, x2, y2, z );
#pragma unused x2
#pragma unused y2
GetXYInFrontOfPlayer( i, x, y, 5.0 );
for( new u = 0; u < MAX_PLAYERS; ++u ) {
if( IsPlayerInRangeOfPoint( u, 6.0, x, y, z ) && u != i ) {
new Float:hp;
GetPlayerHealth( u, hp );
SetPlayerHealth( u, hp - 5 );
PlayerPlaySound( u, 1135, 0.0, 0.0, 0.0 );

if( hp < 1 )
CallLocalFunction( "OnPlayerDeath", "ddd", u, i, 38 );
}
}
}
}
}
}
return 1;
}

PUB:destroy( i ) {
RemovePlayerAttachedObject( i, 0 );
DestroyObject( laser[ i ] );
return 1;
}

public OnPlayerDeath( playerid, killerid, reason ) {
// Paste your OnPlayerDeath here!
return 1;
}

:) Fixed


Works awesome!! But can you do one thing , I want you to put the Minigun back a bit in the car. That means the Mount(stand) of the minigun shud'nt be visible, Minigun plus a bit of the stand will be visible only!

Thanks alot, Your a pro!

Ballu Miaa
22/12/2011, 08:57 AM
One more thing i want to add is , After MY server restart's with the function
SendRconCommand(changemode new);

It doe'nt load up the objects again! FS is loaded. Im able to make the shot's with it inside a Rancher! But no Minigun here?

xxjackoxx
22/12/2011, 09:37 AM
Right, well I am about to go out.

When I come home I will try and post a fix for you, unless someone beats me to it in the mean time.