Модификации The Godfather - Страница 32 - Форум SAMP о мультиплеерах для GTA.

Модификации The Godfather

Дата: Среда, 03.02.2010, 20:00 | Сообщение # 466

Группа: Продвинутые

Сообщений: 2704

Награды: 121

Город: Melbourne Australia

Репутация: 3103

Замечания: 0%

Статус:

В начало мода :
[pwn]new OnlineIcq[MAX_PLAYERS]; [/pwn]

В public onplayerconnect
[pwn]OnlineIcq[playerid] = 1;[/pwn]

Заменяем команду /togphone на эту.

[pwn]if(strcmp(cmd, "/togphone", true) == 0){
if(IsPlayerConnected(playerid)){
if (!PhoneOnline[playerid]){
PhoneOnline[playerid] = 1;
SendClientMessage(playerid, COLOR_GRAD2, "Вы выключили телефон.!");
OnlineIcq[playerid] = 1;
}else if (PhoneOnline[playerid]){
PhoneOnline[playerid] = 0;
SendClientMessage(playerid, COLOR_GRAD2, "Вы включили телефон.!");
}}return 1;}[/pwn]

Создаём команду для включения/выключения ICQ

[pwn] if(strcmp(cmd, "/icq", true) == 0){
if(IsPlayerConnected(playerid)){
if (!OnlineIcq[playerid]) {
OnlineIcq[playerid] = 1;
SendClientMessage(playerid, 0xFF00FF, "Вы выключили ICQ!");
}else if (OnlineIcq[playerid]) {
OnlineIcq[playerid] = 0;
SendClientMessage(playerid, 0x0FF0FF, "Вы включили ICQ!");
format(string, sizeof(string), "~r~$-%d", concost);
GameTextForPlayer(playerid, string, 5000, 1);}
}return 1;}[/pwn]

Добавлено (03.02.2010, 20:00)
---------------------------------------------
ну и в команду отправки ICQ сообщения , можно добавить

[pwn]if(OnlineIcq[giveplayerid] == 1) return SendClientMessage(playerid, COLOR_GREY, "У Этого контакта выключена ICQ.!");[/pwn]

Impereal

Дата: Среда, 03.02.2010, 20:00 | Сообщение # 467

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2677

Награды: 51

Город: Санкт-Петербург

Репутация: 1868

Замечания: 100%

Статус:

А чё за icq система??))
Может поставлю))

Прощай самп-рус =Р

xSLiMx

Дата: Среда, 03.02.2010, 20:02 | Сообщение # 468

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2163

Награды: 34

Город: Ростов - на - Дону

Репутация: 1429

Замечания: 80%

Статус:

Fus1, Оо спасиб за допонение, ша поставлю)

Fus1

Дата: Среда, 03.02.2010, 20:14 | Сообщение # 469

Группа: Продвинутые

Сообщений: 2704

Награды: 121

Город: Melbourne Australia

Репутация: 3103

Замечания: 0%

Статус:

Quote (zm-96)

А чё за icq система??))
Может поставлю))

типо можно общяться как смс наподобии

Добавлено (03.02.2010, 20:14)
---------------------------------------------
Так-же в /buy добавить можно :

[pwn]else if (item == 22 && GetPlayerMoney(playerid) > 800) // взаместо 22 число в /buy , 800 цена
{
if (GetPlayerMoney(playerid) > 800){
format(string, sizeof(string), "~r~-$%d", 500);
GameTextForPlayer(playerid, string, 5000, 1);
ServerGivePlayerMoney(playerid,-800);
PlayerPlaySound(playerid, 1052, 0.0, 0.0, 0.0);
new randICQ = 123456789 + random(987654321);
PlayerInfo[playerid][pICQ] = randICQ;
format(string, sizeof(string), "Вы установили на телефон ICQ программу.");
SendClientMessage(playerid, COLOR_GRAD4, string);
SendClientMessage(playerid, COLOR_WHITE, "Введите /icqhelp для того чтобы посмотреть команды ICQ");}
else SendClientMessage(playerid, COLOR_WHITE, "У вас нету нужной суммы.");
return 1;}[/pwn]

