All pastes #676567 Raw Edit

b00m

public text v1 · immutable
#676567 ·published 2007-08-31 05:33 UTC
rendered paste body
//-----------------------------[ Include ]--------------------------------------------------------------
#include <a_samp>
#include <a_objects>
#include <core>
#include <float>
#include <time>
#include <file>
#include <utils>
#include <morphinc>
#include <dcallbacks>

//-----------------------------[ Pragma ]---------------------------------------------------------------
#pragma unused IsNumeric
#pragma unused ReturnUser

//-----------------------------[ Define ]---------------------------------------------------------------

//-------[ barvy ]------
#define COLOR_GREEN 0x33AA33AA
#define COLOR_LRED 0xFF6347AA
#define COLOR_LBLUE 0x33CCFFAA
#define COLOR_LGREEN 0x9ACD32AA
#define COLOR_GRAD 0xB4B5B7FF
#define COLOR_GRAD2 0xBFC0C2FF
#define COLOR_GRAD3 0xCBCCCEFF
#define COLOR_GRAD4 0xD8D8D8FF
#define COLOR_GRAD5 0xE3E3E3FF
#define COLOR_GRAD6 0xF0F0F0FF
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_RED 0xAA3333AA
#define COLOR_FADE1 0xE6E6E6E6
#define COLOR_FADE2 0xC8C8C8C8
#define COLOR_FADE3 0xAAAAAAAA
#define COLOR_FADE4 0x8C8C8C8C
#define COLOR_FADE5 0x6E6E6E6E
#define COLOR_PURPLE 0xC2A2DAAA
#define COLOR_DBLUE 0x2641FEAA
#define COLOR_ALLDEPT 0xFF8282AA
#define COLOR_NEWS 0xFFA500AA
#define COLOR_OOC 0xE0FFFFAA

//-------[ zamestnani ]--------
#define TEAM_SFPD 1
#define TEAM_FBI 2
#define TEAM_SFEU 3
#define TEAM_TAXI 4
#define TEAM_BUS 5
#define TEAM_LIMU 6
#define TEAM_TRIADA 7
#define TEAM_SFRIFA 8
#define TEAM_CIVIL 9

//-------[ native ]--------


//-----------------------------[ Forward ]--------------------------------------------------------------

//-------[ auta ]-------
forward PolicieAuto(carid);
forward ZachrankaAuto(carid);
forward TaxiAuto(carid);
//-------[ ostatni ]-------
forward time();
forward vyplata(playerid);
forward zdravi(playerid);
forward DateProp(playerid);
forward Encrypt(string[]);
forward GivePlayerHealth(playerid, health);
forward OnPlayerRegister(playerid, password[]);
forward OnPlayerLogin(playerid,password[]);
forward UkazStat(playerid);
forward rychlost();
forward ProxDetector(Float:radi, playerid, string[],col1,col2,col3,col4,col5);
forward AddsOn();
forward HracNovy(playerid);
forward IsPlayerInSphere(playerid,Float:x,Float:y,Float:z,radius);
forward otto(playerid);
forward AdminArea(playerid);
forward TIMER_PlayerArea();
forward OnPlayerEnterArea(playerid,areaid);
forward OnPlayerLeaveArea(playerid,areaid);
//-------[ Brany a Zavory ]-------
forward policiegaraz(playerid);
forward zatarasapdopen();
forward zatarasapdclose();



	    

//-----------------------------[ NEW a ENUM]------------------------------------------------------------
new gHracskyUcet[MAX_PLAYERS];
new gHracPrihlasen[MAX_PLAYERS];
new gNeplatnePrihlaseni[MAX_PLAYERS];
new gNovyHrac[MAX_PLAYERS];
new CurrentMoney[MAX_PLAYERS];
new SpeedMode = 0; // 0 pro KPH, 1 pro MPH
new UpdateSeconds = 1;
new BigEar[MAX_PLAYERS];
new adds = 1;
new addtimer = 1000;
new MaxRoadBlocky;
new hrac;
new letadlo;
new TimesLooped;
new opentimer;
new closetimer;
new Float:rx;
new Float:ry;
new Float:rz;


//-------[ Brany a Zavory ]-------
new garazpd;
new garazpd1;
new garazpd2;
new zavorapds;
new zavorapds2;
new zavorapd1;
new zavorapd2;

//--------[ ostatni ]--------
new PlayerInfo[MAX_PLAYERS][pInfo];

enum SavePlayerPosEnum
{
    Float:LastX,
    Float:LastY,
    Float:LastZ,
};
new SavePlayerPos[MAX_PLAYERS][SavePlayerPosEnum];

