ASMB HED S/P MOVEW (15/10/75) F. GAULLIER NAM MOVEW,7 . 92080-1X042 REV.2026 800515 * * SOURCE 92080-18042 * SPC 2 ************************************************************** * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1978. ALL RIGHTS * * RESERVED. NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED, RE- * * PRODUCED, OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITH- * * OUT THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY. * ************************************************************** SPC 2 EXT .ENTR,&MVW ENT MOVEW * * THIS PROGRAM MOVES AN ARRAY * * CALL MOVEW(IBUFS,IBUFD,# WORDS) * AINI NOP AFINI NOP NMO NOP MOVEW NOP JSB .ENTR DEF AINI * LDA NMO,I STA NM * LDA AINI LDB AFINI JSB &MVW NM NOP * JMP MOVEW,I END