Useful Snippets - 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 Snippets (/showthread.php?tid=281)
+- 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 Snippets (/showthread.php?tid=281)
Re: Useful Snippets - OstGot - 06.02.2016
Saves weapon (on the entrance to the car)
Switch weapon to UZI, MP5 or TEC-9
Switch weapon to the one that was (on exit of the car)
pawn Код:
new ArmedWeapon[MAX_PLAYERS];
public OnPlayerStateChange(playerid, newstate, oldstate)
{
if(newstate == PLAYER_STATE_DRIVER)
{
new weap, ammo;
ArmedWeapon[playerid] = GetPlayerWeapon(playerid);
GetPlayerWeaponData(playerid, 4, weap, ammo);
SetPlayerArmedWeapon(playerid, weap);
}
else if(oldstate == PLAYER_STATE_DRIVER) SetPlayerArmedWeapon(playerid, ArmedWeapon[playerid]);
return 1;
}
Re: Useful Snippets - DRIFT_HUNTER - 23.03.2016
Hooked foreach iterator for FCNPC...probably useless for most of the people...
Please note that MAX_PLAYERS must be actual number of server slots (FCNPC connects NPC's backwards), or replace MAX_PLAYERS macro below...
pawn Код:
new Iterator:FCNPC<MAX_PLAYERS>;
stock FCNPC_CreateHook(name[])
{
new npcid = FCNPC_Create(name);
if(npcid == INVALID_PLAYER_ID) return INVALID_PLAYER_ID;
Iter_Add(FCNPC, npcid);
return npcid;
}
stock FCNPC_DestroyHook(npcid)
{
if(!FCNPC_Destroy(npcid)) return 0;
Iter_Remove(FCNPC, npcid);
return 1;
}
#define FCNPC_Create FCNPC_CreateHook
#define FCNPC_Destroy FCNPC_DestroyHook
pawn Код:
foreach(new npcid : FCNPC
{
//Do your shit...
}
Re: Useful Snippets - Th3UnKnOwN - 01.04.2016
Here's a quick and easy command that uses zcmd, and sscanf. To teleport the player to an NPC. I use it for debugging. Use as you wish.
Код:
CMD:gotonpc(playerid, params[])
{
new targetid, string[128], string2[128], Float:X, Float:Y, Float:Z, vehid;
if(sscanf(params, "d", targetid)) return SendMessage(playerid, COLOR_RED, "USAGE: /gotonpc <NPCID>");
if(IsPlayerNPC(targetid))
{
GetPlayerPos(targetid, X, Y, Z);
SetPlayerPos(playerid, X, Y, Z);
if(IsPlayerInAnyVehicle(targetid))
{
vehid = GetPlayerVehicleID(targetid);
PutPlayerInVehicle(playerid, vehid, 1);
format(string, sizeof(string), "You have teleported to %s(%d)'s vehicle, and have been placed inside.", PlayerName(targetid), targetid);
SendMessage(playerid, COLOR_GREEN, string);
}
else if(!IsPlayerInAnyVehicle(targetid))
{
format(string2, sizeof(string2), "You have teleported to %s(%d)'s current location.", PlayerName(targetid), targetid);
SendMessage(playerid, COLOR_GREEN, string2);
}
}
else if(!IsPlayerNPC(targetid)) return SendMessage(playerid, COLOR_RED, "This player is not an NPC. Please use /goto for actual players.");
return 1;
}
Re: Useful Snippets - SickAttack - 01.04.2016
Count how many times a text was found in a file
pawn Код:
#define plural_singular(%0,%1,%2) ((%0) == 1) ? ((#%1)) : ((#%2))
main()
{
CountTextInFile("count_text_in_file.txt", "hello");
}
stock CountTextInFile(const file_name[], const text[])
{
new File:file = fopen(file_name, io_read);
if(file)
{
new line[128], count, pos, last_pos, length = strlen(text);
while(fread(file, line))
{
for(;;)
{
pos = strfind(line, text, false, last_pos);
if(pos != -1)
{
last_pos = (pos + length);
count ++;
}
else
{
pos = 0;
last_pos = 0;
break;
}
}
}
printf("Found \"%s\" %d %s in \"%s\".", text, count, plural_singular(count, "time", "times"), file_name);
}
else
{
printf("Couldn't open \"%s\".", file_name);
}
fclose(file);
return 1;
}
Quote:
|
hello how are you hey hello hey hello bro hello yo yooooo hello hey yo hello bro |
Found "hello" 6 times in "count_text_in_file.txt".
It could come in handy if you know what to use it for.
For example: On some sort of log, you could execute the following:
CountTextInFile("count_text_in_file.txt", "hacker");
And it will tell you how many times "hacker" was found in the file. You could then check the log and see who said hacker and/or to who.
Re: Useful Snippets - Luicy. - 20.06.2016
-Using hook on OnPlayerEditDynamicObject wont work, since it's over 31 letters.
Here's your fix:
PHP код:
forward OPEDO(playerid, objectid, response, x, y, z, rx, ry, rz);
public OPEDO(playerid, objectid, response, x, y, z, rx, ry, rz)
{
CallRemoteFunction("OnPlayerEditDynamicObject", "iisffffff", playerid, objectid, response, x, y, z, rx, ry, rz);
}
PHP код:
hook OPEDO(playerid, objectid, response, Float:x, Float:y, Float:z, Float:rx, Float:ry, Float:rz)
Re: Useful Snippets - Logic_ - 12.08.2016
Hats object IDs:
PHP код:
19069,
19096,
19068,
18976,
18969,
19098,
19106,
19521,
12528,
19163,
19137, // cluck n bell
19113,
18968,
18962,
18929,
18933,
18903,
18899,
18894,
18934,
18944,
18957,
18951,
18947,
18945,
18636
Re: Useful Snippets - SyS - 29.10.2016
Sudoku solver using Recursive Backtracking Algorithm - pawn version
This was one of my favourite programs that i did in c++ .I decided to port it to pawn. It can be useful for making mini games like sudoku.
Gist Link
PHP код:
/*
Sudoku solver using
Recursive Backtracking algorithm
pawn version by Sreyas
*/
UAN(a[][9],&i,&j)
{
for(i=0;i<9;i++)
for(j=0;j<9;j++)
if(a[i][j]==0)
return 1;
return 0;
}
ROW(a[][9],in,num)
{
for(new i=0;i<9;i++)
if(a[in][i]==num)
return 1;
return 0;
}
COL(a[][9],in,num)
{
for(new i=0;i<9;i++)
if(a[i][in]==num)
return 1;
return 0;
}
GRID(a[][9],i,j,num)
{
for(new u=0;u<3;u++)
for(new y=0;y<3;y++)
if(a[i+u][j+y]==num)
return 1;
return 0;
}
safe(a[][9],i,j,num)
{
if(!ROW(a,i,num)&&!COL(a,j,num)&&!GRID(a,i-i%3,j-j%3,num))
return 1;
return 0;
}
solve(a[][9])
{
new i,j;
if(!UAN(a,i,j))
return 1;
for(new k=1;k<=9;k++)
{
if(safe(a,i,j,k))
{
a[i][j] = k;
if(solve(a))
return 1;
a[i][j] = 0;
}
}
return 0;
}
main()
{
//initialize the below matrix with your sudoku assuming empty space as 0
new a[9][9] =
{
{0,8,0, 7,1,2, 0,9,0},
{0,0,0, 0,0,0, 7,1,0},
{0,0,0, 0,9,4, 2,6,0},
{0,0,0, 3,6,0, 4,0,5},
{5,0,0, 0,0,0, 0,0,9},
{7,0,6, 0,2,5, 0,0,0},
{0,5,8, 2,7,0, 0,0,0},
{0,1,7, 0,0,0, 0,0,0},
{0,6,0, 9,4,1, 0,5,7}
};
if(solve(a))
{
for(new i=0;i<9;i++)
{
for(new j=0;j<9;j++)
{
printf("%d ",a[i][j]);
if((j+1)%3==0)printf(" ");
}
printf("\n");
if((i+1)%3==0)printf("\n");
}
}
else printf("NO solution");
}
Re: Useful Snippets - SyS - 31.10.2016
Alphabet Sorter
This function sorts the strings in alphabetical order
Gist Link
PHP код:
#define strcpy(%0,%1) strcat((%0[0] = '\0', %0), %1)
/*Alphabet sorter by Sreyas*/
alpha(str[MAX_NAMES][MAX_PLAYER_NAME]) //MAX_NAME - total number of strings in that matrix
{
new i, j,t[24];
for(i=1; i<MAX_NAMES; i++)
{
for(j=1; j<MAX_NAMES; j++)
{
if(strcmp(str[j-1], str[j])>0)
{
strcpy(t, str[j-1]);
strcpy(str[j-1], str[j]);
strcpy(str[j], t);
}
}
}
printf("Names in alphabetical order ");
for(i=0; i<MAX_NAMES; i++)
{
printf("%s",str[i]);
}
}
Re: Useful Snippets - Kar - 13.12.2016
Just adding this here so it doesn't get lost.
Automatic house replacement in GTA.
Quote:
|
Originally Posted by [HLF]Southclaw
 I made an edit that adds doors and windows to all house models.
It took a while! So to save other people having to do it, I'll release it here! I also added some more default models to replace, in total I think there are around 150 houses replaced in each city, instead of 40 in SF/33 in LV/80 in LS. Thank you again to YJIET for his function to get attached object offsets, I used the code to position the extra objects based on the house rotation. pawn Код:
|
Re: Useful Snippets - Logic_ - 20.12.2016
Hostname Changer
I made this script for fun when I was bored.
Features:
- Requires no or very basic scripting knowledge
- Very easy to write and read
- Never selects a previously selected hostname!
PHP код:
/*
Script Documentation
Script name: Hostname Changer
Script by: Logic_
Script made in: 5 minutes
Script indentation: perfect
Script tested: yes
*/
// Includes
#include <a_samp>
// Defines
#define FILTERSCRIPT // define if you want to use it as a FS
#define DEFAULT_TIME (5) // In seconds
// Arrays & Variables
new HOST[]=
{
{"Script by Logic_"}, // Message ID 0
{"Logic_"}, // Messaege ID 1
{"No restrictions!"}, // Message ID 2
{"Add as many names you want"} // Message ID 3
}, TimerCH, HostLast = -1;
// Forwards
forward ChangeHost();
// Callbacks
#if defined FILTERSCRIPT
public OnFilterScriptInit()
{
TimerCH = SetTimer("ChangeHost", DEFAULT_TIME * 1000, true);
return 1;
}
public OnFilterScriptExit()
{
KillTimer(TimerCH);
return 1;
}
#else
public OnGameModeInit()
{
TimerCH = SetTimer("ChangeHost", DEFAULT_TIME * 1000, true);
return 1;
}
public OnGameModeExit()
{
KillTimer(TimerCH);
return 1;
}
#endif
FetchHostID()
{
new ID = random(sizeof HOST);
return (ID == HostLast) ? FetchHostID() : ID;
}
public ChangeHost()
{
new ID = FetchHostID(), str[60] = "hostname ";
HostLast = ID;
strcat(str, HOST[ID][HOSTNAME]);
SendRconCommand(str);
return 1;
}
Re: Useful Snippets - Konstantinos - 20.12.2016
pawn Код:
KillTimer(ChangeHost());
The enumeration is not really needed and sizeof HOST is a constant, what's the point in storing it to a variable?
Re: Useful Snippets - SickAttack - 20.12.2016
str[60] = "hostname" would also be better.
Re: Useful Snippets - Logic_ - 23.12.2016
Workpoints(INCOMPLETE)
This is snippet of a incomplete system, modify and use it as to your needs.
PHP код:
/*
Script Documentation
Script Name: Workpoints
Script By: AliScripter
Script Indentation: Perfect
*/
// Includes
#include <a_samp>
#include <streamer>
// Enums
enum E_WORKPOINTS
{
Text[50],
Float: X,
Float: Y,
Float: Z,
Checkpoint,
Text3D: Label
};
// Arrays and Variables
new gWorkpoints[][E_WORKPOINTS] =
{
{"{FF00FF}Hospital\n{FFFFFF}Press 'N'", 0.0, 0.0, 0.0},
{"{FF00FF}Testing\n{FFFFFF}Press 'N'", 1.1, 1.1, 0.0}
};
// Defines
#define FILTERSCRIPT
// Callbacks
#if defined FILTERSCRIPT
public OnFilterScriptInit()
{
LoadWorkpoints();
return 1;
}
public OnFilterScriptExit()
{
UnloadWorkpoints();
return 1;
}
#endif
LoadWorkpoints()
{
for(new i, j = sizeof gWorkpoints; i < j; i++)
{
gWorkpoints[i][Checkpoint] = CreateDynamicCP(gWorkpoints[i][X], gWorkpoints[i][Y], gWorkpoints[i][Z], 4.0);
gWorkpoints[i][Label] = CreateDynamic3DTextLabel(gWorkpoints[i][Text], 0xFFFFFFFF, gWorkpoints[i][X], gWorkpoints[i][Y], gWorkpoints[i][Z] + 2.0, 100.0);
}
return 1;
}
UnloadWorkpoints()
{
for(new i, j = sizeof gWorkpoints; i < j; i++)
{
DestroyDynamicCP(gWorkpoints[i][Checkpoint]);
DestroyDynamic3DTextLabel(gWorkpoints[i][Label]);
}
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys & KEY_NO)
{
for(new i, j = sizeof gWorkpoints; i < j; i++)
{
if(IsPlayerInRangeOfPoint(playerid, 3.0, gWorkpoints[i][X], gWorkpoints[i][Y], gWorkpoints[i][Z])
{
// Your Code
}
}
}
return 1;
}
Re: Useful Snippets - oMa37 - 31.12.2016
Teleport player to the nearest hospital on death
GTA SA Singleplayer Feature
Credits to Konstantinos!GTA SA Singleplayer Feature
PHP код:
new Float:Hospitalcoor[][4] =
{
{2027.4375,-1421.0703,16.9922,137.2809}, // Los Santos Hospital
{1177.9089,-1323.9611,14.0939,269.8222}, // Los Santos Hospital #2
{1579.6106,1769.0625,10.8203,90.7178}, // Las Venturas Hospital
{-321.8259,1056.7279,19.7422,316.0064}, // Fort Carson Hospital
{-1514.8807,2527.8003,55.7315,358.6234}, // El Quebrados Hospital
{-2662.0439,630.5056,14.4531,177.8114}, // San Fierro Hospital
{-2199.2495,-2311.0444,30.6250,321.2772}, // Angel Pine Hospital
{1244.1959,332.2817,19.5547,338.3063} // Montgomery Hospital
};
public OnPlayerDeath(playerid, killerid, reason) {
new Float:distance = 99999.0,
Float:tmp_distance, closest = -1;
for (new i, j = sizeof(Hospitalcoor); i < j; i++)
{
tmp_distance = GetPlayerDistanceFromPoint(playerid, Hospitalcoor[i][0], Hospitalcoor[i][1], Hospitalcoor[i][2]);
if (tmp_distance < distance)
{
distance = tmp_distance;
closest = i;
}
}
SetSpawnInfo(playerid, NO_TEAM, GetPlayerSkin(playerid), Hospitalcoor[closest][0], Hospitalcoor[closest][1], Hospitalcoor[closest][2], Hospitalcoor[closest][3], 0, 0, 0, 0, 0, 0);
return 1;
}
Re: Useful Snippets - OstGot - 31.12.2016
Quote:
|
Originally Posted by oMa37
Teleport player to the nearest hospital
Credits to Konstantinos!GTA SA Singleplayer Feature PHP код:
|
PHP код:
public OnPlayerDeath(playerid, killerid, reason) {
new closest, Float:distance = 99999.9; //
for (new i, j = sizeof(Hospitalcoor), Float:tmp_distance; i < j; i++) //Float:tmp_distance
{
tmp_distance = GetPlayerDistanceFromPoint(playerid, Hospitalcoor[i][0], Hospitalcoor[i][1], Hospitalcoor[i][2]);
if (tmp_distance < distance)
{
distance = tmp_distance;
closest = i;
}
}
SetSpawnInfo(playerid, NO_TEAM, GetPlayerSkin(playerid), Hospitalcoor[closest][0], Hospitalcoor[closest][1], Hospitalcoor[closest][2], Hospitalcoor[closest][3], 0, 0, 0, 0, 0, 0);
return 1;
}
Re: Useful Snippets - oMa37 - 31.12.2016
My bad, Updated, Thanks!
Re: Useful Snippets - Konstantinos - 31.12.2016
No need to give credits to me, I had just given an example for the loop. Since then, I've been using a nice way I saw from Nero_3D:
Getting the distance from the first hospital (index 0) out of the loop and then start the loop by i = 1 so we won't initialize to 99999.9
Re: Useful Snippets - oMa37 - 09.01.2017
Stop death abuse in your server!
PHP код:
#include <a_samp>
new AbuseTick[MAX_PLAYERS];
public OnPlayerTakeDamage(playerid, issuerid, Float:amount, weaponid, bodypart) {
if(issuerid != INVALID_PLAYER_ID) AbuseTick[playerid] = gettime();
return 1;
}
DisableCommand(playerid, time) { // Time in seconds
return (gettime() - AbuseTick[playerid] < time);
}
// Example Usage;
CMD:teleport(playerid) {
if(DisableCommand(playerid, 15)) return SendClientMessage(playerid, -1, "You have been attacked by another player.");
// OR ...
if(gettime() - AbuseTick[playerid] < 15) /* 15 Seconds */ return SendClientMessage(playerid, -1, "You have been attacked by another player.");
// Other stuff
return 1;
}
Stop command abuse in your server!
PHP код:
#include <a_samp>
new CoolDownCMD[MAX_PLAYERS];
CMD:teleport(playerid) {
new string[45],
currenttime = gettime();
new cooldown = (CoolDownCMD[playerid] + 120 /* 120 is the seconds - 2 minutes | you can change it to whatever you want */) - currenttime;
format(string, sizeof(string),"You have to wait %d:%02d minutes/seconds", cooldown / 60, cooldown % 60);
if(currenttime < (CoolDownCMD[playerid] + 120 /* 120 is the seconds - 2 minutes | you can change it to whatever you want */)) return SendClientMessage(playerid, -1, string);
CoolDownCMD[playerid] = gettime();
// Other stuff
return 1;
}
Re: Useful Snippets - Lordzy - 09.01.2017
Quote:
|
Originally Posted by oMa37
Stop death abuse in your server!
PHP код:
Stop command abuse in your server!
PHP код:
|
To stop command spams and death evade, you could use the callbacks that are called when the command is attempted. Having these functions in every commands isn't the right way. Simply update the last command call under the callback that's called AFTER the command is performed.
I do realise there are other command processors but I've been talking about zcmd. If the ones you're using doesn't provide such features, I wouldn't recommend their usage at all.
Re: Useful Snippets - oMa37 - 12.01.2017
Start a ******* song by its name in-game!
Such a small code that I just found, Which start the song/video audio without entering the whole URL, only the song/video name. PHP код:
CMD:startsong(playerid, params[]) {
if(isnull(params)) return SendClientMessage(playerid, -1, "Start ******* song: /startsong <Song Name>");
format(params, 145, "https://6t.pe/?song=%s", params);
PlayAudioStreamForPlayer(playerid, params);
return 1;
}
.