[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Gank  
[FS] Funny Random
Дата: 16.02.2011, Среда, 02:41:53 | Сообщение # $NUMBER
Группа: VIP
Сообщений: 1021
Репутация: 815+
Автор :BaRRyS3R
Небольшой скрипт, за основу взял скрипт из МТА. Название его не помню, но суть такова, в чат вводишь !roll и происходит рандомное действие - Выдача денег, смена цввета неба, мут, и еще несколько действий.

Вот вам аналог в самп. Вводим /fr и происходит 1 из 5х рандомных действий:

1) Подкидывает игрока вверх
2) Выдает деньги
3) Убивает
4) Отбирает оружие
5) Ничего не происходит

Quote
#include <a_samp>

new Cuse[MAX_PLAYERS];

public OnFilterScriptInit()
{
print("Funny Random by BaRRyS3R.mp3\n");
return 1;
}
public OnPlayerConnect(playerid)
{
Cuse[playerid] = 1;
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/fr", cmdtext, true) == 0)
{
if(Cuse[playerid] == 0) return SendClientMessage(playerid, 0xFFFFFFAA, "[FR: Error]: Неа, жди 1 минуту.");
else
{
new rand = random(4);
new str[64];
if(rand == 0)
{
rand = random(10);
SetPlayerVelocity(playerid, 0, 0, rand);
format(str, 64, "[FR: 0]: Set Player Velocity Z+%d", rand);
}
else if(rand == 1)
{

rand = random (10000);
GivePlayerMoney(playerid, rand);
format(str, 64, "[FR: 1]: Gived Money: %d", rand);
}
else if(rand == 2)
{
SetPlayerHealth(playerid, -1);
format(str, 64, "[FR: 2]: Kill Player");
}
else if(rand == 3)
{
ResetPlayerWeapons(playerid);
format(str, 64, "[FR: 3]: Reset Player Weapons", rand);
}
else if(rand == 4) format(str, 64, "[FR: 4]: ОЙ!!! Ничего не произошло =(");
SendClientMessageToAll(0xFFFFFFAA, str);
Cuse[playerid] = 0;
SetTimer("CanUse", 60000, 0);
return 1;
}
}
return 0;
}

forward CanUse(playerid);
public CanUse(playerid)
{
Cuse[playerid] = 1;
return 1;
}

  • Страница 1 из 1
  • 1
Поиск: