Русские скрипты

Intel steps · 29.08.2008

MVP-Event.

<div style="margin:20px; margin-top:5px">
<div class="smallfont" style="margin-bottom:2px">Скрытая информация: code <input type="button" value="Показать" style="width:60px;font-size:10px;margin:0px;padding:0px;" onClick="if (this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display != '') { this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display = ''; this.innerText = ''; this.value = 'Скрыть'; } else { this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display = 'none'; this.innerText = ''; this.value = 'Показать'; }">
</div>
<div class="alt2" style="margin: 0px; padding: 6px; border: 1px inset;">
<div style="display: none;">

Код:

//===== eAthena Script
// Created by ~FatalitY~ for SectorRO
//===== Current Version: 
// V1.0
//==========================================

/////////////////////////////////////////////////
//////////////////////МАПЫ//////////////////////
///////////////////////////////////////////////

guild_vs2.gat    mapflag    nosave    SavePoint
guild_vs2.gat    mapflag    noteleport
guild_vs2.gat    mapflag    nowarp
guild_vs2.gat    mapflag    nowarpto
guild_vs2.gat    mapflag    nobranch
guild_vs2.gat    mapflag    noicewall
guild_vs2.gat    mapflag    noreturn
guild_vs2.gat    mapflag    pvp    off




////////////////////////////////////////////////////////////////////////////
/////////////////////Event Warper "Охота на MVP"///////////////////////////
//////////////////////////////////////////////////////////////////////////
prontera.gat,162,175,6    script    Event Warper::GH    811,{
    mes "[Event Warper]";
    mes "Приветствую тебя воин!";
    mes "Я могу тебя зарегистрировать в эвенте.";
    mes "Ты хочешь зарегестрироватся?";
    next;
    menu "Да!",-,"Нет!",L_no;
    if (getmapusers("guild_vs2.gat")>10) goto full;
    percentheal 100,100;
    warp "guild_vs2.gat",49,49;
    end;

full:
    mes "[Event Warper]";
    mes "Извините, участие в охоте могут принять только 10 игроков";
    close;
    end;

L_no:
    close;
    end;
}

//////////////////////////////////////////////////////////////////////////
/////////////////////////////ОХОТА НА MVP////////////////////////////////
////////////////////////////////////////////////////////////////////////

guild_vs2.gat,49,49,5    script    GHunting0    -1,{
    OnTimer10000:
    mapannounce "guild_vs2.gat","На этом эвенте вам не придётся соперничать.",0;
    end;
         
        OnTime1r10000:
    mapannounce "guild_vs2.gat","Вам будут предоставлены 5 сильных монстров и 5 минут на их убийство",0;
    end;

        OnTime2r10000:
    mapannounce "guild_vs2.gat","Эвент начнётся через минуту!",0;
    end;
        
        OnTime3r70000:
        disablenpc "GH";
        mapannounce "guild_vs2.gat","Первый монстр запущен!Angeling!",0;
        initnpctimer "GHunting";
        monster "guild_vs2.gat",58,51,"Angeling",1096,1,"MobS::OnMobKilled";

}

guild_vs2.gat,49,49,5    script    MobS    -1,{


OnMobKilled:
     mapannounce "guild_vs2.gat","Первый монстр мёртв![ 1 / 5 ] ",0;
     mapannounce "guild_vs2.gat","Второй монстр запущен!Develing! ",0;
     monster "guild_vs2.gat",58,51,"Deviling",1582,1,"MobS::OnDevKilled";
     end;

OnDevKilled:
     mapannounce "guild_vs2.gat","Второй монстр мёртв![ 2 / 5 ] ",0;
     mapannounce "guild_vs2.gat","Третий монстр запущен!Golden Thief Bug! ",0;
     monster "guild_vs2.gat",58,51,"Golden Thief Bug",1086,1,"MobS::OnGTBKilled";
     end;


OnGTBKilled:
     mapannounce "guild_vs2.gat","Третий монстр мёртв![ 3 / 5 ] ",0;
     mapannounce "guild_vs2.gat","Четвёртый монстр запущен!Eddga! ",0;
     monster "guild_vs2.gat",58,51,"Eddga",1115,1,"MobS::OnGTBKilled";
     end;


OnGTB1Killed:
     mapannounce "guild_vs2.gat","Четвёртый монстр мёртв! [ 4 / 5 ]",0;
     mapannounce "guild_vs2.gat","Пятый монстр запущен!Moonlight Flower! ",0;
     monster "guild_vs2.gat",58,51,"Moonlight Flower",1150,1,"MobS::OnGHEND";
     end;

OnGHEND:
     mapannounce "guild_vs2.gat","Пятый монстр мёртв![ 5 / 5 ] ",0;
     announce "Эвент удался на славу,не один монстр не выжил!",0;
     initnpctimer "GHWin";
     stopnpctimer "GHunting";
     end;

}

guild_vs2.gat,49,49,5    script    GHWin    -1,{

     OnTimer5000:
     mapwarp "guild_vs2.gat","prontera.gat",156,191;
     end;
        
}      

guild_vs2.gat,49,49,5    script    GHunting    -1,{
 
        OnTimer300000:
        announce "На этот раз победа за монстрами!",0;
        mapwarp "guild_vs2.gat","prontera.gat",156,191;
        killmonsterall "guild_vs2.gat";
        end;
}



////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////Eventer включение///////////////////////////
//////////////////////////////////////////////////////////////////////////////
force_1-3.gat,179,109,5    script    MVP Hunting        725,{
if (getgmlevel() > 29) goto s_gmmenu;
mes "[Super Event]";
mes " "+strcharinfo(0)+" Жди информации о начале эвентов";
close;


    s_gmmenu:
    mes "[Eventer]";
    mes "Здравствуйте мастер! Что пожелаете?";
    menu "Включить эвент",M1,"Выключить эвент",M2,"Ничего",M_end;
    close;

    M1:
    announce "Event Warper : эвент активирован.",8;
    disablenpc "GH";
    enablenpc "GH";
    initnpctimer "GHunting0";
    mes "[Eventer]";
    mes "Эвент NPc активирован";
    close;


    M2:
    disablenpc "GH";
    mes "[Eventer]";
    mes "Эвент NPC деактивирован";
    close;


    M_end:
    mes "[Eventer]";
    mes "Как скажете мастер, я всегда к вашим услугам";
        close;

}

Babyjobmaster

Код:

prontera.gat,154,193,5    script    Baby Job Master#1    877,{
if(Class == 0) {
mes "^ff0000[Baby Job Master]^000000";
mes "Я могу превратить тебя в Baby";
menu"Да",yes_baby,"Нет",no_baby,"Выход",exits;
yes_baby:
    Jobchange 4023;
no_baby:
    close;
}
if(Class == 4023) {
if(JobLevel < 10){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
} else
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть роскаданы";
mes "все скил поинты";
close;
} else {
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всьо впорядке";
mes "Выбери следующую профу";
next;
menu"Baby Archer",Archer,"Baby Thief",Thief,"Baby Swordman",Swordman,"Baby Acolyte",Acolyte,"Baby Mage",Mage,"Baby Merchant",Merchant,"Super Baby",Super_Baby,"Выход",exits;
Archer:
    Jobchange 4026;
    skill 142,1,0;
    skill 147,1,0;
    skill 148,1,0;
    close;
Thief:
    Jobchange 4029;
    skill 142,1,0;
    skill 149,1,0;
    skill 150,1,0;
    skill 151,1,0;
    skill 152,1,0;
    close;
Swordman:
    Jobchange 4024;
    skill 142,1,0;
    skill 144,1,0;
    skill 145,1,0;
    skill 146,1,0;
    close;
Acolyte:
    Jobchange 4027;
    skill 142,1,0;
    skill 156,1,0;
    close;
Mage:
    Jobchange 4025;
    skill 142,1,0;
    skill 157,1,0;
    close;
Merchant:
    Jobchange 4028;
    skill 142,1,0;
    skill 153,1,0;
    skill 154,1,0;
    skill 155,1,0;
    close;
Super_Baby:
    Jobchange 4045;
    close;
exits:
    close;
    }
} else 
if(Class == 4026){
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть расставлены";
mes "все скил поинты";
close;
} else 
if(JobLevel < 50){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
}
if(Sex == 0) {
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Hunter",Baby_Hunter,"Baby Dancer",Baby_Dancer,"Выход",exits;
Baby_Hunter:
    Jobchange 4034;
    close;
Baby_Dancer:
    Jobchange 4043;
    close;
} else 
if(Sex == 1) {
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Hunter",Baby_Hunter2,"Baby Bard",Baby_Bard,"Выход",exits;
Baby_Hunter2:
    Jobchange 4034;
    close;
Baby_Bard:
    Jobchange 4042;
    close;
}
} else 
if(Class == 4029){
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть расставлены";
mes "все скил поинты";
close;
} else 
if(JobLevel < 50){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
}
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Assassin",Baby_Assassin,"Baby Rogue",Baby_Rogue,"Выход",exits;
Baby_Assassin:
    Jobchange 4035;
    close;
