Technical data

Example 1 continued:
: BEGINNING OF SOURCE DATA BLOCK
:L FW 254 TYPE AND NUMBER OF SOURCE DATA BLOCK
:JU OB 181 TEST DATA BLOCK
:JC =F003 JUMP, IF BLOCK TEST NEGATIVE
:TAK A1: NUMBER OF DWs, A2: ADDRESS
:ENT A3: ADDRESS
:L FW 252 OFFSET IN SOURCE DATA BLOCK
:ENT A3: NUMBER OF DWs, A4: ADDRESS
:L FW 246 LENGTH OF FIELD
:+F OFFSET + LENGTH OF FIELD
:<F NO. OF DWs <OFFSET + FIELD LENGTH ?
:JC =F004 JUMP, IF YES
:L KB 1 A2:
OFFSET
+ FIELD LEN, A3: ADDRESS
:-F
OFFSET
+ FIELD LENGTH - 1
:+F
OFFSET
+ FIELD LEN - 1 + ADDRESS
:T FW 244 END ADDRESS OF THE DATA SOURCE
: END OF SOURCE DATA BLOCK
:
:
:
:
:
:
:
: BEGINNING OF DESTINATION DATA BLOCK
:L FW 250 TYPE AND NUMBER OF DESTINATION DATA BLOCK
:JU OB 181 TEST DATA BLOCK
:JC =F005 JUMP, IF BLOCK TEST NEGATIVE
:JM =F006 JUMP, IF BLOCK IN EPROM
:TAK A1: NUMBER OF DWs, A2: ADDRESS
:ENT A3: ADDRESS
:L FW 248 OFFSET IN DESTINATION DATA BLOCK
:ENT A3: NUMBER OF DWs, A4: ADDRESS
:L FW 246 LENGTH OF FIELD
:+F OFFSET + LENGTH OF FIELD
:<F NO. OF DWs <
OFFSET +
FIELD LENGTH ?
:JC =F007 JUMP, IF YES
:L KB 1 A2:
OFFSET +
FIELD LEN, A3: ADDRESS
:-F
OFFSET +
FIELD LENGTH - 1
:+F
OFFSET +
FIELD LEN - 1 + ADDRESS
:T FW 242 END ADDRESS OF THE DATA DESTINATION
: END OF DESTINATION DATA BLOCK
:
:
:
:
Continued on next page
Transferring Fields of Memory
CPU 928B Programming Guide
9 - 24 C79000-B8576-C898-01