/*
Vehicle speed cap filterscript.
-----------
This makes it possible to limit the maxspeed of vehicles; there are, however, a few things to consider.
* This will not work well on people with high pings.
* This works best with lower server rates.
* Driving at the speed limit will cause the handling to be different; however, if
  used for roleplay, driving real-life like shouldn\'t be an issue with this at all!
How do I get started with this?
First off,
Try it on to see if it works. Load the filterscript, go ingame, and log in with /rcon login.
Now, use the testing command /myspeedcap to see if it works. An example of a value that feels like 50 km/h is 0.3.
So, simply:
/myspeedcap 0.3
Put the macros below in your other scripts and do this for example:
SetPlayerSpeedCap( playerid, 0.3 );
Another example that disables speed cap only for the NRG:
public OnPlayerEnterVehicle( playerid, vehicleid, ispassenger )
{
   new modelid = GetVehicleModel( vehicleid );
   if ( modelid == 522 ) // 522 - NRG-500
      SetPlayerSpeedCap( playerid, 0.4 );
   else
      DisablePlayerSpeedCap( playerid );
}
Put this in other scripts so they can change the speed cap easily.
#define SetPlayerSpeedCap(%0,%1) CallRemoteFunction( \"SetPlayerSpeedCap\", \"if\", %0, %1 )
#define DisablePlayerSpeedCap(%0) CallRemoteFunction( \"DisablePlayerSpeedCap\", \"i\", %0 )
Author: Slice
*/
#include <a_samp>
#include <YSI\\y_hooks>
forward SetPlayerSpeedCap( playerid, Float:value );
forward DisablePlayerSpeedCap( playerid );
new
Float:g_fSpeedCap[ MAX_PLAYERS ] = { 0.0, ... }
;
hook OnPlayerUpdate(playerid)
{
static
s_iVehicle
;
if ( g_fSpeedCap[ playerid ] != 0.0 && GetPlayerState( playerid ) == PLAYER_STATE_DRIVER )
{
s_iVehicle = GetPlayerVehicleID( playerid );
if ( s_iVehicle )
{
   static
      Float:s_fX,
      Float:s_fY,
      Float:s_fZ,
      Float:s_fVX,
      Float:s_fVY,
      Float:s_fVZ
   ;
   GetVehiclePos( s_iVehicle, s_fX, s_fY, s_fZ );
   GetVehicleVelocity( s_iVehicle, s_fVX, s_fVY, s_fVZ );
   if ( !IsPlayerInRangeOfPoint( playerid, g_fSpeedCap[ playerid ] + 0.05, s_fX + s_fVX, s_fY + s_fVY, s_fZ + s_fVZ ) )
   {
      static
         Float:s_fLength
      ;
      s_fLength = floatsqroot( ( s_fVX * s_fVX ) + ( s_fVY * s_fVY ) + ( s_fVZ * s_fVZ ) );
      s_fVX = ( s_fVX / s_fLength ) * g_fSpeedCap[ playerid ];
      s_fVY = ( s_fVY / s_fLength ) * g_fSpeedCap[ playerid ];
      s_fVZ = ( s_fVZ / s_fLength ) * g_fSpeedCap[ playerid ];
      if ( s_iVehicle )
         SetVehicleVelocity( s_iVehicle, s_fVX, s_fVY, s_fVZ );
      else
         SetPlayerVelocity( playerid, s_fVX, s_fVY, s_fVZ );
   }
}
}
return 1;
}
/*public OnPlayerCommandText( playerid, cmdtext[ ] )
{
if ( !IsPlayerAdmin( playerid ) )
return 0;
if ( !strcmp( \"/myspeedcap\", cmdtext, true, 11 ) )
{
new
   szMessage[ 24 ]
;
if ( !( cmdtext[ 11 ] && cmdtext[ 12 ] ) )
{
   SendClientMessage( playerid, -1, \"USAGE: /myspeedcap [max speed]\" );
   SendClientMessage( playerid, -1, \"USAGE: 0 will disable the speed cap.\" );
   return 1;
}
g_fSpeedCap[ playerid ] = floatstr( cmdtext[ 12 ] );
format( szMessage, sizeof( szMessage ), \"* Speed cap: %0.4f\", g_fSpeedCap[ playerid ] );
SendClientMessage( playerid, 0xFFFF00FF, szMessage );
return 1;
}
return 0;
}*/
public SetPlayerSpeedCap( playerid, Float:value )
{
if ( 0 <= playerid < sizeof( g_fSpeedCap ) )
g_fSpeedCap[ playerid ] = value;
}
public DisablePlayerSpeedCap( playerid )
{
if ( 0 <= playerid < sizeof( g_fSpeedCap ) )
g_fSpeedCap[ playerid ] = 0.0;
}

234,  324,  423,  523,  623
235,  325,  425,  524,  624
236,  326,  426,  525,  625
243,  342,  432,  532,  632
245,  345,  435,  534,  634
246,  346,  436,  536,  635
253,  352,  452,  542,  642
254,  354,  453,  543,  643
256,  356,  454,  546,  645
263,  362,  462,  562,  652
264,  364,  463,  563,  653
265,  365,  465,  564,  654
 
