Шрифт:
Интервал:
Закладка:
Тед напечатал «Да».
Там были вопросы о производителях, о жокее, тренере, о том, сколько дней прошло со времени последних скачек, в которых участвовала лошадь, и какие суммы она выиграла, и последний вопрос:
«Предварительные шансы лошади оцениваются как 1 к 25 или ниже?»
Тед напечатал «Да», и экран сказал просто: «Другие лошади?»
Тед снова напечатал «Да», и мы вернулись к "Введите кличку лошади и нажмите «ENTER».
— Это не гандикап! — сказал я.
— А вы думали, это гандикап? — Тед покачал головой. — Нет, это скорее расчет статистических вероятностей. Ну что, повторим, а потом ответим «Нет» на вопрос «Другие лошади?».
Он напечатал кличку лошади «Тед Питтс», но ответы на этот раз давал другие, и, когда он ответил «Нет» на последний вопрос, экран очистился и на нем загорелась табличка:
Кличка лошади Джонатан Дерри Тед Питтс Шансы на победу 27:12.
— Шансов у вас никаких, — заметил я. — Вы с тем же успехом можете остаться в стойле.
Тед немного растерялся, потом рассмеялся.
— Да, конечно! Вот это что такое. Программа для игроков.
Он напечатал вместо «RUN» «LIST» — «Просмотреть», и на экране появились строчки программы, но они прокручивались слишком быстро, чтобы успеть их прочитать, совсем как информация о вылетах на табло в аэропорту. Тед помурлыкал что-то себе под нос и напечатал «LIST 10-140». Экран немного помигал и через некоторое время выдал следующее:
"LIST 10-140 10 PRINT "Какая из скачек в Эпсоме? Введите название скачки и нажмите «ENTER».
20 INPUT A$ 30 IF А$="Дерби" THEN 330 40 IF А$="Оукс" THEN 340 50 IF А$="Кубок Короны" THEN 350 60 IF А$="Голубая лента" THEN 360"
И так далее, до конца экрана. Тед одобрительно проглядел все это и сказал:
— Проще простого.
Насколько я помнил, знак доллара означает, что ввозимая информация должна быть буквенной. Если бы там стояло «INPUT А», без знака доллара, это означало бы, что должны быть введены цифры. А дальше, в зависимости от того, какое слово ввели, предлагалось перейти к указанной строке.
Тед выглядел совершенно счастливым. Он напечатал «LIST 300-380», и получил следующее: в строке 330 стояло «LETA=10, В=8, С=6, D=2, Dl=2».
Строки 332, 334 и 336 выглядели точно так же, только цифры были другие.
— Это оценка, — сказал Тед. — Каждому ответу присваивается определенный балл. За первый вопрос — десять очков. Какой у нас был первый вопрос? Выигрывала ли лошадь скачки. И так далее. Ответу на последний вопрос тоже присвоено десять очков. Какой там был вопрос? Насчет предварительных шансов, да?
Я кивнул.
— Ну вот, — продолжал Тед. — Для каждой скачки — своя оценка. Хотя, конечно, для разных скачек вопросы могут варьироваться. Гм-гм. Посмотрим?
— Если у вас есть время...
— Ну конечно! Для апэпэшки время всегда найдется. Люблю я это дело, знаете ли.
Он снова напечатал «LIST» с другими номерами строк и обрел такие перлы, как 520 IF N$="HET" THEN GOTO 560: X=X+B 530 INPUT N$: AB=AB+1 540 IF N$="HET" THEN GOTO 560: X=X+M 550 T=T+G2 560 GOSUB 4000 — А это что за галиматья? — спросил я.
— Хм... ну... видите ли, написать свою программу куда проще, чем прочесть и понять чужую. Программы — вещь ужасно индивидуальная. К одному и тому же результату можно прийти совершенно разными путями. В смысле, если вы, к примеру, едете из Лондона в Бристоль, то вам нужна магистраль М-4, и она всю дорогу называется М-4, но в программе вы в любой точке пути можете назвать магистраль как вам заблагорассудится. Сами-то вы будете знать, что в определенный момент М-4 будет называться, скажем, К-2, или РТ-З, или В-7(2), но никто другой этого знать не будет.
— Это вы тоже детям так объясняете?
— Гм... да. Извините. Привычка. — Тед взглянул на экран. — Ну, видимо, вот эти строчки предназначены для того, чтобы пропускать отдельные вопросы, если предыдущие ответы сделали их ненужными, и переходить сразу в следующую часть программы. Если бы я распечатал всю программу, я мог бы понять, что тут к чему.
Я покачал головой:
— Не надо. Давайте лучше посмотрим какую-нибудь другую программу.
— Давайте.
Тед открутил пленку в начало и напечатал "Cload «Donca», и когда на экране загорелось «ready», напечатал «run».
Нас немедленно спросили: "Какая из скачек в Донкастере? Введите название скачки и нажмите «ENTER».
— Хорошо, — сказал Тед, нажимая на клавиши. — Как насчет того, чтобы посмотреть что-нибудь подальше? Скажем, «GOODW»?
Мы получили "Какая из скачек в Гудвуде? Введите название скачки и нажмите «ENTER».
— Я не знаю, какие скачки есть в Гудвуде, — сказал я.
— Ну, это просто! — сказал Тед и напечатал «LIST 10-140». Когда экран перестал мигать, мы увидели следующее:
"LIST 10-140 10 PRINT "Какая из скачек в Гудвуде? Введите название скачки и нажмите «ENTER».
20 INPUT A$ 30 IF А$="Приз Гудвуда" THEN 330 40 IF А$="Кубок Гудвуда" THEN 340" и так далее.
Всего в списке было пятнадцать скачек.
— А что будет, если ввести название скачки, которой нет в программе?
— спросил я.
— Давайте посмотрим, — сказал Тед. Он напечатал «run», и мы снова вернулись к «Какая из скачек в Гудвуде?» Тед напечатал «Дерби», и экран ответил: «По этой скачке информации не имеется».
— Дешево и сердито! — сказал Тед.
Мы проверили обе стороны каждой из кассет, но все программы были одинаковые: «Какая из скачек в Редкаре?», «Какая из скачек в Аскоте?», «Какая из скачек в Ньюмаркете?».
Там были программы примерно для пятидесяти мест, где проводятся скачки, с различным числом скачек в каждой. В некоторых программах были не названия конкретных скачек, а общие категории, вроде «Дистанция семь фарлонгов от трех лет и старше» или «Трехмильный стипль-чез по возрастным категориям». Я только потом сообразил — и меня это немало позабавило, — что среди этих скачек не было ни одного гандикапа. Там не было ни одного вопроса о том, сколько скачек выиграла лошадь под таким-то и таким-то грузом. В общем и целом эти программы были предназначены для расчета шансов любого количества лошадей в более чем восьмиста поименованных скачках и в неизвестном числе неназванных. У каждой скачки была своя система оценки и очень часто — свой список вопросов. Да, это был монументальный труд!
— Наверно, он потратил на это несколько дней, — сказал Тед.
— Несколько недель, я думаю. Ему приходилось делать это в свободное время.
— Программы, конечно, несложные, — сказал Тед. — Чтобы их составить, не надо быть крупным специалистом. Тут дело скорее в организации, чем в чем-то еще. Однако он не тратил лишнего места. Любители пишут очень длинные программы. Специалисты делают то же самое в три раза короче. Это просто дело практики.