Subversion Repositories NedoOS

;Бармен Петро
PE_

SM=-PE_+PL

        DW PE0+SM,PE1+SM,PE2+SM,PE3+SM,PE4+SM
        DW PE5+SM,PE6+SM,PE7+SM
        DW PE8+SM,PE9+SM,PE10+SM,PE11+SM,PE12+SM
        DW PE13+SM,PE14+SM
        DW PE15+SM,PE16+SM,PE17+SM,PE18+SM

                if RUS
PE0     DB "Добрые люди сказали, что эта вещь",CR
        DB "ваша.",SOBES
        DB "Я бы на вашем месте, бабуля, не",CR
        DB "верил таким добрым...",END
                else
PE0     DB "Nice people said that this thing",CR
        DB "belongs to you.",SOBES
        DB "If I were you, granny, I wouldn't",CR
        DB "believe such nice people...",END           
                endif

                if RUS
PE1     DB "Здравствуйте, молодой человек.",CR
        DB "Чем это вы занимаетесь?",SOBES
        DB "Пивко варю. Людей пою. Да денюжку",CR
        DB "собираю.",END
                else
PE1     DB "Hello, young man.",CR
        DB "What are you doing?",SOBES
        DB "Brewing beer, getting people",CR
        DB "drunk and earning money.",END              
                endif

                if RUS
PE2     DB "Зачем это вы народ честной",CR
        DB "спаиваете?",SOBES
        DB "А кто вы собственно такая будете,",CR
        DB "мадемуазель?",HERO
                else
PE2     DB "Why are you getting those good",CR
        DB "people drunk?",SOBES
        DB "By the way, who are you,",CR
        DB "mademoiselle?",HERO        
                endif

                if RUS
        DB "Я - колдунья. Звать меня Вера.",CR
        DB "Пришла помочь беде вашей.",SOBES
        DB "Меня зовут Петро. И никого, между",CR
        DB "прочим, я не спаиваю. Сами бегут",CR
        DB "ко мне, а я их от жажды спасаю.",HERO
                else
        DB "I am the sorceress Vera.",CR
        DB "I have come to help you.",SOBES
        DB "My name is Petro. Since you ask,",CR
        DB "I am not getting anybody drunk",CR
        DB "by force. I save them from thirst.",HERO
                endif

                if RUS
        DB "Ага, особливо во-о-он того",CR
        DB "бедолагу спасли, который стол",CR
        DB "лбом вытирает!",SOBES
        DB "Дак солнце сегодня шибко жаркое!",CR
        DB "Вот голову-то ему и напекло...",HERO
                else
        DB "Yes, I see. Look at this guy,",CR
        DB "wiping the table with his face!",SOBES
        DB "Well, it is hot today!",CR
        DB "He probably has sunstroke...",HERO
                endif

                if RUS
        DB "Ну, будь по-твоему... А ну-ка и я",CR
        DB "приобщусь к пивцу свеженькому!",SOBES
        DB "Хм, а вам-то зачем?",HERO
                else
        DB "Perhaps so. What if I asked for",CR
        DB "some freshly brewed beer?",SOBES
        DB "Hmm... Why do you need it?",HERO
                endif

                if RUS
        DB "В горле пересохло от пыли",CR
        DB "дорожной... Мечи, скорее, кружку!",CR
        DB "Да похолоднее!",SOBES
        DB "Ох, не могу... Последнее вон тем",CR
        DB "двум гаврикам ушло...",HERO
                else
        DB "My throat is dry from the dusty",CR
        DB "road... Stop talking and bring",CR
        DB "my cold beer!",SOBES
        DB "Oh, I can't... I sold the last",CR
        DB "of the beer to those guys...",HERO
                endif

                if RUS
        DB "Что же мне от жажды теперь",CR
        DB "помирать?",SOBES
        DB "Да я нового вмиг наварю! Только в",CR
        DB "амбаре у меня шаром покати. Мне б",CR
        DB "того, из чего пиво варят найти...",HERO
                else
        DB "Shall I die from thirst?",SOBES
        DB "I can brew new beer at once!",CR
        DB "But I have no ingredients for it",CR
        DB "and I can't get any more...",HERO          
                endif

                if RUS
PE3     DB "Петро, а из чего пиво варят? Что",CR
        DB "вам нужно?",SOBES
        DB "Ага! Так я и скажу! Секрет фирмы.",CR
        DB "Ну да вы же колдунья, все секреты",CR
        DB "знаете!",SCRPT,24
                else
PE3     DB "How do you make beer, Petro? What",CR
        DB "do you need?",SOBES
        DB "Ha! That's my trade secret!",CR
        DB "On the other hand, you are the",CR
        DB "all-knowing sorceress!",SCRPT,24           
                endif

                if RUS
PE4     DB "Вот хмель. Угадала?",SOBES
        DB "Смотри-ка!.. А где остальное?",HERO
        DB "Скоро принесу.",DIALOG,12
                else
