Useful Functions - Printable Version
+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: SA-MP Scripting and Plugins (https://sampforum.blast.hk/forumdisplay.php?fid=8)
+--- Forum: Filterscripts (https://sampforum.blast.hk/forumdisplay.php?fid=17)
+--- Thread: Useful Functions (/showthread.php?tid=38965)
+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: SA-MP Scripting and Plugins (https://sampforum.blast.hk/forumdisplay.php?fid=8)
+--- Forum: Filterscripts (https://sampforum.blast.hk/forumdisplay.php?fid=17)
+--- Thread: Useful Functions (/showthread.php?tid=38965)
Re: Useful Functions - smeti - 28.02.2011
@Ryder
Try:
pawn Код:
stock
filterColorTags_teszt(string[])
{
new
start,
end;
while((start = strfind(string, "{", false, start)) != -1)
{
if((end = strfind(string, "}", false, start + 1)) != -1)
{
strdel(string, start, end + 1);
start -= end - start;
} else start++;
}
}
Re: Useful Functions - RyDeR` - 28.02.2011
Why would I if my code works already? Nice anyway.
Re: Useful Functions - leong124 - 02.03.2011
pawn Код:
#if !defined isnull
#define isnull(%1) ((!(%1[0])) || (((%1[0]) == '\1') && (!(%1[1]))))
#endif
//Credits for the isnull macro goes to ******, I just use it in the function below.
stock strcmpex(const string1[],const string2[],bool:ignorecase = false,length = cellmax)
{
if(!isnull(string1) && !isnull(string2))
{
new len1 = strlen(string1),len2 = strlen(string2);
if(len1 == len2 || length != cellmax)
{
if(length > len1) length = len1;
if(!ignorecase)
{
for(new i = 0;i < length;i++)
if(string1[i] != string2[i]) return 1;
}
else
{
for(new i = 0;i < length;i++)
if(string1[i] != string2[i])
{
switch(string1[i])
{
case 'A'..'Z','a'..'z':
{
switch(string2[i])
{
case 'A'..'Z','a'..'z': if((string1[i] | 0x20) != (string2[i] | 0x20)) return 1;
default: return 1;
}
}
default: return 1;
}
}
}
return 0;
}
}
else if(isnull(string1) && isnull(string2)) return 0;
return 1;
}
#if defined strcmp
#undef strcmp
#endif
#define strcmp strcmpex
- Faster than the original strcmp when ignoring case in a longer string length.
- Fixed a bug a strcmp that null string will be equal to anything.
- Fixed a crashing bug in strcmp but I forgot the code
(May be fixed already)
EDIT:
Now fixed a bug on ignoring case and the fix improved the speed a bit(by around 5%).
AW: Re: Useful Functions - Nero_3D - 06.03.2011
Quote:
|
Originally Posted by pmkrz
 system:
 trCheck (stupid name) fixed ! (I do think so xd)pawn Код:
|
At the end its only harder to read and not understandable if you have no clue about the ascii code for the letters
And is not any faster than a "normal" version
Than the switch(l) is just a waste, use if(l ==
After the ic you should use an else and return the result instead of GOTO
Remove the b and return there the result, too
And remove one of the c's because the other is (c + 1) or (c - 1)
@******
I was only wondering
Because there werent any documentation
Nor any definitions in the includes
But it should be clear now, thx
Re: Useful Functions - RyDeR` - 06.03.2011
Yeah, indeed. Also, why do you have such an overdone indentitation (at some parts)? That looks actually ugly (not that it matters)
EDIT: Which one's faster now?
Re: Useful Functions - pmkrz - 06.03.2011
@Nero_3D: I use binary code because it is just the way I have to practice that type of coding. Nothing more.
@Nero_3D, ******, Ryder: About the indentation, I think that everyone have yours so..
Thanks anyway. ( :
Re: Useful Functions - Slice - 06.03.2011
Quote:
|
Originally Posted by pmkrz
I use binary code because it is just the way I have to practice that type of coding. Nothing more.
|
Re: Useful Functions - pmkrz - 06.03.2011
Didn't you understand ? : o
I mean, there is a simple reason for my use of binary:
- It's a way, for me, to practice those binary techniques. Understood ? ( :
Re: Useful Functions - pmkrz - 06.03.2011
Copy that. ( :
Re: Useful Functions - Kwarde - 07.03.2011
RemovePlayerWeapon(playerid, {_}...)
USAGE: RemovePlayerWeapon(playerid, weaponid);
You can use multilple weapons, eg.
RemovePlayerWeapon(playerid, 38, 29, 4, 36, 35);
The code:
pawn Код:
stock RemovePlayerWeapon(playerid, {_}:...)
{
new pWepInfo[13][2], pCurWep, WepID,
ammount = numargs()
;
pCurWep = GetPlayerWeapon(playerid);
for(new i = 0; i < 13; i++)
GetPlayerWeaponData(playerid, i, pWepInfo[i][0], pWepInfo[i][1]);
ResetPlayerWeapons(playerid);
for(new i = 1; i < ammount; i++){
WepID = getarg(i);
for(new w = 0; w < 13; w++)
if(pWepInfo[w][0] == WepID)
pWepInfo[w][0] = 0;
}
for(new i = 0; i < 13; i++)
GivePlayerWeapon(playerid, pWepInfo[i][0], pWepInfo[i][1]);
SetPlayerArmedWeapon(playerid, pCurWep);
}
pawn Код:
CMD:wep(playerid, params[])
{
ResetPlayerWeapons(playerid);
GivePlayerWeapon(playerid, 4, 1);
GivePlayerWeapon(playerid, 29, 500);
GivePlayerWeapon(playerid, 31, 500);
GivePlayerWeapon(playerid, 38, 500);
return 1;
}
CMD:testrpw(playerid, params[])
{
RemovePlayerWeapon(playerid, 29, 38);
return 1;
}
Re: Useful Functions - Slice - 07.03.2011
That would cause weapons with ammo above 30,000 to get negative values mostly. You could just use SetPlayerAmmo!
Re: Useful Functions - Slice - 07.03.2011
Quote:
|
Originally Posted by Slice
You could just use SetPlayerAmmo!
|
Re: Useful Functions - Slice - 07.03.2011
Quote:
|
Originally Posted by ******
I'm not quite sure why you said that tbh, unless GetPlayerWeaponData ammo is only 16 bit, which I'm not sure about now.
|
Re: Useful Functions - sciman001 - 22.03.2011
Quote:
|
Originally Posted by LarzI
We had soo many useful functions, why did it have to fuck up??
Thanks for the link WeeDarr |
i loled soooooo hard!!!!!
AW: Respuesta: Useful Functions - Nero_3D - 26.03.2011
Mod 2 and Mod 4 ? Yeah sure
pawn Код:
if( !(iValor % 2) || !(iValor % 3) || !(iValor % 4) || (iValor == 1)) return false;
pawn Код:
while(iCount++ < floatsqroot(iValor))
if( !(iValor % iCount) && (iValor != iCount) ) return false;
pawn Код:
stock IsPrime(value)
{
if((value < 4) || (value & 0b1) == 0) {
if((value == 2) || (value == 3)) {
return true;
}
return false;
}
new
i = floatround(floatpower(value, 0.5), floatround_floor);
if((i & 0b1) == 0) {
i--;
}
while(i > 2) {
if((value % i) == 0) {
return false;
}
i -= 2;
}
return true;
}
I dont know if thats faster but
pawn Код:
stock DecimalToBinary(const iNum)
{
new string[cellbits + 1];
format(string, sizeof string, "%b", iNum);
return strval(iNum);
}
Re: Useful Functions - RyDeR` - 26.03.2011
@Nero_3D:
Yes, both of your functions are a lot faster.
@[FeK]DraKiNs:
Here's my version of GetWeekOfDate:
pawn Код:
stock GetWeekOfDate(day, month, year)
{
if((0 < day <= 31) && (0 < month <= 12))
{
new
days_In_Month[12] = { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 },
total_Days
;
for(new i; i < month - 1; ++i)
{
total_Days += days_In_Month[i];
}
return (total_Days + ((((!(year % 4) && (year % 100) != 0)) || !(year % 400)) ? (1) : (0)) + day) / 7;
}
return -1;
}
Re: Useful Functions - Toribio - 27.03.2011
Why using "static" in this case? And why using hexadecimal forms?
Re: Respuesta: Useful Functions - RyDeR` - 28.03.2011
@[FeK]DraKiNs
Just a question, why do you use hex codes all the time? They don't make your code faster either better looking. The only thing you do using them is losing time and make your code hard-readable for people that wants to know the values.
Re: Useful Functions - steki. - 30.03.2011
Quote:
|
Originally Posted by Toribio
Why using "static" in this case? And why using hexadecimal forms?
|
Re: Useful Functions - General Abe - 30.03.2011
pawn Код:
stock strtok_two(szParser[], &iPos) {
new
szResult[20];
while(szParser[iPos] == ' ') ++iPos;
strmid(szResult, szParser, iPos, (strfind(szParser, " ", false, iPos + 1) != -1) ? (strfind(szParser, " ", false, iPos + 1)) : (strlen(szParser)), sizeof(szResult));
iPos = (strfind(szParser, " ", false, iPos + 1) != -1) ? (strfind(szParser, " ", false, iPos + 1)) : (strlen(szParser));
return szResult;
}
Код:
[20:25:08] GetParam - 24194ms [20:25:34] strtok v1 - 26096ms [20:25:44] strtok v2 - 9715ms