Ежи Радзивилл Стеклянный мост
001 Hec NOR A,A;(Обнулить на всякий случай регистр А)
002 Hex. Ld C, 32:; (Запомнить число 32);
003 Hex. NOP:; (Not Operation)
004 Нех. Ld A, 1991:; (Запомнить число 1991)
005 Нех. Inc Bx:; (Прибавить куда-то единицу)
006 Hex. Jmp Ex:; (Переход туда, не знаю куда)
007 Hex. Ld Ch, 9:; (Запомнить в регистре С число 9)
008 Hex. Ld В, 39:; (Запомнить в регистре В число 39);
009 Hex. Ex Сx, Dx:;(Поменять местами С и D)
00А Hex. Jmp Dx:; (Переход по адресу, взятому из D)
00В Hex. Add Ax, 17:; (Прибавить к А число 17)
0 °C Hex. Ex Ax, Cx:; (Поменять местами числа А и С);
00D Hex. Mov Ax, Iy:;(Переместить число А невесть куда)
00Е Hex. Dec Bx:; (Уменьшить число В на 1);
00F Hex. In A, F; (Загрузка в порту 16)
01F Hex. In Ix, A:; (Загрузка по адресу, содержащемуся в А);
010 Hex. Out Ix, 1:; (Вывести число 1 куда-то наружу);
021 Hex. Add A, A:;(Удвоить чего-то там такое)
011 Hex. Add A, A;(Удвоить чего-то там такое)
012 Hex. Jmp Ax, Dx; (Опять переход неизвестно куда);
013 Hex. Dec A;; (Вычесть единицу из А);
014 Hex. Out Ix, 1:; (Еще вывести число 1 куда-то наружу);
015 Hex. MOV G,H;(Переместить данные из G в H)
016 Hex. RET; (Вернуться назад)
017 Hex. Dec A; (Вычесть еще единицу из А)
018 Hex. Dec A; (Вычесть еще раз единицу из А)
019 Hex. Inc A’; (Прибавить 1 к альтернативе А)
01А Hex. In Bx, A; (Принять данные откуда-то издалека)
02B Hex. Inc A’:; (Прибавить 1 к альтернативе А)
02C Hex. RET:; (Возвращение)
02D Hex. Mov A,C:;(Опять переместить чего-то куда-то)
02E Hex. Mov A,C:; (Iередвинуть число из А в С)
02F Hex. Add A,D:; (Сравнить содержимое регистров А и D)
030 Hex. Dec D:; (Уменьшить D на единицу.)
031 Hex. Add A,D:; (Сравнить содержимое регистров А и D)
032 Hex. ADD AХ, 0F;(Прибавить к АХ число 15)
033 Hex. JB 011B; (Проверка на ошибку)
034 Hex. MOV BX, 00FF;(Записать в ВХ число 255)
035 Hex. RET:; (Возврат)
036 Hex. INC B;;(Просто увеличенение счетчика)
037 Hex. DEC A; (Вычесть еще один из А)
038 Hex. XOR DX,DX;(Обнуление содержимого DX)
039 Hex. MOV DX, 003;(Записать число 3 в DX)
03A Hex. ADD BX, CX;(Сложить содержимое ВХ и СХ)
03B Hex. DEC A;;(Уменьшить содержимое А)
03C Hex. JMP A;(Еще один прыжок)
03D Hex. LD A,1;(Значение А теперь равно единице)
03E Hex. Mov A,C; (Передвинуть число из А в С)
03F Hex. Mov A,C;(Опять переместить чего-то куда-то)
040 Hex. Add A,D; (Сравнить содержимое регистров А и D)
041 Hex. EXCNG D, E;;(Обмен информацией D и E)
042 Hex. RET (Вернутся назад)
043 Hex. INC A;;(Добавить единицу к А)
044 Hex. INC A;;(Добавить единицу к А)
045 Hex. INC В;;(Добавить единицу к В)
046 Hex. INC С;; (Добавить единицу к С)
047 Hex. INC Е;; (Добавить единицу к Е)
048 Hex. INC A;;(Добавить единицу к А)
049 Hex. INC A;;(Добавить единицу к А)
04A Hex. INC A;;(Добавить единицу к А)
04B Hex. INC A;;(Добавить единицу к А)
04C Hex. INC A;;(Добавить единицу к А)
04D Hex. INC A;;(Добавить единицу к А)
04E Hex. LDJZ AX,CX,DX;(Переброс по указанным координатам)
04F Hex. End.; (Конец)