Započeo Obrisan korisnik
•24. Mar. 2010.• ZaključanoServer update: 0.3a R8
11,671
pregleda
25
postova
24. Mar. 2010.
Kye wrote on March 24, 2010, 1:25 am:
Some handy utils functions for dealing with lists of PVars:
//-------------------------------------------
// Sends a list of all PVars to the player as
// client messages.
SendPVarListToPlayer(playerid)
{
new ubound = GetPVarsUpperIndex(playerid);
new x=0;
new name[40+1];
new line[128+1];
SendClientMessage(playerid,0xF000F0F0, "---Player Vars List---");
while(x != ubound) {
if(GetPVarNameAtIndex(playerid,x,name,40)) {
if(Util_GetPVarEntryAsString(playerid,name,line,12😎) {
SendClientMessage(playerid,0xFFFFFFFF,line);
}
}
x++;
}
}
//-------------------------------------------
// return PVar entry as 'name'='value' string
stock Util_GetPVarEntryAsString(playerid, name[], ret[], len)
{
new Float:fValue;
new iValue;
new szStrValue[1024+1]; // this might require greater size if you store large strings in PVars
new type;
ret = EOS;
type = GetPVarType(playerid, name);
if(type != PLAYER_VARTYPE_NONE) {
switch(type)
{
case PLAYER_VARTYPE_STRING:
{
GetPVarString(playerid,name,szStrValue,1024);
format(ret,len,"%s=%s",name,szStrValue);
}
case PLAYER_VARTYPE_INT:
{
iValue = GetPVarInt(playerid,name);
format(ret,len,"%s=%d",name,iValue);
}
case PLAYER_VARTYPE_FLOAT:
{
fValue = GetPVarFloat(playerid,name);
format(ret,len,"%s=%f",name,fValue);
}
}
return 1;
}
return 0;
}
//-------------------------------------------
// Fills the provided string with all the player's PVars
// seperated by the specified 'delimiter'
stock Util_CreatePVarList(playerid, retstr[], len, delimiter[])
{
if(!IsPlayerConnected(playerid)) return 0;
new x=0;
new remaining_string=len;
new line[2048+1];
new name[40+1];
retstr = EOS;
new ubound = GetPVarsUpperIndex(playerid);
while(x != ubound) {
if(GetPVarNameAtIndex(playerid,x,name,40)) {
if(Util_GetPVarEntryAsString(playerid,name,line,204😎) {
// if there is enough space, concat this line to the return string
if(remaining_string > (strlen(line) + strlen(delimiter))) {
strcat(retstr,line);
strcat(retstr,delimiter);
remaining_string -= (strlen(line) + strlen(delimiter));
}
}
}
x++;
}
return 1;
}
//-------------------------------------------
//-------------------------------------------
// Sends a list of all PVars to the player as
// client messages.
SendPVarListToPlayer(playerid)
{
new ubound = GetPVarsUpperIndex(playerid);
new x=0;
new name[40+1];
new line[128+1];
SendClientMessage(playerid,0xF000F0F0, "---Player Vars List---");
while(x != ubound) {
if(GetPVarNameAtIndex(playerid,x,name,40)) {
if(Util_GetPVarEntryAsString(playerid,name,line,12😎) {
SendClientMessage(playerid,0xFFFFFFFF,line);
}
}
x++;
}
}
//-------------------------------------------
// return PVar entry as 'name'='value' string
stock Util_GetPVarEntryAsString(playerid, name[], ret[], len)
{
new Float:fValue;
new iValue;
new szStrValue[1024+1]; // this might require greater size if you store large strings in PVars
new type;
ret = EOS;
type = GetPVarType(playerid, name);
if(type != PLAYER_VARTYPE_NONE) {
switch(type)
{
case PLAYER_VARTYPE_STRING:
{
GetPVarString(playerid,name,szStrValue,1024);
format(ret,len,"%s=%s",name,szStrValue);
}
case PLAYER_VARTYPE_INT:
{
iValue = GetPVarInt(playerid,name);
format(ret,len,"%s=%d",name,iValue);
}
case PLAYER_VARTYPE_FLOAT:
{
fValue = GetPVarFloat(playerid,name);
format(ret,len,"%s=%f",name,fValue);
}
}
return 1;
}
return 0;
}
//-------------------------------------------
// Fills the provided string with all the player's PVars
// seperated by the specified 'delimiter'
stock Util_CreatePVarList(playerid, retstr[], len, delimiter[])
{
if(!IsPlayerConnected(playerid)) return 0;
new x=0;
new remaining_string=len;
new line[2048+1];
new name[40+1];
retstr = EOS;
new ubound = GetPVarsUpperIndex(playerid);
while(x != ubound) {
if(GetPVarNameAtIndex(playerid,x,name,40)) {
if(Util_GetPVarEntryAsString(playerid,name,line,204😎) {
// if there is enough space, concat this line to the return string
if(remaining_string > (strlen(line) + strlen(delimiter))) {
strcat(retstr,line);
strcat(retstr,delimiter);
remaining_string -= (strlen(line) + strlen(delimiter));
}
}
}
x++;
}
return 1;
}
//-------------------------------------------
Link na SA:MP forumu
Nije mi se dalo prevodit jer imam puno obaveza sada.
Pozdrav,
Correlli
Kingpin
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
240 / 250 XP
Početnik(0)
1,007
Postovi:
12
Teme:
Pridružio se:Nov. 2009
24. Mar. 2010.
forward OnVehicleDamageStatusUpdate(vehicleid, playerid);
native GetVehicleDamageStatus(vehicleid, &panels, &doors, &lights, &tires);
native UpdateVehicleDamageStatus(vehicleid, panels, doors, lights, tires);ovo otvara puno vise mogucnosti...
24. Mar. 2010.
Sam wrote on March 24, 2010, 10:46 am:
forward OnVehicleDamageStatusUpdate(vehicleid, playerid);
native GetVehicleDamageStatus(vehicleid, &panels, &doors, &lights, &tires);
native UpdateVehicleDamageStatus(vehicleid, panels, doors, lights, tires);ovo otvara puno vise mogucnosti...
Enforcer
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
40 / 100 XP
Početnik(0)
262
Postovi:
6
Teme:
Pridružio se:Sep. 2009
Made Man
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
90 / 100 XP
Početnik(0)
447
Postovi:
40
Teme:
Pridružio se:Dec. 2009
Enforcer
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
40 / 100 XP
Početnik(0)
262
Postovi:
6
Teme:
Pridružio se:Sep. 2009
24. Mar. 2010.
a i napokon je moguce promijeniti stanje svijetla tj. moci ce se upalit/ugasit svijetla po zelji 😎
Godfather
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
240 / 250 XP
Početnik(0)
2,231
Postovi:
45
Teme:
Pridružio se:Jun 2009
24. Mar. 2010.
Samparena~Tinu_Tuna wrote on March 24, 2010, 4:20 pm:
Konacno nesto dodato bice dobro policiji da radi to sa onim sto busi gume i za svijetla ce bit dobro , svaka cast dobro ce bit igrat na stunt i rp serverima
Ovo ce vise za rp servere bit, npr kad te policija lovi pa ti gume busi i ako nemas svijetla upaljena kazna itd...sve u svemu super!!!
Enforcer
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
40 / 100 XP
Početnik(0)
262
Postovi:
6
Teme:
Pridružio se:Sep. 2009
24. Mar. 2010.
eto isprobah busenje guma i jedva cekam da dode na neki rp server pa vise nece biti prednosti ako je osumljiceni u npr. sultanu 😄
Made Man
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
90 / 100 XP
Početnik(0)
387
Postovi:
30
Teme:
Pridružio se:Maj 2009
Enforcer
Balkan SA:MP
SA-MP Doprinos
Balkan SA:MP
SA-MP DoprinosNovi Član
40 / 100 XP
Početnik(0)
232
Postovi:
9
Teme:
Pridružio se:Dec. 2009
25. Mar. 2010.
Windows: http://files.sa-mp.com/samp03asvr_R5-2_win32.zip (The Windows server was re-uploaded as R5-2 because of a bad compile. Please re-download.)
Morate biti prijavljeni da biste odgovorili na ovu temu.
Prijava