Добро пожаловать на Pro Pawn - Портал о PAWN-скриптинге.

Реклама


**Как получить V.I.P** (Перейти)
Чтобы заказать рекламу на Pro-Pawn.Ru, обращайтесь в Skype.
Баннерная реклама 200руб/мес, Текстовая 100руб/мес.
Страница 1 из 5 123 ... ПоследняяПоследняя
Показано с 1 по 10 из 41
  1. #1
    Аватар для YouJeen
    Пользователь

    Статус
    Оффлайн
    Регистрация
    20.10.2013
    Сообщений
    13
    Репутация:
    1 ±

    Лотерея Advance RP


    Вы покупаете лотерейный билет (/slotto) (сделайте его в 24/7)
    потом запускаете розыгрыш (/lotto) сделайте в PayDay или как на advance в :02 минуты каждого часа.
    Если в вашем билете совпадает:
    1 цифра - 2.000$
    2 цифры - 15.000$
    3 цифры - 50.000$

    Работает без багов.


    Вверх мода:

    PHP код:
    new loto 0
    К командам:

    PHP код:
     if (strcmp("/slotto"cmdtexttrue10) == 0LOTEREYA(playerid);
        if (
    strcmp("/lotto"cmdtexttrue10) == 0)
        {
            for(new 
    0MAX_PLAYERSi++)
            {
                 if(!
    IsPlayerConnected(i) || IsPlayerNPC(i) || GetPVarInt(i"BILET") <= 0) continue;
                 
    LOTTO(i);
            }
            return 
    1;
        } 
    в OnDialogResponse
    PHP код:
    if(dialogid == 1000)//case 1000:
        
    {
                if(!
    response) return 1;
                new 
    string[144];
                if(
    strlen(inputtext) != 0)
                {
                    if(
    strlen(inputtext) != 3) return LOTEREYA(playerid),SendClientMessage(playerid,0xFF4F00FF,"Неверный формат. {0099FF}Пример: 614");
                    for(new 
    strlen(inputtext); != 0; --i)
                    {
                        switch(
    inputtext[i])
                        {
                           case 
    'A'..'Z''a'..'z','А'..'Я','а'..'я',' ': return LOTEREYA(playerid),SendClientMessage(playerid,0xFF4F00FF,"Неверный формат. {0099FF}Пример: 614");
                        }
                    }
                    new 
    x=strval(inputtext);
                    new 
    x%10;
                    new 
    = (x%100-z)/10;
                    new 
    x/100;
                    
    loto++;
                    
    SetPVarInt(playerid"LOTO1",a);
                    
    SetPVarInt(playerid"LOTO2",y);
                    
    SetPVarInt(playerid"LOTO3",z);
                    
    SetPVarInt(playerid"BILET",1);
                    
    format(stringsizeof(string), "Cчастливое число изменено на: {00bebd}%d",strval(inputtext));
                    
    SendClientMessage(playerid,0x5AB200FF,string);
                    
    PlayerPlaySound(playerid10520.00.00.0);
                }
                else 
    PlayerPlaySound(playerid10520.00.00.0),format(stringsizeof(string), "Ваше счастливое число: {00bebd}%d%d%d",GetPVarInt(playerid"LOTO1"),GetPVarInt(playerid"LOTO2"),GetPVarInt(playerid"LOTO3")),SendClientMessage(playerid0x5AB200FF,string);
        } 
    И вниз мода:

    PHP код:
    stock LOTTO(playerid)
    {
        new 
    string[144];
        new 
    lotto 100+random(899);
         new 
    lotto%10;
        new 
    = (lotto%100-f)/10;
        new 
    lotto/100;
        
    format(stringsizeof(string),"Сейчас %s! Начинаем лотерейный розыгрыш. Ваше счастливое число: %d%d%d",date("%hh:%ii"gettime()-43200),GetPVarInt(playerid"LOTO1"),GetPVarInt(playerid"LOTO2"),GetPVarInt(playerid"LOTO3"));
        
    SendClientMessage(playerid,0xffd200FF,string);
        
    format(stringsizeof(string), "За этот час было куплено %d билетов счастливое число этого часа: {ff9a00}%d",loto,lotto);
        
    SendClientMessage(playerid,0x63cb00ff,string);
        
    loto 0;
        if(
    GetPVarInt(playerid"LOTO1") == && GetPVarInt(playerid"LOTO2") == && GetPVarInt(playerid"LOTO3") == f) return SendClientMessage(playerid,0x5AB200FF"В вашем билете совпали все числа. Поздравляем, ваш выйгрыш 50.000$"),GivePlayerMoney(playeridGetPlayerMoney(playerid)+5000);//PlayerInfo[playerid][pCash] += 50000;
          
    if(GetPVarInt(playerid"LOTO1") == && GetPVarInt(playerid"LOTO2") == || GetPVarInt(playerid"LOTO2") == && GetPVarInt(playerid"LOTO3") == || GetPVarInt(playerid"LOTO1") == && GetPVarInt(playerid"LOTO3") == f) return SendClientMessage(playerid,0x5AB200FF"В вашем билете совпали 2 цифры. Поздравляем, ваш выйгрыш 15.000$"),GivePlayerMoney(playeridGetPlayerMoney(playerid)+15000);//PlayerInfo[playerid][pCash] += 15000;
        
    if(GetPVarInt(playerid"LOTO1") == || GetPVarInt(playerid"LOTO2") == || GetPVarInt(playerid"LOTO3") == f) return SendClientMessage(playerid,0x5AB200FF"В вашем билете совпало 1 цифра. Поздравляем, ваш выйгрыш 2.000$"),GivePlayerMoney(playeridGetPlayerMoney(playerid)+2000);//PlayerInfo[playerid][pCash] += 2000;
        
    if(GetPVarInt(playerid"LOTO1") != || GetPVarInt(playerid"LOTO2") != || GetPVarInt(playerid"LOTO3") != f) return SendClientMessage(playerid,-1"К сожалению в вашем билете не сопвпала первая цифра"),SendClientMessage(playerid,-1"Не расстраивайтесь. В следующий раз Вам обязательно повезет");
        
    SetPVarInt(playerid"BILET",0);
        
    SetPVarInt(playerid"LOTO1",0);
        
    SetPVarInt(playerid"LOTO2",0);
        
    SetPVarInt(playerid"LOTO3",0);
        return 
    1;
    }
    stock LOTEREYA(playerid)
    {
        new 
    x100+random(899);
        new 
    x%10;
        new 
    = (x%100-z)/10;
        new 
    x/100;
        
    loto++;
        
    SetPVarInt(playerid"LOTO1",a);
        
    SetPVarInt(playerid"LOTO2",y);
        
    SetPVarInt(playerid"LOTO3",z);
        
    SetPVarInt(playerid"BILET",1);
        new 
    hour;
        
    gettime(hour);
        new 
    rulesdialog[700],string[144];
        
    SendClientMessage(playerid0x5AB200FF,"Вы купили лотерейный билет");
        
    format(string,sizeof(string), "Ваше счастливое число: {ffd200}%d%d%d\n\n",GetPVarInt(playerid"LOTO1"),GetPVarInt(playerid"LOTO2"),GetPVarInt(playerid"LOTO3")),strcat(rulesdialog,string);
        
    strcat(rulesdialog"{ffffff}Вы зарегестрированы в лотерее, резуельтат будет известен во\n");
        
    format(string,sizeof(string), "{ffffff}время ближайшего розыгрыша, который пройдет в %d:02\n",hour+1),strcat(rulesdialog,string);
        
    strcat(rulesdialog"{ffffff}Не выходите из игры чтобы принять в нём участие.\n\n");
        
    strcat(rulesdialog"{ffffff}Выигрыш будет зависить от того сколько чисел совпало в\n");
        
    strcat(rulesdialog"{ffffff}вашем счастливом числе и в числе, которое выпадает во\n");
        
    strcat(rulesdialog"{ffffff}время розыгрыша (по порядку с лево на право):\n\n");
        
    strcat(rulesdialog"{ffffff}Нет совподений:\t{ff6531}0$\n{ffffff}1 число:\t\t{63ff00}2000$\n{ffffff}2 числа:\t\t{63ff00}15000$\n{ffffff}Все числа:\t\t{63ff00}50000$\n\n");
        
    strcat(rulesdialog"{ffffff}Если Вы хотите изменить счастливое число, введите новое\nв противном случае просто нажмите\"Ок\"");
        return 
    ShowPlayerDialog(playerid10001,"{63cb00}Лотерея"rulesdialog"Ок""");

    Использование:
    Прописываете /slotto - покупаете номер 3х значный
    Запускаете лото: /lotto
    Настраиваете под себя сами.





    Автор: YouJeen ( UNREAL )
    Последний раз редактировалось YouJeen; 06.05.2014 в 20:34.

  2. #2
    Аватар для DeimoS
    Модератор?

    Статус
    Оффлайн
    Регистрация
    27.01.2014
    Адрес
    Восточный Мордор
    Сообщений
    3,931
    Репутация:
    1502 ±
    Вот это порадовало
    PHP код:
                    new x=strval(inputtext); 
                    new 
    x%10
                    new 
    = (x%100-z)/10
                    new 
    x/100
                    
    loto++; 
                    
    SetPVarInt(playerid"LOTO1",a); 
                    
    SetPVarInt(playerid"LOTO2",y); 
                    
    SetPVarInt(playerid"LOTO3",z); 
                    
    SetPVarInt(playerid"BILET",1); 
    Связаться со мной можно в личных сообщениях этой группы

    Широко известно, что идеи стоят 0.8333 цента каждая (исходя из рыночной цены 10 центов за дюжину).
    Великих идей полно, на них нет спроса.
    Воплощение идеи в законченную игру требует долгой работы,
    таланта, терпения и креативности, не говоря уж о затратах денег, времени и ресурсов.
    Предложить идею просто, воплотить – вот в чём проблема

    Steve Pavlina

  3. #3
    Аватар для Seregamil
    Проверенный

    Статус
    Оффлайн
    Регистрация
    21.11.2013
    Сообщений
    561
    Репутация:
    272 ±
    а меня это:
    stock IsTextRussian(text[])
    {
    if(strfind(text, "а", true) != -1 ||
    strfind(text, "б", true) != -1 ||
    strfind(text, "в", true) != -1 ||
    strfind(text, "г", true) != -1 ||
    strfind(text, "д", true) != -1 ||
    strfind(text, "е", true) != -1 ||
    strfind(text, "ё", true) != -1 ||
    strfind(text, "ж", true) != -1 ||
    strfind(text, "з", true) != -1 ||
    strfind(text, "и", true) != -1 ||
    strfind(text, "й", true) != -1 ||
    strfind(text, "к", true) != -1 ||
    strfind(text, "л", true) != -1 ||
    strfind(text, "м", true) != -1 ||
    strfind(text, "н", true) != -1 ||
    strfind(text, "о", true) != -1 ||
    strfind(text, "п", true) != -1 ||
    strfind(text, "р", true) != -1 ||
    strfind(text, "с", true) != -1 ||
    strfind(text, "т", true) != -1 ||
    strfind(text, "у", true) != -1 ||
    strfind(text, "ф", true) != -1 ||
    strfind(text, "х", true) != -1 ||
    strfind(text, "ц", true) != -1 ||
    strfind(text, "ч", true) != -1 ||
    strfind(text, "ш", true) != -1 ||
    strfind(text, "щ", true) != -1 ||
    strfind(text, "ъ", true) != -1 ||
    strfind(text, "ы", true) != -1 ||
    strfind(text, "ь", true) != -1 ||
    strfind(text, "э", true) != -1 ||
    strfind(text, "ю", true) != -1 ||
    strfind(text, "я", true) != -1) return 1;
    return 0;
    }

  4. #4
    Аватар для DeimoS
    Модератор?

    Статус
    Оффлайн
    Регистрация
    27.01.2014
    Адрес
    Восточный Мордор
    Сообщений
    3,931
    Репутация:
    1502 ±
    Цитата Сообщение от Seregamil Посмотреть сообщение
    а меня это:
    О_о а вот это я не заметил... Настоящий ТРУ код
    Связаться со мной можно в личных сообщениях этой группы

    Широко известно, что идеи стоят 0.8333 цента каждая (исходя из рыночной цены 10 центов за дюжину).
    Великих идей полно, на них нет спроса.
    Воплощение идеи в законченную игру требует долгой работы,
    таланта, терпения и креативности, не говоря уж о затратах денег, времени и ресурсов.
    Предложить идею просто, воплотить – вот в чём проблема

    Steve Pavlina

  5. #5
    Аватар для YouJeen
    Пользователь

    Статус
    Оффлайн
    Регистрация
    20.10.2013
    Сообщений
    13
    Репутация:
    1 ±
    Цитата Сообщение от DeimoS Посмотреть сообщение
    Вот это порадовало
    PHP код:
                    new x=strval(inputtext); 
                    new 
    x%10
                    new 
    = (x%100-z)/10
                    new 
    x/100
                    
    loto++; 
                    
    SetPVarInt(playerid"LOTO1",a); 
                    
    SetPVarInt(playerid"LOTO2",y); 
                    
    SetPVarInt(playerid"LOTO3",z); 
                    
    SetPVarInt(playerid"BILET",1); 
    Ты лучше вычислишь каждую цифру с трехзначного числа в переменную/pvar?

    - - - Добавлено - - -

    Цитата Сообщение от Seregamil Посмотреть сообщение
    а меня это:
    Исправил, по вы*буйся еще, жду

  6. #6
    Аватар для DeimoS
    Модератор?

    Статус
    Оффлайн
    Регистрация
    27.01.2014
    Адрес
    Восточный Мордор
    Сообщений
    3,931
    Репутация:
    1502 ±
    Цитата Сообщение от YouJeen Посмотреть сообщение
    Ты лучше вычислишь каждую цифру с трехзначного числа в переменную/pvar?
    Например, так:
    PHP код:
    #define LUCKY_NUMBER strval(inputtext)//Это если тебя пугает использование strval
    loto++;
    SetPVarInt(playerid"LOTO1"LUCKY_NUMBER/100);
    SetPVarInt(playerid"LOTO2", (LUCKY_NUMBER%100 - (LUCKY_NUMBER%10))/10);
    SetPVarInt(playerid"LOTO3"LUCKY_NUMBER%10);
    SetPVarInt(playerid"BILET"1);
    #undef LUCKY_NUMBER 
    Цитата Сообщение от YouJeen Посмотреть сообщение
    Исправил, по вы*буйся еще, жду
    Удалил и исправил - понятия разные

    - - - Добавлено - - -

    А ещё команды круты
    PHP код:
    if (strcmp("/slotto"cmdtexttrue10) == 0LOTEREYA(playerid);
        if (
    strcmp("/lotto"cmdtexttrue10) == 0)
        {
            for(new 
    0MAX_PLAYERSi++)
            {
                 if(!
    IsPlayerConnected(i) || IsPlayerNPC(i) || GetPVarInt(i"BILET") <= 0) continue;
                 
    LOTTO(i);
            }
            return 
    1;
        } 
    Связаться со мной можно в личных сообщениях этой группы

    Широко известно, что идеи стоят 0.8333 цента каждая (исходя из рыночной цены 10 центов за дюжину).
    Великих идей полно, на них нет спроса.
    Воплощение идеи в законченную игру требует долгой работы,
    таланта, терпения и креативности, не говоря уж о затратах денег, времени и ресурсов.
    Предложить идею просто, воплотить – вот в чём проблема

    Steve Pavlina

  7. #7
    Аватар для YouJeen
    Пользователь

    Статус
    Оффлайн
    Регистрация
    20.10.2013
    Сообщений
    13
    Репутация:
    1 ±
    Цитата Сообщение от DeimoS Посмотреть сообщение
    Например, так:
    PHP код:
    #define LUCKY_NUMBER strval(inputtext)//Это если тебя пугает использование strval
    loto++;
    SetPVarInt(playerid"LOTO1"LUCKY_NUMBER/100);
    SetPVarInt(playerid"LOTO2", (LUCKY_NUMBER%100 - (LUCKY_NUMBER%10))/10);
    SetPVarInt(playerid"LOTO3"LUCKY_NUMBER%10);
    SetPVarInt(playerid"BILET"1);
    #undef LUCKY_NUMBER 


    Удалил и исправил - понятия разные

    - - - Добавлено - - -

    А ещё команды круты
    PHP код:
    if (strcmp("/slotto"cmdtexttrue10) == 0LOTEREYA(playerid);
        if (
    strcmp("/lotto"cmdtexttrue10) == 0)
        {
            for(new 
    0MAX_PLAYERSi++)
            {
                 if(!
    IsPlayerConnected(i) || IsPlayerNPC(i) || GetPVarInt(i"BILET") <= 0) continue;
                 
    LOTTO(i);
            }
            return 
    1;
        } 
    Это мелочи, а какая разница исправил или удалил? там есть проверка на рус. символы, поэтому пришлось только удалить.
    PHP код:
    case 'A'..'Z''a'..'z','А'..'Я','а'..'я',' '
    - - - Добавлено - - -

    Этот код делал в FS, вырезал и вставил соответственно оттуда, от того и кмд такие

  8. #8
    Аватар для DeimoS
    Модератор?

    Статус
    Оффлайн
    Регистрация
    27.01.2014
    Адрес
    Восточный Мордор
    Сообщений
    3,931
    Репутация:
    1502 ±
    Цитата Сообщение от YouJeen Посмотреть сообщение
    Это мелочи
    Эти мелочи могут стоить жизни какому-нибудь котёнку, которого из-за тебя собьёт лагающая Pawn-машина.

    Цитата Сообщение от YouJeen Посмотреть сообщение
    а какая разница исправил или удалил?
    Изучи и определи разницу сам

    Цитата Сообщение от YouJeen Посмотреть сообщение
    Этот код делал в FS, вырезал и вставил соответственно оттуда, от того и кмд такие
    Ещё один "Код не мой, мне подкинули!". Если уж взялся писать код для публики, пиши его качественно и перепроверяй всё. А иначе лучше оставляй свой код при себе. Ну или готовься к подобному отновшению
    Связаться со мной можно в личных сообщениях этой группы

    Широко известно, что идеи стоят 0.8333 цента каждая (исходя из рыночной цены 10 центов за дюжину).
    Великих идей полно, на них нет спроса.
    Воплощение идеи в законченную игру требует долгой работы,
    таланта, терпения и креативности, не говоря уж о затратах денег, времени и ресурсов.
    Предложить идею просто, воплотить – вот в чём проблема

    Steve Pavlina

  9. #9
    Аватар для YouJeen
    Пользователь

    Статус
    Оффлайн
    Регистрация
    20.10.2013
    Сообщений
    13
    Репутация:
    1 ±
    Цитата Сообщение от DeimoS Посмотреть сообщение
    Эти мелочи могут стоить жизни какому-нибудь котёнку, которого из-за тебя собьёт лагающая Pawn-машина.



    Изучи и определи разницу сам



    Ещё один "Код не мой, мне подкинули!". Если уж взялся писать код для публики, пиши его качественно и перепроверяй всё. А иначе лучше оставляй свой код при себе. Ну или готовься к подобному отновшению
    Мне нравится когда хоть обсирают или критикуют, чем комменты типо "Круто" "++", так что готов дальше отвечать на ваши выебы.

    По мне, так главное чтоб код был рабочий и без багов, а остольное - это техническая часть уже, мне все равно на нее, от того что я 2 лишнии строчки написал - мод не взорвется. А по поводу IsTextRussian - так этот сток есть во всех модах почти, я его тоже сюда вставил, потому что из FilterScript вырезал, выкладывал мануал на другой портал, не потому что сам захотел, а потому что попросили, а мне все равно как-то было на исправления, своего кода не стыжусь, главное что сис-мы мои многим нравятся и много у кого на серверах стоят и не жалуются что из за них вылетает что-то, на технические части мне насрать так-то

  10. #10
    Аватар для ^_^
    Übermensch

    Статус
    Оффлайн
    Регистрация
    25.11.2013
    Сообщений
    161
    Репутация:
    243 ±
    Цитата Сообщение от YouJeen Посмотреть сообщение
    Мне нравится когда хоть обсирают или критикуют, чем комменты типо "Круто" "++", так что готов дальше отвечать на ваши выебы.

    По мне, так главное чтоб код был рабочий и без багов, а остольное - это техническая часть уже, мне все равно на нее, от того что я 2 лишнии строчки написал - мод не взорвется. А по поводу IsTextRussian - так этот сток есть во всех модах почти, я его тоже сюда вставил, потому что из FilterScript вырезал, выкладывал мануал на другой портал, не потому что сам захотел, а потому что попросили, а мне все равно как-то было на исправления, своего кода не стыжусь, главное что сис-мы мои многим нравятся и много у кого на серверах стоят и не жалуются что из за них вылетает что-то, на технические части мне насрать так-то

    Со стороны ты смотришься именно так...
    Последний раз редактировалось ^_^; 06.05.2014 в 21:23.

 

 
Страница 1 из 5 123 ... ПоследняяПоследняя

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •