10 SCREEN 8                ' Возможны режимы SCREEN 5 ╤ SCREEN 8
20 LINE(10,10)-(50,50),255 ' Копируемый объект
30 VDP(32+1)=10            ' X-координата  и с т о ч н и к а
40 VDP(34+1)=10            ' Y-координата  и с т о ч н и к а
50 VDP(36+1)=55            ' X'-координата  а д р е с а т а
60 VDP(38+1)=55            ' Y'-координата  а д р е с а т а
70 VDP(40+1)=40            ' Длина копируемого блока по оси X
80 VDP(42+1)=40            ' Длина копируемого блока по оси Y
90 VDP(45+1)=&B00000000    ' 0 желательно ставить...
91 :                       ' В этом  регистре может находиться  любое
92 :                       ' число, но при этом может  быть  нарушена
93 :                       ' ориентация адресата  относительно  точки 
94 :                       ' (X',Y') или копирования не произойдет
100 A$=INPUT$(1)           ' П о д о ж д е м ...
110 VDP(46+1)=&B10010000   ' Выполнение команды LMMM
120 A$=INPUT$(1)           ' П о д о ж д е м ...