- Beranda
- Private Servers
SA-MP (GTA:SA Online) Scripting Thread
...
TS
Diagram
SA-MP (GTA:SA Online) Scripting Thread
moga" ga salah tempat
maksud hati mo nanya mod apa cocok disini ato di bagian programming di sebelah tapi om DarK_NekO masih belom bales selama 1 minggu jadi inisiatif bikin dulu 
tret ini mau dibikin jadi ajang pembahasan script di SAMP dan sekaligus tempat bertemu dengan org" yg memang bisa scripting, mendidik mereka yang mengaku scripter tetapi tidak bisa, dan sharing tips dan trik dalam scripting yang efisien
so, monggo
akhir kata maaf kalo ada yang salah dan diminta supportnya atas tret ini
maksud hati mo nanya mod apa cocok disini ato di bagian programming di sebelah tapi om DarK_NekO masih belom bales selama 1 minggu jadi inisiatif bikin dulu 
tret ini mau dibikin jadi ajang pembahasan script di SAMP dan sekaligus tempat bertemu dengan org" yg memang bisa scripting, mendidik mereka yang mengaku scripter tetapi tidak bisa, dan sharing tips dan trik dalam scripting yang efisien

so, monggo

Quote:
Quote:
Quote:
Quote:
Quote:
Quote:
Quote:
Quote:
akhir kata maaf kalo ada yang salah dan diminta supportnya atas tret ini

