/// Custom XXRO farm rooms.
/// Ygg berries, gold rooms.
/// (C) Oxxy, 2015
 
atlantis,123,183,6  script  Custom Farm Rooms   700,{
 
    mes .npcName$;
    mes "Приветствую, "+strcharinfo(0);
    mes "Я предоставляю доступ к одной уникальной комнате,"
    "в которой, в зависимости от Вашего выбора, Вам будет выпадать одна из вещей:";
    mes "1.) Yggdrassil Berry (шанс дропа 5%)";
    mes "2.) Gold (шанс дропа 5%)";
    mes "3.) Witherless Rose или Frozen Rose (шанс дропа 10% и 15%)";
    switch(select("> Yggdrassil Berry:> Gold:> Witherless / Frozen Rose:> Отмена")) {
    
        // @g_item variable contains ID for item, that will be dropped from monster for current session.
        // @g_chance variable contains chance of dropping @g_item.
        // @g_amount variable contains amount of @g_item that will be dropped by @g_chance
    
        case 1: // Berry
            @g_item = 607;
            @g_chance = 500; // 100 = 1%
            dispbottom "Monsters in special room will drop "+getitemname(@g_item)+" for you at "+@g_chance/100+"% chance.";
            warp "mosk_que",0,0;
            end;
        
        case 2: // Gold
            close;
        
        case 3: // Witherless / Frozen Rose
            close;
        
        case 4: // 
            close;
    }
 
    OnInit:
        .npcName$ = "^FF0000[XXRO] ^0000FFSpecial Room^000000";
        delwaitingroom;
        waitingroom "[XXRO] Special Room",0;
        
        monster "mosk_que",0,0,"Gold",1002,100,strnpcinfo(0)+"::OnSpecialMobKill";
        end;
        
        OnSpecialMobKill:
            addtimer 300000, strnpcinfo(3)+"::On5Mins;";
            set $Earn,$Earn + ( 100000 * $Tax / 100 );
            set #GoldPoint,#GoldPoint + 1;
            dispbottom "Total Gold Point = "+#GoldPoint+" Points.";
            end;
            
        On5Mins:
            monster "mosk_que",0,0,"Gold",1002,1,strnpcinfo(0)+"::OnSpecialMobKill";
            end;
 
}