viewing paste Unknown #17772 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57
prontera,155,182,3      script  Гомосексуалист    665,{
 
        if (hom_res == 10) {
                        mes "[Гомосексуалист]";
                        mes "Количество попыток сброса статов гомункула закончилось.";
                        close;
        }
       
        if (Class != Job_Alchemist || Class != Job_Creator)
        {
                        mes "[Гомосексуалист]";
                        mes "Извините, но мне разрешают общаться только с Алхимиками.";
                        close;
        }
 
        mes "[Гомосексуалист]";
        mes "^00AA00Пересчет статов гомункула^000000";
        mes "Стоимость: ^AA00001500000 Зеней^000000";
        mes "Комментарии: все статы вашего гомункула будут пересчитаны заново с новыми случайными значениями; у вас должен быть гомункул.";
        next;
 
                if (checkhomcall() != 0)
                {
                        mes "[Гомосексуалист]";
                        mes "Вам необходимо призвать своего любимца.";
                        close;
                }
 
                mes "[Гомосексуалист]";
                mes "Подтвердите пересчет статов гомункула.";
                mes "Стоимость: ^AA00001500000 Зеней^000000";
                next;
 
                if (select("Подтверждаю", "Отмена") == 2)
                {
                        mes "[Гомосексуалист]";
                        mes "Отменено.";
                        close;
                }
 
                if (Zeny < 1500000)
                {
                        mes "[Гомосексуалист]";
                        mes "Нужно больше зеней.";
                        close;
                }
       
                atcommand "@homshuffle";
                set Zeny,Zeny-1500000;
                set hom_res,hom_res +1;
 
                mes "[Гомосексуалист]";
                mes "Статы пересчитаны.";
                mes "Осталось попыток сброса: ^AA0000" + (10 - hom_res) + "^000000.";
                close;
}
 
Viewed 369 times, submitted by unknown.