Joomla Template Membership Club

Голосуй

  • Голосовать
  • Статистика

     
    [ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
    • Страница 1 из 1
    • 1
    УБЕЙ СВИНКУ!=)
    WOlFДата: Понедельник, 16.03.2009, 09:00 | Сообщение # 1
    Анубис
    Группа: Администраторы
    Сообщений: 136
    Репутация: 1
    Статус: Offline
    Code

    prontera.gat,152,189,5 script Eventor1 -1,{
    OnHour18:
    set $GSavageSpawn,1;
    //enablenpc "Сюрприз";
    close;
    OnHour20:
    set $GSavageSpawn,0;
    //disablenpc "Сюрприз";
    close;
    }

    prontera.gat,168,161,4 script Victory1 -1,{

    OnSavageGone:
    //announce "Монстр убит!",bc_all,0x4EEE94;
    removemapflag "prontera.gat",mf_noskill;
    //removemapflag "prontera.gat",mf_clouds;
    pvpoff "prontera.gat";
    mes "[ Василий ]";
    mes "Ты убил Золотую Свинью!";
    mes "Вот тебе награда!";

    if(Sex == 1) announce strcharinfo(0)+" убил монстра!",bc_all,0x4EEE94;
    else announce strcharinfo(0)+" убила монстра!",bc_all,0x4EEE94;

    close2;

    if(rand(100) <= 40) {
    getitem 7539,1;
    }

    if(rand(100) <= 50) {
    getitem 12103, rand(1,10);
    }

    switch(rand(1,15)){
    // Yggdrasil Berry
    case 1: getitem 607,rand(1,50);
    close;
    // Yggdrasil Seed
    case 2: getitem 608,rand(1,50);
    close;
    // Old Blue Box
    case 3: getitem 603,rand(1,30);
    close;
    // Old Purple Box
    case 4: getitem 617,rand(1,30);
    close;
    // Enriched Elunium
    case 5: getitem 7619,rand(1,10);
    close;
    // Enriched Oridecon
    case 6: getitem 7620,rand(1,10);
    close;
    // Wrath of Valkyrie
    case 7: getitem 7078,1;
    close;
    // Ice Pick
    case 8: getitem 13017,rand(0,1);
    close;
    // Bloody Branch
    case 9: getitem 12103,rand(1,10);
    close;
    // Medal
    case 10: getitem 7515,1;
    close;
    }

    close;

    }

    prontera.gat,150,187,5 script Сюрприз 790,5,5,{

    if(getgmlevel() == 99){
    mes "Заспавнить монстра?";
    menu "Да", L_SpawnSavage, "Нет", L_Close;
    close;
    }

    mes "[ ^ff0000Сюрприз^000000 ]";
    mes "Проходи мимо меня чаще!";
    mes "И ты сможешь получить свой сюрприз!";
    next;
    set @ranum, rand(1,100);
    mes "[ ^ff0000Сюрприз^000000 ]";
    mes "Я загадал число.";
    mes "Попробуй угадать!";
    next;
    goto L_Roullete;

    L_Roullete:
    mes "[ ^ff0000Сюрприз^000000 ]";
    mes "Введи число от 1 до 100";
    mes "Вдруг тебе повезёт!";
    next;
    input @num;
    mes "[ ^ff0000Сюрприз^000000 ]";
    if(@ranum == @num){
    mes "Молодец!";
    mes "Ты угадал моё число!";
    mes "Получай приз!";
    close2;
    switch(rand(1,6)){
    case 1: getitem 969,1; emotion 30; close;
    case 2: getitem 617,rand(1,5); emotion 21; close;
    case 3: getitem 603,rand(1,5); emotion 18; close;
    case 4: getitem 12103,1; emotion 32; close;
    case 5: getitem 607,rand(1,10); emotion 29; close;
    case 6: getitem 608,rand(1,10); emotion 29; close;
    }
    } else {
    set @kk,@ranum-@num;
    if(@kk < 0) set @kk,-@kk;
    if(@kk < 10) mes "Ты был близок!"; else mes "Тебе не повезло!";
    mes "Я загадал число "+@ranum+".";
    mes "Попробуй в другой раз!";
    }
    close2;
    close;

    //goto L_SurpriseItem;

    L_Close:
    close;

    OnTouch:
    //if(Pumba==1) goto L_SHIT;
    //set Pumba,1;
    if(getgmlevel() <= 40) goto L_SurpriseItem;
    end;

    L_SurpriseItem:
    if(rand(10000) < 5){ getitem 969,1; emotion 30; end; }
    if(rand(10000) < 15){ getitem 617,rand(1,5); emotion 21; end; }
    if(rand(10000) < 25){ getitem 603,rand(1,5); emotion 18; end; }
    if(rand(10000) < 35){ getitem 12103,1; emotion 32; end; }
    if(rand(10000) < 45){ getitem 607,rand(1,10); emotion 29; end; }
    if(rand(10000) < 75){ getitem 608,rand(1,10); emotion 29; end; }
    close;

    OnMinute58:
    if($GSavageSpawn == 1) killmonster "prontera.gat","Victory1::OnSavageGone";
    close;

    OnMinute59:
    if($GSavageSpawn == 1){
    setmapflag "prontera.gat",mf_noskill;
    //setmapflag "prontera.gat",mf_clouds;
    pvpon "prontera.gat";
    monster "prontera.gat",0,0,"Golden Savage",1840,1,"Victory1::OnSavageGone";
    announce "Внимание! В пронтере появился неопознанный монстр!",bc_all,0x4EEE94;
    }
    close;

    L_SpawnSavage:
    //setmapflag "prontera.gat",mf_clouds;
    setmapflag "prontera.gat",mf_noskill;
    pvpon "prontera.gat";
    monster "prontera.gat",156,186,"Golden Savage",1840,1,"Victory1::OnSavageGone";
    announce "Внимание! В пронтере появился неопознанный монстр!",bc_all,0x4EEE94;
    close;

    L_Clean:
    query_sql "UPDATE `global_reg_value` SET value='0' WHERE str='Pumba'";
    announce "Что-то странное произошло в Пронтере!",bc_green|bc_all;
    close;
    }

    Карочи ивент УБЕЙ СВЕНЬЮ! Угадай число
    И просто выдача лута какого-либо))

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

    Опрос

    Оцените мой сайт
    Всего ответов: 108

    Авторизация

    Понедельник
    05.01.2026
    18:56

    Адаптация EvilDM,Сайт WOlF ©