В команду отправки ICQ сообщения вставляем.
[pwn]if(PlayerInfo[playerid][pICQ] == 0) return SendClientMessage(playerid, COLOR_GRAD2, "У вас на телефоне нету ICQ программы.");[/pwn]

Вот и получилось полноценная система

adidas--007

Дата: Среда, 03.02.2010, 20:24 | Сообщение # 470

Освоившийся

Группа: Пользователи

Сообщений: 147

Награды: 1

Город: Не важно

Репутация: 4

Замечания: 0%

Статус:

Спасибо за icq большое

xSLiMx

Дата: Среда, 03.02.2010, 20:30 | Сообщение # 471

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2163

Награды: 34

Город: Ростов - на - Дону

Репутация: 1429

Замечания: 80%

Статус:

adidas--007, она еще доробатываеться

Impereal

Дата: Среда, 03.02.2010, 20:36 | Сообщение # 472

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2677

Награды: 51

Город: Санкт-Петербург

Репутация: 1868

Замечания: 100%

Статус:

Ну ппц сделал всё правильно(как описано)[offtop]НИХ?Я[/offtop]не подействовало ещё когда комплитю виндовс завершает програму!((
У меня кривые руки((наверно)

Прощай самп-рус =Р

Fus1

Дата: Среда, 03.02.2010, 20:38 | Сообщение # 473

Группа: Продвинутые

Сообщений: 2704

Награды: 121

Город: Melbourne Australia

Репутация: 3103

Замечания: 0%

Статус:

добавляй по очереди , сначало 1 потом компликти , потом 2 и т.д. Смотри где ошибка и пиши сюда.

[offtop]если система понравилось , жмём кнопочку "Спасибо" crazy [/offtop]

Impereal

Дата: Среда, 03.02.2010, 20:50 | Сообщение # 474

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2677

Награды: 51

Город: Санкт-Петербург

Репутация: 1868

Замечания: 100%

Статус:

Ок щя попробуем!))[offtop]ДЕЛАЮ ЧТОБЫ было 20 символов[/offtop]

Добавлено (03.02.2010, 20:50)
---------------------------------------------
ко всем new всмысле ко всем?
[offtop]ДАУН Я[/offtop]

Прощай самп-рус =Р

xSLiMx

Дата: Среда, 03.02.2010, 20:53 | Сообщение # 475

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2163

Награды: 34

Город: Ростов - на - Дону

Репутация: 1429

Замечания: 80%

Статус:

Quote (zm-96)

ко всем new всмысле ко всем?

после forward'oB всех идут все new

Fus1

Дата: Среда, 03.02.2010, 21:06 | Сообщение # 476

Группа: Продвинутые

Сообщений: 2704

Награды: 121

Город: Melbourne Australia

Репутация: 3103

Замечания: 0%

Статус:

Вот команда переключать чат с /o на обычный , и с обычного на /o

[pwn] if(strcmp(cmd, "/chat", true) == 0){
if(IsPlayerConnected(playerid)){
if (PlayerInfo[playerid][pAdmin] >= 1338){
if(chatoff == 0){
chatoff = 1;
SendClientMessageToAll(COLOR_YELLOW, "Локальный чат включён!");
return 1;
}if(chatoff == 1){
chatoff = 0;
SendClientMessageToAll(COLOR_YELLOW, "Чат переключён на /o !");
return 1;}
}else{
SendClientMessage(playerid, COLOR_WHITE, "Вам использовать это нельзя.");}}
return 1;}
[/pwn]

в начало мода
[pwn]new chatoff = 1;[/pwn]

в public OnPlayerText
[pwn] if(chatoff == 1){
if(chatoff == 0){
format(string, sizeof(string), "%s: %s", sendername, text);
SendClientMessageToAll(COLOR_OOC,string);}[/pwn]

xSLiMx

Дата: Среда, 03.02.2010, 21:13 | Сообщение # 477

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2163

Награды: 34

Город: Ростов - на - Дону

Репутация: 1429

Замечания: 80%

Статус:

Писал для 1 чела - кому надо - ловите
[pwn]if(strcmp(cmd, "/getskin", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pAdmin] >= 1337)
{
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) {
SendClientMessage(playerid, COLOR_WHITE, " Использование: /getskin [ид/чать ника]");
return 1;
}
giveplayerid = ReturnUser(tmp);
if(IsPlayerConnected(giveplayerid))
{
if(giveplayerid != INVALID_PLAYER_ID)
{
if (ProxDetectorS(8.0, playerid, giveplayerid))
{
//if(giveplayerid == playerid) { SendClientMessage(playerid, COLOR_GREY, "Незя узнать свой скин!"); return 1; }
new skin;
GetPlayerName(giveplayerid, giveplayer, sizeof(giveplayer));
skin = GetPlayerSkin(giveplayerid);
format(string, sizeof(string), "* У игрока %s, скин под идом: %d .", giveplayer, skin);
SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, string);
}
else
{
SendClientMessage(playerid, COLOR_GREY, " Этот игрок не рядом с тобой.");
return 1;
}
}
}
else
{
SendClientMessage(playerid, COLOR_GREY, " Этого игрока нет на сервере.");
return 1;
}
}
else
{
SendClientMessage(playerid, COLOR_GREY, " Вы не админ йопт!");
}
//}
}//not connected
return 1;
}[/pwn]