PE4     DB "Here are the hops. Right?",SOBES
        DB "Wow!... And the rest?",HERO
        DB "You'll get it soon.",DIALOG,12             
                endif

                if RUS
PE5     DB "Вот вам мед...",SOBES
        DB "В точку! Но чего-то не хватает...",CR
        DB DIALOG,12
                else
PE5     DB "Here is some honey...",SOBES
        DB "Perfect! But I am still missing",CR
        DB "something...",CR
        DB DIALOG,12           
                endif

                if RUS
PE6     DB "Возьмите пшеницу.",SOBES
        DB "Колосья? Спасибо, веник у меня",CR
        DB "уже есть...",DIALOG,12
                else
PE6     DB "Take this wheat.",SOBES
        DB "Ears of corn? Thanks, but",CR
        DB "I already have a broom...",DIALOG,12               
                endif

                if RUS
PE7     DB "Вот вам зерна пшеницы.",SOBES
        DB "Вот это другое дело! Еще немного",CR
        DB "и все...",DIALOG,12
                else
PE7     DB "Here are the wheat grains.",SOBES
        DB "Good! I've got almost everything",CR
        DB "I need now...",DIALOG,12           
                endif

                if RUS
PE8     DB "Возьмите последний ингредиент.",CR
        DB "Когда будет готово пиво?",SOBES
        DB "Приходите через полчаса.",SCRPT,26
                else
PE8     DB "Here is the last ingredient.",CR
        DB "When do I get my beer?",SOBES
        DB "I need half an hour.",SCRPT,26             
                endif

                if RUS
PE9     DB "Пиво еще не готово?",SOBES
        DB "Наберитесь терпения, бабуля!",END
                else
PE9     DB "Is my beer ready yet?",SOBES
        DB "Hold your horses, granny!",END
                endif

                if RUS
PE10    DB "Ну где же пиво?",SOBES
        DB "Забирайте!",SCRPT,27
                else
PE10    DB "Where is my beer?",SOBES
        DB "Take it!",SCRPT,27         
                endif

                if RUS
PE11    DB "Петро, вы не отдадите мне пустой",CR
        DB "флакон? Он мне еще нужен.",SOBES
        DB "Конечно, берите.",SCRPT,28
                else
PE11    DB "Can you give me the empty flask?",CR
        DB "I need it.",SOBES
        DB "Sure. Here you are.",SCRPT,28              
                endif

                if RUS
PE12    DB "Как дела, Петро?",SOBES
        DB "Нормально.",END
                else
PE12    DB "How are you, Petro?",SOBES
        DB "I'm doing fine.",END               
                endif

                if RUS
PE13    DB "Вам случайно мед не нужен?",SOBES
        DB "Спасибо, но у меня пока есть.",SCRPT,0
                else
PE13    DB "Do you need some honey?",SOBES
        DB "No thanks. I have some.",SCRPT,0           
                endif

                if RUS
PE14    DB "Послушай, Петро, у тебя случайно",CR
        DB "огонька не найдется?",SOBES
        DB "Найду, но прежде помоги мне найти",CR
        DB "кастрюлю. Придворные Зловета",CR
        DB "опять ее у меня утащили.",HERO
                else
PE14    DB "Tell me, Petro, do you have a",CR
        DB "light?",SOBES
        DB "I can find one, but help me find",CR
        DB "the saucepan first. It was stolen",CR
        DB "again by Evilon's henchmen.",HERO          
                endif

                if RUS
        DB "Хорошо, я помогу тебе!",SCRPT,31
                else
        DB "We have a deal!",SCRPT,31          
                endif

                if RUS
PE15    DB "Что-то я не могу найти кастрюлю.",CR
        DB "Может, ты мне просто так дашь",CR
        DB "огонька?",SOBES
        DB "Просто так ничего не бывает.",END
                else
PE15    DB "I can't find your saucepan.",CR
        DB "Can you give me the light for",CR
        DB "free?",SOBES
                DB "Nothing is free in this world!",END        
                endif

;           123456789-123456789-123456789-123

                if RUS
PE16    DB "Вот твоя кастрюля, Петро!",SOBES
        DB "Кастрюля? Какая кастрюля? Ах,",CR
        DB "эта... Возьми спички, ты вроде их",CR
        DB "просила.",SCRPT,32
                else
PE16    DB "Here is your saucepan, Petro!",SOBES
        DB "My saucepan? Which saucepan? Oh,",CR
        DB "that one... Here are the matches",CR
        DB "you asked me for.",SCRPT,32        
                endif

                if RUS
PE17    DB "Петро, скажите...",SOBES
        DB "У меня ничего нет, все кончилось.",END
                else
PE17    DB "Could you...",SOBES
        DB "I have nothing to say.",END        
                endif

                if RUS
PE18    DB "Вроде это тебе.",SOBES
        DB "А ну кыш отсюдова!",END
                else
PE18    DB "I think this is yours.",SOBES
        DB "Go away!",END              
                endif
PEND