• Страница 1 из 1
  • 1
Модератор форума: drifter-dron, admin, TweIk  
Реклама по команде
Dimka_71rusДата: Четверг, 06.10.2011, 22:23:08 | Сообщение # 1

Группа: Пользователи
Сообщений: 360
Вот у меня команда /ad дать рекламу
Code
//------------------------------------------------------------------------------
  if(strcmp(cmd, "/advertise", true) == 0 || strcmp(cmd, "/ad", true) == 0)
  {
      if(IsPlayerConnected(playerid))
      {
//------------------------------------------------------------------------------
    if(PlayerInfo[playerid][pMuted] == 1)
    {
     PlayerMuteMessage(playerid);
     return 1;
    }
//------------------------------------------------------------------------------
          if(PlayerInfo[playerid][pLevel] < 1)
          {
              SendClientMessage(playerid, COLOR_RED, "*Рекламу можно давать только с 1 уровня!");
              return 1;
          }
//------------------------------------------------------------------------------
    new is1=0;
    new r=0;
    while(strlen(cmdtext[is1]))
    {
        if('0'<=cmdtext[is1]<='9')
        {
         new is2=is1+1;
         new p=0;
         while(p==0)
         {
             if('0'<=cmdtext[is2]<='9'&&strlen(cmdtext[is2])) is2++;
       else
       {
        strmid(strR[r],cmdtext,is1,is2,255);
        if(strval(strR[r])<255) r++;
        is1=is2;
        p=1;
       }
         }
        }
        is1++;
    }
    if(r>=4)
    {
        new strMy[255];
        new STRname[255];
        GetPlayerName(playerid,STRname,255);
     format(strMy, sizeof(strMy), "Подозрение на рекламу в /ad %s(%d): %s",STRname,playerid,cmdtext);
     ABroadCast(COLOR_YELLOW, strMy, 1);
     new str[256];
     format(str, sizeof(str), "Найдены запрещенные символы! Сообщение не отправлено.");
     SendClientMessage(playerid, COLOR_WHITE, str);
     for(new z=0;z<r;z++)
     {
      new pr2;
      while((pr2=strfind(cmdtext,strR[z],true))!=-1) for(new i=pr2,j=pr2+strlen(strR[z]);i<j;i++) cmdtext[i]='*';
     }
     return 1;
    }
//------------------------------------------------------------------------------
    GetPlayerName(playerid, sendername, sizeof(sendername));
    new length = strlen(cmdtext);
    while ((idx < length) && (cmdtext[idx] <= ' '))
    {
     idx++;
    }
    new offset = idx;
    new result[64];
    while ((idx < length) && ((idx - offset) < (sizeof(result) - 1)))
    {
     result[idx - offset] = cmdtext[idx];
     idx++;
    }
    result[idx - offset] = EOS;
    if(!strlen(result))
    {
     SendClientMessage(playerid, COLOR_GRAD2, "*Используйте: (/ad)vertise [текст]");
     return 1;
    }
    if ((!adds) && (PlayerInfo[playerid][pAdmin] < 1))
    {
     format(string, sizeof(string), "*Повторите попытку через %d секунд. Объявления нельзя давать слишком часто!",  (addtimer/1000));
     SendClientMessage(playerid, COLOR_GRAD2, string);
     return 1;

    }
    new payout = idx * 25;
    if(GetPlayerMoney(playerid) < payout)
          {
              format(string, sizeof(string), "* Вы использовали %d характеры, которые стоят $%d, у Вас нет достаточно.", offset, payout);
              SendClientMessage(playerid, COLOR_LIGHTBLUE, string);
              return 1;
          }
          if(Rekl[playerid] == 1 && strfind(cmdtext,"www",true)!=-1 || Rekl[playerid] == 1 && strfind(cmdtext,".ru",true)!=-1
     || Rekl[playerid] == 1 && strfind(cmdtext,".net",true)!=-1 || Rekl[playerid] == 1 && strfind(cmdtext,".com",true)!=-1
    || Rekl[playerid] == 1 && strfind(cmdtext,"http",true)!=-1)
    {
        format(string,256,"Подозрение на рекламу в /ad %s(%d): %s", sendername, playerid, cmdtext);
     SendClientMessage(playerid, COLOR_LIGHTRED, string);
     new str[256];
     format(str, sizeof(str), "Найдены запрещенные символы! Сообщение не отправлено.");
     SendClientMessage(playerid, COLOR_WHITE, str);
     return 1;
    }
    GivePlayerMoney(playerid, - payout);
    SBizzInfo[7][sbTill] += payout;
    ExtortionSBiz(7, payout);
    format(string, sizeof(string), "{3300FF}*Объявление:{ffffff} {77FF00}%s.{ffffff} {FF6600}Автор:{ffffff} {FFFF00}%s.{ffffff} {FF6600}Тел:{ffffff} {FFFF00}%d{ffffff}",  result, sendername,PlayerInfo[playerid][pPnumber]);
    SendClientMessageToAll(TEAM_GROVE_COLOR,string);
    format(string, sizeof(string), "~r~Paid $%d~n~~w~Message contained: %d Characters", payout, idx);
    GameTextForPlayer(playerid, string, 5000, 5);
    if (PlayerInfo[playerid][pAdmin] < 1){SetTimer("AddsOn", addtimer, 0); adds = 0;}
   }
   return 1;
  }

