Подпрограмма записи кода точки

Текст подпрограммы, выполняющей запись кода точки из регистра еах в видеопамять, приведен в примере 7.1.