Как использовать: Подходим к челу, пиши /getskin его ид и получаем сообщение с его идом скина

adidas--007

Дата: Среда, 03.02.2010, 21:24 | Сообщение # 478

Освоившийся

Группа: Пользователи

Сообщений: 147

Награды: 1

Город: Не важно

Репутация: 4

Замечания: 0%

Статус:

Люди помогите к этому коду привязать ПДД
[pwn]if(strcmp(cmd, "/kpk", true) == 0) {
new listitems[] = "Òóò ïåðâàÿ ñòðî÷êà\n2Âòîðàÿ\n3Òðåòüÿ\n4×åòâ¸ðòàÿ\n5Ïÿòàÿ";
ShowPlayerDialog(playerid,12,DIALOG_STYLE_LIST," Íàçâàíèå îêíà:",listitems," Ñîãëàñèòüñÿ"," îòìåíà");
return 1;
}
[/pwn]
и пожалуйста если моно разъясните , мучался сколько ничё не получаеться

xSLiMx

Дата: Среда, 03.02.2010, 21:25 | Сообщение # 479

Мастер джэдай

Группа: I'm V.I.P.

Сообщений: 2163

Награды: 34

Город: Ростов - на - Дону

Репутация: 1429

Замечания: 80%

Статус:

adidas--007, по подробней

Fus1

Дата: Среда, 03.02.2010, 21:26 | Сообщение # 480

Группа: Продвинутые

Сообщений: 2704

Награды: 121

Город: Melbourne Australia

Репутация: 3103

Замечания: 0%

Статус:

Вот для ФБР и для хитманов

[pwn] if(strcmp(cmd,"/maska",true)==0){
if(IsPlayerConnected(playerid)){
if(PlayerInfo[playerid][pMember] == 8 || PlayerInfo[playerid][pMember] == 2 || PlayerInfo[playerid][pMember] == 17){
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)){
SendClientMessage(playerid, COLOR_WHITE, "*/maska [ID/Èìÿ]");
return 1;}
giveplayerid = ReturnUser(tmp);
if(masked[playerid] == 1){
SetPlayerSkin(playerid, PlayerInfo[playerid][pModel]);
masked[playerid] = 0;
SendClientMessage(playerid, COLOR_GREY, "Вы снимаете маскировочный костюм.");
return 1;}
else if(masked[playerid] == 0){
if (ProxDetectorS(30.0, playerid, giveplayerid)){
GetPlayerName(giveplayerid, giveplayer, sizeof(giveplayer));
format(string, sizeof(string), "* Вы использовали маскировку и стали выглядеть как %s.", giveplayer);
SendClientMessage(playerid, COLOR_GREY, string);
new mask = GetPlayerSkin(giveplayerid);
SetPlayerSkin(playerid, mask);
masked[playerid] = 1;
return 1;
}else{
SendClientMessage(playerid, COLOR_YELLOW2, "Вы слишком далеко чтобы разгледеть детали одежды для маскировки.!");
return 1;}}
}else{
SendClientMessage(playerid,COLOR_GREY,"У вас нету специального маскировочного костюма.");
return 1;}}
return 1;}
}[/pwn]