Помогите сделать,года я ввожу 7 и менее символов норм всё а когда больше до деньги снимаются а в чат не пишется


Лучшие моды,скрипты,карты - вы найдёте на сайте samp-pawno.ru
Самые чёткие ответы на ваши вопросы и помощь по скритингу вы найдёте на сайте forum-pawno.ru
 
СообщениеВот у меня команда /ad дать рекламу
Code
//------------------------------------------------------------------------------
  if(strcmp(cmd, "/advertise", true) == 0 || strcmp(cmd, "/ad", true) == 0)
  {
      if(IsPlayerConnected(playerid))
      {
//------------------------------------------------------------------------------
    if(PlayerInfo[playerid][pMuted] == 1)
    {
     PlayerMuteMessage(playerid);
     return 1;
    }
//------------------------------------------------------------------------------
          if(PlayerInfo[playerid][pLevel] < 1)
          {
              SendClientMessage(playerid, COLOR_RED, "*Рекламу можно давать только с 1 уровня!");
              return 1;
          }
//------------------------------------------------------------------------------
    new is1=0;
    new r=0;
    while(strlen(cmdtext[is1]))
    {
        if('0'<=cmdtext[is1]<='9')
        {
         new is2=is1+1;
         new p=0;
         while(p==0)
         {
             if('0'<=cmdtext[is2]<='9'&&strlen(cmdtext[is2])) is2++;
       else
       {
        strmid(strR[r],cmdtext,is1,is2,255);
        if(strval(strR[r])<255) r++;
        is1=is2;
        p=1;
       }
         }
        }
        is1++;
    }
    if(r>=4)
    {
        new strMy[255];
        new STRname[255];
        GetPlayerName(playerid,STRname,255);
     format(strMy, sizeof(strMy), "Подозрение на рекламу в /ad %s(%d): %s",STRname,playerid,cmdtext);
     ABroadCast(COLOR_YELLOW, strMy, 1);
     new str[256];
     format(str, sizeof(str), "Найдены запрещенные символы! Сообщение не отправлено.");
     SendClientMessage(playerid, COLOR_WHITE, str);
     for(new z=0;z<r;z++)
     {
      new pr2;
      while((pr2=strfind(cmdtext,strR[z],true))!=-1) for(new i=pr2,j=pr2+strlen(strR[z]);i<j;i++) cmdtext[i]='*';
     }
     return 1;
    }
//------------------------------------------------------------------------------
    GetPlayerName(playerid, sendername, sizeof(sendername));
    new length = strlen(cmdtext);
    while ((idx < length) && (cmdtext[idx] <= ' '))
    {
     idx++;
    }
    new offset = idx;
    new result[64];
    while ((idx < length) && ((idx - offset) < (sizeof(result) - 1)))
    {
     result[idx - offset] = cmdtext[idx];
     idx++;
    }
    result[idx - offset] = EOS;
    if(!strlen(result))
    {
     SendClientMessage(playerid, COLOR_GRAD2, "*Используйте: (/ad)vertise [текст]");
     return 1;
    }
    if ((!adds) && (PlayerInfo[playerid][pAdmin] < 1))
    {
     format(string, sizeof(string), "*Повторите попытку через %d секунд. Объявления нельзя давать слишком часто!",  (addtimer/1000));
     SendClientMessage(playerid, COLOR_GRAD2, string);
     return 1;

    }
    new payout = idx * 25;
    if(GetPlayerMoney(playerid) < payout)
          {
              format(string, sizeof(string), "* Вы использовали %d характеры, которые стоят $%d, у Вас нет достаточно.", offset, payout);
              SendClientMessage(playerid, COLOR_LIGHTBLUE, string);
              return 1;
          }
          if(Rekl[playerid] == 1 && strfind(cmdtext,"www",true)!=-1 || Rekl[playerid] == 1 && strfind(cmdtext,".ru",true)!=-1
     || Rekl[playerid] == 1 && strfind(cmdtext,".net",true)!=-1 || Rekl[playerid] == 1 && strfind(cmdtext,".com",true)!=-1
    || Rekl[playerid] == 1 && strfind(cmdtext,"http",true)!=-1)
    {
        format(string,256,"Подозрение на рекламу в /ad %s(%d): %s", sendername, playerid, cmdtext);
     SendClientMessage(playerid, COLOR_LIGHTRED, string);
     new str[256];
     format(str, sizeof(str), "Найдены запрещенные символы! Сообщение не отправлено.");
     SendClientMessage(playerid, COLOR_WHITE, str);
     return 1;
    }
    GivePlayerMoney(playerid, - payout);
    SBizzInfo[7][sbTill] += payout;
    ExtortionSBiz(7, payout);
    format(string, sizeof(string), "{3300FF}*Объявление:{ffffff} {77FF00}%s.{ffffff} {FF6600}Автор:{ffffff} {FFFF00}%s.{ffffff} {FF6600}Тел:{ffffff} {FFFF00}%d{ffffff}",  result, sendername,PlayerInfo[playerid][pPnumber]);
    SendClientMessageToAll(TEAM_GROVE_COLOR,string);
    format(string, sizeof(string), "~r~Paid $%d~n~~w~Message contained: %d Characters", payout, idx);
    GameTextForPlayer(playerid, string, 5000, 5);
    if (PlayerInfo[playerid][pAdmin] < 1){SetTimer("AddsOn", addtimer, 0); adds = 0;}
   }
   return 1;
  }

