; LINCUR.MC4 FOR USE WITH F40 COMPILER. TITLE DEPBYT ENTRY DEPSIT DEPSIT: MOVE 6,@0(16) MOVE 7,@1(16) MOVE 8,@2(16) MOVEM 8,DATA LSH 6,-35 DPB 6,PTR(7) MOVE 8,DATA MOVEM 8,@2(16) POPJ 17, PTR: 0 POINT 7,DATA,6 POINT 7,DATA,13 POINT 7,DATA,20 POINT 7,DATA,27 POINT 7,DATA,34 DATA: 0 END