Baby_Rogue:
    Jobchange 4040;
    close;
} else 
if(Class == 4024){
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть расставлены";
mes "все скил поинты";
close;
} else 
if(JobLevel < 50){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
}
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Crusader",Baby_Crusader,"Baby Knight",Baby_Knight,"Выход",exits;
Baby_Crusader:
    Jobchange 4037;
    close;
Baby_Knight:
    Jobchange 4030;
    close;
} else 
if(Class == 4027){
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть расставлены";
mes "все скил поинты";
close;
} else 
if(JobLevel < 50){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
}
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Priest",Baby_Priest,"Baby Monk",Baby_Monk,"Выход",exits;
Baby_Priest:
    Jobchange 4031;
    close;
Baby_Monk:
    Jobchange 4038;
    close;
} else 
if(Class == 4025){
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть расставлены";
mes "все скил поинты";
close;
} else 
if(JobLevel < 50){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
}
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Wizard",Baby_Wizard,"Baby Sage",Baby_Sage,"Выход",exits;
Baby_Wizard:
    Jobchange 4032;
    close;
Baby_Sage:
    Jobchange 4039;
    close;
} else 
if(Class == 4028){
if(SkillPoint != 0){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя должны быть расставлены";
mes "все скил поинты";
close;
} else 
if(JobLevel < 50){
mes "^ff0000[Baby Job Master]^000000";
mes "У тебя маленький джоб левел";
mes "Тебе надо ещё качаться";
close;
}
mes "^ff0000[Baby Job Master]^000000";
mes "Вроде с тобой всё в порядке";
mes "Выбери следующую профессию";
next;
menu"Baby Blacksmith",Baby_Blacksmith,"Baby Alchemist",Baby_Alchemist,"Выход",exits;
Baby_Blacksmith:
    Jobchange 4033;
    close;
Baby_Alchemist:
    Jobchange 4041;
    close;
} else 
mes "^ff0000[Baby Job Master]^000000";
mes "Джоб ченджер только для Baby класов";
close;
}

morocc.gat,164,113,3    duplicate(Baby Job Master#1)    Baby Job Master#2    877

</div>
</div>
</div>

Intel steps · 29.08.2008

Время с автосменой дня и ночи

Код:

//FatalitY
//time 1.1
//1.1 привестствие
//Каждый час сообщается время, автоматически меняется день и ночь(день 50 мин ночь 30 мин)

-    script    servergreeting    -1,{
    OnTimer40000:
        announce "[SeсtorRO]  Добро пожаловать!", 0;
        detachnpctimer;
        end;
    OnInit:
        initnpctimer;
        startnpctimer;
        end;
}

-    script    Time_events    -1,{
OnMinute59:
//c RusRO
if (gettime(3) ==23) announce "Одна минута до полуночи. Спать не пора? =)", 0;
end;

OnMinute00:
announce "Московское время: " + gettime(3) + " часов 00 минут. (GMT +03:00)", 0;
end;

OnClock0600://полчаса
if(isnight()){
    day;
    switch(rand(3))    {
        case 0: announce "Солнце снова взошло.", 0;break;
        case 1: announce "Восходящее солнце осветило землю.", 0;break;
        case 2: announce "Солнце поднялось высоко над горизонтом.", 0;break;
    }
    setnpctimer 0;
    startnpctimer;
}
end;

OnClock2300:
    night;
    switch(rand(5))    {
        case 0: announce "На мир опустились сумерки.", 0;break;
        case 1: announce "Мир погрузился во тьму.", 0;break;
        case 2: announce "Солнце скрылось за горизонтом.", 0;break;
        case 3: announce "Заходящее солнце окрасило облака в ярко-красный цвет, но вскоре все померкло.", 0;break;
        case 4: announce "Исчезли последние лучи заката.", 0;break;
    }
setnpctimer 0;
startnpctimer;
end;

OnInit:
    initnpctimer;
    startnpctimer;
    end;
}

Intel steps · 29.08.2008

Варпер во все локации

<div style="margin:20px; margin-top:5px">
<div class="smallfont" style="margin-bottom:2px">Скрытая информация: code <input type="button" value="Показать" style="width:60px;font-size:10px;margin:0px;padding:0px;" onClick="if (this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display != '') { this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display = ''; this.innerText = ''; this.value = 'Скрыть'; } else { this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display = 'none'; this.innerText = ''; this.value = 'Показать'; }">
</div>
<div class="alt2" style="margin: 0px; padding: 6px; border: 1px inset;">
<div style="display: none;">

Код:

prontera,161,192,4 script Проводник::Warper 873,{
set $@namewarper$,"Проводник";
mes "["+$@namewarper$+"]";
mes "Привет,я будут твоим Warperом в мире Рун-Мидграда.Куда желаешь отправится?";
next;
switch(select("В город","В поздемелье","В локацию около города...","В последнею точку ( "+#lastwarploc$+" )")){
//// Towns ////
case 1:
mes "В какой именно город тебя проводить?";
switch(select("Альберта","Аль-Де-Баран","Аматсу","Аотайя","Гефен","Кунлун","Излюд","Комодо","Лайтхайзен","Лоянг","Люти","Морок","Нифхельм","Пайон","Пронтера","Рахель","Юно","Умбала","Хугель","Эйнброх")){
case 1:
callfunc "teleportation","alberta",192,147;

break;
case 2:
callfunc "teleportation","aldebaran",140,131;

break;
case 3:
callfunc "teleportation","amatsu",198,184;

break;
case 4:
callfunc "teleportation","ayothaya",150,114;

break;

case 5:
callfunc "teleportation","geffen",119,59;

break;
case 6: 
callfunc "teleportation","gonryun",160,121;

break;
case 7:
callfunc "teleportation","izlude",128,114;

break;
case 8:
callfunc "teleportation","comodo",209,143;

break;
case 9:
callfunc "teleportation","lighthalzen",158,92;

break;
case 10:
callfunc "teleportation","louyang",210,108;

break;
case 11:
callfunc "teleportation","xmas",147,134;

break;
case 12:
callfunc "teleportation","morroc",156,93;

break;
case 13:
callfunc "teleportation","niflheim",85,154;

break;
case 14:
callfunc "teleportation","payon",152,75;

break;
case 15:
callfunc "teleportation","prontera",155,181;

break;
case 16:
callfunc "teleportation","rachel",129,140;

break;
case 17:
callfunc "teleportation","yuno",157,51;

break;
case 18:
callfunc "teleportation","umbala",145,155;

break;
case 19:
callfunc "teleportation","hugel",96,145;

break;
case 20:
callfunc "teleportation","einbroch",236,199;

break;
}
break;
//// Dungeons ////
case 2:
mes "В какое именно подземелье вы хотите отправится?";
switch(select(" Abyss Dungeon","Amatsu Dungeon","Ant Hell","Ayothaya Dungon","Beach Dungeon","Byalan Dungeon","Clock Tower","Coal Mines","Culvert","Einbroch Dungeon","Gefenia","Gonryun Dungeon","Geffen Dungeon","Glast Helm","Ice Dungeon","Labirint","Juperos Dungeon","Lighthlzen Dungeon","Louyang Dungeon","Magma Dungeon","Machin Doll Factory","Odin Temple","Orc Dungeon","Payon Dungeon","Pyramids","Shrine Sacred Precinct","Sphinx","Sunkn Ship","Thantos Dungeon","Thor's Volcano Dungeon","Toy Factory","Turtle Dungeon","Cursed Abbey")){
mes "Выберите уровень подземелья";
case 1: 
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","abyss_01",262,271;

break;
case 2:
callfunc "teleportation","abyss_02",273,270;

break;
case 3:
callfunc "teleportation","abyss_03",115,31;

break;
}
break;
case 2:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","ama_dun01",228,11;

break;
case 2:
callfunc "teleportation","ama_dun02",34,41;

break;
case 3:
callfunc "teleportation","ama_dun03",119,14;

break;
}
break;
case 3:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","anthell01",35,262;

break;
case 2:
callfunc "teleportation","anthell02",168,170;

break;
}
break;
case 4:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","ayo_dun01",275,17;

break;
case 2:
callfunc "teleportation","ayo_dun01",275,26;

break;
}
break;
case 5:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","beach_dun",266,67;

break;
case 2:
callfunc "teleportation","beach_dun2",255,244;

break;
case 3:
callfunc "teleportation","beach_dun3",23,260;

break;
}
break;
case 6:
switch(select("1 уровень","2 уровень","3 уровень","4 уровень","5 уровень")){
case 1:
callfunc "teleportation","iz_dun00",168,168;

break;
case 2:
callfunc "teleportation","iz_dun01",253,252;

break;
case 3:
callfunc "teleportation","iz_dun02",236,204;

break;
case 4:
callfunc "teleportation","iz_dun03",32,63;

break;
case 5:
callfunc "teleportation","iz_dun04",26,27;

break;
}
break;
case 7:
switch(select("1 Этаж","2 Этаж","3 Этаж","4 Этаж","1 Подземный этаж","2 Подземный этаж","3 Подземный этаж","4 Подземный этаж")){
case 1:
callfunc "teleportation","c_tower1",199,159;

break;
case 2:
callfunc "teleportation","c_tower2",148,283;

break;
case 3:
callfunc "teleportation","c_tower3",65,147;

break;
case 4:
callfunc "teleportation","c_tower4",56,155;

break;
case 5:
callfunc "teleportation","alde_dun01",297,25;

break;
case 6:
callfunc "teleportation","alde_dun02",127,169;

break;
case 7:
callfunc "teleportation","alde_dun03",277,178;

break;
case 8:
callfunc "teleportation","alde_dun04",268,74;

break;
}
break;
case 8:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","mjo_dun01",52,17;