Помогите сделать,года я ввожу 7 и менее символов норм всё а когда больше до деньги снимаются а в чат не пишется

Автор - Dimka_71rus
Дата добавления - 06.10.2011 в 22:23:08
adminДата: Пятница, 07.10.2011, 08:27:01 | Сообщение # 2

Группа: Администраторы
Сообщений: 3869
Quote (Dimka_71rus)
Помогите сделать,года я ввожу 7 и менее символов норм всё

не понял..потней объясни?:) с другим понял)


zm-jail.ru

Разработка сайта samp-pawno.ru


 
Сообщение
Quote (Dimka_71rus)
Помогите сделать,года я ввожу 7 и менее символов норм всё

не понял..потней объясни?:) с другим понял)

Автор - admin
Дата добавления - 07.10.2011 в 08:27:01
danik_rokДата: Пятница, 07.10.2011, 12:13:29 | Сообщение # 3

Группа: Проверенные
Сообщений: 317
Я так понял что он имеет в виду когда пишеш меньше чем 7 букв в /ad рекламу то реклама работает и отсылается всем, а когда больше 7 символов не шлется реклама а деньги бирут

1. Вы сейчас в интернете.
2. Вы на сайте www.forum-pawno.net.ru.
3. Вы читаете это.
5. Вы не заметили что отсутствует пункт 4.
6. Вы сейчас это проверили.
7. Вы улыбаетесь.
 
СообщениеЯ так понял что он имеет в виду когда пишеш меньше чем 7 букв в /ad рекламу то реклама работает и отсылается всем, а когда больше 7 символов не шлется реклама а деньги бирут

Автор - danik_rok
Дата добавления - 07.10.2011 в 12:13:29
Dimka_71rusДата: Пятница, 07.10.2011, 15:44:32 | Сообщение # 4

Группа: Пользователи
Сообщений: 360
danik_rok, да у мя больше 7 или 8 почему то нельзя

Лучшие моды,скрипты,карты - вы найдёте на сайте samp-pawno.ru
Самые чёткие ответы на ваши вопросы и помощь по скритингу вы найдёте на сайте forum-pawno.ru
 
Сообщениеdanik_rok, да у мя больше 7 или 8 почему то нельзя

Автор - Dimka_71rus
Дата добавления - 07.10.2011 в 15:44:32
  • Страница 1 из 1
  • 1
Поиск:
Загрузка страницы, займет меньше минуты...
Загрузка...

Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
Система телефонов поломалась
Не в себе
фильм скалайн
Трансформеры 3
форсаж 6
Ищу [FS]Для админок на сервер
нужны координаты карты для отметки зон...
Помогите найти мод
pawno урок автоматические ворота
обращение к скриптерам.
Вопросы по скриптингу
Ваши ошибки при компиляции GM/FS

Вопросы по скриптингу

(1081)

Считаем до 1000

(274)

Ваши ошибки при компиляция gm

(260)

Набор в команду

(80)

Ваши ошибки при компиляции GM/FS

(71)

вопроосы по скриптингу от 22.04.2013

(64)

Баннеробмен

(64)

несколько команд на samp 0.3 c

(64)

Оценки сайта samp-pawno.ru

(55)

Заказ хостинга

(51)

Набор в команду(форум)

(45)

Урок №61 по созданию системы авто для GodFather

(45)

admin

(3869)

[east_side]_trane

(443)

TWiX

(316)

valych

(501)

drifter-dron

(477)

danik_rok

(317)

Dimka_71rus

(360)

Drifter96

(300)

MaNb9K

(220)

[MTA]MaPeR5518

(181)

Dima_Tkach

(107)

Nik_Ull

(184)

ps798829

(Среда 08:23:47)

system32xzxz

(Четверг 09:25:24)

torbin169

(Суббота 23:09:29)

kuchuk_00

(Суббота 17:10:14)

artem_boyko_3

(Суббота 15:57:37)

greggelbak

(Среда 18:29:37)

vladisvlavs

(Среда 13:51:57)

add02102002

(Понедельник 22:37:15)

Диман221

(Понедельник 18:12:45)

almas051004

(Воскресенье 11:05:32)

megasuccessms

(Суббота 14:15:36)

nawe

(Пятница 22:25:23)

Вверх
21:48:20
ОбновитьСмайлыУправление мини-чатом
ЧАТ-PAWNO
2010-2025

vkontakte :samp-pawno.ru: