Big Deal!

! 0 ^ ^ ^ ..

! B H11 H07 H10 H00 B I G D E L!

! 2 ^ ^ ^ ^ ^ ^

 Карточные игры, написанные на Basic страдают от очень медленных графики on-  Экран … но если машина код не ваша специальность, то, что делают  вы делаете? Расслабьтесь – ответ здесь! Машинный код волшебник, Тони   Бейкер представляет удивительную программу для рисования игральные карты any-                где на экране – просто так!

! 1 ^ ^ ^ ^

Объявление самый удивительный, изумительный, явле-

enally потрясающий (Это достаточно превосходной степени! Ред.) Программа, предназначенная для отвлечься от в земля игральных карт. Это аккуратный плиты из машинного кода (хорошо, довольно длинный кусок на самом деле), который позволяет фактически печатать кар- вания игральных карт на экране. Но на самом деле хитрый бит, что вы можете написать свой собственный карты Программа игры в Basic, позволяя моей машине Код попасть на тяжелой работе рисования его.

! 0 ^ ^ ^ ..

! B Картина, которая!

! 1 ^ ^ ^ ^ Хорошая вещь об этой программе является то, что когда-то Вы ввели его в Spectrum, все тебя нужно сделать, чтобы назвать сделку на экран, чтобы использовать одна строка Basic так: ! 0 ^ ^ ^ ..

  PRINT USR карты, у координат,   координаты х, cardnumber, костюм ! 1 ^ ^ ^ ^ И вот оно! Когда Спектр пытается EXE- мило это, ничего не будет печататься на экране для желаемой карты исключением … и что можно появиться в любом месте вы хотите (отсюда и потребность в х и у координаты – как в на печать командой).

Обратите внимание, что печать карты не в коей влияет на нормальную позицию PRINT.

  На самом деле, программа позволит несколько раз- ations на эту тему. Например, если вы делаете “cardnumber, костюм” равное “0,0”, Вы получите лицо игральных карт вниз печатали на экране; попробуйте “0,1” и “0,2”, если вы хотите, чтобы см для чтения и черный Joker карты, соответственно.

  Помимо вышеуказанного пункта выборе карты, которые будут напечатаны на экране, как вы ожидали – карта номер ‘1’ представляет туз, ‘2’ два, и так далее, вплоть до “13” для короля. Цифры представляющие различные костюмы “1” для алмазы, ‘2’ для клубов, ‘3’ для сердца и ‘4’ для лопат. S’easy действительно!

  Для тех, кто знает что-либо о машинном коде (Невежественные клады могут игнорировать этот пункт), Программа на самом деле чуть-чуть умный (чистятся, Прин). Это потому, что все эти и другие цифры (Которые могут, в самом деле, быть имена переменных или такие выражения, как “х + 1”) после слова PRINT являются на самом деле не печатается – очень повезло на самом деле потому что вы не точно получить в восторге нагрузка глупых чисел загромождая экран.

Причины они игнорируются нормальной Basic являются: во-первых, потому, что начинается процедура машинный код с нагрузкой СОЗ, которые имеют эффект делая бедного ПР “Speccy” забыть “, что это должен делать после слова PRINT (но вы должны иметь точно правильный номер, либо он выкрутасы); а во-вторых, системная переменная CH_ADD регулируется таким образом, чтобы он указывал на конце заявления – позволяет следующего оператора будет осуществляться без каких-либо хлопот.

Программа позволяет пару ROM процедур для перемещения CH_ADD и оценить опыт и в то же Время.

  Синтаксис оператора печати карта имеет быть именно так, как я указал. Это может быть реальным разочарованием, если вы сделаете это неправильно, потому что линии который имеет, например, число костюм из Диапазон – или слишком много пунктов после слова ЕГР – может еще быть введен в базовую программу. Ты не узнать, если это не так, пока вы не попытаетесь запустить его.

  Единственный пункт, который стоит упомянуть (которые на самом деле очень важно!) в том, что любой Программа помощи рутины должны быть где-то в начало листинга линии: ! 0 ^ ^ ^ ..

  LET карта = 36102 ! 1 ^ ^ ^ ^ Карты печатные восемь квадратов символов через десять символов квадраты вниз – так вам можете напечатать их в любом месте на экране, что это удобно!   Удачи с рутиной. Как я продолжаю говорить, не паникуйте только потому, что это все было сделано в машинный код. Если вы не слишком уверены, как назвать подпрограмма от Basic в вашем собственном программы, есть Взгляд на примере листинга я дал с Эта статья. Я с нетерпением ожидаю услышать, что Вам удалось с ним делать в будущем форума столбцы. Пока!