break;
case 2:
callfunc "teleportation","mjo_dun02",381,343;

break;
case 3:
callfunc "teleportation","mjo_dun03",302,262;

break;
}
break;
case 9:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень")){
case 1:
callfunc "teleportation","prt_sewb1",131,247;

break;
case 2:
callfunc "teleportation","prt_sewb2",19,19;

break;
case 3:
callfunc "teleportation","prt_sewb3",180,169;

break;
case 4:
callfunc "teleportation","prt_sewb4",100,92;

break;
}
break;
case 10:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","ein_dun01",22,14;

break;
case 2:
callfunc "teleportation","ein_dun02",289,290;

break;
}
break;
case 11:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень")){
case 1:
callfunc "teleportation","gefenia01",40,103;

break;
case 2:
callfunc "teleportation","gefenia02",203,34;

break;
case 3:
callfunc "teleportation","gefenia03",266,168;

break;
case 4:
callfunc "teleportation","gefenia04",130,272;

break;
}
break;
case 12:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","gon_dun01",153,53;

break;
case 2:
callfunc "teleportation","gon_dun02",28,113;

break;
case 3:
callfunc "teleportation","gon_dun03",68,16;

break;
}
break;
case 13:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень")){
case 1:
callfunc "teleportation","gef_dun00",104,99;

break;
case 2:
callfunc "teleportation","gef_dun01",115,236;

break;
case 3:
callfunc "teleportation","gef_dun02",106,132;

break;
case 4:
callfunc "teleportation","gef_dun03",203,200;

break;
}
break;
case 14:
switch(select("Гластхельм(Город)","Крепость 1","Крепость 2","Казармы 1","Казармы 2","Церковный двор","Канализация 1","Канализация 2","Канализация 3","Канализация 4","Аббатсво","Темница","Пещера 1","Пещера 2","Подземная Тюрьма 1","Подземная Тюрьма 2")){
case 1:
callfunc "teleportation","glast_01",370,304;

break;
case 2:
callfunc "teleportation","gl_cas01",199,29;

break;
case 3:
callfunc "teleportation","gl_cas02",104,25;

break;
case 4:
callfunc "teleportation","gl_knt01",150,15;

break;
case 5:
callfunc "teleportation","gl_knt02",157,287;

break;
case 6:
callfunc "teleportation","gl_chyard",147,15;

break;
case 7:
callfunc "teleportation","gl_sew01",258,255;

break;
case 8:
callfunc "teleportation","gl_sew02",108,291;

break;
case 9:
callfunc "teleportation","gl_sew03",171,283;

break;
case 10:
callfunc "teleportation","gl_sew04",68,277;

break;
case 11:
callfunc "teleportation","gl_church",156,7;

break;
case 12:
callfunc "teleportation","gl_step",12,7;

break;
case 13:
callfunc "teleportation","gl_dun01",133,271;

break;
case 14:
callfunc "teleportation","gl_dun02",224,274;

break;
case 15:
callfunc "teleportation","gl_prison",14,70;

break;
case 16:
callfunc "teleportation","gl_prison1",150,14;

break;
}
break;
case 15:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","ice_dun01",157,12;

break;
case 2:
callfunc "teleportation","ice_dun02",151,155;

break;
case 3:
callfunc "teleportation","ice_dun03",149,22;

break;
}
break;
case 16:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","prt_maze01",176,7;

break;
case 2:
callfunc "teleportation","prt_maze02",93,20;

break;
case 3:
callfunc "teleportation","prt_maze03",23,8;

break;
}
break;
case 17:
switch(select("1Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","juperos_01",53,247;

break;
case 2:
callfunc "teleportation","juperos_02",127,277;

break;
case 3:
callfunc "teleportation","jupe_core",149,20;

break;
}
break;
case 18:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","lhz_dun01",150,284;

break;
case 2:
callfunc "teleportation","lhz_dun02",18,146;

break;
case 3:
callfunc "teleportation","lhz_dun03",140,137;

break;
}
break;
case 19:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","lou_dun01",218,196;

break;
case 2:
callfunc "teleportation","lou_dun02",282,20;

break;
case 3:
callfunc "teleportation","lou_dun03",165,38;

break;
}
break;
case 20:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","mag_dun01",126,68;

break;
case 2:
callfunc "teleportation","mag_dun02",47,30;

break;
}
break;
case 21:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","kh_dun01",3,230;

break;
case 2:
callfunc "teleportation","kh_dun02",41,196;

break;
}
break;
case 22:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","odin_tem01",99,145;

break;
case 2:
callfunc "teleportation","odin_tem02",33,334;

break;
case 3:
callfunc "teleportation","odin_tem03",232,45;

break;
}
break;
case 23:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","orcsdun01",32,170;

break;
case 2:
callfunc "teleportation","orcsdun02",21,185;

break;
}
break;
case 24:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень","5 Уровень")){
case 1:
callfunc "teleportation","pay_dun00",21,183;

break;
case 2:
callfunc "teleportation","pay_dun01",19,33;

break;
case 3:
callfunc "teleportation","pay_dun02",19,63;

break;
case 4:
callfunc "teleportation","pay_dun03",155,159;

break;
case 5:
callfunc "teleportation","pay_dun04",201,204;

break;
}
break;
case 25:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень","1 Поземный Этаж","2 Подземный этаж")){
case 1:
callfunc "teleportation","moc_pryd01",192,9;

break;
case 2:
callfunc "teleportation","moc_pryd02",10,192;

break;
case 3:
callfunc "teleportation","moc_pryd03",100,92;

break;
case 4:
callfunc "teleportation","moc_pryd04",181,11;

break;
case 5:
callfunc "teleportation","moc_pryd05",94,96;

break;
case 6:
callfunc "teleportation","moc_pryd06",192,8;

break;
}
break;
case 26:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень","5 Уровень")){
case 1:
callfunc "teleportation","ra_san01",140,10;

break;
case 2:
callfunc "teleportation","ra_san02",32,21;

break;
case 3:
callfunc "teleportation","ra_san03",4,149;

break;
case 4:
callfunc "teleportation","ra_san04",204,220;

break;
case 5:
callfunc "teleportation","ra_san05",150,11;

break;
}
break;
case 27:
switch(select("1 Уровень","2 Уровень","3 Уровень","4 Уровень","5 Уровень")){
case 1:
callfunc "teleportation","in_sphinx1",288,9;

break;
case 2:
callfunc "teleportation","in_sphinx2",149,81;

break;
case 3:
callfunc "teleportation","in_sphinx3",210,54;

break;
case 4:
callfunc "teleportation","in_sphinx4",10,222;

break;
case 5:
callfunc "teleportation","in_sphinx5",100,99;

break;
}
break;
case 28:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","treasure01",69,24;

break;
case 2:
callfunc "teleportation","treasure02",102,27;

break;
}
break;
case 29:
switch(select("1 этаж","2 этаж","3 этаж","4 этаж","5 этаж","6 этаж","7 этаж","8 этаж","9 этаж","10 этаж","11 этаж","12 этаж")){
case 1:
callfunc "teleportation","tha_t01",149,36;

break;
case 2:
callfunc "teleportation","tha_t02",150,132;

break;
case 3:
callfunc "teleportation","tha_t03",60,138;

break;
case 4:
callfunc "teleportation","tha_t04",60,141;

break;
case 5:
callfunc "teleportation","tha_t05",62,6;

break;
case 6:
callfunc "teleportation","tha_t06",207,6;

break;
case 7:
callfunc "teleportation","tha_t07",35,166;

break;
case 8:
callfunc "teleportation","tha_t08",93,148;

break;
case 9:
callfunc "teleportation","tha_t09",29,107;

break;
case 10:
callfunc "teleportation","tha_t10",159,138;

break;
case 11:
callfunc "teleportation","tha_t11",19,20;

break;
case 12:
callfunc "teleportation","tha_t12",130,52;

break;
}
break;
case 30:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","thor_v01",21,226;

break;
case 2:
callfunc "teleportation","thor_v02",74,205;

