.TITLE DPY .GLOBL DPY,.DA ENA=701521 ENB=701541 XFR=701564 DPY 0 JMS* .DA JMP .+3 HOR .DSA 0 VERT .DSA 0 LAC* HOR AND (777000 DAC X# LAC* VERT AND (777000 SWHA TAD X# ENA ENB XFR JMP* DPY .END @