! 0 ^ ^ ^ ..

! B GRAND SLAM ! 2 ^ ^ ^ ^ ^ ^ Базовая программа дается здесь обеспечивает быстрый демонстрацию подпрограмма на работе. Вы можете, кстати, замедлить процесс путем добавления “PAUSE 25” о где-то между строк 60 и 80.

! 0 ^ ^ ^ ..

   1 LET карта = 36102

  10 PAPER 0   20 INK 7   30 ГРАНИЦА 0   40 CLS   50 ДЛЯ ы = 1 TO 4   60 при п = 1 TO 13   70 PRINT USR карты, 4 * с-4,2 * н-2, N, S   80 СЛЕДУЮЩИЙ н   90 СЛЕДУЮЩИЙ с

! 2 ^ ^ ^ ^ ^ ^

! B Вам понадобится шестигранный загрузчик (из которых было много опуб- чания в предыдущих выпусках YS) – или, еще лучше, монитор Программа – ввести в эту массу. Обратите внимание, что данные Hex код начинается в 8000 Hex, и затем сразу основной Код программы в точке 8C40 Hex. (Обратите внимание, что основной Код программы требует ввести только средней колонке – Последний столбец содержит исходные тексты для тех, кто использует сборщик; как объявлений, текущий адрес в первый колонка). Убедитесь, что вы ясно пространство в памяти выше 8000 Hex.

! 0 ^ ^ ^ ..

– Заметка ! 1 ^ ^ ^ ^ Код на самом деле начинается в 8C4C, хотя перечисление ассемблера в маг начал в 8C49; промежуточные несколько байтов используются для работы хранение. Кроме того, последнее предложение выше следует читать “… выше 7FFF Hex.”.

! 0 ^ ^ ^ ..

–

! 2 ^ ^ ^ ^ ^ ^

! B

8040 F9 08 49 69 88 8E 80 DF | 8668 D8 CC A0 73 F9 ФК 7F 3F 8048 EA 2A 2A А.А. 2A 2A 2A 29 | 8670 7F 3F 1F 1F 8F 0F FC FC

80A8 0Е 9E 60 BF D1 EA F7 FA | 86D0 FF FF FF FF FF FF AA AA

8138 C0 E0 F0 CF 8C EB E3 1С | 8760 63 6C 2D CD F0 F0 FF FD 8140 0F 1F 6F C6 D8 38 3B E3 | 8768 F0 7F BA BA 0A 0Е F1 до н.э.

8148 7F FF E1 F3 CF 87 87 DF | 8770 7F 9F E7 D9 D6 B7 AD 6B 8150 84 83 8D B2 C2 81 80 80 | 8778 7D BF BB D7 DF 5F AF 57 8158 E7 97 9В 67 64 98 90 60 | 8780 FF 80 81 83 87 8F 9F 9F

81A0 FF 08 1A 3B 7В F3 F7 F7 | 87C8 C0 81 81 40 23 F0 78 84

81D0 F7 F7 57 57 53 5B 4B 9А | 87F8 5F E0 13 FC 83 7F A0 DF 81D8 EF EF EF EF EF AF 2F 2F | 8800 FF 8E F6 9E A6 FD 25 DD 81E0 90 9С 94 95 96 99 E0 89 | 8808 7D F5 F5 FD F5 F5 F5 FD 81E8 17 10 5E DE 5E 5E 4F CF | 8810 98 88 88 98 E7 C0 81 B8 81F0 E4 04 FF FF FE 7С 79 73 | 8818 40 40 5C 4D 95 03 C3 C7 81F8 А.А. 2А FF 00 7F FF 80 3E | 8820 87 FB 8D F6 00 FF 6B FF