break;
case 3:
callfunc "teleportation","thor_v03",31,272;

break;
}
break;
case 31:
switch(select("1 Уровень","2 Уровень")){
case 1:
callfunc "teleportation","xmas_dun01",204,19;

break;
case 2:
callfunc "teleportation","xmas_dun02",129,33;

break;
}
break;
case 32:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","tur_dun02",148,261;

break;
case 2:
callfunc "teleportation","tur_dun03",132,189;

break;
case 3:
callfunc "teleportation","tur_dun04",100,192;

break;
}
break;
case 33:
switch(select("1 Уровень","2 Уровень","3 Уровень")){
case 1:
callfunc "teleportation","abbey01",51,11;

break;
case 2:
callfunc "teleportation","abbey02",149,11;

break;
case 3:
callfunc "teleportation","abbey03",119,7;

break;
}
break;
}
break;
//// Fields ////
case 3:
mes "В локации какого города вы хотите отправится?";
switch(select("Аль-Де-Барана(Горная гряда Мьольнир)","Аматсу","Аотайяи","Вениса","Гефена","Комодо","Кунлуна","Лайтхзена","Лоянга","Люти","Морока","Нифхельма","Пайона","Пронтеры","Рахеля","Умбалы","Хугеля","Эйнброха","Юно")){
mes "Выберите локаци.";
case 1:
switch(Select("Горная гряда Мьольнир 1", "Горная гряда Мьольнир 2","Горная гряда Мьольнир 3","Горная гряда Мьольнир 4","Горная гряда Мьольнир 5","Горная гряда Мьольнир 6","Горная гряда Мьольнир 7","Горная гряда Мьольнир 8","Горная гряда Мьольнир 9","Горная гряда Мьольнир 10","Горная гряда Мьольнир 11","Горная гряда Мьольнир 12")){
case 1:
callfunc "teleportation","mjolnir_01",204,120;

break;
case 2:
callfunc "teleportation","mjolnir_02",175,193;

break;
case 3:
callfunc "teleportation","mjolnir_03",208,213;

break;
case 4:
callfunc "teleportation","mjolnir_04",179,180;

break;
case 5:
callfunc "teleportation","mjolnir_05",181,240;

break;
case 6:
callfunc "teleportation","mjolnir_06",195,270;

break;
case 7:
callfunc "teleportation","mjolnir_07",235,202;

break;
case 8:
callfunc "teleportation","mjolnir_08",188,215;

break;
case 9:
callfunc "teleportation","mjolnir_09",205,144;

break;
case 10:
callfunc "teleportation","mjolnir_10",245,223;

break;
case 11:
callfunc "teleportation","mjolnir_11",180,206;

break;
case 12:
callfunc "teleportation","mjolnir_12",196,208;

break;
}
break;
case 2:
switch(select("Окрестности Аматсу 1")){
case 1:
callfunc "teleportation","ama_fild01",190,197;

break;
}
break; 

case 3:
switch(select("Окрестности Аотайя 1","Окрестности Аотайя 2")){
case 1:
callfunc "teleportation","ayo_fild01",173,134;

break;
case 2:
callfunc "teleportation","ayo_fild02",212,150;

break;
}
break;
case 4:
switch(select("Поля Вейниса 1","Поля Вейниса 2","Поля Вейниса 3","Поля Вейниса 4","Поля Вейниса 5","Поля Вейниса 6","Поля Вейниса 7")){
case 1:
callfunc "teleportation","ve_fild01",186,175;

break;
case 2:
callfunc "teleportation","ve_fild02",196,370;

break;
case 3:
callfunc "teleportation","ve_fild03",222,45;

break;
case 4:
callfunc "teleportation","ve_fild04",51,250;

break;
case 5:
callfunc "teleportation","ve_fild05",202,324;

break;
case 6:
callfunc "teleportation","ve_fild06",150,223;

break;
case 7:
callfunc "teleportation","ve_fild07",149,307;

break;
}
break;
case 5:
switch(select("Поля Гефена 1","Поля Гефена 2","Поля Гефена 3","Поля Гефена 4","Поля Гефена 5","Поля Гефена 6","Поля Гефена 7","Поля Гефена 8","Поля Гефена 9","Поля Гефена 10","Поля Гефена 11","Поля Гефена 12","Поля Гефена 13","Поля Гефена 14","Поля Гефена 15")){
case 1:
callfunc "teleportation","gef_fild00",46,199;

break;
case 2:
callfunc "teleportation","gef_fild01",213,204;

break;
case 3:
callfunc "teleportation","gef_fild02",195,212;

break;
case 4:
callfunc "teleportation","gef_fild03",257,192;

break;
case 5:
callfunc "teleportation","gef_fild04",188,171;

break;
case 6:
callfunc "teleportation","gef_fild05",166,263;

break;
case 7:
callfunc "teleportation","gef_fild06",248,158;

break;
case 8:
callfunc "teleportation","gef_fild07",195,191;

break;
case 9:
callfunc "teleportation","gef_fild08",186,183;

break;
case 10:
callfunc "teleportation","gef_fild09",221,117;

break;
case 11:
callfunc "teleportation","gef_fild10",178,218;

break;
case 12:
callfunc "teleportation","gef_fild11",136,328;

break;
case 13:
callfunc "teleportation","gef_fild12",240,181;

break;
case 14:
callfunc "teleportation","gef_fild13",235,235;

break;
case 15:
callfunc "teleportation","gef_fild14",211,185;

break;
}
break;
case 6:
switch(select("Окрестности Комодо 1","Окрестности Комодо 2","Окрестности Комодо 3","Окрестности Комодо 4","Окрестности Комодо 5","Окрестности Комодо 6","Окрестности Комодо 7","Окрестности Комодо 8","Окрестности Комодо 9")){
case 1:
callfunc "teleportation","cmd_fild01",180,178;

break;
case 2:
callfunc "teleportation","cmd_fild02",231,160;

break;
case 3:
callfunc "teleportation","cmd_fild03",191,172;

break;
case 4:
callfunc "teleportation","cmd_fild04",228,194;

break;
case 5:
callfunc "teleportation","cmd_fild05",224,203;

break;
case 6:
callfunc "teleportation","cmd_fild06",190,223;

break;
case 7:
callfunc "teleportation","cmd_fild07",234,177;

break;
case 8:
callfunc "teleportation","cmd_fild08",194,175;

break;
case 9:
callfunc "teleportation","cmd_fild09",172,172;

break;
}
break;
case 7:
switch(select("Окрестности Кунлуна 1")){
case 1:
callfunc "teleportation","gon_fild01",220,227;

break;
}
break;
case 8:
switch(select("Окрестноти Лайтхзена 1","Окрестноти Лайтхзена 2","Окрестноти Лайтхзена 3")){
case 1:
callfunc "teleportation","lhz_fild01",240,179;

break;
case 2:
callfunc "teleportation","lhz_fild02",185,235;

break;
case 3:
callfunc "teleportation","lhz_fild03",240,226;

break;
}
break;
case 9:
switch(select("Окрестности Лоянга")){
case 1:
callfunc "teleportation","lou_fild01",229,187;

break;
}
break;
case 10:
switch(select("Снежная равнина Люти")){
case 1:
callfunc "teleportation","xmas_fild01",115,145;

break;
}
break;
case 11:
switch(select("Пустыня Сограт 1","Пустыня Сограт 2","Пустыня Сограт 3","Пустыня Сограт 4","Пустыня Сограт 5","Пустыня Сограт 6","Пустыня Сограт 7","Пустыня Сограт 8","Пустыня Сограт 9","Пустыня Сограт 10","Пустыня Сограт 11","Пустыня Сограт 12","Пустыня Сограт 13","Пустыня Сограт 14","Пустыня Сограт 15","Пустыня Сограт 16","Пустыня Сограт 17","Пустыня Сограт 18","Пустыня Сограт 19")){
case 1:
callfunc "teleportation","moc_fild01",219,205;

break;
case 2:
callfunc "teleportation","moc_fild02",177,206;

break;
case 3:
callfunc "teleportation","moc_fild03",194,182;

break;
case 4:
callfunc "teleportation","moc_fild04",184,217;

break;
case 5:
callfunc "teleportation","moc_fild05",203,213;

break;
case 6:
callfunc "teleportation","moc_fild06",213,208;

break;
case 7:
callfunc "teleportation","moc_fild07",224,170;

break;
case 8:
callfunc "teleportation","moc_fild08",229,177;

break;
case 9:
callfunc "teleportation","moc_fild09",195,198;

break;
case 10:
callfunc "teleportation","moc_fild10",209,168;

break;
case 11:
callfunc "teleportation","moc_fild11",198,216;

break;
case 12:
callfunc "teleportation","moc_fild12",156,187;

break;
case 13:
callfunc "teleportation","moc_fild13",185,263;

break;
case 14:
callfunc "teleportation","moc_fild14",209,219;

break;
case 15:
callfunc "teleportation","moc_fild15",223,188;

break;
case 16:
callfunc "teleportation","moc_fild16",206,228;

break;
case 17:
callfunc "teleportation","moc_fild17",208,238;

break;
case 18:
callfunc "teleportation","moc_fild18",209,223;

break;
case 19:
callfunc "teleportation","moc_fild19",85,97;

break;
}
break;
case 12:
switch(select("Окрестности Нифхельма 1","Окрестности Нифхельма 2")){
case 1:
callfunc "teleportation","nif_fild01",215,229;

break;
case 2:
callfunc "teleportation","nif_fild02",167,234;

break;
}
break;
case 13:
switch(select("Леса Пайона 1","Леса Пайона 2","Леса Пайона 3","Леса Пайона 4","Леса Пайона 5","Леса Пайона 6","Леса Пайона 7","Леса Пайона 8","Леса Пайона 9","Леса Пайона 10","Леса Пайона 11")){
case 1:
callfunc "teleportation","pay_fild01",158,206;

break;
case 2:
callfunc "teleportation","pay_fild02",151,219;

break;
case 3:
callfunc "teleportation","pay_fild03",205,148;

break;
case 4:
callfunc "teleportation","pay_fild04",186,247;

break;
case 5:
callfunc "teleportation","pay_fild05",134,204;

break;
case 6:
callfunc "teleportation","pay_fild06",193,235;

break;
case 7:
callfunc "teleportation","pay_fild07",200,177;

break;
case 8:
callfunc "teleportation","pay_fild08",137,189;

break;
case 9:
callfunc "teleportation","pay_fild09",201,224;

break;
case 10:
callfunc "teleportation","pay_fild10",160,205;

break;
case 11:
callfunc "teleportation","pay_fild11",194,150;

break;
}
break;
case 14:
switch(select("Окрестности Пронтеры 1","Окрестности Пронтеры 2","Окрестности Пронтеры 3","Окрестности Пронтеры 4","Окрестности Пронтеры 5","Окрестности Пронтеры 6","Окрестности Пронтеры 7","Окрестности Пронтеры 8","Окрестности Пронтеры 9","Окрестности Пронтеры 10","Окрестности Пронтеры 11","Окрестности Пронтеры 12")){
case 1:
callfunc "teleportation","prt_fild00",184,235;

break;
case 2:
callfunc "teleportation","prt_fild01",190,206;

break;
case 3:
callfunc "teleportation","prt_fild02",240,206;

break;
case 4:
callfunc "teleportation","prt_fild03",190,143;

break;
case 5:
callfunc "teleportation","prt_fild04",307,252;

break;
case 6:
callfunc "teleportation","prt_fild05",239,213;

break;
case 7:
callfunc "teleportation","prt_fild06",185,188;

break;
case 8:
callfunc "teleportation","prt_fild07",193,194;

break;
case 9:
callfunc "teleportation","prt_fild08",187,218;

break;
case 10:
callfunc "teleportation","prt_fild09",210,183;

break;
case 11:
callfunc "teleportation","prt_fild10",195,149;

break;
case 12:
callfunc "teleportation","prt_fild11",198,164;

break;
}
break;
case 15:
switch(select("Окрестности Рахеля 1","Окрестности Рахеля 2","Окрестности Рахеля 3","Окрестности Рахеля 4","Окрестности Рахеля 5","Окрестности Рахеля 6","Окрестности Рахеля 7","Окрестности Рахеля 8","Окрестности Рахеля 9","Окрестности Рахеля 10","Окрестности Рахеля 11","Окрестности Рахеля 12","Окрестности Рахеля 13")){
case 1:
callfunc "teleportation","ra_fild01",192,162;

break;
case 2:
callfunc "teleportation","ra_fild02",235,166;

break;
case 3:
callfunc "teleportation","ra_fild03",202,206;

break;
case 4:
callfunc "teleportation","ra_fild04",202,208;

break;
case 5:
callfunc "teleportation","ra_fild05",225,202;

break;
case 6:
callfunc "teleportation","ra_fild06",202,214;

break;
case 7:
callfunc "teleportation","ra_fild07",263,196;

break;
case 8:
callfunc "teleportation","ra_fild08",217,201;

break;
case 9:
callfunc "teleportation","ra_fild09",87,121;

break;
case 10:
callfunc "teleportation","ra_fild10",277,181;

break;
case 11:
callfunc "teleportation","ra_fild11",221,185;

break;
case 12:
callfunc "teleportation","ra_fild12",175,200;

break;
case 13:
callfunc "teleportation","ra_fild13",174,197;

break;
}
break;
case 16:
switch(select("Окрестности Умбалы 1","Окрестности Умбалы 2","Окрестности Умбалы 3","Окрестности Умбалы 4")){
case 1:
callfunc "teleportation","um_fild01",217,206;

break;
case 2:
callfunc "teleportation","um_fild02",223,221;

break;
case 3:
callfunc "teleportation","um_fild03",237,215;

break;
case 4:
callfunc "teleportation","um_fild04",202,197;

break;
}
break;
case 17:
switch(select("Окрестности Хугеля 1","Окрестности Хугеля 2","Окрестности Хугеля 3","Окрестности Хугеля 4","Окрестности Хугеля 5","Окрестности Хугеля 6","Окрестности Хугеля 7")){
case 1:
callfunc "teleportation","hu_fild01",268,101;

break;
case 2:
callfunc "teleportation","hu_fild02",222,193;

break;
case 3:
callfunc "teleportation","hu_fild03",232,185;

break;
case 4:
callfunc "teleportation","hu_fild04",252,189;

break;
case 5:
callfunc "teleportation","hu_fild05",196,106;

break;
case 6:
callfunc "teleportation","hu_fild06",216,220;

break;
case 7:
callfunc "teleportation","hu_fild07",227,197;

break;
}
break;
case 18:
switch(select("Окрестности Эйнброха 1","Окрестности Эйнброха 2","Окрестности Эйнброха 3","Окрестности Эйнброха 4","Окрестности Эйнброха 5","Окрестности Эйнброха 6","Окрестности Эйнброха 7","Окрестности Эйнброха 8","Окрестности Эйнброха 9","Окрестности Эйнброха 10")){
case 1:
callfunc "teleportation","ein_fild01",142,225;

break;
case 2:
callfunc "teleportation","ein_fild02",182,141;

break;
case 3:
callfunc "teleportation","ein_fild03",187,228;

break;
case 4:
callfunc "teleportation","ein_fild04",185,173;

break;
case 5:
callfunc "teleportation","ein_fild05",216,173;

break;
case 6:
callfunc "teleportation","ein_fild06",195,148;

break;
case 7:
callfunc "teleportation","ein_fild07",272,220;

break;
case 8:
callfunc "teleportation","ein_fild08",173,214;

break;
case 9:
callfunc "teleportation","ein_fild09",207,174;

break;
case 10:
callfunc "teleportation","ein_fild10",196,200;

break;
}
break;
case 19:
switch(select("Окрестности Юно 1","Окрестности Юно 2","Окрестности Юно 3","Окрестности Юно 4","Окрестности Юно 5","Окрестности Юно 6","Окрестности Юно 7","Окрестности Юно 8","Окрестности Юно 9","Окрестности Юно 10","Окрестности Юно 11","Окрестности Юно 12")){
case 1:
callfunc "teleportation","yuno_fild01",189,224;

break;
case 2:
callfunc "teleportation","yuno_fild02",192,207;

break;
case 3:
callfunc "teleportation","yuno_fild03",221,157;

break;
case 4:
callfunc "teleportation","yuno_fild04",226,199;

break;
case 5:
callfunc "teleportation","yuno_fild05",223,177;

break;
case 6:
callfunc "teleportation","yuno_fild06",187,232;

break;
case 7:
callfunc "teleportation","yuno_fild07",231,174;

break;
case 8:
callfunc "teleportation","yuno_fild08",196,203;

break;
case 9:
callfunc "teleportation","yuno_fild09",183,214;

break;
case 10:
callfunc "teleportation","yuno_fild10",200,124;

break;
case 11:
callfunc "teleportation","yuno_fild11",195,226;

break;
case 12:
callfunc "teleportation","yuno_fild12",210,304;

break;
}
break;
}
break;
//// Last Warp ////
case 4:
warp #lastwarploc$,#lastwarpx,#lastwarpy;
break;
}
end;
}