0
34.2K
143
Komentar yang asik ya
Mari bergabung, dapatkan informasi dan teman baru!
Private Servers
3.2KThread•3.5KAnggota
Tampilkan semua post
DexoZoid
#65
gan ane mau nanya
ane mau nanya neh gimana cara ngilangin tanda player dari radar
ama neh gan sistem clan ane kayaknya ada bug tolong benerin gan
kalo bisa tolong kasih AttachPlayer3DTextLabel di atas HP player gan textnya sesuai ama nama clannya gan bisa gk
ane mau nanya neh gimana cara ngilangin tanda player dari radar
ama neh gan sistem clan ane kayaknya ada bug tolong benerin gan
kalo bisa tolong kasih AttachPlayer3DTextLabel di atas HP player gan textnya sesuai ama nama clannya gan bisa gk
Code:
\tif(strcmp(cmd, "/fteam",true)==0) // leave it like tis, its buggy atm
\t{
\t\tnew teamcmd, teamnum;
\t\ttmp = strtok(cmdtext, idx);
\t\tif(!strlen(tmp))
\t\t{
\t\t\tSendClientMessage(playerid, COLOR_WHITE, "USAGE: /fteam [create/join/quit] [name/number]");
\t\t\treturn 1;
\t\t}
\t\tgiveplayerid = strval(tmp);
\t\tif(strcmp(tmp, "create",true)==0)
\t\t\tteamcmd = 1;
\t\telse if(strcmp(tmp, "join",true)==0)
\t\t\tteamcmd = 2;
\t\telse if(strcmp(tmp, "invite",true)==0)
\t\t\tteamcmd = 3;
\t\telse if(strcmp(tmp, "quit",true)==0)
\t\t\tteamcmd = 4;
\t\ttmp = strtok(cmdtext, idx);
\t\tif(teamcmd < 4 && !strlen(tmp)) {
\t\t\tif(teamcmd==0)
\t\t\t\tSendClientMessage(playerid, COLOR_WHITE, "USAGE: /fteam [create/join/invite/quit] [name/number]");
\t\t\telse if(teamcmd==1)
\t\t\t\tSendClientMessage(playerid, COLOR_WHITE, "USAGE: /fteam [create] [name]");
\t\t\telse if(teamcmd==2)
\t\t\t\tSendClientMessage(playerid, COLOR_WHITE, "USAGE: /fteam [join] [number]");
\t\t\telse if(teamcmd==3)
\t\t\t\tSendClientMessage(playerid, COLOR_WHITE, "USAGE: /fteam [invite] [playerID]");
\t\t\treturn 1;
\t\t}
\t\t//Create Gang//
\t\tnew string[128];
\t\tif(teamcmd==1) {
\t\t\tif(playerTeam[playerid]>0) {
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "You are already in a fireteam!");
\t\t\t\treturn 1;
\t\t\t}
\t\t\tfor(new i = 1; i < MAX_TEAMS; i++) {
\t\t\t\tif(teamInfo[i][0]==0) {
\t\t\t\t\t//name team
\t\t\t\tformat(teamNames[i], MAX_TEAM_NAME, "%s", tmp);
\t\t\t\t\t//Team exists
\t\t\t\t\tteamInfo[i][0]=1;
\t\t\t\t\t//There is one member
\t\t\t\t\tteamInfo[i][1]=1;
\t\t\t\t\t//Team color is player's color
\t\t\t\t\tteamInfo[i][2]=playerColors[playerid];
\t\t\t\t\t//Player is the first team member
\t\t\t\t\tteamMembers[i][0] = playerid;
\t\t\t\t\tformat(string, sizeof(string),"You have created the fireteam '%s' (id: %d)", teamNames[i], i);
\t\t\t\t\tSendClientMessage(playerid, COLOR_GREEN, string);
\t\t\t\t\tplayerTeam[playerid]=i;
\t\t\t\t\tSetPlayerMoney(playerid, GetPlayerMoney(playerid) -20000);
\t\t\t\t\treturn 1;
\t\t\t\t}
\t\t\t}
\t\t\treturn 1;
\t\t\t//Join Gang//
\t\t} else if (teamcmd==2) {
\t\t\tteamnum = strval(tmp);
\t\t if(playerTeam[playerid]>0)
\t\t\t{
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "You are already in a fireteam!");
\t\t\t\treturn 1;
\t\t }
\t\t if(gTeam[teamMembers[teamnum][0]] != gTeam[playerid] )
\t\t {
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "You need to be in the same fireteam with the leader !");
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "Eg. : USA, Germany, Russia, Japan, Mercenaries !");
\t\t return 1;
\t\t }
\t\t\tif(teamInfo[teamnum][0]==0)
\t\t\t{
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "No such fireteam exists!");
\t\t\t\treturn 1;
\t\t\t}
\t\t\tif(teamInvite[playerid]!=teamnum)
\t\t\t{
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "You need to be invited to the fireteam to join.");
\t\t\t\treturn 1;
\t\t\t}
\t\t\tfor(new i = 0; i < MAX_TEAM_MEMBERS; i++)
\t\t\t{
\t\t\t\tif(teamMembers[teamnum][i] > 0 )
\t\t\t\t{
\t\t\t\t\tif(teamInfo[teamnum][1] < MAX_TEAM_MEMBERS)
\t\t\t\t\t{
\t\t\t\t\t\tteamMembers[teamnum][i] = playerid;
\t\t\t\t\t\tGetPlayerName(playerid, sendername, MAX_PLAYER_NAME);
\t\t\t\t\t\tfor(new j = 0; j < teamInfo[teamnum][1]; j++)
\t\t\t\t\t\t{
\t\t\t\t\t\t\tformat(string, sizeof(string),"%s has joined your fireteam.", sendername);
\t\t\t\t\t\t\tSendClientMessage(teamMembers[teamnum][j], COLOR_ORANGE, string);
\t\t\t\t\t\t}
\t\t\t\t\t\tteamInfo[teamnum][1]++;
\t\t\t\t\t\tplayerTeam[playerid] = teamnum;
\t\t\t\t\t\tformat(string, sizeof(string),"You have joined the fireteam '%s' (id: %d)", teamNames[teamnum], teamnum);
\t\t\t\t\t\tSendClientMessage(playerid, COLOR_GREEN, string);
\t\t\t\t\t}else SendClientMessage(playerid, COLOR_RED, "That fireteam is full.");
\t\t\t\t}
\t\t\t}
\t\t\treturn 1;
\t\t\t//Invite to Gang//
\t\t} else if (teamcmd==3)
\t\t{
\t\t\tgiveplayerid = strval(tmp);
\t\t\tif(playerTeam[playerid]==0)
\t\t\t{
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "You are not in a fireteam!");
\t\t\t\treturn 1;
\t\t\t}
\t\t\tif(teamMembers[playerTeam[playerid]][0]!=playerid)
\t\t\t{
\t\t\t\tSendClientMessage(playerid, COLOR_RED, "You need to be the fireteam leader to send an invite.");
\t\t\t\treturn 1;
\t\t\t}
\t\t\tif( gTeam[giveplayerid] != gTeam[playerid] )
\t\t\t{
\t\t\t SendClientMessage(playerid,COLOR_RED, "He needs to be in the same fireteam with you ! Eg: Japan");
\t\t\t return 1;
\t\t\t}
\t\t\tif(IsPlayerConnected(giveplayerid))
\t\t\t{
\t\t\t\tGetPlayerName(giveplayerid, giveplayer, sizeof(giveplayer));
\t\t\t\tGetPlayerName(playerid, sendername, sizeof(sendername));
\t\t\t\tformat(string, sizeof(string),"You have sent a fireteam invite to %s.", giveplayer);
\t\t\t\tSendClientMessage(playerid, COLOR_GREEN, string);
\t\t\t\tformat(string, sizeof(string),"You have recieved a fireteam invite from %s to '%s' (id: %d)", sendername, teamNames[playerTeam[playerid]],playerTeam[playerid]);
\t\t\t\tSendClientMessage(giveplayerid, COLOR_GREEN, string);
\t\t\t\tteamInvite[giveplayerid]=playerTeam[playerid];
\t\t\t} else SendClientMessage(playerid, COLOR_RED, "No such player exists!");
\t\t\t//Leave Gang//
\t\t} else if (teamcmd==4)
\t\t{
\t\t\tPlayerLeaveGang(playerid);
\t\t}
\t\treturn 1;
\t}
\t//------------------- /teaminfo
\tif(strcmp(cmdtext, "/fteaminfo",true)==0) {
\t new string[100];
\t\tnew teamnum;
\t\ttmp = strtok(cmdtext, idx);
\t\tif(!strlen(tmp) && playerTeam[playerid]==0) {
\t\t\tSendClientMessage(playerid, COLOR_WHITE, "USAGE: /fteaminfo [number]");
\t\t\treturn 1;
\t\t} else if (!strlen(tmp))
\t\tteamnum = playerTeam[playerid];
\t\telse
\t\tteamnum = strval(tmp);
\t\tif(teamInfo[teamnum][0]==0) {
\t\t\tSendClientMessage(playerid, COLOR_RED, "No such fireteam exists!");
\t\t\treturn 1;
\t\t}
\t\tif( gTeam[teamMembers[teamnum][0]] != gTeam[playerid] )
\t\t{
\t\t\tSendClientMessage(playerid, COLOR_RED, "You can't see info about an enemy fireteam !");
\t\t\treturn 1;
\t\t}
\t\tformat(string, sizeof(string),"'%s' FireTeam Members (id: %d)", teamNames[teamnum], teamnum);
\t\tSendClientMessage(playerid, COLOR_GREEN, string);
\t\tfor(new i = 0; i < teamInfo[teamnum][1]; i++) {
\t\t\tGetPlayerName(teamMembers[teamnum][i], giveplayer, sizeof(giveplayer));
\t\t\tformat(string, sizeof(string),"%s (%d)", giveplayer, teamMembers[teamnum][i]);
\t\t\tSendClientMessage(playerid, COLOR_YELLOW, string);
\t\t}
\t\treturn 1;
\t}
\t//------------------- /teams
\tif(strcmp(cmdtext, "/fteams",true)==0)
\t{
\t\tnew x;
\t\tnew string[100];
\t\tSendClientMessage(playerid, COLOR_GREEN, "Current FireTeams:");
\t\tfor(new i=0; i < MAX_TEAMS; i++)
\t\t{
\t\t if( gTeam[teamMembers[i][0]] == gTeam[playerid])
\t\t {
\t\t\t\tif(teamInfo[i][0]==1)
\t\t\t\t{
\t\t\t\t\tformat(string, sizeof(string), "%s%s(%d) - %d members", string,teamNames[i],i,teamInfo[i][1]);
\t\t\t\t\tx++;
\t\t\t\t\tif(x > 2)
\t\t\t\t\t{
\t\t\t\t\t\tSendClientMessage(playerid, COLOR_YELLOW, string);
\t\t\t\t\t\tx = 0;
\t\t\t\t\t\tformat(string, sizeof(string), "");
\t\t\t\t\t} else
\t\t\t\t\t{
\t\t\t\t\t\tformat(string, sizeof(string), "%s, ", string);
\t\t\t\t\t}
\t\t\t\t}
\t\t\t}
\t\t}
\t\tif(x <= 2 && x > 0) {
\t\t\tstring[strlen(string)-2] = '.';
\t\t\tSendClientMessage(playerid, COLOR_YELLOW, string);
\t\t}
\t\treturn 1;
\t}
0