8240 FF 80 83 87 87 9В BF BF | 8868 FF 01 31 31 59 59 59 59 8248 FF 03 81 C0 C0 B0 F8 F8 | 8870 BF BF 9D 81 83 87 80 80 8250 FF FF FF FF 7F 3F 2A 2A | 8878 F9 F9 71 01 81 C1 01 0D

8280 2A 2A 2A 2A 3A 6E А.А. AF | 88A8 11 12 0C 71 BF DF AF AF 8288 A0 до н.э. A0 A7 A0 AF A0 A1 | 88B0 56 AB 02 78 76 BE BB DF 8290 90 B0 90 90 10 D0 2F 49 | 88B8 00 3E 81 FE А.А. 00 BD FB 8298 0D 0D 0D 0D 0D 1F F1 13 | 88C0 80 80 BE BE 3D FB F7 F7 82A0 B3 до н.э. B5 B2 B1 B9 B9 B8 | 88C8 59 59 59 59 5B 5B 5B 5B 82A8 FF 07 B0 06 F9 FE FD F8 | 88D0 F2 FF E1 E1 E1 E1 E1 FF 82B0 AE AF 6F 2F 9F 4F A7 C3 | 88D8 77 77 7B 7Б BD BD CD F1 82B8 A0 D9 67 B7 DA ED E7 EA | 88E0 DD DF C2 DC DF DE DE D9 82C0 E9 DC B4 6C DC до н.э. 7С FC | 88E8 7В FB C3 3B FB 7B 7Б 9В 82C8 95 95 F5 FD EF ED ED ED | 88F0 E1 EF C3 DF 87 B8 BB BB 82D0 B4 B4 B4 B6 B6 B6 B6 B6 | 88F8 5B 5B 5B 5B 59 5B FF 59 82D8 F1 Е3 С7 4F 5F 7F 7F 7F | 8900 00 00 00 00 00 00 00 00 82E0 EB E1 F4 F8 СФ ФС FC FE | 8908 00 00 00 00 00 00 00 00 82E8 ED ED ED ED 6D 6D BD 3D | 8910 00 00 00 01 03 07 7F F8 82F0 FC FC FC FC FE FE FE FE | 8918 00 00 00 80 C0 E0 FE 11 82F8 6D 6D 6D 6D 6D 6D 6D 6D | 8920 00 00 00 00 00 00 00 00 8300 FF 80 83 87 87 9В BF BF | 8928 00 00 00 00 00 00 00 00 8308 FF 00 80 C0 C0 B0 F8 F8 | 8930 00 00 00 00 00 00 00 00

8340 7С FC FC FA F7 EF DF E0 | 8968 00 00 00 01 01 01 02 02

83C0 FF 80 83 87 87 9В BF BF | 89E8 00 00 00 00 00 00 00 00 83C8 FF 03 81 C0 C0 B0 F8 F8 | 89F0 00 00 00 00 00 00 00 00 83D0 FF 04 CA FF 7F 3F 20 3E | 89F8 E0 C0 80 40 00 00 00 00 83D8 FF 10 7С FF FF FF 01 71 | 8A00 34 10 18 08 08 08 08 08