function script teleportation {
set @warploc$, getarg(0);
set @warpx, getarg(1);
set @warpy, getarg(2);
set #lastwarploc$,@warploc$;
set #lastwarpx,@warpx;
set #lastwarpy,@warpy;
warp @warploc$,@warpx,@warpy;
end;
}

//Дубликаты
rachel,22,148,4 duplicate(Warper) Проводник#1 873
alberta,31,240,4 duplicate(Warper) Проводник#2 873
aldebaran,145,118,4 duplicate(Warper) Проводник#3 873
amatsu,200,79,1 duplicate(Warper) Проводник#4 873
ayothaya,143,162,4 duplicate(Warper) Проводник#5 873
comodo,194,158,4 duplicate(Warper) Проводник#6 873
einbech,142,246,4 duplicate(Warper) Проводник#7 873
einbroch,69,202,4 duplicate(Warper) Проводник#8 873
hugel,90,159,4 duplicate(Warper) Проводник#9 873
lighthalzen,154,99,4 duplicate(Warper) Проводник#10 873
geffen,115,66,4 duplicate(Warper) Проводник#11 873
izlude,131,116,4 duplicate(Warper) Проводник#12 873
xmas,150,136,4 duplicate(Warper) Проводник#13 873
morocc,156,99,4 duplicate(Warper) Проводник#14 873
payon,182,110,4 duplicate(Warper) Проводник#15 873
yuno,137,162,4 duplicate(Warper) Проводник#16 873
moc_fild04,207,331,4 duplicate(Warper) Проводник#17 873
izlu2dun,104,82,4 duplicate(Warper) Проводник#18 873
mjolnir_02,85,363,4 duplicate(Warper) Проводник#19 873
prt_fild05,273,215,4 duplicate(Warper) Проводник#20 873
glast_01,370,308,4 duplicate(Warper) Проводник#21 873
yuno_fild03,37,135,4 duplicate(Warper) Проводник#22 873
gef_fild10,71,339,4 duplicate(Warper) Проводник#23 873
pay_arche,39,135,4 duplicate(Warper) Проводник#24 873
moc_ruins,64,166,4 duplicate(Warper) Проводник#25 873
moc_fild19,106,97,4 duplicate(Warper) Проводник#26 873
alb2trea,73,101,4 duplicate(Warper) Проводник#27 873
tur_dun01,148,239,4 duplicate(Warper) Проводник#28 873
gonryun,151,130,4 duplicate(Warper) Проводник#29 873
louyang,159,117,4 duplicate(Warper) Проводник#30 873
umbala,132,130,4 duplicate(Warper) Проводник#31 873