[/quote]
Eredményként azt kapjuk hogy ha a felhasználható értékek közül a 2-sel kezdjük a lehetséges számokat akkor egy oszlopban 12 darab lehetséges verzió jön ki.
Mivel 5 darab különbözõ értéket lehet felhasználni (2,3,4,5,6) akkor 5*12 lehetséges variáció létezik ami egyenlõ 60-al.
Ezt még így könnyû leírni a lehetséges variációkat hiszen csak 5 értéket kell felhasználni és abból 3 számjegyû számokat alkotni.
De ha mondjuk az 5-ös lottó vesszük alapul akkor 90 számból (értékbõl) mennyi 5 értéket tartalmazó kombinációt lehet össze állítani?
Az már elég sok idõbe telne leírogatni a lehetséges számokat.
Most csak példáznám egyszerûen az elõbbi dolgot:
Van 5 szám ami lehetne akár betû is vagy egy szó bármi, és ezekbõl mennyi különbözõ 3-as elemeket lehet alkotni?
Az elsõ helyre fel lehet használni az összes elemet ami 5 darab a második helyre már egyel kevesebb elemet lehet felhasználni így oda 4 elem közül lehet választani, a harmadik helyre már csak 3 elem közül lehet írni és így tovább, mivel egy lehetséges kombinációba minden elemet csak egyszer lehet felhasználni. (mindig egyel kevesebb a felhasználható elemek száma)
[pawn]
// elsõ elem |  második elem | harmadik elem
5                  4                       3
Ha ezeket össze szorozzuk akkor megkapjuk a 60-as értéket ami a lehetséges variációk számával egyenlõ.
[/pawn]
Ha ezek alapján számolnánk ki az 5ös lottó lehetséges variációnak számát:
90*89*88*87*86=5.273.912.160 értéket kapnánk. (ami nem takarja az igazságot)
Itt jön a bonyolítás.
Mivel lottónál nem 5jegyü számról beszélünk hanem 5 elembõl álló kombinációról.
Érthetõbben:
Van egy kombinációban a 2-es 3-as 4-es 5-ös és a 6-os számjegyek.
És van a 4-es 2-es 5-ös a 6-os és a 3-as számjegyek.
Ha ezeket be ikszelgetjük két különbözõ szelvényen két egyformán megjátszott szelvényt kapunk.
Ezt figyelembe kell venni mikor ki akarjuk számolni mennyi lehetséges kombináció létezik.
Ezt ha jól olvastam ismétlõdéses permutációnak hívják.
A korábbi példát vesszük alapul és hozzátesszük hogy nem 3 jegyû számokat kell alkotni hanem 3-as kombinációkat (a sorrend nem számít).
Tehát a 2,4,6 kombináció megegyezik a 4,2,6-tal. (és még 4 másik kombinációval is a példában)
Kiszámolva:
5 * 4 * 3     120
---------- = -------  = 20 lehetséges teljesen különbözõ 3-as variációt fogunk kapni.
3*2*1         6
Ennek a képletnek a magyarázata elég nehézkes itt a lényege hogy a megfelelõ értéket adja vissza.
Érthetõbb kiszámítása a következõ lenne:
   
Ha megfigyeltük akkor 6 egyformának számító szám kombinációt kaptunk, ha csak 3 értéket használunk fel (mivel 3-as kombinációkat kell alkotni)
akkor a:
2,6,4
2,4,6
4,2,6
4,6,2
6,2,4
6,4,2
megegyezik. (szintén ha 6 darab szelvényre ikszelgetnénk, egyformán kitöltött szelvényeket kapnánk)
Tehát ebbõl 5 darab felesleges kombinációra nincs szükség. (Mivel egyforma csak a sorrendjük más.)
Tehát már tudjuk hogy 120 lehetséges variáció létezik ha a sorrendet is megkülönböztetésre vesszük, ((5 darab * 4 darab * 3 darab * 2 darab * 1  darab) = 120).
120 / 6 = 20 * 5 = 100;
120 - 100 = 20;
Sok lesz amit írok a lényeg az hogy 5-ös lottó esetében a szkriptben a nyerési esélyt rosszul  írtam.
Helyesen:
 

(90*89*88*87*86) / (1*2*3*4*5) = 43.949.268
Levezetem ezt is, ha csak annyi értéket használunk fel amennyi elembõl kell állnia a lehetséges variációknak 5-öt ((5*4*3*2*1) = 120)
akkor kapnánk egy 120-as értéket amibõl 119 felesleges hiszen egyforma kombinációk csak a leírt sorrendjük más.
90*89*88*87*86 =
    5.273.912.160 / 120 = 43949268 * 119 = 5229962892;
5.273.912.160 - 5.229.962.892 = 43.949.268
Edit: kicsit átfogalmaztam elég nehéz leírni érthetõen

A format az ilyenekre nemjó, mivel lassú.
[pawn]
hInfo[houseid][tulaj][0] = EOS;
strcat(hInfo[houseid][tulaj],  GetPlayerName(playerid), 24);
[/pawn]
 

Off: Zsoleszka ide miért nem jössz rendet tenni? És miért pont csak a másik topicba voltál?
 

+18Várom.