8428 00 03 1E 67 E7 E7 E7 1С | 8A50 00 00 00 00 00 00 00 00 8430 12 F8 FF 7В BA DD ED ED | 8A58 00 00 00 00 00 00 00 00 8438 0Е 7F FF FF 7E 18 81 66 | 8A60 03 07 0F 3E FC 00 00 00 8440 54 A8 E8 94 2E 5D DD FA | 8A68 40 20 90 4C 3F 00 00 00 8448 2D 2D 2D 2D 2D 2D AD FF | 8A70 00 00 00 00 00 00 00 00 8450 A3 С3 93 93 92 93 82 BB | 8A78 00 00 00 00 00 00 00 00 8458 7E DB DB DB 18 FF FF 00 | 8A80 00 00 00 00 00 00 00 00 8460 ED F6 F6 F7 7А FA FD 73 | 8A88 00 00 00 00 00 00 00 00 8468 18 81 E7 9А 42 42 BA CA | 8A90 00 00 00 00 00 00 00 01 8470 BA 77 77 F7 EF EF EF FF | 8A98 00 00 00 00 00 00 00 00 8478 2D FF 91 91 91 F1 F1 F1 | 8AA0 00 00 00 00 00 00 00 01 8480 FF 80 8C 9E BF BF BF BF | 8AA8 03 07 0E 1D 3F 70 FF 8F 8488 FF 03 61 F0 F8 F8 F8 F8 | 8AB0 00 00 00 00 00 00 00 00 8490 FF BA BA 82 7F 40 7С 40 | 8AB8 03 06 06 0E 1E 1B 3E 36 8498 FF ED EB 0B F8 57 55 55 | 8AC0 6E EF EF D8 22 C8 83 A7 84A0 FF B8 B2 67 4F 8B 13 1С | 8AC8 00 00 00 00 01 01 01 03

8528 5E 3D 7В F5 FD FD 99 99 | 8B50 1F 0F 07 03 01 00 00 00

8558 FF D6 3А 0B 03 7B 03 33 | 8B80 00 00 0C 1E 3F 3F 3F 3F

8590 E8 F0 F8 F8 7С до н.э. DC EC | 8BB8 F8 F8 70 00 80 C0 00 00

85C0 FA E9 A6 9С 78 FA FF FB | 8BE8 70 F8 0Е 74 0D 74 0D F8 85C8 05 D5 4F 25 2F 39 29 29 | 8BF0 F0 96 96 F0 0F 69 69 0F 85D0 F9 FB FF FA F8 F9 FB FF | 8BF8 08 3E 90 3D 98 3D A0 3D 85D8 3F A3 ФК BF 3F 3F BF FF | 8C00 A8 3D B0 3D B8 3D C0 3D 85E0 F2 FE F2 7E В2 D2 DE | 8C08 C8 3D E0 8B 50 3E 88 3E 85E8 4F 7F 4F 7E 4D 7D 4B 7B | 8C10 58 3E 43 23 63 23 43 63 85F0 F9 C8 3А FF FB F9 F8 FA | 8C18 21 25 61 65 21 25 43 61

8620 FF 0C B9 F1 E1 7F 7F 7F | 8C48 75 03 84 48

! B 8C4C DF RST # 18 | 8D6B 3E04 LD A, # 04 8C4D FE2C CP # 2C | 8D6D DD21498C LD IX, # 8C49 8C4F C28A1C JP NZ, # 1C8A | 8D71 DD7700 LD (IX + # 00), 8C52 E7 RST # 20 | 8D74 CD7F8C ВЫЗОВ # 8C7F 8C53 CDFB24 ВЫЗОВ # 24FB | 8D77 010101 LD BC, # 0101 8C56 CDD52D ВЫЗОВ # 2DD5 | 8D7A CD5E8C ВЫЗОВ # 8C5E 8C59 3801 JR C, # 8C5C | 8D7D D1 POP DE 8C5B C8 RET Z | 8D7E 1С INC E 8C5C CF09 RST # 08/09 | 8D7F 1D декабря E 8C5E 2A4A8C LD HL, (# 8C4A) | 8D80 2009 JR NZ, # 8D8B 8C61 CB0C RRC H | 8D82 010608 LD BC, # 0806 8C63 CB0C RRC H | 8D85 11F08B LD DE, # 8BF0 8C65 CB0C RRC H | 8D88 C37F8C JP # 8C7F 8C67 112000 LD DE, # 0020 | 8D8B 7А LD A, D 8C6A 04 INC B | 8D8C A7 И 8C6B 1801 JR # 8C6E | 8D8D 2028 JR NZ, # 8DB7 8C6D 19 ДОБАВИТЬ HL, DE | 8D8F 010608 LD BC, # 0806 8C6E 10FD DJNZ # 8C6D | 8D92 110089 LD DE, # 8900 8C70 09 ДОБАВИТЬ HL, BC | 8D95 DD7700 LD (IX + # 00), 8C71 5D LD E, L | 8D98 CD7F8C ВЫЗОВ # 8C7F 8C72 7С LD A, H | 8D9B 0600 LD B, # 00 8C73 E603 И # 03 | 8D9D 11503E LD DE, # 3E50 8C75 F658 ИЛИ # 58 | 8DA0 CDD78C ВЫЗОВ # 8CD7 8C77 57 LD D, A | 8DA3 1E78 LD E, # 78 8C78 CB04 RLC H | 8DA5 CDD78C ВЫЗОВ # 8CD7 8C7A CB04 RLC H | 8DA8 1E58 LD E, # 58 8C7C CB04 RLC H | 8DAA CDD78C ВЫЗОВ # 8CD7 8C7E C9 RET | 8DAD 1E28 LD E, # 28