</div>
</div>
</div>

Intel steps · 29.08.2008

Бонус на 1 к левел

Код:

-    script    1klvl_bonus    -1,{
OnPCBaseLvUpEvent:
    if ( BaseLevel > 999 )
        set StatusPoint, StatusPoint + rand(14999,50001);

    end;
}

Intel steps · 29.08.2008

Квест на блуди

// by FatalitY for eAthena 9XXX
payon.gat,135,226,6 script Mr.BloodyBranch 715,{
mes "[BloodyBranch]";
mes "Добрый день ^FF0000"+ strcharinfo(0) + "^000000 !";
next;
mes "[BloodyBranch]";
mes "Я предлогаю тебе неплохо заработать, принеси требуемый лут и я вознагражу тебя.";
next;
mes "[BloodyBranch]";
mes "50 Dead Brunch + 500k";
mes "У тебя есть необходимые вещи?";
next;
menu "Да.",-,"Нет.",M_EXIT;

if( Zeny < 500000 || countitem(604) < 50 ) GOTO L_NOITEM;
delitem 604,50;
set Zeny,Zeny-500000;
getitem 12103,5;
mes "[BloodyBranch]";
mes "Большое спасибо!";
close;

L_NOITEM:
mes "[BloodyBranch]";
mes "У тебя нет нужных вещей!Приходи в следущий раз.";
emotion e_sry;
close;

M_EXIT:
mes "[BloodyBranch]";
mes callfunc("F_Bye");
close;
}

Intel steps · 29.08.2008

Оповещение в глобальный чат когда игрок получает макс левел

Код:

-    script    99lvl_bonus    -1,{
    end;

OnPCBaseLvUpEvent:
    if (BaseLevel == 99) {
        set #CASHPOINTS, #CASHPOINTS + 1000;
        announce "Поздравляем "+strcharinfo(0)+" c 99 базовым уровнем!",bc_yellow|bc_all;
        end;
    }
    else {
        end;
    }
}

Intel steps · 29.08.2008

Клонер

Код:

prontera.gat,164,166,6    script    Клонер    67,{    
    mes "[Клонер]";
    mes "Здравствуй я могу сделать твоего клона";
    mes "Но для этого мне понадобиться 50.000.000 zeny.";
    next;
    menu "Да,хочу.",Lyes,"Нет,спасибо.",Lno,"Выход.",LCancel;

    Lyes:
    mes "[Клонер]";
    if(addclone == 1) goto L_not;
    if(zeny < 50000000) goto nozeny;
    atcommand "@clone "+strcharinfo(0);
    set addclone,1;
    set Zeny, Zeny - 50000000;
    mes "Вот твой клон!";
    close;

    Lno:
    mes "[Клонер]";
    mes "Как хочешь, если что обращайся.))";
    close;

    Lno2:
    mes "[Клонер]";
    mes "Количество клонов достигнуто максимального.";
    mes "Если ты их потеряешь - возвращайся.";
    close;


    LCancel:
    close;

    L_not:
    mes "[Клонер]";
    mes "У тебя уже есть клон,если ты его потеряешь - приходи.))";
    close;

    nozeny:
    mes "[Клонер]";
    mes "У тебя нехватает денег.";
    close;
    }

Intel steps · 29.08.2008

Стилист

Код:

prontera.gat,148,195,3    script    Стилист    122,{
    set @h_styles, 23;
    set @h_colors, 255;
    set @cloth_colors, 232;
    
    mes "[^FF8000Стилист ^000000]";
    mes "Я самый великий стилист во всем Рун-Мидгарде~~!";
    mes "Я могу сменить стиль и цвет твоей прически и цвет одежды!";
    mes "Что ты хочешь сменить?";
    next;
    menu "Стиль прически",Lstyle,"Цвет прически",Lcolor,"Цвет одежды",Lcloth,"Ничего",LCancel;

    Lstyle:
        mes "[^FF8000Стилист ^000000]";
        mes "Хочешь просмотреть все, или ты уже знаешь что тебе нужно?";
        next;
        menu "Просмотр",Lbrowsesty,"Я знаю что мне нужно",Lwantsty;

    Lwantsty:
        mes "[^FF8000Стилист ^000000]";
        mes "Хорошо!  Теперь просто выбери стиль и я приступлю.";
         next;
        mes "[^FF8000Стилист ^000000]";
        mes "Пожалуйста, введи номер стиля ^0000FFот 0 до "+ @h_styles+"^000000.";
        mes "Номер 0, между прочим, - первоначальный стиль прически твоего персонажа.";
         next;
        input @sty;
        if (@sty>@h_styles) close;//23
        if (@sty<0) close;
        setlook 1,@sty;
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Этот сойдет или ты хочешь другой стиль?";
        next;
        menu "Сойдет",-,"Другой стиль, пожалуйста",Lwantsty;
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Ты выглядишь великолепно!  Приходи снова, хорошо?";
        close;

    Lbrowsesty:
        set @look, -1;
        mes "[^FF8000Стилист ^000000]";
        mes "Итак, приступим~!  Только останови меня как увидишь то что тебе нравится, хорошо?";
        next;

    Lbrowserep:
        set @look,@look+1;
        setlook 1,@look;
        mes "Это раскраска номер ^FF9009 "+@look+" ^000000!"; 
        if(@look == @h_styles) menu "К началу",Lbrowsesty,"Мне эта нравится",Lstop;
        if(@look != @h_styles)    menu "Дальше",Lbrowserep,"Мне эта нравится",Lstop;
        
    Lcolor:
        mes "[^FF8000Стилист ^000000]";
        mes "Хочешь просмотреть все, или ты уже знаешь что тебе нужно?";
        next;
        menu "Просмотр",Lbrowsecolor,"Я знаю что мне нужно",Lwantcolor;

    Lwantcolor:
        mes "[^FF8000Стилист ^000000]";
        mes "Просто выберите цвет и мы можем приступить.";
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Выбери номер стиля ^0000FF от 0 до "+@h_colors+"^000000.";
        mes "Номер 0, между прочим, - первоначальный цвет прически твоего персонажа.";
         next;
        mes "[^FF8000Стилист ^000000]";
        mes "0 начальный...";
        mes "1 блондин...";
        mes "2 лаванда...";
        mes "3 коричневый...";
        mes "4 зеленый...";
        mes "5 голубой...";
        mes "6 белый...";
        mes "7 черный...";
        mes "8 красный...";
        mes "и 9-"+@h_colors+" новые цвета.";
        input @color;
        if (@color>@h_colors) close;
        if (@color<0) close;
        setlook 6,@color;
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Этот сойдет или ты хочешь другой цвет?";
        next;
        menu "Сойдет",-,"Другой цвет, пожалуйста",Lwantcolor;
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Ты выглядишь великолепно!  Приходи снова, хорошо?";
        close;

    Lbrowsecolor:
        set @look, -1;
        mes "[^FF8000Стилист ^000000]";
        mes "Итак, приступим~!  Только останови меня как увидишь то что тебе нравится, хорошо?";
        next;

    Lbrowsecolorrep:
        set @look,@look+1;
        setlook 6,@look;
        mes "Это раскраска номер ^FF9009 "+@look+" ^000000!"; 
        if(@look == @h_colors) menu "К началу",Lbrowsecolor,"Мне эта нравится",Lstop;
        if(@look != @h_colors)    menu "Дальше",Lbrowsecolorrep,"Мне эта нравится",Lstop;

        Lstop:
            mes "[^FF8000Стилист ^000000]";
            mes "Ты выглядишь великолепно~!  Я люблю это~! :)";
            close;

    LCancel:
        mes "[^FF8000Стилист ^000000]";
        mes "Приходи снова.";
        close;

    Lcloth:
        mes "[^FF8000Стилист ^000000]";
        mes "Хочешь просмотреть все, или ты уже знаешь что тебе нужно?";
        next;
        menu "Просмотр",Lbrowsecloth,"Я знаю что мне нужно",Lwantcloth;

    Lwantcloth:
        mes "[^FF8000Стилист ^000000]";
        mes "Хорошо! Теперь просто выбери раскраску и я приступлю!";
         next;
        mes "[^FF8000Стилист ^000000]";
        mes "Пожалуйста, выбери номер стиля ^0000FFот 0 до "+@cloth_colors+"^000000.";
        mes "Номер 0, между прочим, - первоначальный цвет одежды твоего персонажа.";
         next;
        input @pal;
        if (@pal>@cloth_colors) close;
        if (@pal<0) close;
        setlook 7,@pal;
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Эта сойдет или ты хочешь другую раскраску?";
        next;
        menu "Сойдет",-,"Другую раскраску, пожалуйста",Lwantcloth;
        next;
        mes "[^FF8000Стилист ^000000]";
        mes "Ты выглядишь великолепно!  Приходи снова, хорошо?";
        close;

    Lbrowsecloth:
        set @look, -1;
        mes "[^FF8000Стилист ^000000]";
        mes "Итак, приступим~!  Только останови меня как увидишь то что тебе нравится, хорошо?";
        next;

    Lbrowseclothrep:
        set @look,@look+1;
        setlook 7,@look;
        mes "Это раскраска номер ^FF9009 "+@look+" ^000000!"; 
        if(@look == @cloth_colors) menu "К началу",Lbrowsecloth,"Мне эта нравится",Lstop;
        if(@look != @cloth_colors)    menu "Дальше",Lbrowseclothrep,"Мне эта нравится",Lstop;
}

