/*
			Kûrëjas: Gh0sT_
			Versija: V1
			Skype: grander18
			Nors ir pakeisi kreditus, skripto autoriumi netapsi.
*/
#include <a_samp> // Kreditai ----> SA-MP komanda
#include <foreach> // Kreditai ----> Y_Less
#include <zcmd> // Kreditai ----> ZeeX
#define  Gyvybes        750 // Nuo kiek gyvybiø maðinos variklis uþges?
#define  Kaina          1000 // Kiek kainuos sutaisymas, ir kiek pinigø mechanikas gaus?
#define  Iskvietimas    50 // Kiek pinigø þaidëjui nuiims, kai jis iðkvies mechanikus?
#define  Tekstas        1 // Ar þaidëjui bus prilipdytas tekstas, kai jo maðinos variklis bus uþgesæs? 1 - Taip, 0 - Ne.
#define  BALTA       	0xFFFFFFFF // Balta spalva.
new
	Text3D:UzgesusioTekstas[MAX_PLAYERS]
	;
main(){}
#pragma tabsize 0
public OnFilterScriptInit( ) // Kreditai ---> SA-MP komanda
{
	print("\n\n\n\n\n\n\n\n\n\n\n\n");
	print("Greièio matuokliai - kûrta Gh0sT_");
	SetTimer("VariklioTikrinimas", 1000, true );
	SetTimer("AutomatineZinute", 60000, true );
	return 1;
}
public OnFilterScriptExit( ) // Kreditai ---> SA-MP komanda
{
	print("\n\n\n\n\n\n\n\n\n\n\n\n");
	print("Greièio matuokliai - kûrta Gh0sT_");
	return 1;
}
public OnPlayerDisconnect( playerid, reason )
{
	Delete3DTextLabel( UzgesusioTekstas [ playerid ] );
	return 1;
}
COMMAND:taisyti( playerid , params[]) // Kreditai ---> Gh0sT_
{
	new MasinosID = GetPlayerVehicleID( playerid );
	new Vairuotojas = GautiVairuotoja( MasinosID );
	new Float: MasinosGyvybes;
	GetVehicleHealth( MasinosID , MasinosGyvybes );
	if(MasinosGyvybes > 999) return SendClientMessage( playerid, BALTA, "Maðina nëra sudauþyta.");
	if(GetPVarInt( playerid, "Darbas") != 1 ) return SendClientMessage( playerid, BALTA, "Jûs neesate Mechanikas.");
	if(GetPlayerMoney( Vairuotojas ) < Kaina) return SendClientMessage( playerid, BALTA,"Ðis þaidëjas neturi 1000$.");
	if(!IsPlayerInAnyVehicle( playerid ) && GetPlayerState( playerid ) != PLAYER_STATE_DRIVER) return SendClientMessage( playerid, BALTA,"Jûs neesate maðinoje.");
	if(Vairuotojas != INVALID_PLAYER_ID)
	{
	new
		Stringas[61]
		;
	format(Stringas,sizeof(Stringas),"Mechanikas %s Jums siølo maðinos sutaisymà uþ 1000$.", GautiZaidejoVarda( playerid ));
	ShowPlayerDialog( Vairuotojas , 0 ,DIALOG_STYLE_MSGBOX,"Mechanikai" , Stringas , "Sutaisyti" , "Uþdaryti");
	SetPVarInt( playerid , "ZaidejoID", Vairuotojas );
	SetPVarInt( playerid , "MasinosID", MasinosID );
	}
	else SendClientMessage( playerid, BALTA,"Maðinoje nëra jos savininko.");
	return 1;
}
COMMAND:darbas( playerid , params[])
{
	if( GetPVarInt ( playerid , "Darbas") == 1) return SendClientMessage( playerid, BALTA, "Jûs jau dirbate Mechaniku." );
	#pragma tabsize 0
new
	#pragma tabsize 1
	Stringas[64]
	;
	format(Stringas, 64, "Þaidëjas %s ásidarbino á Mechanikø firmà.", GautiZaidejoVarda( playerid ));
	return 1;
}
COMMAND:kviesti( playerid , params[]) // Kreditai ---> Gh0sT_
{
	#pragma tabsize 0
	if(GetPVarInt( playerid , "Darbas") == 1) return SendClientMessage( playerid , BALTA, "Jûs ir taip esate Mechanikas.");
    if(GetPVarInt( playerid , "Iskvietes") == 1 ) return SendClientMessage ( playerid, BALTA, "Teks palaukti minutæ!" );
	ShowPlayerDialog( playerid, 1, DIALOG_STYLE_INPUT,"Mechanikø kvietimas","Apibûdinkite vietà, kurioje dabar esate." , "Skambinti" , "Atðaukti");
	return 1;
}
forward VariklioTikrinimas( ); // Kreditai ---> Gh0sT_
public VariklioTikrinimas( ) // Kreditai ---> Gh0sT_
{
	foreach(Player, ID)
	{
	if(GetPVarInt( ID , "Uzgeses") == 1 ) // Sukûrta tam, kad kai þaidëjui uþgæsta maðinos variklis, jis negalëtø atsiðaldyti su s0beitu.
	{
	TogglePlayerControllable( ID , false );
	}
	if( GetPlayerState( ID ) == PLAYER_STATE_DRIVER )
	{
	new
    #pragma tabsize 1
	Float:MasinosGyvybes;
	new MasinosID = GetPlayerVehicleID( ID );
	GetVehicleHealth( MasinosID , MasinosGyvybes );
	#pragma tabsize 0
	if(MasinosGyvybes < Gyvybes)
	{
	if(GetPVarInt( ID , "Uzgeses") == 0 )
	{
	TogglePlayerControllable( ID , false );
	SendClientMessage( ID , BALTA,"Jûsø maðinos variklis uþgeso. Kreipkities pas Mechanikus." );
	SetPVarInt( ID , "Uzgeses", 1 );
	#if Tekstas     1
	new
		Float:ZaidejoX,
		Float:ZaidejoY,
		Float:ZaidejoZ
	;
	UzgesusioTekstas [ ID ] = Create3DTextLabel ( "Ðio þaidëjo maðinos variklis yra uþgesæs! ", BALTA, ZaidejoX, ZaidejoY, ZaidejoZ+2.0, 20.0, 1 );
	Attach3DTextLabelToPlayer ( UzgesusioTekstas [ ID ], ID, 0, 0, 2.0 );
	SetPVarInt ( ID, "TekstasSukurtas", 1 );
	#endif
	}
	}
	}
	}
	return 1;
}
forward NuiimtiPV( playerid );
public NuiimtiPV( playerid )
{
	SetPVarInt( playerid , "Iskvietes", 0 );
	SendClientMessage ( playerid, BALTA, "Vël galite kviesti Mechanikus, naudodami komandà /kviesti,");
	return 1;
}
stock GautiZaidejoVarda( playerid ) // Kreditai ---> ?
{
	new Vardas[ MAX_PLAYER_NAME ];
	GetPlayerName( playerid , Vardas, 24 );
	return Vardas;
}
stock GautiVairuotoja( vehicleid ) // Kreditai ---> ?
{
	foreach(Player, playerid)
	{
	if(GetPlayerState( playerid ) == PLAYER_STATE_DRIVER)
	{
	if(IsPlayerInVehicle( playerid , vehicleid)) return playerid;
	}
	}
	return INVALID_PLAYER_ID;
}
stock NusiustiZinuteMechanikams(color, text[])
{
	foreach(Player, Mechanikas)
	{
	if(GetPVarInt( Mechanikas , "Darbas") == 1 )
	{
	SendClientMessage( Mechanikas , color, text );
	}
	}
	return 1;
}
forward AutomatineZinute( );
public AutomatineZinute( )
{
SendClientMessageToAll( BALTA,"Ðis serveris naudoja Gh0sT_ Variklio sistemà.");
SendClientMessageToAll( BALTA,"Komandos: /taisyti - Sutaisyti maðinà, /kviesti - Iðkviesti mechanikus.");
return 1;
}
public OnPlayerConnect( playerid )
{
	SendClientMessage( playerid , BALTA, "Ðis serveris naudoja Gh0sT_ Variklio sistemà" );
	return 1;
}
public OnDialogResponse( playerid , dialogid, response, listitem, inputtext[]) // Kreditai ---> SA-MP komanda
{
	if( dialogid == 43 )
	{
	if( !response )
	{
	SendClientMessage( playerid , BALTA, "Jûs paspaudëte 'Uþdaryti'.");
	}
	if( response )
	{
	new
	    Stringas[ 105 ]
	    ;
	if(strlen( inputtext ) > 40) return SendClientMessage( playerid , BALTA,"Vietos apraðymas negali bûti ilgesnis, kaip 40simboliø." );
	format( Stringas , 105 ,"Darbo racija: %s kvieèia Mechanikà. Vieta: %s", GautiZaidejoVarda( playerid ), inputtext );
	NusiustiZinuteMechanikams( BALTA , Stringas );
	SendClientMessage( playerid , BALTA, "Mechanikas sëkmingai iðkviestas." );
	GivePlayerMoney( playerid , -Iskvietimas );
	SetPVarInt( playerid, "Iskvietes", 1 );
	SetTimerEx("NuiimtiPV", 60000, false, "d", playerid );
	}
	}
	if( dialogid == 0 )
	{
	if( !response )
	{
	SendClientMessage( playerid , BALTA,"Jûs paspaudëte 'Uþdaryti" );
	}
	if( response )
	{
	new Vairuotojas = GetPVarInt( playerid ,"ZaidejoID" );
	new AutomobilioID = GetPVarInt( playerid ,"MasinosID" );
	GivePlayerMoney( playerid , Kaina );
	GivePlayerMoney( Vairuotojas , -Kaina );
	RepairVehicle( AutomobilioID );
	SetPVarInt( Vairuotojas , "Uzgeses", 0 );
	TogglePlayerControllable( Vairuotojas , true );
	if(GetPVarInt( Vairuotojas , "TekstasSukurtas") == 1) return Delete3DTextLabel( UzgesusioTekstas [ playerid ]), SetPVarInt( Vairuotojas , "TekstasSukurtas", 0 );
	}
	}
	return 0;
}
/*
			Kûrëjas: Gh0sT_
			Versija: V1
			Skype: grander18
			Nors ir pakeisi kreditus, skripto autoriumi netapsi.
*/