Тед помурлыкал что-то себе под нос и напечатал «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», и мы снова вернулись к «Какая из скачек в Гудвуде?» Тед напечатал «Дерби», и экран ответил: «По этой скачке информации не имеется».— Дешево и сердито! — сказал Тед.Мы проверили обе стороны каждой из кассет, но все программы были одинаковые: «Какая из скачек в Редкаре?», «Какая из скачек в Аскоте?», «Какая из скачек в Ньюмаркете?».Там были программы примерно для пятидесяти мест, где проводятся скачки, с различным числом скачек в каждой. В некоторых программах были не названия конкретных скачек, а общие категории, вроде «Дистанция семь фарлонгов от трех лет и старше» или «Трехмильный стипль-чез по возрастным категориям». Я только потом сообразил — и меня это немало позабавило, — что среди этих скачек не было ни одного гандикапа. Там не было ни одного вопроса о том, сколько скачек выиграла лошадь под таким-то и таким-то грузом. В общем и целом эти программы были предназначены для расчета шансов любого количества лошадей в более чем восьмиста поименованных скачках и в неизвестном числе неназванных. У каждой скачки была своя система оценки и очень часто — свой список вопросов. Да, это был монументальный труд!— Наверно, он потратил на это несколько дней, — сказал Тед.— Несколько недель, я думаю. Ему приходилось делать это в свободное время.— Программы, конечно, несложные, — сказал Тед. — Чтобы их составить, не надо быть крупным специалистом. Тут дело скорее в организации, чем в чем-то еще. Однако он не тратил лишнего места. Любители пишут очень длинные программы. Специалисты делают то же самое в три раза короче. Это просто дело практики.— Нам стоит записать, на какой из сторон находится «Бейсик» для «Грэнтли», — сказал я. Тед кивнул.— Он в конце. После Йорка. Файл с именем "Z". Он проверил, та ли это кассета, и написал это на ярлычке карандашом.Я зачем-то взял две другие кассеты и мельком глянул на надпись, которую видел и раньше, но как-то не обратил внимания: на одном из ярлычков Питер нацарапал карандашом: «Программы для К. Норвуда». Тед заглянул мне через плечо и сказал:— А, это первая сторона. Там, где Аскот и все прочее. — Он помолчал. — Надо бы пронумеровать стороны. С первой по шестую.
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 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88