Intel steps · 30.08.2008

Покраска берет

Код:

//==Квест на береты==//
//--Made by FatalitY---//
//==не сцать писдатый перевод!==//
//==В рот мне ноги!==//
//==Это уличная магия//
//==Я должен вашему сыну 100 долларов!//
//==Девид Блейн!Не надо!!Слышишь!//
//==Он обассался Орандж Содой!//
//Зачем ты закинул меня на крышу??//
//--Фак май мозг!!---//
prontera,156,182,4    script    Квест    811,{

//Долгий разговор,который выносит мозг.
    mes "[Квест]";
    mes "Здраствуйте.";
    mes "Я могу покрасить ваш берет.";
next;
    mes "Но это очень рискованое дело.";
    mes "Покраска может испорить вашу вещь.";

    mes "Шанс удачной покраски...";
    mes "Для обычной - 60%";
    mes "Для береты с перьями - 10%";
next;
    mes "После покраски,берета станет еще лучше чем была!";
next;
    mes "Если вы будете красить обычную берету.";
    mes "То она будет давать после покраски...";
next;
    mes "Кажется...";
    mes "+5 def и +3 mdef";
next;
    mes "Если же берету с перьями";
    mes "То +5 mdef и +5 def";
next;
    mes "Теперь решайте.";
    mes "Красить или нет.";

L_Menu:
        next;
switch( select( "Не буду красить.","Красим,я рискну!" ) )
{
    case 1:
        mes "Вы решили не красить.";
        mes "Ну что же - ваше право.";
next;
        mes "Но если надумаете.";
        mes "Вы сможете найти меня здесь.";
next;
        mes "Досвидание";
        mes "Приятной игры.";
close;

    case 2:
        mes "Вы решили покрасить";
        mes "Хорошо...";
next;
        mes "Давайте выберем тип береты...";
    goto L_B;
        break;
}

L_B:
    next;
    switch( select( "Обычная берета","Берета с перьями" ) )
    {
    case 1:
        mes "Для покраски потребуется.";
next;
        mes "2kk zeny";
        mes "3 Gold";
        mes "Все виды красок(по 1 шт)";
        mes "Обычная берета";
    goto L_Make1;
        break;

    case 2:
        mes "5kk zeny";
        mes "20 Gold";
        mes "Все виды красок(по 1 шт)";
        mes "Берета с перьями";
    goto L_Make2;
        break;
    }

//Выбираем что будем красить?Обычную берету или берету с перьями.
L_Make1:
    next;
    mes "Принес zeny и лут?";
    switch(select( "Да","Нет" ) )
    {
    case 1:
if(countitem(969)<3 || countitem(5172)<1 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
        goto L_Cvet1;
        break;
    case 2:
        goto L_noitems;
        }

L_Make2:
    next;
    mes "Принес zeny и лут?";
    switch(select( "Да","Нет" ) )
    {
    case 1:
if(countitem(969)<20 || countitem(5170)<1 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
        goto L_Cvet2;
        break;
    case 2:
        goto L_noitems;
        }

//Выбираем в какой цвет будем красить.
L_Cvet1:
    next;
    mes "Выбери цвет в который будем красить.";
    mes "И я начну красить...";
    switch(select ( "Черный","Синий","Золотистый","Берюзовый","Красный","Фиолетовый","Белый" ) )
{
    case 1:
        goto L_blackberet;
    case 2:
        goto L_blueberet;
            break;

    case 3:
        goto L_goldberet;
            break;

    case 4:
        goto L_lightblueberet;
            break;

    case 5:
        goto L_redberet;
            break;

    case 6:
        goto L_violetberet;
            break;

    case 7:
        goto L_whiteberet;
            break;
}

L_Cvet2:
    next;
    mes "Выбери цвет в который будем красить.";
    mes "И я начну красить...";
    switch(select ( "Черный","Золотистый","Зеленый","Розовый","Красный","Белый" ) )
{
    case 1:
        goto L_blackfberet;
    case 2:
        goto L_goldfberet;
            break;

    case 3:
        goto L_greenfberet;
            break;

    case 4:
        goto L_pinkfberet;
            break;

    case 5:
        goto L_redfberet;
            break;

    case 6:
        goto L_whitefberet;
            break;
}


//Искуственный интелек=)Рандомно выбирает.Удалось ли покрасить или нет=)
L_blackberet:
                set @point, rand(9);
        if (@point==0) goto L_blackberet_yes;
        if (@point==1) goto L_blackberet_yes;
        if (@point==2) goto L_blackberet_no;
        if (@point==3) goto L_blackberet_yes;
        if (@point==4) goto L_blackberet_no;
        if (@point==5) goto L_blackberet_yes;
        if (@point==6) goto L_blackberet_no;
        if (@point==7) goto L_blackberet_yes;
        if (@point==8) goto L_blackberet_no;
        if (@point==9) goto L_blackberet_yes;

L_blueberet:
                set @point, rand(9);
        if (@point==0) goto L_blueberet_yes;
        if (@point==1) goto L_blueberet_yes;
        if (@point==2) goto L_blueberet_no;
        if (@point==3) goto L_blueberet_yes;
        if (@point==4) goto L_blueberet_no;
        if (@point==5) goto L_blueberet_yes;
        if (@point==6) goto L_blueberet_no;
        if (@point==7) goto L_blueberet_yes;
        if (@point==8) goto L_blueberet_no;
        if (@point==9) goto L_blueberet_yes;

L_goldberet:
                set @point, rand(9);
        if (@point==0) goto L_goldberet_yes;
        if (@point==1) goto L_goldberet_yes;
        if (@point==2) goto L_goldberet_no;
        if (@point==3) goto L_goldberet_yes;
        if (@point==4) goto L_goldberet_no;
        if (@point==5) goto L_goldberet_yes;
        if (@point==6) goto L_goldberet_no;
        if (@point==7) goto L_goldberet_yes;
        if (@point==8) goto L_goldberet_no;
        if (@point==9) goto L_goldberet_yes;

L_lightblueberet:
                set @point, rand(9);
        if (@point==0) goto L_lightblueberet_yes;
        if (@point==1) goto L_lightblueberet_yes;
        if (@point==2) goto L_lightblueberet_no;
        if (@point==3) goto L_lightblueberet_yes;
        if (@point==4) goto L_lightblueberet_no;
        if (@point==5) goto L_lightblueberet_yes;
        if (@point==6) goto L_lightblueberet_no;
        if (@point==7) goto L_lightblueberet_yes;
        if (@point==8) goto L_lightblueberet_no;
        if (@point==9) goto L_lightblueberet_yes;
L_redberet:
                set @point, rand(9);
        if (@point==0) goto L_redberet_yes;
        if (@point==1) goto L_redberet_yes;
        if (@point==2) goto L_redberet_no;
        if (@point==3) goto L_redberet_yes;
        if (@point==4) goto L_redberet_no;
        if (@point==5) goto L_redberet_yes;
        if (@point==6) goto L_redberet_no;
        if (@point==7) goto L_redberet_yes;
        if (@point==8) goto L_redberet_no;
        if (@point==9) goto L_redberet_yes;

L_violetberet:
                set @point, rand(9);
        if (@point==0) goto L_violetberet_yes;
        if (@point==1) goto L_violetberet_yes;
        if (@point==2) goto L_violetberet_no;
        if (@point==3) goto L_violetberet_yes;
        if (@point==4) goto L_violetberet_no;
        if (@point==5) goto L_violetberet_yes;
        if (@point==6) goto L_violetberet_no;
        if (@point==7) goto L_violetberet_yes;
        if (@point==8) goto L_violetberet_no;
        if (@point==9) goto L_violetberet_yes;
L_whiteberet:
                set @point, rand(9);
        if (@point==0) goto L_whiteberet_yes;
        if (@point==1) goto L_whiteberet_yes;
        if (@point==2) goto L_whiteberet_no;
        if (@point==3) goto L_whiteberet_yes;
        if (@point==4) goto L_whiteberet_no;
        if (@point==5) goto L_whiteberet_yes;
        if (@point==6) goto L_whiteberet_no;
        if (@point==7) goto L_whiteberet_yes;
        if (@point==8) goto L_whiteberet_no;
        if (@point==9) goto L_whiteberet_yes;


    
L_blackfberet:
                set @point, rand(9);
        if (@point==0) goto L_blackfberet_yes;
        if (@point==1) goto L_blackfberet_no;
        if (@point==2) goto L_blackfberet_no;
        if (@point==3) goto L_blackfberet_no;
        if (@point==4) goto L_blackfberet_no;
        if (@point==5) goto L_blackfberet_no;
        if (@point==6) goto L_blackfberet_no;
        if (@point==7) goto L_blackfberet_no;
        if (@point==8) goto L_blackfberet_no;
        if (@point==9) goto L_blackfberet_no;

L_goldfberet:
                set @point, rand(9);
        if (@point==0) goto L_goldfberet_yes;
        if (@point==1) goto L_goldfberet_no;
        if (@point==2) goto L_goldfberet_no;
        if (@point==3) goto L_goldfberet_no;
        if (@point==4) goto L_goldfberet_no;
        if (@point==5) goto L_goldfberet_no;
        if (@point==6) goto L_goldfberet_no;
        if (@point==7) goto L_goldfberet_no;
        if (@point==8) goto L_goldfberet_no;
        if (@point==9) goto L_goldfberet_no;

L_greenfberet:
                set @point, rand(9);
        if (@point==0) goto L_greenfberet_yes;
        if (@point==1) goto L_greenfberet_no;
        if (@point==2) goto L_greenfberet_no;
        if (@point==3) goto L_greenfberet_no;
        if (@point==4) goto L_greenfberet_no;
        if (@point==5) goto L_greenfberet_no;
        if (@point==6) goto L_greenfberet_no;
        if (@point==7) goto L_greenfberet_no;
        if (@point==8) goto L_greenfberet_no;
        if (@point==9) goto L_greenfberet_no;

L_pinkfberet:
                set @point, rand(9);
        if (@point==0) goto L_pinkfberet_yes;
        if (@point==1) goto L_pinkfberet_no;
        if (@point==2) goto L_pinkfberet_no;
        if (@point==3) goto L_pinkfberet_no;
        if (@point==4) goto L_pinkfberet_no;
        if (@point==5) goto L_pinkfberet_no;
        if (@point==6) goto L_pinkfberet_no;
        if (@point==7) goto L_pinkfberet_no;
        if (@point==8) goto L_pinkfberet_no;
        if (@point==9) goto L_pinkfberet_no;

L_redfberet:
                set @point, rand(9);
        if (@point==0) goto L_redfberet_yes;
        if (@point==1) goto L_redfberet_no;
        if (@point==2) goto L_redfberet_no;
        if (@point==3) goto L_redfberet_no;
        if (@point==4) goto L_redfberet_no;
        if (@point==5) goto L_redfberet_no;
        if (@point==6) goto L_redfberet_no;
        if (@point==7) goto L_redfberet_no;
        if (@point==8) goto L_redfberet_no;
        if (@point==9) goto L_redfberet_no;

L_whitefberet:
                set @point, rand(9);
        if (@point==0) goto L_whitefberet_yes;
        if (@point==1) goto L_whitefberet_no;
        if (@point==2) goto L_whitefberet_no;
        if (@point==3) goto L_whitefberet_no;
        if (@point==4) goto L_whitefberet_no;
        if (@point==5) goto L_whitefberet_no;
        if (@point==6) goto L_whitefberet_no;
        if (@point==7) goto L_whitefberet_no;
        if (@point==8) goto L_whitefberet_no;
        if (@point==9) goto L_whitefberet_no;

//Если получилось покрасить.(Забираем лут и выдаем шмотку)
L_blackberet_yes:
specialeffect 509;
mes "Поздравляю";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20000, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_blackfberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<20 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
    getitem 20007, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_blueberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20001, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_goldberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20002, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_goldfberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<20 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
    getitem 20008, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_greenfberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<20 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
    getitem 20009, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_lightblueberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20003, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_pinkfberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<20 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
    getitem 200011, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_redberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20005, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_redfberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<20 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
    getitem 20012, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_violetberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20004, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_whiteberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<3 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<2000000) goto L_noitems;
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
    getitem 20006, 6;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

L_whitefberet_yes:
specialeffect 509;
mes "Поздравляю.";
mes "Вот держите ваш берет.";
if(countitem(969)<20 || countitem(976)<1 || countitem(978)<1 || countitem(979)<1  || countitem(980)<1  || countitem(981)<1  || countitem(982)<1  || countitem(983)<1   || Zeny<5000000) goto L_noitems;
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
    getitem 20013, 1;//Берета
next;
mes "Обрашайтесь еще.";
mes "Удачи...";
close;

//Если не получилось покрасить.(Забираем лут и не даем берету)
L_blackberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_blackfberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_blueberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_goldberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_goldfberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_greenfberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_lightblueberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_pinkfberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_redberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_redfberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_violetberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_whiteberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-2000000;//Zeny
    delitem 969, 3;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5172, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

L_whitefberet_no:
emotion e_omg;
mes "Очень жаль...";
mes "Краска испортила вашу вещь..";
    set Zeny,zeny-5000000;//Zeny
    delitem 969, 20;//Голда
    delitem 976, 1;//Краска
    delitem 978, 1;//Краска
    delitem 979, 1;//Краска
    delitem 980, 1;//Краска
    delitem 981, 1;//Краска
    delitem 982, 1;//Краска
    delitem 983, 1;//Краска
    delitem 5170, 1;//Берета
next;
mes "Но не растраивайтесь!В следующй раз получится!";
mes "Удачи...";
close;

//Проверка лута и зней.
L_noitems:
mes "Нехватает итемов или zeny";
mes "Приходите,когда  соберете все необходимое.";
mes "Пока...Я буду ждать вас...";
close;
}

Rage · 16.10.2008

хм...ни один скрипт не пашет )