8C84 0608 LD B, # 08 | 8DB9 87 ДОБАВИТЬ, 8C86 1A LD, (DE) | 8DBA 6F LD L, 8C87 DDCB0046 BIT 0, (IX + # 00) | 8DBB 2600 LD H, # 00 8C8B 2808 JR Z, # 8C95 | 8DBD 11F68B LD DE, # 8BF6 8C8D 4F LD C, A | 8DC0 19 ДОБАВИТЬ HL, DE 8C8E 3E01 LD A, # 01 | 8DC1 5E LD E, (HL) 8C90 CB19 RR C | 8DC2 23 INC HL 8C92 17 РБА | 8DC3 56 LD D, (HL) 8C93 30FB JR NC, # 8C90 | 8DC4 0600 LD B, # 00 8C95 77 LD (HL), A | 8DC6 CDD78C ВЫЗОВ # 8CD7 8C96 DDCB004E БИТ 1, (IX + # 00) | 8DC9 D1 POP DE 8C9A 2802 JR Z, # 8C9E | 8DCA D5 PUSH DE 8C9C 1B декабря DE | 8DCB 7В LD A, E 8C9D 1B декабря DE | 8DCC 87 ДОБАВИТЬ, 8C9E 13 INC DE | 8DCD 87 ДОБАВИТЬ, 8C9F 24 INC H | 8DCE 87 ДОБАВИТЬ, 8CA0 10E4 DJNZ # 8C86 | 8DCF C6B8 ДОБАВИТЬ, # B8 8CA2 DDCB0056 БИТ 2, (IX + # 00) | 8DD1 5F LD E, 8CA6 2804 JR Z, # 8CAC | 8DD2 168b LD D, # 8B 8CA8 7В LD A, E | 8DD4 0601 LD B, # 01 8CA9 D608 SUB # 08 | 8DD6 CDD78C ВЫЗОВ # 8CD7 8CAB 5F LD E, A | 8DD9 210401 LD HL, # 0104 8CAC E1 POP HL | 8DDC D1 POP DE 8CAD 23 INC HL | 8DDD A7 И 8CAE DDCB005E БИТ 3, (IX + # 00) | 8DDE ED52 SBC HL, DE 8CB2 2802 JR Z, # 8CB6 | 8DE0 2035 JR NZ, # 8E17 8CB4 2B декабря HL | 8DE2 010308 LD BC, # 0803 8CB5 2B декабря HL | 8DE5 11808A LD DE, # 8A80 8CB6 C1 POP BC | 8DE8 E1 POP HL 8CB7 10C9 DJNZ # 8C82 | 8DE9 DD360000 LD (IX + # 00), # 00 8CB9 E1 POP HL | 8DED CD7F8C ВЫЗОВ # 8C7F 8CBA 012000 LD BC, # 0020 | 8DF0 010601 LD BC, # 0106 8CBD DDCB0066 БИТ 4, (IX + # 00) | 8DF3 CD5E8C ВЫЗОВ # 8C5E 8CC1 2803 JR Z, # 8CC6 | 8DF6 010308 LD BC, # 0803 8CC3 01E0FF LD BC, # FFE0 | 8DF9 11808A LD DE, # 8A80 8CC6 CB0C RRC H | 8DFC DD360009 LD (IX + # 00), # 09 8CC8 CB0C RRC H | 8E00 CD7F8C ВЫЗОВ # 8C7F 8CCA CB0C RRC H | 8E03 010404 LD BC, # 0404 8CCC 09 ДОБАВИТЬ HL, BC | 8E06 CD5E8C ВЫЗОВ # 8C5E 8CCD CB04 RLC H | 8E09 010101 LD BC, # 0101 8CCF CB04 RLC H | 8E0C 11E88B LD DE, # 8BE8 8CD1 CB04 RLC H | 8E0F DD360000 LD (IX + # 00), # 00 8CD3 C1 POP BC | 8E13 CD7F8C ВЫЗОВ # 8C7F 8CD4 10À9 DJNZ # 8C7F | 8E16 C9 RET 8CD6 C9 RET | 8E17 7А LD A, D 8CD7 C5 PUSH BC | 8E18 FE0B CP # 0B 8CD8 C5 PUSH BC | 8E1A 382E JR C, # 8E4A 8CD9 D5 PUSH DE | 8E1C 83 ДОБАВИТЬ, E 8CDA 0E00 LD C, # 00 | 8E1D 83 ДОБАВИТЬ, E 8CDC CD5E8C ВЫЗОВ # 8C5E | 8E1E 83 ДОБАВИТЬ, E 8CDF D1 POP DE | 8E1F 21C000 LD HL, # 00C0 8CE0 010101 LD BC, # 0101 | 8E22 54 LD D, H 8CE3 DD360000 LD (IX + # 00), # 00 | 8E23 5F LD E, 8CE7 CD7F8C ВЫЗОВ # 8C7F | 8E24 CDA930 ВЫЗОВ # 30A9 8CEA 1B декабря DE | 8E27 118075 LD DE, # 7580 8CEB C1 POP BC | 8E2A 19 ДОБАВИТЬ HL, DE 8CEC 3E09 LD A, # 09 | 8E2B EB EX DE, HL 8CEE 90 SUB B | 8E2C 010604 LD BC, # 0406 8CEF 47 LD B, A | 8E2F E1 POP HL 8CF0 0E07 LD C, # 07 | 8E30 DD360000 LD (IX + # 00), # 00 8CF2 D5 PUSH DE | 8E34 CD7F8C ВЫЗОВ # 8C7F 8CF3 CD5E8C ВЫЗОВ # 8C5E | 8E37 010105 LD BC, # 0501 8CF6 D1 POP DE | 8E3A D5 PUSH DE 8CF7 010101 LD BC, # 0101 | 8E3B CD5E8C ВЫЗОВ # 8C5E 8CFA DD360003 LD (IX + # 00), # 03 | 8E3E D1 POP DE 8CFE CD7F8C ВЫЗОВ # 8C7F | 8E3F 1B декабря DE 8D01 C1 POP BC | 8E40 010604 LD BC, # 0406 8D02 04 INC B | 8E43 DD360003 LD (IX + # 00), # 03 8D03 C9 RET | 8E47 C37F8C JP # 8C7F 8D04 CF09 RST # 08/09 | 8E4A E1 POP HL 8D06 11DB1F LD DE, # 1FDB | 8E4B 7В LD A, E 8D09 E1 POP HL | 8E4C 87 ДОБАВИТЬ, 8D0A A7 И | 8E4D 87 ДОБАВИТЬ, 8D0B ED52 SBC HL, DE | 8E4E 87 ДОБАВИТЬ, 8D0D 20FA JR NZ, # 8D09 | 8E4F 87 ДОБАВИТЬ, 8D0F D5 PUSH DE | 8E50 87 ДОБАВИТЬ, 8D10 3E0F LD A, # 0F | 8E51 C620 ADD A, # 20 8D12 FD9631 SUB (IY + # 31) | 8E53 6F LD L, 8D15 F5 PUSH AF | 8E54 268b LD H, # 8B 8D16 CD4C8C ВЫЗОВ # 8C4C | 8E56 E5 PUSH HL 8D19 C1 POP BC | 8E57 21128C LD HL, # 8C12 8D1A B8 CP B | 8E5A 0600 LD B, # 00 8D1B 30E7 JR NC, # 8D04 | 8E5C 4A LD C, D 8D1D F5 PUSH AF | 8E5D 1801 JR # 8E60 8D1E CD4C8C ВЫЗОВ # 8C4C | 8E5F 09 ДОБАВИТЬ HL, BC 8D21 FE19 CP # 19 | 8E60 0D декабря C 8D23 30DF JR NC, # 8D04 | 8E61 20FC JR NZ, # 8E5F 8D25 4F LD C, A | 8E63 1E00 LD E, # 00 8D26 F1 POP AF | 8E65 7E LD, (HL) 8D27 47 LD B, A | 8E66 FE50 CP # 50 8D28 210008 LD HL, # 0800 | 8E68 380C JR C, # 8E76 8D2B CD678C ВЫЗОВ # 8C67 | 8E6A 1С INC E 8D2E 224A8C LD (# 8C4A), HL | 8E6B 1D декабря E 8D31 D5 PUSH DE | 8E6C 2008 JR NZ, # 8E76 8D32 CD4C8C ВЫЗОВ # 8C4C | 8E6E E3 EX (SP), HL 8D35 FE0E CP # 0E | 8E6F 011F00 LD BC, # 001F 8D37 30CB JR NC, # 8D04 | 8E72 09 ДОБАВИТЬ HL, BC 8D39 F5 PUSH AF | 8E73 E3 EX (SP), HL 8D3A CD4C8C ВЫЗОВ # 8C4C | 8E74 1E03 LD E, # 03 8D3D FE05 CP # 05 | 8E76 1F АСР 8D3F 30C3 JR NC, # 8D04 | 8E77 1F АСР 8D41 4F LD C, A | 8E78 1F АСР 8D42 F1 POP AF | 8E79 1F АСР 8D43 47 LD B, A | 8E7A E60F И # 0F 8D44 E1 POP HL | 8E7C 47 LD B, 8D45 C5 PUSH BC | 8E7D 7E LD, (HL) 8D46 0C INC C | 8E7E E60F И # 0F 8D47 0D декабря C | 8E80 4F LD C, 8D48 3E39 LD A, # 39 | 8E81 23 INC HL 8D4A 2807 JR Z, # 8D53 | 8E82 DD7300 LD (IX + # 00), E 8D4C CB41 BIT 0, C | 8E85 E3 EX (SP), HL 8D4E 2002 JR NZ, # 8D52 | 8E86 D5 PUSH DE 8D50 3D декабря | 8E87 E5 PUSH HL 8D51 3D декабря | 8E88 CD5E8C ВЫЗОВ # 8C5E 8D52 3C INC | 8E8B D1 POP DE 8D53 111800 LD DE, # 0018 | 8E8C D5 PUSH DE 8D56 0E0A LD C, # 0A | 8E8D 010202 LD BC, # 0202 8D58 0608 LD B, # 08 | 8E90 CD7F8C ВЫЗОВ # 8C7F 8D5A 77 LD (HL), A | 8E93 C1 POP BC 8D5B 23 INC HL | 8E94 D1 POP DE 8D5C 10FC DJNZ # 8D5A | 8E95 E1 POP HL 8D5E 19 ДОБАВИТЬ HL, DE | 8E96 C5 PUSH BC 8D5F 0D декабря C | 8E97 15 декабря D 8D60 20F6 JR NZ, # 8D58 | 8E98 20CB JR NZ, # 8E65 8D62 2A4A8C LD HL, (# 8C4A) | 8E9A E1 POP HL 8D65 01080A LD BC, # 0A08 | 8E9B C9 RET 8D68 11003D LD DE, # 3D00 | ! 1 ^ ^ ^ ^

! B – с Вашего Spectrum # 13 (Apr.1985) – $

?