Peršokti į turinį
  • ŽAIDIMAI
  • , ŽAIDIMAI
  • ŽAIDIMAI

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 4417 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Recommended Posts

Sveiki dar kartą. Man reikia vėl perdaryti cmd. Kad duotu kreditus ne visiem o pasirinktam asmeniui.

 

CMD:kreditas(playerid, params[])
{
if( !IsAODOn ( playerid ) ) return SendClientMessage(playerid, RED, "{00FF00}[sERVER]{FFFFFF} Tokios komandos nėra. Visos komandos {00FF00} /pagalba");
if(playerDB[playerid][admin] < 4) return SendClientMessage(playerid, RED, "{00FF00}[sERVER]{FFFFFF} Tokios komandos nėra. Visos komandos {00FF00} /pagalba");
for(new p = 0; p < MAX_PLAYERS; p++)
{
if(!IsPlayerConnected(p) || IsPlayerNPC(p)) continue;
new str[150], krd = KiekKredituTuri(GetPlayerNameEx(playerid));
krd += 1;
format(str, 140, "UPDATE `players` SET `Kreditai` = '%d' WHERE `Vardas` = '%s'", krd, GetPlayerNameEx(p));
mysql_query(str);
SendClientMessage(p, RED, "{00FFE1}* Iš serverio Roko gavai premija 1 kredita!");
}
return 1;
}
 
pagal šita gal jums lengviau.
 
 
CMD:makescore(playerid, params[])
{
 if( !IsAODOn ( playerid ) ) return SendClientMessage(playerid, RED, "{00FF00}[sERVER]{FFFFFF} Tokios komandos nėra. Visos komandos {00FF00} /pagalba");
 if(playerDB[playerid][admin] < 4) return SendClientMessage(playerid, RED, "{00FF00}[sERVER]{FFFFFF} Tokios komandos nėra. Visos komandos {00FF00} /pagalba");
 new id, score, str[60];
 if(sscanf(params, "ud", id, score)) return SendClientMessage(playerid, 0xFFFFFFFF, "* Naudojimas: /makescore [Vardas_Pavardė/ID] [Kiekis]");
 if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid, RED, "* Tokio žaidėjo nėra.");
 if(score < 1) return SendClientMessage(playerid, 0xFFFFFFFF, "* Naudojimas: /makescore [Vardas_Pavardė/ID] [Kiekis]");
 SetPlayerScore(id, GetPlayerScore(id)+score);
 format(str, sizeof(str), "* Administratorius %s davė jums %d xp", GetPlayerNameEx(playerid), score);
 SendClientMessage(id, BLUE, str);
 format(str, sizeof(str), "* Davėte %s %d xp", GetPlayerNameEx(id), score);
 SendClientMessage(playerid, BLUE, str);
 return 1;
}
 
 
 
 
 
 

RolePlay server - 18% done.

Lengva. Tau čia prireiks sscanf, o geriausia būtų sscanf2. Turėtum mėginti ir pats kąnors daryti. :)

 

COMMAND:duotikred(playerid, params[])
{
   if(!IsAODOn(playerid)) return SendClientMessage(playerid, RED, "Tokios komandos nera.."); // tikrinimas
   if(playerDB[playerid][admin]<4) return SendClientMessage(playerid, RED, "Tokios komandos nera..");
   new id, Query[80], krd, str[60]; // kintamieji, kurių prireiks
   if(sscanf(params, "ud", id, krd)) return SendClientMessage(playerid, RED, "Naudojimas : /duotikred [Vardas_Pavarde] [Kiekis]"); // jeigu neparašė visko, ( pvž "/duotikred Vardas_Pavardė
   if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid, RED, "Tokio žaidėjo nėra"); // "INVALID_PLAYER_ID" iškarto išduoda viską,t.y. jeigu tokio žaidėjo nėra
   if(IsPlayerNPC(id)) return SendClientMessage(playerid, RED, "Tokio žaidėjo nėra"); // jeigu įvestas buvo NPC botas..
   new kred = KiekKredituTuri(GetPlayerNameEx(id)); // pagal tavo kodą, tikrinimas kiek turi kreditų
   kred += krd; // nustatom kiek tur4s kreditu, ( prie išgautų kreditų pridedame kiek davė
   format(Query, sizeof(Query), "UPDATE `players` SET `Kreditai` = '%d' WHERE `Vardas` = '%s'", kred, GetPlayerNameEx(id)); // suformatuojame užklausa
   mysql_query(Query); // siunčiame
   format(str, sizeof(str), "Gavai %d kreditu nuo %s", krd, GetPlayerNameEx(playerid)); // formatuojame textą
   SendClientMessage(id, -1, str); // siunčiame textą
   format(str, sizeof(str), "Davei %d kreditu %s", krd, GetPlayerNameEx(id)); // formatuojame textą
   SendClientMessage(playerid, -1, str); // siunčiame textą
   return true;
}

Plačiau apie sscanf : https://github.com/Y-Less/sscanf/wiki

(redaguota)
Manau butu lengviau per skype.

 

 

 

[14:43:06] >> mysql_retrieve_row( Connection handle: 1 )

[14:43:06] >> mysql_num_rows( Connection handle: 1 )

[14:43:06] CMySQLHandler::NumRows() - Returned 1 row(s)

[14:43:06] >> mysql_fetch_field_row( Connection handle: 1 )

[14:43:06] CMySQLHandler::FetchField("Kreditai") - 5201287

[14:43:06] >> mysql_free_result( Connection handle: 1 )

[14:43:06] CMySQLHandler::FreeResult() - Result was successfully free'd.

[14:43:06] >> mysql_query( Connection handle: 1 )

[14:43:06] CMySQLHandler::Query(UPDATE `players` SET `Kreditai` = '5211287' WHERE `Vardas` = 'Admin_Rokius') - Successfully executed.

[14:43:08] >> mysql_query( Connection handle: 1 )

[14:43:08] CMySQLHandler::Query(SELECT * FROM `players` WHERE `Vardas` = 'Admin_Rokius') - Successfully executed.

[14:43:08] >> mysql_store_result( Connection handle: 1 )

[14:43:08] CMySQLHandler::StoreResult() - Result was stored.

[14:43:08] >> mysql_num_rows( Connection handle: 1 )

[14:43:08] CMySQLHandler::NumRows() - Returned 1 row(s)

[14:43:08] >> mysql_query( Connection handle: 1 )

Redaguota , nario Rokius'

RolePlay server - 18% done.

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 4417 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Prisijungti prie diskusijos

Palikti atsakymą galite iš karto, o užsiregistruoti vėliau. Jeigu jau turite paskyrą mūsų forume, Prisijunkite.

Svečias
Atsakyti šioje temoje...

×   Įklijuotas tekstas turi teksto formatavimą.   Pašalinti teksto formatavimą

  Galimi tik 75 veidukai.

×   Nuoroda buvo automatiškai įterpta.   Įterpti nuorodą paprastai

×   Jūsų ankstesnis pranešimas buvo atkurtas.   Išvalyti redaktorių

×   Jūs negalite įkelti nuotraukas tiesiogiai.Įkelkite arba įdėkite nuotraukas iš URL.

  • Šiame puslapyje naršo:   0 nariai

    • Nėra registruotų narių peržiūrinčių šį forumą.

Skelbimai


×
×
  • Sukurti naują...