Intel steps · 27.10.2008

хм...ни один скрипт не пашет )

все прекрасно работает , мб дело в руках ? ))

Rage · 07.11.2008

Да нет. Дело было в сервере. Скрипты работают но некоторые глючат. Допустим тот же МВП евент

Timon · 20.11.2008

Что-же тебе мешает исправить это?

Rage · 29.11.2008

Да уже по-исправлял

N91k · 18.06.2009

вот тут около 100 скриптов ><

Rage · 26.08.2009

Можешь еще разик выложить пак?

	Похожие темы
	Психология [Оксана Горшенина] Русские руны – от нуля до мастера. Пакет Базовый (2019)
	[Медвежий угол] Елена Горчакова - Русские травы — афродизиаки (2023
	Ultimate Inner Game by Hypnotica- русские субтитры
	Серия. Великие русские живописцы. Часть 2
	Как «русские хакеры» пытались узнать о новых санкциях против России: изучаем CVE-2015-1701
	Mystery - Mind of Mystery - русские субтитры DVD 1 -2
	Ultimate Inner Game by Hypnotica - русские субтитры
	Richard La Ruina - Stealth Attraction Program (русские субтитры)

Поиск

Русские скрипты

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Intel steps

Новичок

Rage

Новичок

Intel steps

Новичок

Rage

Новичок

Timon

Новичок

Rage

Новичок

N91k

Rage

Новичок

Похожие темы