//------------------------------------------------------------------------------------------------------
main()
{
	print(" ");
	print(" ");
	print("   Czech RolePlay: SF    ");
	print("_________________________");
	print("      Koduje boom        ");
	print(" ");
	print(" ");
}
//------------------------------------------------------------------------------------------------------
public OnGameModeInit()
{
	new playerid;
 	garazpd    = AddAreaCheck(-1640.1406,-1623.8275,681.5294,697.5279,0,0);
 	zavorapds  = AddAreaCheck(-1568.8745,-1575.9816,658.7739,665.6855,0,0);
	SetGameModeText("Czech RolePlay: SF");
	ShowPlayerMarkers(0);
	AllowInteriorWeapons(1);
	SetTimer("vyplata", 900000, 1);
	SetTimer("zdravi", 60000, 1);
	SetTimer("AdminArea", 60000, 1);
	SetTimer("rychlost", UpdateSeconds*10, 1);
	SetTimer("TIMER_PlayerArea",1000,true);
	opentimer  = SetTimer("zatarasapdopen",10,1);
	SetTimer("zatarasapdclose",10,1);
	

	// OBJEKTY
   	garazpd1  = CreateObject(16775, -1630.606934, 688.114075, 9.811722, 0, 0, 0);           // Policie - garaz
   	garazpd2  = CreateObject(16775, -1645.236572, 688.127869, 9.846436, 0, 0, 0);           // Policie - garaz2
	zavorapd1 = CreateObject(968, -1701.429688, 687.600891, 24.544268, 0, 88.522, 270);     // Policie - zabrana (u Vrtulniku)
	zavorapd2 = CreateObject(968, -1572.205200, 658.735413, 6.796752, 0, 89.3814, 90.4817); // Policie - zabrana
	return 1;
}

public TIMER_PlayerArea() {
  new i,z;
  new Float:x,Float:y,Float:zcoord;
  for (i=0;i<MAX_PLAYERS;i++) {
     if (IsPlayerConnected(i)) {
       GetPlayerPos(i,x,y,zcoord);
       for (z=0;z<AREACHECK_Count;z++)
         if (
              (AREACHECK_Coords[z][0]<x)&&(AREACHECK_Coords[z][1]>x) &&
              (AREACHECK_Coords[z][2]<y)&&(AREACHECK_Coords[z][3]>y)
            ) {
           if (z!=AREACHECK_Player[i]-1) {
             // Is new in this area
             AREACHECK_Player[i]=z+1;
             OnPlayerEnterArea(i,z+1);
             return 1;
           } else {
           }
         } else {
           if (z==AREACHECK_Player[i]-1) {
             // Player was in this Area
             OnPlayerLeaveArea(i,z+1);
             AREACHECK_Player[i]=0;
             return 1;
           }
         }

     }

  }
  return 0;
}


public zatarasapdopen()
{
    TimesLooped ++;
    if(TimesLooped==10)
    {
      KillTimer(opentimer);
      TimesLooped=0;
      GetObjectRot(zavorapd2,rx,ry,rz);
	  SetObjectRot(zavorapd2,rx,ry+1.0,rz);
    }
	GetObjectRot(zavorapd2,rx,ry,rz);
	SetObjectRot(zavorapd2,rx,ry+1.0,rz);

}

public zatarasapdclose()
{
	TimesLooped ++;
 	if(TimesLooped==10)
  	{
  	  KillTimer(closetimer);
      TimesLooped=0;
      GetObjectRot(zavorapd2,rx,ry,rz);
	  SetObjectRot(zavorapd2,rx,ry+1.0,rz);
    }
	GetObjectRot(zavorapd2,rx,ry,rz);
	SetObjectRot(zavorapd2,rx,ry-1.0,rz);
}
//------------------------------------------------------------------------------------------------------
public OnPlayerEnterArea(playerid,areaid) {
   	if (areaid==garazpd){
   	MoveObject(garazpd1, -1630.606934, 688.114075, 14.661663, 2);
   	MoveObject(garazpd2, -1645.236572, 688.127869, 50, 2);
   	}
   	if (areaid==zavorapds){
   	SetTimer("zatarasapdopen",10,1);
   	}
}

public OnPlayerLeaveArea(playerid,areaid) {
   	if (areaid==garazpd){
   	MoveObject(garazpd1, -1630.606934, 688.114075, 9.811722, 2);
   	MoveObject(garazpd2, -1645.236572, 688.127869, 9.846436, 2);
   	}
   	if (areaid==zavorapds){
   	closetimer = SetTimer("zatarasapdclose",10,1);
   	}
}